tazpanel annotate hardware.cgi @ rev 200
help.cgi: add manual form
author | Pascal Bellard <pascal.bellard@slitaz.org> |
---|---|
date | Wed Aug 03 10:01:19 2011 +0200 (2011-08-03) |
parents | 5c59ee701236 |
children | 6a208ab5c5c5 |
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@112 | 5 # Copyright (C) 2011 SliTaz GNU/Linux - BSD License |
pankso@46 | 6 # |
pankso@46 | 7 |
pankso@46 | 8 # Common functions from libtazpanel |
pankso@46 | 9 . lib/libtazpanel |
pankso@46 | 10 get_config |
pascal@81 | 11 header |
pankso@46 | 12 |
pankso@46 | 13 # Include gettext helper script. |
pankso@46 | 14 . /usr/bin/gettext.sh |
pankso@46 | 15 |
pankso@46 | 16 # Export package name for gettext. |
pankso@46 | 17 TEXTDOMAIN='tazpanel' |
pankso@46 | 18 export TEXTDOMAIN |
pankso@46 | 19 |
pankso@46 | 20 TITLE="- Hardware" |
pankso@46 | 21 |
pankso@46 | 22 # |
pankso@46 | 23 # Commands |
pankso@46 | 24 # |
pankso@46 | 25 |
pascal@81 | 26 case " $(GET) " in |
pascal@81 | 27 *\ print\ *) |
pankso@46 | 28 echo "TODO" ;; |
pascal@81 | 29 *\ modules\ *|*\ modinfo\ *) |
pankso@46 | 30 xhtml_header |
pankso@46 | 31 cat << EOT |
pankso@46 | 32 <div id="wrapper"> |
pankso@66 | 33 <h2>`gettext "Kernel modules"`</h2> |
pankso@69 | 34 <div class="float-right"> |
pankso@69 | 35 <form method="get" action="$SCRIPT_NAME"> |
pankso@69 | 36 <input type="hidden" name="modules" /> |
pankso@69 | 37 <input type="text" name="search" /> |
pankso@69 | 38 </form> |
pankso@69 | 39 </div> |
pankso@72 | 40 <p>`gettext "Manage, search or get information about the Linux kernel modules`</p> |
pankso@46 | 41 </div> |
pankso@46 | 42 EOT |
pankso@66 | 43 # Request may be modinfo output that we want in the page itself |
pascal@81 | 44 if [ -n "$(GET modinfo)" ]; then |
pascal@81 | 45 echo '<strong>' |
pascal@81 | 46 gettext "Detailed information for module: "; echo "$(GET modinfo)" |
pascal@81 | 47 echo '</strong>' |
pascal@81 | 48 echo '<pre>' |
pascal@81 | 49 modinfo $(GET modinfo) |
pascal@81 | 50 echo '</pre>' |
pascal@81 | 51 fi |
pascal@81 | 52 if [ -n "$(GET modprobe)" ]; then |
pascal@81 | 53 echo '<pre>' |
pascal@81 | 54 modprobe -v $(GET modprobe) |
pascal@81 | 55 echo '</pre>' |
pascal@81 | 56 fi |
pascal@81 | 57 if [ -n "$(GET rmmod)" ]; then |
pascal@81 | 58 echo "Removing" |
pascal@81 | 59 rmmod -w $(GET rmmod) |
pascal@81 | 60 fi |
pascal@81 | 61 if [ -n "$(GET search)" ]; then |
pascal@81 | 62 gettext "Matching result(s) for: "; echo "$(GET search)" |
pascal@81 | 63 echo '<pre>' |
pascal@81 | 64 modprobe -l | grep "$(GET search)" | while read line |
pascal@81 | 65 do |
pascal@81 | 66 name=$(basename $line) |
pascal@81 | 67 mod=${name%.ko.gz} |
pascal@81 | 68 echo "Module : <a href='$SCRIPT_NAME?modinfo=$mod'>$mod</a> " |
pascal@81 | 69 done |
pascal@81 | 70 echo '</pre>' |
pascal@81 | 71 fi |
pankso@46 | 72 cat << EOT |
pankso@46 | 73 `table_start` |
pankso@46 | 74 <tr class="thead"> |
pankso@46 | 75 <td>`gettext "Module"`</td> |
pankso@46 | 76 <td>`gettext "Size"`</td> |
pankso@46 | 77 <td>`gettext "Used"`</td> |
pankso@46 | 78 <td>`gettext "by"`</td> |
pankso@46 | 79 </tr> |
pankso@46 | 80 EOT |
pankso@46 | 81 # Get the list of modules and link to modinfo |
pankso@46 | 82 lsmod | grep ^[a-z] | while read MOD SIZE USED BY |
pankso@46 | 83 do |
pankso@46 | 84 cat << EOT |
pankso@46 | 85 <tr> |
pankso@46 | 86 <td><a href="$SCRIPT_NAME?modinfo=$MOD">$MOD</a></td> |
pankso@46 | 87 <td>$SIZE</td> |
pankso@46 | 88 <td>$USED</td> |
pankso@46 | 89 <td>`echo $BY | sed s/","/" "/g`</td> |
pankso@46 | 90 </tr> |
pankso@46 | 91 EOT |
pankso@46 | 92 done |
pankso@66 | 93 table_end ;; |
pankso@66 | 94 *) |
pankso@66 | 95 # |
pankso@66 | 96 # Default to summary with mounted filesystem, loaded modules |
pankso@66 | 97 # |
pankso@66 | 98 xhtml_header |
pankso@66 | 99 cat << EOT |
pankso@66 | 100 <div id="wrapper"> |
pankso@66 | 101 <h2>`gettext "Drivers & Devices"`</h2> |
pankso@66 | 102 <p>`gettext "Manage your computer hardware`</p> |
pankso@66 | 103 </div> |
pankso@66 | 104 <div> |
pankso@109 | 105 <a class="button" href="$SCRIPT_NAME?modules"> |
pankso@109 | 106 <img src="$IMAGES/tux.png" />Kernel modules</a> |
pankso@66 | 107 </div> |
pankso@152 | 108 |
pankso@152 | 109 <h3>$(gettext "Filesystem usage statistics")</h3> |
pankso@152 | 110 <pre> |
pankso@66 | 111 EOT |
pankso@152 | 112 fdisk -l | fgrep Disk |
pankso@66 | 113 echo '</pre>' |
pankso@153 | 114 # |
pankso@153 | 115 # Disk stats and management (mount, umount, heck) |
pankso@153 | 116 # |
pankso@153 | 117 table_start |
pankso@153 | 118 df_thead |
pankso@153 | 119 df -h | grep ^/dev | while read fs size used av pct mp |
pankso@153 | 120 do |
pankso@153 | 121 cat << EOT |
pankso@153 | 122 <tr> |
pankso@190 | 123 <td><img src="$IMAGES/harddisk.png" />${fs#/dev/}</td> |
pankso@153 | 124 <td>$size</td> |
pankso@153 | 125 <td>$av</td> |
pankso@153 | 126 <td class="pct"><div class="pct" |
pankso@153 | 127 style="width: $pct;">$used - $pct</div></td> |
pankso@153 | 128 <td>$mp</td> |
pankso@153 | 129 </tr> |
pankso@153 | 130 EOT |
pankso@153 | 131 done |
pankso@153 | 132 table_end |
pankso@152 | 133 echo "<h3>$(gettext "System memory")</h3>" |
pankso@152 | 134 echo '<pre>' |
pankso@152 | 135 free -m | sed \ |
pankso@152 | 136 -e s"#total.*\([^']\)#<span class='top'>\0</span>#"g \ |
pankso@152 | 137 -e s"#^[A-Z-].*:\([^']\)#<span class='sh-comment'>\0</span>#"g |
pankso@152 | 138 echo '</pre>' |
pankso@46 | 139 echo '<h3>lspci</h3>' |
pankso@46 | 140 echo '<pre>' |
pascal@155 | 141 lspci -k | sed \ |
pascal@155 | 142 -e s"#^[0-9].*\([^']\)#<span class='diff-at'>\0</span>#" \ |
pascal@155 | 143 -e s"#use: \(.*\)#use: <span class='diff-rm'>\1</span>#" |
pascal@61 | 144 echo '</pre>' |
pascal@61 | 145 echo '<h3>lsusb</h3>' |
pascal@61 | 146 echo '<pre>' |
pascal@61 | 147 lsusb |
pankso@46 | 148 echo '</pre>' |
pankso@46 | 149 ;; |
pankso@46 | 150 esac |
pankso@46 | 151 |
pankso@46 | 152 xhtml_footer |
pankso@46 | 153 exit 0 |