Error in applying A new Queue ( OLBP Scheme-user defined) patch to ns-allinone-2.33
I have received a scheme for pacing packets and its called queue length based pacing (QLBP) from its author.
He provided the documentation to patc that scheme in ns-allnone-2.33.
that is :
----------------------------------------------------------------------------
Apply QLBP patch
Step 1. Copy ns2-patch/queue/qlbp.cc and qlbp.h to ns-homefolder/ns-2.33/queue, where ns-homefolder is where the ns-allinone-2.33 package is installed.
Step 2. Copy lines 109 to 118 of ns2-patch/tcl/lib/ns-default.tcl into ns-homefolder/ns-2.33/tcl/lib/ns-default.tcl. The copied content can be inserted at line 109 of ns-homefolder/ns-2.33/ tcl/lib/ns-default.tcl. Note that don’t replace your ns-default.tcl with the provided ns-default.tcl. Doing so will cause a failure of running ns2 in your linux machine.
That is :
# added by Yan Cai
Queue/QLBP set drop_front_ false
Queue/QLBP set summarystats_ false
Queue/QLBP set queue_in_bytes_ false
Queue/QLBP set mean_pktsize_ 500
Queue/QLBP set qmax_ 20
Queue/QLBP set umax_ 100Mb
Queue/QLBP set umin_ 100Kb
Queue/QLBP set amplfer_ 1.0
Queue/QLBP set linespeed_ 100Mb
Step 3. Copy line 326 of ns2-patch/Makefile to line 326 of ns-homefolder/ns-2.33/Makefile.
That is : queue/qlbp.o \
Step 4. Go to ns-homefolder/ns-2.33/ and run “make” to recompile ns2.33
-------------------------------------------------------------------------
after going through the procedure I am getting following error :
-----------------------------------------------------------------------
invalid command name "Queue/QLBP"
while executing
"Queue/QLBP create _o645 "
invoked from within
"catch "$className create $o $args" msg"
invoked from within
"if [catch "$className create $o $args" msg] {
if [string match "__FAILED_SHADOW_OBJECT_" $msg] {
delete $o
return ""
}
global errorInfo
error "class $..."
(procedure "new" line 3)
invoked from within
"new Queue/$qtype"
("default" arm line 3)
invoked from within
"switch -exact $qtype {
ErrorModule {
if { [llength $args] > 0 } {
set q [eval new $qtype $args]
} else {
set q [new $qtype Fid]
}
}
intserv {
set qtyp..."
(procedure "_o3" line 14)
(Simulator simplex-link line 14)
invoked from within
"_o3 simplex-link _o141 _o153 100Mb 20ms QLBP"
("eval" body line 1)
invoked from within
"eval $self simplex-link $n1 $n2 $bw $delay $type $args"
(procedure "_o3" line 8)
(Simulator duplex-link line 8)
invoked from within
"$ns duplex-link $acr($i) $cr(0) $stage2_bw $stage2_delay QLBP"
(procedure "create_topology" line 54)
invoked from within
"create_topology"
(file "bell_topology.tcl" line 528)
------------------------------------------------------------------------
I think there is just a little error in patching the QLBP scheme..
PLEASE HELP ME AS SOON AS POSSIBLE...
|