improve status

git-svn-id: file:///root/webif/svn/humax/pkg/src/webif/trunk@929 2a923420-c742-0410-a762-8d5b09965624

CONTROL/control

@@ -1,7 +1,7 @@
 Package: webif
 Priority: optional
 Section: web
-Version: 0.9.5-3
+Version: 0.9.6
 Architecture: mipsel
 Maintainer: af123@hummypkg.org.uk
 Depends: webif-channelicons,mongoose(>=3.0-7),jim(>=0.73-1),jim-oo,jim-sqlite3(>=0.73),jim-cgi(>=0.5),service-control(>=1.2),busybox(>=1.19.3-1),lsof,epg(>=1.0.9),hmt(>=1.1.6),ssmtp,anacron,trm,openssl-command,nicesplice,id3v2,file,rsvsync(>=1.0.1)

var/mongoose/cgi-bin/status.jim

@@ -22,8 +22,12 @@ proc get_data {} {
 		foreach line [split $data "\n"] {
 			regsub -all -- {[[:space:]]+} $line " " line
 			set name [file rootname [file tail $line]]
-			set size [lindex [split $line " "] 6]
-			set ret($name) $size
+			if {[dict exists $ret $name]} {
+				set ret($name) -1
+			} else {
+				set size [lindex [split $line " "] 6]
+				set ret($name) $size
+			}
 		}
 	}
 	return $ret
@@ -40,7 +44,12 @@ if {[llength $data]} {
 	foreach name [array names ndata] {
 		if {![dict exists $seen $name]} { set seen($name) 0 }
 		if {![dict exists $data $name]} { set data($name) 0 }
-		if {$ndata($name) > $data($name) && $seen($name) < 1} {
+		if {$ndata($name) == -1} {
+			incr rec
+			incr play
+			set mode "Chase Playing"
+			set icon "745_1_11_Video_3REC_Live.png"
+		} elseif {$ndata($name) > $data($name) && $seen($name) < 1} {
 			incr rec
 			set mode "Recording"
 			set icon "745_1_11_Video_1REC.png"
@@ -53,7 +62,7 @@ if {[llength $data]} {
 		incr seen($name)
 
 		lappend output "<img class=va src=/images/$icon><span class=va>
-		    $mode&nbsp;$name</span>"
+		    $mode&nbsp;<i>$name</i></span>"
 	}
 }
 
@@ -85,10 +94,16 @@ if {![system instandby] && $play < 1} {
 			
 		lappend output "[epg channelicon $name 30 \
 		    {vertical-align: middle; padding: 0 4px 0 2px}]
-		    <span class=va> Watching $lcn: $name $prog</span>"
+		    <span class=va> Watching <i>$lcn: $name $prog</i></span>"
 	}
 }
 
+if {[system instandby]} {
+	lappend output "<img class=va width=28 style=\"padding: 0 4px\"
+	    src=/img/standby.png>
+	    <span class=va>System is in standby.</span>"
+}
+
 if {[llength $output]} {
 	puts [join $output "<br>"]
 }