summaryrefslogtreecommitdiffstats
path: root/ipsec-tools-status-html.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'ipsec-tools-status-html.lsp')
-rw-r--r--ipsec-tools-status-html.lsp86
1 files changed, 0 insertions, 86 deletions
diff --git a/ipsec-tools-status-html.lsp b/ipsec-tools-status-html.lsp
deleted file mode 100644
index 34b1248..0000000
--- a/ipsec-tools-status-html.lsp
+++ /dev/null
@@ -1,86 +0,0 @@
-<? local form = ... ?>
-<?
---[[ 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>")
---]]
-?>
-
-<?
-function informationform(myform,tags)
- for k,v in pairs(tags) do
- if (myform[v]) then
- local val = myform[v]
- io.write("\t<DT")
- if (#val.errtxt > 0) then io.write(" class='error'") end
- io.write(">" .. val.label .. "</DT>\n")
-
- io.write("\t\t<DD>" .. val.value .. "\n")
- if (val.descr) and (#val.descr > 0) then io.write("\t\t<P CLASS='descr'>" .. string.gsub(val.descr, "\n", "<BR>") .. "</P>\n") end
- if (#val.errtxt > 0) then io.write("\t\t<P CLASS='error'>" .. string.gsub(val.errtxt, "\n", "<BR>") .. "</P>\n") end
- io.write("\t\t</DD>\n")
- end
- end
-end
-?>
-
-<H1>SYSTEM INFO</H1>
-<DL>
-<?
-local myform = form.status
-local tags = { "status", "version", "autostart", }
-informationform(myform,tags)
-?>
-</DL>
-
-<H2>PROGRAM SPECIFIC OPTIONS/INFORMATION</H2>
-<DL>
-<?
-local myform = form.status.show_isakmp
-io.write("\t<DT")
-if (#myform.errtxt > 0) then io.write(" class='error'") end
-io.write(">" .. myform.label .. "</DT>\n")
-
-io.write("\t\t<DD><PRE>" .. myform.value .. "</PRE>\n")
-if (myform.descr) and (#myform.descr > 0) then io.write("\t\t<P CLASS='descr'>" .. string.gsub(myform.descr, "\n", "<BR>") .. "</P>\n") end
-if (#myform.errtxt > 0) then io.write("\t\t<P CLASS='error'>" .. string.gsub(myform.errtxt, "\n", "<BR>") .. "</P>\n") end
-io.write("\t\t</DD>\n")
-
-?>
-<?
-local myform = form.status.show_esp
-io.write("\t<DT")
-if (#myform.errtxt > 0) then io.write(" class='error'") end
-io.write(">" .. myform.label .. "</DT>\n")
-
-io.write("\t\t<DD><PRE>" .. myform.value .. "</PRE>\n")
-if (myform.descr) and (#myform.descr > 0) then io.write("\t\t<P CLASS='descr'>" .. string.gsub(myform.descr, "\n", "<BR>") .. "</P>\n") end
-if (#myform.errtxt > 0) then io.write("\t\t<P CLASS='error'>" .. string.gsub(myform.errtxt, "\n", "<BR>") .. "</P>\n") end
-io.write("\t\t</DD>\n")
-
-?>
-<?
-local myform = form.status.show_ah
-io.write("\t<DT")
-if (#myform.errtxt > 0) then io.write(" class='error'") end
-io.write(">" .. myform.label .. "</DT>\n")
-
-io.write("\t\t<DD><PRE>" .. myform.value .. "</PRE>\n")
-if (myform.descr) and (#myform.descr > 0) then io.write("\t\t<P CLASS='descr'>" .. string.gsub(myform.descr, "\n", "<BR>") .. "</P>\n") end
-if (#myform.errtxt > 0) then io.write("\t\t<P CLASS='error'>" .. string.gsub(myform.errtxt, "\n", "<BR>") .. "</P>\n") end
-io.write("\t\t</DD>\n")
-
-?>
-
-</DL>
-
-
-<?
---[[ 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>")
---]]
-?>
-