iAdd first umn-conforming dirlisting implementation. - geomyidae - A small C-based gopherd. Err bitreich.org 70 hgit clone git://bitreich.org/geomyidae/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/geomyidae/ URL:git://bitreich.org/geomyidae/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/geomyidae/ bitreich.org 70 1Log /scm/geomyidae/log.gph bitreich.org 70 1Files /scm/geomyidae/files.gph bitreich.org 70 1Refs /scm/geomyidae/refs.gph bitreich.org 70 1Tags /scm/geomyidae/tag bitreich.org 70 1README /scm/geomyidae/file/README.gph bitreich.org 70 1LICENSE /scm/geomyidae/file/LICENSE.gph bitreich.org 70 i--- Err bitreich.org 70 1commit 8d1047f9e55a6210bdee47aecde5728c0ae12c60 /scm/geomyidae/commit/8d1047f9e55a6210bdee47aecde5728c0ae12c60.gph bitreich.org 70 1parent d39742c74e21e225e06d1a7d55044a740158d6e4 /scm/geomyidae/commit/d39742c74e21e225e06d1a7d55044a740158d6e4.gph bitreich.org 70 hAuthor: Christoph Lohmann <20h@r-36.net> URL:mailto:20h@r-36.net bitreich.org 70 iDate: Sun, 3 Apr 2022 09:41:42 +0200 Err bitreich.org 70 i Err bitreich.org 70 iAdd first umn-conforming dirlisting implementation. Err bitreich.org 70 i Err bitreich.org 70 iMuch is to fix here. Err bitreich.org 70 i Err bitreich.org 70 iDiffstat: Err bitreich.org 70 i M cgi-examples/dirlisting.dcgi | 36 +++++++++++++++++++++++++++++-- Err bitreich.org 70 i D cgi-examples/maplisting.dcgi | 11 ----------- Err bitreich.org 70 i Err bitreich.org 70 i2 files changed, 34 insertions(+), 13 deletions(-) Err bitreich.org 70 i--- Err bitreich.org 70 1diff --git a/cgi-examples/dirlisting.dcgi b/cgi-examples/dirlisting.dcgi /scm/geomyidae/file/cgi-examples/dirlisting.dcgi.gph bitreich.org 70 i@@ -1,7 +1,39 @@ Err bitreich.org 70 i #!/bin/sh Err bitreich.org 70 i # Err bitreich.org 70 i-# List all .md files in some directory and show a dir listing. Err bitreich.org 70 i+# Dir listing example. Err bitreich.org 70 i # Err bitreich.org 70 i+# Entry definition in .Links, .cap/$file or .names: Err bitreich.org 70 i+# Name=, Type=, Path=, Host=, Port=, Numb=, Abstract=, Admin=, URL=, TTL= Err bitreich.org 70 i+# Err bitreich.org 70 i+ Err bitreich.org 70 i+[ -f .abstract ] && cat .abstract | sed 's/^t/&&/' Err bitreich.org 70 i+ Err bitreich.org 70 i+find . -maxdepth 1 \ Err bitreich.org 70 i+| sort -r \ Err bitreich.org 70 i+| cut -d'/' -f 2- \ Err bitreich.org 70 i+| grep -v "^\." \ Err bitreich.org 70 i+| while read -r entry; Err bitreich.org 70 i+do Err bitreich.org 70 i+ [ "${entry}" == ".cap" ] && continue Err bitreich.org 70 i+ [ "${entry}" == ".Links" ] && continue Err bitreich.org 70 i+ [ "${entry}" == ".names" ] && continue Err bitreich.org 70 i+ Err bitreich.org 70 i+ entrytype="9" Err bitreich.org 70 i+ [ -d "${entry}" ] && entrytype="1" Err bitreich.org 70 i+ Err bitreich.org 70 i+ entryserver="server" Err bitreich.org 70 i+ entryport="port" Err bitreich.org 70 i+ entryname="%f" Err bitreich.org 70 i+ if [ -f ".cap/$entry" ]; Err bitreich.org 70 i+ then Err bitreich.org 70 i+ entryname="$(cat ".cap/$entry" \ Err bitreich.org 70 i+ | grep "^Name=" \ Err bitreich.org 70 i+ | cut -d'=' -f 2-)" Err bitreich.org 70 i+ fi Err bitreich.org 70 i+ [ -z "${entryname}" ] && entryname="%f" Err bitreich.org 70 i Err bitreich.org 70 i-find *.md -printf "[0|%TY-%Tm-%Td %f|%f|server|port]\r\n" | sort -r Err bitreich.org 70 i+ find "${entry}" \ Err bitreich.org 70 i+ -maxdepth 0 \ Err bitreich.org 70 i+ -printf "[${entrytype}|%TY-%Tm-%Td ${entryname}|%f|${entryserver}|${entryport}]\r\n" Err bitreich.org 70 i+done Err bitreich.org 70 i Err bitreich.org 70 1diff --git a/cgi-examples/maplisting.dcgi b/cgi-examples/maplisting.dcgi /scm/geomyidae/file/cgi-examples/maplisting.dcgi.gph bitreich.org 70 i@@ -1,11 +0,0 @@ Err bitreich.org 70 i-#!/bin/sh Err bitreich.org 70 i-# Err bitreich.org 70 i-# List all .md files in some directory and show a dir listing. Err bitreich.org 70 i-# Display map.gph first. Err bitreich.org 70 i-# Err bitreich.org 70 i- Err bitreich.org 70 i-[ -f map.gph ] && cat map.gph Err bitreich.org 70 i-[ -f .abstract ] && cat .abstract Err bitreich.org 70 i- Err bitreich.org 70 i-find *.md -printf "[0|%TY-%Tm-%Td %f|%f|server|port]\r\n" | sort -r Err bitreich.org 70 i- Err bitreich.org 70 .