83 lines
1.9 KiB
Bash
Executable File
83 lines
1.9 KiB
Bash
Executable File
#!/bin/bash
|
|
# render.sh: part of the tape-and-string framework.
|
|
# v3.0
|
|
enable -f /usr/lib/bash/csv csv
|
|
declare -A title
|
|
while read -r ii; do
|
|
csv -a i "$ii"
|
|
title[in/${i[0]}]=${i[1]}
|
|
done <title.csv
|
|
function inf { echo -e "\x1B[1;32mINF\x1B[0m: $*"; }
|
|
function wrn { echo -e "\x1B[1;93mWRN\x1B[0m: $*"; }
|
|
function err { echo -e "\x1B[1;31mERR\x1B[0m: $*"; }
|
|
function tape {
|
|
if test -d "$1"; then
|
|
err "tape: Passed directory, $1"
|
|
return 1
|
|
fi
|
|
case $1 in
|
|
*.txti) redcloth "$1" ;;
|
|
*.org) org-ruby --translate html "$1" ;;
|
|
*.md) comrak --gfm "$1" ;;
|
|
*.html) cat $1 ;;
|
|
*) pandoc --columns 168 -t html "$1" || echo "Skipping $i, unknown format" ;;
|
|
esac
|
|
}
|
|
function yn {
|
|
while true; do
|
|
read -p "$* [y/n]:" yn
|
|
case $yn in
|
|
[Yy]*) return 0;;
|
|
[Nn]*)
|
|
echo "Aborted."
|
|
return 1;;
|
|
*) echo "Please answer Yes or No.";;
|
|
esac
|
|
done
|
|
}
|
|
doc=(`find in -type f -name '*.txti' -o -name '*.org' -o -name '*.md'`)
|
|
sass=(`find in -type f -name '*.sass'`)
|
|
scss=(`find in -type f -name '*.scss'`)
|
|
rest=(`find in -type f ! \( -name '*.org' -o -name '*.txti' -o -name '*.md' -o -name .hg \)`)
|
|
dir=(`find in -type d`)
|
|
|
|
inf "Creating directory structure..."
|
|
echo ${dir[@]}
|
|
for i in ${dir[@]}; do
|
|
o="${i/in/out}"
|
|
mkdir -pv $o
|
|
done
|
|
inf "Rendering document files..."
|
|
for i in ${doc[@]}; do
|
|
o="${i/in/out}"
|
|
echo "$i => $o"
|
|
if test -z "${title[$i]}"; then
|
|
tape $i | m4 main.html.m4 > ${o%.*}.html
|
|
else
|
|
tape $i | m4 -DTITLE="${title[$i]}" main.html.m4 > ${o%.*}.html
|
|
fi
|
|
done
|
|
inf "Rendering sass files..."
|
|
if test -z "${sass[@]}"; then
|
|
inf "No .sass files detected, skipping"
|
|
unset sass
|
|
else
|
|
for i in ${sass[@]}; do
|
|
o="${i/in/out}"
|
|
echo "$i => $o"
|
|
sassc -a $i $o
|
|
done
|
|
fi
|
|
if test -z "${scss[@]}"; then
|
|
inf "No .scss files detected, skipping."
|
|
unset scss
|
|
else
|
|
for i in ${scss[@]}; do
|
|
o="${i/in/out}"
|
|
echo "$i => $o"
|
|
sassc $i $o
|
|
done
|
|
fi
|
|
inf "Copying other files..."
|
|
cp -rv 'in'/* out/
|