extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2024-11-23 08:03:11 +01:00
Code Issues Packages Projects Releases Wiki Activity

Cleanup of new IN-BANDWIDTH handling (avoids a syntax error)

Browse Source 
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2011-10-17 06:29:27 -07:00
parent 4d83201843
commit dbe936c7c9
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Shorewall/Perl/Shorewall/Tc.pm
View File

@ -573,14 +573,14 @@ sub process_in_bandwidth( $ ) {
sub handle_in_bandwidth( $$ ) {
my ($physical, $arrayref ) = @_;;
my ($in_rate, $in_burst, $in_avrate, $interval, $decay ) = @$arrayref;
my ($in_rate, $in_burst, $in_avrate, $in_interval, $in_decay ) = @$arrayref;
emit ( "run_tc qdisc add dev $physical handle ffff: ingress",
"run_tc filter add dev $physical parent ffff: protocol all prio 10 " .
"\\\n estimator $interval $decay basic\\" );
"\\\n estimator $in_interval $in_decay basic\\" );
if ( $in_rate ) {
emit( " police mpu 64 rate ${rate}kbit burst $in_burst action drop\n" );
emit( " police mpu 64 rate ${in_rate}kbit burst $in_burst action drop\n" );
} else {
emit( " police avrate ${in_avrate}kbit action drop\n" );
}