diff options
Diffstat (limited to 'officium_curses.sh')
| -rwxr-xr-x | officium_curses.sh | 212 |
1 files changed, 212 insertions, 0 deletions
diff --git a/officium_curses.sh b/officium_curses.sh new file mode 100755 index 0000000..7afdd32 --- /dev/null +++ b/officium_curses.sh @@ -0,0 +1,212 @@ +#!/bin/bash +# ============================================================================= +# officium_curses.sh — Liturgy of the Hours viewer using bashsimplecurses +# +# Full-screen TUI inspired by bashmount: +# +# ┌─ <liturgical day title> ──────────────────────────────────────────────┐ +# │ 1) Laudes 2) Prima 3) Tertia 4) Sexta 5) Nona 6) Vesperae │ +# └───────────────────────────────────────────────────────────────────────┘ +# ┌─ <Hora> ───────────────────────────────────────────────────────────────┐ +# │ Prayer text ... │ +# └───────────────────────────────────────────────────────────────────────┘ +# ┌─ Commands ─────────────────────────────────────────────────────────────┐ +# │ [1-6]: select hora [Enter]: refresh [q]: quit │ +# └───────────────────────────────────────────────────────────────────────┘ +# Command: _ +# +# Authors : Adam Gomułka, Łukasz Kasprzak +# Created : 2026-03-05 +# Version : 0.2 +# ============================================================================= + +set -eo pipefail + +# ── Library ─────────────────────────────────────────────────────────────────── + +BSC_LIB="${HOME}/.local/lib/bashsimplecurses/simple_curses.sh" + +if [ ! -f "$BSC_LIB" ]; then + echo "Error: bashsimplecurses not found at $BSC_LIB" + echo "Expected path: $BSC_LIB" + exit 1 +fi + +source "$BSC_LIB" + +# ── Configuration ───────────────────────────────────────────────────────────── + +BASE_URL="https://www.divinumofficium.com/cgi-bin/horas/officium.pl" +HORAS=(Laudes Prima Tertia Sexta Nona Vesperae) + +# Word-wrap width: full terminal width minus window border/padding +TERM_WIDTH=$(tput cols 2>/dev/null || echo 80) +WRAP="${WRAP:-$((TERM_WIDTH - 6))}" + +# ── State ───────────────────────────────────────────────────────────────────── + +SELECTED=1 # currently selected hora (0-based index into HORAS) +DIES="" # liturgical day title (from purple font tag) +STATUS="" # shown in the commands bar +declare -a PRAYER # prayer text, pre-split into lines for BSC + +HTML_TMP="$(mktemp)" +trap 'rm -f "$HTML_TMP"' EXIT + +# ── Fetch and extract ───────────────────────────────────────────────────────── + +# Fetch the HTML for a given hora, extract the day title and prayer text, +# and populate the DIES and PRAYER globals. +fetch_hora() { + local hora="$1" + local url="${BASE_URL}?command=pray${hora}" + + STATUS="Fetching ${hora}..." + + if ! curl -s --max-time 30 "$url" -o "$HTML_TMP" 2>/dev/null; then + STATUS="Error: curl failed" + PRAYER=("Could not reach divinumofficium.com." "Check your network connection.") + DIES="" + return 1 + fi + if [ ! -s "$HTML_TMP" ]; then + STATUS="Error: empty response" + PRAYER=("Server returned an empty response.") + DIES="" + return 1 + fi + + # Extract the liturgical day title from the purple font tag near the top + DIES=$(grep -o '<FONT COLOR="purple">[^<]*</FONT>' "$HTML_TMP" \ + | sed 's/<[^>]*>//g; s/\r//') + + # Extract and clean the Latin prayer text using the same pipeline as officium.sh + local raw_text + raw_text=$(awk ' + /COLOR="red"><B><I>Incipit<\/I><\/B><\/FONT>/ { printing=1 } + printing { + if (/COLOR=.?green.?>[0-9]/) td_col=2 + if (/<\/TD>/ && td_col==2) td_col=0 + if (/<\/TR>/) { td_col=0; print "" } + if (td_col != 2) print + } + /<\/TABLE>/ && printing { exit } + ' "$HTML_TMP" \ + | sed 's/<[^>]*>//g' \ + | sed 's/\r$//' \ + | sed 's/[[:space:]]*$//' \ + | sed -E 's/^[0-9]+:[0-9]+[[:space:]]*//' \ + | sed 's/ / /g' \ + | sed 's/ / /g' \ + | sed 's/</</g' \ + | sed 's/>/>/g' \ + | sed 's/&/\&/g' \ + | sed 's/&#[0-9]*;//g' \ + | sed 's/&#x[0-9a-fA-F]*;//g' \ + | sed -E 's/^(Psalmus[[:space:]]+[0-9]+)\([^)]*\)/\1/' \ + | cat -s \ + | grep -vE "^(Top[[:space:]]+Next|Top|Next)$" \ + | grep -vE "^[A-Z][a-z]+ [A-Z][a-z]+\{" \ + | grep -v "^[0-9]$") + + # Word-wrap long lines and load into the PRAYER array. + # BSC's append takes one line at a time and does not wrap, so we must + # pre-wrap here before rendering. + PRAYER=() + while IFS= read -r line; do + if [ -z "$line" ]; then + PRAYER+=("") + elif [ "${#line}" -gt "$WRAP" ]; then + while IFS= read -r wrapped; do + PRAYER+=("$wrapped") + done < <(echo "$line" | fold -s -w "$WRAP") + else + PRAYER+=("$line") + fi + done <<< "$raw_text" + + STATUS="$(date '+%A, %d %B %Y') — ${#PRAYER[@]} lines" +} + +# ── BSC layout ──────────────────────────────────────────────────────────────── + +main() { + local hora="${HORAS[$SELECTED]}" + + # ── Window 1: Hora selector ────────────────────────────────────────────── + # Spans the full width; shows the liturgical day title and numbered hora list. + + local win_title="Divinum Officium" + [ -n "$DIES" ] && win_title="$DIES" + + window "$win_title" "red" "100%" + # Build one line of numbered hora buttons; selected hora is wrapped in [] + local hora_line=" " + for i in "${!HORAS[@]}"; do + local n=$((i + 1)) + if [ "$i" -eq "$SELECTED" ]; then + hora_line+="${n}) [${HORAS[$i]}] " + else + hora_line+="${n}) ${HORAS[$i]} " + fi + done + append "$hora_line" + endwin + + # ── Window 2: Prayer text ──────────────────────────────────────────────── + + window "$hora" "blue" "100%" + for line in "${PRAYER[@]}"; do + # BSC collapses truly empty appends in some versions, so use a single + # space for blank lines to preserve paragraph spacing + if [ -z "$line" ]; then + append " " + else + append "$line" + fi + done + endwin + + # ── Window 3: Commands ─────────────────────────────────────────────────── + + window "Commands" "green" "100%" + append " [1-6]: select hora [Enter]: refresh [q]: quit" + addsep + append " $STATUS" + endwin +} + +# ── Interactive loop ────────────────────────────────────────────────────────── + +# Fetch the default hora (Prima) before showing the UI for the first time +fetch_hora "${HORAS[$SELECTED]}" + +while true; do + # Render the current state using BSC + main_loop + + # Print the command prompt below the BSC windows (outside any window frame) + printf "\nCommand: " + + # Read one character without requiring Enter; -s suppresses echo. + # Timeout of 0.5s so the loop stays responsive. + IFS= read -r -s -n1 -t 0.5 key 2>/dev/null || true + + case "$key" in + 1|2|3|4|5|6) + # Select hora by number (1-6) and fetch it + SELECTED=$(( key - 1 )) + fetch_hora "${HORAS[$SELECTED]}" + ;; + "") + # Enter (empty string from -n1) — refresh current hora + fetch_hora "${HORAS[$SELECTED]}" + ;; + q|Q) + clear + echo "Finis." + exit 0 + ;; + # Any other key: just redraw without re-fetching + esac +done |