3 if (!(linespeed > 0)) linespeed = 128
12 avgrate[n] = ($3 * linespeed / 100)
15 maxrate[n] = ($6 * linespeed / 100)
22 for (i = 1; i <= n; i++) {
24 if (!(pktsize[i] > 0)) pktsize[i] = 1500
25 if (!(prio[i] > 0)) prio[i] = 1
27 allocated += avgrate[i]
29 if ((avgrate[i] > 0) && !(delay[i] > 0)) {
34 # allocation of m1 in rt classes:
35 # sum(d * m1) must not exceed dmax * (linespeed - allocated)
37 for (i = 1; i <= n; i++) {
43 d[i] = 2 * pktsize[i] * 1000 / (linespeed * 1024)
44 if (d[i] > dmax) dmax = d[i]
49 ds_avail = dmax * (linespeed - allocated)
50 for (i = 1; i <= n; i++) {
53 lsm2[i] = linespeed * prio[i] / sum_prio
54 if ((avgrate[i] > 0) && (d[i] > 0)) {
55 if (!(delay[i] > 0)) {
56 ds = ds_avail * prio[i] / sum_rtprio
58 rtm1[i] = rtm2[i] + ds/d[i]
68 for (i = 1; i <= n; i++) {
69 printf "tc class add dev "device" parent 1:1 classid 1:"class[i]"0 hfsc"
71 printf " rt m1 " int(rtm1[i]) "kbit d " int(d[i] * 1000) "us m2 " int(rtm2[i])"kbit"
73 printf " ls m1 " int(lsm1[i]) "kbit d " int(d[i] * 1000) "us m2 " int(lsm2[i]) "kbit"
74 print " ul rate " int(maxrate[i]) "kbit"
79 for (i = 1; i <= n; i++) {
80 printf "tc qdisc add dev "device" parent 1:"class[i]"0 handle "class[i]"00: "
82 # RED parameters - also used to determine the queue length for sfq
83 # calculate min value. for links <= 256 kbit, we use 1500 bytes
84 # use 50 ms queue length as min threshold for faster links
85 # max threshold is fixed to 3*min
89 if (maxrate[i] <= base_rate) min = base_pkt
90 else min = int(maxrate[i] * 1024 / 8 * 0.05)
92 limit = (min + max) * 3
96 print "sfq perturb 2 limit " limit
98 # non-rt class - use RED
101 # don't use avpkt values less than 500 bytes
102 if (avpkt < 500) avpkt = 500
103 # if avpkt is too close to min, scale down avpkt to allow proper bursting
104 if (avpkt > min * 0.70) avpkt *= 0.70
107 # according to http://www.cs.unc.edu/~jeffay/papers/IEEE-ToN-01.pdf a drop
108 # probability somewhere between 0.1 and 0.2 should be a good tradeoff
109 # between link utilization and response time (0.1: response; 0.2: utilization)
112 rburst=int((2*min + max) / (3 * avpkt))
113 if (rburst < 2) rburst = 2
114 print "red min " min " max " max " burst " rburst " avpkt " avpkt " limit " limit " probability " prob " ecn"
119 for (i = 1; i <= n; i++) {
120 print "tc filter add dev "device" parent 1: prio "class[i]" protocol ip handle "class[i]" fw flowid 1:"class[i] "0"