【正文】 ile [f programfile2...] inputfile1 [inputfile2...] 編寫 gawk程序的規(guī)則是： Pattern或 Action能夠被省略，但是不能同時被省略；如果 Patte 被省略，對于輸入文檔里面的每一條記錄， Action 都會執(zhí)行；如果 Action被省略，內(nèi)定的 Action則會打印出所以符合的 Pattern 的輸入行。 其中 BEGIN 和 END 是特別的 Pattern， gawk 在開始或要結(jié)束時分別執(zhí)行相對應(yīng)于 BEGIN或 END 的 Action。 使用 xgraph 繪圖 Xgraph 是 NS2 自帶的一個小巧的繪圖工具，是一個根據(jù)兩列數(shù)據(jù)生成平面圖形的繪圖工具，它還可以根據(jù)數(shù)據(jù)文件里的數(shù)據(jù)繪制出相應(yīng)的圖形。 一般數(shù)據(jù)文件由兩列數(shù)據(jù)組成，每一列表示圖中的一個點，第一列為 x坐標，第二列為 y 坐標。兩列之間以空格（包括 Tab）、逗號、分號、或者句號隔開。使中北大學 2022 屆畢業(yè)設(shè)計說明書 第 27 頁 共 57 頁 用如下命名畫圖： xgraph filenam1, filename2....options 其中， filename1， filename2....為數(shù)據(jù)文件，表明 xgra可以將多個數(shù)據(jù)流的信息圖畫在一張圖上，有利于對數(shù)據(jù)進行比較。 options 可 以設(shè)定相關(guān)參數(shù)，包括繪圖的顏色、輸出圖形文件的格式、圖形的標題等。一些命令選型如下： hpg 以非交互的方式，將圖形以 hpg 文件格式輸出 t 設(shè)置圖形名稱 x 設(shè)置 x坐標軸的名稱 y 設(shè)置 y坐標軸的名稱 bb 為圖形設(shè)置邊線 m 數(shù)據(jù)點加粗顯示 tk 用標記代替網(wǎng)格顯示 中北大學 2022 屆畢業(yè)設(shè)計說明書 第 28 頁 共 57 頁 4 仿真實現(xiàn) 設(shè)計與建立機會網(wǎng)絡(luò)仿真模型 了解機會網(wǎng)絡(luò)的拓撲特點及 NS2 仿真平臺的功能后，經(jīng)過一番選擇，在 NS2仿真平臺下建立如下的機會網(wǎng)絡(luò)拓撲模型，各參數(shù)如 下表 表 機會網(wǎng)絡(luò)拓撲模型參數(shù) 無線節(jié)點個數(shù) 10個 節(jié)點顯示大小 40 仿真拓撲場景大小 500m 500m 數(shù)據(jù)流類型 cbr cbr分組的大小 512字節(jié) 每秒發(fā)送分組個數(shù) 4 場景最大數(shù)據(jù)流連接數(shù) 5 節(jié)點隨機移動最大速度 20m/s 節(jié)點停留時間 0s 仿真模型持續(xù)時間 100s 編寫仿真模型腳本代碼 選好機會網(wǎng)絡(luò)節(jié)點運動模型和路由協(xié)議后，就可以按照 ns2 仿真平臺的知識來編寫腳本代碼了。 編好運行成功后的 Tcl腳本代碼如下： 無線節(jié)點參數(shù) set val(chan) Channel/WirelessChannel 物理信道類型是無線信道 set val(prop) Propagation/TwoRayGround 無線傳輸模型是TwoRayGround set val(if) Phy/WirelessPhy 網(wǎng)絡(luò)接口層是無線物理層 set val(mac) Mac/802_11 MAC層協(xié)議采用 set val(ifq) Queue/DropTail/PriQueue 接口隊列模型是 IFQ隊列 set val(ll) LL 邏輯鏈路層類型是 LL層 中北大學 2022 屆畢業(yè)設(shè)計說明書 第 29 頁 共 57 頁 set val(ant) Antenna/OmniAntenna 天線模型是全向天線 set val(ifqlen) 50 網(wǎng)絡(luò)接口隊列大小是 50 set val(rp) AODV 路由協(xié)議是 AODV set val(x) 500 設(shè)定拓撲場景范圍 長度 500m set val(y) 500 設(shè)定拓撲場景范圍 寬度 500m set val(stop) 設(shè)定模擬仿真時間， 100s set val(nn) 10 設(shè)定無線節(jié)點數(shù)目為 10 個 set val(cp) cbr1054 流量場景生成文件 set val(sc) scene1020100 運動場景生成文件 建立一個模擬實例 set ns [new Simulator] 開啟 Trace 跟蹤文件和 nam顯示文件 set tracefd [open w] set namtrace [open w] $ns traceall $tracefd $ns namtraceallwireless $namtrace $val(x) $val(y) 建立一個拓撲圖對象，記錄節(jié)點的移動情況 set topo [new Topography] $topo load_flatgrid $val(x) $val(y) 創(chuàng)建 god對象，存儲網(wǎng)絡(luò)狀態(tài)以及節(jié)點間的連接信息 set god_ [creategod $val(nn)] 創(chuàng)建物理信道對象 set chan_1_ [new $val(chan)] 配置無線節(jié)點（包括各種參數(shù)） $ns nodeconfig adhocRouting $val(rp) \ llType $val(ll) \ macType $val(mac) \ ifqType $val(ifq) \ ifqLen $val(ifqlen) \ 中北大學 2022 屆畢業(yè)設(shè)計說明書 第 30 頁 共 57 頁 antType $val(ant) \ propType $val(prop) \ phyType $val(if) \ channel $chan_1_ \ topoInstance $topo \ agentTrace ON \ routerTrace ON \ macTrace OFF \ movementTrace OFF 建立無線節(jié)點 for {set i 0} {$i$val(nn)} {incr i} { set node_($i) [$ns node] $node_($i) randommotion 0。 禁止節(jié)點隨機移動 } 調(diào)用流量場景生成文件 source $val(cp) 調(diào)用隨機運動場景生成文件 source $val(sc) 設(shè)定無線節(jié)點的大小 for {set i 0} {$i$val(nn)} {incr i} { $ns initial_node_pos $node_($i) 40 } 仿真結(jié)束時重置節(jié)點 for {set i 0} {$i$val(nn)} {incr i} { $ns at $node_($i) reset。 } 定義結(jié)束過程，關(guān)閉 Trace文件盒 NAM顯示文件，模擬結(jié)束時調(diào)用 proc finish {} { global ns tracefd namtrace 中北大學 2022 屆畢業(yè)設(shè)計說明書 第 31 頁 共 57 頁 $ns flushtrace close $tracefd close $namtrace exit 0 } 模擬結(jié)束時調(diào)用結(jié)束過程 $ns at $val(stop) finish $ns at $val(stop) puts \NS EXISTING...\。 $ns halt puts Start Simulation... 執(zhí)行模擬 $ns run 數(shù)據(jù)流場景文件的生成 數(shù)據(jù)流類型選擇 cbr流，包固定大小為 512比特，無線節(jié)點數(shù)目 10個，隨機種子設(shè)為 1，節(jié)點間的最大連接數(shù)設(shè)為 5 且每秒發(fā)送 4個分組包，所以數(shù) 據(jù)發(fā)送速率為 4 512 8=16kbps。 調(diào)用數(shù)據(jù)流生成工具 cbrgen生成數(shù)據(jù)流場景文件 cbr1054： 圖 數(shù)據(jù)流場景文件生成 執(zhí)行上述命令后，就會生成一個 cbr1054的文件，然后把生成的這個文件放到跟 Tcl 腳本文件相同的目錄下，就可以在 Tcl 腳本中用 souce 命令調(diào)用這個文件了。生成的數(shù)據(jù)流場景文件 cbr1054的里面代碼內(nèi)容如下： nodes: 10, max conn: 5, send rate: , seed: 1 1 connecting to 2 at time set udp_(0) [new Agent/UDP] 中北大學 2022 屆畢業(yè)設(shè)計說明書 第 32 頁 共 57 頁 $ns attachagent $node_(1) $udp_(0) set null_(0) [new Agent/Null] $ns attachagent $node_(2) $null_(0) set cbr_(0) [new Application/Traffic/CBR] $cbr_(0) set packetSize_ 512 $cbr_(0) set interval_ $cbr_(0) set random_ 1 $cbr_(0) set maxpkts_ 10000 $cbr_(0) attachagent $udp_(0) $ns connect $udp_(0) $null_(0) $ns at $cbr_(0) start 4 connecting to 5 at time set udp_(1) [new Agent/UDP] $ns attachagent $node_(4) $udp_(1) set null_(1) [new Agent/Null] $ns attachagent $node_(5) $null_(1) set cbr_(1) [new Application/Traffic/CBR] $cbr_(1) set packetSize_ 512 $cbr_(1) set interval_ $cbr_(1) set random_ 1 $cbr_(1) set maxpkts_ 10000 $cbr_(1) attachagent $udp_(1) $ns connect $udp_(1) $null_(1) $ns at $cbr_(1) start 4 connecting to 6 at time set udp_(2) [new Agent/UDP] $ns attachagent $node_(4) $udp_(2) set null_(2) [new Agent/Null] $ns attachagent $node_(6) $null_(2) 中北大學 2022 屆畢業(yè)設(shè)計說明書 第 33 頁 共 57 頁 set cbr_(2) [new Application/Traffic/CBR] $cbr_(2) set packetSize_ 512 $cbr_(2) set interval_ $cbr_(2) set random_ 1 $cbr_(2) set maxpkts_ 10000 $cbr_(2) attachagent $udp_(2) $ns connect $udp_(2) $null_(2) $ns at $cbr_(2) start 6 connecting to 7 at time set udp_(3) [new Agent/UDP] $ns attachagent $node_(6) $udp_(3) set null_(3) [new Agent/Null] $ns attachagent $node_(7) $null_(3) set cbr_(3) [new Application/Traffic/CBR] $cbr_(3) set packetSize_ 512 $cbr_(3) set interval_ $cbr_(3) set random_ 1 $cbr_(3) set maxpkts_ 10000 $cbr_(3) attachagent $udp_(3) $ns connect $udp_(3) $null_(3) $ns at $cbr_(3) start 7 connecting to 8 at time set udp_(4) [new Agent/UDP] $ns attachagent $node_(7) $udp_(4) set null_(4) [new Agent/Null] $ns attachagent $node_(8) $null_(4) set cbr_(4) [new Application/Traffic/CBR] $cbr_(4) set packetSize_ 512 $cbr_(4) set interval_ 中北大學 2022 屆畢業(yè)設(shè)計說明書 第 34 頁 共 57 頁 $cbr_(4) set random_ 1 $cbr_(4) set maxpkts_ 10000