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

Correct $minroot logic

Browse Source 
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2017-12-22 09:08:27 -08:00
parent b5a6067588
commit 5a8e9cd0a3
No known key found for this signature in database
GPG Key ID: 96E6B3F2423A4D10
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Shorewall/Perl/Shorewall/Zones.pm
View File

@ -317,7 +317,7 @@ sub initialize( $$ ) {
%mapbase = ();
%mapbase1 = ();
$baseseq = 0;
$minroot = 0;
$minroot = undef;
$loopback_interface = '';
%validzoneoptions = ( mss => NUMERIC,
@ -1204,6 +1204,7 @@ sub process_interface( $$ ) {
}
my $wildcard = 0;
my $physwild = 0;
my $root;
if ( $interface =~ /\+$/ ) {
@ -1212,7 +1213,7 @@ sub process_interface( $$ ) {
$roots{$root} = $interface;
my $len = length $root;
if ( $minroot ) {
if ( defined $minroot ) {
$minroot = $len if $minroot > $len;
} else {
$minroot = $len;