Files
webmin/firewalld/bootup.cgi
2022-06-30 13:08:38 +03:00

21 lines
462 B
Perl
Executable File

#!/usr/local/bin/perl
# Enable or disable firewalld at boot time
use strict;
use warnings;
no warnings 'redefine';
no warnings 'uninitialized';
require './firewalld-lib.pl';
our (%in, %config);
&ReadParse();
&foreign_require("init");
if ($in{'boot'}) {
&init::enable_at_boot($config{'init_name'});
}
else {
&init::disable_at_boot($config{'init_name'});
}
&webmin_log($in{'boot'} ? "bootup" : "bootdown");
&redirect("index.cgi?zone=".&urlize($in{'zone'}));