]> git.plutz.net Git - shellwiki/blob - index.cgi
nocache pragma
[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   */)
79     theme_page "${PATH_INFO}"
80     exit 0
81     ;;
82   */"[login]")
83     theme_login
84     exit 0
85     ;;
86   */"[register]")
87     theme_register
88     exit 0
89     ;;
90   */"#"*)
91     :  # TODO: Invalid page name
92     ;;
93 esac
94
95 . "$_EXEC/page_edit.sh"
96 . "$_EXEC/attachment.sh"