我正在尝试在ns2中实现BCube topology。我的Tcl脚本(我修改过的部分)看起来像
invalid command name ""
while executing
"[$s(0) get-module "Manual"] add-route-to-adj-node -default $n(0)"
(file "websearch_bcube.tcl" line 361)
我在这个tcl文件上收到以下错误。
$ns rtproto Manual $s(0) $s(1) $s(2) $s(3) $s(4) $s(5) $s(6) $s(7)
当我最后注释掉手动配置和wrong # args: should be "set varName ?newValue?"
while executing
"set nodeslist _o36 _o39 _o42 _o45 _o48 _o51 _o54 _o57 _o60 _o63 _o66 _o69 _o72 _o75 _o18 _o81"
("eval" body line 1)
invoked from within
"eval "set nodeslist $args""
(procedure "Agent/rtProto/DV" line 5)
(Agent/rtProto/DV init-all line 5)
invoked from within
"Agent/rtProto/DV init-all _o36 _o39 _o42 _o45 _o48 _o51 _o54 _o57 _o60 _o63 _o66 _o69 _o72 _o75 _o18 _o81"
("eval" body line 1)
invoked from within
"eval Agent/rtProto/$proto init-all $rtprotos_($proto)"
("foreach" body line 2)
invoked from within
"foreach proto [array names rtprotos_] {
eval Agent/rtProto/$proto init-all $rtprotos_($proto)
}"
invoked from within
"if [info exists rtprotos_] {
foreach proto [array names rtprotos_] {
eval Agent/rtProto/$proto init-all $rtprotos_($proto)
}
} else {
Agent/rtProto/St..."
(procedure "_o84" line 3)
(RouteLogic configure line 3)
invoked from within
"[$self get-routelogic] configure"
(procedure "_o5" line 5)
(Simulator run line 5)
invoked from within
"$ns run"
(file "websearch_bcube.tcl" line 790)
时,我收到以下错误。
{{1}}
有人可以指导我如何为一组节点启用DV路由,并为其余节点使用手动路由(使用ID 0 - 7)。如果还有其他方法可以实现相同的功能,请告诉我。