]> git.plutz.net Git - serve0/blob - pages/common.sh
adopted update in shcgi
[serve0] / pages / common.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 filter="${_GET[f]}"
21 search="${_GET[s]}"
22 order="${_GET[o]}" #validated
23 page="${_GET[pn]}" #validated
24 pagesize="${_COOKIE[pagesize]}" #validated
25
26 page_link=''
27 [ -n "$info" ]   && page_link="i=$(urlsafe "$info")&"
28 [ -n "$order" ]  && page_link="${page_link}o=${order}&"
29 [ -n "$search" ] && page_link="${page_link}s=${search}&"
30 [ -n "$filter" ] && page_link="${page_link}f=${filter}&"
31 page_prev="${page_link}pn=$([ "$page" -le "$pagesize" ] && echo 1 || echo $(($page - $pagesize)) )"
32 page_next="${page_link}pn=$(($page + $pagesize))"
33 page_this="${page_link}pn=$page"
34
35 taglist=$(
36   [ -r ${_DATA}/cache/taglist ] && cat ${_DATA}/cache/taglist ||\
37   for each in ${_DATA}/meta/*.meta; do
38     sed -n '2s:|:\n:gp' "$each"
39   done |sort -u |grep -xv '' |tee ${_DATA}/cache/taglist
40 )
41
42 _printVideo(){
43   info="$1"
44   cache="${_DATA}/cache/$info.cache"
45   meta="${_DATA}/meta/$info.meta"
46
47   if [ "$cache" -nt "$meta" ]; then
48     cat "$cache"
49   else
50     videofile="${_DATA}/videos/$info"
51     thumb="${_DATA}/thumbs/$info.jpg"
52     [ -r "$meta"  ] || ${_EXEC}/helpers/genmeta.sh "$videofile" "$meta"
53     [ -r "$thumb" ] || ${_EXEC}/helpers/genthumb.sh "$videofile" "$thumb"
54
55     head -n1 "$meta" |read length width height filename
56     [ -z "$length" ] && length=0
57     [ -z "$width"  ] && width=0
58     [ -z "$height" ] && height=0
59
60     tags="$(sed -n 2p "$meta")"
61     video="$(urlsafe "videos/$info")"
62     thumb="$(urlsafe "thumbs/$info.jpg")"
63     linkinfo="$(urlsafe "$info")"
64
65     [ "$(($length % 60))" -lt 10 ] && minutes="$(($length / 60)):0$(($length % 60))" \
66                                    || minutes="$(($length / 60)):$(($length % 60))"
67
68     tee "$cache" <<VIDEOend
69       <li class="thumb">
70         <a class="watchlink" name="${linkinfo}" href="?action=watch&i=${linkinfo}">
71           <img src="$thumb" alt="Preview not yet available">
72         </a>
73         <h2>$info</h2>
74         
75         <input type="checkbox" name="tagsel" value="$info">
76         <span class="info property">${minutes}min</span>
77         <span class="info property">${width}x${height}</span>
78         $(printf %s "$tags" |sed -r 's:\|*([^|]+)\|*: <span class="info tag">\1</span>:g')
79       </li>
80 VIDEOend
81   fi
82 }
83
84 genlist(){
85   case "$order" in
86     Date)   ls -c ${_DATA}/videos/ |egrep -i "$file_pattern";;
87     Length) sed -sn 1p "${_DATA}/meta/"*.meta |sort -n |sed -r 's;^[0-9\t]+\t;;';;
88     Name)   printf '%s\n' "${_DATA}/meta/"*meta |sed -r 's;^.*/;;;s;\.meta$;;';;
89   esac
90 }
91
92 thumblist() {
93   cache="${_DATA}/cache/${pagesize}?o=${order}&s=${search}&f=${filter}&pn=${page}"
94   if [ "$cache" -nt ${_DATA}/videos -a "$cache" -nt ${_DATA}/meta ]; then
95     cat "$cache"
96   else
97     filterex="s;^([0-9]+\t){3}(.+)\n.*$;\2;p"
98     printf '%s\n' "$filter" |tr '^' '\n' \
99     | while read each; do
100       [ "${each:0:1}" = '!' ] && filterex="/^[^\n]+\n(.*\|)?(${each#?})(\|.*)?$/d;{${filterex}}" \
101                               || filterex="/^[^\n]+\n(.*\|)?(${each})(\|.*)?$/{${filterex}}"
102     done
103       
104     genlist \
105     | if [ -n "$search" ] ; then
106       xargs -d '\n' printf "${_DATA}/meta/%s.meta\n" \
107       | xargs -d '\n' egrep -sil "$search" \
108       | sed -r 's;^.*/;;;s;\.meta$;;'
109     elif [ "$filterex" != "q0" ]; then
110       xargs -d '\n' printf "${_DATA}/meta/%s.meta\n" \
111       | xargs -d '\n' sed -srn ":a;N;2!ba;{${filterex}}"
112     else
113       cat
114     fi \
115     | sed -n "$page,$(($page + $pagesize - 1))p" \
116     | tee "$cache"
117   fi \
118   | while read line; do
119     _printVideo "$line"
120   done
121 }