tazpanel annotate hardware.cgi @ rev 69
Fix query_string_parser used from a form (&)
author | Christophe Lincoln <pankso@slitaz.org> |
---|---|
date | Tue Apr 12 02:55:40 2011 +0200 (2011-04-12) |
parents | 95dc2475f4ae |
children | ba8cd6b7b934 |
rev | line source |
---|---|
pankso@46 | 1 #!/bin/sh |
pankso@46 | 2 # |
pankso@46 | 3 # Hardware part of TazPanel - Devices, drivers, printing |
pankso@46 | 4 # |
pankso@46 | 5 # Copyright (C) 2011 SliTaz GNU/Linux - GNU gpl v3 |
pankso@46 | 6 # |
pankso@46 | 7 echo "Content-Type: text/html" |
pankso@46 | 8 echo "" |
pankso@46 | 9 |
pankso@46 | 10 # Common functions from libtazpanel |
pankso@46 | 11 . lib/libtazpanel |
pankso@46 | 12 get_config |
pankso@46 | 13 |
pankso@46 | 14 # Include gettext helper script. |
pankso@46 | 15 . /usr/bin/gettext.sh |
pankso@46 | 16 |
pankso@46 | 17 # Export package name for gettext. |
pankso@46 | 18 TEXTDOMAIN='tazpanel' |
pankso@46 | 19 export TEXTDOMAIN |
pankso@46 | 20 |
pankso@46 | 21 TITLE="- Hardware" |
pankso@46 | 22 |
pankso@46 | 23 # |
pankso@46 | 24 # Commands |
pankso@46 | 25 # |
pankso@46 | 26 |
pankso@46 | 27 case "$QUERY_STRING" in |
pankso@46 | 28 print*) |
pankso@46 | 29 echo "TODO" ;; |
pankso@69 | 30 modules*|modinfo=*) |
pankso@66 | 31 query_string_parser |
pankso@46 | 32 xhtml_header |
pankso@46 | 33 cat << EOT |
pankso@46 | 34 <div id="wrapper"> |
pankso@66 | 35 <h2>`gettext "Kernel modules"`</h2> |
pankso@69 | 36 <div class="float-right"> |
pankso@69 | 37 <form method="get" action="$SCRIPT_NAME"> |
pankso@69 | 38 <input type="hidden" name="modules" /> |
pankso@69 | 39 <input type="text" name="search" /> |
pankso@69 | 40 </form> |
pankso@69 | 41 </div> |
pankso@69 | 42 <p>`gettext "Manage, search or get info on the Linux kernel modules`</p> |
pankso@46 | 43 </div> |
pankso@46 | 44 EOT |
pankso@66 | 45 # Request may be modinfo output that we want in the page itself |
pankso@46 | 46 case "$QUERY_STRING" in |
pankso@46 | 47 modinfo=*) |
pankso@46 | 48 mod=${QUERY_STRING#modinfo=} |
paul@52 | 49 gettext "Detailed information for module:"; echo " $mod" |
pankso@46 | 50 echo '<pre>' |
pankso@46 | 51 modinfo $mod |
pankso@46 | 52 echo '</pre>' ;; |
pankso@46 | 53 rmmod=*) |
pankso@46 | 54 mod=${QUERY_STRING#rmmod=} |
pankso@46 | 55 modprobe -r $mod ;; |
pankso@46 | 56 esac |
pankso@46 | 57 cat << EOT |
pankso@46 | 58 `table_start` |
pankso@46 | 59 <tr class="thead"> |
pankso@46 | 60 <td>`gettext "Module"`</td> |
pankso@46 | 61 <td>`gettext "Size"`</td> |
pankso@46 | 62 <td>`gettext "Used"`</td> |
pankso@46 | 63 <td>`gettext "by"`</td> |
pankso@46 | 64 </tr> |
pankso@46 | 65 EOT |
pankso@46 | 66 # Get the list of modules and link to modinfo |
pankso@46 | 67 lsmod | grep ^[a-z] | while read MOD SIZE USED BY |
pankso@46 | 68 do |
pankso@46 | 69 cat << EOT |
pankso@46 | 70 <tr> |
pankso@46 | 71 <td><a href="$SCRIPT_NAME?modinfo=$MOD">$MOD</a></td> |
pankso@46 | 72 <td>$SIZE</td> |
pankso@46 | 73 <td>$USED</td> |
pankso@46 | 74 <td>`echo $BY | sed s/","/" "/g`</td> |
pankso@46 | 75 </tr> |
pankso@46 | 76 EOT |
pankso@46 | 77 done |
pankso@66 | 78 table_end ;; |
pankso@66 | 79 *) |
pankso@66 | 80 # |
pankso@66 | 81 # Default to summary with mounted filesystem, loaded modules |
pankso@66 | 82 # |
pankso@66 | 83 xhtml_header |
pankso@67 | 84 |
pankso@66 | 85 cat << EOT |
pankso@66 | 86 <div id="wrapper"> |
pankso@66 | 87 <h2>`gettext "Drivers & Devices"`</h2> |
pankso@66 | 88 <p>`gettext "Manage your computer hardware`</p> |
pankso@66 | 89 </div> |
pankso@66 | 90 <div> |
pankso@66 | 91 <a class="button" href="$SCRIPT_NAME?modules">Kernel modules</a> |
pankso@66 | 92 </div> |
pankso@66 | 93 EOT |
pankso@66 | 94 echo '<h3>Filesystem usage statistics</h3>' |
pankso@66 | 95 echo '<pre>' |
pankso@66 | 96 fdisk -l | fgrep Disk |
pankso@66 | 97 echo '</pre>' |
pankso@66 | 98 echo '<pre>' |
pankso@66 | 99 df -h | grep ^/dev |
pankso@66 | 100 echo '</pre>' |
pankso@46 | 101 echo '<h3>lspci</h3>' |
pankso@46 | 102 echo '<pre>' |
pascal@61 | 103 lspci -k |
pascal@61 | 104 echo '</pre>' |
pascal@61 | 105 echo '<h3>lsusb</h3>' |
pascal@61 | 106 echo '<pre>' |
pascal@61 | 107 lsusb |
pankso@46 | 108 echo '</pre>' |
pankso@46 | 109 ;; |
pankso@46 | 110 esac |
pankso@46 | 111 |
pankso@46 | 112 xhtml_footer |
pankso@46 | 113 exit 0 |