Queue initailization for FRED and FREDL
Identify the following code (in new-flow)...
if { $type == "RED" } {
set bw [$link_ set bandwidth_]
$q set ptc_ [expr $bw / (8. * [$q set mean_pktsize_])]
}
... and add the following lines after it:
# CSFQ-begin
if { $type == "FRED" } {
set bw [$link_ set bandwidth_]
$q set ptc_ [expr $bw / (8. * [$q set mean_pktsize_])]
}
if { $type == "FREDL" } {
set bw [$link_ set bandwidth_]
$q set ptc_ [expr $bw / (8. * [$q set mean_pktsize_])]
}
# CSFQ-end
Ion Stoica
Last modified: Tue Sep 8 18:04:15 EDT 1998