extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-06-20 09:47:51 +02:00
Code Issues Packages Projects Releases Wiki Activity

Yet another fix for TTL/HL

Browse Source 
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2012-09-24 16:23:15 -07:00
parent a8f324b25c
commit bac0f36818
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/Tc.pm
View File

@ -402,7 +402,7 @@ sub process_tc_rule( ) {
my $param = $1; my $param = $1;
fatal_error "Invalid TTL specification( $cmd )" unless ( $1 eq $2 || $2 != 0 ) && ( $param = abs $param ) < 256; fatal_error "Invalid TTL specification( $cmd )" unless supplied( $1 ) && ( $1 eq $2 || $2 != 0 ) && ( $param = abs $param ) < 256;
if ( $1 =~ /^\+/ ) { if ( $1 =~ /^\+/ ) {
$target .= " --ttl-inc $param"; $target .= " --ttl-inc $param";
@ -430,7 +430,7 @@ sub process_tc_rule( ) {
my $param = $1; my $param = $1;
fatal_error "Invalid HL specification( $cmd )" unless ( $1 eq $2 || $2 != 0 ) && ( $param = abs $param ) < 256; fatal_error "Invalid HL specification( $cmd )" unless supplied( $1 ) && ( $1 eq $2 || $2 != 0 ) && ( $param = abs $param ) < 256;
if ( $1 =~ /^\+/ ) { if ( $1 =~ /^\+/ ) {
$target .= " --hl-inc $param"; $target .= " --hl-inc $param";