diff options
author | Ted Trask <ttrask01@yahoo.com> | 2008-07-02 15:08:15 +0000 |
---|---|---|
committer | Ted Trask <ttrask01@yahoo.com> | 2008-07-02 15:08:15 +0000 |
commit | f2137fec9261e79f89ea2877e40bed72c3c70808 (patch) | |
tree | 59c64a5335976c5eba04c2746b734b947077922e /opennhrp-status-html.lsp | |
parent | d00a84674c3d2e4d6b2b6ad870dbed7515a62678 (diff) | |
download | acf-opennhrp-f2137fec9261e79f89ea2877e40bed72c3c70808.tar.bz2 acf-opennhrp-f2137fec9261e79f89ea2877e40bed72c3c70808.tar.xz |
Started modifying opennhrp to simplify, use new cfes, ...
git-svn-id: svn://svn.alpinelinux.org/acf/opennhrp/trunk@1265 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'opennhrp-status-html.lsp')
-rw-r--r-- | opennhrp-status-html.lsp | 71 |
1 files changed, 0 insertions, 71 deletions
diff --git a/opennhrp-status-html.lsp b/opennhrp-status-html.lsp deleted file mode 100644 index 462e8bd..0000000 --- a/opennhrp-status-html.lsp +++ /dev/null @@ -1,71 +0,0 @@ -<? local form = ... -require("viewfunctions") -?> -<? ---[[ DEBUG INFORMATION -io.write("<H1>DEBUGGING</H1><span style='color:red'><H2>DEBUG INFO: CFE</H2>") -io.write(html.cfe_unpack(form)) -io.write("</span>") ---]] -?> - -<H1>SYSTEM INFO</H1> -<DL> -<? -local myform = form.status -local tags = { "status", "version", "autostart", } -displayinfo(myform,tags,"viewonly") -?> -</DL> - -<H2>PROGRAM SPECIFIC OPTIONS/INFORMATION</H2> -<DL> -<? - -local myform = form.status.show -io.write("\t<DT") -if (myform.errtxt) then io.write(" class='error'") end -io.write(">" .. myform.label .. "</DT>\n") -io.write("\t\t<DD>\n") -for k,v in pairs(myform.option or {}) do - io.write("\t\t\t<TABLE STYLE='margin-bottom:10px;'>") - io.write("\n\t\t\t<TR><TD STYLE='font-weight:bold;border:none;'><IMG SRC='/skins/static/tango/16x16/places/network-server.png' width='16' height='16' alt> " .. k .. "</TD><TD STYLE='border:none;'></TD></TR>\n") - for k1,v1 in pairs(v) do - io.write("\n\t\t\t<TR STYLE='padding-bottom:10px;'><TD WIDTH='150px' STYLE='font-weight:bold;padding-left:20px;border:none;'><IMG SRC='/skins/static/tango/16x16/status/") - - if (v1) and (v1['Type']) and (v1['Type']['value']) and (string.lower(v1['Type']['value']) == "incomplete") then - io.write("network-error") - elseif (v1) and (v1['Type']) and (v1['Type']['value']) and (string.lower(v1['Type']['value']) == "negative") then - io.write("network-offline") - elseif (v1) and (v1['Flags']) and (v1['Flags']['value']) and (string.lower(v1['Flags']['value']) == "up") then - io.write("network-idle") - elseif (v1) and (v1['Flags']) and (v1['Flags']['value']) and (string.lower(v1['Flags']['value']) == "used up") then - io.write("network-transmit-receive") - elseif (v1) and (v1['Flags']) and (v1['Flags']['value']) and (string.lower(v1['Flags']['value']) == "used up") then - io.write("network-offline") - else - io.write("network-error") - end - io.write(".png' width='16' height='16' title='" .. (v1['Type']['descr'] or "") .. "'> " .. v1["Protocol-Address"]['value'] .. "</TD><TD STYLE='font-weight:bold;border:none;'></TD></TR>\n") - for k2,v2 in pairs(v1) do - ----[[ - if (k2) and not ((string.lower(k2) == "protocol-address") or - (string.lower(k2) == "interface")) then - io.write("<TR><TD STYLE='font-weight:bold;padding-left:40px;border:none;'>"..k2.."</TD><TD STYLE='border:none;'>"..v2['value']) - if (v2['descr']) and (#v2['descr'] > 0) then - io.write(" <I>(" .. (v2['descr'] or "") .. ")</I>") - end - io.write("</TD></TR>\n") - end ---]] - end - - end - - io.write("\t\t\t</TABLE>") -end -io.write("\t\t</DD>\n") -?> -</DL> - |