File Manager

X7ROOT File Manager

Current Path: /usr/libexec/webmin/ipfw

📁 ..
📄 CHANGELOG(1.04 KB)
📄 apply.cgi(293 B)
📄 bootup.cgi(240 B)
📄 cluster.cgi(1.98 KB)
📄 cluster_add.cgi(1.79 KB)
📄 cluster_delete.cgi(470 B)
📄 config(89 B)
📄 config.info(472 B)
📄 config.info.ca(433 B)
📄 config.info.de(539 B)
📄 config.info.nl(426 B)
📄 convert.cgi(274 B)
📄 edit_rule.cgi(10.16 KB)
📁 images
📄 index.cgi(6.36 KB)
📄 install_check.pl(484 B)
📄 ipfw-lib.pl(17.42 KB)
📁 lang
📄 log_parser.pl(569 B)
📄 module.info(170 B)
📄 module.info.af(0 B)
📄 module.info.af.auto(114 B)
📄 module.info.ar(0 B)
📄 module.info.ar.auto(169 B)
📄 module.info.be(0 B)
📄 module.info.be.auto(192 B)
📄 module.info.bg(0 B)
📄 module.info.bg.auto(208 B)
📄 module.info.ca(106 B)
📄 module.info.cs(0 B)
📄 module.info.cs.auto(108 B)
📄 module.info.da(0 B)
📄 module.info.da.auto(105 B)
📄 module.info.de(117 B)
📄 module.info.el(0 B)
📄 module.info.el.auto(222 B)
📄 module.info.es(0 B)
📄 module.info.es.auto(99 B)
📄 module.info.eu(0 B)
📄 module.info.eu.auto(105 B)
📄 module.info.fa(0 B)
📄 module.info.fa.auto(171 B)
📄 module.info.fi(0 B)
📄 module.info.fi.auto(113 B)
📄 module.info.fr(0 B)
📄 module.info.fr.auto(117 B)
📄 module.info.he(0 B)
📄 module.info.he.auto(157 B)
📄 module.info.hr(0 B)
📄 module.info.hr.auto(112 B)
📄 module.info.hu(0 B)
📄 module.info.hu.auto(139 B)
📄 module.info.it(0 B)
📄 module.info.it.auto(112 B)
📄 module.info.ja(0 B)
📄 module.info.ja.auto(158 B)
📄 module.info.ko(0 B)
📄 module.info.ko.auto(125 B)
📄 module.info.lt(0 B)
📄 module.info.lt.auto(120 B)
📄 module.info.lv(0 B)
📄 module.info.lv.auto(121 B)
📄 module.info.ms(0 B)
📄 module.info.ms.auto(114 B)
📄 module.info.mt(0 B)
📄 module.info.mt.auto(110 B)
📄 module.info.nl(21 B)
📄 module.info.nl.auto(98 B)
📄 module.info.no(0 B)
📄 module.info.no.auto(115 B)
📄 module.info.pl(0 B)
📄 module.info.pl.auto(102 B)
📄 module.info.pt(0 B)
📄 module.info.pt.auto(99 B)
📄 module.info.pt_BR(0 B)
📄 module.info.pt_BR.auto(105 B)
📄 module.info.ro(0 B)
📄 module.info.ro.auto(114 B)
📄 module.info.ru(0 B)
📄 module.info.ru.auto(171 B)
📄 module.info.sk(0 B)
📄 module.info.sk.auto(106 B)
📄 module.info.sl(0 B)
📄 module.info.sl.auto(120 B)
📄 module.info.sv(0 B)
📄 module.info.sv.auto(111 B)
📄 module.info.th(0 B)
📄 module.info.th.auto(177 B)
📄 module.info.tr(0 B)
📄 module.info.tr.auto(140 B)
📄 module.info.uk(0 B)
📄 module.info.uk.auto(194 B)
📄 module.info.ur(0 B)
📄 module.info.ur.auto(235 B)
📄 module.info.vi(0 B)
📄 module.info.vi.auto(139 B)
📄 module.info.zh(0 B)
📄 module.info.zh.auto(95 B)
📄 module.info.zh_TW(0 B)
📄 module.info.zh_TW.auto(101 B)
📄 move.cgi(561 B)
📄 save_rule.cgi(8.19 KB)
📄 setup.cgi(4.14 KB)
📄 start.pl(271 B)
📄 stop.pl(254 B)
📄 unapply.cgi(257 B)

Editing: cluster.cgi

#!/usr/bin/perl
# Show hosts in firewall cluster

require './ipfw-lib.pl';
&foreign_require("servers", "servers-lib.pl");
&ReadParse();
&ui_print_header(undef, $text{'cluster_title'}, undef, "cluster");

# Show existing servers
@servers = &list_cluster_servers();
if (@servers) {
	print "<form action=cluster_delete.cgi>\n";
	print "<table border width=100%>\n";
	print "<tr $tb> <td width=10><br></td> ",
	      "<td><b>$text{'cluster_host'}</b></td> ",
	      "<td><b>$text{'cluster_desc'}</b></td> ",
	      "<td><b>$text{'cluster_os'}</b></td> </tr>\n";
	foreach $s (@servers) {
		print "<tr $cb>\n";
		print "<td width=10><input type=checkbox name=d value=$s->{'id'}></td>\n";
		print "<td>",$s->{'host'},"</td>\n";
		print "<td>",$s->{'desc'} || "<br>","</td>\n";
		foreach $t (@servers::server_types) {
			if ($t->[0] eq $s->{'type'}) {
				print "<td>$t->[1]</td>\n";
				}
			}
		print "</tr>\n";
		}
	print "</table>\n";
	print "<input type=submit value='$text{'cluster_delete'}'></form>\n";
	}
else {
	print "<b>$text{'cluster_none'}</b><p>\n";
	}

# Show buttons to add
print "<form action=cluster_add.cgi>\n";
print "<table width=100%><tr>\n";
@allservers = grep { $_->{'user'} } &servers::list_servers();
%gothost = map { $_->{'id'}, 1 } @servers;
@addservers = grep { !$gothost{$_->{'id'}} } @allservers;
if (@addservers) {
	print "<td><input type=submit name=add value='$text{'cluster_add'}'>\n";
	print "<select name=server>\n";
	foreach $s (@addservers) {
		print "<option value=$s->{'id'}>",
			$s->{'desc'} ? $s->{'desc'} : $s->{'host'},"\n";
		}
	print "</select></td>\n";
	}
@groups = &servers::list_all_groups(\@allservers);
if (@groups) {
	print "<td align=right><input type=submit name=gadd ",
	      "value='$text{'cluster_gadd'}'>\n";
	print "<select name=group>\n";
	foreach $g (@groups) {
		print "<option>$g->{'name'}\n";
		}
	print "</select></td>\n";
	}
print "</tr></table></form>\n";
if (!@allservers) {
	print "<b>$text{'cluster_need'}</b><p>\n";
	}

&ui_print_footer("", $text{'index_return'});

X7ROOT File Manager

Editing: cluster.cgi

Upload File

Create Folder