ref: cdab944f806f94404b5f9bc0231ed1af43bcb888
dir: /mkgallery/
#!/bin/rc
rfork en
fn entitle {
basename $1 | sed 's/-/ /g' | bin/capitalize
}
fn usage {
echo usage: $0 path >[1=2]
exit usage
}
if(! ~ $#* 1)
usage
if(! test -d $1)
usage
media=`{walk -f $1 | grep -i '\.(jpe?g|png|webp|mp4|webm)$'}
>$1/index.html {
title=`{entitle $1 | sed 's/\./ /g'}
<tpl/head sed 's/(<title>[^<]*)/\1 - '^$"title^'/'
cat tpl/menu
echo '<h1>'^$"title^'</h1>'
echo '<div id="gallery">'
for(p in $media){
if(~ $p *.mp4 *.webm)
echo -n '<video width="200px" height="auto" controls><source src="/'^$p^'"></video>'
if not {
echo -n '<a href="/'^$p^'" target="_blank">'
echo -n '<img src="/'^$p^'" width="200px" height="auto"></img>'
echo '</a>'
}
}
echo '</div>'
cat tpl/feet
}