add VFD to status

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

CONTROL/control

@@ -1,7 +1,7 @@
 Package: webif
 Priority: optional
 Section: web
-Version: 1.4.0-11
+Version: 1.4.0-12
 Architecture: mipsel
 Maintainer: af123@hpkg.tv
 Depends: tcpfix,webif-channelicons(>=1.1.25),lighttpd(>=1.4.39-1),jim(>=0.77),jim-oo(>=0.77),jim-sqlite3(>=0.76),jim-cgi(>=0.7-1),jim-binary(>=0.76),service-control(>=2.3),busybox(>=1.20.2-1),lsof(>=4.87),epg(>=1.2.5),hmt(>=2.0.10),ssmtp,cron-daemon(>=1.18.3-3),at(>=3.1.18),anacron,trm(>=1.1),openssl-command,nicesplice,id3v2,file,rsvsync(>=1.1.10),webif-charts(>=1.2-1),stripts(>=1.2.5-3),tmenu(>=1.21-2),ffmpeg,id3v2,multienv(>=1.6),tcpping(>=1.1),e2fsprogs,wireless-tools(>=29-1),dbupdate,recmon(>=2.0.7),hwctl,nugget(>=0.95),sqlite3(>=3.15.1)

webif/cgi-bin/status.jim

@@ -348,6 +348,13 @@ foreach event $events {
 	}
 }
 
+######################################################################
+# VFD
+
+if {[file exists /tmp/.vfd] && $runmode ne "cgi"} {
+	lappend output "VFD: [file read /tmp/.vfd]"
+}
+
 ######################################################################
 # Idle Time
 

webif/lib/bin/genthumb

@@ -0,0 +1,16 @@
+#!/mod/bin/jimsh
+
+source /mod/webif/lib/setup
+require system.class ts.class
+
+proc generate {ts} {
+	set rfile [file rootname [$ts get file]]
+	if {[file exists "$rfile.thm"]} return
+	if {[$ts flag ODEncrypted]} return
+	if {[$ts flag Radio]} return
+	puts "Generating thumbnail for $rfile"
+	$ts mkthm 1
+}
+
+ts iterate [lambda {ts} { generate $ts }]
+

webif/lib/ts.class

@@ -354,6 +354,7 @@ ts method mkbmp {{offset 0} {ext ""}} {
 ts method mkthm {{offset 0}} {
 	if {![$self mkbmp $offset]} { return 0 }
 	set bfile [file rootname $file]
+	# Trim the bitmap header from the start of the file
 	if {[catch {
 	    exec /bin/dd if=$bfile.bmp of=$bfile.thm~ bs=54 skip=1
 	    } msg]} {