#! /bin/sh - # # This file is licensed under the MIT No Attribution license. # # # By default, files are not indexed, and directories are indexed and # recursed into for further indexing. To index a file, add it to the # "files" file in the same directory. To prevent a directory from being # indexed and recursed into, add it to the "ignore" file in the parent # directory. To index a directory but prevent it from being recursed # into, add it to the "skip" file in the parent directory. # set -e || exit $? . ./prelude.bash readonly quinngrier=quinngrier #----------------------------------------------------------------------- step() { declare current declare d declare h declare ignore declare lastmod declare reverse declare root declare sitemap_end declare sitemap_start declare skip declare title declare x declare xs root=${1-./} readonly root current=${2-./} readonly current if [[ "$current" == ./ ]]; then x=$(git status --ignored --short) if [[ "$x" ]]; then printf '%s\n' "Repository is not clean." >&2 exit 1 fi fi title="/${current#./} | Quinn's Manuals Archive" title=${title#/ | } readonly title >index.html cat <>index.html $title EOF h= d=./ x=$current while [[ $x != ./ ]]; do x=${x%/} h="${x##*/}/$h" d+=../ d=${d#./} x=${x%/*}/ done h="/$h" cat <>index.html

Quinn's Manuals Archive

$h
  1. EOF if [[ -f ignore ]]; then ignore=' '$( sed $'/^[\t ]*#/ d' >index.html
  2. $x/
    3. EOF done if [[ -f files ]]; then xs=$(cat files) for x in $xs; do cat <>index.html
  3. $x
    4. EOF done fi cat <<'EOF' >>index.html
EOF if [[ -f skip ]]; then skip=' '$( sed $'/^[\t ]*#/ d' sitemap.xml printf %s ' ' >&3 i=0 n_bytes=$max_bytes n_entries=0 while IFS= read -r file; do lastmod=${file##* } file=${file% *} if [[ "$file" == @EOF ]]; then break fi file=${file:2} lastmod=${lastmod%.*}+00:00 if [[ "$file" == sitemap* ]]; then sitemap_lastmod[$file]=$lastmod continue fi if ((n_bytes >= max_bytes || n_entries >= max_entries)); then if ((i > 0)); then printf %s "$sitemap_end" >&4 exec 4>&- printf %s " https://manuals.$quinngrier.com/sitemap-$i.xml ${sitemap_lastmod[sitemap-$i.xml]-} " >&3 fi ((++i)) n_bytes=$((${#sitemap_start} + ${#sitemap_end})) n_entries=0 exec 4>sitemap-$i.xml printf %s "$sitemap_start" >&4 fi urlstr=" https://manuals.$quinngrier.com/$file $lastmod " ((n_bytes += ${#urlstr})) ((++n_entries)) printf %s "$urlstr" >&4 done if [[ "$file" != @EOF ]]; then exit 1 fi if ((i > 0)); then printf %s "$sitemap_end" >&4 exec 4>&- printf %s " https://manuals.$quinngrier.com/sitemap-$i.xml ${sitemap_lastmod[sitemap-$i.xml]-} " >&3 fi printf %s ' ' >&3 exec 3>&- ) git add -u index.html '*/index.html' 'sitemap*' git add [!.]*/**/index.html sitemap* git checkout -q . git clean -dffxq fi #--------------------------------------------------------------------- }; readonly -f step #----------------------------------------------------------------------- main() { declare x x=$(git status --ignored --short) if [[ "$x" ]]; then printf '%s\n' "Repository is not clean." >&2 exit 1 fi while :; do step x=$(git status --ignored --short) if [[ ! "$x" ]]; then break fi git add . git commit -m 'Run ./index' done }; readonly -f main #----------------------------------------------------------------------- main "$@"