Gecko [ contributie.vriendennsm.nl ]

Name	Size	Permission	Date
help	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
images	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
lang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
acl_security.pl	2.21 KB	-rw-r--r--	2026-07-17 21:17
active.cgi	2.63 KB	-rwxr-xr-x	2026-07-17 21:22
active_table.cgi	3.48 KB	-rwxr-xr-x	2026-07-17 21:22
apply-boot.pl	545 B	-rwxr-xr-x	2026-07-17 21:22
bootup.cgi	428 B	-rwxr-xr-x	2026-07-17 21:22
clear_table.cgi	1.18 KB	-rwxr-xr-x	2026-07-17 21:22
clear_tables.cgi	1.06 KB	-rwxr-xr-x	2026-07-17 21:22
config	65 B	-rw-r--r--	2026-07-17 21:17
config.info	456 B	-rw-r--r--	2026-07-17 21:17
create_table.cgi	1.85 KB	-rwxr-xr-x	2026-07-17 21:22
defaultacl	188 B	-rw-r--r--	2026-07-17 21:17
delete_chain.cgi	1.05 KB	-rwxr-xr-x	2026-07-17 21:22
delete_chains.cgi	1.68 KB	-rwxr-xr-x	2026-07-17 21:22
delete_set.cgi	860 B	-rwxr-xr-x	2026-07-17 21:22
delete_sets.cgi	1.46 KB	-rwxr-xr-x	2026-07-17 21:22
delete_table.cgi	1.72 KB	-rwxr-xr-x	2026-07-17 21:22
edit_chain.cgi	2.6 KB	-rwxr-xr-x	2026-07-17 21:22
edit_manual.cgi	1.06 KB	-rwxr-xr-x	2026-07-17 21:22
edit_rule.cgi	22.11 KB	-rwxr-xr-x	2026-07-17 21:22
edit_set.cgi	2.53 KB	-rwxr-xr-x	2026-07-17 21:22
import_table.cgi	3.21 KB	-rwxr-xr-x	2026-07-17 21:22
index.cgi	21.6 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	538 B	-rw-r--r--	2026-07-17 21:17
manage_forward.cgi	1.42 KB	-rwxr-xr-x	2026-07-17 21:22
manage_ip.cgi	1.46 KB	-rwxr-xr-x	2026-07-17 21:22
manage_port.cgi	1.74 KB	-rwxr-xr-x	2026-07-17 21:22
module.info	201 B	-rw-r--r--	2026-07-17 21:17
move_rule.cgi	981 B	-rwxr-xr-x	2026-07-17 21:22
nftables-lib.pl	106.64 KB	-rw-r--r--	2026-07-17 21:17
rename_chain.cgi	1.03 KB	-rwxr-xr-x	2026-07-17 21:22
restart.cgi	359 B	-rwxr-xr-x	2026-07-17 21:22
save_chain.cgi	2.93 KB	-rwxr-xr-x	2026-07-17 21:22
save_manual.cgi	787 B	-rwxr-xr-x	2026-07-17 21:22
save_rule.cgi	7.94 KB	-rwxr-xr-x	2026-07-17 21:22
save_set.cgi	1.66 KB	-rwxr-xr-x	2026-07-17 21:22
search_services.cgi	487 B	-rwxr-xr-x	2026-07-17 21:22
setup.cgi	4.96 KB	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# delete_table.cgi
# Delete an existing nftables table

require './nftables-lib.pl';    ## no critic
use strict;
use warnings;
our (%in, %text);
ReadParse();
error_setup($text{'delete_err'});
assert_acl('delete');

my @tables = get_nftables_save();
my $table_idx = $in{'table'};
my $table;
if (defined($in{'table_family'}) && defined($in{'table_name'})) {
	for (my $i = 0 ; $i <= $#tables ; $i++) {
		if ($tables[$i]->{'family'} eq $in{'table_family'} &&
			$tables[$i]->{'name'} eq $in{'table_name'})
		{
			$table_idx = $i;
			$table = $tables[$i];
			last;
			}
		}
	$table || error($text{'delete_notable'});
	}
else {
	$table = $tables[$table_idx];
	}
$table || error($text{'delete_notable'});
assert_table_acl($table);

if ($in{'confirm'}) {
	my $needs_apply = needs_config_restart();
	splice(@tables, $table_idx, 1);
	my $err = delete_table_configuration($table, @tables);
	error(text('delete_failed', $err)) if ($err);
	$err = delete_active_table($table);
	error(text('delete_failed', $err)) if ($err);
	restart_last_restart_time() if (!$needs_apply);
	webmin_log("delete", "table", $table->{'name'},
		{'family' => $table->{'family'}});
	redirect("index.cgi");
	return;
	}

ui_print_header(undef, $text{'delete_title'}, "");
print "<center>\n";
print ui_form_start("delete_table.cgi");
print ui_hidden("table", $table_idx);
print ui_hidden("table_family", $table->{'family'});
print ui_hidden("table_name", $table->{'name'});
print text('delete_confirm', "<tt>$table->{'family'} $table->{'name'}</tt>"), "<p>\n";
print ui_form_end([["confirm", $text{'delete'}]]);
print "</center>\n";
ui_print_footer(
	"index.cgi?table_family=".
	    urlize($table->{'family'}).
	    "&table_name=".
	    urlize($table->{'name'}),
	$text{'index_return'}
);