tazpanel annotate boot.cgi @ rev 381
More reliable menu.d calls
author | Pascal Bellard <pascal.bellard@slitaz.org> |
---|---|
date | Mon Jan 06 00:45:40 2014 +0100 (2014-01-06) |
parents | 0369a5cb81e3 |
children | d1dbbf42b25e |
rev | line source |
---|---|
pankso@50 | 1 #!/bin/sh |
pankso@50 | 2 # |
paul@82 | 3 # Boot CGI script - All what happens before login (grub, rcS, slim) |
pankso@50 | 4 # |
pankso@379 | 5 # Copyright (C) 2011-2014 SliTaz GNU/Linux - BSD License |
pankso@50 | 6 # |
pankso@50 | 7 |
pankso@50 | 8 # Common functions from libtazpanel and source main boot config file. |
pankso@50 | 9 . lib/libtazpanel |
pankso@50 | 10 . /etc/rcS.conf |
pascal@81 | 11 header |
pankso@50 | 12 get_config |
pankso@50 | 13 |
al@292 | 14 TITLE=$(gettext 'TazPanel - Boot') |
pankso@50 | 15 |
pankso@50 | 16 # |
pankso@50 | 17 # Commands |
pankso@50 | 18 # |
pankso@50 | 19 |
pascal@81 | 20 case " $(GET) " in |
pascal@130 | 21 *\ log\ *) |
pascal@130 | 22 xhtml_header |
pascal@130 | 23 cat << EOT |
pascal@130 | 24 <div id="wrapper"> |
al@303 | 25 <h2>$(gettext 'Boot log files')</h2> |
pascal@130 | 26 </div> |
pascal@137 | 27 <div> |
pascal@137 | 28 <a class="button" href="#kernel"> |
al@303 | 29 <img src="$IMAGES/tux.png" />$(gettext 'Kernel messages')</a> |
al@303 | 30 <a class="button" href="#boot">$(gettext 'Boot scripts')</a> |
al@303 | 31 <a class="button" href="#slim">$(gettext 'X server')</a> |
pascal@137 | 32 </div> |
al@303 | 33 |
al@303 | 34 <h3 id="kernel">$(gettext 'Kernel messages')</h3> |
al@303 | 35 |
al@303 | 36 <pre>$(cat /var/log/dmesg.log | syntax_highlighter kernel)</pre> |
al@303 | 37 |
al@303 | 38 <h3 id="boot">$(gettext 'Boot scripts')</h3> |
al@303 | 39 |
al@303 | 40 <pre>$(cat /var/log/boot.log | filter_taztools_msgs)</pre> |
al@303 | 41 |
al@303 | 42 <h3 id="slim">$(gettext 'X server')</h3> |
al@303 | 43 |
pascal@130 | 44 <pre> |
al@303 | 45 $(tail -n 40 /var/log/slim.log | htmlize) |
al@303 | 46 <hr /><a href="/index.cgi?file=/var/log/slim.log">$(gettext 'Show more...')</a> |
al@303 | 47 </pre> |
pascal@130 | 48 EOT |
pascal@130 | 49 ;; |
pascal@81 | 50 *\ daemons\ *) |
pankso@51 | 51 # |
pankso@51 | 52 # Everything until user login |
pankso@51 | 53 # |
al@292 | 54 # Start and stop a daemon. I think we don't need a restart since 2 |
paul@52 | 55 # clicks and you are done |
pankso@51 | 56 . /etc/rcS.conf |
pankso@51 | 57 xhtml_header |
al@292 | 58 |
pankso@51 | 59 cat << EOT |
pankso@51 | 60 <div id="wrapper"> |
al@303 | 61 <h2>$(gettext 'Manage daemons')</h2> |
al@303 | 62 <p>$(gettext 'Check, start and stop daemons on SliTaz')</p> |
pankso@51 | 63 </div> |
pankso@51 | 64 EOT |
pascal@143 | 65 daemon=$(GET daemons) |
pascal@143 | 66 case "$daemon" in |
pascal@143 | 67 start=*) |
pascal@143 | 68 sleep 1 |
pascal@143 | 69 /etc/init.d/${daemon#start=} start | log ;; |
pascal@143 | 70 stop=*) |
pascal@143 | 71 /etc/init.d/${daemon#stop=} stop | log ;; |
pascal@143 | 72 pid=*) |
pascal@143 | 73 echo "<pre>" |
pascal@143 | 74 ps ww | sed "1p;/^ *${daemon#pid=} /!d" |
pascal@143 | 75 echo "</pre>" ;; |
pascal@143 | 76 esac |
paul@205 | 77 # Daemon list |
pankso@51 | 78 table_start |
pankso@51 | 79 cat << EOT |
pankso@51 | 80 <thead> |
pankso@51 | 81 <tr> |
al@303 | 82 <td>$(gettext 'Name')</td> |
al@303 | 83 <td>$(gettext 'Description')</td> |
pascal@366 | 84 <td>$(gettext 'Configuration')</td> |
al@303 | 85 <td>$(gettext 'Status')</td> |
al@303 | 86 <td>$(gettext 'Action')</td> |
al@303 | 87 <td>$(gettext 'PID')</td> |
pankso@51 | 88 </tr> |
pankso@51 | 89 </thead> |
pankso@51 | 90 EOT |
pankso@51 | 91 cd /etc/init.d |
pankso@51 | 92 list="`ls | sed -e /.sh/d -e /rc./d -e /RE/d -e /daemon/d \ |
pankso@51 | 93 -e /firewall/d`" |
pankso@51 | 94 for name in $list |
pankso@51 | 95 do |
pankso@51 | 96 pkg="" |
pankso@51 | 97 pid="" |
pankso@51 | 98 status="" |
pankso@51 | 99 SHORT_DESC="" |
pankso@51 | 100 echo '<tr>' |
pankso@51 | 101 # Name |
pankso@51 | 102 echo "<td>$name</td>" |
paul@52 | 103 # First check if daemon is started at bootime |
pankso@51 | 104 [ echo "RUN_DAEMONS" | fgrep $name ] && boot="on boot" |
paul@52 | 105 # Standard SliTaz busybox daemons and firewall |
al@303 | 106 echo -n "<td>" |
pascal@364 | 107 cfg="" |
pascal@364 | 108 grep -qi "^${name}_OPTIONS=" /etc/daemons.conf && cfg="options|$cfg" |
pascal@373 | 109 for i in /etc/slitaz /etc /etc/$name ; do |
pascal@373 | 110 [ -s $i/$name.conf ] && cfg="edit::$i/$name.conf|$cfg" |
pascal@373 | 111 done |
pascal@364 | 112 [ -n "$(which $name)" ] && cfg="man|help|$cfg" |
pankso@51 | 113 case "$name" in |
pankso@51 | 114 firewall) |
al@303 | 115 gettext 'SliTaz Firewall with iptable rules' ;; |
pankso@51 | 116 httpd) |
al@303 | 117 gettext 'Small and fast web server with CGI support' ;; |
pankso@51 | 118 ntpd) |
al@303 | 119 gettext 'Network time protocol daemon' ;; |
pankso@51 | 120 ftpd) |
pascal@364 | 121 cfg="man|help|edit::/etc/inetd.conf" |
al@303 | 122 gettext 'Anonymous FTP server' ;; |
pankso@51 | 123 udhcpd) |
al@303 | 124 gettext 'Busybox DHCP server' ;; |
pankso@51 | 125 syslogd|klogd) |
al@303 | 126 gettext 'Linux Kernel log daemon' ;; |
pankso@76 | 127 crond) |
pascal@364 | 128 # FIXME crontab |
al@303 | 129 gettext 'Execute scheduled commands' ;; |
pankso@76 | 130 dnsd) |
pascal@364 | 131 cfg="man|help|edit|options::-d" |
al@303 | 132 gettext 'Small static DNS server daemon' ;; |
pankso@76 | 133 tftpd) |
pascal@364 | 134 cfg="man|help|edit::/etc/inetd.conf" |
al@303 | 135 gettext 'Transfer a file on tftp request' ;; |
pankso@76 | 136 inetd) |
al@303 | 137 gettext 'Listen for network connections and launch programs' ;; |
pankso@76 | 138 zcip) |
pascal@364 | 139 cfg="man|help|edit:Script:/etc/zcip.script|options::eth0 /etc/zcip.script" |
al@303 | 140 gettext 'Manage a ZeroConf IPv4 link-local address' ;; |
pankso@51 | 141 *) |
paul@205 | 142 # Description from receipt |
pankso@51 | 143 [ -d "$LOCALSTATE/installed/$name" ] && pkg=$name |
pankso@51 | 144 [ -d "$LOCALSTATE/installed/${name%d}" ] && pkg=${name%d} |
pankso@51 | 145 [ -d "$LOCALSTATE/installed/${name}-pam" ] && pkg=${name}-pam |
pankso@51 | 146 if [ "$pkg" ]; then |
pascal@364 | 147 unset SHORT_DESC TAZPANEL_DAEMON |
pankso@51 | 148 . $LOCALSTATE/installed/$pkg/receipt |
al@303 | 149 echo -n "$SHORT_DESC" |
pascal@366 | 150 cfg="${TAZPANEL_DAEMON:-$cfg|web::$WEB_SITE}" |
pankso@51 | 151 else |
al@303 | 152 echo -n "----" |
pankso@51 | 153 fi ;; |
pankso@51 | 154 esac |
al@303 | 155 echo "</td>" |
paul@205 | 156 # Attempt to get daemon status |
al@303 | 157 pidfile=$(find /var/run -name *$name*.pid) |
al@303 | 158 [ "$pidfile" ] && pid=$(cat $pidfile) |
pankso@51 | 159 # dbus |
al@303 | 160 [ -f /var/run/${name}/pid ] && pid=$(cat /var/run/${name}/pid) |
pankso@51 | 161 # apache |
al@303 | 162 [ "$name" = "apache" ] && pid=$(cat /var/run/$name/httpd.pid) |
paul@205 | 163 # Pidof works for many daemons |
al@303 | 164 [ "$pid" ] || pid=$(pidof $name) |
pascal@364 | 165 echo -n "<td>" |
pascal@364 | 166 if [ "$cfg" ]; then |
pascal@364 | 167 IFS="|" |
pascal@364 | 168 for i in $cfg ; do |
pascal@364 | 169 IFS=":" |
pascal@364 | 170 set -- $i |
pascal@364 | 171 case "$1" in |
pascal@364 | 172 edit) cat <<EOT |
pascal@364 | 173 <a href="index.cgi?file=${3:-/etc/$name.conf}&action=edit"> |
pascal@364 | 174 <img title="${2:-$name Configuration}" src="$IMAGES/edit.png" /></a> |
pascal@364 | 175 EOT |
pascal@364 | 176 ;; |
pascal@364 | 177 options) |
pascal@364 | 178 key=$(echo $name | tr [a-z] [A-Z])_OPTIONS |
pascal@364 | 179 cat <<EOT |
pascal@364 | 180 <a href="index.cgi?file=/etc/daemons.conf&action=setvar&var=$key&default=$3"> |
pascal@364 | 181 <img title="${2:-$key}" src="$IMAGES/tux.png" /></a> |
pascal@364 | 182 EOT |
pascal@364 | 183 ;; |
pascal@364 | 184 man) cat <<EOT |
pascal@364 | 185 <a href="index.cgi?exec=man ${3:-$name}"> |
pascal@364 | 186 <img title="${2:-$name Manual}" src="$IMAGES/text.png" /></a> |
pascal@364 | 187 EOT |
pascal@364 | 188 ;; |
pascal@364 | 189 help) cat <<EOT |
pascal@364 | 190 <a href="index.cgi?exec=$(which ${3:-$name}) --help"> |
pascal@364 | 191 <img title="${2:-$name Help}" src="$IMAGES/help.png" /></a> |
pascal@364 | 192 EOT |
pascal@364 | 193 ;; |
pascal@364 | 194 web) cat <<EOT |
pascal@364 | 195 <a href="${i#$1:$2:}"> |
pascal@366 | 196 <img title="${2:-$name website:} ${i#$1:$2:}" src="$IMAGES/browser.png" /></a> |
pascal@364 | 197 EOT |
pascal@364 | 198 ;; |
pascal@364 | 199 esac |
pascal@364 | 200 done |
pascal@364 | 201 fi |
pascal@364 | 202 echo "</td>" |
pankso@51 | 203 if [ "$pid" ]; then |
pascal@143 | 204 cat << EOT |
al@303 | 205 <td><img src="$IMAGES/started.png" alt="Started" title="$(gettext 'Started')" /></td> |
pascal@143 | 206 <td><a href="$SCRIPT_NAME?daemons=stop=$name"> |
al@303 | 207 <img src="$IMAGES/stop.png" alt="Stop" title="$(gettext 'Stop')" /></a></td> |
pascal@143 | 208 <td> |
pascal@143 | 209 EOT |
pascal@143 | 210 for i in $pid; do |
pascal@143 | 211 cat << EOT |
pascal@143 | 212 <a href="$SCRIPT_NAME?daemons=pid=$i">$i</a> |
pascal@143 | 213 EOT |
pascal@143 | 214 done |
pankso@51 | 215 else |
pascal@143 | 216 cat << EOT |
al@303 | 217 <td><img src="$IMAGES/stopped.png" alt="Stopped" title="$(gettext 'Stopped')" /></td> |
pascal@143 | 218 <td><a href="$SCRIPT_NAME?daemons=start=$name"> |
al@303 | 219 <img src="$IMAGES/start.png" alt="Start" title="$(gettext 'Start')" /></a></td> |
pascal@143 | 220 <td>----- |
pascal@143 | 221 EOT |
pankso@51 | 222 fi |
pascal@143 | 223 echo '</td></tr>' |
pankso@51 | 224 done |
pankso@51 | 225 table_end ;; |
al@303 | 226 |
pankso@151 | 227 *\ grub\ *) |
al@303 | 228 GRUBMENU="/boot/grub/menu.lst" |
pankso@151 | 229 if [ "$(GET splash)" ]; then |
pankso@151 | 230 default=$(GET default) |
pankso@151 | 231 timeout=$(GET timeout) |
pankso@151 | 232 splash=$(GET splash) |
pankso@151 | 233 sed -i \ |
al@303 | 234 -e s"|default .*|default $default # new|" \ |
al@303 | 235 -e s"|timeout .*|timeout $timeout|" \ |
al@303 | 236 -e s"|splashimage=.*|splashimage=$splash|" \ |
al@303 | 237 $GRUBMENU |
pankso@151 | 238 fi |
al@303 | 239 default=$(cat $GRUBMENU | grep ^default | cut -d " " -f 2) |
al@303 | 240 timeout=$(cat $GRUBMENU | grep ^timeout | cut -d " " -f 2) |
al@303 | 241 splash=$(cat $GRUBMENU | grep ^splashimage | cut -d "=" -f 2) |
pankso@151 | 242 xhtml_header |
pankso@151 | 243 cat << EOT |
pankso@151 | 244 <div id="wrapper"> |
al@303 | 245 <h2>$(gettext 'GRUB Boot loader')</h2> |
al@303 | 246 |
al@303 | 247 <p>$(gettext 'The first application started when the computer powers on')</p> |
pankso@151 | 248 </div> |
pankso@151 | 249 |
pankso@151 | 250 <form method="get" action="$SCRIPT_NAME"> |
pankso@151 | 251 <input type="hidden" name="grub" /> |
al@303 | 252 <table> |
al@303 | 253 <tr><td>$(gettext 'Default entry:')</td> |
al@303 | 254 <td><input type="text" name="default" value="$default" /></td></tr> |
al@303 | 255 <tr><td>$(gettext 'Timeout:')</td> |
al@303 | 256 <td><input type="text" name="timeout" value="$timeout" /></td></tr> |
al@303 | 257 <tr><td>$(gettext 'Splash image:')</td> |
al@303 | 258 <td><input type="text" name="splash" value="$splash" size="40" /></td></tr> |
al@303 | 259 </table> |
al@303 | 260 <input type="submit" value="$(gettext 'Change')" /> |
al@303 | 261 <a class="button" href="index.cgi?file=$GRUBMENU"> |
al@303 | 262 <img src="$IMAGES/text.png" />$(gettext 'View or edit menu.lst')</a> |
pankso@151 | 263 </form> |
pankso@151 | 264 |
al@303 | 265 <h3>$(gettext 'Boot entries')</h3> |
pankso@151 | 266 EOT |
al@303 | 267 |
al@303 | 268 |
al@303 | 269 menu=$(tail -q -n +$(grep -n ^title $GRUBMENU | head -n1 | cut -d: -f1) $GRUBMENU \ |
al@303 | 270 | sed -e "s|^$||g" \ |
al@303 | 271 | sed -e "s|^title|</pre></li>\n<p><strong>$(gettext 'Entry') #</strong></p>\n<pre>\0|g" \ |
al@303 | 272 | sed '/^[ \t]*$/d' \ |
al@303 | 273 | tail -q -n +2)"</pre>" |
al@303 | 274 |
pankso@151 | 275 entry='-1' |
al@303 | 276 echo "$menu" | while read line |
pankso@151 | 277 do |
al@303 | 278 if [ -n "$(echo $line | grep '#</strong>')" ]; then |
al@303 | 279 entry=$(($entry + 1)) |
al@303 | 280 fi |
al@303 | 281 echo $line | sed "s|#</strong>|$entry</strong>|" |
pankso@151 | 282 done |
al@303 | 283 |
pankso@151 | 284 # Here we could check if an entry for gpxe is present if not |
pankso@151 | 285 # display a form to add it. |
pankso@151 | 286 [ -f "/boot/gpxe" ] && echo "<h3>gPXE</h3>" && \ |
al@303 | 287 gettext 'Web boot is available with gPXE' |
pankso@151 | 288 ;; |
pankso@50 | 289 *) |
pankso@50 | 290 # |
pankso@51 | 291 # Default content with summary |
pankso@50 | 292 # |
pankso@50 | 293 . /etc/rcS.conf |
pankso@50 | 294 xhtml_header |
pankso@50 | 295 cat << EOT |
pankso@50 | 296 <div id="wrapper"> |
al@303 | 297 <h2>$(gettext 'Boot & Start services')</h2> |
al@303 | 298 <p>$(gettext 'Everything that happens before user login')</p> |
pankso@50 | 299 </div> |
pankso@51 | 300 <div> |
pascal@130 | 301 <a class="button" href="$SCRIPT_NAME?log"> |
al@303 | 302 <img src="$IMAGES/text.png" />$(gettext 'Boot logs')</a> |
pascal@124 | 303 <a class="button" href="$SCRIPT_NAME?daemons"> |
al@303 | 304 <img src="$IMAGES/recharge.png" />$(gettext 'Manage daemons')</a> |
al@303 | 305 <a class="button" href="$SCRIPT_NAME?grub">$(gettext 'Boot loader')</a> |
pankso@51 | 306 </div> |
pankso@51 | 307 |
al@303 | 308 <h3>$(gettext 'Configuration files')</h3> |
pankso@57 | 309 <ul> |
al@303 | 310 <li>$(gettext 'Main configuration file:') |
pankso@57 | 311 <a href="index.cgi?file=/etc/rcS.conf">rcS.conf</a></li> |
al@303 | 312 <li>$(gettext 'Login manager settings:') |
pankso@57 | 313 <a href="index.cgi?file=/etc/slim.conf">slim.conf</a></li> |
pankso@73 | 314 </ul> |
pankso@57 | 315 |
al@303 | 316 <h3>$(gettext 'Kernel cmdline')</h3> |
al@303 | 317 |
al@303 | 318 <pre>$(cat /proc/cmdline)</pre> |
al@303 | 319 |
al@303 | 320 <h3>$(gettext 'Local startup commands')</h3> |
al@303 | 321 |
al@303 | 322 <pre>$(cat /etc/init.d/local.sh | syntax_highlighter sh)</pre> |
al@303 | 323 |
pankso@105 | 324 <a class="button" href="index.cgi?file=/etc/init.d/local.sh&action=edit"> |
al@303 | 325 <img src="$IMAGES/edit.png" />$(gettext 'Edit script')</a> |
pankso@50 | 326 EOT |
pankso@50 | 327 ;; |
pankso@50 | 328 esac |
pankso@50 | 329 |
pankso@50 | 330 xhtml_footer |
pankso@50 | 331 exit 0 |