Ability to override ordering

[galgen.git] / galgen.zsh

diff --git a/galgen.zsh b/galgen.zsh
index 310f7e1228689e32612daf23bfc4999fef2b5f5a..f1c6253092020a07b0b8b32803d3f8371ffc5142 100755 (executable)
--- a/galgen.zsh
+++ b/galgen.zsh
@@ -1,10 +1,10 @@
 #!/usr/bin/env zsh
 # Copyright (C) 2022-2023 Sergey Matveev <stargrave@stargrave.org>
 
-pagesize=${PAGESIZE:-100}
-
 set -e
-setopt EXTENDED_GLOB
+
+pagesize=${PAGESIZE:-100}
+ordering=${ORDERING:-Om}
 
 djxl2ppm() {
     djxl $1 $1.ppm
@@ -13,7 +13,8 @@ djxl2ppm() {
     rm ${1}-ec1.pgm
 }
 
-imgs=((*.jxl|*.webp~*.preview.webp)(Om))
+setopt EXTENDED_GLOB
+imgs=((*.jxl|*.webp~*.preview.webp)($ordering))
 for (( i=1 ; i <= ${#imgs} ; i++ )) {
     local img=${imgs[$i]}
     echo $i $img
@@ -103,7 +104,13 @@ EOF
         img=$(( ( $p - 1 ) * $pagesize + $i ))
         [[ $img -le ${#imgs} ]] || break
         echo "<a href=\"${img}.img.html\">" >> $dst
-        echo "<img alt=\"preview ${img}\" src=\"${imgs[$img]}.preview.webp\"/></a>" >> $dst
+        alt="preview ${img}"
+        title=""
+        [[ -r ${imgs[$img]}.txt ]] && {
+            alt=`cat ${imgs[$img]}.txt`
+            title="title=\"$alt\""
+        }
+        echo "<img alt=\"$alt\" $title src=\"${imgs[$img]}.preview.webp\"/></a>" >> $dst
     }
     echo "</body></html>" >> $dst
     echo page $p