omit empty parent pages from page listing

[shellwiki] / macros / changes

diff --git a/macros/changes b/macros/changes
index be4dfec868ce86348c5b4e518d1b2f16d1c30dec..c399ee58f6393535e77768d68203336badbb689f 100755 (executable)
--- a/macros/changes
+++ b/macros/changes
@@ -1,48 +1,84 @@
 #!/bin/sh
 
+# Copyright 2023 Paul Hänsch
+# 
+# Permission to use, copy, modify, and/or distribute this software for any
+# purpose with or without fee is hereby granted, provided that the above
+# copyright notice and this permission notice appear in all copies.
+# 
+# THE SOFTWARE IS PROVIDED “AS IS” AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+# WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+# MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+# SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+# WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+# ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR
+# IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+
 . "$_EXEC/cgilite/cgilite.sh"
 . "$_EXEC/tools.sh"
 . "$_EXEC/acl.sh"
 
-LANGUAGES=''
+_(){ printf %s\\n "$*"; }
+[ "${LANGUAGE}" -a -r "${_EXEC}/l10n/${LANGUAGE}.sh" ] && . "${_EXEC}/l10n/${LANGUAGE}.sh"
 
-glob="/" depth=-1
+LANGUAGES='' glob="/" depth=-1
+set -- "$@" --
 while [ $# -gt 0 ]; do case $1 in
   --system) glob_system_pages=true; shift 1;;
   :*) LANGUAGES="${LANGUAGES}${LANGUAGES:+ }${1#:}"; shift 1;;
   --depth) depth="$2"; shift 2;;
-  *) glob="$1"; shift 1;;
+  --) shift 1; break;;
+  *) set -- "$@" "$1"; shift 1;;
 esac; done
+[ "$*" ] || set -- /
+
+page='' page_abs='' ostamp='' odate='' lstamp='' ldate='' row='' rowstate=''
 
-printf '<table><thead>\n<th>Page</th>'
+printf '<table class="macro changes"><thead>\n<th>Page</th>'
 for l in $LANGUAGES; do printf '<th>%s</th>' "$l"; done
 printf '\n</thead><tbody>\n'
 
-page_glob "$glob" "$depth" |while read page; do
-  acl_read "$page" || continue
+for glob in "$@"; do
+  page_glob "$glob" "$depth" 
+done \
+| sort -u \
+| while read page; do
+  page_abs="$(page_abs "$page")"
+  acl_read "${page_abs}" || continue
+  mdfile "${page_abs}" >&- || continue
 
-  printf '<tr>'
   read ostamp odate <<-EOF
-       $(git -C "$_DATA" log --pretty="format:%at %ar" -- "pages/${page}#page.md")
+       $([ "$REV_PAGES" = true ] \
+         && git -C "$_DATA" log --pretty="format:%at %ai" -- "pages${page_abs}#page.md" \
+         || stat -c "%Y %y" -- "$_DATA/pages${page_abs}#page.md" 2>&- \
+         || printf "0 %s\n" "$(_ "(never edited)")"
+       )
        EOF
-  printf '<td><a href="%s">%s</a><span>%s</span></td>' "$(HTML "$page")" "$(HTML "$page")" "${odate}"
+  row="<td><a href=\"$(HTML "$page")\">$(HTML "$page")</a><span class=\"date\">${odate%%[+.]*}</span></td>"
+  rowstate=''
  
   for l in $LANGUAGES; do
     if [ -f "${_DATA}/pages/${page}:${l}/#page.md" ]; then
       read lstamp ldate <<-EOF
-       $(git -C "$_DATA" log --pretty="format:%at %ar" -- "pages/${page}:${l}/#page.md")
+       $([ "$REV_PAGES" = true ] \
+         && git -C "$_DATA" log --pretty="format:%at %ai" -- "pages$(page_abs "${page_abs}:${l}")/#page.md" \
+         || stat -c "%Y %y" -- "$_DATA/pages$(page_abs "${page_abs}:${l}")/#page.md"
+       )
        EOF
-      if [ $lstamp -lt $ostamp ]; then
-        printf '<td><a href="%s">outdated</a><span>%s</span></td>' "$(HTML "${page}:${l}")" "$ldate"
+      if [ $lstamp -lt $ostamp ] 2>&-; then
+        row="${row}<td class=\"outdated\"><a href=\"$(HTML "${page}:${l}")\">$(_ outdated)</a><span class=\"date\">${ldate%%[+.]*}</span></td>"
+        [ "$rowstate" = "${rowstate%*outdated*}" ] && rowstate="${rowstate}${rowstate:+ }outdated"
       else
-        printf '<td><a href="%s">current</a><span>%s</span></td>' "$(HTML "${page}:${l}")" "$ldate"
+        row="${row}<td class=\"current\" ><a href=\"$(HTML "${page}:${l}")\">$(_ current)</a ><span class=\"date\">${ldate%%[+.]*}</span></td>"
+        [ "$rowstate" = "${rowstate%*current*}" ] && rowstate="${rowstate}${rowstate:+ }current"
       fi
     else
-      printf '<td><a href="%s">missing</a></td>' "$(HTML "${page}:${l}")"
+      row="${row}<td class=\"missing\"><a href=\"$(HTML "${page}:${l}")\">$(_ missing)</a></td>"
+      [ "$rowstate" = "${rowstate%*missing*}" ] && rowstate="${rowstate}${rowstate:+ }missing"
     fi
   done
 
-  printf '</tr>\n'
+  printf '<tr class="%s">%s</tr>\n' "$rowstate" "$row"
 done
 
 printf '</tbody></table>'