File Manager

X7ROOT File Manager

Current Path: /usr/libexec/webmin/shorewall

📁 ..
📄 CHANGELOG(2.47 KB)
📄 acl_security.pl(1 KB)
📄 backup_config.pl(874 B)
📄 check.cgi(503 B)
📄 clear.cgi(313 B)
📄 config(166 B)
📄 config.info(509 B)
📄 config.info.ca(573 B)
📄 config.info.de(558 B)
📄 config.info.es(297 B)
📄 config.info.fr(466 B)
📄 config.info.ms(404 B)
📄 config.info.nl(394 B)
📄 config.info.no(402 B)
📄 defaultacl(19 B)
📄 delete.cgi(530 B)
📄 down.cgi(403 B)
📄 dump.cgi(337 B)
📄 edit.cgi(1.69 KB)
📄 editcmt.cgi(1014 B)
📁 images
📄 index.cgi(2.52 KB)
📄 install_check.pl(380 B)
📁 lang
📄 list.cgi(3.39 KB)
📄 log_parser.pl(461 B)
📄 manual_form.cgi(710 B)
📄 manual_save.cgi(555 B)
📄 module.info(169 B)
📄 module.info.af(0 B)
📄 module.info.af.auto(111 B)
📄 module.info.ar(0 B)
📄 module.info.ar.auto(154 B)
📄 module.info.be(0 B)
📄 module.info.be.auto(171 B)
📄 module.info.bg(0 B)
📄 module.info.bg.auto(204 B)
📄 module.info.ca(100 B)
📄 module.info.cs(27 B)
📄 module.info.cs.auto(85 B)
📄 module.info.da(0 B)
📄 module.info.da.auto(104 B)
📄 module.info.de(112 B)
📄 module.info.el(0 B)
📄 module.info.el.auto(175 B)
📄 module.info.es(30 B)
📄 module.info.es.auto(76 B)
📄 module.info.eu(0 B)
📄 module.info.eu.auto(114 B)
📄 module.info.fa(0 B)
📄 module.info.fa.auto(154 B)
📄 module.info.fi(0 B)
📄 module.info.fi.auto(102 B)
📄 module.info.fr(0 B)
📄 module.info.fr.auto(114 B)
📄 module.info.he(0 B)
📄 module.info.he.auto(166 B)
📄 module.info.hr(0 B)
📄 module.info.hr.auto(108 B)
📄 module.info.hu(26 B)
📄 module.info.hu.auto(74 B)
📄 module.info.it(0 B)
📄 module.info.it.auto(106 B)
📄 module.info.ja(0 B)
📄 module.info.ja.auto(136 B)
📄 module.info.ko(0 B)
📄 module.info.ko.auto(115 B)
📄 module.info.lt(0 B)
📄 module.info.lt.auto(114 B)
📄 module.info.lv(0 B)
📄 module.info.lv.auto(105 B)
📄 module.info.ms(113 B)
📄 module.info.mt(0 B)
📄 module.info.mt.auto(98 B)
📄 module.info.nl(27 B)
📄 module.info.nl.auto(84 B)
📄 module.info.no(27 B)
📄 module.info.no.auto(76 B)
📄 module.info.pl(0 B)
📄 module.info.pl.auto(105 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(109 B)
📄 module.info.ru(0 B)
📄 module.info.ru.auto(180 B)
📄 module.info.sk(0 B)
📄 module.info.sk.auto(113 B)
📄 module.info.sl(0 B)
📄 module.info.sl.auto(104 B)
📄 module.info.sv(0 B)
📄 module.info.sv.auto(111 B)
📄 module.info.th(0 B)
📄 module.info.th.auto(192 B)
📄 module.info.tr(0 B)
📄 module.info.tr.auto(129 B)
📄 module.info.uk(0 B)
📄 module.info.uk.auto(162 B)
📄 module.info.ur(0 B)
📄 module.info.ur.auto(158 B)
📄 module.info.vi(0 B)
📄 module.info.vi.auto(136 B)
📄 module.info.zh(0 B)
📄 module.info.zh.auto(82 B)
📄 module.info.zh_TW(0 B)
📄 module.info.zh_TW.auto(88 B)
📄 refresh.cgi(427 B)
📄 restart.cgi(423 B)
📄 save.cgi(1.08 KB)
📄 savecmt.cgi(867 B)
📄 shorewall-lib.pl(57.91 KB)
📄 start.cgi(413 B)
📄 status.cgi(343 B)
📄 stop.cgi(312 B)
📄 up.cgi(397 B)

Editing: list.cgi

#!/usr/bin/perl
# list.cgi
# Display the contents of some table

require './shorewall-lib.pl';
&ReadParse();
&can_access($in{'table'}) || &error($text{'list_ecannot'});
&get_clean_table_name(\%in);
&ui_print_header(undef, $text{$in{'tableclean'}."_title"}, "");

$desc = $text{$in{'tableclean'}."_desc"};
print "$desc\n" if ($desc);

$pfunc = &get_parser_func(\%in);
@table = &read_table_file($in{'table'}, $pfunc);
$cfunc = $in{'tableclean'}."_columns";
$cols = &$cfunc() if (defined(&$cfunc));
$nfunc = $in{'tableclean'}."_colnames";
#&debug_message("cfunc = $cfunc");
#&debug_message("nfunc = $nfunc");
if (defined(&$nfunc)) {
	@colnames = &$nfunc();
	}
else {
	@colnames = ( );
	for($j=0; defined($cols) ? ($j<$cols) : ($text{$in{'tableclean'}."_".$j}); $j++) {
		push(@colnames, $text{$in{'tableclean'}."_".$j});
		}
	}

# Work out select/create links
@links = ( &select_all_link("d"),
	   &select_invert_link("d"),
	   &ui_link("edit.cgi?table=$in{'table'}&new=1",
		    $text{$in{'tableclean'}."_add"}) );
if (&version_atleast(3, 3, 3) && &indexof($in{'table'}, @comment_tables) >= 0) {
	push(@links, &ui_link("editcmt.cgi?table=$in{'table'}&new=1",$text{"comment_add"}));
	}

# Show the table
if (@table) {
	print &ui_form_start("delete.cgi", "post");
	print &ui_hidden("table", $in{'table'}),"\n";
	print &ui_links_row(\@links);
	print &ui_columns_start([
		"",
		@colnames,
		(@table > 1 ? ( $text{'list_move'} ) : ( )),
		$text{'list_add'}
		], undef, 0, [ "width=5" ]);

$rfunc = $in{'tableclean'}."_row";
	for($i=0; $i<@table; $i++) {
		@t = @{$table[$i]};
		local @cols;
		local @tds;
		if ($t[0] =~ /\??COMMENT/) {
			# Special case - a comment line
			push(@cols, "<a href='editcmt.cgi?table=$in{'table'}&".
				 "idx=$i'>".join(" ", @t[1..$#t]).
				 "</a>" );
			@tds = ( "width=5", "colspan=".scalar(@colnames) );
			}
		else {
			# Some rule or other object
			if (defined(&$rfunc)) {
				@t = &$rfunc(@t);
				}
			for($j=0; $j<@colnames; $j++) {
				if ($j == 0) {
					$lnk = &ui_link("edit.cgi?table=$in{'table'}&idx=$i",$t[$j]);
					}
				else {
					$lnk = $t[$j];
					}
				push(@cols, $lnk);
				}
			@tds = ( "width=5" );
			}
		if (@table > 1) {
			$mover = "";
			if ($i == 0) {
				$mover .= "<img src=images/gap.gif>";
				}
			else {
				$mover .= &ui_link("up.cgi?table=$in{'table'}&idx=$i","<img src=images/up.gif border=0>")."\n";
				}
			if ($i == $#table) {
				$mover .= "<img src=images/gap.gif>";
				}
			else {
				$mover .= &ui_link("down.cgi?table=$in{'table'}&idx=$i","<img src=images/down.gif border=0>")."\n";
				}
			push(@cols, $mover);
			}
		push(@cols,
		 "<a href='edit.cgi?table=$in{'table'}&new=1&before=$i'>".
		 "<img src=images/before.gif border=0></a>\n".
		 "<a href='edit.cgi?table=$in{'table'}&new=1&after=$i'>".
		 "<img src=images/after.gif border=0></a>\n");
		print &ui_checked_columns_row(\@cols, \@tds, "d", $i);
		}
	print &ui_columns_end();
	}
else {
	print "",$text{$in{'tableclean'}."_none"},"\n";
	shift(@links); shift(@links);
	}
print &ui_links_row(\@links);
if (@table) {
	print &ui_form_end([ [ "delete", $text{'list_delete'} ] ]);
	}

print &ui_hr();
print &ui_buttons_start();
print &ui_buttons_row("manual_form.cgi", $text{'list_manual'},
		 &text('list_manualdesc',
			"<tt>$config{'config_dir'}/$in{'table'}</tt>"),
		 &ui_hidden("table", $in{'table'}));
print &ui_buttons_end();

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

X7ROOT File Manager

Editing: list.cgi

Upload File

Create Folder