如xia 仿真運行出現錯誤 到底是什么原因 ???
thank you very much!!!!!!
problem:
can't read "mac_(0)": no such variable
while executing
"subst $[subst $var]"
(procedure "_o10" line 5)
(SplitObject set line 5)
invoked from within
"$node_($i) set mac_(0)"
invoked from within
"$bop0 bop-get-mac [$node_($i) set mac_(0)]"
(file "test.tcl" line 47)
code :
set ns [new Simulator]
set val(ifq) Queue
set val(ll) LL
set val(ifqlen) 50
set val(mac) Mac
$ns node-config -llType $val(ll) \
-ifqType $val(ifq) \
-ifqLen $val(ifqlen) \
-macType $val(mac) \
set tracef [open test.tr w]
$ns trace-all $tracef
set namtf [open test.nam w]
$ns namtrace-all $namtf
proc finish {} {
global ns tracef namtf
$ns flush-trace
close $tracef
close $namtf
exec nam test.nam &
exit 0
}
set i 0
set node_($i) [$ns node]
set n1 [$ns node]
set n2 [$ns node]
set n3 [$ns node]
set n4 [$ns node]
$ns duplex-link $node_($i) $n1 10Mb 10ms DropTail
$ns duplex-link $n1 $n2 10Mb 10ms DropTail
$ns duplex-link $n2 $n3 10Mb 10ms DropTail
$ns duplex-link $n3 $n4 10Mb 10ms DropTail
$ns duplex-link-op $node_($i) $n1 orient right
$ns duplex-link-op $n1 $n2 orient right
$ns duplex-link-op $n2 $n3 orient right
$ns duplex-link-op $n3 $n4 orient right
set bop0 [new Agent/BOP]
#bop: a new transport layer protocol
$ns attach-agent $node_($i) $bop0
$bop0 bop-get-mac [$node_($i) set mac_(0)]
set bop4 [new Agent/BOPSink]
$ns attach-agent $n4 $bop4
$ns connect $bop0 $bop4
set ftp [new Application/FTP]
$ftp attach-agent $bop0
$ftp set type_ FTP
$ns at 1.0 "$ftp start"
$ns at 4.0 "$ftp stop"
$ns at 5.0 "finish"
$ns run
uj5u.com熱心網友回復：
ding!!!!!轉載請註明出處，本文鏈接：https://www.uj5u.com/qita/129000.html
標籤：網絡協議與配置