[ns] Ant: warning: Route to base_stn not known: dropping pkt (EDCF nodes)
süss lieb
suesslieb at yahoo.de
Thu Jul 28 04:05:36 PDT 2005
Hello,
please help me,
I`m using the DSDV routing protocol.
I simulate:
5 wired node W0 W1 W2 W3 W4
2 basis station(BS0 ,BS1) connect to same wired node
W0
2 mobile node connect to the same basis station BS(0)
# set up for hierarchical routing
$ns node-config -addressType hierarchical
AddrParams set domain_num_ 3
lappend cluster_num 5 1 1
AddrParams set cluster_num_ $cluster_num
lappend eilastlevel 1 1 1 1 1 3 1
AddrParams set nodes_num_ $eilastlevel
ist that correct?
I get following message:
warning: Route to base_stn not known: dropping pkt
warning: Route to base_stn not known: dropping pkt
warning: Route to base_stn not known: dropping pkt
warning: Route to base_stn not known: dropping pkt
.....
NS existing
thanks very much for any help
programm:
#=================================================================
# Define options EDCF2 for Wireless lan(2 Mobile
node 4 Router )
#==================================================================
set opt(chan) Channel/WirelessChannel
set opt(prop) Propagation/TwoRayGround
set opt(netif) Phy/WirelessPhy
set opt(mac) Mac/802_11e
set opt(ifq) Queue/DTail/PriQ
set opt(ll) LL
set opt(ant) Antenna/OmniAntenna
set opt(x) 670
set opt(y) 670
set opt(ifqlen) 50
set opt(tr) edcf2.tr
set opt(namtr) edcf2.nam
set opt(nn) 2
set opt(adhocRouting) DSDV
set opt(cp) ""
set opt(sc)
"../mobility/scene/scen-3-test"
set opt(stop) 20
set num_wired_nodes 5
set num_bs_nodes 2
set val(start-src) 0.0
set val(stop-src) 10.0
Mac/802_11e set dataRate_ 1Mb
Mac/802_11e set basicRate_ 1Mb
set ns [new Simulator]
$ns color 0 Brown
# set up for hierarchical routing
$ns node-config -addressType hierarchical
AddrParams set domain_num_ 3
lappend cluster_num 5 1 1
AddrParams set cluster_num_ $cluster_num
lappend eilastlevel 1 1 1 1 1 3 1
AddrParams set nodes_num_ $eilastlevel
$ns use-newtrace
set tracefd [open $opt(tr) w]
$ns trace-all $tracefd
set namtracefd [open $opt(namtr) w]
$ns namtrace-all-wireless $namtracefd $opt(x)
$opt(y)
set topo [new Topography]
$topo load_flatgrid $opt(x) $opt(y)
# god needs to know the number of all wireless
interfaces
create-god [expr $opt(nn) + $num_bs_nodes]
#create wired nodes
set temp {0.0.0 0.1.0 0.2.0 0.3.0 0.4.0}
for {set i 0} {$i < $num_wired_nodes} {incr i} {
set host($i) [$ns node [lindex $temp $i]]
$host($i) shape box
$host($i) set X_ [expr ($i * 100) ]
$host($i) set Y_ [expr ($i * 100) ]
$host($i) set Z_ 0.0
}
$ns at 0.0 "$host(0) label \"Router\""
$ns at 0.0 "$host(1) label \"Voice_server 1\""
$ns at 0.0 "$host(2) label \"Voice_server 2\""
$ns at 0.0 "$host(3) label \"Data_server 3\""
$ns at 0.0 "$host(4) label \"Data_server 4\""
$ns node-config -adhocRouting $opt(adhocRouting) \
-llType $opt(ll) \
-macType $opt(mac) \
-ifqType $opt(ifq) \
-ifqLen $opt(ifqlen) \
-antType $opt(ant) \
-propInstance [new $opt(prop)] \
-phyType $opt(netif) \
-channel [new $opt(chan)] \
-topoInstance $topo \
-wiredRouting ON \
-agentTrace ON \
-routerTrace OFF \
-macTrace OFF
set temp {1.0.0 1.0.1 1.0.2 }
set BS(0) [$ns node [lindex $temp 0]]
set BS(1) [$ns node 2.0.0]
$BS(0) random-motion 0
$BS(1) random-motion 0
$BS(0) set X_ 1.0
$BS(0) set Y_ 2.0
$BS(0) set Z_ 0.0
$BS(1) set X_ 650.0
$BS(1) set Y_ 600.0
$BS(1) set Z_ 0.0
$ns at 0.00 "$BS(0) setdest 200 200 20"
$ns at 0.00 "$BS(1) setdest 300 300 20"
#configure for mobilenodes
$ns node-config -wiredRouting OFF
for {set j 1} {$j < $opt(nn)+1} {incr j} {
set mobile($j) [ $ns node [lindex $temp \
[expr $j]] ]
$mobile($j) base-station [AddrParams addr2id
[$BS(0) node-addr]]
puts "mobile($j) = [$mobile($j) node-addr] =
[AddrParams addr2id [$mobile($j) node-addr]]"
}
$ns at 0.05 "$mobile(1) setdest 100 450 10"
$ns at 0.05 "$ns trace-annotate \"MN 1 starts moving
at t=0 s.\""
$ns at 0.05 "$mobile(1) add-mark m1 green circle"
$ns at 0.05 "$mobile(2) setdest 100 450 10"
$ns at 0.05 "$ns trace-annotate \"MN 2 starts moving
at t=0 s.\""
$ns at 0.05 "$mobile(2) add-mark m1 green circle"
puts ""
puts "host0 = [$host(0) node-addr] = [AddrParams
addr2id [$host(0) node-addr]]"
puts "host1 = [$host(1) node-addr] = [AddrParams
addr2id [$host(1) node-addr]]"
puts "host2 = [$host(2) node-addr] = [AddrParams
addr2id [$host(2) node-addr]]"
puts "host3 = [$host(3) node-addr] = [AddrParams
addr2id [$host(3) node-addr]]"
puts "host4= [$host(4) node-addr] = [AddrParams
addr2id [$host(4) node-addr]]"
puts "BS0 = [$BS(0) node-addr] = [AddrParams addr2id
[$BS(0) node-addr]]"
puts "BS1 = [$BS(1) node-addr] = [AddrParams addr2id
[$BS(1) node-addr]]"
puts ""
for {set i 1} {$i < $opt(nn)+1} {incr i} {
$ns at 0.0 "$mobile($i) label \"mobile node $i \""
}
#create links between wired and BS nodes
$ns duplex-link $host(1) $host(0) 5Mb 2ms DropTail
$ns duplex-link $host(2) $host(0) 5Mb 2ms DropTail
$ns duplex-link $host(3) $host(0) 5Mb 2ms DropTail
$ns duplex-link $host(4) $host(0) 5Mb 2ms DropTail
$ns duplex-link $host(0) $BS(0) 5Mb 2ms DropTail
$ns duplex-link $host(0) $BS(1) 5Mb 2ms DropTail
$ns duplex-link-op $host(1) $host(0) orient down
$ns duplex-link-op $host(2) $host(0) orient down
$ns duplex-link-op $host(3) $host(0) orient down
$ns duplex-link-op $host(4) $host(0) orient down
$ns duplex-link-op $host(0) $BS(0) orient left-down
$ns duplex-link-op $host(0) $BS(1) orient right-down
set sink_1h [new Agent/LossMonitor]
set sink_2h [new Agent/LossMonitor]
set sink_3h [new Agent/LossMonitor]
set sink_4h [new Agent/LossMonitor]
set sink_1m [new Agent/LossMonitor]
set sink_2m [new Agent/LossMonitor]
$ns attach-agent $host(1) $sink_1h
$ns attach-agent $host(2) $sink_2h
$ns attach-agent $host(3) $sink_3h
$ns attach-agent $host(4) $sink_4h
$ns attach-agent $host(1) $sink_1m
$ns attach-agent $host(2) $sink_2m
############## Traffic CBR VOIP ################
# router host1 zu mobile 1
#-----------------------------
#-----------------------------
#Setup a mUDP connection
########################
set sink_1h [new Agent/mUDP]
#set the sender trace file name (sd)
$sink_1h set_filename send_daten_von_host_1
$sink_1h set class_ 0
$sink_1h set prio_ 0
$ns attach-agent $host(1) $sink_1h
set sink_1m [new Agent/mUdpSink]
#set the receiver trace file name (rd)
$sink_1m set_filename receive_daten_mobile_1
$ns attach-agent $mobile(1) $sink_1m
$ns connect $sink_1h $sink_1m
$sink_1h set fid_ 1
#Setup a CBR over UDP connection
###############################
set voip_h1 [new Application/Traffic/CBR]
$voip_h1 attach-agent $sink_1h
$voip_h1 set type_ CBR
$voip_h1 set packetSize_ 160
$voip_h1 set burst_time_ 1.004s
$voip_h1 set idle_time_ 1.587s
$voip_h1 set rate_ 32k
#Schedule events for the CBR and FTP agents
# Traffic voice von Knoten 1 zu router 1 CBR
$ns at $val(start-src) "$voip_h1 start"
$ns at $val(stop-src) "$voip_h1 stop"
$ns at $val(start-src) "$ns trace-annotate \" HOST 1
=CBR=> MN 1 at t=$val(start-src) s!\""
# mobile 1 zu host 1
#-----------------------------
#-----------------------------
#Setup a mUDP connection
########################
set sink_1m [new Agent/mUDP]
#set the sender trace file name (sd)
$sink_1m set_filename send_daten_von_mobile_1
$sink_1m set class_ 0
$sink_1m set prio_ 0
$ns attach-agent $mobile(1) $sink_1m
set sink_1h [new Agent/mUdpSink]
#set the receiver trace file name (rd)
$sink_1h set_filename receive_daten_host_1
$ns attach-agent $host(1) $sink_1h
$ns connect $sink_1m $sink_1h
$sink_1h set fid_ 2
#Setup a CBR over UDP connection
################################
set voip_m1 [new Application/Traffic/CBR]
$voip_m1 attach-agent $sink_1m
$voip_m1 set packetSize_ 160
$voip_m1 set burst_time_ 1.004s
$voip_m1 set idle_time_ 1.587s
$voip_m1 set rate_ 32k
$voip_m1 set random_ false
#Schedule events for the CBR and FTP agents
# Traffic voice von Knoten 1 zu router 1 CBR
$ns at $val(start-src) "$voip_m1 start"
$ns at $val(stop-src) "$voip_m1 stop"
$ns at $val(start-src) "$ns trace-annotate \"MN 1
=CBR=> HOST 1 at t=$val(start-src) s!\""
## router host2 zu mobile 2
#-----------------------------
#-----------------------------
#Setup a mUDP connection
#########################
set sink_2h [new Agent/mUDP]
#set the sender trace file name (sd)
$sink_2h set_filename send_daten_von_host_2
$sink_2h set class_ 1
$sink_2h set prio_ 1
$ns attach-agent $host(2) $sink_2h
set sink_2m [new Agent/mUdpSink]
#set the receiver trace file name (rd)
$sink_2m set_filename receive_daten_mobile_2
$ns attach-agent $mobile(2) $sink_2m
$ns connect $sink_2h $sink_2m
$sink_2h set fid_ 3
#Setup a CBR over UDP connection
################################
set voip_h2 [new Application/Traffic/CBR]
$voip_h2 attach-agent $sink_2h
$voip_h2 set type_ CBR
$voip_h2 set packetSize_ 160
$voip_h2 set burst_time_ 1.004s
$voip_h2 set idle_time_ 1.587s
$voip_h2 set rate_ 32k
#Schedule events for the CBR and FTP agents
$ns at $val(start-src) "$voip_h2 start"
$ns at $val(stop-src) "$voip_h2 stop"
$ns at $val(start-src) "$ns trace-annotate \" HOST 2
=CBR=> MN 2 at t=$val(start-src) s!\""
# mobile 2 zu host 2
#-----------------------------
#-----------------------------
#Setup a mUDP connection
########################
set sink_2m [new Agent/mUDP]
#set the sender trace file name (sd)
$sink_2m set_filename send_daten_von_mobile_2
$sink_2m set class_ 1
$sink_2m set prio_ 1
$ns attach-agent $mobile(2) $sink_2m
set sink_2h [new Agent/mUdpSink]
#set the receiver trace file name (rd)
$sink_2h set_filename receive_daten_host_2
$ns attach-agent $host(2) $sink_2h
$ns connect $sink_2m $sink_2h
$sink_2h set fid_ 4
#Setup a CBR over UDP connection
################################
set voip_m2 [new Application/Traffic/CBR]
$voip_m2 attach-agent $sink_2m
$voip_m2 set packetSize_ 160
$voip_m2 set burst_time_ 1.004s
$voip_m2 set idle_time_ 1.587s
$voip_m2 set rate_ 32k
$voip_m2 set random_ false
#Schedule events for the CBR and FTP agents
$ns at $val(start-src) "$voip_m2 start"
$ns at $val(stop-src) "$voip_m2 stop"
$ns at $val(start-src) "$ns trace-annotate \"MN 2
=CBR=> HOST 2 at t=$val(start-src) s!\""
########## Traffic TCP ###########
# setup TCP connections
#Setup a TCP von Mobile node 1 zu router 3
#-------------------------------------------------------------
set tcp_m1 [new Agent/TCP]
#$tcp_m1 set class_ 2
#$tcp_m1 set prio_ 2
$tcp_m1 set window_ 64
$tcp_m1 set packetSize_ 1500
$ns attach-agent $mobile(1) $tcp_m1
set sink_h3 [new Agent/TCPSink]
$ns attach-agent $host(3) $sink_h3
$ns connect $tcp_m1 $sink_h3
$tcp_m1 set fid_ 7
#Setup a FTP over TCP connection
set ftp_m1 [new Application/FTP]
$ftp_m1 attach-agent $tcp_m1
$ftp_m1 set type_ FTP
#Setup a TCP von router 3 zu Mobile node 1
#-------------------------------------------------------------
set tcp_h3 [new Agent/TCP]
#$tcp_h3 set class_ 2
#$tcp_h3 set prio_ 2
$tcp_h3 set window_ 64
$tcp_h3 set packetSize_ 1500
$ns attach-agent $host(3) $tcp_h3
set sink_m1 [new Agent/TCPSink]
$ns attach-agent $mobile(1) $sink_m1
$ns connect $tcp_h3 $sink_m1
#$tcp_h3 set fid_ 3
#Setup a FTP over TCP connection
set ftp_h3 [new Application/FTP]
$ftp_h3 attach-agent $tcp_h3
$ftp_h3 set type_ FTP
#Setup a TCP von Mobile node 2 zu router 4
#-----------------------------------------------------------
set tcp_m2 [new Agent/TCP]
#$tcp_m2 set class_ 3
#$tcp_m2 set prio_ 3
$tcp_m2 set window_ 64
$tcp_m2 set packetSize_ 1500
$ns attach-agent $mobile(2) $tcp_m2
set sink_h4 [new Agent/TCPSink]
$ns attach-agent $host(4) $sink_h4
$ns connect $tcp_m2 $sink_h4
$tcp_m2 set fid_ 8
#Setup a FTP over TCP connection
set ftp_m2 [new Application/FTP]
$ftp_m2 attach-agent $tcp_m2
$ftp_m2 set type_ FTP
#Setup a TCP von router 4 zu Mobile node 2
#------------------------------------------------------------
set tcp_h4 [new Agent/TCP]
#$tcp_h4 set class_ 3
#$tcp_h4 set prio_ 3
$tcp_h4 set window_ 64
$tcp_h4 set packetSize_ 1500
$ns attach-agent $host(4) $tcp_h4
set sink_m2 [new Agent/TCPSink]
$ns attach-agent $mobile(2) $sink_m2
$ns connect $tcp_h4 $sink_m2
#$tcp_h4 set fid_ 4
#Setup a FTP over TCP connection
set ftp_h4 [new Application/FTP]
$ftp_h4 attach-agent $tcp_h4
$ftp_h4 set type_ FTP
############# TCP ###################
# Traffic data von router 3 zu konten 1 TCP
$ns at $val(start-src) "$ftp_m1 start"
$ns at $val(stop-src) "$ftp_m1 stop"
$ns at $val(start-src) "$ns trace-annotate \" mobile 1
=TCP=> Host 3 at t=$val(start-src) s!\""
# Traffic data von router 4 zu konten 2 TCP
$ns at $val(start-src) "$ftp_m2 start"
$ns at $val(stop-src) "$ftp_m2 stop"
$ns at $val(start-src) "$ns trace-annotate \" mobile 2
=TCP=> Host 4 at t=$val(start-src) s!\""
# Traffic data von mobile 1 zu konten router 3 TCP
$ns at $val(start-src) "$ftp_h3 start"
$ns at $val(stop-src) "$ftp_h3 stop"
$ns at $val(start-src) "$ns trace-annotate \" Host 3
=CBR=> Mobile node 1 at t=$val(start-src) s!\""
# Traffic data von mobile 2 zu konten router 4 TCP
$ns at $val(start-src) "$ftp_h4 start"
$ns at $val(stop-src) "$ftp_h4 stop"
$ns at $val(start-src) "$ns trace-annotate \" Host 4
=CBR=> Mobile node 2 at t=$val(start-src) s!\""
#---------------------------------------------------------------------------------------------------
for {set i 1} {$i < $opt(nn)+1} {incr i} {
$ns initial_node_pos $mobile($i) 20
}
for {set i 1} {$i < $opt(nn)+1 } {incr i} {
$ns at $opt(stop).0000010 "$mobile($i) reset";
}
$ns at $opt(stop).0000010 "$BS(0) reset";
$ns at $opt(stop).1 "puts \"NS EXITING...\" ; $ns
halt"
proc stop {} {
global ns tracefd namtracefd opt
$ns flush-trace
close $tracefd
close $namtracefd
#$gawk ??f ?f-tcp.awk ?wired-and-wireless.tr
#exec rm -f wired-and-wireless.xgr
#exec awk -f f-tcp.awk wired-and-wireless.tr >
wired-and-wireless.xgr
exec nam edcf2.nam &
#exec xgraph wired-and-wireless.xgr &
exit 0
}
puts "Starting Simulation..."
$ns run
___________________________________________________________
Gesendet von Yahoo! Mail - Jetzt mit 1GB Speicher kostenlos - Hier anmelden: http://mail.yahoo.de
More information about the Ns-users
mailing list