00001 /* 00002 * Copyright (c) 2006 Regents of the SIGNET lab, University of Padova. 00003 * All rights reserved. 00004 * 00005 * Redistribution and use in source and binary forms, with or without 00006 * modification, are permitted provided that the following conditions 00007 * are met: 00008 * 1. Redistributions of source code must retain the above copyright 00009 * notice, this list of conditions and the following disclaimer. 00010 * 2. Redistributions in binary form must reproduce the above copyright 00011 * notice, this list of conditions and the following disclaimer in the 00012 * documentation and/or other materials provided with the distribution. 00013 * 3. Neither the name of the University of Padova (SIGNET lab) nor the 00014 * names of its contributors may be used to endorse or promote products 00015 * derived from this software without specific prior written permission. 00016 * 00017 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 00018 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 00019 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 00020 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR 00021 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 00022 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 00023 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; 00024 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 00025 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 00026 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 00027 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00028 */ 00029 00030 #include "channel-module.h" 00031 00032 00033 ChannelModule::ChannelModule() 00034 { 00035 } 00036 00037 ChannelModule::~ChannelModule() 00038 { 00039 } 00040 00041 00042 // // TCL command intepreter 00043 int ChannelModule::command(int argc, const char* const* argv) 00044 { 00045 Tcl& tcl = Tcl::instance(); 00046 if (argc==3) 00047 { 00048 // install a SAP to an above module 00049 if (strcasecmp(argv[1],"addsap")==0) 00050 { 00051 ChSAP *chsap = dynamic_cast<ChSAP*>(TclObject::lookup(argv[2])); 00052 if (debug_>10) 00053 printf("ChannelModule::command %s\n", argv[1]); 00054 addUpSAP(chsap); 00055 return (TCL_OK); 00056 } 00057 00058 } 00059 return Module::command(argc, argv); 00060 } 00061 00062 00063 int ChannelModule::getChSAPnum() 00064 { 00065 Module::getUpLaySAPnum(); 00066 } 00067 00068 ChSAP* ChannelModule::getChSAP(int i) 00069 { 00070 return((ChSAP *)Module::getUpLaySAP(i)); 00071 } 00072 00073 00074 void ChannelModule::swapChSAP(int i, int j) 00075 { 00076 Module::swapUpLaySAP(i,j); 00077 } 00078 00079 00080 void ChannelModule::recv(Packet* p, Handler *h) 00081 { 00082 recv(p, dynamic_cast<ChSAP*>(h)); 00083 } 00084 00085 void ChannelModule::recv(Packet* p) 00086 { 00087 recv(p,(ChSAP*)0); 00088 }