sir plz help me for topology creation for aodv and routing table after that i break topology and update routing table
On Wed, May 6, 2015 at 5:00 AM, <ns-users-requ...@isi.edu> wrote: > Send Ns-users mailing list submissions to > ns-users@isi.edu > > To subscribe or unsubscribe via the World Wide Web, visit > http://mailman.isi.edu/mailman/listinfo/ns-users > or, via email, send a message with subject or body 'help' to > ns-users-requ...@isi.edu > > You can reach the person managing the list at > ns-users-ow...@isi.edu > > When replying, please edit your Subject line so it is more specific > than "Re: Contents of Ns-users digest..." > > > Today's Topics: > > 1. Re: how to generate nam file and xgraph (alok9408) > 2. Do we have a Similar tcl file? (Amodu Oluwatosin) > 3. Re: how to generate nam file and xgraph (knudfl) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Mon, 4 May 2015 18:37:32 -0700 (MST) > From: alok9408 <alok9...@gmail.com> > Subject: Re: [ns] how to generate nam file and xgraph > To: ns-users@isi.edu > Message-ID: <1430789852675-29996.p...@n7.nabble.com> > Content-Type: text/plain; charset=us-ascii > > sir, > Again I am trying to generate xgraph file but it gives "Problems > found with input data." > > > > ---------------------------------------blue.tcl------------------------------------------ > #script illustrating the BLUE algorithm > #Senders are TCP-SACK senders, and receivers are TCP-SACK sinks > > set ns [new Simulator] > > # turn on ns and nam tracing > set f0 [open out0.data w] > set f1 [open out1.data w] > set f2 [open out2.data w] > set f3 [open out3.nam w] > #$ns trace-all $f > $ns namtrace-all $f3 > > #set the no of TCP flows here > set nodenum 5 > > set start_time 1.0 > set finish_time 50 > > # create the nodes > > #First create TCP senders and receivers > > for {set i 0} {$i < $nodenum} {incr i} { > > set s($i) [$ns node] > set r($i) [$ns node] > } > > #Then create the 2 back-bone routers > set n1 [$ns node] > set n2 [$ns node] > > # create the links > #betwwen the senders and n1, receivers and n2 > for {set i 0} {$i < $nodenum} {incr i} { > > $ns duplex-link $s($i) $n1 10Mb 1ms DropTail > $ns duplex-link $r($i) $n2 10Mb 1ms DropTail > > } > > #Bottle neck link between between n1 and n2 > $ns simplex-link $n1 $n2 1Mbps 100ms Blue > $ns simplex-link $n2 $n1 1Mbps 100ms DropTail > > #Configure BLUE queue parameters here > set blueq [[$ns link $n1 $n2] queue] > $blueq set decrement 0.00025 > $blueq set increment 0.0025 > $blueq set dhold-time 50ms > $blueq set ihold-time 50ms > > #Enable ECN here > $blueq set setbit true > > #set the queue-limit between n1 and n2 > $ns queue-limit $n1 $n2 50 > > #set up queue monitor, sample every 0.5 seconds > set qfile [open "test-blue-qsize.out" w] > set qm [$ns monitor-queue $n1 $n2 $qfile 0.5] > [$ns link $n1 $n2] queue-sample-timeout > > #create the random number generator > set rng [new RNG] > > > # create TCP agents > for {set i 0} {$i < $nodenum} {incr i} { > > set tcp($i) [new Agent/TCP/Sack1] > $tcp($i) set fid_ [expr ($i + 1)] > $tcp($i) set ecn_ 1 > set sink($i) [new Agent/TCPSink/Sack1/DelAck] > $sink($i) set ecn_ 1 > $ns attach-agent $s($i) $tcp($i) > $ns attach-agent $r($i) $sink($i) > $ns connect $tcp($i) $sink($i) > set ftp($i) [new Application/FTP] > $ftp($i) attach-agent $tcp($i) > #set p($i) [new Application/Traffic/Pareto] > #$p($i) set packetSize_ 1000 > #$p($i) set burst_time_ 200ms > #$p($i) set idle_time_ 200ms > #$p($i) set shape_ 1.5 > #$p($i) set rate_ 10000K > #$p($i) attach-agent $tcp($i) > set start_time [$rng uniform 0 1] > $ns at $start_time "$ftp($i) start" > #$ns at $start_time "$p($i) start" > } > > > $ns at $finish_time "finish" > > > proc finish {} { > global ns f0 f1 f2 f3 > #$ns flush-trace > #close $qfile > puts "running nam..." > close $f0 > close $f1 > close $f2 > exec nam out3.nam & > > exec xgraph out0.tr out1.tr out2.tr -geometry 800x400 & > exit 0 > } > > $ns run > > > > -- > View this message in context: > http://network-simulator-ns-2.7690.n7.nabble.com/how-to-generate-nam-file-and-xgraph-tp29986p29996.html > Sent from the ns-users mailing list archive at Nabble.com. > > > > ------------------------------ > > Message: 2 > Date: Tue, 5 May 2015 10:56:44 +0800 > From: Amodu Oluwatosin <amoduahmedto...@gmail.com> > Subject: [ns] Do we have a Similar tcl file? > To: ns-users@isi.edu > Message-ID: > < > ca+2pfejkjuzc7ez_vjxqbsxj+g3kvu7_xrhqebkfs_mb_lt...@mail.gmail.com> > Content-Type: text/plain; charset=UTF-8 > > Hi, > > A very Good day to you, > > > S1___________R1____________R2............................D1 (RI-R2 > Wired link 200Mbps, 25ms; R2-D1Wireless link 5ms) > > > > S1-R1 > Wired Link(1Gbps, Tms) > > Please I would like to know if I can find a similar topology with the one > above or if someone is willing to share. > It consist of a wired link from a source S1 or a number of source which is > connected to a router ( bottleneck). The router R1 is connected to another > router R2 via a wired link. R2 is connected to D1 or a number of > destinations via a wireless link. > > I will also appreciate where can I get the following TCP variants (CUBIC > TCP, HSTCP, WESTWOOD AND BIC) > > > Thank you > > > ------------------------------ > > Message: 3 > Date: Tue, 5 May 2015 09:35:34 -0700 (MST) > From: knudfl <knu...@ofir.dk> > Subject: Re: [ns] how to generate nam file and xgraph > To: ns-users@isi.edu > Message-ID: <1430843734181-30003.p...@n7.nabble.com> > Content-Type: text/plain; charset=us-ascii > > > blue.tcl > > Read my above post : > "Some many lines for "Creating Output Files for Xgraph" were not added to > blue.tcl". > Please read http://www.isi.edu/nsnam/ns/tutorial/nsscript4.html > > Required is : > # ----------------------------------- Most of this --------------- > > proc attach-expoo-traffic { node sink size burst idle rate } { > #Get an instance of the simulator > set ns [Simulator instance] > #Create a UDP agent and attach it to the node > set source [new Agent/UDP] > $ns attach-agent $node $source > > #Create an Expoo traffic agent and set its configuration parameters > set traffic [new Application/Traffic/Exponential] > $traffic set packetSize_ $size > $traffic set burst_time_ $burst > $traffic set idle_time_ $idle > $traffic set rate_ $rate > > # Attach traffic source to the traffic generator > $traffic attach-agent $source > #Connect the source and the sink > $ns connect $source $sink > return $traffic > } > # ----------------------------------- > > # ----------------------------------- And this -------------- > set sink0 [new Agent/LossMonitor] > set sink1 [new Agent/LossMonitor] > set sink2 [new Agent/LossMonitor] > $ns attach-agent $n4 $sink0 > $ns attach-agent $n4 $sink1 > $ns attach-agent $n4 $sink2 > > set source0 [attach-expoo-traffic $n0 $sink0 200 2s 1s 100k] > set source1 [attach-expoo-traffic $n1 $sink1 200 2s 1s 200k] > set source2 [attach-expoo-traffic $n2 $sink2 200 2s 1s 300k] > # --------------------------------- > > # --------------------------------- And some ..... -------------- > proc record {} { > global sink0 sink1 sink2 f0 f1 f2 > #Get an instance of the simulator > set ns [Simulator instance] > #Set the time after which the procedure should be called again > set time 0.5 > #How many bytes have been received by the traffic sinks? > set bw0 [$sink0 set bytes_] > set bw1 [$sink1 set bytes_] > set bw2 [$sink2 set bytes_] > #Get the current time > set now [$ns now] > #Calculate the bandwidth (in MBit/s) and write it to the files > puts $f0 "$now [expr $bw0/$time*8/1000000]" > puts $f1 "$now [expr $bw1/$time*8/1000000]" > puts $f2 "$now [expr $bw2/$time*8/1000000]" > #Reset the bytes_ values on the traffic sinks > $sink0 set bytes_ 0 > $sink1 set bytes_ 0 > $sink2 set bytes_ 0 > #Re-schedule the procedure > $ns at [expr $now+$time] "record" > # --------------------------------------------------- > > # --------------------------- And maybe like this ...... --------------- > $ns at 0.0 "record" > $ns at 10.0 "$source0 start" > $ns at 10.0 "$source1 start" > $ns at 10.0 "$source2 start" > $ns at 50.0 "$source0 stop" > $ns at 50.0 "$source1 stop" > $ns at 50.0 "$source2 stop" > $ns at 60.0 "finish" > # --------------------------------- > > - > > > > -- > View this message in context: > http://network-simulator-ns-2.7690.n7.nabble.com/how-to-generate-nam-file-and-xgraph-tp29986p30003.html > Sent from the ns-users mailing list archive at Nabble.com. > > > > ------------------------------ > > _______________________________________________ > Ns-users mailing list > Ns-users@isi.edu > http://mailman.isi.edu/mailman/listinfo/ns-users > > > End of Ns-users Digest, Vol 137, Issue 5 > **************************************** >
