ns的網(wǎng)絡功能實體結構及類結構(編輯修改稿)
2025-11-17 15:19 本頁面
【文章內(nèi)容簡介】 Module/xxx在 register函數(shù)中都會 new一個 classifier Node instproc installentry { module clsfr {hook } } { $self instvar classifier_ mod_assoc_ hook_assoc_ if [info exists classifier_] { if [info exists mod_assoc_($classifier_)] { $self unregistermodule $mod_assoc_($classifier_) unset mod_assoc_($classifier_) } Connect the new classifier to the existing classifier chain, if there is any. if [info exists hook_assoc_($classifier_)] { if { $hook == target } { $clsfr target $hook_assoc($classifier_) } elseif { $hook != } { $clsfr install $hook $hook_assoc_($classifier_) } set hook_assoc_($clsfr) $hook_assoc_($classifier_) unset hook_assoc_($classifier_) } } set mod_assoc_($clsfr) $module set classifier_ $clsfr } 保存最后一次調(diào)用時的clsfr module列表，以 classifier為索引 classifier列表，以 classifier為索引 RtModule instproc register { node } { Attach to node and register routing notifications $self attachnode $node $node routenotify $self $node portnotify $self } 進入到 rtmodule的c++代碼中，把該節(jié)點的指針交給rtmodule的一個變量 Node instproc routenotify { module } { $self instvar rtnotif_ if {$rtnotif_ == } { set rtnotif_ $module } else { $rtnotif_ routenotify $module } $module cmd routenotify $self } RtModule instproc routenotify { module } { $self instvar next_rtm_ if {$next_rtm_ == } { set next_rtm_ $module } else { $next_rtm_ routenotify $module } } 把 rtmoudule構成鏈表 Node instproc portnotify { module } { $self instvar ptnotif_ lappend ptnotif_ $module } Node RtModule/Base Classifier/Hash/Dest mod_assoc_(_o13)=_o12 classifier_ entry_ 紅色是Node的變量 表示對象之間的聯(lián)系紐帶 數(shù)據(jù)包的傳輸 set n1 [$ns node] _o11 _o11 info class Node _o12 info class RtModule/Base _o13 info class Classifier/Hash/Dest set n2 [$ns node] _o14 _o14 info class Node _o15 info class RtModule/Base _o16 info class Classifier/Hash/Dest _o17 info class invalid mand name _o17 while executing _o17 info class 路由模塊，如果要加入策略路由的話，或者自己開發(fā)路由協(xié)議，需要自己開發(fā)這個模塊。其實該模塊的功能是計算路由，而執(zhí)行路由是由 Classifier進行的 路由的執(zhí)行 啟動過程 3☆ ? $ns duplexlink $n0 $n1 1Mb 10ms DropTail tcl/lib/ Simulator instproc duplexlink { n1 n2 bw delay type args } { $self instvar link_ set i1 [$n1 id] set i2 [$n2 id] if [info exists link_($i1:$i2)] { $self removenamlinkconfig $i1 $i2 } eval $self simplexlink $n1 $n2 $bw $delay $type $args eval $self simplexlink $n2 $n1 $bw $delay $type $args Modified by GFR for nixvector routing if { [Simulator set nixrouting] } { Inform nodes of neighbors $n1 setneighbor [$n2 id] $n2 setneighbor [$n1 id] } } $ns duplexlink $n1 $n2 1Mb 10ms DropTail _o17 info class Queue/DropTail _o18 info class SimpleLink _o19 info class Connector _o20 info class Connector _o21 info class DelayLink _o22 i
教學課件相關推薦
鄂ICP備17016276號-1