#!/bin/sh
. "$_EXEC/cgilite/cgilite.sh"
. "$_EXEC/acl.sh"
. "$_EXEC/tools.sh"
dir="${1:-./}"
depth="${2:-1}"
printf '
\n'
page_glob "$dir" \
| while read -r glob; do
page_children "$glob" "$depth"
done \
| while read -r page; do
case $page in
/*) pagedir="$(PATH "$page")";;
*) pagedir="$(PATH "$PATH_INFO/$page")";;
esac
acl_read "$pagedir" \
&& printf '- %s
' "$(HTML "$page")" "$(HTML "$page")"
done
printf '
\n'