prpr/webif
1
0
Fork 0
forked from hummypkg/webif
Code Issues Pull Requests Projects Releases 1 Wiki Activity

fix disk page

Browse Source 
git-svn-id: file:///root/webif/svn/pkg/webif/trunk@3379 2a923420-c742-0410-a762-8d5b09965624
This commit is contained in:
hummypkg 2016-11-22 20:28:45 +00:00
parent 1c9d1c75f3
commit bb80ba1b83
3 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
CONTROL/control
View File

@ -1,7 +1,7 @@
Package: webif
Priority: optional
Section: web
Version: 1.3.3-1
Version: 1.3.3-2
Architecture: mipsel
Maintainer: af123@hpkg.tv
Depends: tcpfix,webif-channelicons(>=1.1.24),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.3),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.9),webif-charts(>=1.2-1),stripts(>=1.2.5-3),tmenu(>=1.08),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)

3
webif/html/diag/disk.jim
View File

@ -100,8 +100,10 @@ foreach line [split [exec /bin/smartctl -A $device] "\n"] {
regsub -all -- {[[:space:]]+} $line " " line
regsub -all -- {^[[:space:]]+} $line "" line
if {[incr i] < 8} continue
if {$line eq ""} continue
lassign [split $line] \
id name flags val worst thresh type updated when rval
if {$id eq ""} continue
set class normal
switch $id {
5 {
@ -125,6 +127,7 @@ foreach line [split [exec /bin/smartctl -A $device] "\n"] {
set class redshade
}
set left ""
if {$flags eq ""} { set flags 0 }
if {$id ni $nolife &&
[expr $flags & 0x18] == 0x10 && $val == $worst && $val <= 100 &&
$thresh < 100} {

5
webif/lib/setup
View File

@ -55,7 +55,10 @@ if {![exists -proc require]} {
proc ::mws::setpagetitle {} {
global env
if {[info exists ::mws::pagetitle]} return
if {![dict exists $env REQUEST_URI]} return
if {![dict exists $env REQUEST_URI]} {
set ::mws::pagetitle "CLI"
return
}
if {![info exists ::mws::pagetag]} {
switch -glob -- $env(REQUEST_URI) {
"/sched/*" { set ::mws::pagetag "Schedule" }