※ 引述《sysrq (从零开始)》之铭言：
: :
: set host($i) [$ns_ node [lindex $routetemp [expr $router_count]]]
在 tcl\lib\ns-node.tcl : 519
: :
: set nodeid [$host($i) id]
: :
在 tcl\lib\ns-node.tcl : 107
: 请问在上述 tcl 中的 node 与 id 是怎样来的?
: 在 .cc 中有对应的 code 吗?
: 我试着用 grep 但找不到相关,
: 麻烦各位大哥指点一二。
要找tcl的指令，有两个地方可以看看
一个是 tcl\lib 下，有很多默认行为的 ns otcl command，一般比较常见的
otcl command 在这里可以找到，这里的 lib 是纯 tcl
另外一个则是每个 module 的 command function，一些使用者自定义的 otcl command
在这里做定义，这边是使用 tclcl 将 tcl args 传至 c++ ，呼叫 c++ function 处理
完毕之后，在利用 return 传回 TCL_OK 或是透过 tcl.result 传回值
http://www.isi.edu/nsnam/ns/doc/node11.html
ns2 的 tcl/otcl/tclcl/c++ 之间的关系是初学者最常搞混的地方，
需要多 K 一下 source code，并且自己试着去修改增加 command ，才会比较容易理解
tcl与c++之间的互动