Using CMU's run.tcl with ns2.1b5

[Henrik Eriksson <qtxheen@etxb.ericsson.se>]

Hi!
I tried to use the CMU mobile extensions but I had some troubles. I made
communication and scenario files with Adhockey (I have attached the
files if you want to run it yourselves).

> egil:/home/projects/ns/ns-2.1b5/tcl/ex> ../../ns run.tcl -rp dsr -nn 3 -x 1500 -y 300 -cp ~/test/comm -sc ~/test/scen -stop 500 -tr ~/test/out.tr

> Loading connection pattern...
> using backward compatible Agent/CBR; use Application/Traffic/CBR instead
> using backward compatible Agent/CBR; use Application/Traffic/CBR instead
> using backward compatible Agent/CBR; use Application/Traffic/CBR instead
> using backward compatible Agent/CBR; use Application/Traffic/CBR instead
> using backward compatible Agent/CBR; use Application/Traffic/CBR instead
> using backward compatible Agent/CBR; use Application/Traffic/CBR instead

Ok, it loads the communication file and complains, but this can be fixed
(how?)

> Loading scenario file...
> Load complete...
> Starting Simulation...
> Adjust position of node 3
> dfu: ran off the end of a source route
> dfu: ran off the end of a source route
> dfu: ran off the end of a source route
> dfu: ran off the end of a source route
> dfu: ran off the end of a source route
> dfu: ran off the end of a source route
> dfu: ran off the end of a source route
> dfu: ran off the end of a source route
What does this mean? 
Where can I find the corresponding code that prints this message?

> ns: _o31 setdest 212.500000000 350.000000000 1.000000000: 
>     (_o31 cmd line 1)
>     invoked from within
> "_o31 cmd setdest 212.500000000 350.000000000 1.000000000"
>     invoked from within
> "catch "$self cmd $args" ret"
>     (procedure "_o31" line 2)
>     (SplitObject unknown line 2)
>     invoked from within
> "_o31 setdest 212.500000000 350.000000000 1.000000000"


Here it crashes, it seems as if it has something to do with mobile nodes
that change direction.

Does anyone know the cause of this problem, and what to do to fix it?

Thanks in advance!

Best regards, Henrik Eriksson
#
# 39.000000 1 -> 3 cbr 10 10.000000 512
#
set cbr_(0) [$ns_ create-connection  CBR $node_(1) \
	      CBR $node_(3) 0]
$cbr_(0) set packetSize_ 512
$cbr_(0) set interval_ 0.1
$cbr_(0) set random_ 0
$cbr_(0) set maxpkts_ 10
$ns_ at 39 "$cbr_(0) start"
#
# 471.166667 3 -> 1 cbr 10 10.000000 512
#
set cbr_(1) [$ns_ create-connection  CBR $node_(3) \
	      CBR $node_(1) 0]
$cbr_(1) set packetSize_ 512
$cbr_(1) set interval_ 0.1
$cbr_(1) set random_ 0
$cbr_(1) set maxpkts_ 10
$ns_ at 471.166666666667 "$cbr_(1) start"
#
# 471.166667 2 -> 3 cbr 10 10.000000 512
#
set cbr_(2) [$ns_ create-connection  CBR $node_(2) \
	      CBR $node_(3) 0]
$cbr_(2) set packetSize_ 512
$cbr_(2) set interval_ 0.1
$cbr_(2) set random_ 0
$cbr_(2) set maxpkts_ 10
$ns_ at 471.166666666667 "$cbr_(2) start"
#
# nodes: 3, max time: 900.000000, max x: 1000.000000, max y: 1000.000000
# nominal range: 250.000000 link bw: 2000000.000000
# comm pattern: comm 
#
$ns_ at 622.522589747 "$node_(1) setdest 477.500000000 392.500000000 1.000000000"
$ns_ at 207.515059694 "$node_(1) setdest 480.000000000 240.000000000 1.000000000"
$ns_ at 0.000000000 "$node_(1) setdest 65.000000000 242.500000000 1.000000000"
$node_(1) set Z_ 0.0
$node_(1) set Y_ 35.000000000
$node_(1) set X_ 62.500000000
$ns_ at 252.543090643 "$node_(2) setdest 212.500000000 350.000000000 1.000000000"
$ns_ at 72.543090643 "$node_(2) setdest 217.500000000 97.500000000 1.000000000"
$ns_ at 0.000000000 "$node_(2) setdest 397.500000000 97.500000000 1.000000000"
$node_(2) set Z_ 0.0
$node_(2) set Y_ 25.000000000
$node_(2) set X_ 395.000000000
$ns_ at 0.000000000 "$node_(3) setdest 695.000000000 67.500000000 1.000000000"
$node_(3) set Z_ 0.0
$node_(3) set Y_ 387.500000000
$node_(3) set X_ 47.500000000