Rewrite of DNScache.

git-svn-id: svn://svn.alpinelinux.org/acf/dnscache/trunk@1262 ab2d0c66-481e-0410-8bed-d214d4d58bed

1 files changed, 7 insertions, 37 deletions

diff --git a/dnscache-status-html.lsp b/dnscache-status-html.lsp
index 40e4ee4..05b4a7a 100644
--- a/dnscache-status-html.lsp
+++ b/dnscache-status-html.lsp
@@ -1,49 +1,19 @@
-<? local form = ... 
+<? local data = ... 
 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(html.cfe_unpack(data))
 io.write("</span>")
 --]]
 ?>
 
-<H1>SYSTEM INFO</H1>
+<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 
-local tags = { "ip", "cachesize", }
-displayinfo(myform,tags,"viewonly")
-?>
-
-<? 
-local myform = form.status.servers
-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.value 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/status/network-idle.png' width='16' height='16' alt> " .. v .. "</TD><TD STYLE='border:none;'></TD></TR>\n")
-	for k1,v1 in pairs(myform.option[v]) do
-		io.write("\n\t\t\t<TR STYLE='padding-bottom:10px;'><TD WIDTH='150px' STYLE='padding-left:30px;border:none;'>"..v1)
-	end
-
-	io.write("\t\t\t</TABLE>")
-end
-io.write("\t\t</DD>\n")
+<?
+displayitem(data.value.status)
+displayitem(data.value.version)
+displayitem(data.value.autostart)
 ?>
-
-
 </DL>
-