From 50422eb563caba2e651ac3d2c6920fe3bc9bdd29 Mon Sep 17 00:00:00 2001
From: Andrew Kaster <andrew@ladybird.org>
Date: Fri, 18 Jul 2025 13:21:33 -0600
Subject: [PATCH] Tests: Add XHTML tests for CDATA, PIs and Comment nodes in
 the DOM

---
 .../XHTML/CDATASection-PI-Comment-Nodes.txt   |  4 +++
 .../cssom/xml-stylesheet-pi-in-doctype.txt    |  6 ++++
 .../dom/nodes/Comment-in-doctype.txt          |  6 ++++
 .../dom/nodes/Node-lookupPrefix.txt           | 16 ++++++++++
 .../ProcessingInstruction-in-doctype.txt      |  6 ++++
 .../XHTML/CDATASection-PI-Comment-Nodes.xhtml | 16 ++++++++++
 .../cssom/xml-stylesheet-pi-in-doctype.xhtml  | 17 ++++++++++
 .../dom/nodes/Comment-in-doctype.xhtml        | 15 +++++++++
 .../dom/nodes/Node-lookupPrefix.xhtml         | 31 +++++++++++++++++++
 .../ProcessingInstruction-in-doctype.xhtml    | 15 +++++++++
 10 files changed, 132 insertions(+)
 create mode 100644 Tests/LibWeb/Text/expected/XHTML/CDATASection-PI-Comment-Nodes.txt
 create mode 100644 Tests/LibWeb/Text/expected/wpt-import/css/cssom/xml-stylesheet-pi-in-doctype.txt
 create mode 100644 Tests/LibWeb/Text/expected/wpt-import/dom/nodes/Comment-in-doctype.txt
 create mode 100644 Tests/LibWeb/Text/expected/wpt-import/dom/nodes/Node-lookupPrefix.txt
 create mode 100644 Tests/LibWeb/Text/expected/wpt-import/dom/nodes/ProcessingInstruction-in-doctype.txt
 create mode 100644 Tests/LibWeb/Text/input/XHTML/CDATASection-PI-Comment-Nodes.xhtml
 create mode 100644 Tests/LibWeb/Text/input/wpt-import/css/cssom/xml-stylesheet-pi-in-doctype.xhtml
 create mode 100644 Tests/LibWeb/Text/input/wpt-import/dom/nodes/Comment-in-doctype.xhtml
 create mode 100644 Tests/LibWeb/Text/input/wpt-import/dom/nodes/Node-lookupPrefix.xhtml
 create mode 100644 Tests/LibWeb/Text/input/wpt-import/dom/nodes/ProcessingInstruction-in-doctype.xhtml

diff --git a/Tests/LibWeb/Text/expected/XHTML/CDATASection-PI-Comment-Nodes.txt b/Tests/LibWeb/Text/expected/XHTML/CDATASection-PI-Comment-Nodes.txt
new file mode 100644
index 00000000000..e8ea08da0a1
--- /dev/null
+++ b/Tests/LibWeb/Text/expected/XHTML/CDATASection-PI-Comment-Nodes.txt
@@ -0,0 +1,4 @@
+elem.childNodes.length: 5
+child node 0: [object CDATASection], 4
+child node 1 [object ProcessingInstruction], 7
+child node 2: [object Comment], 8
diff --git a/Tests/LibWeb/Text/expected/wpt-import/css/cssom/xml-stylesheet-pi-in-doctype.txt b/Tests/LibWeb/Text/expected/wpt-import/css/cssom/xml-stylesheet-pi-in-doctype.txt
new file mode 100644
index 00000000000..56c31fe8d75
--- /dev/null
+++ b/Tests/LibWeb/Text/expected/wpt-import/css/cssom/xml-stylesheet-pi-in-doctype.txt
@@ -0,0 +1,6 @@
+Harness status: OK
+
+Found 1 tests
+
+1 Pass
+Pass	xml-stylesheet processing instruction in doctype internal subset
\ No newline at end of file
diff --git a/Tests/LibWeb/Text/expected/wpt-import/dom/nodes/Comment-in-doctype.txt b/Tests/LibWeb/Text/expected/wpt-import/dom/nodes/Comment-in-doctype.txt
new file mode 100644
index 00000000000..50846a14c8c
--- /dev/null
+++ b/Tests/LibWeb/Text/expected/wpt-import/dom/nodes/Comment-in-doctype.txt
@@ -0,0 +1,6 @@
+Harness status: OK
+
+Found 1 tests
+
+1 Fail
+Fail	XML: Comment in doctype internal subset
\ No newline at end of file
diff --git a/Tests/LibWeb/Text/expected/wpt-import/dom/nodes/Node-lookupPrefix.txt b/Tests/LibWeb/Text/expected/wpt-import/dom/nodes/Node-lookupPrefix.txt
new file mode 100644
index 00000000000..1e982f4b96f
--- /dev/null
+++ b/Tests/LibWeb/Text/expected/wpt-import/dom/nodes/Node-lookupPrefix.txt
@@ -0,0 +1,16 @@
+Harness status: OK
+
+Found 11 tests
+
+11 Pass
+Pass	Node.lookupPrefix
+Pass	Node.lookupPrefix 1
+Pass	Node.lookupPrefix 2
+Pass	Node.lookupPrefix 3
+Pass	Node.lookupPrefix 4
+Pass	Node.lookupPrefix 5
+Pass	Node.lookupPrefix 6
+Pass	Node.lookupPrefix 7
+Pass	Node.lookupPrefix 8
+Pass	Node.lookupPrefix 9
+Pass	Node.lookupPrefix 10
\ No newline at end of file
diff --git a/Tests/LibWeb/Text/expected/wpt-import/dom/nodes/ProcessingInstruction-in-doctype.txt b/Tests/LibWeb/Text/expected/wpt-import/dom/nodes/ProcessingInstruction-in-doctype.txt
new file mode 100644
index 00000000000..0f68c18f851
--- /dev/null
+++ b/Tests/LibWeb/Text/expected/wpt-import/dom/nodes/ProcessingInstruction-in-doctype.txt
@@ -0,0 +1,6 @@
+Harness status: OK
+
+Found 1 tests
+
+1 Pass
+Pass	XML: Processing instruction in doctype internal subset
\ No newline at end of file
diff --git a/Tests/LibWeb/Text/input/XHTML/CDATASection-PI-Comment-Nodes.xhtml b/Tests/LibWeb/Text/input/XHTML/CDATASection-PI-Comment-Nodes.xhtml
new file mode 100644
index 00000000000..d2fade4f313
--- /dev/null
+++ b/Tests/LibWeb/Text/input/XHTML/CDATASection-PI-Comment-Nodes.xhtml
@@ -0,0 +1,16 @@
+<!DOCTYPE html>
+<html lang="en" xmlns="http://www.w3.org/1999/xhtml">
+<body>
+<div id="elem"><![CDATA[beep]]><?test test?><!-- I am a comment --><p>Hello</p><p>World</p></div>
+<script src="../include.js"></script>
+<script>
+    test(() => {
+        const elem = document.getElementById("elem");
+        println(`elem.childNodes.length: ${elem.childNodes.length}`);
+        println(`child node 0: ${elem.childNodes[0].toString()}, ${elem.childNodes[0].nodeType}`);
+        println(`child node 1 ${elem.childNodes[1].toString()}, ${elem.childNodes[1].nodeType}`);
+        println(`child node 2: ${elem.childNodes[2].toString()}, ${elem.childNodes[2].nodeType}`);
+    });
+</script>
+</body>
+</html>
diff --git a/Tests/LibWeb/Text/input/wpt-import/css/cssom/xml-stylesheet-pi-in-doctype.xhtml b/Tests/LibWeb/Text/input/wpt-import/css/cssom/xml-stylesheet-pi-in-doctype.xhtml
new file mode 100644
index 00000000000..80f8704a03f
--- /dev/null
+++ b/Tests/LibWeb/Text/input/wpt-import/css/cssom/xml-stylesheet-pi-in-doctype.xhtml
@@ -0,0 +1,17 @@
+<!DOCTYPE html [<?xml-stylesheet href="data:text/css,html{z-index: 1}"?>]>
+<html xmlns="http://www.w3.org/1999/xhtml">
+  <head>
+    <title>xml-stylesheet processing instruction in doctype internal subset</title>
+    <link rel="help" href="https://drafts.csswg.org/cssom/#prolog"/>
+    <script src="../../resources/testharness.js"></script>
+    <script src="../../resources/testharnessreport.js"></script>
+  </head>
+  <body>
+    <script>
+      promise_test(async () => {
+        await new Promise(resolve => window.onload = resolve);
+        assert_equals(getComputedStyle(document.documentElement).zIndex, "auto");
+      });
+    </script>
+  </body>
+</html>
diff --git a/Tests/LibWeb/Text/input/wpt-import/dom/nodes/Comment-in-doctype.xhtml b/Tests/LibWeb/Text/input/wpt-import/dom/nodes/Comment-in-doctype.xhtml
new file mode 100644
index 00000000000..95050c7715c
--- /dev/null
+++ b/Tests/LibWeb/Text/input/wpt-import/dom/nodes/Comment-in-doctype.xhtml
@@ -0,0 +1,15 @@
+<!DOCTYPE html [<!--x-->]><html xmlns="http://www.w3.org/1999/xhtml">
+  <head>
+    <title>XML: Comment in doctype internal subset</title>
+    <script src="../../resources/testharness.js"></script>
+    <script src="../../resources/testharnessreport.js"></script>
+  </head>
+  <body>
+    <script>
+      test(() => {
+        assert_equals(document.documentElement.previousSibling, document.firstChild);
+        assert_equals(document.firstChild.nodeType, Node.DOCUMENT_TYPE_NODE);
+      });
+    </script>
+  </body>
+</html>
diff --git a/Tests/LibWeb/Text/input/wpt-import/dom/nodes/Node-lookupPrefix.xhtml b/Tests/LibWeb/Text/input/wpt-import/dom/nodes/Node-lookupPrefix.xhtml
new file mode 100644
index 00000000000..26198642df7
--- /dev/null
+++ b/Tests/LibWeb/Text/input/wpt-import/dom/nodes/Node-lookupPrefix.xhtml
@@ -0,0 +1,31 @@
+<html xmlns="http://www.w3.org/1999/xhtml" xmlns:x="test">
+<head>
+<title>Node.lookupPrefix</title>
+<script src="../../resources/testharness.js"></script>
+<script src="../../resources/testharnessreport.js"></script>
+</head>
+<body xmlns:s="test">
+<div id="log"/>
+<x xmlns:t="test"><!--comment--><?test test?>TEST<x/></x>
+<script>
+function lookupPrefix(node, ns, prefix) {
+  test(function() {
+    assert_equals(node.lookupPrefix(ns), prefix)
+  })
+}
+var x = document.getElementsByTagName("x")[0];
+lookupPrefix(document, "test", "x") // XXX add test for when there is no documentElement
+lookupPrefix(document, null, null)
+lookupPrefix(x, "http://www.w3.org/1999/xhtml", null)
+lookupPrefix(x, "something", null)
+lookupPrefix(x, null, null)
+lookupPrefix(x, "test", "t")
+lookupPrefix(x.parentNode, "test", "s")
+lookupPrefix(x.firstChild, "test", "t")
+lookupPrefix(x.childNodes[1], "test", "t")
+lookupPrefix(x.childNodes[2], "test", "t")
+lookupPrefix(x.lastChild, "test", "t")
+x.parentNode.removeChild(x)
+</script>
+</body>
+</html>
diff --git a/Tests/LibWeb/Text/input/wpt-import/dom/nodes/ProcessingInstruction-in-doctype.xhtml b/Tests/LibWeb/Text/input/wpt-import/dom/nodes/ProcessingInstruction-in-doctype.xhtml
new file mode 100644
index 00000000000..b6cffd6782f
--- /dev/null
+++ b/Tests/LibWeb/Text/input/wpt-import/dom/nodes/ProcessingInstruction-in-doctype.xhtml
@@ -0,0 +1,15 @@
+<!DOCTYPE html [<?x y?>]><html xmlns="http://www.w3.org/1999/xhtml">
+  <head>
+    <title>XML: Processing instruction in doctype internal subset</title>
+    <script src="../../resources/testharness.js"></script>
+    <script src="../../resources/testharnessreport.js"></script>
+  </head>
+  <body>
+    <script>
+      test(() => {
+        assert_equals(document.documentElement.previousSibling, document.firstChild);
+        assert_equals(document.firstChild.nodeType, Node.DOCUMENT_TYPE_NODE);
+      });
+    </script>
+  </body>
+</html>