This short program illustrates how to use the DS130x_I2C library. My objective is to share the same RTC with Microchip 18F MCU.

Dependencies:   mbed DebugLibrary

Committer:
Yann
Date:
Fri Feb 11 10:17:20 2011 +0000
Revision:
1:995212d326ca
Parent:
0:f30e2135b0db
V0.0.0.2

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Yann 0:f30e2135b0db 1 /**
Yann 0:f30e2135b0db 2 * @file
Yann 0:f30e2135b0db 3 * lwIP network interface abstraction
Yann 0:f30e2135b0db 4 *
Yann 0:f30e2135b0db 5 */
Yann 0:f30e2135b0db 6
Yann 0:f30e2135b0db 7 /*
Yann 0:f30e2135b0db 8 * Copyright (c) 2001-2004 Swedish Institute of Computer Science.
Yann 0:f30e2135b0db 9 * All rights reserved.
Yann 0:f30e2135b0db 10 *
Yann 0:f30e2135b0db 11 * Redistribution and use in source and binary forms, with or without modification,
Yann 0:f30e2135b0db 12 * are permitted provided that the following conditions are met:
Yann 0:f30e2135b0db 13 *
Yann 0:f30e2135b0db 14 * 1. Redistributions of source code must retain the above copyright notice,
Yann 0:f30e2135b0db 15 * this list of conditions and the following disclaimer.
Yann 0:f30e2135b0db 16 * 2. Redistributions in binary form must reproduce the above copyright notice,
Yann 0:f30e2135b0db 17 * this list of conditions and the following disclaimer in the documentation
Yann 0:f30e2135b0db 18 * and/or other materials provided with the distribution.
Yann 0:f30e2135b0db 19 * 3. The name of the author may not be used to endorse or promote products
Yann 0:f30e2135b0db 20 * derived from this software without specific prior written permission.
Yann 0:f30e2135b0db 21 *
Yann 0:f30e2135b0db 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
Yann 0:f30e2135b0db 23 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
Yann 0:f30e2135b0db 24 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
Yann 0:f30e2135b0db 25 * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
Yann 0:f30e2135b0db 26 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
Yann 0:f30e2135b0db 27 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
Yann 0:f30e2135b0db 28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
Yann 0:f30e2135b0db 29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
Yann 0:f30e2135b0db 30 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
Yann 0:f30e2135b0db 31 * OF SUCH DAMAGE.
Yann 0:f30e2135b0db 32 *
Yann 0:f30e2135b0db 33 * This file is part of the lwIP TCP/IP stack.
Yann 0:f30e2135b0db 34 *
Yann 0:f30e2135b0db 35 * Author: Adam Dunkels <adam@sics.se>
Yann 0:f30e2135b0db 36 *
Yann 0:f30e2135b0db 37 */
Yann 0:f30e2135b0db 38
Yann 0:f30e2135b0db 39 #include "lwip/opt.h"
Yann 0:f30e2135b0db 40
Yann 0:f30e2135b0db 41 #include "lwip/def.h"
Yann 0:f30e2135b0db 42 #include "lwip/ip_addr.h"
Yann 0:f30e2135b0db 43 #include "lwip/netif.h"
Yann 0:f30e2135b0db 44 #include "lwip/tcp_impl.h"
Yann 0:f30e2135b0db 45 #include "lwip/snmp.h"
Yann 0:f30e2135b0db 46 #include "lwip/igmp.h"
Yann 0:f30e2135b0db 47 #include "netif/etharp.h"
Yann 0:f30e2135b0db 48 #include "lwip/stats.h"
Yann 0:f30e2135b0db 49 #if ENABLE_LOOPBACK
Yann 0:f30e2135b0db 50 #include "lwip/sys.h"
Yann 0:f30e2135b0db 51 #if LWIP_NETIF_LOOPBACK_MULTITHREADING
Yann 0:f30e2135b0db 52 #include "lwip/tcpip.h"
Yann 0:f30e2135b0db 53 #endif /* LWIP_NETIF_LOOPBACK_MULTITHREADING */
Yann 0:f30e2135b0db 54 #endif /* ENABLE_LOOPBACK */
Yann 0:f30e2135b0db 55
Yann 0:f30e2135b0db 56 #if LWIP_AUTOIP
Yann 0:f30e2135b0db 57 #include "lwip/autoip.h"
Yann 0:f30e2135b0db 58 #endif /* LWIP_AUTOIP */
Yann 0:f30e2135b0db 59 #if LWIP_DHCP
Yann 0:f30e2135b0db 60 #include "lwip/dhcp.h"
Yann 0:f30e2135b0db 61 #endif /* LWIP_DHCP */
Yann 0:f30e2135b0db 62
Yann 0:f30e2135b0db 63 #if LWIP_NETIF_STATUS_CALLBACK
Yann 0:f30e2135b0db 64 #define NETIF_STATUS_CALLBACK(n) do{ if (n->status_callback) { (n->status_callback)(n); }}while(0)
Yann 0:f30e2135b0db 65 #else
Yann 0:f30e2135b0db 66 #define NETIF_STATUS_CALLBACK(n)
Yann 0:f30e2135b0db 67 #endif /* LWIP_NETIF_STATUS_CALLBACK */
Yann 0:f30e2135b0db 68
Yann 0:f30e2135b0db 69 #if LWIP_NETIF_LINK_CALLBACK
Yann 0:f30e2135b0db 70 #define NETIF_LINK_CALLBACK(n) do{ if (n->link_callback) { (n->link_callback)(n); }}while(0)
Yann 0:f30e2135b0db 71 #else
Yann 0:f30e2135b0db 72 #define NETIF_LINK_CALLBACK(n)
Yann 0:f30e2135b0db 73 #endif /* LWIP_NETIF_LINK_CALLBACK */
Yann 0:f30e2135b0db 74
Yann 0:f30e2135b0db 75 struct netif *netif_list;
Yann 0:f30e2135b0db 76 struct netif *netif_default;
Yann 0:f30e2135b0db 77
Yann 0:f30e2135b0db 78 #if LWIP_HAVE_LOOPIF
Yann 0:f30e2135b0db 79 static struct netif loop_netif;
Yann 0:f30e2135b0db 80
Yann 0:f30e2135b0db 81 /**
Yann 0:f30e2135b0db 82 * Initialize a lwip network interface structure for a loopback interface
Yann 0:f30e2135b0db 83 *
Yann 0:f30e2135b0db 84 * @param netif the lwip network interface structure for this loopif
Yann 0:f30e2135b0db 85 * @return ERR_OK if the loopif is initialized
Yann 0:f30e2135b0db 86 * ERR_MEM if private data couldn't be allocated
Yann 0:f30e2135b0db 87 */
Yann 0:f30e2135b0db 88 static err_t
Yann 0:f30e2135b0db 89 netif_loopif_init(struct netif *netif)
Yann 0:f30e2135b0db 90 {
Yann 0:f30e2135b0db 91 /* initialize the snmp variables and counters inside the struct netif
Yann 0:f30e2135b0db 92 * ifSpeed: no assumption can be made!
Yann 0:f30e2135b0db 93 */
Yann 0:f30e2135b0db 94 NETIF_INIT_SNMP(netif, snmp_ifType_softwareLoopback, 0);
Yann 0:f30e2135b0db 95
Yann 0:f30e2135b0db 96 netif->name[0] = 'l';
Yann 0:f30e2135b0db 97 netif->name[1] = 'o';
Yann 0:f30e2135b0db 98 netif->output = netif_loop_output;
Yann 0:f30e2135b0db 99 return ERR_OK;
Yann 0:f30e2135b0db 100 }
Yann 0:f30e2135b0db 101 #endif /* LWIP_HAVE_LOOPIF */
Yann 0:f30e2135b0db 102
Yann 0:f30e2135b0db 103 void
Yann 0:f30e2135b0db 104 netif_init(void)
Yann 0:f30e2135b0db 105 {
Yann 0:f30e2135b0db 106 #if LWIP_HAVE_LOOPIF
Yann 0:f30e2135b0db 107 ip_addr_t loop_ipaddr, loop_netmask, loop_gw;
Yann 0:f30e2135b0db 108 IP4_ADDR(&loop_gw, 127,0,0,1);
Yann 0:f30e2135b0db 109 IP4_ADDR(&loop_ipaddr, 127,0,0,1);
Yann 0:f30e2135b0db 110 IP4_ADDR(&loop_netmask, 255,0,0,0);
Yann 0:f30e2135b0db 111
Yann 0:f30e2135b0db 112 #if NO_SYS
Yann 0:f30e2135b0db 113 netif_add(&loop_netif, &loop_ipaddr, &loop_netmask, &loop_gw, NULL, netif_loopif_init, ip_input);
Yann 0:f30e2135b0db 114 #else /* NO_SYS */
Yann 0:f30e2135b0db 115 netif_add(&loop_netif, &loop_ipaddr, &loop_netmask, &loop_gw, NULL, netif_loopif_init, tcpip_input);
Yann 0:f30e2135b0db 116 #endif /* NO_SYS */
Yann 0:f30e2135b0db 117 netif_set_up(&loop_netif);
Yann 0:f30e2135b0db 118
Yann 0:f30e2135b0db 119 #endif /* LWIP_HAVE_LOOPIF */
Yann 0:f30e2135b0db 120 }
Yann 0:f30e2135b0db 121
Yann 0:f30e2135b0db 122 /**
Yann 0:f30e2135b0db 123 * Add a network interface to the list of lwIP netifs.
Yann 0:f30e2135b0db 124 *
Yann 0:f30e2135b0db 125 * @param netif a pre-allocated netif structure
Yann 0:f30e2135b0db 126 * @param ipaddr IP address for the new netif
Yann 0:f30e2135b0db 127 * @param netmask network mask for the new netif
Yann 0:f30e2135b0db 128 * @param gw default gateway IP address for the new netif
Yann 0:f30e2135b0db 129 * @param state opaque data passed to the new netif
Yann 0:f30e2135b0db 130 * @param init callback function that initializes the interface
Yann 0:f30e2135b0db 131 * @param input callback function that is called to pass
Yann 0:f30e2135b0db 132 * ingress packets up in the protocol layer stack.
Yann 0:f30e2135b0db 133 *
Yann 0:f30e2135b0db 134 * @return netif, or NULL if failed.
Yann 0:f30e2135b0db 135 */
Yann 0:f30e2135b0db 136 struct netif *
Yann 0:f30e2135b0db 137 netif_add(struct netif *netif, ip_addr_t *ipaddr, ip_addr_t *netmask,
Yann 0:f30e2135b0db 138 ip_addr_t *gw, void *state, netif_init_fn init, netif_input_fn input)
Yann 0:f30e2135b0db 139 {
Yann 0:f30e2135b0db 140 static u8_t netifnum = 0;
Yann 0:f30e2135b0db 141
Yann 0:f30e2135b0db 142 LWIP_ASSERT("No init function given", init != NULL);
Yann 0:f30e2135b0db 143
Yann 0:f30e2135b0db 144 /* reset new interface configuration state */
Yann 0:f30e2135b0db 145 ip_addr_set_zero(&netif->ip_addr);
Yann 0:f30e2135b0db 146 ip_addr_set_zero(&netif->netmask);
Yann 0:f30e2135b0db 147 ip_addr_set_zero(&netif->gw);
Yann 0:f30e2135b0db 148 netif->flags = 0;
Yann 0:f30e2135b0db 149 #if LWIP_DHCP
Yann 0:f30e2135b0db 150 /* netif not under DHCP control by default */
Yann 0:f30e2135b0db 151 netif->dhcp = NULL;
Yann 0:f30e2135b0db 152 #endif /* LWIP_DHCP */
Yann 0:f30e2135b0db 153 #if LWIP_AUTOIP
Yann 0:f30e2135b0db 154 /* netif not under AutoIP control by default */
Yann 0:f30e2135b0db 155 netif->autoip = NULL;
Yann 0:f30e2135b0db 156 #endif /* LWIP_AUTOIP */
Yann 0:f30e2135b0db 157 #if LWIP_NETIF_STATUS_CALLBACK
Yann 0:f30e2135b0db 158 netif->status_callback = NULL;
Yann 0:f30e2135b0db 159 #endif /* LWIP_NETIF_STATUS_CALLBACK */
Yann 0:f30e2135b0db 160 #if LWIP_NETIF_LINK_CALLBACK
Yann 0:f30e2135b0db 161 netif->link_callback = NULL;
Yann 0:f30e2135b0db 162 #endif /* LWIP_NETIF_LINK_CALLBACK */
Yann 0:f30e2135b0db 163 #if LWIP_IGMP
Yann 0:f30e2135b0db 164 netif->igmp_mac_filter = NULL;
Yann 0:f30e2135b0db 165 #endif /* LWIP_IGMP */
Yann 0:f30e2135b0db 166 #if ENABLE_LOOPBACK
Yann 0:f30e2135b0db 167 netif->loop_first = NULL;
Yann 0:f30e2135b0db 168 netif->loop_last = NULL;
Yann 0:f30e2135b0db 169 #endif /* ENABLE_LOOPBACK */
Yann 0:f30e2135b0db 170
Yann 0:f30e2135b0db 171 /* remember netif specific state information data */
Yann 0:f30e2135b0db 172 netif->state = state;
Yann 0:f30e2135b0db 173 netif->num = netifnum++;
Yann 0:f30e2135b0db 174 netif->input = input;
Yann 0:f30e2135b0db 175 #if LWIP_NETIF_HWADDRHINT
Yann 0:f30e2135b0db 176 netif->addr_hint = NULL;
Yann 0:f30e2135b0db 177 #endif /* LWIP_NETIF_HWADDRHINT*/
Yann 0:f30e2135b0db 178 #if ENABLE_LOOPBACK && LWIP_LOOPBACK_MAX_PBUFS
Yann 0:f30e2135b0db 179 netif->loop_cnt_current = 0;
Yann 0:f30e2135b0db 180 #endif /* ENABLE_LOOPBACK && LWIP_LOOPBACK_MAX_PBUFS */
Yann 0:f30e2135b0db 181
Yann 0:f30e2135b0db 182 netif_set_addr(netif, ipaddr, netmask, gw);
Yann 0:f30e2135b0db 183
Yann 0:f30e2135b0db 184 /* call user specified initialization function for netif */
Yann 0:f30e2135b0db 185 if (init(netif) != ERR_OK) {
Yann 0:f30e2135b0db 186 return NULL;
Yann 0:f30e2135b0db 187 }
Yann 0:f30e2135b0db 188
Yann 0:f30e2135b0db 189 /* add this netif to the list */
Yann 0:f30e2135b0db 190 netif->next = netif_list;
Yann 0:f30e2135b0db 191 netif_list = netif;
Yann 0:f30e2135b0db 192 snmp_inc_iflist();
Yann 0:f30e2135b0db 193
Yann 0:f30e2135b0db 194 #if LWIP_IGMP
Yann 0:f30e2135b0db 195 /* start IGMP processing */
Yann 0:f30e2135b0db 196 if (netif->flags & NETIF_FLAG_IGMP) {
Yann 0:f30e2135b0db 197 igmp_start(netif);
Yann 0:f30e2135b0db 198 }
Yann 0:f30e2135b0db 199 #endif /* LWIP_IGMP */
Yann 0:f30e2135b0db 200
Yann 0:f30e2135b0db 201 LWIP_DEBUGF(NETIF_DEBUG, ("netif: added interface %c%c IP addr ",
Yann 0:f30e2135b0db 202 netif->name[0], netif->name[1]));
Yann 0:f30e2135b0db 203 ip_addr_debug_print(NETIF_DEBUG, ipaddr);
Yann 0:f30e2135b0db 204 LWIP_DEBUGF(NETIF_DEBUG, (" netmask "));
Yann 0:f30e2135b0db 205 ip_addr_debug_print(NETIF_DEBUG, netmask);
Yann 0:f30e2135b0db 206 LWIP_DEBUGF(NETIF_DEBUG, (" gw "));
Yann 0:f30e2135b0db 207 ip_addr_debug_print(NETIF_DEBUG, gw);
Yann 0:f30e2135b0db 208 LWIP_DEBUGF(NETIF_DEBUG, ("\n"));
Yann 0:f30e2135b0db 209 return netif;
Yann 0:f30e2135b0db 210 }
Yann 0:f30e2135b0db 211
Yann 0:f30e2135b0db 212 /**
Yann 0:f30e2135b0db 213 * Change IP address configuration for a network interface (including netmask
Yann 0:f30e2135b0db 214 * and default gateway).
Yann 0:f30e2135b0db 215 *
Yann 0:f30e2135b0db 216 * @param netif the network interface to change
Yann 0:f30e2135b0db 217 * @param ipaddr the new IP address
Yann 0:f30e2135b0db 218 * @param netmask the new netmask
Yann 0:f30e2135b0db 219 * @param gw the new default gateway
Yann 0:f30e2135b0db 220 */
Yann 0:f30e2135b0db 221 void
Yann 0:f30e2135b0db 222 netif_set_addr(struct netif *netif, ip_addr_t *ipaddr, ip_addr_t *netmask,
Yann 0:f30e2135b0db 223 ip_addr_t *gw)
Yann 0:f30e2135b0db 224 {
Yann 0:f30e2135b0db 225 netif_set_ipaddr(netif, ipaddr);
Yann 0:f30e2135b0db 226 netif_set_netmask(netif, netmask);
Yann 0:f30e2135b0db 227 netif_set_gw(netif, gw);
Yann 0:f30e2135b0db 228 }
Yann 0:f30e2135b0db 229
Yann 0:f30e2135b0db 230 /**
Yann 0:f30e2135b0db 231 * Remove a network interface from the list of lwIP netifs.
Yann 0:f30e2135b0db 232 *
Yann 0:f30e2135b0db 233 * @param netif the network interface to remove
Yann 0:f30e2135b0db 234 */
Yann 0:f30e2135b0db 235 void
Yann 0:f30e2135b0db 236 netif_remove(struct netif *netif)
Yann 0:f30e2135b0db 237 {
Yann 0:f30e2135b0db 238 if (netif == NULL) {
Yann 0:f30e2135b0db 239 return;
Yann 0:f30e2135b0db 240 }
Yann 0:f30e2135b0db 241
Yann 0:f30e2135b0db 242 #if LWIP_IGMP
Yann 0:f30e2135b0db 243 /* stop IGMP processing */
Yann 0:f30e2135b0db 244 if (netif->flags & NETIF_FLAG_IGMP) {
Yann 0:f30e2135b0db 245 igmp_stop(netif);
Yann 0:f30e2135b0db 246 }
Yann 0:f30e2135b0db 247 #endif /* LWIP_IGMP */
Yann 0:f30e2135b0db 248 if (netif_is_up(netif)) {
Yann 0:f30e2135b0db 249 /* set netif down before removing (call callback function) */
Yann 0:f30e2135b0db 250 netif_set_down(netif);
Yann 0:f30e2135b0db 251 }
Yann 0:f30e2135b0db 252
Yann 0:f30e2135b0db 253 snmp_delete_ipaddridx_tree(netif);
Yann 0:f30e2135b0db 254
Yann 0:f30e2135b0db 255 /* is it the first netif? */
Yann 0:f30e2135b0db 256 if (netif_list == netif) {
Yann 0:f30e2135b0db 257 netif_list = netif->next;
Yann 0:f30e2135b0db 258 } else {
Yann 0:f30e2135b0db 259 /* look for netif further down the list */
Yann 0:f30e2135b0db 260 struct netif * tmpNetif;
Yann 0:f30e2135b0db 261 for (tmpNetif = netif_list; tmpNetif != NULL; tmpNetif = tmpNetif->next) {
Yann 0:f30e2135b0db 262 if (tmpNetif->next == netif) {
Yann 0:f30e2135b0db 263 tmpNetif->next = netif->next;
Yann 0:f30e2135b0db 264 break;
Yann 0:f30e2135b0db 265 }
Yann 0:f30e2135b0db 266 }
Yann 0:f30e2135b0db 267 if (tmpNetif == NULL)
Yann 0:f30e2135b0db 268 return; /* we didn't find any netif today */
Yann 0:f30e2135b0db 269 }
Yann 0:f30e2135b0db 270 snmp_dec_iflist();
Yann 0:f30e2135b0db 271 /* this netif is default? */
Yann 0:f30e2135b0db 272 if (netif_default == netif) {
Yann 0:f30e2135b0db 273 /* reset default netif */
Yann 0:f30e2135b0db 274 netif_set_default(NULL);
Yann 0:f30e2135b0db 275 }
Yann 0:f30e2135b0db 276 LWIP_DEBUGF( NETIF_DEBUG, ("netif_remove: removed netif\n") );
Yann 0:f30e2135b0db 277 }
Yann 0:f30e2135b0db 278
Yann 0:f30e2135b0db 279 /**
Yann 0:f30e2135b0db 280 * Find a network interface by searching for its name
Yann 0:f30e2135b0db 281 *
Yann 0:f30e2135b0db 282 * @param name the name of the netif (like netif->name) plus concatenated number
Yann 0:f30e2135b0db 283 * in ascii representation (e.g. 'en0')
Yann 0:f30e2135b0db 284 */
Yann 0:f30e2135b0db 285 struct netif *
Yann 0:f30e2135b0db 286 netif_find(char *name)
Yann 0:f30e2135b0db 287 {
Yann 0:f30e2135b0db 288 struct netif *netif;
Yann 0:f30e2135b0db 289 u8_t num;
Yann 0:f30e2135b0db 290
Yann 0:f30e2135b0db 291 if (name == NULL) {
Yann 0:f30e2135b0db 292 return NULL;
Yann 0:f30e2135b0db 293 }
Yann 0:f30e2135b0db 294
Yann 0:f30e2135b0db 295 num = name[2] - '0';
Yann 0:f30e2135b0db 296
Yann 0:f30e2135b0db 297 for(netif = netif_list; netif != NULL; netif = netif->next) {
Yann 0:f30e2135b0db 298 if (num == netif->num &&
Yann 0:f30e2135b0db 299 name[0] == netif->name[0] &&
Yann 0:f30e2135b0db 300 name[1] == netif->name[1]) {
Yann 0:f30e2135b0db 301 LWIP_DEBUGF(NETIF_DEBUG, ("netif_find: found %c%c\n", name[0], name[1]));
Yann 0:f30e2135b0db 302 return netif;
Yann 0:f30e2135b0db 303 }
Yann 0:f30e2135b0db 304 }
Yann 0:f30e2135b0db 305 LWIP_DEBUGF(NETIF_DEBUG, ("netif_find: didn't find %c%c\n", name[0], name[1]));
Yann 0:f30e2135b0db 306 return NULL;
Yann 0:f30e2135b0db 307 }
Yann 0:f30e2135b0db 308
Yann 0:f30e2135b0db 309 /**
Yann 0:f30e2135b0db 310 * Change the IP address of a network interface
Yann 0:f30e2135b0db 311 *
Yann 0:f30e2135b0db 312 * @param netif the network interface to change
Yann 0:f30e2135b0db 313 * @param ipaddr the new IP address
Yann 0:f30e2135b0db 314 *
Yann 0:f30e2135b0db 315 * @note call netif_set_addr() if you also want to change netmask and
Yann 0:f30e2135b0db 316 * default gateway
Yann 0:f30e2135b0db 317 */
Yann 0:f30e2135b0db 318 void
Yann 0:f30e2135b0db 319 netif_set_ipaddr(struct netif *netif, ip_addr_t *ipaddr)
Yann 0:f30e2135b0db 320 {
Yann 0:f30e2135b0db 321 /* TODO: Handling of obsolete pcbs */
Yann 0:f30e2135b0db 322 /* See: http://mail.gnu.org/archive/html/lwip-users/2003-03/msg00118.html */
Yann 0:f30e2135b0db 323 #if LWIP_TCP
Yann 0:f30e2135b0db 324 struct tcp_pcb *pcb;
Yann 0:f30e2135b0db 325 struct tcp_pcb_listen *lpcb;
Yann 0:f30e2135b0db 326
Yann 0:f30e2135b0db 327 /* address is actually being changed? */
Yann 0:f30e2135b0db 328 if ((ip_addr_cmp(ipaddr, &(netif->ip_addr))) == 0) {
Yann 0:f30e2135b0db 329 /* extern struct tcp_pcb *tcp_active_pcbs; defined by tcp.h */
Yann 0:f30e2135b0db 330 LWIP_DEBUGF(NETIF_DEBUG | LWIP_DBG_STATE, ("netif_set_ipaddr: netif address being changed\n"));
Yann 0:f30e2135b0db 331 pcb = tcp_active_pcbs;
Yann 0:f30e2135b0db 332 while (pcb != NULL) {
Yann 0:f30e2135b0db 333 /* PCB bound to current local interface address? */
Yann 0:f30e2135b0db 334 if (ip_addr_cmp(&(pcb->local_ip), &(netif->ip_addr))
Yann 0:f30e2135b0db 335 #if LWIP_AUTOIP
Yann 0:f30e2135b0db 336 /* connections to link-local addresses must persist (RFC3927 ch. 1.9) */
Yann 0:f30e2135b0db 337 && !ip_addr_islinklocal(&(pcb->local_ip))
Yann 0:f30e2135b0db 338 #endif /* LWIP_AUTOIP */
Yann 0:f30e2135b0db 339 ) {
Yann 0:f30e2135b0db 340 /* this connection must be aborted */
Yann 0:f30e2135b0db 341 struct tcp_pcb *next = pcb->next;
Yann 0:f30e2135b0db 342 LWIP_DEBUGF(NETIF_DEBUG | LWIP_DBG_STATE, ("netif_set_ipaddr: aborting TCP pcb %p\n", (void *)pcb));
Yann 0:f30e2135b0db 343 tcp_abort(pcb);
Yann 0:f30e2135b0db 344 pcb = next;
Yann 0:f30e2135b0db 345 } else {
Yann 0:f30e2135b0db 346 pcb = pcb->next;
Yann 0:f30e2135b0db 347 }
Yann 0:f30e2135b0db 348 }
Yann 0:f30e2135b0db 349 for (lpcb = tcp_listen_pcbs.listen_pcbs; lpcb != NULL; lpcb = lpcb->next) {
Yann 0:f30e2135b0db 350 /* PCB bound to current local interface address? */
Yann 0:f30e2135b0db 351 if ((!(ip_addr_isany(&(lpcb->local_ip)))) &&
Yann 0:f30e2135b0db 352 (ip_addr_cmp(&(lpcb->local_ip), &(netif->ip_addr)))) {
Yann 0:f30e2135b0db 353 /* The PCB is listening to the old ipaddr and
Yann 0:f30e2135b0db 354 * is set to listen to the new one instead */
Yann 0:f30e2135b0db 355 ip_addr_set(&(lpcb->local_ip), ipaddr);
Yann 0:f30e2135b0db 356 }
Yann 0:f30e2135b0db 357 }
Yann 0:f30e2135b0db 358 }
Yann 0:f30e2135b0db 359 #endif
Yann 0:f30e2135b0db 360 snmp_delete_ipaddridx_tree(netif);
Yann 0:f30e2135b0db 361 snmp_delete_iprteidx_tree(0,netif);
Yann 0:f30e2135b0db 362 /* set new IP address to netif */
Yann 0:f30e2135b0db 363 ip_addr_set(&(netif->ip_addr), ipaddr);
Yann 0:f30e2135b0db 364 snmp_insert_ipaddridx_tree(netif);
Yann 0:f30e2135b0db 365 snmp_insert_iprteidx_tree(0,netif);
Yann 0:f30e2135b0db 366
Yann 0:f30e2135b0db 367 LWIP_DEBUGF(NETIF_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("netif: IP address of interface %c%c set to %"U16_F".%"U16_F".%"U16_F".%"U16_F"\n",
Yann 0:f30e2135b0db 368 netif->name[0], netif->name[1],
Yann 0:f30e2135b0db 369 ip4_addr1_16(&netif->ip_addr),
Yann 0:f30e2135b0db 370 ip4_addr2_16(&netif->ip_addr),
Yann 0:f30e2135b0db 371 ip4_addr3_16(&netif->ip_addr),
Yann 0:f30e2135b0db 372 ip4_addr4_16(&netif->ip_addr)));
Yann 0:f30e2135b0db 373 }
Yann 0:f30e2135b0db 374
Yann 0:f30e2135b0db 375 /**
Yann 0:f30e2135b0db 376 * Change the default gateway for a network interface
Yann 0:f30e2135b0db 377 *
Yann 0:f30e2135b0db 378 * @param netif the network interface to change
Yann 0:f30e2135b0db 379 * @param gw the new default gateway
Yann 0:f30e2135b0db 380 *
Yann 0:f30e2135b0db 381 * @note call netif_set_addr() if you also want to change ip address and netmask
Yann 0:f30e2135b0db 382 */
Yann 0:f30e2135b0db 383 void
Yann 0:f30e2135b0db 384 netif_set_gw(struct netif *netif, ip_addr_t *gw)
Yann 0:f30e2135b0db 385 {
Yann 0:f30e2135b0db 386 ip_addr_set(&(netif->gw), gw);
Yann 0:f30e2135b0db 387 LWIP_DEBUGF(NETIF_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("netif: GW address of interface %c%c set to %"U16_F".%"U16_F".%"U16_F".%"U16_F"\n",
Yann 0:f30e2135b0db 388 netif->name[0], netif->name[1],
Yann 0:f30e2135b0db 389 ip4_addr1_16(&netif->gw),
Yann 0:f30e2135b0db 390 ip4_addr2_16(&netif->gw),
Yann 0:f30e2135b0db 391 ip4_addr3_16(&netif->gw),
Yann 0:f30e2135b0db 392 ip4_addr4_16(&netif->gw)));
Yann 0:f30e2135b0db 393 }
Yann 0:f30e2135b0db 394
Yann 0:f30e2135b0db 395 /**
Yann 0:f30e2135b0db 396 * Change the netmask of a network interface
Yann 0:f30e2135b0db 397 *
Yann 0:f30e2135b0db 398 * @param netif the network interface to change
Yann 0:f30e2135b0db 399 * @param netmask the new netmask
Yann 0:f30e2135b0db 400 *
Yann 0:f30e2135b0db 401 * @note call netif_set_addr() if you also want to change ip address and
Yann 0:f30e2135b0db 402 * default gateway
Yann 0:f30e2135b0db 403 */
Yann 0:f30e2135b0db 404 void
Yann 0:f30e2135b0db 405 netif_set_netmask(struct netif *netif, ip_addr_t *netmask)
Yann 0:f30e2135b0db 406 {
Yann 0:f30e2135b0db 407 snmp_delete_iprteidx_tree(0, netif);
Yann 0:f30e2135b0db 408 /* set new netmask to netif */
Yann 0:f30e2135b0db 409 ip_addr_set(&(netif->netmask), netmask);
Yann 0:f30e2135b0db 410 snmp_insert_iprteidx_tree(0, netif);
Yann 0:f30e2135b0db 411 LWIP_DEBUGF(NETIF_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_STATE, ("netif: netmask of interface %c%c set to %"U16_F".%"U16_F".%"U16_F".%"U16_F"\n",
Yann 0:f30e2135b0db 412 netif->name[0], netif->name[1],
Yann 0:f30e2135b0db 413 ip4_addr1_16(&netif->netmask),
Yann 0:f30e2135b0db 414 ip4_addr2_16(&netif->netmask),
Yann 0:f30e2135b0db 415 ip4_addr3_16(&netif->netmask),
Yann 0:f30e2135b0db 416 ip4_addr4_16(&netif->netmask)));
Yann 0:f30e2135b0db 417 }
Yann 0:f30e2135b0db 418
Yann 0:f30e2135b0db 419 /**
Yann 0:f30e2135b0db 420 * Set a network interface as the default network interface
Yann 0:f30e2135b0db 421 * (used to output all packets for which no specific route is found)
Yann 0:f30e2135b0db 422 *
Yann 0:f30e2135b0db 423 * @param netif the default network interface
Yann 0:f30e2135b0db 424 */
Yann 0:f30e2135b0db 425 void
Yann 0:f30e2135b0db 426 netif_set_default(struct netif *netif)
Yann 0:f30e2135b0db 427 {
Yann 0:f30e2135b0db 428 if (netif == NULL) {
Yann 0:f30e2135b0db 429 /* remove default route */
Yann 0:f30e2135b0db 430 snmp_delete_iprteidx_tree(1, netif);
Yann 0:f30e2135b0db 431 } else {
Yann 0:f30e2135b0db 432 /* install default route */
Yann 0:f30e2135b0db 433 snmp_insert_iprteidx_tree(1, netif);
Yann 0:f30e2135b0db 434 }
Yann 0:f30e2135b0db 435 netif_default = netif;
Yann 0:f30e2135b0db 436 LWIP_DEBUGF(NETIF_DEBUG, ("netif: setting default interface %c%c\n",
Yann 0:f30e2135b0db 437 netif ? netif->name[0] : '\'', netif ? netif->name[1] : '\''));
Yann 0:f30e2135b0db 438 }
Yann 0:f30e2135b0db 439
Yann 0:f30e2135b0db 440 /**
Yann 0:f30e2135b0db 441 * Bring an interface up, available for processing
Yann 0:f30e2135b0db 442 * traffic.
Yann 0:f30e2135b0db 443 *
Yann 0:f30e2135b0db 444 * @note: Enabling DHCP on a down interface will make it come
Yann 0:f30e2135b0db 445 * up once configured.
Yann 0:f30e2135b0db 446 *
Yann 0:f30e2135b0db 447 * @see dhcp_start()
Yann 0:f30e2135b0db 448 */
Yann 0:f30e2135b0db 449 void netif_set_up(struct netif *netif)
Yann 0:f30e2135b0db 450 {
Yann 0:f30e2135b0db 451 if (!(netif->flags & NETIF_FLAG_UP)) {
Yann 0:f30e2135b0db 452 netif->flags |= NETIF_FLAG_UP;
Yann 0:f30e2135b0db 453
Yann 0:f30e2135b0db 454 #if LWIP_SNMP
Yann 0:f30e2135b0db 455 snmp_get_sysuptime(&netif->ts);
Yann 0:f30e2135b0db 456 #endif /* LWIP_SNMP */
Yann 0:f30e2135b0db 457
Yann 0:f30e2135b0db 458 NETIF_STATUS_CALLBACK(netif);
Yann 0:f30e2135b0db 459
Yann 0:f30e2135b0db 460 if (netif->flags & NETIF_FLAG_LINK_UP) {
Yann 0:f30e2135b0db 461 #if LWIP_ARP
Yann 0:f30e2135b0db 462 /* For Ethernet network interfaces, we would like to send a "gratuitous ARP" */
Yann 0:f30e2135b0db 463 if (netif->flags & (NETIF_FLAG_ETHARP)) {
Yann 0:f30e2135b0db 464 etharp_gratuitous(netif);
Yann 0:f30e2135b0db 465 }
Yann 0:f30e2135b0db 466 #endif /* LWIP_ARP */
Yann 0:f30e2135b0db 467
Yann 0:f30e2135b0db 468 #if LWIP_IGMP
Yann 0:f30e2135b0db 469 /* resend IGMP memberships */
Yann 0:f30e2135b0db 470 if (netif->flags & NETIF_FLAG_IGMP) {
Yann 0:f30e2135b0db 471 igmp_report_groups( netif);
Yann 0:f30e2135b0db 472 }
Yann 0:f30e2135b0db 473 #endif /* LWIP_IGMP */
Yann 0:f30e2135b0db 474 }
Yann 0:f30e2135b0db 475 }
Yann 0:f30e2135b0db 476 }
Yann 0:f30e2135b0db 477
Yann 0:f30e2135b0db 478 /**
Yann 0:f30e2135b0db 479 * Bring an interface down, disabling any traffic processing.
Yann 0:f30e2135b0db 480 *
Yann 0:f30e2135b0db 481 * @note: Enabling DHCP on a down interface will make it come
Yann 0:f30e2135b0db 482 * up once configured.
Yann 0:f30e2135b0db 483 *
Yann 0:f30e2135b0db 484 * @see dhcp_start()
Yann 0:f30e2135b0db 485 */
Yann 0:f30e2135b0db 486 void netif_set_down(struct netif *netif)
Yann 0:f30e2135b0db 487 {
Yann 0:f30e2135b0db 488 if (netif->flags & NETIF_FLAG_UP) {
Yann 0:f30e2135b0db 489 netif->flags &= ~NETIF_FLAG_UP;
Yann 0:f30e2135b0db 490 #if LWIP_SNMP
Yann 0:f30e2135b0db 491 snmp_get_sysuptime(&netif->ts);
Yann 0:f30e2135b0db 492 #endif
Yann 0:f30e2135b0db 493
Yann 0:f30e2135b0db 494 NETIF_STATUS_CALLBACK(netif);
Yann 0:f30e2135b0db 495 }
Yann 0:f30e2135b0db 496 }
Yann 0:f30e2135b0db 497
Yann 0:f30e2135b0db 498 #if LWIP_NETIF_STATUS_CALLBACK
Yann 0:f30e2135b0db 499 /**
Yann 0:f30e2135b0db 500 * Set callback to be called when interface is brought up/down
Yann 0:f30e2135b0db 501 */
Yann 0:f30e2135b0db 502 void netif_set_status_callback(struct netif *netif, netif_status_callback_fn status_callback)
Yann 0:f30e2135b0db 503 {
Yann 0:f30e2135b0db 504 if (netif) {
Yann 0:f30e2135b0db 505 netif->status_callback = status_callback;
Yann 0:f30e2135b0db 506 }
Yann 0:f30e2135b0db 507 }
Yann 0:f30e2135b0db 508 #endif /* LWIP_NETIF_STATUS_CALLBACK */
Yann 0:f30e2135b0db 509
Yann 0:f30e2135b0db 510 /**
Yann 0:f30e2135b0db 511 * Called by a driver when its link goes up
Yann 0:f30e2135b0db 512 */
Yann 0:f30e2135b0db 513 void netif_set_link_up(struct netif *netif )
Yann 0:f30e2135b0db 514 {
Yann 0:f30e2135b0db 515 if (!(netif->flags & NETIF_FLAG_LINK_UP)) {
Yann 0:f30e2135b0db 516 netif->flags |= NETIF_FLAG_LINK_UP;
Yann 0:f30e2135b0db 517
Yann 0:f30e2135b0db 518 #if LWIP_DHCP
Yann 0:f30e2135b0db 519 if (netif->dhcp) {
Yann 0:f30e2135b0db 520 dhcp_network_changed(netif);
Yann 0:f30e2135b0db 521 }
Yann 0:f30e2135b0db 522 #endif /* LWIP_DHCP */
Yann 0:f30e2135b0db 523
Yann 0:f30e2135b0db 524 #if LWIP_AUTOIP
Yann 0:f30e2135b0db 525 if (netif->autoip) {
Yann 0:f30e2135b0db 526 autoip_network_changed(netif);
Yann 0:f30e2135b0db 527 }
Yann 0:f30e2135b0db 528 #endif /* LWIP_AUTOIP */
Yann 0:f30e2135b0db 529
Yann 0:f30e2135b0db 530 if (netif->flags & NETIF_FLAG_UP) {
Yann 0:f30e2135b0db 531 #if LWIP_ARP
Yann 0:f30e2135b0db 532 /* For Ethernet network interfaces, we would like to send a "gratuitous ARP" */
Yann 0:f30e2135b0db 533 if (netif->flags & NETIF_FLAG_ETHARP) {
Yann 0:f30e2135b0db 534 etharp_gratuitous(netif);
Yann 0:f30e2135b0db 535 }
Yann 0:f30e2135b0db 536 #endif /* LWIP_ARP */
Yann 0:f30e2135b0db 537
Yann 0:f30e2135b0db 538 #if LWIP_IGMP
Yann 0:f30e2135b0db 539 /* resend IGMP memberships */
Yann 0:f30e2135b0db 540 if (netif->flags & NETIF_FLAG_IGMP) {
Yann 0:f30e2135b0db 541 igmp_report_groups( netif);
Yann 0:f30e2135b0db 542 }
Yann 0:f30e2135b0db 543 #endif /* LWIP_IGMP */
Yann 0:f30e2135b0db 544 }
Yann 0:f30e2135b0db 545 NETIF_LINK_CALLBACK(netif);
Yann 0:f30e2135b0db 546 }
Yann 0:f30e2135b0db 547 }
Yann 0:f30e2135b0db 548
Yann 0:f30e2135b0db 549 /**
Yann 0:f30e2135b0db 550 * Called by a driver when its link goes down
Yann 0:f30e2135b0db 551 */
Yann 0:f30e2135b0db 552 void netif_set_link_down(struct netif *netif )
Yann 0:f30e2135b0db 553 {
Yann 0:f30e2135b0db 554 if (netif->flags & NETIF_FLAG_LINK_UP) {
Yann 0:f30e2135b0db 555 netif->flags &= ~NETIF_FLAG_LINK_UP;
Yann 0:f30e2135b0db 556 NETIF_LINK_CALLBACK(netif);
Yann 0:f30e2135b0db 557 }
Yann 0:f30e2135b0db 558 }
Yann 0:f30e2135b0db 559
Yann 0:f30e2135b0db 560 #if LWIP_NETIF_LINK_CALLBACK
Yann 0:f30e2135b0db 561 /**
Yann 0:f30e2135b0db 562 * Set callback to be called when link is brought up/down
Yann 0:f30e2135b0db 563 */
Yann 0:f30e2135b0db 564 void netif_set_link_callback(struct netif *netif, netif_status_callback_fn link_callback)
Yann 0:f30e2135b0db 565 {
Yann 0:f30e2135b0db 566 if (netif) {
Yann 0:f30e2135b0db 567 netif->link_callback = link_callback;
Yann 0:f30e2135b0db 568 }
Yann 0:f30e2135b0db 569 }
Yann 0:f30e2135b0db 570 #endif /* LWIP_NETIF_LINK_CALLBACK */
Yann 0:f30e2135b0db 571
Yann 0:f30e2135b0db 572 #if ENABLE_LOOPBACK
Yann 0:f30e2135b0db 573 /**
Yann 0:f30e2135b0db 574 * Send an IP packet to be received on the same netif (loopif-like).
Yann 0:f30e2135b0db 575 * The pbuf is simply copied and handed back to netif->input.
Yann 0:f30e2135b0db 576 * In multithreaded mode, this is done directly since netif->input must put
Yann 0:f30e2135b0db 577 * the packet on a queue.
Yann 0:f30e2135b0db 578 * In callback mode, the packet is put on an internal queue and is fed to
Yann 0:f30e2135b0db 579 * netif->input by netif_poll().
Yann 0:f30e2135b0db 580 *
Yann 0:f30e2135b0db 581 * @param netif the lwip network interface structure
Yann 0:f30e2135b0db 582 * @param p the (IP) packet to 'send'
Yann 0:f30e2135b0db 583 * @param ipaddr the ip address to send the packet to (not used)
Yann 0:f30e2135b0db 584 * @return ERR_OK if the packet has been sent
Yann 0:f30e2135b0db 585 * ERR_MEM if the pbuf used to copy the packet couldn't be allocated
Yann 0:f30e2135b0db 586 */
Yann 0:f30e2135b0db 587 err_t
Yann 0:f30e2135b0db 588 netif_loop_output(struct netif *netif, struct pbuf *p,
Yann 0:f30e2135b0db 589 ip_addr_t *ipaddr)
Yann 0:f30e2135b0db 590 {
Yann 0:f30e2135b0db 591 struct pbuf *r;
Yann 0:f30e2135b0db 592 err_t err;
Yann 0:f30e2135b0db 593 struct pbuf *last;
Yann 0:f30e2135b0db 594 #if LWIP_LOOPBACK_MAX_PBUFS
Yann 0:f30e2135b0db 595 u8_t clen = 0;
Yann 0:f30e2135b0db 596 #endif /* LWIP_LOOPBACK_MAX_PBUFS */
Yann 0:f30e2135b0db 597 /* If we have a loopif, SNMP counters are adjusted for it,
Yann 0:f30e2135b0db 598 * if not they are adjusted for 'netif'. */
Yann 0:f30e2135b0db 599 #if LWIP_SNMP
Yann 0:f30e2135b0db 600 #if LWIP_HAVE_LOOPIF
Yann 0:f30e2135b0db 601 struct netif *stats_if = &loop_netif;
Yann 0:f30e2135b0db 602 #else /* LWIP_HAVE_LOOPIF */
Yann 0:f30e2135b0db 603 struct netif *stats_if = netif;
Yann 0:f30e2135b0db 604 #endif /* LWIP_HAVE_LOOPIF */
Yann 0:f30e2135b0db 605 #endif /* LWIP_SNMP */
Yann 0:f30e2135b0db 606 SYS_ARCH_DECL_PROTECT(lev);
Yann 0:f30e2135b0db 607 LWIP_UNUSED_ARG(ipaddr);
Yann 0:f30e2135b0db 608
Yann 0:f30e2135b0db 609 /* Allocate a new pbuf */
Yann 0:f30e2135b0db 610 r = pbuf_alloc(PBUF_LINK, p->tot_len, PBUF_RAM);
Yann 0:f30e2135b0db 611 if (r == NULL) {
Yann 0:f30e2135b0db 612 LINK_STATS_INC(link.memerr);
Yann 0:f30e2135b0db 613 LINK_STATS_INC(link.drop);
Yann 0:f30e2135b0db 614 snmp_inc_ifoutdiscards(stats_if);
Yann 0:f30e2135b0db 615 return ERR_MEM;
Yann 0:f30e2135b0db 616 }
Yann 0:f30e2135b0db 617 #if LWIP_LOOPBACK_MAX_PBUFS
Yann 0:f30e2135b0db 618 clen = pbuf_clen(r);
Yann 0:f30e2135b0db 619 /* check for overflow or too many pbuf on queue */
Yann 0:f30e2135b0db 620 if(((netif->loop_cnt_current + clen) < netif->loop_cnt_current) ||
Yann 0:f30e2135b0db 621 ((netif->loop_cnt_current + clen) > LWIP_LOOPBACK_MAX_PBUFS)) {
Yann 0:f30e2135b0db 622 pbuf_free(r);
Yann 0:f30e2135b0db 623 LINK_STATS_INC(link.memerr);
Yann 0:f30e2135b0db 624 LINK_STATS_INC(link.drop);
Yann 0:f30e2135b0db 625 snmp_inc_ifoutdiscards(stats_if);
Yann 0:f30e2135b0db 626 return ERR_MEM;
Yann 0:f30e2135b0db 627 }
Yann 0:f30e2135b0db 628 netif->loop_cnt_current += clen;
Yann 0:f30e2135b0db 629 #endif /* LWIP_LOOPBACK_MAX_PBUFS */
Yann 0:f30e2135b0db 630
Yann 0:f30e2135b0db 631 /* Copy the whole pbuf queue p into the single pbuf r */
Yann 0:f30e2135b0db 632 if ((err = pbuf_copy(r, p)) != ERR_OK) {
Yann 0:f30e2135b0db 633 pbuf_free(r);
Yann 0:f30e2135b0db 634 LINK_STATS_INC(link.memerr);
Yann 0:f30e2135b0db 635 LINK_STATS_INC(link.drop);
Yann 0:f30e2135b0db 636 snmp_inc_ifoutdiscards(stats_if);
Yann 0:f30e2135b0db 637 return err;
Yann 0:f30e2135b0db 638 }
Yann 0:f30e2135b0db 639
Yann 0:f30e2135b0db 640 /* Put the packet on a linked list which gets emptied through calling
Yann 0:f30e2135b0db 641 netif_poll(). */
Yann 0:f30e2135b0db 642
Yann 0:f30e2135b0db 643 /* let last point to the last pbuf in chain r */
Yann 0:f30e2135b0db 644 for (last = r; last->next != NULL; last = last->next);
Yann 0:f30e2135b0db 645
Yann 0:f30e2135b0db 646 SYS_ARCH_PROTECT(lev);
Yann 0:f30e2135b0db 647 if(netif->loop_first != NULL) {
Yann 0:f30e2135b0db 648 LWIP_ASSERT("if first != NULL, last must also be != NULL", netif->loop_last != NULL);
Yann 0:f30e2135b0db 649 netif->loop_last->next = r;
Yann 0:f30e2135b0db 650 netif->loop_last = last;
Yann 0:f30e2135b0db 651 } else {
Yann 0:f30e2135b0db 652 netif->loop_first = r;
Yann 0:f30e2135b0db 653 netif->loop_last = last;
Yann 0:f30e2135b0db 654 }
Yann 0:f30e2135b0db 655 SYS_ARCH_UNPROTECT(lev);
Yann 0:f30e2135b0db 656
Yann 0:f30e2135b0db 657 LINK_STATS_INC(link.xmit);
Yann 0:f30e2135b0db 658 snmp_add_ifoutoctets(stats_if, p->tot_len);
Yann 0:f30e2135b0db 659 snmp_inc_ifoutucastpkts(stats_if);
Yann 0:f30e2135b0db 660
Yann 0:f30e2135b0db 661 #if LWIP_NETIF_LOOPBACK_MULTITHREADING
Yann 0:f30e2135b0db 662 /* For multithreading environment, schedule a call to netif_poll */
Yann 0:f30e2135b0db 663 tcpip_callback((tcpip_callback_fn)netif_poll, netif);
Yann 0:f30e2135b0db 664 #endif /* LWIP_NETIF_LOOPBACK_MULTITHREADING */
Yann 0:f30e2135b0db 665
Yann 0:f30e2135b0db 666 return ERR_OK;
Yann 0:f30e2135b0db 667 }
Yann 0:f30e2135b0db 668
Yann 0:f30e2135b0db 669 /**
Yann 0:f30e2135b0db 670 * Call netif_poll() in the main loop of your application. This is to prevent
Yann 0:f30e2135b0db 671 * reentering non-reentrant functions like tcp_input(). Packets passed to
Yann 0:f30e2135b0db 672 * netif_loop_output() are put on a list that is passed to netif->input() by
Yann 0:f30e2135b0db 673 * netif_poll().
Yann 0:f30e2135b0db 674 */
Yann 0:f30e2135b0db 675 void
Yann 0:f30e2135b0db 676 netif_poll(struct netif *netif)
Yann 0:f30e2135b0db 677 {
Yann 0:f30e2135b0db 678 struct pbuf *in;
Yann 0:f30e2135b0db 679 /* If we have a loopif, SNMP counters are adjusted for it,
Yann 0:f30e2135b0db 680 * if not they are adjusted for 'netif'. */
Yann 0:f30e2135b0db 681 #if LWIP_SNMP
Yann 0:f30e2135b0db 682 #if LWIP_HAVE_LOOPIF
Yann 0:f30e2135b0db 683 struct netif *stats_if = &loop_netif;
Yann 0:f30e2135b0db 684 #else /* LWIP_HAVE_LOOPIF */
Yann 0:f30e2135b0db 685 struct netif *stats_if = netif;
Yann 0:f30e2135b0db 686 #endif /* LWIP_HAVE_LOOPIF */
Yann 0:f30e2135b0db 687 #endif /* LWIP_SNMP */
Yann 0:f30e2135b0db 688 SYS_ARCH_DECL_PROTECT(lev);
Yann 0:f30e2135b0db 689
Yann 0:f30e2135b0db 690 do {
Yann 0:f30e2135b0db 691 /* Get a packet from the list. With SYS_LIGHTWEIGHT_PROT=1, this is protected */
Yann 0:f30e2135b0db 692 SYS_ARCH_PROTECT(lev);
Yann 0:f30e2135b0db 693 in = netif->loop_first;
Yann 0:f30e2135b0db 694 if (in != NULL) {
Yann 0:f30e2135b0db 695 struct pbuf *in_end = in;
Yann 0:f30e2135b0db 696 #if LWIP_LOOPBACK_MAX_PBUFS
Yann 0:f30e2135b0db 697 u8_t clen = pbuf_clen(in);
Yann 0:f30e2135b0db 698 /* adjust the number of pbufs on queue */
Yann 0:f30e2135b0db 699 LWIP_ASSERT("netif->loop_cnt_current underflow",
Yann 0:f30e2135b0db 700 ((netif->loop_cnt_current - clen) < netif->loop_cnt_current));
Yann 0:f30e2135b0db 701 netif->loop_cnt_current -= clen;
Yann 0:f30e2135b0db 702 #endif /* LWIP_LOOPBACK_MAX_PBUFS */
Yann 0:f30e2135b0db 703 while (in_end->len != in_end->tot_len) {
Yann 0:f30e2135b0db 704 LWIP_ASSERT("bogus pbuf: len != tot_len but next == NULL!", in_end->next != NULL);
Yann 0:f30e2135b0db 705 in_end = in_end->next;
Yann 0:f30e2135b0db 706 }
Yann 0:f30e2135b0db 707 /* 'in_end' now points to the last pbuf from 'in' */
Yann 0:f30e2135b0db 708 if (in_end == netif->loop_last) {
Yann 0:f30e2135b0db 709 /* this was the last pbuf in the list */
Yann 0:f30e2135b0db 710 netif->loop_first = netif->loop_last = NULL;
Yann 0:f30e2135b0db 711 } else {
Yann 0:f30e2135b0db 712 /* pop the pbuf off the list */
Yann 0:f30e2135b0db 713 netif->loop_first = in_end->next;
Yann 0:f30e2135b0db 714 LWIP_ASSERT("should not be null since first != last!", netif->loop_first != NULL);
Yann 0:f30e2135b0db 715 }
Yann 0:f30e2135b0db 716 /* De-queue the pbuf from its successors on the 'loop_' list. */
Yann 0:f30e2135b0db 717 in_end->next = NULL;
Yann 0:f30e2135b0db 718 }
Yann 0:f30e2135b0db 719 SYS_ARCH_UNPROTECT(lev);
Yann 0:f30e2135b0db 720
Yann 0:f30e2135b0db 721 if (in != NULL) {
Yann 0:f30e2135b0db 722 LINK_STATS_INC(link.recv);
Yann 0:f30e2135b0db 723 snmp_add_ifinoctets(stats_if, in->tot_len);
Yann 0:f30e2135b0db 724 snmp_inc_ifinucastpkts(stats_if);
Yann 0:f30e2135b0db 725 /* loopback packets are always IP packets! */
Yann 0:f30e2135b0db 726 if (ip_input(in, netif) != ERR_OK) {
Yann 0:f30e2135b0db 727 pbuf_free(in);
Yann 0:f30e2135b0db 728 }
Yann 0:f30e2135b0db 729 /* Don't reference the packet any more! */
Yann 0:f30e2135b0db 730 in = NULL;
Yann 0:f30e2135b0db 731 }
Yann 0:f30e2135b0db 732 /* go on while there is a packet on the list */
Yann 0:f30e2135b0db 733 } while (netif->loop_first != NULL);
Yann 0:f30e2135b0db 734 }
Yann 0:f30e2135b0db 735
Yann 0:f30e2135b0db 736 #if !LWIP_NETIF_LOOPBACK_MULTITHREADING
Yann 0:f30e2135b0db 737 /**
Yann 0:f30e2135b0db 738 * Calls netif_poll() for every netif on the netif_list.
Yann 0:f30e2135b0db 739 */
Yann 0:f30e2135b0db 740 void
Yann 0:f30e2135b0db 741 netif_poll_all(void)
Yann 0:f30e2135b0db 742 {
Yann 0:f30e2135b0db 743 struct netif *netif = netif_list;
Yann 0:f30e2135b0db 744 /* loop through netifs */
Yann 0:f30e2135b0db 745 while (netif != NULL) {
Yann 0:f30e2135b0db 746 netif_poll(netif);
Yann 0:f30e2135b0db 747 /* proceed to next network interface */
Yann 0:f30e2135b0db 748 netif = netif->next;
Yann 0:f30e2135b0db 749 }
Yann 0:f30e2135b0db 750 }
Yann 0:f30e2135b0db 751 #endif /* !LWIP_NETIF_LOOPBACK_MULTITHREADING */
Yann 0:f30e2135b0db 752 #endif /* ENABLE_LOOPBACK */