tazpanel annotate boot.cgi @ rev 472
boot.cgi: change look of "System logs" page; index.cgi: return "Diff" button back.
author | Aleksej Bobylev <al.bobylev@gmail.com> |
---|---|
date | Thu Apr 30 02:25:59 2015 +0300 (2015-04-30) |
parents | 5d33b8aaf36d |
children | de34ca9d1417 |
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 # |
al@419 | 5 # Copyright (C) 2011-2015 SliTaz GNU/Linux - BSD License |
pankso@50 | 6 # |
pankso@50 | 7 |
al@419 | 8 |
pankso@50 | 9 # Common functions from libtazpanel and source main boot config file. |
al@419 | 10 |
pankso@50 | 11 . lib/libtazpanel |
pankso@50 | 12 . /etc/rcS.conf |
al@419 | 13 get_config |
pascal@81 | 14 header |
pankso@50 | 15 |
al@443 | 16 TITLE=$(_ 'TazPanel - Boot') |
pankso@50 | 17 |
al@419 | 18 |
al@419 | 19 # Print last 40 lines of given file with "more" link |
al@419 | 20 |
al@426 | 21 loghead() { |
al@419 | 22 case $2 in |
al@419 | 23 htmlize) tail -n40 $1 | htmlize;; |
al@426 | 24 *) tail -n40;; |
al@419 | 25 esac |
pascal@411 | 26 [ $(wc -l < $1) -gt 40 ] && cat <<EOT |
al@443 | 27 <hr/><a data-icon="view" href="index.cgi?file=$1">$(_ 'Show more...')</a> |
pascal@411 | 28 EOT |
pascal@411 | 29 } |
pascal@411 | 30 |
al@419 | 31 |
pankso@50 | 32 # |
pankso@50 | 33 # Commands |
pankso@50 | 34 # |
pankso@50 | 35 |
pascal@81 | 36 case " $(GET) " in |
pascal@451 | 37 *\ syslog\ *) |
pascal@451 | 38 logtype="$(GET syslog)" |
pascal@454 | 39 [ "${logtype:-syslog}" == "syslog" ] && logtype=messages |
pascal@451 | 40 xhtml_header |
al@472 | 41 |
al@472 | 42 cat <<EOT |
al@472 | 43 <section> |
al@472 | 44 <header> |
al@472 | 45 $(_ 'System logs') |
al@472 | 46 EOT |
al@472 | 47 |
pascal@453 | 48 [ -w /etc/syslog.conf ] && cat <<EOT |
al@472 | 49 <form action="index.cgi"> |
al@472 | 50 <input type="hidden" name="file" value="/etc/syslog.conf"/> |
al@472 | 51 <button name="action" value="edit" data-icon="edit">syslog.conf</button> |
al@472 | 52 </form> |
pascal@453 | 53 EOT |
al@472 | 54 |
pascal@451 | 55 cat <<EOT |
al@472 | 56 </header> |
pascal@451 | 57 |
pascal@451 | 58 <ul id="tabs"> |
pascal@451 | 59 EOT |
pascal@451 | 60 for i in $(sed '/var\/log/!d;s|.*/log/||' /etc/syslog.conf); do |
pascal@451 | 61 unset act |
pascal@451 | 62 [ "$i" == "$logtype" ] && act=' class="active"' |
pascal@451 | 63 cat <<EOT |
pascal@451 | 64 <li$act><a href="?syslog=$i" title="$(sed "/$i$/!d;s/[\t ].*//" /etc/syslog.conf)">$i</a></li> |
pascal@451 | 65 EOT |
pascal@451 | 66 done |
pascal@451 | 67 cat <<EOT |
pascal@451 | 68 </ul> |
pascal@451 | 69 |
al@472 | 70 <pre style="overflow-x: auto">$(syntax_highlighter kernel < /var/log/$logtype | \ |
al@472 | 71 loghead /var/log/$logtype)</pre> |
pascal@451 | 72 </section> |
pascal@451 | 73 EOT |
pascal@451 | 74 ;; |
al@472 | 75 |
al@472 | 76 |
pascal@130 | 77 *\ log\ *) |
al@419 | 78 unset actboot actslim actxlog actkernel colors |
pascal@411 | 79 case "$(GET log)" in |
al@419 | 80 boot) |
al@419 | 81 actboot=' class="active"' |
al@419 | 82 output="$(filter_taztools_msgs < /var/log/boot.log)" |
al@419 | 83 colors=' class="term log"';; |
al@419 | 84 slim) |
al@419 | 85 actslim=' class="active"' |
al@419 | 86 output="$(loghead /var/log/slim.log htmlize)" ;; |
al@419 | 87 xlog) |
al@419 | 88 actxlog=' class="active"' |
al@419 | 89 output="$(syntax_highlighter xlog < /var/log/Xorg.0.log | loghead /var/log/Xorg.0.log)" ;; |
al@419 | 90 *) |
al@419 | 91 actkernel=' class="active"' |
al@419 | 92 output="$(syntax_highlighter kernel < /var/log/dmesg.log | loghead /var/log/dmesg.log)" ;; |
pascal@411 | 93 esac |
pascal@130 | 94 xhtml_header |
al@419 | 95 cat <<EOT |
al@443 | 96 <h2>$(_ 'Boot log files')</h2> |
al@419 | 97 |
pascal@411 | 98 <ul id="tabs"> |
al@443 | 99 <li$actkernel><a href="?log=kernel">$(_ 'Kernel messages')</a></li> |
al@443 | 100 <li$actboot ><a href="?log=boot" >$(_ 'Boot scripts' )</a></li> |
al@443 | 101 <li$actxlog ><a href="?log=xlog" >$(_ 'X server' )</a></li> |
al@443 | 102 <li$actslim ><a href="?log=slim" >$(_ 'X session' )</a></li> |
pascal@411 | 103 </ul> |
al@419 | 104 |
al@419 | 105 <section> |
al@419 | 106 <div> |
al@472 | 107 <pre$colors style="overflow-x: auto">$output</pre> |
al@419 | 108 </div> |
al@419 | 109 </section> |
pascal@130 | 110 EOT |
pascal@130 | 111 ;; |
al@419 | 112 |
al@419 | 113 |
pascal@81 | 114 *\ daemons\ *) |
pankso@51 | 115 # |
pankso@51 | 116 # Everything until user login |
pankso@51 | 117 # |
al@419 | 118 # Start and stop a daemon. |
al@419 | 119 # (I think we don't need a 'restart' since 2 clicks and you are done) |
pankso@51 | 120 . /etc/rcS.conf |
pankso@51 | 121 xhtml_header |
al@292 | 122 |
al@419 | 123 cat <<EOT |
al@443 | 124 <h2>$(_ 'Manage daemons')</h2> |
al@419 | 125 |
al@443 | 126 <p>$(_ 'Check, start and stop daemons on SliTaz')</p> |
pankso@51 | 127 EOT |
pascal@143 | 128 daemon=$(GET daemons) |
pascal@143 | 129 case "$daemon" in |
pascal@143 | 130 start=*) |
pascal@143 | 131 sleep 1 |
pascal@143 | 132 /etc/init.d/${daemon#start=} start | log ;; |
pascal@143 | 133 stop=*) |
pascal@143 | 134 /etc/init.d/${daemon#stop=} stop | log ;; |
pascal@143 | 135 pid=*) |
pascal@143 | 136 echo "<pre>" |
pascal@383 | 137 ps ww | sed 1q |
pascal@383 | 138 for i in $(echo ${daemon#pid=} | sed 's/%20/ /g'); do |
pascal@383 | 139 ps ww | sed "/^ $i /!d" |
pascal@383 | 140 done |
pascal@143 | 141 echo "</pre>" ;; |
pascal@143 | 142 esac |
al@419 | 143 |
paul@205 | 144 # Daemon list |
al@419 | 145 cat <<EOT |
al@419 | 146 <section> |
al@419 | 147 <table class="zebra wide daemons"> |
al@419 | 148 <thead> |
al@419 | 149 <tr> |
al@443 | 150 <td>$(_ 'Name')</td> |
al@443 | 151 <td>$(_ 'Description')</td> |
al@443 | 152 <td>$(_ 'Configuration')</td> |
al@443 | 153 <td>$(_ 'Status')</td> |
al@443 | 154 <td>$(_ 'Action')</td> |
al@443 | 155 <td>$(_ 'PID')</td> |
al@419 | 156 </tr> |
al@419 | 157 </thead> |
al@419 | 158 <tbody> |
pankso@51 | 159 EOT |
pankso@51 | 160 cd /etc/init.d |
al@419 | 161 list="$(ls | sed -e /.sh/d -e /rc./d -e /RE/d -e /daemon/d -e /firewall/d)" |
al@419 | 162 for name in $list; do |
al@419 | 163 unset pkg pid status SHORT_DESC boot cfg |
pankso@51 | 164 echo '<tr>' |
pankso@51 | 165 # Name |
pankso@51 | 166 echo "<td>$name</td>" |
al@419 | 167 # First check if daemon is started at boottime |
pankso@51 | 168 [ echo "RUN_DAEMONS" | fgrep $name ] && boot="on boot" |
paul@52 | 169 # Standard SliTaz busybox daemons and firewall |
al@303 | 170 echo -n "<td>" |
pascal@364 | 171 grep -qi "^${name}_OPTIONS=" /etc/daemons.conf && cfg="options|$cfg" |
pascal@373 | 172 for i in /etc/slitaz /etc /etc/$name ; do |
pascal@373 | 173 [ -s $i/$name.conf ] && cfg="edit::$i/$name.conf|$cfg" |
pascal@373 | 174 done |
pascal@364 | 175 [ -n "$(which $name)" ] && cfg="man|help|$cfg" |
pankso@51 | 176 case "$name" in |
pankso@51 | 177 firewall) |
al@443 | 178 _ 'SliTaz Firewall with iptable rules' ;; |
pankso@51 | 179 httpd) |
al@443 | 180 _ 'Small and fast web server with CGI support' ;; |
pankso@51 | 181 ntpd) |
al@443 | 182 _ 'Network time protocol daemon' ;; |
pankso@51 | 183 ftpd) |
pascal@364 | 184 cfg="man|help|edit::/etc/inetd.conf" |
al@443 | 185 _ 'Anonymous FTP server' ;; |
pankso@51 | 186 udhcpd) |
al@443 | 187 _ 'Busybox DHCP server' ;; |
pankso@51 | 188 syslogd|klogd) |
al@443 | 189 _ 'Linux Kernel log daemon' ;; |
pankso@76 | 190 crond) |
pascal@364 | 191 # FIXME crontab |
al@443 | 192 _ 'Execute scheduled commands' ;; |
pankso@76 | 193 dnsd) |
pascal@364 | 194 cfg="man|help|edit|options::-d" |
al@443 | 195 _ 'Small static DNS server daemon' ;; |
pankso@76 | 196 tftpd) |
pascal@364 | 197 cfg="man|help|edit::/etc/inetd.conf" |
al@443 | 198 _ 'Transfer a file on tftp request' ;; |
pankso@76 | 199 inetd) |
al@443 | 200 _ 'Listen for network connections and launch programs' ;; |
pankso@76 | 201 zcip) |
pascal@364 | 202 cfg="man|help|edit:Script:/etc/zcip.script|options::eth0 /etc/zcip.script" |
al@443 | 203 _ 'Manage a ZeroConf IPv4 link-local address' ;; |
pankso@51 | 204 *) |
paul@205 | 205 # Description from receipt |
pankso@51 | 206 [ -d "$LOCALSTATE/installed/$name" ] && pkg=$name |
pankso@51 | 207 [ -d "$LOCALSTATE/installed/${name%d}" ] && pkg=${name%d} |
pankso@51 | 208 [ -d "$LOCALSTATE/installed/${name}-pam" ] && pkg=${name}-pam |
pankso@51 | 209 if [ "$pkg" ]; then |
pascal@364 | 210 unset SHORT_DESC TAZPANEL_DAEMON |
al@419 | 211 #FIXME $PKGS_DB |
pankso@51 | 212 . $LOCALSTATE/installed/$pkg/receipt |
al@303 | 213 echo -n "$SHORT_DESC" |
pascal@366 | 214 cfg="${TAZPANEL_DAEMON:-$cfg|web::$WEB_SITE}" |
pankso@51 | 215 else |
al@303 | 216 echo -n "----" |
pankso@51 | 217 fi ;; |
pankso@51 | 218 esac |
al@303 | 219 echo "</td>" |
paul@205 | 220 # Attempt to get daemon status |
al@303 | 221 pidfile=$(find /var/run -name *$name*.pid) |
al@303 | 222 [ "$pidfile" ] && pid=$(cat $pidfile) |
al@419 | 223 # Dbus |
al@303 | 224 [ -f /var/run/${name}/pid ] && pid=$(cat /var/run/${name}/pid) |
al@419 | 225 # Apache |
al@303 | 226 [ "$name" = "apache" ] && pid=$(cat /var/run/$name/httpd.pid) |
paul@205 | 227 # Pidof works for many daemons |
al@303 | 228 [ "$pid" ] || pid=$(pidof $name) |
al@419 | 229 |
al@419 | 230 echo -n "<td style='white-space: nowrap'>" |
al@419 | 231 if [ -n "$cfg" ]; then |
pascal@364 | 232 IFS="|" |
pascal@364 | 233 for i in $cfg ; do |
pascal@364 | 234 IFS=":" |
pascal@364 | 235 set -- $i |
pascal@364 | 236 case "$1" in |
al@419 | 237 edit) |
al@419 | 238 cat <<EOT |
al@419 | 239 <a href="index.cgi?file=${3:-/etc/$name.conf}&action=edit" title="${2:-$name Configuration}" data-img="conf"></a> |
pascal@364 | 240 EOT |
pascal@364 | 241 ;; |
pascal@364 | 242 options) |
al@419 | 243 key=$(echo -n $name | tr [a-z] [A-Z])_OPTIONS |
pascal@364 | 244 cat <<EOT |
al@419 | 245 <a href="index.cgi?file=/etc/daemons.conf&action=setvar&var=$key&default=$3" title="${2:-$key}" data-img="opt"></a> |
pascal@364 | 246 EOT |
pascal@364 | 247 ;; |
al@419 | 248 man) |
al@419 | 249 cat <<EOT |
al@419 | 250 <a href="index.cgi?exec=man ${3:-$name}&back=boot.cgi%3Fdaemons" title="${2:-$name Manual}" data-img="man"></a> |
pascal@364 | 251 EOT |
pascal@364 | 252 ;; |
al@419 | 253 help) |
al@419 | 254 help='--help' |
al@419 | 255 case $name in |
al@419 | 256 cupsd|dropbear|gpm|slim|wpa_supplicant) help='-h' |
al@419 | 257 esac |
al@419 | 258 cat <<EOT |
al@419 | 259 <a href="index.cgi?exec=$(which ${3:-$name}) $help&back=boot.cgi%3Fdaemons" title="${2:-$name Help}" data-img="help"></a> |
pascal@364 | 260 EOT |
pascal@364 | 261 ;; |
pascal@364 | 262 web) cat <<EOT |
al@419 | 263 <a href="${i#$1:$2:}" title="${2:-$name website:} ${i#$1:$2:}" target="_blank" data-img="web"></a> |
pascal@364 | 264 EOT |
pascal@364 | 265 ;; |
pascal@364 | 266 esac |
pascal@364 | 267 done |
pascal@364 | 268 fi |
pascal@364 | 269 echo "</td>" |
pankso@51 | 270 if [ "$pid" ]; then |
al@419 | 271 cat <<EOT |
al@443 | 272 <td><span title="$(_ 'Started')" data-img="on"></span></td> |
al@443 | 273 <td><a href="?daemons=stop=$name" title="$(_ 'Stop')" data-img="stop"></a></td> |
pascal@143 | 274 <td> |
pascal@143 | 275 EOT |
pascal@143 | 276 for i in $pid; do |
al@419 | 277 cat <<EOT |
al@406 | 278 <a href="?daemons=pid=$i">$i</a> |
pascal@143 | 279 EOT |
pascal@143 | 280 done |
pankso@51 | 281 else |
al@419 | 282 cat <<EOT |
al@443 | 283 <td><span title="$(_ 'Stopped')" data-img="off"></span></td> |
al@443 | 284 <td><a href="?daemons=start=$name" title="$(_ 'Start')" data-img="start"></a></td> |
pascal@143 | 285 <td>----- |
pascal@143 | 286 EOT |
pankso@51 | 287 fi |
pascal@143 | 288 echo '</td></tr>' |
pankso@51 | 289 done |
al@419 | 290 echo '</thead></table></section>' ;; |
al@419 | 291 |
al@303 | 292 |
pankso@151 | 293 *\ grub\ *) |
al@303 | 294 GRUBMENU="/boot/grub/menu.lst" |
pankso@151 | 295 if [ "$(GET splash)" ]; then |
pankso@151 | 296 default=$(GET default) |
pankso@151 | 297 timeout=$(GET timeout) |
pankso@151 | 298 splash=$(GET splash) |
pankso@151 | 299 sed -i \ |
al@303 | 300 -e s"|default .*|default $default # new|" \ |
al@303 | 301 -e s"|timeout .*|timeout $timeout|" \ |
al@303 | 302 -e s"|splashimage=.*|splashimage=$splash|" \ |
al@303 | 303 $GRUBMENU |
pankso@151 | 304 fi |
al@419 | 305 default=$(cat $GRUBMENU | grep ^default | cut -d' ' -f2) |
al@419 | 306 timeout=$(cat $GRUBMENU | grep ^timeout | cut -d' ' -f2) |
al@419 | 307 splash=$(cat $GRUBMENU | grep ^splashimage | cut -d' ' -f2) |
pankso@151 | 308 xhtml_header |
al@419 | 309 cat <<EOT |
al@443 | 310 <h2>$(_ 'GRUB Boot loader')</h2> |
al@303 | 311 |
al@443 | 312 <p>$(_ 'The first application started when the computer powers on')</p> |
pankso@151 | 313 |
al@419 | 314 <form class="wide"> |
al@419 | 315 <section> |
al@419 | 316 <div> |
al@419 | 317 <input type="hidden" name="grub"/> |
al@419 | 318 <table> |
al@443 | 319 <tr><td>$(_ 'Default entry:')</td> |
al@419 | 320 <td><input type="text" name="default" value="${default##*=}"/></td></tr> |
al@443 | 321 <tr><td>$(_ 'Timeout:')</td> |
al@419 | 322 <td><input type="text" name="timeout" value="${timeout##*=}"/></td></tr> |
al@443 | 323 <tr><td>$(_ 'Splash image:')</td> |
al@419 | 324 <td><input type="text" name="splash" value="${splash##*=}" size="40"/></td></tr> |
al@419 | 325 </table> |
al@419 | 326 </div> |
al@419 | 327 <footer> |
al@443 | 328 <button type="submit" data-icon="ok">$(_ 'Change')</button> |
al@419 | 329 </footer> |
al@419 | 330 </section> |
pankso@151 | 331 </form> |
pankso@151 | 332 |
al@419 | 333 <form action="index.cgi"> |
al@419 | 334 <input type="hidden" name="file" value="$GRUBMENU"/> |
al@443 | 335 <button data-icon="text">$(_ 'View or edit menu.lst')</button> |
al@419 | 336 </form> |
al@419 | 337 |
al@419 | 338 |
al@419 | 339 <section> |
al@443 | 340 <header>$(_ 'Boot entries')</header> |
al@419 | 341 <div> |
pankso@151 | 342 EOT |
al@303 | 343 |
al@303 | 344 |
al@419 | 345 menu=$(tail -q -n +$(grep -n ^title $GRUBMENU | head -n1 | cut -d: -f1) $GRUBMENU | \ |
al@419 | 346 sed -e "s|^$||g" | \ |
al@443 | 347 sed -e "s|^title|</pre></div>\n</section>\n\n<section>\n\t<header>$(_ 'Entry') #</header>\n<div><pre style=\"white-space:pre-wrap\">\0|g" | \ |
al@419 | 348 sed '/^[ \t]*$/d' | \ |
al@419 | 349 tail -q -n +2)"</pre>" |
al@303 | 350 |
pankso@151 | 351 entry='-1' |
al@303 | 352 echo "$menu" | while read line |
pankso@151 | 353 do |
al@419 | 354 if [ -n "$(echo $line | grep '#</header>')" ]; then |
al@303 | 355 entry=$(($entry + 1)) |
al@303 | 356 fi |
al@419 | 357 echo $line | sed "s|#</header>|$entry</header>|" |
pankso@151 | 358 done |
al@303 | 359 |
al@419 | 360 echo '</section>' |
al@419 | 361 |
al@419 | 362 |
pankso@151 | 363 # Here we could check if an entry for gpxe is present if not |
pankso@151 | 364 # display a form to add it. |
al@419 | 365 [ -f "/boot/gpxe" ] && cat <<EOT |
al@419 | 366 <section> |
al@419 | 367 <header>gPXE</header> |
al@443 | 368 <div>$(_ 'Web boot is available with gPXE')</div> |
al@419 | 369 </section> |
al@419 | 370 EOT |
pankso@151 | 371 ;; |
al@419 | 372 |
al@419 | 373 |
pascal@454 | 374 *\ iso\ *) |
pascal@454 | 375 xhtml_header |
al@456 | 376 iso=$(POST iso); [ -s "$iso" ] || unset iso |
al@456 | 377 action=$(POST action); [ "$action" ] || action=$(GET action) |
pascal@454 | 378 workdir=$(POST workdir) |
pascal@454 | 379 [ -d $workdir ] || workdir=$(dirname $workdir) |
pascal@454 | 380 [ -w $workdir -a "$workdir" ] || workdir=/tmp |
al@456 | 381 |
pascal@454 | 382 echo "<h2>$(_ 'ISO mine')</h2>" |
al@456 | 383 |
al@456 | 384 [ "$iso" ] || msg err 'Invalid ISO image.' |
al@456 | 385 |
pascal@454 | 386 if [ "$iso" -a "$action" -a "$action" != "nop" ]; then |
pascal@454 | 387 case "$action" in |
al@456 | 388 install*) dev=$(POST instdev) ;; |
al@456 | 389 *) dev=$(POST usbkeydev) ;; |
pascal@454 | 390 esac |
pascal@455 | 391 cd $workdir |
pascal@454 | 392 cat <<EOT |
pascal@454 | 393 <section> |
pascal@454 | 394 <pre> |
pascal@455 | 395 $(taziso $iso $action $dev 2>&1) |
pascal@454 | 396 </pre> |
pascal@454 | 397 </section> |
pascal@454 | 398 EOT |
pascal@454 | 399 fi |
pascal@454 | 400 cat <<EOT |
pascal@454 | 401 <section> |
al@456 | 402 <form method="post" action="?iso" class="wide"> |
pascal@454 | 403 EOT |
pascal@454 | 404 cat <<EOT |
al@456 | 405 <table> |
al@456 | 406 <tr><td>ISO image file full path |
al@456 | 407 <span data-img="info" title="set /dev/cdrom for a physical CD-ROM"></span> |
al@456 | 408 </td> |
al@456 | 409 <td><input type="text" name="iso" value="$iso" size="50"/></td></tr> |
al@456 | 410 <tr><td>Working directory</td> |
pascal@458 | 411 <td><input type="text" name="workdir" value="$workdir" size="50"/></td></tr> |
pascal@458 | 412 <tr><td>Target partition |
pascal@458 | 413 <span data-img="info" title="For hard disk installation only. Will create /slitaz tree and keep other files. No partitioning and no formatting."></span> |
pascal@458 | 414 </td> |
al@456 | 415 <td><select name="instdev"> |
al@456 | 416 <option value="/dev/null">Choose a partition (optional)</option> |
pascal@454 | 417 EOT |
pascal@458 | 418 blkid | grep -iE "(msdos|vfat|ntfs|ext[234]|xfs|btrfs)" | \ |
pascal@458 | 419 sed 's|^/dev/\(.*\):.*LABEL="\([^"]*\).* TYPE="\([^"]*\).*|\1 "\2" \3|' | \ |
pascal@458 | 420 while read dev label type; do |
pascal@454 | 421 echo -n "<option value=\"/dev/$dev\">/dev/$dev $label " |
pascal@459 | 422 echo "$(blk2h < /sys/block/${dev:0:3}/$dev/size) $type</option>" |
pascal@454 | 423 done |
pascal@454 | 424 cat <<EOT |
al@456 | 425 </select></td></tr> |
pascal@458 | 426 <tr><td>USB key device |
pascal@458 | 427 <span data-img="info" title="For USB boot key only. Will erase the full device."></span> |
pascal@458 | 428 </td> |
al@456 | 429 <td><select name="usbkeydev"> |
al@456 | 430 <option value="/dev/null">Choose a USB key (optional)</option> |
pascal@454 | 431 EOT |
pascal@454 | 432 grep -l 1 /sys/block/*/removable | \ |
pascal@454 | 433 sed 's|/sys/block/\(.*\)/removable|\1|' | while read dev; do |
pascal@454 | 434 grep -qs 1 /sys/block/$DEV/ro && continue |
pascal@454 | 435 echo -n "<option value=\"/dev/$dev\">/dev/$dev " |
pascal@459 | 436 echo "$(blk2h < /sys/block/$dev/size) $(cat \ |
al@456 | 437 /sys/block/$i/device/model 2>/dev/null)</option>" |
pascal@454 | 438 done |
pascal@454 | 439 cat <<EOT |
al@456 | 440 </select></td></tr> |
al@456 | 441 </table> |
pascal@454 | 442 <footer> |
pascal@454 | 443 EOT |
al@456 | 444 |
pascal@454 | 445 if [ "$iso" ]; then |
pascal@454 | 446 cat <<EOT |
pascal@454 | 447 <select name="action"> |
pascal@454 | 448 <option value="nop">Choose an action</option> |
al@456 | 449 $(taziso $iso list | sed -e \ |
al@456 | 450 's/"\(.*\)"[\t ]*"\(.*\)"/<option value="\1\">\2<\/option>/' -e \ |
al@456 | 451 "s|value=\"$action\"|& selected|") |
pascal@454 | 452 </select> |
pascal@454 | 453 EOT |
pascal@454 | 454 elif [ "$action" ]; then |
pascal@454 | 455 cat <<EOT |
pascal@454 | 456 <input type="hidden" name="action" value="$action" /> |
pascal@454 | 457 EOT |
pascal@454 | 458 fi |
al@456 | 459 |
pascal@454 | 460 cat <<EOT |
pascal@454 | 461 <button data-icon="cd" name="mine">Mine</button> |
pascal@454 | 462 </footer> |
pascal@454 | 463 </form> |
pascal@454 | 464 </section> |
pascal@454 | 465 EOT |
pascal@454 | 466 ;; |
al@456 | 467 |
al@456 | 468 |
pankso@50 | 469 *) |
pankso@50 | 470 # |
pankso@51 | 471 # Default content with summary |
pankso@50 | 472 # |
pankso@50 | 473 . /etc/rcS.conf |
pankso@50 | 474 xhtml_header |
al@419 | 475 cat <<EOT |
al@443 | 476 <h2>$(_ 'Boot & Start services')</h2> |
pankso@51 | 477 |
al@443 | 478 <p>$(_ 'Everything that happens before user login')</p> |
pankso@57 | 479 |
al@419 | 480 <form> |
al@443 | 481 <button name="log" data-icon="logs" >$(_ 'Boot logs')</button> |
pascal@451 | 482 <button name="syslog" data-icon="logs" >$(_ 'System logs')</button> |
al@443 | 483 <button name="daemons" data-icon="daemons" data-root>$(_ 'Manage daemons')</button> |
pascal@434 | 484 EOT |
pascal@454 | 485 [ "$REMOTE_USER" == "root" -a -x /usr/bin/taziso ] && cat <<EOT |
pascal@454 | 486 <button name="iso" data-icon="cd" >$(_ 'ISO mine')</button> |
pascal@454 | 487 EOT |
pascal@434 | 488 [ -w /boot/grub/menu.lst ] && cat <<EOT |
al@443 | 489 <button name="grub" data-icon="grub" >$(_ 'Boot loader')</button> |
pascal@434 | 490 EOT |
pascal@434 | 491 cat <<EOT |
al@419 | 492 </form> |
al@303 | 493 |
al@303 | 494 |
al@419 | 495 <section> |
al@443 | 496 <header>$(_ 'Configuration files')</header> |
al@419 | 497 <form action="index.cgi" class="wide"> |
al@419 | 498 <table> |
al@443 | 499 <tr><td>$(_ 'Main configuration file:') <b>rcS.conf</b></td> |
al@443 | 500 <td><button name="file" value="/etc/rcS.conf" data-icon="view">$(_ 'View')</button></td></tr> |
al@443 | 501 <tr><td>$(_ 'Login manager settings:') <b>slim.conf</b></td> |
al@443 | 502 <td><button name="file" value="/etc/slim.conf" data-icon="view">$(_ 'View')</button></td></tr> |
al@419 | 503 </table> |
al@419 | 504 </form> |
al@419 | 505 </section> |
al@303 | 506 |
al@303 | 507 |
pascal@430 | 508 <section style="overflow-x: auto"> |
al@443 | 509 <header>$(_ 'Kernel cmdline')</header> |
al@426 | 510 <pre>$(cat /proc/cmdline)</pre> |
al@419 | 511 </section> |
al@419 | 512 |
al@419 | 513 |
al@419 | 514 <section> |
al@426 | 515 <header> |
al@443 | 516 $(_ 'Local startup commands') |
al@419 | 517 <form action="index.cgi"> |
al@419 | 518 <input type="hidden" name="file" value="/etc/init.d/local.sh"/> |
pascal@434 | 519 EOT |
pascal@434 | 520 [ -w /etc/init.d/local.sh ] && cat <<EOT |
al@443 | 521 <button name="action" value="edit" data-icon="edit">$(_ 'Edit')</button> |
pascal@434 | 522 EOT |
pascal@434 | 523 cat <<EOT |
al@419 | 524 </form> |
al@426 | 525 </header> |
al@472 | 526 <pre><code class="language-bash">$(cat /etc/init.d/local.sh | htmlize)</code></pre> |
al@419 | 527 </section> |
pankso@50 | 528 EOT |
pankso@50 | 529 ;; |
pankso@50 | 530 esac |
pankso@50 | 531 |
pankso@50 | 532 xhtml_footer |
pankso@50 | 533 exit 0 |