X-Git-Url: http://git.plutz.net/?a=blobdiff_plain;f=index.cgi;h=000e8550870a845da6fa504522b6db44bb0e87d2;hb=0ef87b7334cc2e6f526e579489d3292eb6c7f9e2;hp=54841bf4338feab6adce565f87d6c71ad34b28b4;hpb=10597e4506dca6e0f4abe239ff44e742d3de8a8c;p=serve0

diff --git a/index.cgi b/index.cgi
index 54841bf..000e855 100755
--- a/index.cgi
+++ b/index.cgi
@@ -1,56 +1,59 @@
 #!/bin/sh
 
-[ -z "${_EXEC%/}" ] && _EXEC=. || _EXEC="${_DATA%/}"
+[ -z "${_EXEC%/}" ] && _EXEC="$(realpath "${0%/*}")" || _EXEC="${_EXEC%/}"
 [ -z "${_DATA%/}" ] && _DATA=. || _DATA="${_DATA%/}"
 
 . "$_EXEC/cgilite/cgilite.sh"
 . "$_EXEC/widgets.sh"
 
-filter="$(GET f)"
-search="$(GET s)"
-order="$(GET o |grep -m1 -xE 'Date|Name|Length' || printf Name)"
-pagesize="$(COOKIE pagesize |grep -m1 -xE '[1-9][0-9]*' || printf 50)"
-
-item="$(printf %s "${PATH_INFO#/}" |sed -r ':X /(^|\/)\.\.($|\/)/s;(^|[^/]*/)..(/|$);;; tX;')"
+FILTER="$(GET f)"
+SEARCH="$(GET s)"
+ORDER="$(GET o |grep -m1 -xE 'Date|Name|Length' || printf Name)"
+LISTSIZE="$(COOKIE pagesize |grep -m1 -xE '[1-9][0-9]*' || printf 50)"
+ITEM="$(PATH "${PATH_INFO#/}")"
 
 case $(GET a) in
   setprefs)
-    printf 'Status: 303 See Other\r\n'
     SET_COOKIE +$((86400 * 90)) pagesize="$(POST pagesize |grep -m1 -xE '[1-9][0-9]*' || printf 50)"
+    SET_COOKIE +$((86400 * 90))     mode="$(POST     mode |grep -m1 -xE 'browse|index' || printf browse)"
     SET_COOKIE +$((86400 * 90))  fakemp4="$(POST  fakemp4 |grep -m1 -xE 'yes' || printf no)"
-    printf 'Location: %s\r\n\r\n' "$(POST ref)"
+    REDIRECT "$(POST ref)"
   ;;
 esac
 
-if [ -f "$_DATA/$item" ]; then
+if [ "$ITEM" = "/style.css" ]; then
+  . "$_EXEC/cgilite/file.sh"
+  [ -r "$_DATA/$ITEM" ] && FILE "$_DATA/$ITEM" \
+                        || FILE "$_EXEC/style.css"
+elif [ -f "$_DATA/$ITEM" ]; then
   case $(GET a) in
     tag)
     ;;
-    download)
-    ;;
     thumbnail)
+      printf 'Status: 404 Not Found\r\nContent-Length 0:\r\n\r\n'
     ;;
     delete)
     ;;
-    *)
+    *) . "$_EXEC/cgilite/file.sh"
+      FILE "$_DATA/$ITEM"
     ;;
   esac
-elif [ -d "$_DATA/$item" ]; then
+elif [ -d "$_DATA/$ITEM" ]; then
   case $(GET a) in
+    spawnindex)
+      if [ "$(POST recursive)" = yes ]; then
+        find "$_DATA/$ITEM" -depth -type d \! -name .index \
+                            -exec mkdir -p '{}'/.index \;
+      else
+        mkdir -p "$_DATA/$ITEM/.index"
+      fi
+      REDIRECT "$(POST ref)"
+    ;;
     multitag)
     ;;
-    *) printf 'Content-Type: text/html;charset=utf-8\r\n\r\n'
-       "$_EXEC/cgilite/html-sh.sed" <<-EOF
-	[!DOCTYPE HTML]
-	[html [head [title Listing]
-	] [body
-	$(w_search) $(w_prefs)
-	] ]
-	EOF
-       exit 0
+    *) . "$_EXEC/list.sh"
     ;;
   esac
 else
-  printf 'Status: 404 Not Found\r\n\r\n'
-  exit 0
+  printf 'Status: 404 Not Found\r\nContent-Length 0:\r\n\r\n'
 fi