]> git.plutz.net Git - serve0/blob - index.cgi
8f21c83c296f8e077fa38a92ddf7d1c1407c858a
[serve0] / index.cgi
1 #!/bin/sh
2
3 [ -z "${_EXEC%/}" ] && _EXEC="$(realpath "${0%/*}")" || _EXEC="${_EXEC%/}"
4 [ -z "${_DATA%/}" ] && _DATA=. || _DATA="${_DATA%/}"
5
6 file_pattern='^.*\.(mov|ts|mpg|mpeg|mp4|m4v|avi|mkv|flv|sfv|wmv|ogm|ogv|webm|iso|rmvb)$'
7
8 . "$_EXEC/cgilite/cgilite.sh"
9
10 FILTER="$(GET f)"
11 SEARCH="$(GET s)"
12 ORDER="$(GET o |grep -m1 -axE 'Date|Name|Length' || printf Name)"
13 LISTSIZE="$(COOKIE pagesize |grep -m1 -axE '[1-9][0-9]*' || printf 50)"
14 ITEM="$(PATH "${PATH_INFO#/}")"
15
16 case $(GET a) in
17   setprefs)
18     SET_COOKIE +$((86400 * 90)) pagesize="$(POST pagesize |grep -m1 -axE '[1-9][0-9]*' || printf 50)"
19     SET_COOKIE +$((86400 * 90))     mode="$(POST     mode |grep -m1 -axE 'browse|index' || printf browse)"
20     SET_COOKIE +$((86400 * 90))  fakemp4="$(POST  fakemp4 |grep -m1 -axE 'yes' || printf no)"
21     REDIRECT "$(POST ref)"
22   ;;
23   bookmark)
24     bm="$_DATA/.index/bookmarks"
25     . "$_EXEC/cgilite/storage.sh"
26
27     s="$(POST search |STRING)"; f="$(POST filter |STRING)"
28     if LOCK "$bm"; then
29       grep -avF "       search=$s       filter=$f${CR}" "$bm" >"$bm.tmp"
30       [ ! "$(POST delete)" ] \
31       && printf '%s     search=%s       filter=%s\r\n' \
32                 "$(POST name |STRING)" "$s" "$f" >>"$bm.tmp"
33       mv "$bm.tmp" "$bm"
34       RELEASE "$bm"
35     fi
36     REDIRECT "$(POST ref)"
37   ;;
38 esac
39
40 if [ "$ITEM" = "/style.css" ]; then
41   . "$_EXEC/cgilite/file.sh"
42   [ -r "$_DATA/$ITEM" ] && FILE "$_DATA/$ITEM" \
43                         || FILE "$_EXEC/style.css"
44 elif [ -f "$_DATA/$ITEM" ]; then
45   case $(GET a) in
46     tag)
47     ;;
48     thumbnail)
49       . "$_EXEC/cgilite/file.sh"
50       index="$_DATA/${ITEM%/*}/.index"
51       thumb="$index/${ITEM##*/}"; thumb="${thumb%.*}.jpg"
52       [ -d "$index" -a \! -f "$thumb" ] \
53       && file="$_DATA/$ITEM" . "$_EXEC/thumbnail.sh"
54       FILE "$thumb"
55     ;;
56     delete)
57     ;;
58     *) . "$_EXEC/cgilite/file.sh"
59       fakemp4="$(COOKIE fakemp4)"
60       FILE "$_DATA/$ITEM" "$([ "$fakemp4" = yes ] && printf 'video/mp4')"
61     ;;
62   esac
63 elif [ -d "$_DATA/$ITEM" ]; then
64   case $(GET a) in
65     advsearch)
66       . "$_EXEC/advsearch.sh"
67     ;;
68     spawnindex)
69       if [ "$(POST recursive)" = yes ]; then
70         find "$_DATA/$ITEM" -depth -type d \! -name .index \
71                             -exec mkdir -p '{}'/.index \;
72       else
73         mkdir -p "$_DATA/$ITEM/.index"
74       fi
75       REDIRECT "$(POST ref)"
76     ;;
77     multitag)
78       . "$_EXEC/multitag.sh"
79       REDIRECT "$(POST ref)"
80     ;;
81     *) . "$_EXEC/list.sh"
82     ;;
83   esac
84 else
85   printf 'Status: 404 Not Found\r\nContent-Length 0:\r\n\r\n'
86 fi