- Update TSV format to 8 columns: BookName, BookAbbr, BookNum, Chapter, Verse, Latin, German, FootnoteText - Add printverse_bilingual() function for side-by-side Latin/German display - Add language filter flags -g (German only) and -L (Latin only) - Add to_superscript_num() function to convert footnote numbers to Unicode superscripts - Update processline() to detect and route bilingual verses, German-only, Latin-only, introductions, and footnotes - Footnotes now display with superscript numbers (¹²³⁴⁵⁶⁷⁸⁹⁰) - Default mode shows Latin and German in two columns with | separator - Introductions and footnotes display full-width New flags: -g show only German (no Latin) -L show only Latin (no German)
108 lines
2.5 KiB
Bash
Executable File
108 lines
2.5 KiB
Bash
Executable File
#!/bin/sh
|
|
# allioli: Read the 1914 Allioli Vulgata-Translation from your terminal!
|
|
# License: Public domain
|
|
|
|
SELF="$0"
|
|
|
|
get_data() {
|
|
sed '1,/^#EOF$/d' < "$SELF" | tar xz -O "$1"
|
|
}
|
|
|
|
if [ -z "$PAGER" ]; then
|
|
if command -v less >/dev/null; then
|
|
PAGER="less"
|
|
else
|
|
PAGER="cat"
|
|
fi
|
|
fi
|
|
|
|
show_help() {
|
|
exec >&2
|
|
echo "usage: $(basename "$0") [flags] [reference...]"
|
|
echo
|
|
echo " -l list books"
|
|
echo " -W no line wrap"
|
|
echo " -F no footnotes"
|
|
echo " -g show only German (no Latin)"
|
|
echo " -L show only Latin (no German)"
|
|
echo " -h show help"
|
|
echo
|
|
echo " Reference types:"
|
|
echo " <Book>"
|
|
echo " Individual book"
|
|
echo " <Book>:<Chapter>"
|
|
echo " Individual chapter of a book"
|
|
echo " <Book>:<Chapter>:<Verse>[,<Verse>]..."
|
|
echo " Individual verse(s) of a specific chapter of a book"
|
|
echo " <Book>:<Chapter>-<Chapter>"
|
|
echo " Range of chapters in a book"
|
|
echo " <Book>:<Chapter>:<Verse>-<Verse>"
|
|
echo " Range of verses in a book chapter"
|
|
echo " <Book>:<Chapter>:<Verse>-<Chapter>:<Verse>"
|
|
echo " Range of chapters and verses in a book"
|
|
echo
|
|
echo " /<Search>"
|
|
echo " All verses that match a pattern"
|
|
echo " <Book>/<Search>"
|
|
echo " All verses in a book that match a pattern"
|
|
echo " <Book>:<Chapter>/<Search>"
|
|
echo " All verses in a chapter of a book that match a pattern"
|
|
exit 2
|
|
}
|
|
|
|
while [ $# -gt 0 ]; do
|
|
isFlag=0
|
|
firstChar="${1%"${1#?}"}"
|
|
if [ "$firstChar" = "-" ]; then
|
|
isFlag=1
|
|
fi
|
|
|
|
if [ "$1" = "--" ]; then
|
|
shift
|
|
break
|
|
elif [ "$1" = "-l" ]; then
|
|
# List all book names with their abbreviations
|
|
get_data allioli.tsv | awk -v cmd=list "$(get_data allioli.awk)"
|
|
exit
|
|
elif [ "$1" = "-W" ]; then
|
|
export ALLIOLI_NOLINEWRAP=1
|
|
shift
|
|
elif [ "$1" = "-F" ]; then
|
|
export ALLIOLI_NOFOOTNOTES=1
|
|
shift
|
|
elif [ "$1" = "-g" ]; then
|
|
export ALLIOLI_ONLY_GERMAN=1
|
|
shift
|
|
elif [ "$1" = "-L" ]; then
|
|
export ALLIOLI_ONLY_LATIN=1
|
|
shift
|
|
elif [ "$1" = "-h" ] || [ "$isFlag" -eq 1 ]; then
|
|
show_help
|
|
else
|
|
break
|
|
fi
|
|
done
|
|
|
|
cols=$(tput cols 2>/dev/null)
|
|
if [ $? -eq 0 ]; then
|
|
export ALLIOLI_MAX_WIDTH="$cols"
|
|
fi
|
|
|
|
if [ $# -eq 0 ]; then
|
|
if [ ! -t 0 ]; then
|
|
show_help
|
|
fi
|
|
|
|
# Interactive mode
|
|
while true; do
|
|
printf "allioli> "
|
|
if ! read -r ref; then
|
|
break
|
|
fi
|
|
get_data allioli.tsv | awk -v cmd=ref -v ref="$ref" "$(get_data allioli.awk)" | ${PAGER}
|
|
done
|
|
exit 0
|
|
fi
|
|
|
|
get_data allioli.tsv | awk -v cmd=ref -v ref="$*" "$(get_data allioli.awk)" | ${PAGER}
|