From 1e18f5e7bc31bb62837efcce2bb3f85324f0bfda Mon Sep 17 00:00:00 2001
From: Jonas Smedegaard <dr@jones.dk>
Date: Thu, 14 Nov 2024 20:11:03 +0100
Subject: add cookiebanners

---
 cookiebanners/screen/y.sh | 52 +++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 52 insertions(+)
 create mode 100755 cookiebanners/screen/y.sh

(limited to 'cookiebanners/screen/y.sh')

diff --git a/cookiebanners/screen/y.sh b/cookiebanners/screen/y.sh
new file mode 100755
index 0000000..019193a
--- /dev/null
+++ b/cookiebanners/screen/y.sh
@@ -0,0 +1,52 @@
+#!/bin/sh
+
+# break on error
+set -eu
+
+# top 1000 domains
+#  * go to <https://dataforseo.com/free-seo-stats/top-1000-websites>
+#  * select "Denmark"
+#  * download
+json_file="ranked_domains.json"
+
+# count Firefox windows
+firefox_windows() {
+	swaymsg -t get_tree | jq '[recurse(.nodes[]? | .nodes[]?)] | map(select(.app_id == "firefox-esr")) | length'
+}
+
+# count already opened Firefox windows
+baseline_windows=$(firefox_windows)
+
+# iterate through top domains and collect data about each
+jq -c '.[]' "$json_file" | while read -r item; do
+	domain=$(echo "$item" | jq -r '.domain')
+	pos=$(echo "$item" | jq -r '.position')
+
+	# skip if screenshot already exist for this domain
+	[ ! -e "$pos.png" ] || continue
+
+	# load front page of www host at domain into Firefox
+	firefox --new-window "https://www.$domain"
+
+	# wait until firefox window is closed
+	while true; do
+		sleep 1
+		if [ "$(firefox_windows)" -eq "$baseline_windows" ]; then
+			break
+		fi
+	done
+
+	# collect PNG screenshot
+	#  * use tool grimshot
+	find ~/ -mindepth 1 -maxdepth 1 -name '*.png' -exec mv '{}' "$pos.png" ';'
+
+	# collect HAR network timing data
+	#  * Open debugger window: F12
+	#  * Select pane "Network"
+	#  * From rightmost pane, select "Save all as HAR"
+	find ~/data -mindepth 1 -maxdepth 1 -name '*.har' -exec mv '{}' "$pos.har" ';'
+
+	# collect data: PNG screenshot, HAR network timing and PDF screenshot
+	#  * use plugin <https://addons.mozilla.org/da/firefox/addon/save-pdf/>
+	find ~/data -mindepth 1 -maxdepth 1 -name '*' -exec mv '{}' "$pos.pdf" ';'
+done
-- 
cgit v1.2.3