extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2024-12-15 19:01:19 +01:00
Code Issues Packages Projects Releases Wiki Activity

Break up long port lists in jump to logging chain

Browse Source 
Signed-off-by: Tom Eastep <teastep@shorewall.net>

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@9840 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2009-04-10 16:31:04 +00:00
parent e0040f4011
commit 28e84a6aba
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
Shorewall/Perl/Shorewall/Chains.pm
View File

@ -583,11 +583,12 @@ sub add_rule($$;$)
# Add a jump from the chain represented by the reference in the first argument to
# the target in the second argument. The third argument determines if a GOTO may be
# used rather than a jump. The optional fourth argument specifies any matches to be
# included in the rule and must end with a space character if it is non-null.
# included in the rule and must end with a space character if it is non-null. The
# optional 5th argument causes long port lists to be split.
#
sub add_jump( $$$;$ ) {
my ( $fromref, $to, $goto_ok, $predicate ) = @_;
sub add_jump( $$$;$$ ) {
my ( $fromref, $to, $goto_ok, $predicate, $expandports ) = @_;
$predicate |= '';
@ -612,7 +613,7 @@ sub add_jump( $$$;$ ) {
my $param = $goto_ok && $toref && $capabilities{GOTO_TARGET} ? 'g' : 'j';
add_rule ($fromref, join( '', $predicate, "-$param $to" ) );
add_rule ($fromref, join( '', $predicate, "-$param $to" ), $expandports || 0 );
}
#
@ -2702,7 +2703,7 @@ sub expand_rule( $$$$$$$$$$ )
if ( $disposition ne 'LOG' ) {
my $logchainref = new_chain $chainref->{table}, newlogchain;
add_jump( $chainref, $logchainref, $builtin_target{$disposition}, $rule );
add_jump( $chainref, $logchainref, $builtin_target{$disposition}, $rule, 1 );
log_rule_limit(
$loglevel ,