00001 /* 00002 * Copyright (c) 2008, Karlstad University 00003 * Erik Andersson, Emil Ljungdahl, Lars-Olof Moilanen 00004 * All rights reserved. 00005 * 00006 * Redistribution and use in source and binary forms, with or without 00007 * modification, are permitted provided that the following conditions are met: 00008 * * Redistributions of source code must retain the above copyright 00009 * notice, this list of conditions and the following disclaimer. 00010 * * 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 * * Neither the name of the <organization> 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 COPYRIGHT HOLDERS ``AS IS'' AND ANY 00018 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 00019 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE 00020 * DISCLAIMED. IN NO EVENT SHALL <copyright holder> BE LIABLE FOR ANY 00021 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 00022 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 00023 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND 00024 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 00025 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 00026 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00027 * 00028 * $Id: initlib.cc 92 2008-03-25 19:35:54Z emil $ 00029 */ 00030 00031 #include <tclcl.h> 00032 #include <clmessage.h> 00033 #include<mmac-csma.h> 00034 00035 ClMessage_t MAC_CLMSG_GET_ADDR = 0; 00036 00037 extern EmbeddedTcl InitTclCode; 00038 00039 extern "C" int Mmac_Init() 00040 { 00041 MAC_CLMSG_GET_ADDR = ClMessage::addClMessage(); 00042 PT_MMAC_ACK = p_info::addPacket("MMAC_ACK"); 00043 InitTclCode.load(); 00044 return 0; 00045 } 00046 00047 extern "C" int Cygmmac_Init() 00048 { 00049 return Mmac_Init(); 00050 }