11 lines
444 B
Bash
Executable File
11 lines
444 B
Bash
Executable File
#!/bin/sh
|
|
rm -r O;mkdir O;cp -r S O;alias P=echo T=sed\ q
|
|
X()(eval "$(P 'cat<<.';cat;P;P .)");H()(awk -F'
|
|
' -vRS='' '!/^<.*>$/{$0="<p>"$0"</p>"}{print}')
|
|
[ -x H ]&&H=./H||H=H
|
|
[ -f L ]||P '<!DOCTYPE html><title>$(T $F)</title>
|
|
<style>body{max-width:70ch;padding:1%}</style>
|
|
<h1>$(T $F)</h1>$(sed 1d $F|X|$H)<hr>/ $(for P in I/*;do
|
|
[ $P = $F ]||(N=${P#I/};P "<a href=./${N%.*}>$(T $P)</a> ")
|
|
done)'>L;for F in I/*;do N=${F#I/};X<L>O/${N%.*};done
|