[local; kouhei 3] kouhei's ScriptLoader-part (for quick testing)

third_party/WebKit/Source/core/dom/ScriptLoader.cpp

 /*
  * Copyright (C) 1999 Lars Knoll (knoll@kde.org)
  *           (C) 1999 Antti Koivisto (koivisto@kde.org)
  *           (C) 2001 Dirk Mueller (mueller@kde.org)
  * Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008 Apple Inc. All rights
  * reserved.
  * Copyright (C) 2008 Nikolas Zimmermann <zimmermann@kde.org>
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Library General Public
@@ skipping 16 matching lines @@
 #include "bindings/core/v8/ScriptController.h"
 #include "bindings/core/v8/ScriptSourceCode.h"
 #include "core/HTMLNames.h"
 #include "core/SVGNames.h"
 #include "core/dom/ClassicPendingScript.h"
 #include "core/dom/ClassicScript.h"
 #include "core/dom/Document.h"
 #include "core/dom/DocumentParserTiming.h"
 #include "core/dom/IgnoreDestructiveWriteCountIncrementer.h"
 #include "core/dom/Script.h"
+#include "core/dom/Modulator.h"
+#include "core/dom/ModuleScript.h"
 #include "core/dom/ScriptElementBase.h"
 #include "core/dom/ScriptRunner.h"
 #include "core/dom/ScriptableDocumentParser.h"
 #include "core/dom/Text.h"
 #include "core/events/Event.h"
 #include "core/frame/LocalFrame.h"
 #include "core/frame/SubresourceIntegrity.h"
 #include "core/frame/csp/ContentSecurityPolicy.h"
 #include "core/html/CrossOriginAttribute.h"
 #include "core/html/imports/HTMLImport.h"
 #include "core/html/parser/HTMLParserIdioms.h"
+#include "core/loader/modulescript/ModuleScriptFetchRequest.h"
 #include "platform/WebFrameScheduler.h"
 #include "platform/loader/fetch/AccessControlStatus.h"
 #include "platform/loader/fetch/FetchRequest.h"
 #include "platform/loader/fetch/MemoryCache.h"
 #include "platform/loader/fetch/ResourceFetcher.h"
 #include "platform/network/mime/MIMETypeRegistry.h"
 #include "platform/weborigin/SecurityOrigin.h"
 #include "public/platform/WebCachePolicy.h"
 #include "wtf/StdLibExtras.h"
 #include "wtf/text/StringBuilder.h"
 #include "wtf/text/StringHash.h"
 
 namespace blink {
 
+class ScriptElementModuleClient
+    : public GarbageCollectedFinalized<ScriptElementModuleClient>,
+      public ModuleTreeClient {
+  USING_GARBAGE_COLLECTED_MIXIN(ScriptElementModuleClient);
+
+ public:
+  static ScriptElementModuleClient* create(LocalFrame* frame) {
+    return new ScriptElementModuleClient(frame);
+  }
+  virtual ~ScriptElementModuleClient() = default;
+
+  DECLARE_TRACE();
+
+ private:
+  ScriptElementModuleClient(LocalFrame* frame) : m_frame(frame) {}
+
+  // Implements ModuleTreeClient
+  void notifyModuleTreeLoadFinished(ModuleScript*) override;
+
+  Member<LocalFrame> m_frame;
+};
+
+void ScriptElementModuleClient::notifyModuleTreeLoadFinished(
+    ModuleScript* moduleScript) {
+  printf("notifyFinishedModuleTree!!! moduleScript: %p\n", moduleScript);
+  if (!moduleScript)
+    return;
+  DCHECK_EQ(moduleScript->instantiationState(),
+            ModuleInstantiationState::Instantiated);
+
+  // TODO(kouhei): Actually we should just return w/ the prepared script here.
+  // In this prototype, we will execute the module immediately just for fun. :)
+  Modulator::from(m_frame.get())->executeModule(moduleScript->record());
+}
+
+DEFINE_TRACE(ScriptElementModuleClient) {
+  visitor->trace(m_frame);
+  ModuleTreeClient::trace(visitor);
+}
+
 ScriptLoader::ScriptLoader(ScriptElementBase* element,
                            bool parserInserted,
                            bool alreadyStarted,
                            bool createdDuringDocumentWrite)
     : m_element(element),
       m_startLineNumber(WTF::OrdinalNumber::beforeFirst()),
       m_haveFiredLoad(false),
       m_willBeParserExecuted(false),
       m_willExecuteWhenDocumentFinishedParsing(false),
       m_createdDuringDocumentWrite(createdDuringDocumentWrite),
@@ skipping 26 matching lines @@
     m_startLineNumber =
         m_element->document().scriptableDocumentParser()->lineNumber();
   }
 }
 
 ScriptLoader::~ScriptLoader() {}
 
 DEFINE_TRACE(ScriptLoader) {
   visitor->trace(m_element);
   visitor->trace(m_resource);
+  visitor->trace(m_elementModuleClient);
   visitor->trace(m_pendingScript);
   PendingScriptClient::trace(visitor);
 }
 
 void ScriptLoader::setFetchDocWrittenScriptDeferIdle() {
   DCHECK(!m_createdDuringDocumentWrite);
   m_documentWriteIntervention =
       DocumentWriteIntervention::FetchDocWrittenScriptDeferIdle;
 }
 
@@ skipping 366 matching lines @@
                                const String& encoding,
                                FetchRequest::DeferOption defer) {
   Document* elementDocument = &(m_element->document());
   if (!m_element->isConnected() || m_element->document() != elementDocument)
     return false;
 
   DCHECK(!m_resource);
   // 21. "If the element has a src content attribute, run these substeps:"
   if (!stripLeadingAndTrailingHTMLSpaces(sourceUrl).isEmpty()) {
     // 21.4. "Parse src relative to the element's node document."
-    ResourceRequest resourceRequest(elementDocument->completeURL(sourceUrl));
+    KURL url = elementDocument->completeURL(sourceUrl);
+    ResourceRequest resourceRequest(url);
 
     // [Intervention]
     if (m_documentWriteIntervention ==
         DocumentWriteIntervention::FetchDocWrittenScriptDeferIdle) {
       resourceRequest.setHTTPHeaderField(
           "Intervention",
           "<https://www.chromestatus.com/feature/5718547946799104>");
     }
 
     FetchRequest request(resourceRequest, m_element->initiatorName());
 
     // 15. "Let CORS setting be the current state of the element's
     //      crossorigin content attribute."
     CrossOriginAttributeValue crossOrigin =
         crossOriginAttributeValue(m_element->crossOriginAttributeValue());
 
     // 16. "Let module script credentials mode be determined by switching
     //      on CORS setting:"
     // TODO(hiroshige): Implement this step for "module".
+    if (RuntimeEnabledFeatures::moduleScriptsEnabled() &&
+        m_element->typeAttributeValue() == "module") {
+      m_elementModuleClient = ScriptElementModuleClient::create(
+          elementDocument->contextDocument()->frame());
+
+      String nonce;
+      if (m_element->isNonceableElement())
+        nonce = m_element->nonce();
+      ParserDisposition parserState =
+          isParserInserted() ? ParserInserted : NotParserInserted;
+
+      // 16. "Let module script credentials mode be determined by switching
+      //      on CORS setting:"
+      WebURLRequest::FetchCredentialsMode credentialsMode;
+      switch (crossOrigin) {
+        case CrossOriginAttributeNotSet:
+          credentialsMode = WebURLRequest::FetchCredentialsModeOmit;
+          break;
+        case CrossOriginAttributeAnonymous:
+          credentialsMode = WebURLRequest::FetchCredentialsModeSameOrigin;
+          break;
+        case CrossOriginAttributeUseCredentials:
+          credentialsMode = WebURLRequest::FetchCredentialsModeInclude;
+          break;
+        default:
+          NOTREACHED();
+      }
+
+      ModuleScriptFetchRequest moduleRequest(url, nonce, parserState,
+                                             credentialsMode);
+      Modulator::from(elementDocument->frame())
+          ->fetchTree(moduleRequest, m_elementModuleClient);
+      return true;
+    }
 
     // 21.6, "classic": "Fetch a classic script given ... CORS setting
     //                   ... and encoding."
     if (crossOrigin != CrossOriginAttributeNotSet)
       request.setCrossOriginAccessControl(elementDocument->getSecurityOrigin(),
                                           crossOrigin);
 
     request.setCharset(encoding);
 
     // 17. "If the script element has a nonce attribute,
@@ skipping 252 matching lines @@
   //     then abort these steps at this point. The script is not executed.
   return equalIgnoringCase(eventAttribute, "onload") ||
          equalIgnoringCase(eventAttribute, "onload()");
 }
 
 String ScriptLoader::scriptContent() const {
   return m_element->textFromChildren();
 }
 
 }  // namespace blink