From 464e428e947d51e57584394c0b412739f9e018b3 Mon Sep 17 00:00:00 2001
From: Shannon Booth <shannon.ml.booth@gmail.com>
Date: Sun, 18 Jun 2023 20:49:18 +1200
Subject: [PATCH] LibWeb/Tests: Add basic tests for
 {ByteLength,Counting}QueuingStrategy

---
 .../QueuingStrategy-high-water-mark.txt       | 20 +++++++++++
 .../QueuingStrategy-high-water-mark.html      | 33 +++++++++++++++++++
 2 files changed, 53 insertions(+)
 create mode 100644 Tests/LibWeb/Text/expected/Streams/QueuingStrategy-high-water-mark.txt
 create mode 100644 Tests/LibWeb/Text/input/Streams/QueuingStrategy-high-water-mark.html

diff --git a/Tests/LibWeb/Text/expected/Streams/QueuingStrategy-high-water-mark.txt b/Tests/LibWeb/Text/expected/Streams/QueuingStrategy-high-water-mark.txt
new file mode 100644
index 0000000000..f9083a33ab
--- /dev/null
+++ b/Tests/LibWeb/Text/expected/Streams/QueuingStrategy-high-water-mark.txt
@@ -0,0 +1,20 @@
+======================================
+CountQueuingStrategy
+======================================
+'{"highWaterMark":2}' => 2
+'{"highWaterMark":-1}' => -1
+'{"badKey":-1}' => Exception raised of TypeError
+'{}' => Exception raised of TypeError
+'"string instead"' => Exception raised of TypeError
+'{"highWaterMark":"wrongType"}' => NaN
+'{"highWaterMark":{}}' => NaN
+======================================
+ByteLengthQueuingStrategy
+======================================
+'{"highWaterMark":2}' => 2
+'{"highWaterMark":-1}' => -1
+'{"badKey":-1}' => Exception raised of TypeError
+'{}' => Exception raised of TypeError
+'"string instead"' => Exception raised of TypeError
+'{"highWaterMark":"wrongType"}' => NaN
+'{"highWaterMark":{}}' => NaN
diff --git a/Tests/LibWeb/Text/input/Streams/QueuingStrategy-high-water-mark.html b/Tests/LibWeb/Text/input/Streams/QueuingStrategy-high-water-mark.html
new file mode 100644
index 0000000000..13fd651ac9
--- /dev/null
+++ b/Tests/LibWeb/Text/input/Streams/QueuingStrategy-high-water-mark.html
@@ -0,0 +1,33 @@
+<script src="../include.js"></script>
+<script>
+    test(() => {
+        function checkHighWaterMarkForClass(cls, object) {
+            try {
+                const strat = new cls(object);
+                println(`'${JSON.stringify(object)}' => ${strat.highWaterMark}`);
+            } catch (e) {
+                println(`'${JSON.stringify(object)}' => Exception raised of ${e.constructor.name}`);
+            }
+        }
+
+        for (cls of [
+            CountQueuingStrategy,
+            ByteLengthQueuingStrategy,
+        ]) {
+            println("======================================")
+            println(cls.name)
+            println("======================================")
+            for (strat of [
+                { highWaterMark: 2 },
+                { highWaterMark: -1 },
+                { badKey: -1 },
+                {},
+                "string instead",
+                { highWaterMark: "wrongType" },
+                { highWaterMark: {} },
+            ]) {
+                checkHighWaterMarkForClass(cls, strat);
+            }
+        }
+    });
+</script>