2 # Copyright (C) 2022-2023 Sergey Matveev <stargrave@stargrave.org>
4 pagesize=${PAGESIZE:-100}
11 [[ -r ${1}-ec0.ppm ]] || return 0
12 mv ${1}-ec0.ppm $1.ppm
16 imgs=((*.jxl|*.webp~*.preview.webp)(Om))
17 for (( i=1 ; i <= ${#imgs} ; i++ )) {
23 <html><head><title>Image ${i}/${#imgs}: $img</title></head><body>
26 echo "<a href=\"$(( $i - 1 )).img.html\"><<<</a>" >> $dst
27 [[ $i -eq ${#imgs} ]] ||
28 echo "<a href=\"$(( $i + 1 )).img.html\">>>></a>" >> $dst
29 echo "<hr/><img alt=\"$img\" src=\"$img\"/>" >> $dst
30 [[ -r ${img}.txt ]] && {
31 echo "<hr/><pre>" >> $dst
32 cat ${img}.txt >> $dst
36 if [[ $img:e = jxl ]] ; then
38 jxlinfo $img > $img.info
41 echo "Alternative formats:" >> $dst
42 if grep -q "JPEG bitstream reconstruction" $img.info ; then
43 [[ -r $img.jpg ]] || {
45 touch -r $img $img.jpg
47 echo "<a href=\"$img.jpg\">JPEG</a>" >> $dst
49 [[ -r $img.png ]] || {
51 pamtopng < $img.ppm > $img.png
53 pngcrush -rem alla -rem allb -z 2 $img.png $img.png.png
54 mv $img.png.png $img.png
56 touch -r $img $img.png
58 echo "<a href=\"$img.png\">PNG</a>" >> $dst
61 [[ -r $img.preview.webp ]] || djxl2ppm $img
66 [[ -r $img.preview.webp ]] || dwebp $img -ppm -o $img.ppm
68 echo "<hr/><pre>" >> $dst
69 exiftool -a -u -g1 $img >> $dst
71 [[ -r $img.ppm ]] && {
72 pnmscale -w 100 < $img.ppm > $img.ppm.ppm
73 mv $img.ppm.ppm $img.ppm
74 cwebp -pass 10 -alpha_filter best -m 6 -mt -o $img.preview.webp $img.ppm
76 touch -r $img $img.preview.webp
78 echo "</body></html>" >> $dst
82 pages=$(( ${#imgs} / $pagesize ))
83 [[ $(( $pages * $pagesize )) -lt ${#imgs} ]] && pages=$(( $pages + 1 ))
84 for (( p=1 ; p <= $pages ; p++ )) {
85 local dst=$p.page.html
88 <html><head><title>Page ${p}/$pages</title></head><body>
90 [[ $p -eq 1 ]] && [[ -r .txt ]] && {
96 echo "<a href=\"$(( $p - 1 )).page.html\"><<<</a>" >> $dst
97 [[ $p -eq $pages ]] ||
98 echo "<a href=\"$(( $p + 1 )).page.html\">>>></a>" >> $dst
99 echo "| <a href=\"1.page.html\">home</a>" >> $dst
100 echo "| <a href=\"${pages}.page.html\">end</a>" >> $dst
102 for (( i=1 ; i <= $pagesize ; i++ )) {
103 img=$(( ( $p - 1 ) * $pagesize + $i ))
104 [[ $img -le ${#imgs} ]] || break
105 echo "<a href=\"${img}.img.html\">" >> $dst
106 echo "<img alt=\"preview ${img}\" src=\"${imgs[$img]}.preview.webp\"/></a>" >> $dst
108 echo "</body></html>" >> $dst