tazpanel annotate lib/libtazpanel @ rev 71
lib/libtazpanel: this time fix query_string_parser to handle all case in TazPanel
author | Christophe Lincoln <pankso@slitaz.org> |
---|---|
date | Tue Apr 12 01:22:50 2011 +0200 (2011-04-12) |
parents | 1938c9c0603b |
children | 26455264ec32 |
rev | line source |
---|---|
pankso@15 | 1 #!/bin/sh |
pankso@15 | 2 # |
pankso@15 | 3 # Common functions for TazPanel CGI and cmdline interface |
pankso@15 | 4 # |
pankso@15 | 5 |
pankso@40 | 6 # Include gettext helper script. |
pankso@40 | 7 . /usr/bin/gettext.sh |
pankso@40 | 8 |
pankso@40 | 9 # Export package name for gettext. |
pankso@40 | 10 TEXTDOMAIN='tazpanel' |
pankso@40 | 11 export TEXTDOMAIN |
pankso@40 | 12 |
pankso@15 | 13 # We need a config file first |
pankso@15 | 14 get_config() { |
pankso@15 | 15 CONFIG="/etc/slitaz/tazpanel.conf" |
pankso@15 | 16 [ -f $CONFIG ] && . $CONFIG |
pankso@15 | 17 [ -f tazpanel.conf ] && . tazpanel.conf |
pankso@15 | 18 [ ! -f $PANEL/lib/libtazpanel ] && \ |
pankso@15 | 19 echo "No config file or libtazpanel found: $CONFIG" && \ |
pankso@15 | 20 exit 1 |
pankso@15 | 21 } |
pankso@15 | 22 |
paul@60 | 23 # TazPanel QUERY_STRING parser returns: CASE WANT VAR_1 VAR_4 |
paul@60 | 24 # we use that to help get URL string variables and user names |
pankso@53 | 25 query_string_parser() { |
pankso@53 | 26 id=0 |
pankso@71 | 27 #IFS="&" |
pankso@53 | 28 for var in $(echo "$QUERY_STRING" | sed s'@=@ @'g) |
pankso@53 | 29 do |
pankso@53 | 30 id=$((id + 1)) |
pankso@71 | 31 var=${var#&} |
pankso@53 | 32 case "$id" in |
pankso@53 | 33 '1') CASE=${var% } ;; |
pankso@53 | 34 '2') WANT=${var% } ;; |
pankso@53 | 35 '3') VAR_1=${var% } ;; |
pankso@53 | 36 '4') VAR_2=${var% } ;; |
pankso@53 | 37 esac |
pankso@53 | 38 done |
pankso@71 | 39 #unset IFS |
pankso@53 | 40 } |
pankso@53 | 41 |
pankso@51 | 42 # LOG activities |
pankso@51 | 43 log() { |
pankso@51 | 44 grep ^[a-zA-Z0-9] | sed s'/\.*\]//' >> $LOG_FILE |
pankso@51 | 45 } |
pankso@51 | 46 |
pankso@40 | 47 # Network interface status |
pankso@40 | 48 interface_status() { |
pankso@40 | 49 if ifconfig | grep -A 1 $i | grep -q inet; then |
pankso@40 | 50 ip=`ifconfig | grep -A 1 $i | grep inet | \ |
pankso@40 | 51 awk '{ print $2 }' | cut -d ":" -f 2` |
pankso@40 | 52 echo "<td>connected</td><td>$ip</td>" |
pankso@40 | 53 else |
pankso@40 | 54 echo "<td>----</td><td>----</td>" |
pankso@40 | 55 fi |
pankso@40 | 56 } |
pankso@40 | 57 |
pankso@40 | 58 # Catch network interface (used in summary and network main page) |
pankso@40 | 59 list_network_interfaces() { |
pankso@40 | 60 table_start |
pankso@40 | 61 cat << EOT |
pankso@40 | 62 <tr id="thead"> |
pankso@40 | 63 <td>`gettext "Interface"`</td> |
pankso@40 | 64 <td>`gettext "Name"`</td> |
pankso@40 | 65 <td>`gettext "Status"`</td> |
pankso@40 | 66 <td>`gettext "IP Address"`</td> |
pankso@40 | 67 </tr> |
pankso@40 | 68 EOT |
pankso@40 | 69 for i in `ls /sys/class/net` |
pankso@40 | 70 do |
pankso@40 | 71 case $i in |
pankso@40 | 72 eth*) |
pankso@41 | 73 echo "<tr><td><a href='/network.cgi?eth'> |
pankso@41 | 74 <img src='$IMAGES/ethernet.png' />$i</a></td> |
pankso@40 | 75 <td>Ethernet</td> `interface_status`</tr>" ;; |
pankso@40 | 76 wlan*|ath*|ra*) |
pankso@41 | 77 echo "<tr><td><a href='/network.cgi?wifi'> |
pankso@41 | 78 <img src='$IMAGES/wireless.png' />$i</a></td> |
pankso@40 | 79 <td>Wireless</td> `interface_status`</tr>" ;; |
pankso@40 | 80 lo) |
pankso@40 | 81 echo "<tr><td><img src='$IMAGES/loopback.png' />$i</td> |
pankso@40 | 82 <td>Loopback</td> `interface_status`</tr>" ;; |
pankso@40 | 83 *) |
pankso@40 | 84 continue ;; |
pankso@40 | 85 esac |
pankso@40 | 86 done |
pankso@40 | 87 table_end |
pankso@40 | 88 } |
pankso@40 | 89 |
pankso@15 | 90 # |
pankso@15 | 91 # xHTML 5 (header and footer skel are from the style) |
pankso@15 | 92 # |
pankso@15 | 93 |
pankso@44 | 94 loading_msg() { |
pankso@44 | 95 cat << EOT |
pankso@44 | 96 <script type="text/javascript"> |
pankso@44 | 97 document.write('<div id="loading"><img src="/styles/default/images/loader.gif" />$LOADING_MSG</div>'); |
pankso@44 | 98 </script> |
pankso@44 | 99 EOT |
pankso@44 | 100 } |
pankso@44 | 101 |
pankso@15 | 102 xhtml_header() { |
pankso@32 | 103 cat ${PANEL}$HEADER | sed s/'- %TITLE%'/"$TITLE"/ |
pankso@67 | 104 if [ $DEBUG == "1" ]; then |
pankso@70 | 105 cat << EOT |
pankso@70 | 106 <pre class='debug'> |
pankso@70 | 107 QUERY_STRING="$QUERY_STRING" |
pankso@70 | 108 CASE="$CASE" WANT="$WANT" |
pankso@70 | 109 </pre> |
pankso@70 | 110 EOT |
pankso@67 | 111 fi |
pankso@15 | 112 } |
pankso@15 | 113 |
pankso@15 | 114 xhtml_footer() { |
pankso@32 | 115 cat ${PANEL}$FOOTER |
pankso@15 | 116 } |
pankso@15 | 117 |
pankso@15 | 118 table_start() { |
pankso@15 | 119 cat << EOT |
pankso@15 | 120 <table> |
pankso@15 | 121 <tbody> |
pankso@15 | 122 EOT |
pankso@15 | 123 } |
pankso@15 | 124 |
pankso@15 | 125 table_end () { |
pankso@15 | 126 cat << EOT |
pankso@15 | 127 </tbody> |
pankso@15 | 128 </table> |
pankso@15 | 129 EOT |
pankso@45 | 130 |
pankso@15 | 131 } |