tazpanel annotate boot.cgi @ rev 50
Add boot.cgi (also latest commit have entry to change panel passwd
author | Christophe Lincoln <pankso@slitaz.org> |
---|---|
date | Sat Apr 09 00:23:41 2011 +0200 (2011-04-09) |
parents | |
children | a7f0d1a1ed2e |
rev | line source |
---|---|
pankso@50 | 1 #!/bin/sh |
pankso@50 | 2 # |
pankso@50 | 3 # Boot CGI script - All what appens before login (grub, rcS, slim) |
pankso@50 | 4 # |
pankso@50 | 5 # Copyright (C) 2011 SliTaz GNU/Linux - GNU gpl v3 |
pankso@50 | 6 # |
pankso@50 | 7 echo "Content-Type: text/html" |
pankso@50 | 8 echo "" |
pankso@50 | 9 |
pankso@50 | 10 # Common functions from libtazpanel and source main boot config file. |
pankso@50 | 11 . lib/libtazpanel |
pankso@50 | 12 . /etc/rcS.conf |
pankso@50 | 13 get_config |
pankso@50 | 14 |
pankso@50 | 15 # Include gettext helper script. |
pankso@50 | 16 . /usr/bin/gettext.sh |
pankso@50 | 17 |
pankso@50 | 18 # Export package name for gettext. |
pankso@50 | 19 TEXTDOMAIN='tazpanel' |
pankso@50 | 20 export TEXTDOMAIN |
pankso@50 | 21 |
pankso@50 | 22 TITLE="- Hardware" |
pankso@50 | 23 |
pankso@50 | 24 # |
pankso@50 | 25 # Commands |
pankso@50 | 26 # |
pankso@50 | 27 |
pankso@50 | 28 case "$QUERY_STRING" in |
pankso@50 | 29 *) |
pankso@50 | 30 # |
pankso@50 | 31 # Everything until user login |
pankso@50 | 32 # |
pankso@50 | 33 . /etc/rcS.conf |
pankso@50 | 34 TITLE="- Boot" |
pankso@50 | 35 xhtml_header |
pankso@50 | 36 debug_info |
pankso@50 | 37 cat << EOT |
pankso@50 | 38 <div id="wrapper"> |
pankso@50 | 39 <h2>`gettext "Boot & startup"`</h2> |
pankso@50 | 40 <p> |
pankso@50 | 41 `gettext "Everything that appends before user login."` |
pankso@50 | 42 </p> |
pankso@50 | 43 </div> |
pankso@50 | 44 |
pankso@50 | 45 <h3>`gettext "Kernel cmdline"`</h3> |
pankso@50 | 46 <pre> |
pankso@50 | 47 `cat /proc/cmdline` |
pankso@50 | 48 </pre> |
pankso@50 | 49 EOT |
pankso@50 | 50 # Demon list |
pankso@50 | 51 table_start |
pankso@50 | 52 cat << EOT |
pankso@50 | 53 <thead> |
pankso@50 | 54 <tr> |
pankso@50 | 55 <td>`gettext "Name"`</td> |
pankso@50 | 56 <td>`gettext "Dessciption"`</td> |
pankso@50 | 57 <td>`gettext "Status"`</td> |
pankso@50 | 58 </tr> |
pankso@50 | 59 </thead> |
pankso@50 | 60 EOT |
pankso@50 | 61 for d in `echo $RUN_DAEMONS` |
pankso@50 | 62 do |
pankso@50 | 63 echo '<tr>' |
pankso@50 | 64 echo "<td>$d</td>" |
pankso@50 | 65 if [ -d "$LOCALSTATE/installed/$d" ]; then |
pankso@50 | 66 . $LOCALSTATE/installed/$d/receipt |
pankso@50 | 67 echo "<td>$SHORT_DESC</td>" |
pankso@50 | 68 else |
pankso@50 | 69 # Standard SliTaz deamons |
pankso@50 | 70 case "$d" in |
pankso@50 | 71 firewall) |
pankso@50 | 72 gettext "<td>SliTaz Firewall with iptable rules</td>" ;; |
pankso@50 | 73 hald) |
pankso@50 | 74 . $LOCALSTATE/installed/hal/receipt |
pankso@50 | 75 echo "<td>$SHORT_DESC</td>" ;; |
pankso@50 | 76 *) |
pankso@50 | 77 echo "<td>N/A</td>" ;; |
pankso@50 | 78 esac |
pankso@50 | 79 fi |
pankso@50 | 80 # Running or not |
pankso@50 | 81 if pidof $d; then |
pankso@50 | 82 echo "<td>`gettext \"Running\"` (`pidof $d`)</td>" |
pankso@50 | 83 else |
pankso@50 | 84 gettext "<td>Stopper</td>" |
pankso@50 | 85 fi |
pankso@50 | 86 echo '</tr>' |
pankso@50 | 87 done |
pankso@50 | 88 |
pankso@50 | 89 |
pankso@50 | 90 table_end |
pankso@50 | 91 cat << EOT |
pankso@50 | 92 <h3>`gettext "Local startup commands"`</h3> |
pankso@50 | 93 <pre> |
pankso@50 | 94 `cat /etc/init.d/local.sh` |
pankso@50 | 95 </pre> |
pankso@50 | 96 EOT |
pankso@50 | 97 ;; |
pankso@50 | 98 esac |
pankso@50 | 99 |
pankso@50 | 100 xhtml_footer |
pankso@50 | 101 exit 0 |