extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-06-26 12:42:40 +02:00
Code Issues Packages Projects Releases Wiki Activity

Correct policy zone exclusion handling

Browse Source 
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2019-02-21 09:31:13 -08:00
parent 15dd14e167
commit e626b77097
No known key found for this signature in database
GPG Key ID: 96E6B3F2423A4D10
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -836,11 +836,15 @@ sub process_a_policy() {
my ( $intrazone, $clientlist, $serverlist ); my ( $intrazone, $clientlist, $serverlist );
if ( $clientlist = ( $clients =~ /,/ ) ) { if ( $clients =~ /^all(\+)?!/ ) {
$intrazone = $1;
} elsif ( $clientlist = ( $clients =~ /,/ ) ) {
$intrazone = ( $clients =~ s/\+$// ); $intrazone = ( $clients =~ s/\+$// );
} }
if ( $serverlist = ( $servers =~ /,/ ) ) { if ( $servers =~ /^all(\+)?!/ ) {
$intrazone = $1;
} elsif ( $serverlist = ( $servers =~ /,/ ) ) {
$intrazone ||= ( $servers =~ s/\+$// ); $intrazone ||= ( $servers =~ s/\+$// );
} }
@ -857,7 +861,7 @@ sub process_a_policy() {
} }
} }
} else { } else {
process_a_policy1( $clients, $servers, $policy, $loglevel, $synparams, $connlimit, 0 ); process_a_policy1( $clients, $servers, $policy, $loglevel, $synparams, $connlimit, $intrazone );
} }
} }