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

Allow <zone>:[<address>] in rules

Browse Source 
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@8990 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2008-12-11 17:16:06 +00:00
parent e82d46f50f
commit 72f65a6e39
1 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
Shorewall-perl/Shorewall/Chains.pm
View File

@ -1986,7 +1986,11 @@ sub expand_rule( $$$$$$$$$$$ )
$iiface = $1;
$inets = $2;
} elsif ( $source =~ /:/ ) {
$inets = $source;
if ( $source =~ /^\[(.+)\]$/ ) {
$inets = $1;
} else {
$inets = $source;
}
} elsif ( $source =~ /\+|~|\..*\./ ) {
$inets = $source;
} else {
@ -2069,7 +2073,11 @@ sub expand_rule( $$$$$$$$$$$ )
$diface = $1;
$dnets = $2;
} elsif ( $dest =~ /:/ ) {
$dnets = $dest;
if ( $dest =~ /^\[(.+)\]$/ ) {
$dnets = $1;
} else {
$dnets = $dest;
}
} elsif ( $dest =~ /\+|~|\..*\./ ) {
$dnets = $dest;
} else {