slitaz-forge annotate arm/tools.cgi @ rev 478

arm: improve website and tools
author Christophe Lincoln <pankso@slitaz.org>
date Mon Mar 10 21:40:22 2014 +0100 (2014-03-10)
parents ed0476257ebb
children 6edeeb20e6e0
rev   line source
pankso@469 1 #!/bin/sh
pankso@469 2 #
pankso@469 3 # SliTaz ARM CGI Tools.
pankso@469 4 #
pankso@470 5 # Copyright (C) 2014 SliTaz ARM - BSD License
pankso@470 6 # Author: Christophe Lincoln <pankso@slitaz.org>
pankso@470 7 #
pankso@469 8 . /usr/lib/slitaz/httphelper.sh
pankso@469 9
pankso@469 10 repos="/home/slitaz/repos"
pankso@469 11 pkgs="/home/slitaz/cooking/arm/packages"
pankso@469 12 mirror="http://cook.slitaz.org/cross/arm/packages/"
pankso@469 13 hgsat="$repos/slitaz-arm"
pankso@469 14 hgcook="$repos/cookutils"
pankso@469 15
pankso@469 16 #
pankso@469 17 # Functions
pankso@469 18 #
pankso@469 19
pankso@478 20 # Usage: html_header "title"
pankso@469 21 html_header() {
pankso@478 22 cat header.html | sed s"/_TITLE_/$1/"
pankso@469 23 }
pankso@469 24
pankso@469 25 html_footer() {
pankso@469 26 cat << EOT
pankso@478 27 <!-- Close content -->
pankso@478 28 </div>
pankso@478 29
pankso@478 30 <div id="footer">
pankso@478 31 &copy; $(date +%Y) - <a href="http://www.slitaz.org/">SliTaz GNU/Linux</a>
pankso@469 32 </div>
pankso@469 33
pankso@469 34 </body>
pankso@469 35 </html>
pankso@469 36 EOT
pankso@469 37 }
pankso@469 38
pankso@469 39 #
pankso@469 40 # Handle GET actions
pankso@469 41 #
pankso@469 42
pankso@469 43 case " $(GET) " in
pankso@469 44 *\ doc\ *)
pankso@478 45 header
pankso@478 46 html_header "$(GET tool)"
pankso@478 47 echo '<pre>'
pankso@469 48 case "$(GET tool)" in
pankso@469 49 cook) cat ${hgcook}/README ;;
pankso@469 50 cross) cat ${hgcook}/doc/cross.txt ;;
pankso@469 51 sat) cat ${hgsat}/README ;;
pankso@475 52 spi) cat ${hgsat}/rpi/README ;;
pankso@469 53 *) echo "No README file for: $(GET tool)" ;;
pankso@478 54 esac
pankso@478 55 echo '</pre>'
pankso@478 56 html_footer ;;
pankso@469 57 *\ pkgs\ *)
pankso@469 58 # TODO: link packages and add link to raw lists
pankso@469 59 title="- Packages"
pankso@469 60 count="$(cat $pkgs/packages.list | wc -l)"
pankso@478 61 html_header "Packages"
pankso@469 62 echo "<h2>Packages: $count</h2>"
pankso@469 63 IFS="|"
pankso@469 64 cat $pkgs/packages.desc | while read pkg vers desc web deps
pankso@469 65 do
pankso@478 66 vers=${vers# }
pankso@469 67 cat << EOT
pankso@478 68 <p>
pankso@478 69 <a href="${mirror%/}/${pkg% }-${vers% }-arm.tazpkg">${pkg% }</a> $vers - $desc
pankso@478 70 </p>
pankso@469 71 EOT
pankso@469 72 done
pankso@469 73 unset IFS
pankso@469 74 html_footer ;;
pankso@469 75 *)
pankso@469 76 header "Content-Type: text/plain"
pankso@469 77 echo "Hello World!" ;;
pankso@469 78 esac
pankso@469 79
pankso@469 80 exit 0