Enable module scripts in ScriptLoader

third_party/WebKit/Source/core/xml/parser/XMLDocumentParser.cpp

 /*
  * Copyright (C) 2000 Peter Kelly (pmk@post.com)
  * Copyright (C) 2005, 2006, 2008, 2014 Apple Inc. All rights reserved.
  * Copyright (C) 2006 Alexey Proskuryakov (ap@webkit.org)
  * Copyright (C) 2007 Samuel Weinig (sam@webkit.org)
  * Copyright (C) 2008 Nokia Corporation and/or its subsidiary(-ies)
  * Copyright (C) 2008 Holger Hans Peter Freyther
  * Copyright (C) 2008 Torch Mobile Inc. All rights reserved.
  * (http://www.torchmobile.com/)
  *
@@ skipping 434 matching lines @@
 
   pending_script_->RemoveClient(this);
   pending_script_ = nullptr;
 
   Element* e = script_element_;
   script_element_ = nullptr;
 
   ScriptLoader* script_loader =
       ScriptElementBase::FromElementIfPossible(e)->Loader();
   DCHECK(script_loader);
+  CHECK_EQ(script_loader->GetScriptType(), ScriptType::kClassic);
 
   if (error_occurred) {
     script_loader->DispatchErrorEvent();
   } else if (!was_canceled) {
     if (script_parser_blocking_time > 0.0) {
       DocumentParserTiming::From(*GetDocument())
           .RecordParserBlockedOnScriptLoadDuration(
               MonotonicallyIncreasingTime() - script_parser_blocking_time,
               script_loader->WasCreatedDuringDocumentWrite());
     }
@@ skipping 640 matching lines @@
       script_element_base ? script_element_base->Loader() : nullptr;
   if (!script_loader) {
     PopCurrentNode();
     return;
   }
 
   // Don't load external scripts for standalone documents (for now).
   DCHECK(!pending_script_);
   requesting_script_ = true;
 
-  if (script_loader->PrepareScript(
-          script_start_position_,
-          ScriptLoader::kAllowLegacyTypeInTypeAttribute)) {
+  bool success = script_loader->PrepareScript(
+      script_start_position_, ScriptLoader::kAllowLegacyTypeInTypeAttribute);
+
+  if (script_loader->GetScriptType() != ScriptType::kClassic) {
+    // XMLDocumentParser does not support a module script, and thus ignores it.
+    success = false;
+    VLOG(0) << "Module scripts in XML documents are not supported.";
+  }
+
+  if (success) {
     // FIXME: Script execution should be shared between
     // the libxml2 and Qt XMLDocumentParser implementations.
 
     if (script_loader->ReadyToBeParserExecuted()) {
       if (!script_loader->ExecuteScript(ClassicScript::Create(ScriptSourceCode(
               script_loader->ScriptContent(), GetDocument()->Url(),
               script_start_position_)))) {
         script_loader->DispatchErrorEvent();
         return;
       }
@@ skipping 591 matching lines @@
   RefPtr<XMLParserContext> parser =
       XMLParserContext::CreateStringParser(&sax, &state);
   String parse_string = "<?xml version=\"1.0\"?><attrs " + string + " />";
   ParseChunk(parser->Context(), parse_string);
   FinishParsing(parser->Context());
   attrs_ok = state.got_attributes;
   return state.attributes;
 }
 
 }  // namespace blink