tazpanel annotate hardware.cgi @ rev 51
Implement daemons management
author | Christophe Lincoln <pankso@slitaz.org> |
---|---|
date | Sat Apr 09 05:45:44 2011 +0200 (2011-04-09) |
parents | 56d55a9dcc9c |
children | 730f8bcacabc |
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@46 | 30 *) |
pankso@46 | 31 # |
pankso@46 | 32 # Default to summary with mounted filesystem, loaded modules |
pankso@46 | 33 # |
pankso@46 | 34 xhtml_header |
pankso@49 | 35 debug_info |
pankso@46 | 36 cat << EOT |
pankso@46 | 37 <div id="wrapper"> |
pankso@46 | 38 <h2>`gettext "Drivers & Devices"`</h2> |
pankso@46 | 39 <p>`gettext "Manage your computer hardware`</p> |
pankso@46 | 40 </div> |
pankso@46 | 41 EOT |
pankso@46 | 42 echo '<pre>' |
pankso@46 | 43 fdisk -l | fgrep Disk |
pankso@46 | 44 echo '</pre>' |
pankso@46 | 45 echo '<h3>Filesystem usage statistics</h3>' |
pankso@46 | 46 echo '<pre>' |
pankso@46 | 47 df -h | grep ^/dev |
pankso@46 | 48 echo '</pre>' |
pankso@46 | 49 echo '<h3>Loaded kernel modules</h3>' |
pankso@49 | 50 # Request may be modinfo output |
pankso@46 | 51 case "$QUERY_STRING" in |
pankso@46 | 52 modinfo=*) |
pankso@46 | 53 mod=${QUERY_STRING#modinfo=} |
pankso@46 | 54 gettext "Detailled information for module:"; echo " $mod" |
pankso@46 | 55 echo '<pre>' |
pankso@46 | 56 modinfo $mod |
pankso@46 | 57 echo '</pre>' ;; |
pankso@46 | 58 rmmod=*) |
pankso@46 | 59 mod=${QUERY_STRING#rmmod=} |
pankso@46 | 60 modprobe -r $mod ;; |
pankso@46 | 61 esac |
pankso@46 | 62 cat << EOT |
pankso@46 | 63 `table_start` |
pankso@46 | 64 <tr class="thead"> |
pankso@46 | 65 <td>`gettext "Module"`</td> |
pankso@46 | 66 <td>`gettext "Size"`</td> |
pankso@46 | 67 <td>`gettext "Used"`</td> |
pankso@46 | 68 <td>`gettext "by"`</td> |
pankso@46 | 69 </tr> |
pankso@46 | 70 EOT |
pankso@46 | 71 # Get the list of modules and link to modinfo |
pankso@46 | 72 lsmod | grep ^[a-z] | while read MOD SIZE USED BY |
pankso@46 | 73 do |
pankso@46 | 74 cat << EOT |
pankso@46 | 75 <tr> |
pankso@46 | 76 <td><a href="$SCRIPT_NAME?modinfo=$MOD">$MOD</a></td> |
pankso@46 | 77 <td>$SIZE</td> |
pankso@46 | 78 <td>$USED</td> |
pankso@46 | 79 <td>`echo $BY | sed s/","/" "/g`</td> |
pankso@46 | 80 </tr> |
pankso@46 | 81 EOT |
pankso@46 | 82 done |
pankso@46 | 83 table_end |
pankso@46 | 84 echo '<h3>lspci</h3>' |
pankso@46 | 85 echo '<pre>' |
pankso@46 | 86 lspci |
pankso@46 | 87 echo '</pre>' |
pankso@46 | 88 ;; |
pankso@46 | 89 esac |
pankso@46 | 90 |
pankso@46 | 91 xhtml_footer |
pankso@46 | 92 exit 0 |