Hello all,
I solved my "wrong node routing agent" problem. Actually, I was
invoking the wrong ns.exe. After compiling ns2, my command was still
calling the old "uncompiled" version of the executable.
I just wanted to write this here, so this experience might help
somebody else, someday...
thank you for all the replies...
regards
Cenker
Cenker Demir wrote:
>
>
------------------------------------------------------------------------
Hello All,
>
>Related to my question about creating a clone routing
>protocol, and
>according to Mr.Estrella's suggestion I included the
>ns-lib.tcl to the
>beginning of my simulation script as below. I got the
>errors that I
>attached.
>
>I also run ns in tcl/lib, and wrote "source
>ns-lib.tcl" and I got
>
>can't set "defaultRNG": invalid command name "abort"
>
>error line. I have no clue what is wrong... Any
>suggestions?
>
>Best regards
>Cenker
>
>
>#
>======================================================================
># Define options
>#
>======================================================================
>
>source ns-lib.tcl
>
>set val(chan) Channel/WirelessChannel
>set val(prop) Propagation/TwoRayGround
>set val(netif) Phy/WirelessPhy
>set val(mac) Mac/802_11
>set val(ifq) Queue/DropTail/PriQueue
>set val(ll) LL
>set val(ant) Antenna/OmniAntenna
>set val(x) 670 ;# X dimension of the
>topography
>set val(y) 670 ;# Y dimension of the
>topography
>set val(ifqlen) 50 ;# max packet in
>if
>set val(seed) 12120.0
>set val(adhocRouting) AUCTION
>set val(nn) 50 ;# how many
>nodes are simulated
>set val(cp) "mytcp50"
>set val(sc) "myscen50"
>set val(stop) 150.0 ;# simulation
>time
>
>#
>=====================================================================
># Main Program
>#
>======================================================================
>
>puts "$val(adhocRouting)"
>
>#
># Initialize Global Variables
>#
>
># create simulator instance
>
>set ns_ [new Simulator]
>
># setup topography object
>
>set topo [new Topography]
>
># create trace object for ns and nam
>
>set tracefd [open out50.tr w]
>set namtrace [open out50.nam w]
>
>$ns_ trace-all $tracefd
>$ns_ namtrace-all-wireless $namtrace $val(x) $val(y)
>
># define topology
>$topo load_flatgrid $val(x) $val(y)
>
>#
># Create God
>#
>set god_ [create-god $val(nn)]
>
>#create channel #1
>set chan_1_ [new $val(chan)]
>
>#
># define how node should be created
>#
>
>#global node setting
>
>$ns_ node-config -adhocRouting $val(adhocRouting) \
> -llType $val(ll) \
> -macType $val(mac) \
> -ifqType $val(ifq) \
> -ifqLen $val(ifqlen) \
> -antType $val(ant) \
> -propType $val(prop) \
> -phyType $val(netif) \
> -channel $chan_1_ \
> -topoInstance $topo \
> -agentTrace ON \
> -routerTrace ON \
> -macTrace ON
>
>#
># Create the specified number of nodes [$val(nn)] and
>"attach" them
># to the channel.
>
>for {set i 0} {$i < $val(nn) } {incr i} {
> set node_($i) [$ns_ node]
> $node_($i) random-motion 0 ;# disable random motion
> $node_($i) radius 10
>}
>....
>
