[ns] Mobile ip- Handovers- Sctp--HELP!!

martini.spy spyros_mar at yahoo.gr
Tue Mar 3 03:30:58 PST 2009


nobody knows a hint?? :-(
please answer if you know....


martini.spy wrote:
> 
> 
> Hi!
> I have a problem in making handovers in my script when I use
> sctp at transport layer. I use the topology and the method just like in
> the standard wireless3.tcl. 
> However, when I run my script, only
> the first init and init-ack messages are transmitted and received more
> than once but nothing more and of course no data packets are
> exchanged...
> Can anyone please help me?? How else can I do it??
> In
> order to use hierarchical addresses with sctp I have found that I must
> use the -wiredRouting ON  option even for mobile nodes, and I wonder if
> that's why it doesn't work. 
> Any help will be appreciated!! Any ideas what may be wrong??? I am in a
> great hurry....
> 
> Thanks in advance,
> 
> My full tcl script:
> set ns_        [new Simulator]
> 
> set opt(chan)      
>  Channel/WirelessChannel
> set opt(prop)       Propagation/TwoRayGround
> set opt(netif)      Phy/WirelessPhy
> set opt(mac)        Mac/802_11
> set opt(ifq)        Queue/DropTail/PriQueue
> set opt(ll)         LL
> set opt(ant)        Antenna/OmniAntenna
> set opt(x)              1000   ;# X dimension of the topography
> set opt(y)              1000   ;# Y dimension of the topography
> set opt(ifqlen)         50            ;# max packet in ifq
> #set
>  val(seed)           0.0
> set opt(rp)             DSDV                      ; # routing protocol
> set opt(nn)            1             ;# how many nodes are simulated
> set num_wired_nodes      2
> set num_bs_nodes         2  
> 
> set topo    [new Topography]
> 
> $ns_ node-config -addressType hierarchical
> 
> AddrParams set domain_num_ 3           ;# number of domains
> lappend cluster_num 2 1 1            ;# number of clusters
>  in each domain
> AddrParams set cluster_num_ $cluster_num
> lappend eilastlevel  1 1 2 1             ;# number of nodes in each
> cluster 
> AddrParams set nodes_num_ $eilastlevel ;# of each domain
> 
> 
> # create trace object for ns and nam
> 
> set tracefd  [open apop.tr w]
> set namtrace [open apop.nam w]
> 
> $ns_ trace-all $tracefd
> $ns_ namtrace-all-wireless $namtrace $opt(x) $opt(y)
> 
> # define topology
> $topo load_flatgrid $opt(x) $opt(y)
> 
> 
> #create wired nodes
> set Server [$ns_ node 0.0.0] 
> $Server set X_ 500.0
> $Server set Y_ 850.0
> $Server set Z_ 0.0
> 
> set W_node [$ns_ node 0.1.0] 
> $W_node set X_ 500.0
> $W_node set Y_ 710.0
> $W_node set Z_ 0.0
> 
> set god_ [create-god $opt(nn)+2]
> 
> # Create channel #1 and #2
> set chan_1 [new $opt(chan)] ;#umts
> 
> Mac/802_11 set dataRate_ 2.0Mb ;# UMTS data rate
> Phy/WirelessPhy
>  set Pt_ 4.5099 ;# UMTS coverage: r=500m
> Phy/WirelessPhy set freq_ 2.175e9 ;# UMTS radio frequency
> 
> $chan_1 set delay 10ms
> Phy/WirelessPhy set bandwidth_ 384k
> 
> $ns_ node-config -mobileIP ON \
>          -adhocRouting $opt(rp) \
>                  -llType $opt(ll) \
>                  -macType $opt(mac) \
>                  -ifqType $opt(ifq) \
>                  -ifqLen $opt(ifqlen) \
>                  -antType $opt(ant)
>  \
>                  -propType $opt(prop) \
>                  -phyType $opt(netif) \
>          -topoInstance $topo \
>          -agentTrace ON \
>                  -routerTrace OFF \
>                  -macTrace ON \
>                  -wiredRouting ON \
>          -channel $chan_1         
> 
> # Create BSs
> set BS_umts [$ns_ node 1.0.0]
> $BS_umts random-motion 0
> 
> $BS_umts set X_ 150.0
> $BS_umts set Y_
>  610.0
> $BS_umts set Z_ 0.000000000000
> 
> set MN [$ns_ node 1.0.1]  
> $MN random-motion 0  
>                 
> $MN set X_ 160.0
> $MN set Y_ 530.0
> $MN set Z_ 0.0
> 
> set HAaddress [AddrParams addr2id [$BS_umts node-addr]]
> [$MN set regagent_] set home_agent_ $HAaddress
> 
> set BS_umts2 [$ns_ node 2.0.0]                                            
> $BS_umts2 random-motion 0
>     
> $BS_umts2 set X_ 850.0
> $BS_umts2 set Y_ 610.0
> $BS_umts2 set Z_ 0.000000000000
> 
> $ns_ at 1.0 "$MN setdest 950.0 530.0 15.0"
> 
> $ns_ duplex-link $Server $W_node 50Mb 0.2ms DropTail
> $ns_ duplex-link-op $Server $W_node orient
>  down
> 
> $ns_ duplex-link $W_node $BS_umts 50Mb 0.2ms DropTail
> $ns_ duplex-link-op $W_node $BS_umts orient down-left
> 
> $ns_ duplex-link $W_node $BS_umts2 50Mb 0.2ms DropTail
> $ns_ duplex-link-op $W_node $BS_umts2 orient down-right
> 
> set sctp0 [new Agent/SCTP]
> $ns_ attach-agent $Server $sctp0
> $sctp0 set fid_ 0
> $sctp0 set debugMask_ -1
> $sctp0 set debugFileIndex_ 0
> $sctp0 set mtu_ 1500
> $sctp0 set dataChunkSize_ 1468
> $sctp0 set numOutStreams_ 1
> $sctp0 set oneHeartbeatTimer_ 1 # one heartbeat timer shared for all dests
> $sctp0 set heartbeatInterval_ 1 #kathe 1 sec ena heartbeat
> set trace_ch [open trace.sctp w]
> $sctp0 set trace_all_ 1           # trace them all on oneline
> $sctp0 trace cwnd_
> $sctp0 trace rto_
> $sctp0 trace errorCount_
> $sctp0 attach $trace_ch
> 
> set sctp1 [new Agent/SCTP]
> $ns_ attach-agent $MN $sctp1
> $sctp1 set debugMask_
>  -1
> $sctp1 set debugFileIndex_ 1
> $sctp1 set mtu_ 1500
> $sctp1 set initialRwnd_ 131072
> $sctp1 set useDelayedSacks_ 1
> $sctp1 set oneHeartbeatTimer_ 1
> $sctp1 set heartbeatInterval_ 1 #kathe 1 sec ena heartbeat
> $ns_ color 0 Red
> $ns_ color 1 Blue
> $ns_ connect $sctp0 $sctp1
> 
> set ftp0 [new Application/FTP]
> $ftp0 attach-agent $sctp0
> 
> $ns_ at 0.5 "$ftp0 start"
> $ns_ at 50 "stop";
> $ns_ at 50 "puts \"NS EXITING...\" ; $ns_ halt"
> 
> proc stop {} {
> 
>     global ns_ tracefd
> 
>     $ns_ flush-trace
> 
>     close $tracefd
> exec nam apop.nam &
>     exit 0
> 
> }
> 
> $ns_ run
> 
> 
>       
> ___________________________________________________________ 
> Χρησιμοποιείτε Yahoo!; 
> Βαρεθήκατε τα ενοχλητικά μηνύματα (spam); Το Yahoo! Mail 
> διαθέτει την καλύτερη δυνατή προστασία κατά των ενοχλητικών 
> μηνυμάτων http://login.yahoo.com/config/mail?.intl=gr 
> 
> 

-- 
View this message in context: http://www.nabble.com/Mobile-ip--Handovers--Sctp--HELP%21%21-tp22296240p22306886.html
Sent from the ns-users mailing list archive at Nabble.com.




More information about the Ns-users mailing list