[ns] Traffic in LEACH
Hi I am using ns2.29(with mannasim framework).I need to run LEACH protocol. I established CBR traffic between 2 nodes and tried to send data...From trace file , i came to know that source sends the packet and sink node is not receiving the packet. Wat could be the problem...?If i use protocols like AODV or DumbAgent then i am able to send data successfully.Further i need a tcl script for executing LEACH..I have doubts in setting the port no and father address values for LEACH protocol
[ns] How to add trace format for protocol(LEACH)in cmu trace...?
in cmu-trace.cc trace fromat is added for protocols like aodv,tora,smac etc.. ..how to add trace format for leach in cmu trace.cc ...?
[ns] SENDING DATA IN LEACH
Hi... I generated tcl for LEACH protocol using Script generator tool in manasim framework...i am using ns 2.29..Its not working properly.simulation time,data transfer, nam...nothing works .please help me THANKS
[ns] NEED HELP IN LEACH
nodes generate data...I need to send them to clusterheads and forward to the destination...How to do this..?i generated tcl using script generator tool available in manasim framework...(ns 2.29).. but data transfer is not taking place. PLEASE HELP ME>>>THANKS
[ns] NEED HELP IN LEACH TCL
Hi... I generated tcl for LEACH protocol using Script generator tool in manasim framework...i am using ns 2.29..Its not working properly.simulation time,data transfer, nam...nothing works .please help me THANKS
[ns] How clustering is done in LEACH......?
Hi, I read how clustering is formed in LEACH protocol.Each paper say it in different way and i dont know its implemented.So help me in " how clustering of nodes is done in LEACH " THANKS
[ns] error in generation of LEACH tcl file using script generator tool in manasim framework
I am usin ns2.29 I generated tcl for LEACH protocol in wsn using script generator tool (in manasim framework) and when i run that tcl i am not getting the NAM output...some error in displaying NAM..I am getting errors like NODES NOT DEFINEDmay be i would have done wrongly in that script generator tool... But when i did for AODV protocol i am getting the result.so ...please let me know wat to do.
[ns] how to draw xgraph from tae trace file
please tel me how to draw the xgraph from trace file.?
[ns] sample code for wsn
I have pasted sample tcl file and scenario file here...
save scn file as wsn1.scn and tcl file as (say)wsn1.tcl and run tcl file...
try runnin thisif any bugs then let me know...
wsn1.tcl
# ==
# Define options
# ==
set val(chan) Channel/WirelessChannel;# Channel Type
set val(prop) Propagation/TwoRayGround ;# radio-propagation model
set val(netif) Phy/WirelessPhy/802_15_4
set val(mac)Mac/802_15_4
set val(ifq)Queue/DropTail/PriQueue;# interface queue type
set val(ll) LL ;# link layer type
set val(ant)Antenna/OmniAntenna;# antenna model
set val(ifqlen) 50 ;# max packet in ifq
set val(nn) 25 ;# number of mobilenodes
set val(rp) AODV ;# routing protocol
set val(x) 50
set val(y) 50
set val(nam)wsn1.nam
set val(traffic)ftp;# cbr/poisson/ftp
#read command line arguments
proc getCmdArgu {argc argv} {
global val
for {set i 0} {$i < $argc} {incr i} {
set arg [lindex $argv $i]
if {[string range $arg 0 0] != "-"} continue
set name [string range $arg 1 end]
set val($name) [lindex $argv [expr $i+1]]
}
}
getCmdArgu $argc $argv
set appTime10.0 ;# in seconds
set appTime20.3 ;# in seconds
set appTime30.7 ;# in seconds
set stopTime100 ;# in seconds
# Initialize Global Variables
set ns_ [new Simulator]
set tracefd [open ./wsn1.tr w]
$ns_ trace-all $tracefd
if { "$val(nam)" == "wsn1.nam" } {
set namtrace [open ./$val(nam) w]
$ns_ namtrace-all-wireless $namtrace $val(x) $val(y)
}
$ns_ puts-nam-traceall {# nam4wpan #} ;# inform nam that this is a
trace file for wpan (special handling needed)
Mac/802_15_4 wpanNam namStatus on ;# default = off (should be
turned
on before other 'wpanNam' commands can work)
#Mac/802_15_4 wpanNam ColFlashClr gold ;# default = gold
#Mac/802_15_4 wpanNam NodeFailClr grey ;# default = grey
# For model 'TwoRayGround'
set dist(5m) 7.69113e-06
set dist(9m) 2.37381e-06
set dist(10m) 1.92278e-06
set dist(11m) 1.58908e-06
set dist(12m) 1.33527e-06
set dist(13m) 1.13774e-06
set dist(14m) 9.81011e-07
set dist(15m) 8.54570e-07
set dist(16m) 7.51087e-07
set dist(20m) 4.80696e-07
set dist(25m) 3.07645e-07
set dist(30m) 2.13643e-07
set dist(35m) 1.56962e-07
set dist(40m) 1.20174e-07
Phy/WirelessPhy set CSThresh_ $dist(15m)
Phy/WirelessPhy set RXThresh_ $dist(15m)
# set up topography object
set topo [new Topography]
$topo load_flatgrid $val(x) $val(y)
# Create God
set god_ [create-god $val(nn)]
set chan_1_ [new $val(chan)]
# configure node
$ns_ node-config -adhocRouting $val(rp) \
-llType $val(ll) \
-macType $val(mac) \
-ifqType $val(ifq) \
-ifqLen $val(ifqlen) \
-antType $val(ant) \
-propType $val(prop) \
-phyType $val(netif) \
-topoInstance $topo \
-agentTrace OFF \
-routerTrace OFF \
-macTrace ON \
-movementTrace OFF \
#-energyModel "EnergyModel" \
#-initialEnergy 1 \
#-rxPower 0.3 \
#-txPower 0.3 \
-channel $chan_1_
for {set i 0} {$i < $val(nn) } {incr i} {
set node_($i) [$ns_ node]
$node_($i) random-motion 0 ;# disable random motion
}
source ./wsn1.scn
# Setup traffic flow between nodes
proc cbrtraffic { src dst interval starttime } {
global ns_ node_
set udp($src) [new Agent/UDP]
eval $ns_ attach-agent \$node_($src) \$udp($src)
set null($dst) [new Agent/Null]
eval $ns_ attach-agent \$node_($dst) \$null($dst)
set cbr($src) [new Application/Traffic/CBR]
eval \$cbr($src) set packetSize_ 70
eval \$cbr($src) set interval_ $interval
eval \$cbr($src) set random_ 0
#eval \$cbr($src) set maxpkts_ 1
eval \$cbr($src) attach-agent \$udp($src)
eval $ns_ connect \$udp($src) \$null($dst)
$ns_ at $starttime "$cbr($src) start"
}
proc poissontraffic { src dst interval starttime } {
global ns_ node_
set udp($src) [new Agent/UDP]
eval $ns_ attach-agent \$node_($src) \$udp($src)
set null($dst) [new Agent/Null]
eval $ns_ attach-agent \$node_($dst) \$null($dst)
set expl($src) [new Application/Traffic/Exponential]
eval \$expl($src) set packetSize_ 70
eval \$expl($src) set burst_time_ 0
eval \$expl($src) set idle_time_ [expr
$interval*1000.0-70.0*8/250]ms ;# idle_time + pkt_tx_time = inte
[ns] LEACH Algorithm explanation....
hi i need LEACH algorithm explanation for implementing in ns2.29 ... i also need code explanations for that please send me
