Files
webmin/ipfw/apply.cgi
2007-04-12 20:24:50 +00:00

16 lines
329 B
Perl
Executable File

#!/usr/local/bin/perl
# apply.cgi
# Apply the current firewall configuration
require './ipfw-lib.pl';
&ReadParse();
&error_setup($text{'apply_err'});
$rules = &get_config();
$err = &apply_rules($rules);
&error($err) if ($err);
$err = &apply_cluster_configuration();
&error($err) if ($err);
&webmin_log("apply");
&redirect("");