git.sur5r.net Git - freertos/blob - Demo/lwIP_MCF5235_GCC/lwip/src/netif/loopif.c

   1 /*\r
   2  * Copyright (c) 2001-2004 Swedish Institute of Computer Science.\r
   3  * All rights reserved. \r
   4  * \r
   5  * Redistribution and use in source and binary forms, with or without modification, \r
   6  * are permitted provided that the following conditions are met:\r
   7  *\r
   8  * 1. Redistributions of source code must retain the above copyright notice,\r
   9  *    this list of conditions and the following disclaimer.\r
  10  * 2. Redistributions in binary form must reproduce the above copyright notice,\r
  11  *    this list of conditions and the following disclaimer in the documentation\r
  12  *    and/or other materials provided with the distribution.\r
  13  * 3. The name of the author may not be used to endorse or promote products\r
  14  *    derived from this software without specific prior written permission. \r
  15  *\r
  16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED \r
  17  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF \r
  18  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT \r
  19  * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, \r
  20  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT \r
  21  * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS \r
  22  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN \r
  23  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING \r
  24  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY \r
  25  * OF SUCH DAMAGE.\r
  26  *\r
  27  * This file is part of the lwIP TCP/IP stack.\r
  28  * \r
  29  * Author: Adam Dunkels <adam@sics.se>\r
  30  *\r
  31  */\r
  32 #include "lwip/opt.h"\r
  33 \r
  34 #if LWIP_HAVE_LOOPIF\r
  35 \r
  36 #include "netif/loopif.h"\r
  37 #include "lwip/mem.h"\r
  38 \r
  39 #if defined(LWIP_DEBUG) && defined(LWIP_TCPDUMP)\r
  40 #include "netif/tcpdump.h"\r
  41 #endif /* LWIP_DEBUG && LWIP_TCPDUMP */\r
  42 \r
  43 #include "lwip/tcp.h"\r
  44 #include "lwip/ip.h"\r
  45 \r
  46 static void\r
  47 loopif_input( void * arg )\r
  48 {\r
  49         struct netif *netif = (struct netif *)( ((void **)arg)[ 0 ] );\r
  50         struct pbuf *r = (struct pbuf *)( ((void **)arg)[ 1 ] );\r
  51 \r
  52         mem_free( arg );\r
  53         netif -> input( r, netif );\r
  54 }\r
  55 \r
  56 static err_t\r
  57 loopif_output(struct netif *netif, struct pbuf *p,\r
  58        struct ip_addr *ipaddr)\r
  59 {\r
  60   struct pbuf *q, *r;\r
  61   u8_t *ptr;\r
  62   void **arg;\r
  63 \r
  64 #if defined(LWIP_DEBUG) && defined(LWIP_TCPDUMP)\r
  65   tcpdump(p);\r
  66 #endif /* LWIP_DEBUG && LWIP_TCPDUMP */\r
  67   \r
  68   r = pbuf_alloc(PBUF_RAW, p->tot_len, PBUF_RAM);\r
  69   if (r != NULL) {\r
  70     ptr = r->payload;\r
  71     \r
  72     for(q = p; q != NULL; q = q->next) {\r
  73       memcpy(ptr, q->payload, q->len);\r
  74       ptr += q->len;\r
  75     }\r
  76 \r
  77     arg = mem_malloc( sizeof( void *[2]));\r
  78         if( NULL == arg ) {\r
  79                 return ERR_MEM;\r
  80         }\r
  81         \r
  82         arg[0] = netif;\r
  83         arg[1] = r;\r
  84         /**\r
  85          * workaround (patch #1779) to try to prevent bug #2595:\r
  86          * When connecting to "localhost" with the loopif interface,\r
  87          * tcp_output doesn't get the opportunity to finnish sending the\r
  88          * segment before tcp_process gets it, resulting in tcp_process\r
  89          * referencing pcb->unacked-> which still is NULL.\r
  90          * \r
  91          * TODO: Is there still a race condition here? Leon\r
  92          */\r
  93         sys_timeout( 1, loopif_input, arg );\r
  94         \r
  95     return ERR_OK;    \r
  96   }\r
  97   return ERR_MEM;\r
  98 }\r
  99 \r
 100 err_t\r
 101 loopif_init(struct netif *netif)\r
 102 {\r
 103   netif->name[0] = 'l';\r
 104   netif->name[1] = 'o';\r
 105 #if 0 /** TODO: I think this should be enabled, or not? Leon */\r
 106   netif->input = loopif_input;\r
 107 #endif\r
 108   netif->output = loopif_output;\r
 109   return ERR_OK;\r
 110 }\r
 111 \r
 112 #endif /* LWIP_HAVE_LOOPIF */\r
 113 \r
 114 \r
 115 \r
 116 \r
 117 \r
 118 \r
 119 \r