NS2中获取Agent的实例 (转)

下面代码说明了如何访问其他节点的Agent，以AODV协议为例

添加以下代码到aodv.cc. 用这种方法也可以访问其他对象，比如 mobilenode, 等等.

1. AODV* aodvagent;   
2.   
3. // set i to be the node id   
4.   
5. char command[256];   
6.   
7. // [Agent/AODV info instances] 返回一个aodvagent的数组   
8. sprintf(command, "foreach aodvagent [Agent/AODV info instances]\   
9. {\nif { [$aodvagent id] == %d} {\nset i $aodvagent}}\nset t $i\n", i);   
10.   
11. Tcl& tcl = Tcl::instance();   
12. tcl.eval_r(command);   
13. const char* ref = tcl.result();   
14.   
15. aodvagent = (AODV*)tcl.lookup(ref);  

这种方法需要在Agent的成员函数command中含有返回agent节点地址的命令：

1. if (argc == 2) {   
2.         Tcl& tcl = Tcl::instance();   
3.         if(strncasecmp(argv[1], "id", 2) == 0) {   
4.             tcl.resultf("%d", ra_addr_);   
5.             return TCL_OK;   
6.         }   
7.                 //other command   
8.                 ...   
9. }  

http://blog.sina.com.cn/s/blog_698c6a4d0100n1yf.html