#!/bin/zsh
-# Copyright 2014 - 2016 Paul Hänsch
+# Copyright 2014 - 2017 Paul Hänsch
#
# This file is part of Serve0.
#
# You should have received a copy of the GNU Affero General Public License
# along with Serve0. If not, see <http://www.gnu.org/licenses/>.
+page_link="p=list&"
+
. $_EXEC/pages/common.sh
LF='
genlist(){
case "$order" in
- Date) stat -c '%Y %n' "${_DATA}"/videos/* |sort -r |sed -r 's;^.*/;;;' |egrep -i "$file_pattern";;
- Length) sed -sn 1p "${_DATA}"/meta/*.meta |sort -n |sed -r 's;^[0-9\t]+\t;;';;
- Name) printf '%s\n' "${_DATA}"/videos/* |sed -r 's;^.*/;;;' |egrep -i "$file_pattern";;
+ Date)
+ find "${_DATA}"/videos/ -maxdepth 1 -mindepth 1 -printf '%T@ %f\n' \
+ | sort -r \
+ | cut -d\ -f2- \
+ | egrep -i "$file_pattern"
+ ;;
+ Length)
+ sed -sn 1p "${_DATA}"/meta/*.meta \
+ | sort -n \
+ | sed -r 's;^[0-9\t]+\t;;' \
+ | while read file; do
+ [ -f "${_DATA}/videos/${file}" ] && printf '%s\n' "$file"
+ done
+ ;;
+ Name)
+ find "${_DATA}"/videos/ -maxdepth 1 -mindepth 1 -printf '%f\n' \
+ | sort -f \
+ | egrep -i "$file_pattern"
+ ;;
esac
}