diff options
| author | Mika Havela <mika.havela@gmail.com> | 2007-11-30 16:41:55 +0000 |
|---|---|---|
| committer | Mika Havela <mika.havela@gmail.com> | 2007-11-30 16:41:55 +0000 |
| commit | 2beb00dd81c1f2dceeef0e62cf89d2d1b1109b6a (patch) | |
| tree | 01f636fa19ea255f602bdb4d622e9078f74beeb7 /shorewall-read-html.lsp | |
| parent | 3a4f180a70063a185a8eab0e1409b255f0762861 (diff) | |
| download | acf-shorewall-2beb00dd81c1f2dceeef0e62cf89d2d1b1109b6a.tar.bz2 acf-shorewall-2beb00dd81c1f2dceeef0e62cf89d2d1b1109b6a.tar.xz | |
Check and restart is now working!
git-svn-id: svn://svn.alpinelinux.org/acf/shorewall/trunk@396 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'shorewall-read-html.lsp')
| -rw-r--r-- | shorewall-read-html.lsp | 51 |
1 files changed, 48 insertions, 3 deletions
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>") +?> +<? --]] ?> |