#!/bin/sh
-list_dir(){
- dir="$(HTML "$1")"
- printf '[a .list .dir href="%s" %s]' \
- "$dir" "$dir"
-}
+list_item(){
+ name="$(HTML "$1")"
+ path="$(HTML "$ITEM/$1")"
-list_file(){
- file="$(HTML "$1")"
- printf '[div .list .file [a href="%s" [img src="%s?a=thumbnail"] %s]]' \
- "$file" "$file" "$file"
+ if [ -d "$_DATA/$ITEM/$1" ]; then
+ printf '[a .list .dir href="%s" %s]' \
+ "$path" "$name"
+ else
+ printf '[div .list .file [a href="%s" [img src="%s?a=thumbnail"] %s]]' \
+ "$path" "$path" "$name"
+ fi
}
list_dirs(){
+ [ "$ITEM" ] && printf '..\n'
(cd "$_DATA/$ITEM";
find ./ -type d -mindepth 1 -maxdepth 1 \
-exec stat -c '%Y %n' '{}' +
list_files(){
(cd "$_DATA/$ITEM";
find ./ -type f -mindepth 1 -maxdepth 1 \
- -exec stat -c '%Y %n' "${f#./}" '{}' +
+ -exec stat -c '%Y %n' "${f#./}" '{}' + 2>&-
) \
| { [ "$(GET o)" = Date ] && sort -rn || sort -k 2; } \
| cut -d/ -f2-
| cut -d/ -f2-
}
+list_paginate(){
+ page="$(GET p |grep -xE '[0-9]+' || printf 1)"
+ while i="$(line)"; do
+ c=$((${c-0} + 1))
+ if [ $c -lt $page ]; then
+ true
+ elif [ $c -lt $((LISTSIZE + page)) ]; then
+ list_item "$i"
+ fi
+ done
+
+ for n in $(seq 1 $((c / LISTSIZE + 1)) ); do
+ printf '[a .page href="%s" %s]' \
+ "?p=$(( (n - 1) * LISTSIZE + 1))" "$n" |tee /dev/stderr
+ done
+}
+
printf 'Content-Type: text/html;charset=utf-8\r\n\r\n'
"$_EXEC/cgilite/html-sh.sed" <<-EOF
$(w_search)
[input type=checkbox #t_prefs .toggle ][label for=t_prefs ⚙]
$(w_prefs)
- $(if [ $(COOKIE mode) = index ]; then
- list_tree |while read -r file; do list_file "$file"; done
+ $(if [ "$(COOKIE mode)" = index ]; then
+ list_tree
else
- list_dirs |while read -r dir; do list_dir "$dir"; done
- printf '[br]'
- list_files |while read -r file; do list_file "$file"; done
- fi)
+ list_dirs
+ list_files
+ fi \
+ | list_paginate
+ )
] ]
EOF