现在的位置: 首页 > 综合 > 正文

LEACH协议代码的两个BUG

2013年10月24日 ⁄ 综合 ⁄ 共 2357字 ⁄ 字号 评论关闭

1、能量消耗的问题.LEACH协议运行完后,有个记录节点能量的文件,最后节点的总消耗超过了我们最初设定的2J能量,这个是因为checkalive过程中对死亡的节点只是设置标志,移出信道,但并没有终止其发送数据(数据发送不出,但能量继续消耗).解决方法就是:对死亡节点的处理代码最后加一句 $self  GoToSleep就可以了,虽然加这个不"正规",但意思到了,就是要死亡节点停止所有的活动就可以了
那是因为在节点死掉了以后,程序中,节点还在发送数据包。在bs_app.tcl 中,BS节点收到数据后,发现发送的节点已经死了,则忽略其发送的数据。但是在计算节点能量,也就是ns-leach.tcl文件中的 checkalive函数中,在一个周期内,不管节点死了没有,它发送数据消耗的能量都被计算到leach.energy文件中去了。

 

Application/LEACH instproc checkAlive {} {
  global ns_ chan opt node_
  $self instvar alive_ TDMAschedule_
  $self instvar begin_idle_ begin_sleep_
  # Check the alive status of the node.  If the node has run out of
  # energy, it no longer functions in the network.
  set ISalive [[[$self node] set netif_(0)] set alive_]
  if {$alive_ == 1} {
    if {$ISalive == 0} {
      puts "Node [$self nodeID] is DEAD!!!!"
      $chan removeif [[$self node] set netif_(0)]
      set alive_ 0
      set opt(nn_) [expr $opt(nn_) - 1]
      if {$opt(rcapp) == "LEACH-C/StatClustering" && /
          [$self isClusterHead?]} {
        foreach element $TDMAschedule_ {
          if {$element != [$self nodeID]} {
            puts "Node $element is effectively DEAD!!!!"
            $chan removeif [$node_($element) set netif_(0)]
            [$node_($element) set netif_(0)] set alive_ 0
            [$node_($element) set rca_app_] set alive_ 0
            set opt(nn_) [expr $opt(nn_) - 1]
          }
        }
      }
     
      #To solove the Energy consumed > Totle Energy bug
   $self GoToSleep
    } else {
      $ns_ at [expr [$ns_ now] + 0.1] "$self checkAlive"
      if {$begin_idle_ >= $begin_sleep_} {
        set idle_energy [expr $opt(Pidle) * [expr [$ns_ now] - $begin_idle_]]
        [$self getER] remove $idle_energy
        set begin_idle_ [$ns_ now]
      } else {
        set sleep_energy [expr $opt(Psleep) * [expr [$ns_ now] - $begin_sleep_]]
        [$self getER] remove $sleep_energy
        set begin_sleep_ [$ns_ now]
      }
    }
  }
  if {$opt(nn_) < $opt(num_clusters)} "sens_finish"
}

2、新版本不兼容旧版本的一些参数,在*.out文件中会出现发送时的一些错误.解决方法:将NS-LAECH.TCL文件中第654行的dst_换成dst_addr就可以了.

Application/LEACH instproc send_now {mac_dst link_dst type msg /
                                          data_size dist code} {
    [$self agent] set packetMsg_ $type
    [$self agent] set dst_addr_ $mac_dst
    [$self agent] sendmsg $data_size $msg $mac_dst $link_dst $dist $code
}

 

讲这2个bug修复之后,leach协议可以说已经安装成功了,剩下的就是将程序运行起来,然后分析分析运行之后的结果,可以对比leach和leach-c这两者的区别。

我想说要搞明白leach协议的种种并不是一件简单的事,需要花费很多时间和精力,如果想速成的话是不会有很好的结果的,所以建议是反复的研究安装leach时修改的那些文件,一定要搞清楚每个文件都是干什么的,以及修改leach协议的参数在哪里修改,网络拓扑在哪里修改等等,需要搞清楚,才能明白。

 

本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/xinxiuz/archive/2010/03/10/5364888.aspx

抱歉!评论已关闭.