]> git.plutz.net Git - busy/blob - write/introedit.cgi
adjusted cgi scripts for renamed permission-file
[busy] / write / introedit.cgi
1 #!/bin/zsh
2 # Copyright 2011 Paul Haensch
3 # This file is part of Busy
4 #
5 # Busy is free software: you can redistribute it and/or modify
6 # it under the terms of the GNU Affero General Public License as published by
7 # the Free Software Foundation, either version 3 of the License, or
8 # (at your option) any later version.
9 #
10 # Busy is distributed in the hope that it will be useful,
11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 # GNU Affero General Public License for more details.
14 #
15 # You should have received a copy of the GNU Affero General Public License
16 # along with Busy.  If not, see <http://www.gnu.org/licenses/>.
17
18 [ "$HTTPS" = "on" ] && proto=https || proto=http
19 . ../auth/permissions.sh
20
21 info="$(egrep -o '(^|&)i=([0-9]{10}_[0-9]{3}|intro|news)(&|$)' <<<"${QUERY_STRING}" |sed 's:&::g;s:i=::')"
22
23 if [ "$info" = "news" ]; then
24   $ACL_ADDNEWS || info=''
25 elif [ "$info" = "intro" ]; then
26   $ACL_EDITINTRO || info=''
27 elif [ -z "$info" ]; then
28   $ACL_EDITNEWS || info=''
29 fi
30 [ -n "$info" ] || echo -n "Location: ${proto}://${HTTP_HOST}/?p=Error&i=noaccess\n\n"
31 [ -n "$info" ] || exit 0
32
33 [ "$info" = "news" ] && info="$(date +%s)_$(apg -M N -a 1 -n 1 -m 3 -x 3)"
34 [ "$info" != "intro" ] && info="${info}.news"
35 [ "$info" = "intro" ] && ($ACL_EDITINTRO || info='')
36
37 if [ -n "${CONTENT_LENGTH}" -a "${CONTENT_LENGTH}" -gt 0 ]; then
38 (head -c "${CONTENT_LENGTH}"; echo)|sed 's/&/\n/g' |while read line; do
39   if (echo "${line}" | egrep -xq 'text=.+'); then
40     text="$(cut -d= -f2- <<<"${line}" |sed 's/+/ /g;s/%/\\x/g')"
41     text=$(echo -e "${text}" |sed 's/\t/ /g;s/\r//g;s/\\/\\\\/g')
42   elif (echo "${line}" | egrep -xq 'cancel=.+'); then
43     cancel=true
44   fi
45 done
46 fi
47
48 [ -z "$cancel" ] && echo -e "${text}" >"../Home/$info"
49
50 echo -n "Location: ${proto}://${HTTP_HOST}/?p=Home\n\n"