From 20a902e195b44965ac90abf23b4b51d0d8ebe17a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Wed, 8 Jul 2020 00:43:03 +0200
Subject: Reformat xcal data in HTML with js.

---
 static/script.js | 60 ++++++++++++++++++++++++++++++++++++++++++++++++++------
 static/style.css | 13 ++++++++++--
 2 files changed, 65 insertions(+), 8 deletions(-)

diff --git a/static/script.js b/static/script.js
index adfd44de..bdeca8f5 100644
--- a/static/script.js
+++ b/static/script.js
@@ -1,3 +1,40 @@
+/* ------- XML Formatting --------------------------- */
+
+function start_tag(str) {
+    return "<span class='html-tag'>&lt;" + str + "&gt;</span>";
+}
+
+function end_tag(str) {
+    return "<span class='html-tag'>&lt;" + str + "/&gt;</span>";
+}
+
+function istring(indent) {
+    return "".padStart(indent);
+}
+
+function pretty_print_xml(xml, indent=0) {
+    /* pretty_print_xml(xml.documentElement) */
+
+    let tag = xml.tagName;
+
+
+    if (xml.childElementCount == 0) {
+        return istring(indent)
+            + start_tag(tag)
+            + "<b>" + xml.textContent + "</b>"
+            + end_tag(tag);
+    } else {
+        let str = istring(indent) + start_tag(tag) + "<br/>";
+        for (let child of xml.children) {
+            str += pretty_print_xml(child, indent + 1) + "<br/>";
+        }
+        str += istring(indent) + end_tag(tag);
+        return str;
+    }
+}
+
+/* -------------------------------------------------- */
+
 function round_time (time, fraction) {
     let scale = 1 / fraction;
     return Math.round (time * scale) / scale;
@@ -331,16 +368,26 @@ window.onload = function () {
     /* ---------------------------------------- */
 
     /*
-    var el = getElementSomehow();
-
-    let parser = new DOMParser();
-    let xml = parser.parseFromString(
-        el.getElementsByTagName("script")[0].innerText,
-        "text/xml");
     xml.querySelector("summary text").innerHTML = "Pastahack";
     let serializer = new XMLSerializer();
     serializer.serializeToString(xml);
     */
+
+    /* Pretty prints the xcal contents in each popup.
+       Done here since guile produces compact xml.
+
+       element.innerText should still be valid xcal xml.
+    */
+
+    let parser = new DOMParser();
+    for (let el of document.querySelectorAll("[type='application/calendar+xml']")) {
+        let xml = parser.parseFromString(el.innerText, "text/xml");
+        el.outerHTML = "<pre class='xcal'>"
+            + pretty_print_xml(xml.documentElement, 0)
+            + "</pre>";
+
+
+    }
 }
 
 
@@ -371,3 +418,4 @@ $(document).ready(function() {
     Tipped.setDefaultSkin("purple");
     Tipped.create(".event", tipped_args);
 });
+
diff --git a/static/style.css b/static/style.css
index 14ab1e53..3a116e6a 100644
--- a/static/style.css
+++ b/static/style.css
@@ -722,10 +722,14 @@ along with their colors.
     position: absolute;
     top: 0;
     left: 0;
-    background-color: orange;
+    background-color: #dedede;
     right: 0;
     bottom: 0;
     overflow: auto;
+
+    min-width: 100%;
+    min-height: 100%;
+    resize: both;
 }
 
 .tpd-content-wrapper {
@@ -744,10 +748,15 @@ along with their colors.
 	z-index: 1;
 }
 
-script[type="application/calendar+xml"] {
+script[type="application/calendar+xml"], .xcal {
     display: block;
     font-family: monospace;
     font-size: xx-small;
+    padding-left: 1ch;
+}
+
+.html-tag {
+    color: rgb(136, 18, 128);
 }
 
 /* vim:expandtab:softtabstop=4:shiftwidth=4:
-- 
cgit v1.2.3