slitaz-pizza view public/index.cgi @ rev 73
pubic/index.cgi: change list order.
| author | Eric Joseph-Alexandre <erjo@slitaz.org> |
|---|---|
| date | Sun Nov 11 08:14:13 2012 +0100 (2012-11-11) |
| parents | 9047e2bc7c48 |
| children | 340eae2ec334 |
line source
1 #!/bin/sh
2 #
4 [ -f "/etc/slitaz/pizza.conf" ] && . /etc/slitaz/pizza.conf
5 [ -f "../pizza.conf" ] && . ../pizza.conf
6 . $VHOST/db.conf
7 . /usr/lib/slitaz/httphelper
8 header
10 cat $VHOST/lib/header.html
12 # Content negotiation for Gettext
13 IFS=","
14 for lang in $HTTP_ACCEPT_LANGUAGE
15 do
16 lang=${lang%;*} lang=${lang# } lang=${lang%-*}
17 [ -d "$lang" ] && break
18 case "$lang" in
19 en) lang="C" ;;
20 fr) lang="fr_FR" ;;
21 esac
22 done
23 unset IFS
24 export LANG=$lang LC_ALL=$lang
26 # Internationalization: $(gettext "")
27 . /usr/bin/gettext.sh
28 TEXTDOMAIN='pizza'
29 export TEXTDOMAIN
31 inqueue=$(ls $queue | wc -l)
32 builds=$(cat $builds)
33 pubiso=$(ls -1 $public | wc -l)
34 [ "$builds" ] || builds=0
36 cat << EOT
37 <h2>$(gettext "Public flavors")</h2>
38 <p>
39 $(gettext "")
40 </p>
41 <pre>
42 Flavors: $inqueue in queue - $builds builds - $pubiso public</a>
43 </pre>
44 EOT
46 for dir in $(ls -td $public/slitaz-*)
47 do
48 if [ -f $dir/receipt ] && (grep -q '^FLAVOR' $dir/receipt ]); then
49 flavor=$(grep '^FLAVOR' $dir/receipt | cut -d '=' -f 2 | sed 's/\"//g' )
50 uri="$(basename $dir)"
51 desc=$(grep '^SHORT_DESC' $dir/receipt| cut -d '=' -f 2 | sed 's/\"//g')
52 cat <<EOT
53 <a href="/?id=${uri#slitaz-}">$flavor</a><br/>
54 Description: $desc<br />
55 <br />
56 EOT
57 fi
58 done
60 # HTML footer.
61 cat $VHOST/lib/footer.html
63 exit 0