holm/shorewall_code
1
0
Fork 0
forked from extern/shorewall_code
Code Pull Requests Activity

Don't call generate_matrix() during 'check'

Browse Source
This commit is contained in:
Tom Eastep 2009-07-21 14:13:26 -07:00
parent 4fd338f3ca
commit 7f790e3aa2
2 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
Shorewall/Perl/Shorewall/Compiler.pm
View File

@ -43,7 +43,7 @@ use Shorewall::Raw;
our @ISA = qw(Exporter);
our @EXPORT = qw( compiler EXPORT TIMESTAMP DEBUG );
our @EXPORT_OK = qw( $export );
our $VERSION = '4.3_12';
our $VERSION = '4.4_0';
our $export;
@ -725,9 +725,9 @@ sub compiler {
unless ( $command eq 'check' ) {
pop_indent;
emit "}\n";
disable_object;
}
disable_object;
#
# N E T F I L T E R
# (Produces no output to the compiled script -- rules are stored in the chain table)
@ -782,11 +782,6 @@ sub compiler {
# Accounting.
#
setup_accounting;
#
# We generate the matrix even though we don't write out the rules. That way, we insure that
# a compile of the script won't blow up during that step.
#
generate_matrix;
if ( $command eq 'check' ) {
if ( $family == F_IPV4 ) {
@ -795,6 +790,11 @@ sub compiler {
progress_message3 "Shorewall6 configuration verified";
}
} else {
#
# Generate the zone x zone matrix
#
generate_matrix;
enable_object;
#
# I N I T I A L I Z E

4
Shorewall/Perl/Shorewall/Rules.pm
View File

@ -1634,8 +1634,8 @@ sub generate_matrix() {
if ( $chainref->{policy} ne 'CONTINUE' ) {
my $policyref = $filter_table->{$chainref->{policychain}};
return $policyref->{name} if $policyref;
fatal_error "No policy defined for zone $zone to zone $zone1";
assert( $policyref );
return $policyref->{name} if
}
''; # CONTINUE policy