Files
webmin/shorewall6/restart.cgi
2012-05-25 13:40:56 -07:00

22 lines
431 B
Perl
Executable File

#!/usr/local/bin/perl
# restart.cgi
# Activate the current config
require './shorewall6-lib.pl';
if ($access{'nochange'}) {
redirect("/");
exit 0;
}
&error_setup($text{'restart_err'});
$err = &run_before_apply_command();
&error($err) if ($err);
$out = &backquote_logged("$config{'shorewall6'} restart 2>&1");
if ($?) {
&error("<pre>$out</pre>");
}
$err = &run_after_apply_command();
&webmin_log("restart");
&redirect("");