extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-01-29 08:59:15 +01:00
Code Issues Packages Projects Releases Wiki Activity

Get Tc Working

Browse Source 
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@5587 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2007-03-20 00:06:56 +00:00
parent 6120a8358d
commit a4a00d572f
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
New/Shorewall/Tc.pm
View File

@ -32,6 +32,7 @@ use Shorewall::Common;
use Shorewall::Config;
use Shorewall::Zones;
use Shorewall::Chains;
use Shorewall::Interfaces;
use strict;
@ -307,7 +308,7 @@ sub validate_tc_device( $$$ ) {
fatal_error "Invalid device name ( $device ) in tcdevice \"$line\"" if $device =~ /[:+]/;
$tcdevices{$device} = {};
$tcdevices{$device}{in_bandsidth} = rate_to_kbit $inband;
$tcdevices{$device}{in_bandwidth} = rate_to_kbit $inband;
$tcdevices{$device}{out_bandwidth} = rate_to_kbit $outband;
push @tcdevices, $device;
@ -318,7 +319,7 @@ sub convert_rate( $$ ) {
$rate =~ s/\bfull\b/$full/g;
int( $rate );
eval "int( $rate )";
}
sub validate_tc_class( $$$$$$ ) {
@ -436,7 +437,7 @@ sub setup_traffic_shaping() {
emit "${dev}_mtu=\$(get_device_mtu $device)";
emit qq(run_tc "class add dev $device parent $devnum: classid $devnum:1 htb rate $devref->{out_bandwidth} mtu \$${dev}_mtu");
my $inband = rate_to_kbit $devref->{in_band};
my $inband = rate_to_kbit $devref->{in_bandwidth};
if ( $inband ) {
emit "run_tc add dev $device handle ffff: ingress";