]> git.plutz.net Git - shellwiki/blob - index.cgi
page selector layout
[shellwiki] / index.cgi
1 #!/bin/sh
2
3 . "${_EXEC:-${0%/*}}/cgilite/cgilite.sh"
4 . "${_EXEC}/cgilite/session.sh"
5 . "${_EXEC}/cgilite/file.sh"
6 . "${_EXEC}/cgilite/users.sh"
7 . "${_EXEC}/acl.sh"
8
9 . "${_EXEC}/themes/default.sh"
10
11 CACHE_AGE=${CACHE_AGE:-1800}
12 export MD_MACROS="$_EXEC/macros"
13 export MD_HTML="${MD_HTML:-false}"
14
15 if [ "$(which awk)" ]; then
16   md() { awk -f "$_EXEC/md_macros.awk" -f "$_EXEC/cgilite/markdown.awk"; }
17 elif [ "$(which busybox)" ]; then
18   md() { busybox awk -f "$_EXEC/md_macros.awk" -f "$_EXEC/cgilite/markdown.awk"; }
19 else
20   md() { cat; }
21 fi
22
23 mdfile(){
24   local page="$(PATH "$1")"
25
26   if   [ -f "$_DATA/pages/$page/#page.md" ]; then
27     printf %s\\n "$_DATA/pages/$page/#page.md"
28   elif [ -f "$_EXEC/pages/$page/#page.md" ]; then
29     printf %s\\n "$_EXEC/pages/$page/#page.md"
30   else
31     return 1
32   fi
33 }
34
35 wiki_text() {
36   # Print source text of a wiki page
37   # Get page from data or underlay dir
38   local page="$(PATH "$1")" mdfile
39
40   mdfile="$(mdfile "$page")" || return 4
41   acl_read "$page" || return 3
42   cat -- "$mdfile"
43 }
44
45 wiki() {
46   # Print content of a wiki page
47   # Get page from data or underlay dir, handle caching
48   local page="$(PATH "$1")" mdfile cache cachetime
49
50   cache="$_DATA/pages/$page/#page.${USER_ID}.cache"
51
52   mdfile="$(mdfile "$page")" || return 4
53   acl_read "$page" || return 3
54
55   cachetime="$(stat -c %Y -- "$mdfile" "$cache" 2>/dev/null)"
56
57   if [ "${cachetime#*${BR}}" -gt "${cachetime%${BR}*}" \
58     -a "${cachetime#*${BR}}" -gt "$((_DATE - CACHE_AGE))" ]; then
59     cat "${cache}"
60   else
61     mkdir -p -- "$_DATA/pages/$page/"
62     # Macros expect to find page directory as working dir
63     ( cd -- "$_DATA/pages/$page/";
64       sed -E '1,20{ /^%[a-z]+/d; }' "$mdfile" \
65       | md |tee -- "${cache}.$$"
66     )
67     grep -q '^%nocache' "$mdfile" \
68     && rm -- "${cache}.$$" \
69     || mv -- "${cache}.$$" "${cache}"
70   fi
71 }
72
73 case "${PATH_INFO}" in
74   /"[.]"/*)
75     FILE "${_EXEC}/${PATH_INFO#/\[.\]}"
76     ;;
77   */"#"*/*)
78     export ERROR_MSG="This page name is not allowed"
79     theme_400
80     ;;
81   /|*[^]]/)
82     theme_page "${PATH_INFO}"
83     ;;
84   */"[login]")
85     theme_page "/[wiki]/login/"
86     ;;
87   */"[register]")
88     theme_page "/[wiki]/register/"
89     ;;
90   */"[invite]")
91     theme_page "/[wiki]/invite/"
92     ;;
93   *)
94     . "$_EXEC/page_edit.sh" \
95     || . "$_EXEC/attachment.sh" \
96     || theme_404
97     ;;
98 esac
99