]> git.plutz.net Git - serve0/blob - pages/list.sh
introduced player preferences
[serve0] / pages / list.sh
1 #!/bin/zsh
2
3 # Copyright 2014, 2015 Paul Hänsch
4 #
5 # This file is part of Serve0.
6
7 # Serve0 is free software: you can redistribute it and/or modify
8 # it under the terms of the GNU Affero General Public License as published by
9 # the Free Software Foundation, either version 3 of the License, or
10 # (at your option) any later version.
11
12 # Serve0 is distributed in the hope that it will be useful,
13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 # GNU Affero General Public License for more details.
16
17 # You should have received a copy of the GNU Affero General Public License
18 # along with Serve0.  If not, see <http://www.gnu.org/licenses/>. 
19
20 cgi_cookie
21 . $_EXEC/pages/common.sh
22
23 filters="$(printf %s "${_GET[f]}" |sed -r 's;^!*\^*;;; s;\^*!*$;;; s;!+;!;g; s;\^+;^;g')"
24 debug "FILTERS: $filters"
25
26 quicklinks(){
27   output=''
28   tac ${_DATA}/meta/recent |while [ "$(echo "$output" |wc -l)" -lt 10 ] && read line; do
29     line="<a href="$line">$line</a>" 
30     echo "$output" |grep -qF "$line" || output="$output$line\n"
31   done 
32   echo $output
33 }
34
35 list_categories(){
36   echo none 
37   printf %s "$taglist" |sed -rn 's;^([^:]+):.*$;\1;p' |sort -u
38 }
39
40 category_selected(){
41   cat="${1}:"
42   filter="$2"
43   [ "$cat" = "none:" ] && cat=''
44
45   printf %s "$taglist" \
46   | sed -r 's;^('"$filter"')$;1 &;;t;s;^;0 ;' \
47   | sed -rn 's;^(0|1) '"$cat"'([^:]+)$;\1 \2;p' \
48   | sed 's;^0 ;<option>;;s;^1 ;<option selected>;;s;$;</option>;'
49 }
50
51 case "$1" in
52   title)
53     echo "Videos"
54   ;;
55   css)
56     . ${_EXEC}/templates/common.css.sh
57   ;;
58   body)
59     . ${_EXEC}/templates/list.html.sh
60   ;;
61 esac