[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

problems with Dinamic Routing



Hello,
I'm experiencing problems running any script that contains any of the
following:
rtproto Static
rtproto Session
rtproto DV

I'm using
ns-2.1b3
on Solaris 2.5.1

Thanks in advance for your help.
Antonio

EXAMPLE:
when I run the example3.tcl from Marc Greis's on line tutorial
(http://titan.cs.uni-bonn.de/~greis/ns/ns.html) I get the following
errors


invalid command name ""
    while executing
"$node set neighbor_"
    (procedure "pre-init-all" line 11)
    (Agent/rtProto/DV next line 11)
    invoked from within
"$self next $node"
    (procedure "pre-init-all" line 4)
    (Agent/rtProto/DV init line 4)
    invoked from within
"pre-init-all init {}"
    (Class create line 1)
    invoked from within
"Agent/rtProto/DV create pre-init-all {}"
    ("eval" body line 1)
    invoked from within
"eval [list $self] create [list $m] $args         "
    (procedure "Agent/rtProto/DV" line 5)
    (Class unknown line 5)
    invoked from within
"Agent/rtProto/$proto pre-init-all $args"
    (procedure "_o10" line 8)
    (RouteLogic register line 8)
    invoked from within
"_o10 register DV"
    ("eval" body line 1)
    invoked from within
"eval [$self get-routelogic] register $proto $args"
    (procedure "_o3" line 2)
    (Simulator rtproto line 2)
    invoked from within
"$ns rtproto DV"
    (file "example3.tcl" line 5)


EXAMPLE3.TCL LISTING

#Create a simulator object
set ns [new Simulator]

#Tell the simulator to use dynamic routing
$ns rtproto DV

#Open the nam trace file
set nf [open out.nam w]
$ns namtrace-all $nf


#Define a 'finish' procedure
proc finish {} {
        global ns nf
        $ns flush-trace
        #Close the trace file
        close $nf
        #Execute nam on the trace file
        exec nam out.nam &
        exit 0
}

#Create seven nodes
for {set i 0} {$i < 7} {incr i} {
        set n($i) [$ns node]
}


#Create links between the nodes
for {set i 0} {$i < 7} {incr i} {
        $ns duplex-link $n($i) $n([expr ($i+1)%7]) 1Mb 10ms DropTail
}

#Create a CBR agent and attach it to node n(0)
set cbr0 [new Agent/CBR]
$ns attach-agent $n(0) $cbr0
$cbr0 set packetSize_ 500
$cbr0 set interval_ 0.005

#Create a Null agent (a traffic sink) and attach it to node n(3)
set null0 [new Agent/Null]
$ns attach-agent $n(3) $null0

#Connect the traffic source with the traffic sink
$ns connect $cbr0 $null0

#Schedule events for the CBR agent and the network dynamics
$ns at 0.5 "$cbr0 start"
$ns rtmodel-at 1.0 down $n(1) $n(2)
$ns rtmodel-at 2.0 up $n(1) $n(2)
$ns at 4.5 "$cbr0 stop"
#Call the finish procedure after 5 seconds of simulation time
$ns at 5.0 "finish"

#Run the simulation
$ns run