Commit 49d1c526 authored by Nigel Kukard's avatar Nigel Kukard

Adjusted RED queuing to ensure we don't errors

parent 03e8127b
......@@ -997,14 +997,14 @@ sub _tc_iface_init
_tc_class_optimize($changeSet,$interfaceID,$defaultPoolTcClass,$interfaceTrafficClass->{'Limit'});
# Make the queue size big enough
my $queueSize = int((($interface->{'Limit'} * 1000) / 8) * 5); # Should give a 5s queue time, eg. (100kbps * 1000 / 8) * 5
my $queueSize = int($interface->{'Limit'} / 8) * 1000 * 5; # Should give a 5s queue time, eg. (100kbps / 8) * 1000 * 5
# RED metrics (sort of as per manpage)
my $redAvPkt = 1000;
my $redMax = int($queueSize * 0.75); # 75% mark at 100% probabilty
my $redMin = int($queueSize * 0.10); # 10% mark start RED
# my $redBurst = int( ($redMin+$redMax) / (2*$redAvPkt));
my $redBurst = int($queueSize * 0.10); # 10% burst
my $redBurst = int($redMin / $redAvPkt) + 1;
my $redLimit = $queueSize;
my $prioTcClass = _getPrioTcClass($interfaceID,$defaultPoolTcClass);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment