]> git.plutz.net Git - clickslide/blob - misc.sh
use proper cgi for response headers, switch cache machanism to timestamps
[clickslide] / misc.sh
1 #!/bin/zsh
2
3 # Copyright 2014, 2015 Paul Hänsch
4 #
5 # This file is part of shcgi.
6
7 # shcgi 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 # shcgi 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 shcgi.  If not, see <http://www.gnu.org/licenses/>. 
19
20 BR='
21 '
22
23 data_dirs(){
24   # set up directories for object storage
25
26   [ -d "$_DATA" -a -w "$_DATA" ] || die "storage directory must be writable"
27   for each in "$@"; do
28     [ ! -e "$_DATA/$each" ] && mkdir "$_DATA/$each"
29     [ -d "$_DATA/$each" -a -w "$_DATA/$each" ] || die "storage \"$_DATA/$each\" must be a writable directory"
30   done
31 }
32
33 validate(){
34   # print value if value matches regex; otherwise print default
35   value="$1"
36   regex="$(printf %s\\n "$2" | sed -r ':X;s;(^|[^\\])((\\\\)*)/;\1\2\\/;g;tX')"
37                              # ^^ escape only unescaped slash characters for later insertion
38   default="$3"
39
40   printf %s\\n "${value}" \
41   | sed -rn "2q; /^(${regex})\$/{p;q}; a${default}
42             "
43 }
44
45 invalidate(){
46   # print default if value matches regex; otherwise print value
47   value="$1"
48   regex="$(printf %s\\n "$2" | sed -r ':X;s;(^|[^\\])((\\\\)*)/;\1\2\\/;g;tX')"
49                              # ^^ escape only unescaped slash characters for later insertion
50   default="$3"
51
52   printf %s\\n "${value}" \
53   | sed -rn "2q; /^(${regex})\$/{bX}; p;q; :X;a${default}
54             "
55 }
56
57 declare -A item_name
58 l10n(){
59   [ -n "${item_name[$1]+x}" ] && printf %s "$item_name[$1]" || printf %s "$1"
60 }