git.plutz.net Git - shellwiki/blob - themes/default.sh

   1 #!/bin/sh
   2
   3 . "$_EXEC/tools.sh"
   4
   5 theme_head(){
   6   local IFS="$BR"
   7   printf '
   8   <meta name="viewport" content="width=device-width">
   9   '
  10   for css in "$_BASE/%5B.%5D/cgilite/common.css" "$_BASE/%5B.%5D/themes/default.css" $PAGE_CSS; do
  11     printf  '<link rel="stylesheet" type="text/css" href="%s">' \
  12             "$(HTML "${css##*//}")"
  13   done
  14 }
  15
  16 theme_header(){
  17   printf '<header>%s</header>' "$(wiki '[wiki]/header/')"
  18 }
  19
  20 theme_footer(){
  21   printf '<footer>%s</footer>' "$(wiki '[wiki]/footer/')"
  22 }
  23
  24 theme_pagemenu(){
  25   local page="$1"
  26
  27   if acl_write "$page"; then
  28     cat <<-EOF
  29         <ul class="pagemenu">
  30           <li><a href="./%5Bview%5D">$(_ View)</a></li>
  31           <li><a href="./%5Bedit%5D">$(_ Edit)</a></li>
  32           <li><a href="./%5Battachment%5D">$(_ Attachments)</a></li>
  33           <li><a href="./%5Brevision%5D">$(_ Revisions)</a></li>
  34           <li><a href="./%5Brename%5D">$(_ Rename)</a></li>
  35           <li><a href="./%5Bmove%5D">$(_ Move)</a></li>
  36           <li><a href="./%5Bdelete%5D">$(_ Delete)</a></li>
  37         </ul>
  38         EOF
  39   fi
  40 }
  41
  42 theme_page(){
  43   local page="$1" title="$2"
  44   title="$(HTML "${title:-"${PAGE_TITLE:-"${page}"}"}")"
  45
  46   # Important! Web Server response including newline
  47   printf "%s\r\n" "Content-Type: text/html; charset=utf-8" ""
  48
  49   cat <<-EOF
  50         <!DOCTYPE HTML>
  51         <html${LANGUAGE:+ lang=\"${LANGUAGE}\"}><head>
  52           $(theme_head)
  53           <title>${title}</title>
  54         </head><body id="$(HTML "${PATH_INFO}")">
  55           $(theme_header)
  56           <main>
  57             $(theme_pagemenu)
  58             $(if [ "$page" = '-' ]; then
  59                 cat
  60               else
  61                 printf '<article>'
  62                 wiki "$page"
  63                 printf '</article>'
  64             fi)
  65           </main>
  66           $(theme_footer)
  67         </body></html>
  68         EOF
  69 }
  70
  71 theme_editor(){
  72   local page="$1" template="$2" title file att
  73   title="$(HTML "${PAGE_TITLE:-"${page}"}")"
  74
  75   [ "$template" ] && acl_read "$template" || template="$page"
  76
  77   theme_page - "Editor: $title" <<-EOF
  78         <input checked type=radio class=tab name=edithelp value=edtr id=editor><label for=editor>$(_ Editor)</label>
  79         <input         type=radio class=tab name=edithelp value=help id=syntax><label for=syntax>$(_ Syntax)</label>
  80         <input         type=radio class=tab name=edithelp value=att  id=attach><label for=attach>$(_ Attachments)</label>
  81         $([ "$LANGUAGE_DEFAULT" -a "$LANGUAGE_DEFAULT" != "$LANGUAGE" ] && printf '
  82         <input         type=radio class=tab name=edithelp value=att  id=transl><label for=transl>%s</label>
  83         ' "$LANGUAGE_DEFAULT"
  84         )
  85         <form class="tab editor" method=POST action="$(HTML "${_BASE}${page%/}/[edit]")">
  86           <input type=hidden name=session_key value="${SESSION_KEY}"/>
  87           <textarea name=pagetext>$({ wiki_text "$page" \
  88                                    || wiki_text "$template"; } |HTML)</textarea>
  89           <button type=submit name=action value=update>$(_ Update)</button>
  90           <button type=submit name=action value=cancel>$(_ Cancel)</button>
  91         </form>
  92         <div class="tab syntax">$(wiki "/[wiki]/editorhelp/")</div>
  93         <div class="tab attach">
  94         $(for file in "$_EXEC/pages/${page%/:$LANGUAGE/}/#attachments"/* "$_DATA/pages/${page%/:$LANGUAGE/}/#attachments"/*; do
  95           [ "$file" = "$_EXEC/pages/${page%/:$LANGUAGE/}/#attachments/${file##*/}" \
  96                 -a -f "$_DATA/pages/${page%/:$LANGUAGE/}/#attachments/${file##*/}" ] && continue
  97           case ${file##*/} in
  98             \*) continue;;
  99             *.[pP][nN][gG]|*.[jJ][pP][gG]|*.[jJ][pP][eE][gG]|*.[gG][iI][fF])
 100               [ "$page" != "${page%/:$LANGUAGE/}" ] && p=../ || p=''
 101               att="$(HTML "${file##*/}")"
 102               printf '<p class=aimg><img src="%s%s">![](%s)</p><ul class=aimg><li>[%s]([attachment]/%s)</li><li>[![%s](%s)]([attachment]/%s)</li></ul>' \
 103                      "$p" "$att" "$att" "$att" "$att" "$att" "$att" "$att"
 104               ;;
 105             *)
 106               att="$(HTML "${file##*/}")"
 107               printf '<p class="adoc">[%s](%s)</p>' "$att" "$att"
 108               ;;
 109           esac
 110         done)
 111         </div>
 112         $(if [ "$LANGUAGE_DEFAULT" -a "$LANGUAGE_DEFAULT" != "$LANGUAGE" ]; then
 113           printf '<div class="tab transl">%s</div>' "$(LANGUAGE='' wiki_text "${page%/:$LANGUAGE/}" |HTML)"
 114         fi)
 115         EOF
 116 }
 117
 118 theme_revisions(){ theme_page "$@"; }
 119
 120 theme_attachments(){
 121   local page="$1" title
 122   title="${page%/}"; title="${title##*/}"
 123
 124   if acl_write "$page"; then
 125     theme_page - "$(_ Attachments): $title" <<-EOF
 126         <form class=upload method=POST enctype="multipart/form-data">
 127           <h2>$(_ Upload)</h2>
 128           <input type=hidden name=session_id value="$SESSION_ID">
 129           <input type=file name=file multiple>
 130           <button type=submit name=action value=upload>$(_ Upload)</button>
 131         </form>
 132
 133         <form method=POST>
 134           <h2>$(_ Attachments)</h2>
 135           <input type=hidden name=session_key value="$SESSION_KEY">
 136           <input checked type=radio class=tab name=attachaction value=view id=tview><label for=tview>$(_ View)</label>
 137           <input         type=radio class=tab name=attachaction value=del  id=tdel ><label for=tdel >$(_ Delete)</label>
 138           <input         type=radio class=tab name=attachaction value=move id=tmove><label for=tmove>$(_ Move)</label>
 139           <input         type=radio class=tab name=attachaction value=ren  id=tren ><label for=tren >$(_ Rename)</label>
 140           <div class="tab">
 141             <ul class="attachment list">
 142         $(for file in "$_EXEC/pages/$page/#attachments"/* "$_DATA/pages/$page/#attachments"/*; do
 143           [ "$file" = "$_EXEC/pages/$page/#attachments/${file##*/}" \
 144                 -a -f "$_DATA/pages/$page/#attachments/${file##*/}" ] && continue
 145           stat="$(stat -c '%s %Y' -- "$file" 2>&-)" || continue
 146           size="${stat% *}" date="${stat#* }"
 147           hfile="$(HTML "${file##*/}")"
 148
 149           printf '<li><input id="select_%s" type=checkbox name=select value="%s">
 150                     <label class=name for="select_%s">%s</label>
 151                     <input class=name name="rename_%s" value="" placeholder="%s" />
 152                     <a class=name href="[attachment]/%s">%s</a>
 153                     <span class=size>%s</span>
 154                     <span class=date>%s</span>
 155                   </li>' \
 156                  "$hfile" "$hfile" "$hfile" "$hfile" \
 157                  "$(slopecode "${file##*/}")" "$hfile" "$hfile" "$hfile" \
 158                  "$(size_human "$size")" "$(date -d @"$date" +"%F %T")"
 159         done)
 160             </ul>
 161             <button type=submit name=action value=delete>$(_ Delete)</button>
 162             <label for=moveto>$(_ Move To:)</label>
 163             <input id="moveto" name="moveto" value="$(HTML "$page")" placeholder="$(_ page name)">
 164             <button type=submit name=action value=move  >$(_ Move)</button>
 165             <button type=submit name=action value=rename>$(_ Rename)</button>
 166           </div>
 167         </form>
 168         EOF
 169   else
 170     theme_page - "$(_ Attachments): $title" <<-EOF
 171         <ul class="attachment list">
 172         $(for file in "$_EXEC/pages/$page/#attachments"/* "$_DATA/pages/$page/#attachments"/*; do
 173           [ "$file" = "$_EXEC/pages/$page/#attachments/${file##*/}" \
 174                 -a -f "$_DATA/pages/$page/#attachments/${file##*/}" ] && continue
 175           stat="$(stat -c '%s %Y' -- "$file" 2>&-)" || continue
 176           size="${stat% *}" date="${stat#* }"
 177           hfile="$(HTML "${file##*/}")"
 178
 179           printf '<li><a class=name href="%s">%s</a>
 180                   <span class=size>%s</span><span class=date>%s</span></li>' \
 181                  "$hfile" "$hfile" "$(size_human "$size")" "$(date -d @"$date" +"%F %T")"
 182         done)
 183         </ul>
 184         EOF
 185   fi
 186 }
 187
 188 theme_error(){
 189   local errno="$1"
 190
 191   case $errno in
 192     400) printf "%s\r\n" "Status: 400 Bad Request";;
 193     403) printf "%s\r\n" "Status: 403 Forbidden";;
 194     404) printf "%s\r\n" "Status: 404 Not Found";;
 195     409) printf "%s\r\n" "Status: 409 Conflict";;
 196     500) printf "%s\r\n" "Status: 500 Internal Server Error";;
 197   esac
 198
 199   if mdfile "/[wiki]/$errno/" >&-; then
 200     theme_page "/[wiki]/$errno/"
 201   else
 202     printf "Content-Length: 0\r\n\r\n"
 203   fi
 204 }