]> git.plutz.net Git - confetti/blob - index.cgi
relative URI syntax in form actions and link references
[confetti] / index.cgi
1 #!/bin/zsh
2
3 # Copyright 2014 Paul Hänsch
4 #
5 # This file is part of Confetti.
6
7 # Confetti is free software: you can redistribute it and/or modify
8 # it under the terms of the GNU Affero General Public License as published by
9 # the Free Software Foundation, either version 3 of the License, or
10 # (at your option) any later version.
11
12 # Confetti is distributed in the hope that it will be useful,
13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 # GNU Affero General Public License for more details.
16
17 # You should have received a copy of the GNU Affero General Public License
18 # along with Confetti.  If not, see <http://www.gnu.org/licenses/>. 
19
20 export LC_ALL=de_DE.UTF-8
21 DBG_ENABLED=false
22 DBG_FILE=/dev/stderr
23
24 # this program is supposed to be symlinked into a http root directory
25 # we will use the http root as object storage (data directory) and call sub
26 # programs from the directory in which the real executable resides
27 # therefore we need to identify the code and data directories _EXEC and _DATA
28 call="$0"
29 real="$(readlink -f $call)"
30 _EXEC="$(dirname "$real")"  #execution directory
31 _DATA="$(dirname "$call")"  #storage directory
32
33 # put debug options in the local.opts file
34 [ -r "$_DATA/local.opts" ] && . "$_DATA/local.opts"
35
36 # basic functions
37 debug() { #change to false to disable debugging
38   if [ "$DBG_ENABLED" = true -a -n "$*" ]; then
39     echo -E "$*" >>"$DBG_FILE"
40   elif [ "$DBG_ENABLED" = true -a -z "$*" ]; then
41     tee -a "$DBG_FILE"
42   elif [ -z "$*" ]; then
43     cat
44   fi
45 }
46
47 die() {
48   debug "$*"
49   echo -E "$*" >>/dev/stderr
50   exit 1
51 }
52
53 # create directories for object storage
54 [ -w "$_DATA" ] && [ -d "$_DATA" ] || die "storage directory must be writable"
55
56 for each in "$_DATA"/{vcard,ical,cache,temp,mappings}; do
57   [ ! -e "$each" ] && mkdir "$each"
58   [ -w "$each" ] && [ -d "$each" ] || die "storage $each must be a writable directory"
59 done
60 touch "$_DATA/mappings/attendance"
61
62 # create htaccess file
63 [ -f .htaccess ] || cat >.htaccess <<EOF
64 Options         +ExecCGI
65 AddHandler      cgi-script .cgi
66 DirectoryIndex  index.cgi
67 EOF
68 [ -f .htaccess ] || die "no htaccess file present and unable to create one"
69
70 . "$_EXEC/cgi.sh"
71 cgi_get
72
73 . "$_EXEC/constants.sh"
74
75 if [ -n "$_GET[\"action\"]" ]; then
76   . "$_EXEC/action.sh"
77 elif [ -n "$_GET[\"export\"]" ]; then
78   . "$_EXEC/export.sh"
79 else
80   . "$_EXEC/page.sh"
81 fi