object.cc
上传用户:rrhhcc
上传日期:2015-12-11
资源大小:54129k
文件大小:3k
源码类别:

通讯编程

开发平台:

Visual C++

  1. /* -*- Mode:C++; c-basic-offset:8; tab-width:8; indent-tabs-mode:t -*-
  2.  *
  3.  * Copyright (c) 1994 Regents of the University of California.
  4.  * All rights reserved.
  5.  *
  6.  * Redistribution and use in source and binary forms, with or without
  7.  * modification, are permitted provided that the following conditions
  8.  * are met:
  9.  * 1. Redistributions of source code must retain the above copyright
  10.  *    notice, this list of conditions and the following disclaimer.
  11.  * 2. Redistributions in binary form must reproduce the above copyright
  12.  *    notice, this list of conditions and the following disclaimer in the
  13.  *    documentation and/or other materials provided with the distribution.
  14.  * 3. All advertising materials mentioning features or use of this software
  15.  *    must display the following acknowledgement:
  16.  * This product includes software developed by the Computer Systems
  17.  * Engineering Group at Lawrence Berkeley Laboratory.
  18.  * 4. Neither the name of the University nor of the Laboratory may be used
  19.  *    to endorse or promote products derived from this software without
  20.  *    specific prior written permission.
  21.  *
  22.  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  23.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  24.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  25.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  26.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  27.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  28.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  29.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  30.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  31.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  32.  * SUCH DAMAGE.
  33.  */
  34. #ifndef lint
  35. static const char rcsid[] =
  36.     "@(#) $Header: /cvsroot/nsnam/ns-2/common/object.cc,v 1.18 2000/09/01 03:04:06 haoboy Exp $ (LBL)";
  37. #endif
  38. #include <stdarg.h>
  39. #include "object.h"
  40. #include "packet.h"
  41. #include "flags.h"
  42. NsObject::~NsObject()
  43. {
  44. }
  45. NsObject::NsObject()
  46. {
  47. // Turn off debug by default
  48. debug_ = 0;
  49. }
  50. void
  51. NsObject::delay_bind_init_all()
  52. {
  53. delay_bind_init_one("debug_");
  54. }
  55. int
  56. NsObject::delay_bind_dispatch(const char *varName, const char *localName, TclObject *tracer)
  57. {
  58. if (delay_bind_bool(varName, localName, "debug_", &debug_, tracer)) 
  59. return TCL_OK;
  60. return TclObject::delay_bind_dispatch(varName, localName, tracer);
  61. }
  62. void NsObject::reset()
  63. {
  64. }
  65. int NsObject::command(int argc, const char*const* argv)
  66. {
  67. if (argc == 2) {
  68. if (strcmp(argv[1], "reset") == 0) {
  69. reset();
  70. return (TCL_OK);
  71. }
  72. }
  73. return (TclObject::command(argc, argv));
  74. }
  75. /*
  76.  * Packets may be handed to NsObjects at sheduled points
  77.  * in time since a node is an event handler and a packet
  78.  * is an event.  Packets should be the only type of event
  79.  * scheduled on a node so we can carry out the cast below.
  80.  */
  81. void NsObject::handle(Event* e)
  82. {
  83. recv((Packet*)e);
  84. }
  85. void NsObject::recv(Packet *p, const char*)
  86. {
  87. Packet::free(p);
  88. }
  89. // Debugging output for all TclObjects. By default, print to stdout
  90. void NsObject::debug(const char *fmt, ...)
  91. {
  92. if (!debug_)
  93. return;
  94. va_list ap;
  95. va_start(ap, fmt);
  96. vprintf(fmt, ap);
  97. }