LEcture 6 - Ns2 Energy Model
Wireless NEtworking in ns2
By default, nodes have infinite energy, to make it finite, we need to implement energy model.
in the node config we need to include the following lines
-energyModel "EnergyModel" \
-initialEnergy 3.0 \
-txPower 0.9 \
-rxPower 0.5 \
-idlePower 0.45 \
-sleepPower 0.05 \
Energy (joules) = Power (Watts) * Time (sec)
www.nsnam.com for downloading the source codes
Also subscribe to my youtube channel
www.youtube.com/tspradeepkumar
Thanks for watching. Stay Tuned for more Lectures...
Subscribe and Share.
Copy the Source Code here
#Lecture 6
#Example of Wireless networks
#Step 1 initialize variables
#Step 2 - Create a Simulator object
#step 3 - Create Tracing and animation file
#step 4 - topography
#step 5 - GOD - General Operations Director
#step 6 - Create nodes
#Step 7 - Create Channel (Communication PATH)
#step 8 - Position of the nodes (Wireless nodes needs a location)
#step 9 - Any mobility codes (if the nodes are moving)
#step 10 - TCP, UDP Traffic
#run the simulation
#initialize the variables
set val(chan) Channel/WirelessChannel ;#Channel Type
set val(prop) Propagation/TwoRayGround ;# radio-propagation model
set val(netif) Phy/WirelessPhy ;# network interface type WAVELAN DSSS 2.4GHz
set val(mac) Mac/802_11 ;# MAC type
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) 6 ;# number of mobilenodes
set val(rp) AODV ;# routing protocol
set val(x) 500 ;# in metres
set val(y) 500 ;# in metres
#Adhoc OnDemand Distance Vector
#creation of Simulator
set ns [new Simulator]
#creation of Trace and namfile
set tracefile [open wireless.tr w]
$ns trace-all $tracefile
#Creation of Network Animation file
set namfile [open wireless.nam w]
$ns namtrace-all-wireless $namfile $val(x) $val(y)
#create topography
set topo [new Topography]
$topo load_flatgrid $val(x) $val(y)
#GOD Creation - General Operations Director
create-god $val(nn)
set channel1 [new $val(chan)]
set channel2 [new $val(chan)]
set channel3 [new $val(chan)]
#configure the 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) \
-energyModel "EnergyModel" \
-initialEnergy 3.0 \
-txPower 0.9 \
-rxPower 0.5 \
-idlePower 0.45 \
-sleepPower 0.05 \
-topoInstance $topo \
-agentTrace ON \
-macTrace ON \
-routerTrace ON \
-movementTrace ON \
-channel $channel1
#Energy Model
# the unit of energy is joules = Power (Watts) * time (Seconds)
set n0 [$ns node]
set n1 [$ns node]
set n2 [$ns node]
set n3 [$ns node]
set n4 [$ns node]
set n5 [$ns node]
$n0 random-motion 0
$n1 random-motion 0
$n2 random-motion 0
$n3 random-motion 0
$n4 random-motion 0
$n5 random-motion 0
$ns initial_node_pos $n0 20
$ns initial_node_pos $n1 20
$ns initial_node_pos $n2 20
$ns initial_node_pos $n3 20
$ns initial_node_pos $n4 20
$ns initial_node_pos $n5 50
#initial coordinates of the nodes
$n0 set X_ 10.0
$n0 set Y_ 20.0
$n0 set Z_ 0.0
$n1 set X_ 210.0
$n1 set Y_ 230.0
$n1 set Z_ 0.0
$n2 set X_ 100.0
$n2 set Y_ 200.0
$n2 set Z_ 0.0
$n3 set X_ 150.0
$n3 set Y_ 230.0
$n3 set Z_ 0.0
$n4 set X_ 430.0
$n4 set Y_ 320.0
$n4 set Z_ 0.0
$n5 set X_ 270.0
$n5 set Y_ 120.0
$n5 set Z_ 0.0
#Dont mention any values above than 500 because in this example, we use X and Y as 500,500
#mobility of the nodes
#At what Time? Which node? Where to? at What Speed?
$ns at 1.0 "$n1 setdest 490.0 340.0 25.0"
$ns at 1.0 "$n4 setdest 300.0 130.0 5.0"
$ns at 1.0 "$n5 setdest 190.0 440.0 15.0"
#the nodes can move any number of times at any location during the simulation (runtime)
$ns at 20.0 "$n5 setdest 100.0 200.0 30.0"
#creation of agents
set tcp [new Agent/TCP]
set sink [new Agent/TCPSink]
$ns attach-agent $n0 $tcp
$ns attach-agent $n5 $sink
$ns connect $tcp $sink
set ftp [new Application/FTP]
$ftp attach-agent $tcp
$ns at 1.0 "$ftp start"
set udp [new Agent/UDP]
set null [new Agent/Null]
$ns attach-agent $n2 $udp
$ns attach-agent $n3 $null
$ns connect $udp $null
set cbr [new Application/Traffic/CBR]
$cbr attach-agent $udp
$ns at 1.0 "$cbr start"
$ns at 30.0 "finish"
proc finish {} {
global ns tracefile namfile
$ns flush-trace
close $tracefile
close $namfile
exit 0
}
puts "Starting Simulation"
$ns run
T S Pradeep Kumar
Wireless NEtworking in ns2
By default, nodes have infinite energy, to make it finite, we need to implement energy model.
in the node config we need to include the following lines
-energyModel "EnergyModel" \
-initialEnergy 3.0 \
-txPower 0.9 \
-rxPower 0.5 \
-idlePower 0.45 \
-sleepPower 0.05 \
Energy (joules) = Power (Watts) * Time (sec)
www.nsnam.com for downloading the source codes
Also subscribe to my youtube channel
www.youtube.com/tspradeepkumar
Thanks for watching. Stay Tuned for more Lectures...
Subscribe and Share.
Copy the Source Code here
#Lecture 6
#Example of Wireless networks
#Step 1 initialize variables
#Step 2 - Create a Simulator object
#step 3 - Create Tracing and animation file
#step 4 - topography
#step 5 - GOD - General Operations Director
#step 6 - Create nodes
#Step 7 - Create Channel (Communication PATH)
#step 8 - Position of the nodes (Wireless nodes needs a location)
#step 9 - Any mobility codes (if the nodes are moving)
#step 10 - TCP, UDP Traffic
#run the simulation
#initialize the variables
set val(chan) Channel/WirelessChannel ;#Channel Type
set val(prop) Propagation/TwoRayGround ;# radio-propagation model
set val(netif) Phy/WirelessPhy ;# network interface type WAVELAN DSSS 2.4GHz
set val(mac) Mac/802_11 ;# MAC type
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) 6 ;# number of mobilenodes
set val(rp) AODV ;# routing protocol
set val(x) 500 ;# in metres
set val(y) 500 ;# in metres
#Adhoc OnDemand Distance Vector
#creation of Simulator
set ns [new Simulator]
#creation of Trace and namfile
set tracefile [open wireless.tr w]
$ns trace-all $tracefile
#Creation of Network Animation file
set namfile [open wireless.nam w]
$ns namtrace-all-wireless $namfile $val(x) $val(y)
#create topography
set topo [new Topography]
$topo load_flatgrid $val(x) $val(y)
#GOD Creation - General Operations Director
create-god $val(nn)
set channel1 [new $val(chan)]
set channel2 [new $val(chan)]
set channel3 [new $val(chan)]
#configure the 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) \
-energyModel "EnergyModel" \
-initialEnergy 3.0 \
-txPower 0.9 \
-rxPower 0.5 \
-idlePower 0.45 \
-sleepPower 0.05 \
-topoInstance $topo \
-agentTrace ON \
-macTrace ON \
-routerTrace ON \
-movementTrace ON \
-channel $channel1
#Energy Model
# the unit of energy is joules = Power (Watts) * time (Seconds)
set n0 [$ns node]
set n1 [$ns node]
set n2 [$ns node]
set n3 [$ns node]
set n4 [$ns node]
set n5 [$ns node]
$n0 random-motion 0
$n1 random-motion 0
$n2 random-motion 0
$n3 random-motion 0
$n4 random-motion 0
$n5 random-motion 0
$ns initial_node_pos $n0 20
$ns initial_node_pos $n1 20
$ns initial_node_pos $n2 20
$ns initial_node_pos $n3 20
$ns initial_node_pos $n4 20
$ns initial_node_pos $n5 50
#initial coordinates of the nodes
$n0 set X_ 10.0
$n0 set Y_ 20.0
$n0 set Z_ 0.0
$n1 set X_ 210.0
$n1 set Y_ 230.0
$n1 set Z_ 0.0
$n2 set X_ 100.0
$n2 set Y_ 200.0
$n2 set Z_ 0.0
$n3 set X_ 150.0
$n3 set Y_ 230.0
$n3 set Z_ 0.0
$n4 set X_ 430.0
$n4 set Y_ 320.0
$n4 set Z_ 0.0
$n5 set X_ 270.0
$n5 set Y_ 120.0
$n5 set Z_ 0.0
#Dont mention any values above than 500 because in this example, we use X and Y as 500,500
#mobility of the nodes
#At what Time? Which node? Where to? at What Speed?
$ns at 1.0 "$n1 setdest 490.0 340.0 25.0"
$ns at 1.0 "$n4 setdest 300.0 130.0 5.0"
$ns at 1.0 "$n5 setdest 190.0 440.0 15.0"
#the nodes can move any number of times at any location during the simulation (runtime)
$ns at 20.0 "$n5 setdest 100.0 200.0 30.0"
#creation of agents
set tcp [new Agent/TCP]
set sink [new Agent/TCPSink]
$ns attach-agent $n0 $tcp
$ns attach-agent $n5 $sink
$ns connect $tcp $sink
set ftp [new Application/FTP]
$ftp attach-agent $tcp
$ns at 1.0 "$ftp start"
set udp [new Agent/UDP]
set null [new Agent/Null]
$ns attach-agent $n2 $udp
$ns attach-agent $n3 $null
$ns connect $udp $null
set cbr [new Application/Traffic/CBR]
$cbr attach-agent $udp
$ns at 1.0 "$cbr start"
$ns at 30.0 "finish"
proc finish {} {
global ns tracefile namfile
$ns flush-trace
close $tracefile
close $namfile
exit 0
}
puts "Starting Simulation"
$ns run
T S Pradeep Kumar
Great explanation sir. I am having query like at 3.45 min, you used a concept 'residual energy threshold', can you please tell me the threshold value for the same.
ReplyDeleteAt the Residual Energy Threshold, its 1.0 Joules as per the source code of energy model.cc file... In case, if you want to change the value, you can do that by modifying the source code.
DeleteSir while executing this code I am getting this error. Don't know why please help me resolving this issue.
ReplyDeleteinvalid command name "-llType"
while executing
"-llType $val(ll) \
"
(file "wireless2.tcl" line 75)