There seems to be a problem in your routing agent. Match your code with that of DumbAgent (another routing protocol which does not do anything): /ns/ns-allinone-2.30/ns-2.30/mobile/dumb-agent.*
Tarun Bansal http://bansal.tarun.googlepages.com/ On 2/13/07, shams haq <[EMAIL PROTECTED]> wrote: > > > > ----- Forwarded Message ---- > From: shams haq <[EMAIL PROTECTED]> > To: ns-users@isi.edu > Sent: Monday, February 12, 2007 10:38:05 AM > Subject: tcl or routing agent problem > > hi all buddies i am stuck at a point and need immediate help if anybody can > do for me i have run script simple-wireless.tcl on my routing agent my > routing agent do nothing but i have construct structure for my agent. when i > ran make my object file has been made but when in simple-wireless.tcl, i use > my own routing agent it gives following errors plz help me out in this > situation thanx in advance > > > num_nodes is set 2 > > warning: Please use -channel as shown in tcl/ex/wireless-mitf.tcl > > INITIALIZE THE LIST xListHead > > (_o17 cmd line 1) > > invoked from within > > "_o17 cmd port-dmux _o26" > > invoked from within > > "catch "$self cmd $args" ret" > > invoked from within > > "if [catch "$self cmd $args" ret] { > > set cls [$self info class] > > global errorInfo > > set savedInfo $errorInfo > > error "error when calling class $cls: $args" $..." > > (procedure "_o17" line 2) > > (SplitObject unknown line 2) > > invoked from within > > "$agent port-dmux $dmux_" > > (procedure "_o14" line 11) > > (Node/MobileNode add-target-rtagent line 11) > > invoked from within > > "$self add-target-rtagent $agent $port" > > (procedure "_o14" line 23) > > (Node/MobileNode add-target line 23) > > invoked from within > > "$self add-target $agent $port" > > (procedure "_o14" line 15) > > (Node attach line 15) > > invoked from within > > "$node attach $ragent [Node set rtagent_port_]" > > (procedure "_o3" line 71) > > (Simulator create-wireless-node line 71) > > invoked from within > > "_o3 create-wireless-node" > > ("eval" body line 1) > > invoked from within > > "eval $self create-wireless-node $args" > > (procedure "_o3" line 14) > > (Simulator node line 14) > > invoked from within > > "$ns_ node" > > ("for" body line 2) > > invoked from within > > "for {set i 0} {$i < $val(nn) } {incr i} { > > set node_($i) [$ns_ node] > > $node_($i) random-motion 0 ;# disable random motion > > }" > > (file > "/root/ns-allinone-2.28/ns-2.28/ns-tutorial/examples/simple-wireless.tcl" > line 93) > > [EMAIL PROTECTED] ns-2.28]# > > > > > regards; > > shams > > > > > Now that's room service! Choose from over 150,000 hotels > in 45,000 destinations on Yahoo! Travel to find your fit. > > > > > > > ____________________________________________________________________________________ > Expecting? Get great news right away with email Auto-Check. > Try the Yahoo! Mail Beta. > http://advision.webevents.yahoo.com/mailbeta/newmail_tools.html >