dynalink.cc

Go to the documentation of this file.
00001 // -*-  Mode:C++; c-basic-offset:8; tab-width:8; indent-tabs-mode:t -*- 
00002 
00003 /*
00004  * Copyright (C) 1997 by the University of Southern California
00005  * $Id: dynalink.cc,v 1.10 2005/08/25 18:58:06 johnh Exp $
00006  *
00007  * This program is free software; you can redistribute it and/or
00008  * modify it under the terms of the GNU General Public License,
00009  * version 2, as published by the Free Software Foundation.
00010  *
00011  * This program is distributed in the hope that it will be useful,
00012  * but WITHOUT ANY WARRANTY; without even the implied warranty of
00013  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00014  * GNU General Public License for more details.
00015  *
00016  * You should have received a copy of the GNU General Public License along
00017  * with this program; if not, write to the Free Software Foundation, Inc.,
00018  * 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
00019  *
00020  *
00021  * The copyright of this module includes the following
00022  * linking-with-specific-other-licenses addition:
00023  *
00024  * In addition, as a special exception, the copyright holders of
00025  * this module give you permission to combine (via static or
00026  * dynamic linking) this module with free software programs or
00027  * libraries that are released under the GNU LGPL and with code
00028  * included in the standard release of ns-2 under the Apache 2.0
00029  * license or under otherwise-compatible licenses with advertising
00030  * requirements (or modified versions of such code, with unchanged
00031  * license).  You may copy and distribute such a system following the
00032  * terms of the GNU GPL for this module and the licenses of the
00033  * other code concerned, provided that you include the source code of
00034  * that other code when and as the GNU GPL requires distribution of
00035  * source code.
00036  *
00037  * Note that people who make modified versions of this module
00038  * are not obligated to grant this special exception for their
00039  * modified versions; it is their choice whether to do so.  The GNU
00040  * General Public License gives permission to release a modified
00041  * version without this exception; this exception also makes it
00042  * possible to release a modified version which carries forward this
00043  * exception.
00044  *
00045  */
00046 
00047 //
00048 //      Author:         Kannan Varadhan <kannan@isi.edu>
00049 //      Version Date:   Mon Jun 30 15:51:33 PDT 1997
00050 
00051 #ifndef lint
00052 static const char rcsid[] =
00053     "@(#) $Header: /nfs/jade/vint/CVSROOT/ns-2/link/dynalink.cc,v 1.10 2005/08/25 18:58:06 johnh Exp $ (USC/ISI)";
00054 #endif
00055 
00056 #include "connector.h"
00057 
00058 // #include "packet.h"
00059 // #include "queue.h"
00060 
00061 class DynamicLink : public Connector {
00062 public:
00063     DynamicLink() : down_(0), status_(1) { bind("status_", &status_); }
00064 protected:
00065     int command(int argc, const char*const* argv);
00066     void recv(Packet* p, Handler* h);
00067     NsObject* down_;
00068     int status_;
00069 };
00070 
00071 static class DynamicLinkClass : public TclClass {
00072 public:
00073     DynamicLinkClass() : TclClass("DynamicLink") {}
00074     TclObject* create(int, const char*const*) {
00075         return (new DynamicLink);
00076     }
00077 } class_dynamic_link;
00078 
00079 
00080 int DynamicLink::command(int argc, const char*const* argv)
00081 {
00082     if (argc == 2) {
00083         if (strcmp(argv[1], "status?") == 0) {
00084             Tcl::instance().result(status_ ? "up" : "down");
00085             return TCL_OK;
00086         }
00087     }
00088     return Connector::command(argc, argv);
00089 }
00090 
00091 void DynamicLink::recv(Packet* p, Handler* h)
00092 {
00093     if (status_)
00094         target_->recv(p, h);
00095     else
00096         drop(p);
00097 }

Generated on Tue Mar 6 16:47:44 2007 for ns2 Network Simulator 2.29 by  doxygen 1.4.6