以 aodv 中访问 mac 为例,
1。在 aodv.h 中增加头文件
#include "mac/mac-802_11.h"
在 AODV类里面声明
Mac802_11 * mymac;
2。修改 command()函数,增加以下代码
int
AODV::command(int argc, const char*const* argv) {
。。。
。。。
else if(argc == 3) {
if(strcmp(argv[1], "index") == 0) {
index = atoi(argv[2]);
return TCL_OK;
}//add by season
else if (strcmp(argv[1], "set-mac") == 0)
{
mymac = (Mac802_11 *) TclObject::lookup(argv[2]);
if (mymac == 0)
{
fprintf(stderr, "MESPAgent: %s lookup %s failed.\n", argv[1], argv[2]);
return TCL_ERROR;
}
else
{
//test
printf("Get Node mac bss_id:%d \n", mymac->bss_id());
// fprintf(stderr, "Get Node address .\n", nodeID);
return TCL_OK;
}
}
。。。
。。。
}
3。在 tcl 脚本中初始化
set rt($i) [$node_($i) agent 255] # 获得路由层协议
$rt($i) set-mac [$node_($i) set mac_(0)] #初始化 mac 对象
4。然后就可以在 AODV中通过 mymac 对象访问 mac 的信息
1。在 aodv.h 中增加头文件
#include "mac/mac-802_11.h"
在 AODV类里面声明
Mac802_11 * mymac;
2。修改 command()函数,增加以下代码
int
AODV::command(int argc, const char*const* argv) {
。。。
。。。
else if(argc == 3) {
if(strcmp(argv[1], "index") == 0) {
index = atoi(argv[2]);
return TCL_OK;
}//add by season
else if (strcmp(argv[1], "set-mac") == 0)
{
mymac = (Mac802_11 *) TclObject::lookup(argv[2]);
if (mymac == 0)
{
fprintf(stderr, "MESPAgent: %s lookup %s failed.\n", argv[1], argv[2]);
return TCL_ERROR;
}
else
{
//test
printf("Get Node mac bss_id:%d \n", mymac->bss_id());
// fprintf(stderr, "Get Node address .\n", nodeID);
return TCL_OK;
}
}
。。。
。。。
}
3。在 tcl 脚本中初始化
set rt($i) [$node_($i) agent 255] # 获得路由层协议
$rt($i) set-mac [$node_($i) set mac_(0)] #初始化 mac 对象
4。然后就可以在 AODV中通过 mymac 对象访问 mac 的信息