]> git.plutz.net Git - shellwiki/blob - themes/default.sh
basic ACLs
[shellwiki] / themes / default.sh
1 #!/bin/sh
2
3 . "$_EXEC/tools.sh"
4
5 theme_head(){
6   printf '
7   <meta name="viewport" content="width=device-width"/>
8   <link rel="stylesheet" type="text/css" href="%s/[.]/cgilite/common.css">
9   <link rel="stylesheet" type="text/css" href="%s/[.]/themes/default.css">
10   ' "$_BASE"
11 }
12
13 theme_header(){
14   printf '<header>%s</header>' "$(wiki '[wiki]/header/')"
15 }
16
17 theme_footer(){
18   printf '<footer>%s</footer>' "$(wiki '[wiki]/footer/' ||echo No footer)"
19 }
20
21 theme_page(){
22   local page="$1" title
23   title="${page%/}"; title="${title##*/}"
24
25   if [ ! "$(mdfile "$page")" ]; then
26     theme_404
27     return 0
28   elif ! acl_read "$page"; then
29     theme_403
30     return 0
31   fi
32
33   # Important! Web Server response including newline
34   printf "%s\r\n" "Content-Type: text/html; charset=utf-8" ""
35
36   cat <<-EOF
37         <!DOCTYPE HTML>
38         <html><head>
39           $(theme_head)
40           <title>$(HTML "${title}")</title>
41         </head><body id="$(HTML "$page")">
42           $(theme_header)
43           <main>
44             $(acl_write "$page" && printf %s \
45               '<ul class="pagemenu">
46                  <li><a href="[edit]">Edit</a></li>
47                  <li><a href="[attachment]/">Attachments</a></li>
48                </ul>'
49             )
50             <article>
51               $(wiki "$page" || printf 'Error while loading page <br> function "wiki" of index.sh returned with an error.')
52             </article>
53           </main>
54           $(theme_footer)
55         </body></html>
56         EOF
57 }
58
59 theme_editor(){
60   local page="$1" title
61   title="${page%/}"; title="${title##*/}"
62
63   if [ ! "$(mdfile "$page")" ]; then
64     theme_404
65     return 0
66   elif ! acl_write "$page"; then
67     theme_403
68     return 0
69   fi
70
71   # Important! Web Server response including newline
72   printf "%s\r\n" "Content-Type: text/html; charset=utf-8" ""
73
74   cat <<-EOF
75         <!DOCTYPE HTML>
76         <html><head>
77           $(theme_head)
78           <title>$(HTML "${title}")</title>
79         </head><body id="$(HTML "$page")" class="editor">
80           $(theme_header)
81           <main><form method=POST>
82             <input type=hidden name=session_key value="${SESSION_KEY}"/>
83             <textarea name=pagetext>$(wiki_text "$page" |HTML)</textarea>
84             <button type=submit name=action value=update>Update</button>
85             <button type=submit name=action value=cancel>Cancel</button>
86           </form></main>
87           $(theme_footer)
88         </body></html>
89         EOF
90 }
91
92 theme_attachments(){
93   local page="$1" title
94   title="${page%/}"; title="${title##*/}"
95
96   # Important! Web Server response including newline
97   printf "%s\r\n" "Content-Type: text/html; charset=utf-8" ""
98
99   cat <<-EOF
100         <!DOCTYPE HTML>
101         <html><head>
102           $(theme_head)
103           <title>Attachments $(HTML "${title}")</title>
104         </head><body id="$(HTML "$page")[attachment]/">
105           $(theme_header)
106           <main>
107             <form class=upload method=POST enctype="multipart/form-data">
108               <input type=file name=file multiple>
109               <button type=submit name=action value=upload>Upload</button>
110             </form>
111
112             <ul class="attachment list">
113             $(for file in "$_EXEC/pages/$page/#attachments"/* "$_DATA/pages/$page/#attachments"/*; do
114               [ "$file" = "$_EXEC/pages/$page/#attachments/${file##*/}" \
115                     -a -f "$_DATA/pages/$page/#attachments/${file##*/}" ] && continue
116               stat="$(stat -c '%s %Y' -- "$file" 2>&-)" || continue
117               size="${stat% *}" date="${stat#* }"
118             
119               printf '<li><span class=name>%s</span>
120                       <span class=size>%s</span><span class=date>%s</span></li>' \
121                 "$(HTML "${file##*/}")" "$(size_human "$size")" "$(date -d @"$date" +"%F %T")"
122             done)
123             </ul>
124           </main>
125           $(theme_footer)
126         </body></html>
127         EOF
128 }
129
130 theme_login(){
131   theme_page '/[wiki]/login/'
132 }
133
134 theme_register(){
135   theme_page '/[wiki]/register/'
136 }
137
138 theme_403(){
139   printf "%s\r\n" "Status: 403 Forbidden"
140
141   if [ "$(mdfile '/[wiki]/403/')" ]; then
142     theme_page '/[wiki]/403/'
143   else
144     printf "Content-Length: 0\r\n\r\n"
145   fi
146 }
147
148 theme_404(){
149   printf "%s\r\n" "Status: 404 Not Found"
150
151   if [ "$(mdfile '/[wiki]/404/')" ]; then
152     theme_page '/[wiki]/404/'
153   else
154     printf "Content-Length: 0\r\n\r\n"
155   fi
156 }