自立但不自私,自强但不自傲,自尊但不自高,自爱但不自娇,自珍但不自赏!

NS2中C++与TCL的三种接口

技术文档 5979浏览 0评论

第一类接口:
  tcl中的语句:  
   set chan($j) [new WimshChannel]
 
  c++对应的语句:
    1.定义WimshChannel类
      class WimshChannel : public TclObject {};
    2.做好两层的接口
       static class WimshChannelClass : public TclClass {
       public:
        WimshChannelClass() : TclClass("WimshChannel") {}
        TclObject* create(int, const char*const*) {
          return (new WimshChannel);
        }
      } class_wimsh_channel;
 
第二类接口:
  tcl中的语句:  
    $chan($j) topology $topo
 
  c++中对应的语句
    int WimshChannel::command(int argc, const char*const* argv)
       if ( argc == 3 && strcmp (argv[1], "topology") == 0 ) {
                topology_ = (WimshTopologySimple*) TclObject::lookup(argv[2]);
         return TCL_OK;
            }
 
 
第三类接口:
  tcl中的语句:
    Mac/802_11e set basicRate_ 1Mb
  c++中对应的语句:
    Tcl& tcl = Tcl::instance();
    tcl.evalf("Mac/802_11e set basicRate_");
 
    if (strcmp(tcl.result(), "0") != 0)
       bind_bw("basicRate_", &basicRate_);
    else
       basicRate_ = bandwidth_;

转载请注明:自由的风 » NS2中C++与TCL的三种接口

发表我的评论
取消评论

表情

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址