mirror of
https://github.com/webmin/webmin.git
synced 2025-07-21 23:40:34 +00:00
21 lines
462 B
Perl
Executable File
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'}));
|
|
|