From f2137fec9261e79f89ea2877e40bed72c3c70808 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Wed, 2 Jul 2008 15:08:15 +0000
Subject: Started modifying opennhrp to simplify, use new cfes, ...

git-svn-id: svn://svn.alpinelinux.org/acf/opennhrp/trunk@1265 ab2d0c66-481e-0410-8bed-d214d4d58bed
---
 opennhrp-status-html.lsp | 71 ------------------------------------------------
 1 file changed, 71 deletions(-)
 delete mode 100644 opennhrp-status-html.lsp

(limited to 'opennhrp-status-html.lsp')

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>
-
-- 
cgit v1.2.3