• Agnes1997
    了解作者
  • tcl/tk
    开发工具
  • 2KB
    文件大小
  • zip
    文件格式
  • 0
    收藏次数
  • 10 积分
    下载积分
  • 3
    下载次数
  • 2020-08-28 17:17
    上传日期
AODV路由ns2 tcl脚本,30节点。
AODV.zip
  • AODV.txt
    9.4KB
内容介绍
#============================================== # AODV without any Blackhole node for 30 nodes #============================================== # #=================================== # Simulation parameters setup #=================================== set val(chan) Channel/WirelessChannel ;# channel type set val(prop) Propagation/TwoRayGround ;# radio-propagation model set val(netif) Phy/WirelessPhy ;# network interface type 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) 30 ;# number of mobilenodes set val(rp) AODV ;# routing protocol set val(x) 1186 ;# X dimension of topography set val(y) 600 ;# Y dimension of topography set val(stop) 40 ;# time of simulation end set val(t1) 0.0 ; set val(t2) 0.0 ; #=================================== # Initialization #=================================== #Create a ns simulator set ns [new Simulator] #Setup topography object set topo [new Topography] $topo load_flatgrid $val(x) $val(y) create-god $val(nn) #Open the NS trace file set tracefile [open blackhole.tr w] $ns trace-all $tracefile #Open the NAM trace file set namfile [open blackhole.nam w] $ns namtrace-all $namfile $ns namtrace-all-wireless $namfile $val(x) $val(y) set chan [new $val(chan)]; #Create wireless channel #================================= # Mobile node parameter setup #=================================== $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) \ -channel $chan \ -topoInstance $topo \ -agentTrace ON \ -routerTrace ON \ -macTrace ON \ -movementTrace ON #=================================== # Nodes Definition #=================================== #Create 30 nodes set n0 [$ns node] $n0 set X_ 663 $n0 set Y_ 484 $n0 set Z_ 0.0 $n0 color Red $ns initial_node_pos $n0 30 $n0 start set n1 [$ns node] $n1 set X_ 466 $n1 set Y_ 407 $n1 set Z_ 0.0 $ns initial_node_pos $n1 30 set n2 [$ns node] $n2 set X_ 791 $n2 set Y_ 406 $n2 set Z_ 0.0 $ns initial_node_pos $n2 30 set n3 [$ns node] $n3 set X_ 668 $n3 set Y_ 393 $n3 set Z_ 0.0 $ns initial_node_pos $n3 30 set n4 [$ns node] $n4 set X_ 558 $n4 set Y_ 320 $n4 set Z_ 0.0 $ns initial_node_pos $n4 30 set n5 [$ns node] $n5 set X_ 781 $n5 set Y_ 317 $n5 set Z_ 0.0 $ns initial_node_pos $n5 30 set n6 [$ns node] $n6 set X_ 650 $n6 set Y_ 40.0 $n6 set Z_ 0.0 $ns initial_node_pos $n6 30 set n7 [$ns node] $n7 set X_ 671 $n7 set Y_ 194 $n7 set Z_ 0.0 $ns initial_node_pos $n7 30 set n8 [$ns node] $n8 set X_ 761 $n8 set Y_ 234 $n8 set Z_ 0.0 $ns initial_node_pos $n8 30 set n9 [$ns node] $n9 set X_ 476 $n9 set Y_ 117 $n9 set Z_ 0.0 $ns initial_node_pos $n9 30 set n10 [$ns node] $n10 set X_ 714 $n10 set Y_ 121 $n10 set Z_ 0.0 $ns initial_node_pos $n10 30 set n11 [$ns node] $n11 set X_ 825 $n11 set Y_ 140 $n11 set Z_ 0.0 $ns initial_node_pos $n11 30 set n12 [$ns node] $n12 set X_ 509 $n12 set Y_ 34 $n12 set Z_ 0.0 $ns initial_node_pos $n12 30 set n13 [$ns node] $n13 set X_ 687 $n13 set Y_ 36 $n13 set Z_ 0.0 $ns initial_node_pos $n13 30 set n14 [$ns node] $n14 set X_ 822 $n14 set Y_ 51 $n14 set Z_ 0.0 $ns initial_node_pos $n14 30 set n15 [$ns node] $n15 set X_ 373 $n15 set Y_ 271 $n15 set Z_ 0.0 $ns initial_node_pos $n15 30 set n16 [$ns node] $n16 set X_ 903 $n16 set Y_ 255 $n16 set Z_ 0.0 $ns initial_node_pos $n16 30 set n17 [$ns node] $n17 set X_ 908 $n17 set Y_ 344 $n17 set Z_ 0.0 $ns initial_node_pos $n17 30 set n18 [$ns node] $n18 set X_ 600 $n18 set Y_ 180 $n18 set Z_ 0.0 $ns initial_node_pos $n18 30 set n19 [$ns node] $n19 set X_ 455 $n19 set Y_ 479 $n19 set Z_ 0.0 $ns initial_node_pos $n19 30 set n20 [$ns node] $n20 set X_ 350 $n20 set Y_ 434 $n20 set Z_ 0.0 $ns initial_node_pos $n20 30 set n21 [$ns node] $n21 set X_ 263 $n21 set Y_ 306 $n21 set Z_ 0.0 $ns initial_node_pos $n21 30 set n22 [$ns node] $n22 set X_ 261 $n22 set Y_ 209 $n22 set Z_ 0.0 $ns initial_node_pos $n22 30 set n23 [$ns node] $n23 set X_ 240 $n23 set Y_ 115 $n23 set Z_ 0.0 $ns initial_node_pos $n23 30 set n24 [$ns node] $n24 set X_ 313 $n24 set Y_ 29 $n24 set Z_ 0.0 $ns initial_node_pos $n24 30 set n25 [$ns node] $n25 set X_ 250 $n25 set Y_ 404 $n25 set Z_ 0.0 $ns initial_node_pos $n25 30 set n26 [$ns node] $n26 set X_ 463 $n26 set Y_ 420 $n26 set Z_ 0.0 $ns initial_node_pos $n26 30 set n27 [$ns node] $n27 set X_ 461 $n27 set Y_ 122 $n27 set Z_ 0.0 $ns initial_node_pos $n27 30 set n28 [$ns node] $n28 set X_ 100 $n28 set Y_ 343 $n28 set Z_ 0.0 $ns initial_node_pos $n28 30 set n29 [$ns node] $n29 set X_ 36 $n29 set Y_ 431 $n29 set Z_ 0.0 $ns initial_node_pos $n29 30 $n1 color red $ns at 0.0 "$n1 color red" $ns at 0.0 "$n1 label Attacker" $n13 color red $ns at 0.0 "$n13 color red" $ns at 0.0 "$n13 label Attacker" $n23 color green $ns at 0.0 "$n23 color green" $ns at 0.0 "$n23 label Source" $n21 color green $ns at 0.0 "$n21 color green" $ns at 0.0 "$n21 label Source" $n29 color blue $ns at 0.0 "$n29 color blue" $ns at 0.0 "$n29 label Destination" $n9 color blue $ns at 0.0 "$n9 color blue" $ns at 0.0 "$n9 label Destination" #=================================== # Generate movement #=================================== $ns at 0 " $n21 setdest 100 100 40 " $ns at 0 " $n20 setdest 150 175 40 " $ns at 1.0 "$n2 setdest 615.0 340.0 5.0" $ns at 1.0 "$n3 setdest 680.0 458.0 5.0" $ns at 3.0 "$n4 setdest 580.0 368.0 5.0" $ns at 3.0 "$n5 setdest 785.0 228.0 5.0" $ns at 2.0 "$n6 setdest 750.0 538.0 5.0" $ns at 1.0 "$n29 setdest 185.0 120.0 5.0" $ns at 0.0 "$n8 setdest 335.0 500.0 5.0" $ns at 2.0 "$n9 setdest 425.0 590.0 5.0" $ns at 2.0 "$n10 setdest 105.0 520.0 5.0" $ns at 0.0 "$n11 setdest 565.0 420.0 5.0" $ns at 1.0 "$n12 setdest 700.0 20.0 5.0" $ns at 1.0 "$n23 setdest 115.0 85.0 5.0" $ns at 1.0 "$n14 setdest 195.0 185.0 5.0" $ns at 1.0 "$n15 setdest 387.0 590.0 5.0" $ns at 2.0 "$n16 setdest 165.0 520.0 5.0" $ns at 0.0 "$n17 setdest 765.0 320.0 5.0" $ns at 1.0 "$n18 setdest 109.0 20.0 5.0" $ns at 1.0 "$n19 setdest 175.0 185.0 5.0" $ns at 0.0 "$n25 setdest 343.0 576.0 5.0" $ns at 1.0 "$n26 setdest 764.0 424.0 5.0" $ns at 1.0 "$n27 setdest 676.0 464.0 5.0" #$ns at 5 " $n6 setdest 650 490 40 " #=================================== # Agents Definition #=================================== #Setup a UDP connection set udp0 [new Agent/UDP] $ns attach-agent $n21 $udp0 set null0 [new Agent/Null] $ns attach-agent $n29 $null0 $ns connect $udp0 $null0 $udp0 set packetSize_ 1500 #Setup a CBR Application over UDP connection set cbr0 [new Application/Traffic/CBR] $cbr0 attach-agent $udp0 $cbr0 set packetSize_ 1000 $cbr0 set rate_ 0.1Mb $cbr0 set random_ null $ns at 1.0 "$cbr0 start" $ns at 10.0 "$cbr0 stop" #Setup a UDP connection set udp1 [new Agent/UDP] $ns attach-agent $n23 $udp1 set null1 [new Agent/Null] $ns attach-agent $n9 $null1 $ns connect $udp1 $null1 $udp1 set packetSize_ 1500 #Setup a CBR Appl
评论
    相关推荐
    • aodv.zip
      aodvns2下代码的详细分析,包括主要函数的分析以及三张表的主要属性,包括路由表,邻居表,广播表
    • ns_aodv.tar.gz
      ns网络仿真分析,对aodv无线网络分析。
    • adhoc-simulation:在 NS2 中使用 12 个移动节点的 Ad-hoc 模拟。 这是为了比较不同路由协议(AOD
      NS2 中使用 12 个移动节点的 Ad-hoc 模拟。 这是为了比较不同路由协议(AODV、DSDV、DSR)和拥塞控制算法(TCP Reno、New Reno、Vegas)组合下的性能。
    • NS3 实验.zip
      2. 进入~/tarballs/ns-allinone-3.2x/ns-3.2x/examples/wireless$ 目录,在wireless文件夹下,有很多wifi传输的示例。在wifi-simple-adhoc-grid.cc代码基础上修改,文件拷贝到scratch文件夹下,重命名为你的姓名缩写...
    • 基于NS2的Ad Hoc网络AODV路由协议仿真
      这是摘自网络博客的文章+代码,对其中有误的地方进行了纠正,需要说明的是我的测试环境:ubuntu13.04 + NS2.35,还有这里不是自带的AODV协议代码,是AdHoc网络性能评估代码。内附说明文章。
    • ns2:测试场景 AODV、DSR 和 DSDV 项目如下条件
      NS2 小项目 AODV DSR DSDV 状况 网络规模 1.5km x 1.5km 使用恒定比特率流量 (CBR) 数据包大小 = 512 字节,速度为 5 pkt/s(*CBR 将在 UDP 上运行)使用 cbrgen.tcl 创建具有 5 个连接的流量负载。 通过使用 ...
    • ns-2 学习资料(非常有价值)
      资料包括NS-2课件(非常详细透彻,对于初学者非常有价值)以及NS-2手册和其他资料。个人认为非常有用。另外提供一个不错的学习 http://www.abab123.com/bbs/down.asp?html=1229857 人人为我,我为人人
    • aodv.rar
      NS2AODV源代码 包含我自己的一些注释
    • NS2下zigbee路由算法仿真
      应用层框架定义监护网络节点协议。 -zigbee routing algorithm uses AODV (Ad hoc On Demand Distance Vetor) algorithm. Each router maintaining a routing table, and regularly with its neighbor routers ...
    • NS2example.rar
      在ns2下实现无线传感器网络仿真,多个节点进行网络活动