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

Fix off-by-one problem

Browse Source
This commit is contained in:
Tom Eastep 2009-11-27 08:56:23 -08:00
parent 7f16e96167
commit 543af8bccb
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -183,7 +183,7 @@ use constant { SIMPLE_IF_OPTION => 1,
}; };
use constant { VIRTUAL_BASE => 0x1000000 , use constant { VIRTUAL_BASE => 0x1000000 ,
VIRTUAL_LIMIT => 0x8000000 , VIRTUAL_MASK => 0xf000000 ,
VIRTUAL_BITS => 4 #Bits for virtual MASK numbers VIRTUAL_BITS => 4 #Bits for virtual MASK numbers
}; };
@ -411,7 +411,7 @@ sub process_zone( \$ ) {
$type = FIREWALL; $type = FIREWALL;
} elsif ( $type eq 'virtual' ) { } elsif ( $type eq 'virtual' ) {
require_capability 'MARK_IN_FILTER' , 'virtual zones', ''; require_capability 'MARK_IN_FILTER' , 'virtual zones', '';
fatal_error "Too many virtual zones" if $virtualmark == VIRTUAL_LIMIT; fatal_error "Too many virtual zones" unless $virtualmark & VIRTUAL_MASK;
$virtual = $virtualmark; $virtual = $virtualmark;
$virtualmark = $virtualmark << 1; $virtualmark = $virtualmark << 1;
$type = VIRTUAL; $type = VIRTUAL;