#!/bin/zsh
-# Copyright 2014, 2015 Paul Hänsch
+# Copyright 2014 - 2016 Paul Hänsch
#
# This file is part of shcgi.
#
export LC_ALL=C LANG=C
-data_dirs(){
- # create directories for object storage
-
- [ -d "$_DATA" -a -w "$_DATA" ] || die "storage directory must be writable"
- for each in "$@"; do
- [ ! -e "$_DATA/$each" ] && mkdir "$_DATA/$each"
- [ -d "$_DATA/$each" -a -w "$_DATA/$each" ] || die "storage \"$_DATA/$each\" must be a writable directory"
- done
-}
-
# this program is supposed to be symlinked into a http root directory
# we will use the http root as object storage (data directory) and call sub
# programs from the directory in which the real executable resides
_DATA="$(dirname "$call")" #storage directory
_EXEC="${real%/shcgi/index.cgi}" #execution directory
+. "$_EXEC/shcgi/misc.sh"
+
# put debug options in the local.opts file
. "$_EXEC/shcgi/debug.sh"
[ -r "$_DATA/local.opts" ] && . "$_DATA/local.opts"
. "$_EXEC/shcgi/cgi.sh"
-cgi_get
[ -x "$_EXEC/globals.sh" ] && . "$_EXEC/globals.sh"
-if [ -n "${_GET[action]}" ]; then
- . "$_EXEC/shcgi/action.sh"
+ PAGE=$(validate "${PAGE:-${_GET[page]}}" '[a-zA-Z0-9_-]+' '')
+ACTION=$(validate "${ACTION:-${_GET[action]}}" '[a-zA-Z0-9_-]+' '')
+STATIC=$(invalidate "${STATIC:-${_GET[static]}}" '(^|.*/)\.\./.*' '')
+
+if [ -n "$STATIC" -a -e "${_EXEC}/static/${STATIC}" ]; then
+ . "$_EXEC/shcgi/static.sh"
+elif [ -n "$ACTION" -a -x "${_EXEC}/actions/${ACTION}.sh" ]; then
+ . "${_EXEC}/actions/${ACTION}.sh"
+elif [ -n "$PAGE" -a -x "${_EXEC}/pages/${PAGE}.sh" ]; then
+ . "$_EXEC/shcgi/page.sh"
else
+ printf 'HTTP/1.1 404 Not Found\r\n'
+ PAGE=error
. "$_EXEC/shcgi/page.sh"
fi