for n in "$@"; do case ${n%%=*} in
data) _DATA="${n#data=}";;
- exec) _exec="${n#exec=}";;
+ exec) _EXEC="${n#exec=}";;
noerr) exec 2>&-;;
esac; done
[ -z "${_EXEC%/}" ] && _EXEC="$(realpath "${0%/*}")" || _EXEC="${_EXEC%/}"
[ -z "${_DATA%/}" ] && _DATA=. || _DATA="${_DATA%/}"
+debug() {
+ local dbg=/dev/stderr
+ if [ ! "$DEBUG" ]; then
+ [ "$#" -gt 0 ] && : || cat;
+ elif [ "$#" -gt 0 ]; then
+ printf '%s\n' "$@" >>"$dbg"
+ else
+ tee -a "$dbg"
+ fi
+}
+
. "$_EXEC/cgilite/cgilite.sh"
. "$_EXEC/cgilite/session.sh"
[link rel="stylesheet" type="text/css" href="%s"]
' "$style"
printf '
- ] [body class="%s"
+ ] [body #top class="%s"
' "$class"
cat
[ "$message" ] && printf '[p #message\n%s\n]' $(l10n "$message")
| "${_EXEC}/cgilite/html-sh.sed"
}
-if [ -d "${_EXEC}/${_PATH}" -a -x "${_EXEC}/${_PATH}/index.cgi" ]; then
+topdir="${_PATH#/}"
+topdir="/${topdir%%/*}"
+
+if [ "${_PATH}" = / ]; then
+ REDIRECT /cards/
+elif [ -d "${_EXEC}/${_PATH}" -a -x "${_EXEC}/${_PATH}/index.cgi" ]; then
. "${_EXEC}/${_PATH}/index.cgi"
elif [ ! -d "${_EXEC}/${_PATH}" -a -x "${_EXEC}/${_PATH}" ]; then
. "${_EXEC}/${_PATH}"
elif [ ! -x "${_EXEC}/${_PATH}" -a -r "${_EXEC}/${_PATH}" ]; then
. "$_EXEC/cgilite/file.sh"
FILE "${_EXEC}/${_PATH}"
+elif [ -d "${_EXEC}/${topdir}" -a -x "${_EXEC}/${topdir}/index.cgi" ]; then
+ . "${_EXEC}/${topdir}/index.cgi"
else
printf 'Status: 404 Not Found\r\nContent-Length: 0\r\n\r\n'
fi