+
+# TODO: Implement quoting properly
+function quote_html(s) { return s; }
+function quote_html_attribute(s) { return gensub("\"", """, "g", s) }
+
+BEGIN {
+ FS = ":"
+ num_rows = 0
+ num_cols = 0
+ read_header = 1
+ # h/t https://wabain.github.io/2019/10/13/css-rotated-table-header.html
+ print "<html><head><style>"
+ print "th, td { white-space: nowrap; }"
+ print "th { text-align: left; font-weight: normal; }"
+ print "table { border-collapse: collapse }"
+ print "tr.key > th { height: 8em; vertical-align: bottom; line-height: 1 }"
+ print "tr.key > th > div { width: 1em; }"
+ print "tr.key > th > div > div { width: 5em; transform-origin: bottom left; transform: translateX(1em) rotate(-65deg) }"
+ print "td { border: thin solid gray; }"
+ print "td.numeric { text-align: right; }"
+ print "td.yes { border: thin solid gray; background-color: gray; }"
+ print "td.spacer { border: none; }"
+ # h/t https://stackoverflow.com/questions/5687035/css-bolding-some-text-without-changing-its-containers-size/46452396#46452396
+ print ".highlight { text-shadow: -0.06ex 0 black, 0.06ex 0 black; }"
+ print "img { height: 1.2em; }"
+ print "</style><script>"
+ print "function highlight(id) { const e = document.getElementById(id); if (e) { e.classList.add(\"highlight\"); } }"
+ print "function clear_highlight(id) { const e = document.getElementById(id); if (e) { e.classList.remove(\"highlight\"); } }"
+ print "function h2(a, b) { highlight(a); highlight(b); }"
+ print "function ch2(a, b) { clear_highlight(a); clear_highlight(b); }"
+ print "</script></head><body><table><tbody>"
+}
+
+END {
+ printf "<tr class=\"key\"><th></th>"
+ for (i=0; i < num_cols; i++) {
+ printf "<th id=\"%s\"><div><div>%s</div></div></th>", quote_html_attribute(col_headers[i]), quote_html(col_headers[i])
+ }
+ print "</tr>";
+ for (i=1*skip_rows; i <= num_rows; i++) {
+ spacer_row = substr(row_headers[i], 1, 1) == "!"
+ row_header = spacer_row ? substr(row_headers[i], 2) : row_headers[i]
+ printf "<tr><th id=\"%s\">%s</th>", quote_html_attribute(row_header), quote_html(row_header)
+ for (j = 0;j < num_cols; j++) {
+ printf "<td "
+ printf "onmouseover=\"h2('%s','%s')\" ", quote_html_attribute(row_header), quote_html_attribute(col_headers[j])
+ printf "onmouseout=\"ch2('%s','%s')\" ", quote_html_attribute(row_header), quote_html_attribute(col_headers[j])
+ printf "class=\""
+ if (rows[i][j] == " ") { printf " yes " }
+ if (rows[i][j] ~ /^[0-9]+$/) { printf " numeric " }
+ if (spacer_row || substr(col_headers[j], 0, 4) == "<!--") { printf " spacer " }
+ printf "\">" rows[i][j] "</td>"
+ }
+ print "</tr>"
+ }
+ print "</tbody></table></body></html>"
+}
+
+{
+ if (/^$/) {
+ read_header = 1
+ num_rows++
+ } else {
+ if (read_header) {
+ read_header = 0
+ row_headers[num_rows] = $0
+ } else {
+ if (! ($1 in col_index)) {
+ col_headers[num_cols] = $1
+ col_index[$1] = num_cols++
+ }
+ rows[num_rows][col_index[$1]] = $2 ? $2 : " "
+ }
+ }
+}
projects / tablify / commitdiff