ns的網(wǎng)絡(luò)功能實體結(jié)構(gòu)及類結(jié)構(gòu)-在線瀏覽
2024-12-15 15:19本頁面
【正文】 $snk proc finish {} { exit 0 } $ns at $ftp start $ns at finish $ns run 啟動過程 0 ? 當(dāng)命令行運行 ns，會創(chuàng)建 3個對象 _o1, _o2, _o3 ? _o1和 _o2是 RNG， _o3是 Import (tclcl/tcl) simulator:~/ins/$ ns % set a [new Application/FTP] _o4 % _o1 info class RNG % _o2 info class RNG % _o3 info class Import % _o4 info class Application/FTP 啟動過程 1 ? set ns [new Simulator] tclcl/ proc new { className args } { set o [SplitObject getid] if [catch $className create $o $args msg] { if [string match __FAILED_SHADOW_OBJECT_ $msg] { The shadow object failed to be allocated. delete $o return } global errorInfo error class $className: constructor failed: $msg $errorInfo } return $o } ―Simulator create 4‖ 該操作創(chuàng)建一個Simulator對象，并調(diào)用它的 init函數(shù)進行初始化 啟動過程 1 ? Simulator instproc init args {…} tcl/lib/ Simulator instproc init args { …… $self create_packetformat $self usescheduler Calendar $self set nullAgent_ [new Agent/Null] $self setaddressformat def if {[lindex $args 0] == multicast} { $self multicast $args } eval $self next $args } 這個還未找到代碼位置 (找到了 )，可以猜想是創(chuàng)建數(shù)據(jù)包的頭標(biāo)對應(yīng)的數(shù)據(jù)結(jié)構(gòu)，創(chuàng)建對象 _o5，類型為 PacketHeaderManager 創(chuàng)建對象 _o6，類型為Scheduler/Calender，一個非常重要的類，單線程的 ns能模擬多節(jié)點的網(wǎng)絡(luò)，就是通過它來調(diào)度。NS 的 網(wǎng)絡(luò)功能實體結(jié)構(gòu)及類結(jié)構(gòu) 任三陽 把 N門時髦的技術(shù)掛在嘴邊不如將一門過時的技術(shù)記在心里。 ——BBS A poor framework is much better than nothing. ——kkzhou outline ? 1預(yù)修知識 ? 2一個最簡單的 ns仿真的啟動過程 ? 3Ns的網(wǎng)絡(luò)實體結(jié)構(gòu)和類結(jié)構(gòu) 1預(yù)修知識 ? C++、 Tcl、 OTcl的語法 – – – 《 ns與網(wǎng)絡(luò)模擬 》 ? 面向?qū)ο蟮乃枷耄禾摂M函數(shù)，動態(tài)創(chuàng)建機制 ? Ns的安裝和簡單仿真操作 (論壇上有 ) ? Ns的開發(fā)工具： gdb和 tcldebug(非常簡單 ) ? Ns的分裂對象模型和 tclcl(非常重要而且很難，主要原理是動態(tài)創(chuàng)建機制 ) 要學(xué)透， 注意區(qū)分類和對象 ，發(fā)現(xiàn)好多問題都是因為 OTcl理解不透造成的。但是用起來簡單，只需要知道“我的一個事件，給定一個時間，交給它，到時候它就會處理”就行了 創(chuàng)建對象 _o7，類型為Agent/Null，一個黑洞 tcl/lib/ Simulator instproc usescheduler type { $self instvar scheduler_ if [info exists scheduler_] { if { [$scheduler_ info class] == Scheduler/$type } { return } else { delete $scheduler_ } } set scheduler_ [new Scheduler/$type] $scheduler_ now } _o4 info class Simulator _o5 info class PacketHeaderManager _o6 info class Scheduler/Calendar _o7 info class Agent/Null _o8 info class AllocAddrBits _o9 info class AllocAddr _o10 info class Address _o11 info class invalid mand name _o11 while executing _o11 info class 目前為止已經(jīng)產(chǎn)生了 10個對象了 啟動過程 2☆ ? set n0 [$ns node] ? set n1 [$ns node] tcl/lib/ Simulator instproc node args { $self instvar Node_ routingAgent_ wiredRouting_ satNodeType_ …… Enablemcast is now done automatically inside Node::init{} XXX node_factory_ is deprecated, HOWEVER, since it39。s nodelist in C++ space $self addnode $node [$node id] set the nodeid in c++ Node ratul $node nodeid [$node id] $node set ns_ $self $self checknodenum return $node } 代碼沒有找到。 $self mkdefaultclassi
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號-1