BiTel

if [ -f /var/run/radattr.$1 ]
then
DOWNSPEED=`/usr/bin/awk '/PPPD-Downstream-Speed-Limit/ {print $2}' /var/run/radattr.$1`
UPSPEED=`/usr/bin/awk '/PPPD-Upstream-Speed-Limit/ {print $2}' /var/run/radattr.$1`
FILTERS=`/usr/bin/awk '/Filter-Id/ {print $2}' /var/run/radattr.$1`
#echo $DOWNSPEED
#echo $UPSPEED
#echo $FILTERS
/sbin/tc qdisc del dev $1 root > /dev/null
/sbin/tc qdisc del dev $1 ingress > /dev/null

##### speed server->client
if [ "$UPSPEED" != "0" ] ;
then
/sbin/tc qdisc add dev $1 root handle 1: htb default 20 r2q 1
#####################################
/sbin/tc class add dev $1 parent 1:1 classid 1:99 htb rate 4192kbit burst 4k prio 1
/sbin/tc qdisc add dev $1 parent 1:99 handle 99: sfq perturb 10 quantum 1500
/sbin/tc filter add dev $1 parent 1: protocol ip prio 11 handle 99 fw flowid 1:99
####################################

/sbin/tc class add dev $1 parent 1: classid 1:2 htb rate ${UPSPEED}kbit burst 4k
/sbin/tc class add dev $1 parent 1:2 classid 1:10 htb rate ${UPSPEED}kbit burst 4k prio 2
/sbin/tc class add dev $1 parent 1:2 classid 1:20 htb rate ${UPSPEED}kbit burst 4k prio 3
/sbin/tc qdisc add dev $1 parent 1:10 handle 10: sfq perturb 10 quantum 1500
/sbin/tc qdisc add dev $1 parent 1:20 handle 20: sfq perturb 10 quantum 1500
/sbin/tc filter add dev $1 parent 1:0 protocol ip prio 10 u32 match ip tos 0x10 0xff flowid 1:10
/sbin/tc filter add dev $1 parent 1:0 protocol ip prio 10 u32 match ip protocol 1 0xff flowid 1:10
/sbin/tc filter add dev $1 parent 1: protocol ip prio 10 u32 match ip protocol 6 0xff match u8 0x05 0x0f at 0 match u160x0000 0xffc0 at 2 match u8 0x10 0xff
#/sbin/tc class add dev $1 parent 1:1 classid 1:99 htb rate 4192kbit burst 4k prio 3
#/sbin/tc qdisc add dev $1 parent 1:99 handle 99: sfq perturb 10 quantum 1500
#/sbin/tc filter add dev $1 parent 1: protocol ip prio 11 handle 99 fw flowid 1:99
fi
##### speed client->server
if [ "$DOWNSPEED" != "0" ] ;
then
/sbin/tc qdisc add dev $1 handle ffff: ingress
/sbin/tc filter add dev $1 parent ffff: protocol ip prio 50 u32 match ip src 0.0.0.0/0 police rate ${DOWNSPEED}kbit burst 12k drop flowid :1
fi
fi

/sbin/tc qdisc add dev $1 root handle 1: htb default 20 r2q 1
/sbin/tc class add dev $1 parent 1: classid 1:1 htb rate ${UPSPEED}kbit burst 4k
/sbin/tc class add dev $1 parent 1:1 classid 1:10 htb rate ${UPSPEED}kbit burst 4k prio 1
/sbin/tc class add dev $1 parent 1:1 classid 1:20 htb rate ${UPSPEED}kbit burst 4k prio 2
/sbin/tc class add dev $1 parent 1:1 classid 1:99 htb rate 4192kbit burst 4k prio 3
/sbin/tc class add dev $1 parent 1:1 classid 1:98 htb rate 10240kbit burst 4k prio 4
/sbin/tc class add dev $1 parent 1:1 classid 1:97 htb rate 2048kbit burst 4k prio 5
/sbin/tc qdisc add dev $1 parent 1:10 handle 10: sfq perturb 10 quantum 1500
/sbin/tc qdisc add dev $1 parent 1:20 handle 20: sfq perturb 10 quantum 1500
/sbin/tc qdisc add dev $1 parent 1:99 handle 99: sfq perturb 10 quantum 1500
/sbin/tc qdisc add dev $1 parent 1:98 handle 98: sfq perturb 10 quantum 1500
/sbin/tc qdisc add dev $1 parent 1:98 handle 97: sfq perturb 10 quantum 1500

/sbin/tc filter add dev $1 parent 1: prio 11 protocol ip handle 99 fw flowid 1:99
/sbin/tc filter add dev $1 parent 1: prio 12 protocol ip handle 98 fw flowid 1:98
/sbin/tc filter add dev $1 parent 1: prio 12 protocol ip handle 97 fw flowid 1:97