summaryrefslogtreecommitdiffstats
path: root/package/qos-scripts/files/usr/lib
diff options
context:
space:
mode:
authornbd <nbd@3c298f89-4303-0410-b956-a3cf2f4a3e73>2007-06-30 02:34:03 +0000
committernbd <nbd@3c298f89-4303-0410-b956-a3cf2f4a3e73>2007-06-30 02:34:03 +0000
commitcbddbcdae45a9ab2e453d783a2cd6f8a21b8c1b0 (patch)
tree6fc168de86936f2441344b42080359fc5d49c127 /package/qos-scripts/files/usr/lib
parent62ddd055447e79b4b7bce0ab98de6c3d620c6d2f (diff)
qos-scripts update:
- rewrite the RED qdisc calculations and add some comments this should fix the warnings about bursting (should also fix quirks with various linespeed settings) - reduce the calculated overhead for upstream, while i'm at it... git-svn-id: svn://svn.openwrt.org/openwrt/trunk@7782 3c298f89-4303-0410-b956-a3cf2f4a3e73
Diffstat (limited to 'package/qos-scripts/files/usr/lib')
-rwxr-xr-xpackage/qos-scripts/files/usr/lib/qos/generate.sh2
-rw-r--r--package/qos-scripts/files/usr/lib/qos/tcrules.awk39
2 files changed, 31 insertions, 10 deletions
diff --git a/package/qos-scripts/files/usr/lib/qos/generate.sh b/package/qos-scripts/files/usr/lib/qos/generate.sh
index 844bd70f9..a2f7d719c 100755
--- a/package/qos-scripts/files/usr/lib/qos/generate.sh
+++ b/package/qos-scripts/files/usr/lib/qos/generate.sh
@@ -261,7 +261,7 @@ start_interface() {
for dir in up${halfduplex} ${download:+down}; do
case "$dir" in
up)
- [ "$overhead" = 1 ] && upload=$(($upload * 98 / 100 - (32 * 128 / $upload)))
+ [ "$overhead" = 1 ] && upload=$(($upload * 98 / 100 - (15 * 128 / $upload)))
dev="$device"
rate="$upload"
dl_mode=""
diff --git a/package/qos-scripts/files/usr/lib/qos/tcrules.awk b/package/qos-scripts/files/usr/lib/qos/tcrules.awk
index d236b2df9..7bef85b0d 100644
--- a/package/qos-scripts/files/usr/lib/qos/tcrules.awk
+++ b/package/qos-scripts/files/usr/lib/qos/tcrules.awk
@@ -77,20 +77,41 @@ END {
# leaf qdisc
avpkt = 1200
for (i = 1; i <= n; i++) {
- ql = int((avgrate[i] + linespeed) * 1024 / (8 * pktsize[i]))
printf "tc qdisc add dev "device" parent 1:"class[i]"0 handle "class[i]"00: "
+
+ # RED parameters - also used to determine the queue length for sfq
+ # calculate min value. for links <= 256 kbit, we use 1500 bytes
+ # use 50 ms queue length as min threshold for faster links
+ # max threshold is fixed to 3*min
+ base_pkt=3000
+ base_rate=256
+ min_lat=50
+ if (maxrate[i] <= base_rate) min = base_pkt
+ else min = int(maxrate[i] * 1024 / 8 * 0.05)
+ max = 3 * min
+ limit = (min + max) * 3
+
if (rtm1[i] > 0) {
# rt class - use sfq
- print "sfq perturb 2 limit " ql
+ print "sfq perturb 2 limit " limit
} else {
- # non-rt class - use red
- min = int(maxrate[i] * 1024 / 8 * 0.05)
- if (min < avpkt) min = avpkt
- dqb = 8 * min;
- max = int(2.1*min)
- rburst = int((2*min + max) / (3 * avpkt))
+ # non-rt class - use RED
+
+ avpkt = pktsize[i]
+ # don't use avpkt values less than 500 bytes
+ if (avpkt < 500) avpkt = 500
+ # if avpkt is too close to min, scale down avpkt to allow proper bursting
+ if (avpkt > min * 0.70) avpkt *= 0.70
+
+
+ # according to http://www.cs.unc.edu/~jeffay/papers/IEEE-ToN-01.pdf a drop
+ # probability somewhere between 0.1 and 0.2 should be a good tradeoff
+ # between link utilization and response time (0.1: response; 0.2: utilization)
+ prob="0.12"
+
+ rburst=int((2*min + max) / (3 * avpkt))
if (rburst < 2) rburst = 2
- print "red min " min " max " max " burst " rburst " avpkt " avpkt " limit " dqb " probability 0.04 ecn"
+ print "red min " min " max " max " burst " rburst " avpkt " avpkt " limit " limit " probability " prob " ecn"
}
}