解决ns2错误一例

最新推荐文章于 2021-08-12 19:43:05 发布
最新推荐文章于 2021-08-12 19:43:05 发布
阅读量8k 收藏 6
点赞数 1
分类专栏： WSN/Zigbee/NS2 文章标签： command tcl 代码分析 cmd 脚本 methods
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/bennyfun79/article/details/5553274
版权

 

错误代码格式

最新在研究nrlolsr协议(参照：http://cs.itd.nrl.navy.mil/work/olsr/index.php)，在运行时出现了一个错误，参照相关的资料解决了该问题，过程如下。

错误代码从错误发生时开始输出，然后返回上一级调用，上一级可能继续返回错误代码的相关信息，最典型的模式是

1 "eval $self create-wireless-node $args"          # 命令代码
2   (procedure "_o3" line 23)                    # 命令所在行数
3   (Simulator node line 23)                    # Simulator 实体的node函数体
4     invoked from within                        #
5 "$ns_ node"                                # 调用代码

此5行大体意思是， 1行对应的命令是从句柄为 "_o3"的Simulator实体的函数 node  "函数定义"的第23行调用的

句柄说明
在每一个Simulator对应的模拟中"_o*"标示唯一的一个分裂类实体，也就是说，所有的分裂类实体都有自己的唯一标识 详见《tclcl-1.19/tcl-object.tcl 代码分析 》

对于下面错误代码中提到的几个句柄说明如下：
_o3 是一个Simulator实例句柄， _o14是一个node实例句柄，_o17是一个agent实例句柄

错误例子：

INITIALIZE THE LIST xListHead

 

  1.     (_o17 cmd line 1)
  2.     invoked from within
  3. "_o17 cmd port-dmux _o26"
  4.     invoked from within
  5. "catch "$self cmd $args" ret"
  6.     invoked from within
  7. "if [catch "$self cmd $args" ret] {
  8. set cls [$self info class]
  9. global errorInfo
  10. set savedInfo $errorInfo
  11. error "error when calling class $cls: $args" $..."
  12.     (procedure "_o17" line 2)
  13.     (SplitObject unknown line 2)
  14.     invoked from within
  15. "$agent port-dmux $dmux_"
  16.     (procedure "_o14" line 11)
  17.     (Node/MobileNode add-target-rtagent line 11)
  18.     invoked from within
  19. "$self add-target-rtagent $agent $port"
  20.     (procedure "_o14" line 28)
  21.     (Node/MobileNode add-target line 28)
  22.     invoked from within
  23. "$self add-target $agent $port"
  24.     (procedure "_o14" line 15)
  25.     (Node attach line 15)
  26.     invoked from within
  27. "$node attach $ragent [Node set rtagent_port_]"
  28.     (procedure "_o3" line 84)
  29.     (Simulator create-wireless-node line 84)
  30.     invoked from within
  31. "_o3 create-wireless-node"
  32.     ("eval" body line 1)
  33.     invoked from within
  34. "eval $self create-wireless-node $args"
  35.     (procedure "_o3" line 23)
  36.     (Simulator node line 23)
  37.     invoked from within
  38. "$ns_ node"
  39.     ("for" body line 2)
  40.     invoked from within
  41. "for {set i 0} {$i < $val(nn) } {incr i} {
  42.                 set node_($i) [$ns_ node]
  43.                 $node_($i) random-motion 1
  44.                                 ;# enable random motion
  45.         }"
  46.     (file "basicmhop.tcl" line 132)


错误分析过程（自底向上）
其实tcl中的self 相当于 C++中的this指针，了解C++的肯定知道，this指针有一个运行时的问题，"this command"可能动态调用父类< 或者子类? > 的同名command，具体的分析采用从下向上方法，如果你很熟悉ns2机制，可以越过一些，具体的分析如下：
1.  41-44给出错误从脚本附近的代码，在一个for循环中, 38行说明"$ns_ node"是来自42行
当在tcl脚本里调用如下：
1 set  ns_  [new Simulator]
2 set  node_(0)  [$ns_ node]  ;#调用了Simulator instproc node 过程

//ns-2.31/tcl/lib/ns-lib.tcl  

Simulator instproc node args {            // args 为域参数
$self instvar Node_ routingAgent_ wiredRouting_ satNodeType_
if { [Simulator info vars EnableMcast_] != "" } {
warn "Flag variable Simulator::EnableMcast_ discontinued./n/t/
Use multicast methods as:/n/t/t/
% set ns /[new Simulator -multicast on]/n/t/t/
% /$ns multicast"
$self multicast            #$self = = "-o3"
Simulator unset EnableMcast_
}
... ... ... ... ... ... ... ... ... ... ... 
if { [info exists routingAgent_] && ($routingAgent_ != "") } {
23        set node [eval $self create-wireless-node $args]     #$self = = "-o3" 
#使用eval 是从tcl脚本调用Otcl对象及函数 就是"_o3 create-wireless-node"
... ... ... ... ... ... ... ... ... ... ... 
}
return $node            //出口之一
}

#分析一下下句语法Node_(*)是干什么用的？
set node [eval new [Simulator set node_factory_] $args]
set Node_([$node id]) $node

#把节点加入到Simulator的C++空间的链表中
$self add-node $node [$node id] 

#set the nodeid in c++ Node - ratul
$node nodeid [$node id]        
$node set ns_ $self                    //指向模拟器实例
$self check-node-num
return $node
}
2  34-37行可知，调用进入函数 $self create-wireless-node ，31-33指明了"_o3 create-wireless-node"     也就是下面函数，在此 _o3 是Simulaor的一个实体句柄
//ns-2.31/tcl/lib/ns-lib.tcl 
Simulator instproc create-wireless-node args {
//omit some code here... ... ... ... ... .. .... ... ... ... ... ... ... ... ...
Simulator set IMEPFlag_ OFF

# create node instance
set node [eval $self create-node-instance $args]

... ... ... ... ... .. .... ... ... ... ... ... ... ... ...        //omit some code here

# Attach agent
if {$routingAgent_ != "DSR"} {
$node attach $ragent [Node set rtagent_port_]
}
... ... ... ... ... .. .... ... ... ... ... ... ... ... ...

return $node
}
27 "$node attach $ragent [Node set rtagent_port_]"  此时 "$ node = = _o14"
28     (procedure "_o3" line 75)
29     (Simulator create-wireless-node line 75)
30     invoked from within
31 "_o3 create-wireless-node"    
3.  27-30 可知 $node attach $ragent [Node set rtagent_port_] 在上面函数的75行
//ns-2.31/tcl/lib/ns-node.tcl
Node instproc attach { agent { port "" } } {
.......................................................
$agent set agent_port_ $port
15    $self  add-target $agent  $port 
}



23  "$self add-target $agent $port"    
24     (procedure "_o14" line 15)
25     (Node attach line 15) 
26     invoked from within
27 "$node attach $ragent [Node set rtagent_port_]"

4.  23-25行 可知self add-target $agent $port 来自Node attach函数的15行

add-target过程是在//ns-2.34/tcl/lib/ns-node.tcl中实现的，它会调用到MobileNode的add-target过程。

 


19-23行可知 动态转向了Node/MobileNode  <-o14> 的add-target， 函数的23行,这里的node其实是一个移动节点Node/MobileNode 类型的，所以调用的是下面的函数(//ns-2.3*/tcl/lib/ns-mobilenode.tcl)
Node/MobileNode instproc add-target { agent port } {
$self instvar dmux_ imep_ toraDebug_ 
set ns [Simulator instance]
set newapi [$ns imep-support]
$agent set sport_ $port
... ... ... ... ... 
if { $port == [Node set rtagent_port_] } {            
# Ad hoc routing agent setup needs special handling
23        $self add-target-rtagent $agent $port
return
}
... ... ... ... ... 
}

19 "$self add-target-rtagent $agent $port"
20     (procedure "_o14" line 23)
21     (Node/MobileNode add-target line 23)
22     invoked from within
23  "$self add-target $agent $port"
5. $self add-target-rtagent $agent $port 
Node/MobileNode instproc add-target-rtagent { agent port } {
$self instvar imep_ toraDebug_ 

set ns [Simulator instance]
set newapi [$ns imep-support]
set namfp [$ns get-nam-traceall]

set dmux_ [$self demux]
set classifier_ [$self entry]

# let the routing agent know about the port dmux
$agent port-dmux $dmux_    
... ... ...省略一些代码 ... ... ...
}

15 "$agent port-dmux $dmux_"
16     (procedure "_o14" line 11)
17     (Node/MobileNode add-target-rtagent line 11)
18     invoked from within
19 "$self add-target-rtagent $agent $port"

6        15-19可以知调用."$agent port-dmux $dmux_" 但是agent 没有函数port-dmux ,agent 的祖先也没有次函数，所以转到 ->  nrlolsr.cpp，发现它在command函数中没有实现port-dmux $dmux。也没有定义次函数，所以问题在这里，没有相应的处理代码，这里最主要的是要学会看代码。

 

 

解决方法: 依照aodv协议中进行处理，即修改nrlolsr.h/cc文件，在头文件中加入port_dmux_的定义，在nrlolsr.cpp文件中加入port_dmux的实现，重新编译即可。

//nrlolsr.h中加入:

        NsObject        *port_dmux_;        //my port dmux 

 

//nrlolsr.cc中加入：

 

NRLOLSR::NRLOLSR(nsaddr_t id) : Agent(PT_NRLOLSR),

 htimer(this), ttimer(this), port_dmux_(0) {

...

}

及：

 

int 

NRLOLSR::command(int argc, const char*const* argv) {

......

    else if(strcasecmp(argv[1], "port-dmux") == 0) {        

      NsObject *obj;

      port_dmux_ = (NsObject *)obj;

      return TCL_OK;

    }

}

 

参考：http://hi.baidu.com/ynp130y/blog/item/30755826faaef021d5074242.html

 

bamboogz99
关注
  • 1
    点赞
  • 踩
  • 6
    收藏
    觉得还不错? 一键收藏
  • 1
    评论
专栏目录
NS2.rar_ns2
09-21
C/C++是使用ns2的基础。调试的过程中出现的错误大多数都是C/C++常见的错误，比如空指针...不要被ns环境吓倒，ns2环境中出现的C/C++问题和在你熟悉的环境中出现的C/C++问题本质上是一样的，解决的方法和思路也基本相同。
OPC UA常见故障信息代码
热门推荐
ymfz001的博客
05-07 1万+
OPC UA常见故障信息代码 下表包含了状态接线端返回的代码的说明。 info code 描述 好 0x00000000 操作成功。 不确定 0x40000000 值不确定，但原因不明。 坏 0x80000000 值为坏，但原因不明。 Bad_UnexpectedError 0x80010000 发生非预期错误。 Bad_InternalError 0x80020000 编...
Optimized Link State Routing Protocol(OLSRP)
Linux嵌入式开发
11-18 1298
 Optimized Link State Routing Protocol(OLSRP)是一个可以收集链路状态并且能动态计算网络内最佳路由的动态链路协议.具体资料:ptimized Link State Routing ProtocolFrom Wikipedia, the free encyclopedia  (Redirected from OLSR)Jump to: navigation,
9 CORE Services服务
diligent_lee的博客
08-12 1343
CORE services服务 原文链接：CORE Services 1. 服务 CORE使用服务的概念来指定节点启动时在节点上运行的进程或脚本。 第3层节点（例如路由器和PC）由它们运行的服务定义。 可以为每个节点定制服务，或者可以创建新的定制服务。可以创建每个具有不同名称，图标和默认服务集的新节点类型。每个服务定义每个节点的目录，配置文件，启动索引，启动命令，验证命令，关闭命令以及与节点关联的元数据。 注意：网络命名空间节点不经历使用初始化、启动或系统框架的正常引导过程。这些轻量级节点使用配置的 C
NS2 执行Tcl脚本文件时的错误提示及解决方法
FeelTouch Labs
05-29 8315
1，开始运行脚本时提示如下错误： can't read "link_(2:3)": no such variable     while executing "eval $link_([$n1 id]:[$n2 id]) $op $args"     (procedure "_o3" line 3)     (Simulator duplex-link-op line 3)     i
实验中可能出现的错误及其解决方法
sinat_34586770的博客
11-29 7663
转载自：http://peilie-coolboy.blog.163.com/blog/static/23952371201241710531592/ 参考文献： [1]马崇霄,吴长奇.基于网络仿真器NS2的Adhoc网络路由协议仿真[J].电子测量技术,2008(5):75-79   按照参考文献[1]所给的代码运行的时候可能出现的错误及其对应的解决方法 出现以
添加路由协议出错问题
libgang的专栏
03-06 1150
添加路由协议后，经常会出现以下错误，其实还是协议没有添加成功，估计很多人都会遇到这个问题，主要是“_o14”node实例句柄出错，换句话说，就是在修改ns-lib.tcl的时候出错了，之前有就MFlood协议添加就分析错误代码的文章，感觉博主写得很不错，其实也可以用gdb调试来寻找可能的问题原因～ // 5）     (_o14 cmd line 1)     invoked from wi
NS2仿真過程中遇到的問題和相關解決方案
FeelTouch Labs
06-29 1844
因為畢業設計課題的要求，要用S2仿真軟件進行TCP方案的仿真和驗證，在此過程中，遇到了一些問題，也找到了一些解決辦法，現在記錄下來，持續更新中..... 問題一：修改完NS2核心模塊(C++)部分後，重新運行TCL文件沒有任何效果。 問題逐步解答： 1，經過初步檢查後發現是因為，修改完核心模塊後，我沒有重新編譯生成新的.O文件所致。 2，修改完之後，進行make經歷了一些時間等待後，重新運
ns2.35错误
rc_ll的专栏
04-02 1268
今天又在调试ns2模块。出现 （1）error "error when calling class $cls: $args" $..." (splitobject unknown error)错误 原来我在写command函数的时候，有一个忘记写上return TCL_OK了 (2)报undefined reference to hdr_**::offset_的错误 错误一大堆，又没什么好
错误代码分析
lzqlgq的CSDN专栏
05-18 1万+
作者：[email protected]简介" google不是万能的，没有google是万万不能的 "     很多人人觉得使用ns2 debug 时，错误提示很乱，无从下手，很难找到错误根源，一个好的办法是使用google搜索，确实只要你有耐心，很多问题使用google都可以找到答案,但是google不是万能的,所以自己从错误提示找出
ns2中can't read "debug_": no such variable类似问题
03-09 5103
前两天在ns2中加入两个agent，一个application，编译没有问题，但是在运行tcl文件时出现如下错误： INITIALIZE THE LIST xListHead can't read "debug_": no such variable     (Object set line 1)     invoked from within "CMUTrace/Recv set de
关于NS-2仿真中移动节点的设置 ［转载］
冯＊诺曼底
06-20 1776
要做一个4个节点的Ad hoc网络仿真，实验环境和要求是： 采 用的无线网拓扑结构，主机节点数共有4个；节点1到4的初始位置坐标分别为(0,1 000)、(0,800)、(0,600)和(400,600)，节点1和2在仿真中保持静止不动，节点3和4则以60m/s速度分别向坐标(0,0)和 (400,0)位置方向垂直移动。系统带宽为2Mbps，系统节点缺省无线传输半径约为500m。仿真使用的业务流
NS2学习之路
u013218720的专栏
04-23 2147
柯老师的NS2新网址 http://csie.nqu.edu.tw/smallko/ns2/measure.htm 遇见错误： Administrator@WIN-4CFQRGDACUS ~/ns-allinone-2.35/ns-2.35/tcl/ex $ ns mytest1.tcl invalid command name "Agent/TCPSink/mTcpSink"    
用ns2测试*.tcl时出现error when calling class OldSim:的解决办法
一片纯净的热土
04-03 2176
不要在终端中直接进入ns，然后到程序目录。 而是直接的运行cd 安装路径/......./examples,然后再执行 ns example2.tcl 就可以了，不会出现以上的错误了。
一个奇怪的NS2错误
一心两用
06-30 2953
ns2, leach, 错误
ns2.34 移植MFLOOD协议时出现的问题
dianwu2861的博客
03-19 218
安全按照《NS网络模拟核协议仿真》第11章的步骤进行修改，但是make的时候出现了一下错误： make[1]: 正在进入目录 `/home/wang/ns/ns-allinone-2.34/ns-2.34/indep-utils/cmu-scen-gen/setdest'make[1]: 没有什么可以做的为 `all'。make[1]:正在离开目录 `/home/wang/ns/ns-...
ubuntu 网络仿真 段错误的一种可能的处理方法
weaponwang的专栏
11-21 674
今天在做仿真的时候，在ns2下
ubuntu安装NS2
最新发布
08-23
要在Ubuntu上安装NS2，你可以按照以下步骤进行操作： 1. 打开终端（Ctrl+Alt+T）。 2. 更新软件包列表和系统： ``` sudo apt update sudo apt upgrade ``` 3. 安装NS2的依赖库： ``` sudo apt install build-...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 1
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值