git.plutz.net Git - shellwiki/blob - 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   if [ ! "$(mdfile "$page")" ]; then
  97     theme_404
  98     return 0
  99   elif ! acl_read "$page"; then
 100     theme_403
 101     return 0
 102   fi
 103
 104   # Important! Web Server response including newline
 105   printf "%s\r\n" "Content-Type: text/html; charset=utf-8" ""
 106
 107   if acl_write "$page"; then
 108     cat <<-EOF
 109         <!DOCTYPE HTML>
 110         <html><head>
 111           $(theme_head)
 112           <title>Attachments $(HTML "${title}")</title>
 113         </head><body id="$(HTML "$page")[attachment]/">
 114           $(theme_header)
 115           <main>
 116             <form class=upload method=POST enctype="multipart/form-data">
 117               <input type=hidden name=session_id value="$SESSION_ID">
 118               <input type=file name=file multiple>
 119               <button type=submit name=action value=upload>Upload</button>
 120             </form>
 121
 122             <form method=POST><ul class="attachment list">
 123               <input type=hidden name=session_key value="$SESSION_KEY">
 124             $(for file in "$_EXEC/pages/$page/#attachments"/* "$_DATA/pages/$page/#attachments"/*; do
 125               [ "$file" = "$_EXEC/pages/$page/#attachments/${file##*/}" \
 126                     -a -f "$_DATA/pages/$page/#attachments/${file##*/}" ] && continue
 127               stat="$(stat -c '%s %Y' -- "$file" 2>&-)" || continue
 128               size="${stat% *}" date="${stat#* }"
 129
 130               printf '<li><button type=submit name=delete value="%s">Delete</button><a class=name href="%s">%s</a>
 131                       <span class=size>%s</span><span class=date>%s</span></li>' \
 132                 "$(HTML "${file##*/}")" "$(HTML "${file##*/}")" "$(HTML "${file##*/}")" \
 133                 "$(size_human "$size")" "$(date -d @"$date" +"%F %T")"
 134             done)
 135             </ul></form>
 136           </main>
 137           $(theme_footer)
 138         </body></html>
 139         EOF
 140   else
 141     cat <<-EOF
 142         <!DOCTYPE HTML>
 143         <html><head>
 144           $(theme_head)
 145           <title>Attachments $(HTML "${title}")</title>
 146         </head><body id="$(HTML "$page")[attachment]/">
 147           $(theme_header)
 148           <main>
 149             <ul class="attachment list">
 150             $(for file in "$_EXEC/pages/$page/#attachments"/* "$_DATA/pages/$page/#attachments"/*; do
 151               [ "$file" = "$_EXEC/pages/$page/#attachments/${file##*/}" \
 152                     -a -f "$_DATA/pages/$page/#attachments/${file##*/}" ] && continue
 153               stat="$(stat -c '%s %Y' -- "$file" 2>&-)" || continue
 154               size="${stat% *}" date="${stat#* }"
 155
 156               printf '<li><a class=name href="%s">%s</a>
 157                       <span class=size>%s</span><span class=date>%s</span></li>' \
 158                 "$(HTML "${file##*/}")" "$(HTML "${file##*/}")" "$(size_human "$size")" "$(date -d @"$date" +"%F %T")"
 159             done)
 160             </ul>
 161           </main>
 162           $(theme_footer)
 163         </body></html>
 164         EOF
 165   fi
 166 }
 167
 168 theme_login(){
 169   theme_page '/[wiki]/login/'
 170 }
 171
 172 theme_register(){
 173   theme_page '/[wiki]/register/'
 174 }
 175
 176 theme_403(){
 177   printf "%s\r\n" "Status: 403 Forbidden"
 178
 179   if [ "$(mdfile '/[wiki]/403/')" ]; then
 180     theme_page '/[wiki]/403/'
 181   else
 182     printf "Content-Length: 0\r\n\r\n"
 183   fi
 184 }
 185
 186 theme_404(){
 187   printf "%s\r\n" "Status: 404 Not Found"
 188
 189   if [ "$(mdfile '/[wiki]/404/')" ]; then
 190     theme_page '/[wiki]/404/'
 191   else
 192     printf "Content-Length: 0\r\n\r\n"
 193   fi
 194 }
 195
 196 theme_409(){
 197   printf "%s\r\n" "Status: 409 Conflict"
 198
 199   if [ "$(mdfile '/[wiki]/409/')" ]; then
 200     theme_page '/[wiki]/409/'
 201   else
 202     printf "Content-Length: 0\r\n\r\n"
 203   fi
 204 }
 205
 206 theme_500(){
 207   printf "%s\r\n" "Status: 500 Internal Server Error"
 208
 209   if [ "$(mdfile '/[wiki]/500/')" ]; then
 210     theme_page '/[wiki]/500/'
 211   else
 212     printf "Content-Length: 0\r\n\r\n"
 213   fi
 214 }