summaryrefslogtreecommitdiffstats
path: root/openvpn-read-html.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'openvpn-read-html.lsp')
-rw-r--r--openvpn-read-html.lsp33
1 files changed, 33 insertions, 0 deletions
diff --git a/openvpn-read-html.lsp b/openvpn-read-html.lsp
index 58c079d..75215ef 100644
--- a/openvpn-read-html.lsp
+++ b/openvpn-read-html.lsp
@@ -3,6 +3,39 @@
<html>
<body>
<h1>Welcome</h1>
+
+
+<? --[[ DEBUG INFORMATION...?>
+<span style='color:#D2691E;font-family:courier;'>------------ START DEBUG INFORMATION ------------
+<h3>THIS VIEW CONTAINS THE FOLLOWING VARIABLES/TABLES</h2>
+<?
+--print ("<span style='color:darkblue;font-family:courier;'>")
+for a,b in pairs(view) do
+ if not (type(b) == "table") then
+ print ("<b>" .. a .. "</b>: ><span2 style='color:black'>" .. b .. "</span2><<BR>")
+ else
+ print ("<b>" .. a .. "</b>:...<BR>")
+ for c,d in pairs(view[a]) do
+ if not (type(d) == "table") then
+ print ("<b> { " .. c .. "</b>: ><span2 style='color:black'>" .. d .. "</span2>< <B> }</B><BR>")
+ else
+ print ("<b> { " .. c .. "</b>:...<BR>")
+ for e,f in pairs(view[a][c]) do
+ if not (type(f) == "table") then
+ print ("<b> { { " .. e .. "</b>: ><span2 style='color:black'>" .. f .. "</span2>< <B> } }</B><BR>")
+ else
+ print ("<b> { { " .. e .. "</b>:... (table is not visible at the moment)<BR>")
+ end
+ end
+ end
+ end
+ end
+a,b,c,d,e,f,g,h,i,j = nil,nil,nil,nil,nil,nil,nil,nil,nil,nil
+end
+print ("------------ END DEBUG INFORMATION ------------</span>")
+?>
+<? --]] ?>
+
<h2>Available configs</h2>
<TABLE BORDER=0 WIDTH="100%">
<TR style="background:#eee;font-weight:bold;vertical-align:top;">