【文章內(nèi)容簡介】 資料列： awk 從資料文件上讀取的基本單位，以 trace file 為例， awk 讀入的 第一筆資料列為 ” ＋ 1 2 cbr 1000 2 0 0” 第二筆資料列為 “ － 1 2 cbr 1000 2 0 0” 一般而言，一筆資料列相當于資料文件上的一行資料。 2. 2. 字段 (Field)：為數(shù)據(jù)列上被分隔開的子字符串。 以資料列”＋ 1 2 cbr 1000 2 0 0” 為例， 一 二 三 四 五 六 七 八 九 十 十一 十二 ＋ 1 2 cbr 1000 2 0 0 一般而言是以空格符來分隔相鄰的字段。 當 awk 讀入資料列后，會把每個字段的值存入字 段變量。 字段變量 意義 $0 為一字符串 , 其內(nèi)容為目前 awk 所讀入的資料列 . $1 代表 $0 上第一個字段的資料 . $2 代表 $0 上第二欄個位的資料 . ?? ?? : Pattern1 { Actions1 } Pattern2 { Actions2 } ??????????? Pattern3 { Actions3 } 一般常用”關系判斷式”來當成 Pattern。例如： x ＞ 3 用來判斷變量 x 是否大于 3 x == 5 用來判斷變量 x 是否等于 5 awk 提供 c 語言常見的關系操作數(shù)，如：＞、＜、＞＝、＜＝、＝＝、?。降鹊? Actions 是由許多 awk 指令所構成，而 awk 的指令與 c 語言中的指令非常類似。 IO 指令： print 、 printf( ) 、 getline ...... 流程控制指令 ： if ( ...) {...} else {…} 、 while(…){…} ?? 在 awk 程序的流程為先判斷 Pattern 的結果，若為真 True 則執(zhí)行相對應的 Actions，若為假 False 則不執(zhí)行相對的 Actions。若是處理的過程中沒有 Pattern， awk 會無條件的去執(zhí)行 Actions。 : 執(zhí)行 awk 時 , 它會反復進行下列四步驟。 1. 自動從指定的資料文件中讀取一筆資料列。 2. 自動更新 (Update)相關的內(nèi)建變量之值。 14 3. 逐次執(zhí)行程序中 所有 的 Pattern { Actions } 指令。 4. 當執(zhí)行完程序中所有 Pattern { Actions }時，若資料文件中還有未讀取的料，則反復執(zhí)行步驟 1 到步驟 4 。 awk 會自動重復進行上述的四個步驟，所以使用者不須在程序中寫這個循環(huán)。 [EndtoEnd Delay] 筆者把量測 CBR封包端點到端點間延遲時間的 awk程序，寫在檔案 檔案中，讀者可以參考此范例，修改成符合讀者需求的程序。 Ad Hoc 網(wǎng)絡仿真 通信 場 景 的 設計與實現(xiàn) . 設計 要求 1） 仿真場景不少于 100m X 100m 2） 隨機 定義一個不少于 30 個節(jié)點的網(wǎng)絡 18對 通信 連 接 3） 設置一個 Sink 節(jié)點，用于收集所有其他節(jié)點發(fā)送的數(shù)據(jù) . 詳細設計 隨機建立 通信 場 景文件 步 驟 一： 在 終 端~/： ns type cbr nn 30 seed 1 mc 10 rate cbr30n18c2p 注：也可以將 復制到所需文件 夾 下直接命令行運行。 該 命令 創(chuàng) 建了一個具有 30 個 節(jié) 點、 18對 通信 連 接、 每秒 鐘發(fā) 送 100 個分 組 的以 CBR 為業(yè)務 源的通信 場 景文件 cbr30n18c2 、 源代碼（ 文件如下） 產(chǎn)生一個仿真的對象 set ns [new Simulator] 針對不同的資料流定義不同的顏色，這是要給 NAM 用的 $ns color 0 blue $ns color 1 red $ns color 2 white 開啟一個 NAM trace file $ns nodeconfig Routing AODVRR set nf [open w] 開啟一個 trace file，用來記錄封包傳送的過程 $ns namtraceall $nf set nd [open w] $ns traceall $nd 定義一個結束的程序 proc finish {} { global ns nf nd $ns flushtrace 15 close $nf close $nd 以背景執(zhí)行的方式去執(zhí)行 NAM exec nam amp。 exit 0 } Create and configure topography (used for mobile scenarios) set topo [new Topography] 100mx100m 建立 100x100 $topo load_flatgrid 100 100 產(chǎn)生 30 個網(wǎng)絡節(jié)點 for {set i 0} {$i 30} {incr i} {set node_($i) [$ns node] } for {set i 0} {$i 30} {incr i} { 把節(jié)點連接起來 ,并且隨機分布 $ns duplexlink $node_($i) $node_([expr ($i+1)%30]) 1Mb 10ms DropTail } 建立 18 條 UDP 的聯(lián)機 nodes: 30, max conn: 18, send rate: , seed: 1 該命令隨機創(chuàng)建了一個具有 30 個節(jié)點、 18 對通信連接、 每秒鐘發(fā)送 100 個分組的以 CBR 為業(yè)務源的通信場景文件 。 1 connecting to 2 at time set udp_(0) [new Agent/UDP] $ns attachagent $node_(0) $udp_(0) 在 UDP 聯(lián)機之上建立 CBR 應用程序（下相同） set cbr_(0) [new Application/Traffic/CBR] $cbr_(0) set packetSize_ 500 $cbr_(0) set interval_ $cbr_(0) attachagent $udp_(0) set null_(0) [new Agent/Null] $ns attachagent $node_(3) $null_(0) $ns connect $udp_(0) $null_(0) 設定 cbr 開始執(zhí)行時間（下面相同） $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 16 set udp_(2) [new Agent/UDP] $ns attachagent $node_(4) $udp_(2) set null_(2) [new Agent/Null] $ns attachagent $node_(6) $null_(2) 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_ $cbr_(4) set random_ 1 $cbr_(4) set maxpkts_ 10000 $cbr_(4) attachagent $udp_(4) $ns connect $udp_(4) $null_(4) $ns at $cbr_(4) start 7 connecting to 9 at time set udp_(5) [new Agent/UDP] $ns attachagent $node_(7) $udp_(5) set null_(5) [new Agent/Null] $ns attachagent $node_(9) $null_(5) set cbr_(5) [new Application/Traffic/CBR] $cbr_(5) set packetSize_ 512 $cbr_(5) set interval_ 17 $cbr_(5) set random_ 1 $cbr_(5) set maxpkts_ 10000 $cbr_(5) attachagent $udp_(5) $ns connect $udp_(5) $null_(5) $ns at $cbr_(5) start 8 connecting to 9 at time set udp_(6) [new Agent/UDP] $ns attachagent $node_(8) $udp_(6) set null_(6) [new Agent/Null] $ns attachagent $node_(9) $null_(6) set cbr_(6) [new Application/Traffic/CBR] $cbr_(6) set packetSize_ 512 $cbr_(6) set interval_ $cbr_(6) set random_ 1 $cbr_(6) set maxpkts_ 10000 $cbr_(6) attachagent $udp_(6) $ns connect $udp_(6) $null_(6) $ns at $cbr_(6) start 9 connecting to 10 at time set udp_(7) [new Agent/UDP] $ns attachagent $node_(9) $