From 2beb00dd81c1f2dceeef0e62cf89d2d1b1109b6a Mon Sep 17 00:00:00 2001
From: Mika Havela <mika.havela@gmail.com>
Date: Fri, 30 Nov 2007 16:41:55 +0000
Subject: Check and restart is now working!

git-svn-id: svn://svn.alpinelinux.org/acf/shorewall/trunk@396 ab2d0c66-481e-0410-8bed-d214d4d58bed
---
 shorewall-read-html.lsp | 51 ++++++++++++++++++++++++++++++++++++++++++++++---
 1 file changed, 48 insertions(+), 3 deletions(-)

(limited to 'shorewall-read-html.lsp')

diff --git a/shorewall-read-html.lsp b/shorewall-read-html.lsp
index af700b1..7f23c8f 100644
--- a/shorewall-read-html.lsp
+++ b/shorewall-read-html.lsp
@@ -58,7 +58,7 @@
 <dt><?= html.link{value = view.url .. "/edit?name=tcrules", label="tcrules" } ?></dt>
 <dd>Define traffic control rules.</dd>
 
-<h2>OTHER</h2>
+<h2>SHOW CONFIG FILES</h2>
 
 <dt><?= html.link{value = view.url .. "/list", label="View all files/configs" } ?></dt>
 <dd>Provide a autogenerated list of files in '/etc/shorewall'.</dd>
@@ -74,8 +74,53 @@
 <dt>Program state</dt>
 <dd><?= view.programstats.programstate ?></dd>
 
+<? --[[
+<dt>Show shorewall details</dt>
+<dd>[connections] Displays the IP connections currently being tracked by the firewall</dd>
+--]] ?>
 
 <h2>MANAGEMENT</h2>
-<dt>Program Status</dt>
-<dd>[running|not]</dd>
 
+<dt>Preform check of configs</dt>
+<dd><form name="check" action="" method="POST"><input type=submit name="cmd" value="check" style="width:100px"></form></dd>
+
+<dt>Preform restart of firewall</dt>
+<dd><form name="restart" action="" method="POST"><input type=submit name="cmd" value="restart" style="width:100px"></form><? if (view.programstats.restart) then io.write(view.programstats.restart) end ?></dd>
+
+<? --[[
+<dt>Preform refresh of configs</dt>
+<dd><form action="xxx" method="POST"><input type=submit name="cmd" value="refresh" style="width:100px"></form> Involves black list, ECN control rules, and traffic shaping...</dd>
+--]] ?>
+
+
+<? --[[ DEBUG INFORMATION...?>
+<span style='color:#D2691E;font-family:courier;'>
+<h3>THIS VIEW CONTAINS THE FOLLOWING VARIABLES/TABLES</h2>
+------------ START DEBUG INFORMATION ------------<BR>
+<?
+--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>")
+?>
+<? --]] ?>
-- 
cgit v1.2.3