|
|
@ -244,6 +244,7 @@ sub check_firewall |
|
|
|
my $debug = defined $parameter->{debug} ? $parameter->{debug} : 3; |
|
|
|
my $debug = defined $parameter->{debug} ? $parameter->{debug} : 3; |
|
|
|
$anvil->Log->entry({source => $THIS_FILE, line => __LINE__, level => $debug, key => "log_0125", variables => { method => "Network->check_firewall()" }}); |
|
|
|
$anvil->Log->entry({source => $THIS_FILE, line => __LINE__, level => $debug, key => "log_0125", variables => { method => "Network->check_firewall()" }}); |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
my $running = 0; |
|
|
|
my $running = 0; |
|
|
|
|
|
|
|
|
|
|
|
# Make sure firewalld is running. |
|
|
|
# Make sure firewalld is running. |
|
|
@ -256,7 +257,8 @@ sub check_firewall |
|
|
|
} |
|
|
|
} |
|
|
|
else |
|
|
|
else |
|
|
|
{ |
|
|
|
{ |
|
|
|
if ($anvil->data->{sys}{daemons}{restart_firewalld}) |
|
|
|
#if ($anvil->data->{sys}{daemons}{restart_firewalld}) |
|
|
|
|
|
|
|
if (0) |
|
|
|
{ |
|
|
|
{ |
|
|
|
$anvil->Log->entry({source => $THIS_FILE, line => __LINE__, level => 0, priority => "err", key => "log_0127"}); |
|
|
|
$anvil->Log->entry({source => $THIS_FILE, line => __LINE__, level => 0, priority => "err", key => "log_0127"}); |
|
|
|
my $return_code = $anvil->System->start_daemon({daemon => $anvil->data->{sys}{daemon}{firewalld}}); |
|
|
|
my $return_code = $anvil->System->start_daemon({daemon => $anvil->data->{sys}{daemon}{firewalld}}); |
|
|
@ -276,7 +278,7 @@ sub check_firewall |
|
|
|
else |
|
|
|
else |
|
|
|
{ |
|
|
|
{ |
|
|
|
# We've been asked to leave it off. |
|
|
|
# We've been asked to leave it off. |
|
|
|
$anvil->Log->entry({source => $THIS_FILE, line => __LINE__, level => 0, priority => "err", key => "log_0128"}); |
|
|
|
$anvil->Log->entry({source => $THIS_FILE, line => __LINE__, level => 2, priority => "err", key => "log_0128"}); |
|
|
|
return(0); |
|
|
|
return(0); |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
@ -2946,6 +2948,8 @@ sub manage_firewall |
|
|
|
my $debug = defined $parameter->{debug} ? $parameter->{debug} : 3; |
|
|
|
my $debug = defined $parameter->{debug} ? $parameter->{debug} : 3; |
|
|
|
$anvil->Log->entry({source => $THIS_FILE, line => __LINE__, level => $debug, key => "log_0125", variables => { method => "Network->manage_firewall()" }}); |
|
|
|
$anvil->Log->entry({source => $THIS_FILE, line => __LINE__, level => $debug, key => "log_0125", variables => { method => "Network->manage_firewall()" }}); |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
return(1); |
|
|
|
|
|
|
|
|
|
|
|
my $task = defined $parameter->{task} ? $parameter->{task} : "check"; |
|
|
|
my $task = defined $parameter->{task} ? $parameter->{task} : "check"; |
|
|
|
my $port_number = defined $parameter->{port_number} ? $parameter->{port_number} : ""; |
|
|
|
my $port_number = defined $parameter->{port_number} ? $parameter->{port_number} : ""; |
|
|
|
my $protocol = defined $parameter->{protocol} ? $parameter->{protocol} : "tcp"; |
|
|
|
my $protocol = defined $parameter->{protocol} ? $parameter->{protocol} : "tcp"; |
|
|
|