Displaying 1 result from an estimated 1 matches for "speed_up".
Did you mean:
speed_a
2005 Nov 12
4
Borrowing between HTB classes not working as expectd.
...out the system call,
it''ll list off all the tc commands executed. How I wanted this to work
is higher priority classes to get a shot at bandwidth first in excess
of the base rates on all the other classes.
#!/usr/bin/perl -w
use strict;
my $dev = $ARGV[0];
my $speed_down = $ARGV[1];
my $speed_up = $ARGV[2];
my $tc_bin = "/sbin/tc";
tc("qdisc del dev $dev root");
tc("qdisc add dev $dev root handle 1:0 htb r2q 1 default 4");
tc("class add dev $dev parent 1:0 classid 1:2 htb ".
"rate " . int($speed_up * 0.85) . "k...