package/network/config/qos-scripts/files/usr/lib/qos/tcrules.awk

   1 BEGIN {
   2         dmax=100
   3         if (!(linespeed > 0)) linespeed = 128
   4         FS=":"
   5         n = 0
   6 }
   7
   8 ($1 != "") {
   9         n++
  10         class[n] = $1
  11         prio[n] = $2
  12         avgrate[n] = ($3 * linespeed / 100)
  13         pktsize[n] = $4
  14         delay[n] = $5
  15         maxrate[n] = ($6 * linespeed / 100)
  16         qdisc[n] = $7
  17         filter[n] = $8
  18 }
  19
  20 END {
  21         allocated = 0
  22         maxdelay = 0
  23
  24         for (i = 1; i <= n; i++) {
  25                 # set defaults
  26                 if (!(pktsize[i] > 0)) pktsize[i] = 1500
  27                 if (!(prio[i] > 0)) prio[i] = 1
  28
  29                 allocated += avgrate[i]
  30                 sum_prio += prio[i]
  31                 if ((avgrate[i] > 0) && !(delay[i] > 0)) {
  32                         sum_rtprio += prio[i]
  33                 }
  34         }
  35
  36         # allocation of m1 in rt classes:
  37         # sum(d * m1) must not exceed dmax * (linespeed - allocated)
  38         dmax = 0
  39         for (i = 1; i <= n; i++) {
  40                 if (avgrate[i] > 0) {
  41                         rtm2[i] = avgrate[i]
  42                         if (delay[i] > 0) {
  43                                 d[i] = delay[i]
  44                         } else {
  45                                 d[i] = 2 * pktsize[i] * 1000 / (linespeed * 1024)
  46                                 if (d[i] > dmax) dmax = d[i]
  47                         }
  48                 }
  49         }
  50
  51         ds_avail = dmax * (linespeed - allocated)
  52         for (i = 1; i <= n; i++) {
  53                 lsm1[i] = 0
  54                 rtm1[i] = 0
  55                 lsm2[i] = linespeed * prio[i] / sum_prio
  56                 if ((avgrate[i] > 0) && (d[i] > 0)) {
  57                         if (!(delay[i] > 0)) {
  58                                 ds = ds_avail * prio[i] / sum_rtprio
  59                                 ds_avail -= ds
  60                                 rtm1[i] = rtm2[i] + ds/d[i]
  61                         }
  62                         lsm1[i] = rtm1[i]
  63                 }
  64                 else {
  65                         d[i] = 0
  66                 }
  67         }
  68
  69         # main qdisc
  70         for (i = 1; i <= n; i++) {
  71                 printf "tc class add dev "device" parent 1:1 classid 1:"class[i]"0 hfsc"
  72                 if (rtm1[i] > 0) {
  73                         printf " rt m1 " int(rtm1[i]) "kbit d " int(d[i] * 1000) "us m2 " int(rtm2[i])"kbit"
  74                 }
  75                 printf " ls m1 " int(lsm1[i]) "kbit d " int(d[i] * 1000) "us m2 " int(lsm2[i]) "kbit"
  76                 print " ul rate " int(maxrate[i]) "kbit"
  77         }
  78
  79         # leaf qdisc
  80         avpkt = 1200
  81         for (i = 1; i <= n; i++) {
  82                 print "tc qdisc add dev "device" parent 1:"class[i]"0 handle "class[i]"00: fq_codel"
  83         }
  84
  85         # filter rule
  86         for (i = 1; i <= n; i++) {
  87                 print "tc filter add dev "device" parent 1: prio "class[i]" protocol ip handle "class[i]"/0xff fw flowid 1:"class[i] "0"
  88                 filterc=1
  89                 if (filter[i] != "") {
  90                         print " tc filter add dev "device" parent "class[i]"00: handle "filterc"0 "filter[i]
  91                         filterc=filterc+1
  92                 }
  93         }
  94 }
  95