Rahol Rajan / NetServices-Traffic

Used in Live Traffic Update Nokia LCD Display Project

Fork of NetServices by Segundo Equipo

lwip/core/ipv4/ip.c@8:92b57208ab99, 2013-03-06 (annotated)

Committer:
rrajan8
Date:
Wed Mar 06 19:07:23 2013 +0000
Revision:
8:92b57208ab99
Parent:
0:ac1725ba162c 
This project utilizes mbed's networking features to display live traffic updates on the Nokia LCD using the MapQuest API's Traffic Web Service.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
segundo 0:ac1725ba162c 1 /**
segundo 0:ac1725ba162c 2 * @file
segundo 0:ac1725ba162c 3 * This is the IPv4 layer implementation for incoming and outgoing IP traffic.
segundo 0:ac1725ba162c 4 *
segundo 0:ac1725ba162c 5 * @see ip_frag.c
segundo 0:ac1725ba162c 6 *
segundo 0:ac1725ba162c 7 */
segundo 0:ac1725ba162c 8
segundo 0:ac1725ba162c 9 /*
segundo 0:ac1725ba162c 10 * Copyright (c) 2001-2004 Swedish Institute of Computer Science.
segundo 0:ac1725ba162c 11 * All rights reserved.
segundo 0:ac1725ba162c 12 *
segundo 0:ac1725ba162c 13 * Redistribution and use in source and binary forms, with or without modification,
segundo 0:ac1725ba162c 14 * are permitted provided that the following conditions are met:
segundo 0:ac1725ba162c 15 *
segundo 0:ac1725ba162c 16 * 1. Redistributions of source code must retain the above copyright notice,
segundo 0:ac1725ba162c 17 * this list of conditions and the following disclaimer.
segundo 0:ac1725ba162c 18 * 2. Redistributions in binary form must reproduce the above copyright notice,
segundo 0:ac1725ba162c 19 * this list of conditions and the following disclaimer in the documentation
segundo 0:ac1725ba162c 20 * and/or other materials provided with the distribution.
segundo 0:ac1725ba162c 21 * 3. The name of the author may not be used to endorse or promote products
segundo 0:ac1725ba162c 22 * derived from this software without specific prior written permission.
segundo 0:ac1725ba162c 23 *
segundo 0:ac1725ba162c 24 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
segundo 0:ac1725ba162c 25 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
segundo 0:ac1725ba162c 26 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
segundo 0:ac1725ba162c 27 * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
segundo 0:ac1725ba162c 28 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
segundo 0:ac1725ba162c 29 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
segundo 0:ac1725ba162c 30 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
segundo 0:ac1725ba162c 31 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
segundo 0:ac1725ba162c 32 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
segundo 0:ac1725ba162c 33 * OF SUCH DAMAGE.
segundo 0:ac1725ba162c 34 *
segundo 0:ac1725ba162c 35 * This file is part of the lwIP TCP/IP stack.
segundo 0:ac1725ba162c 36 *
segundo 0:ac1725ba162c 37 * Author: Adam Dunkels <adam@sics.se>
segundo 0:ac1725ba162c 38 *
segundo 0:ac1725ba162c 39 */
segundo 0:ac1725ba162c 40
segundo 0:ac1725ba162c 41 #include "lwip/opt.h"
segundo 0:ac1725ba162c 42 #include "lwip/ip.h"
segundo 0:ac1725ba162c 43 #include "lwip/def.h"
segundo 0:ac1725ba162c 44 #include "lwip/mem.h"
segundo 0:ac1725ba162c 45 #include "lwip/ip_frag.h"
segundo 0:ac1725ba162c 46 #include "lwip/inet_chksum.h"
segundo 0:ac1725ba162c 47 #include "lwip/netif.h"
segundo 0:ac1725ba162c 48 #include "lwip/icmp.h"
segundo 0:ac1725ba162c 49 #include "lwip/igmp.h"
segundo 0:ac1725ba162c 50 #include "lwip/raw.h"
segundo 0:ac1725ba162c 51 #include "lwip/udp.h"
segundo 0:ac1725ba162c 52 #include "lwip/tcp_impl.h"
segundo 0:ac1725ba162c 53 #include "lwip/snmp.h"
segundo 0:ac1725ba162c 54 #include "lwip/dhcp.h"
segundo 0:ac1725ba162c 55 #include "lwip/autoip.h"
segundo 0:ac1725ba162c 56 #include "lwip/stats.h"
segundo 0:ac1725ba162c 57 #include "arch/perf.h"
segundo 0:ac1725ba162c 58
segundo 0:ac1725ba162c 59 #include <string.h>
segundo 0:ac1725ba162c 60
segundo 0:ac1725ba162c 61 /** Set this to 0 in the rare case of wanting to call an extra function to
segundo 0:ac1725ba162c 62 * generate the IP checksum (in contrast to calculating it on-the-fly). */
segundo 0:ac1725ba162c 63 #ifndef LWIP_INLINE_IP_CHKSUM
segundo 0:ac1725ba162c 64 #define LWIP_INLINE_IP_CHKSUM 1
segundo 0:ac1725ba162c 65 #endif
segundo 0:ac1725ba162c 66 #if LWIP_INLINE_IP_CHKSUM && CHECKSUM_GEN_IP
segundo 0:ac1725ba162c 67 #define CHECKSUM_GEN_IP_INLINE 1
segundo 0:ac1725ba162c 68 #else
segundo 0:ac1725ba162c 69 #define CHECKSUM_GEN_IP_INLINE 0
segundo 0:ac1725ba162c 70 #endif
segundo 0:ac1725ba162c 71
segundo 0:ac1725ba162c 72 #if LWIP_DHCP || defined(LWIP_IP_ACCEPT_UDP_PORT)
segundo 0:ac1725ba162c 73 #define IP_ACCEPT_LINK_LAYER_ADDRESSING 1
segundo 0:ac1725ba162c 74
segundo 0:ac1725ba162c 75 /** Some defines for DHCP to let link-layer-addressed packets through while the
segundo 0:ac1725ba162c 76 * netif is down.
segundo 0:ac1725ba162c 77 * To use this in your own application/protocol, define LWIP_IP_ACCEPT_UDP_PORT
segundo 0:ac1725ba162c 78 * to return 1 if the port is accepted and 0 if the port is not accepted.
segundo 0:ac1725ba162c 79 */
segundo 0:ac1725ba162c 80 #if LWIP_DHCP && defined(LWIP_IP_ACCEPT_UDP_PORT)
segundo 0:ac1725ba162c 81 /* accept DHCP client port and custom port */
segundo 0:ac1725ba162c 82 #define IP_ACCEPT_LINK_LAYER_ADDRESSED_PORT(port) (((port) == PP_NTOHS(DHCP_CLIENT_PORT)) \
segundo 0:ac1725ba162c 83 || (LWIP_IP_ACCEPT_UDP_PORT(port)))
segundo 0:ac1725ba162c 84 #elif defined(LWIP_IP_ACCEPT_UDP_PORT) /* LWIP_DHCP && defined(LWIP_IP_ACCEPT_UDP_PORT) */
segundo 0:ac1725ba162c 85 /* accept custom port only */
segundo 0:ac1725ba162c 86 #define IP_ACCEPT_LINK_LAYER_ADDRESSED_PORT(port) (LWIP_IP_ACCEPT_UDP_PORT(dst_port))
segundo 0:ac1725ba162c 87 #else /* LWIP_DHCP && defined(LWIP_IP_ACCEPT_UDP_PORT) */
segundo 0:ac1725ba162c 88 /* accept DHCP client port only */
segundo 0:ac1725ba162c 89 #define IP_ACCEPT_LINK_LAYER_ADDRESSED_PORT(port) ((port) == PP_NTOHS(DHCP_CLIENT_PORT))
segundo 0:ac1725ba162c 90 #endif /* LWIP_DHCP && defined(LWIP_IP_ACCEPT_UDP_PORT) */
segundo 0:ac1725ba162c 91
segundo 0:ac1725ba162c 92 #else /* LWIP_DHCP */
segundo 0:ac1725ba162c 93 #define IP_ACCEPT_LINK_LAYER_ADDRESSING 0
segundo 0:ac1725ba162c 94 #endif /* LWIP_DHCP */
segundo 0:ac1725ba162c 95
segundo 0:ac1725ba162c 96 /**
segundo 0:ac1725ba162c 97 * The interface that provided the packet for the current callback
segundo 0:ac1725ba162c 98 * invocation.
segundo 0:ac1725ba162c 99 */
segundo 0:ac1725ba162c 100 struct netif *current_netif;
segundo 0:ac1725ba162c 101
segundo 0:ac1725ba162c 102 /**
segundo 0:ac1725ba162c 103 * Header of the input packet currently being processed.
segundo 0:ac1725ba162c 104 */
segundo 0:ac1725ba162c 105 const struct ip_hdr *current_header;
segundo 0:ac1725ba162c 106 /** Source IP address of current_header */
segundo 0:ac1725ba162c 107 ip_addr_t current_iphdr_src;
segundo 0:ac1725ba162c 108 /** Destination IP address of current_header */
segundo 0:ac1725ba162c 109 ip_addr_t current_iphdr_dest;
segundo 0:ac1725ba162c 110
segundo 0:ac1725ba162c 111 /** The IP header ID of the next outgoing IP packet */
segundo 0:ac1725ba162c 112 static u16_t ip_id;
segundo 0:ac1725ba162c 113
segundo 0:ac1725ba162c 114 /**
segundo 0:ac1725ba162c 115 * Finds the appropriate network interface for a given IP address. It
segundo 0:ac1725ba162c 116 * searches the list of network interfaces linearly. A match is found
segundo 0:ac1725ba162c 117 * if the masked IP address of the network interface equals the masked
segundo 0:ac1725ba162c 118 * IP address given to the function.
segundo 0:ac1725ba162c 119 *
segundo 0:ac1725ba162c 120 * @param dest the destination IP address for which to find the route
segundo 0:ac1725ba162c 121 * @return the netif on which to send to reach dest
segundo 0:ac1725ba162c 122 */
segundo 0:ac1725ba162c 123 struct netif *
segundo 0:ac1725ba162c 124 ip_route(ip_addr_t *dest)
segundo 0:ac1725ba162c 125 {
segundo 0:ac1725ba162c 126 struct netif *netif;
segundo 0:ac1725ba162c 127
segundo 0:ac1725ba162c 128 /* iterate through netifs */
segundo 0:ac1725ba162c 129 for(netif = netif_list; netif != NULL; netif = netif->next) {
segundo 0:ac1725ba162c 130 /* network mask matches? */
segundo 0:ac1725ba162c 131 if (netif_is_up(netif)) {
segundo 0:ac1725ba162c 132 if (ip_addr_netcmp(dest, &(netif->ip_addr), &(netif->netmask))) {
segundo 0:ac1725ba162c 133 /* return netif on which to forward IP packet */
segundo 0:ac1725ba162c 134 return netif;
segundo 0:ac1725ba162c 135 }
segundo 0:ac1725ba162c 136 }
segundo 0:ac1725ba162c 137 }
segundo 0:ac1725ba162c 138 if ((netif_default == NULL) || (!netif_is_up(netif_default))) {
segundo 0:ac1725ba162c 139 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_LEVEL_SERIOUS, ("ip_route: No route to %"U16_F".%"U16_F".%"U16_F".%"U16_F"\n",
segundo 0:ac1725ba162c 140 ip4_addr1_16(dest), ip4_addr2_16(dest), ip4_addr3_16(dest), ip4_addr4_16(dest)));
segundo 0:ac1725ba162c 141 IP_STATS_INC(ip.rterr);
segundo 0:ac1725ba162c 142 snmp_inc_ipoutnoroutes();
segundo 0:ac1725ba162c 143 return NULL;
segundo 0:ac1725ba162c 144 }
segundo 0:ac1725ba162c 145 /* no matching netif found, use default netif */
segundo 0:ac1725ba162c 146 return netif_default;
segundo 0:ac1725ba162c 147 }
segundo 0:ac1725ba162c 148
segundo 0:ac1725ba162c 149 #if IP_FORWARD
segundo 0:ac1725ba162c 150 /**
segundo 0:ac1725ba162c 151 * Forwards an IP packet. It finds an appropriate route for the
segundo 0:ac1725ba162c 152 * packet, decrements the TTL value of the packet, adjusts the
segundo 0:ac1725ba162c 153 * checksum and outputs the packet on the appropriate interface.
segundo 0:ac1725ba162c 154 *
segundo 0:ac1725ba162c 155 * @param p the packet to forward (p->payload points to IP header)
segundo 0:ac1725ba162c 156 * @param iphdr the IP header of the input packet
segundo 0:ac1725ba162c 157 * @param inp the netif on which this packet was received
segundo 0:ac1725ba162c 158 */
segundo 0:ac1725ba162c 159 static void
segundo 0:ac1725ba162c 160 ip_forward(struct pbuf *p, struct ip_hdr *iphdr, struct netif *inp)
segundo 0:ac1725ba162c 161 {
segundo 0:ac1725ba162c 162 struct netif *netif;
segundo 0:ac1725ba162c 163
segundo 0:ac1725ba162c 164 PERF_START;
segundo 0:ac1725ba162c 165
segundo 0:ac1725ba162c 166 /* RFC3927 2.7: do not forward link-local addresses */
segundo 0:ac1725ba162c 167 if (ip_addr_islinklocal(&current_iphdr_dest)) {
segundo 0:ac1725ba162c 168 LWIP_DEBUGF(IP_DEBUG, ("ip_forward: not forwarding LLA %"U16_F".%"U16_F".%"U16_F".%"U16_F"\n",
segundo 0:ac1725ba162c 169 ip4_addr1_16(&current_iphdr_dest), ip4_addr2_16(&current_iphdr_dest),
segundo 0:ac1725ba162c 170 ip4_addr3_16(&current_iphdr_dest), ip4_addr4_16(&current_iphdr_dest)));
segundo 0:ac1725ba162c 171 goto return_noroute;
segundo 0:ac1725ba162c 172 }
segundo 0:ac1725ba162c 173
segundo 0:ac1725ba162c 174 /* Find network interface where to forward this IP packet to. */
segundo 0:ac1725ba162c 175 netif = ip_route(&current_iphdr_dest);
segundo 0:ac1725ba162c 176 if (netif == NULL) {
segundo 0:ac1725ba162c 177 LWIP_DEBUGF(IP_DEBUG, ("ip_forward: no forwarding route for %"U16_F".%"U16_F".%"U16_F".%"U16_F" found\n",
segundo 0:ac1725ba162c 178 ip4_addr1_16(&current_iphdr_dest), ip4_addr2_16(&current_iphdr_dest),
segundo 0:ac1725ba162c 179 ip4_addr3_16(&current_iphdr_dest), ip4_addr4_16(&current_iphdr_dest)));
segundo 0:ac1725ba162c 180 goto return_noroute;
segundo 0:ac1725ba162c 181 }
segundo 0:ac1725ba162c 182 /* Do not forward packets onto the same network interface on which
segundo 0:ac1725ba162c 183 * they arrived. */
segundo 0:ac1725ba162c 184 if (netif == inp) {
segundo 0:ac1725ba162c 185 LWIP_DEBUGF(IP_DEBUG, ("ip_forward: not bouncing packets back on incoming interface.\n"));
segundo 0:ac1725ba162c 186 goto return_noroute;
segundo 0:ac1725ba162c 187 }
segundo 0:ac1725ba162c 188
segundo 0:ac1725ba162c 189 /* decrement TTL */
segundo 0:ac1725ba162c 190 IPH_TTL_SET(iphdr, IPH_TTL(iphdr) - 1);
segundo 0:ac1725ba162c 191 /* send ICMP if TTL == 0 */
segundo 0:ac1725ba162c 192 if (IPH_TTL(iphdr) == 0) {
segundo 0:ac1725ba162c 193 snmp_inc_ipinhdrerrors();
segundo 0:ac1725ba162c 194 #if LWIP_ICMP
segundo 0:ac1725ba162c 195 /* Don't send ICMP messages in response to ICMP messages */
segundo 0:ac1725ba162c 196 if (IPH_PROTO(iphdr) != IP_PROTO_ICMP) {
segundo 0:ac1725ba162c 197 icmp_time_exceeded(p, ICMP_TE_TTL);
segundo 0:ac1725ba162c 198 }
segundo 0:ac1725ba162c 199 #endif /* LWIP_ICMP */
segundo 0:ac1725ba162c 200 return;
segundo 0:ac1725ba162c 201 }
segundo 0:ac1725ba162c 202
segundo 0:ac1725ba162c 203 /* Incrementally update the IP checksum. */
segundo 0:ac1725ba162c 204 if (IPH_CHKSUM(iphdr) >= PP_HTONS(0xffff - 0x100)) {
segundo 0:ac1725ba162c 205 IPH_CHKSUM_SET(iphdr, IPH_CHKSUM(iphdr) + PP_HTONS(0x100) + 1);
segundo 0:ac1725ba162c 206 } else {
segundo 0:ac1725ba162c 207 IPH_CHKSUM_SET(iphdr, IPH_CHKSUM(iphdr) + PP_HTONS(0x100));
segundo 0:ac1725ba162c 208 }
segundo 0:ac1725ba162c 209
segundo 0:ac1725ba162c 210 LWIP_DEBUGF(IP_DEBUG, ("ip_forward: forwarding packet to %"U16_F".%"U16_F".%"U16_F".%"U16_F"\n",
segundo 0:ac1725ba162c 211 ip4_addr1_16(&current_iphdr_dest), ip4_addr2_16(&current_iphdr_dest),
segundo 0:ac1725ba162c 212 ip4_addr3_16(&current_iphdr_dest), ip4_addr4_16(&current_iphdr_dest)));
segundo 0:ac1725ba162c 213
segundo 0:ac1725ba162c 214 IP_STATS_INC(ip.fw);
segundo 0:ac1725ba162c 215 IP_STATS_INC(ip.xmit);
segundo 0:ac1725ba162c 216 snmp_inc_ipforwdatagrams();
segundo 0:ac1725ba162c 217
segundo 0:ac1725ba162c 218 PERF_STOP("ip_forward");
segundo 0:ac1725ba162c 219 /* transmit pbuf on chosen interface */
segundo 0:ac1725ba162c 220 netif->output(netif, p, &current_iphdr_dest);
segundo 0:ac1725ba162c 221 return;
segundo 0:ac1725ba162c 222 return_noroute:
segundo 0:ac1725ba162c 223 snmp_inc_ipoutnoroutes();
segundo 0:ac1725ba162c 224 }
segundo 0:ac1725ba162c 225 #endif /* IP_FORWARD */
segundo 0:ac1725ba162c 226
segundo 0:ac1725ba162c 227 /**
segundo 0:ac1725ba162c 228 * This function is called by the network interface device driver when
segundo 0:ac1725ba162c 229 * an IP packet is received. The function does the basic checks of the
segundo 0:ac1725ba162c 230 * IP header such as packet size being at least larger than the header
segundo 0:ac1725ba162c 231 * size etc. If the packet was not destined for us, the packet is
segundo 0:ac1725ba162c 232 * forwarded (using ip_forward). The IP checksum is always checked.
segundo 0:ac1725ba162c 233 *
segundo 0:ac1725ba162c 234 * Finally, the packet is sent to the upper layer protocol input function.
segundo 0:ac1725ba162c 235 *
segundo 0:ac1725ba162c 236 * @param p the received IP packet (p->payload points to IP header)
segundo 0:ac1725ba162c 237 * @param inp the netif on which this packet was received
segundo 0:ac1725ba162c 238 * @return ERR_OK if the packet was processed (could return ERR_* if it wasn't
segundo 0:ac1725ba162c 239 * processed, but currently always returns ERR_OK)
segundo 0:ac1725ba162c 240 */
segundo 0:ac1725ba162c 241 err_t
segundo 0:ac1725ba162c 242 ip_input(struct pbuf *p, struct netif *inp)
segundo 0:ac1725ba162c 243 {
segundo 0:ac1725ba162c 244 struct ip_hdr *iphdr;
segundo 0:ac1725ba162c 245 struct netif *netif;
segundo 0:ac1725ba162c 246 u16_t iphdr_hlen;
segundo 0:ac1725ba162c 247 u16_t iphdr_len;
segundo 0:ac1725ba162c 248 #if IP_ACCEPT_LINK_LAYER_ADDRESSING
segundo 0:ac1725ba162c 249 int check_ip_src=1;
segundo 0:ac1725ba162c 250 #endif /* IP_ACCEPT_LINK_LAYER_ADDRESSING */
segundo 0:ac1725ba162c 251
segundo 0:ac1725ba162c 252 IP_STATS_INC(ip.recv);
segundo 0:ac1725ba162c 253 snmp_inc_ipinreceives();
segundo 0:ac1725ba162c 254
segundo 0:ac1725ba162c 255 /* identify the IP header */
segundo 0:ac1725ba162c 256 iphdr = (struct ip_hdr *)p->payload;
segundo 0:ac1725ba162c 257 if (IPH_V(iphdr) != 4) {
segundo 0:ac1725ba162c 258 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_LEVEL_WARNING, ("IP packet dropped due to bad version number %"U16_F"\n", IPH_V(iphdr)));
segundo 0:ac1725ba162c 259 ip_debug_print(p);
segundo 0:ac1725ba162c 260 pbuf_free(p);
segundo 0:ac1725ba162c 261 IP_STATS_INC(ip.err);
segundo 0:ac1725ba162c 262 IP_STATS_INC(ip.drop);
segundo 0:ac1725ba162c 263 snmp_inc_ipinhdrerrors();
segundo 0:ac1725ba162c 264 return ERR_OK;
segundo 0:ac1725ba162c 265 }
segundo 0:ac1725ba162c 266
segundo 0:ac1725ba162c 267 /* obtain IP header length in number of 32-bit words */
segundo 0:ac1725ba162c 268 iphdr_hlen = IPH_HL(iphdr);
segundo 0:ac1725ba162c 269 /* calculate IP header length in bytes */
segundo 0:ac1725ba162c 270 iphdr_hlen *= 4;
segundo 0:ac1725ba162c 271 /* obtain ip length in bytes */
segundo 0:ac1725ba162c 272 iphdr_len = ntohs(IPH_LEN(iphdr));
segundo 0:ac1725ba162c 273
segundo 0:ac1725ba162c 274 /* header length exceeds first pbuf length, or ip length exceeds total pbuf length? */
segundo 0:ac1725ba162c 275 if ((iphdr_hlen > p->len) || (iphdr_len > p->tot_len)) {
segundo 0:ac1725ba162c 276 if (iphdr_hlen > p->len) {
segundo 0:ac1725ba162c 277 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_LEVEL_SERIOUS,
segundo 0:ac1725ba162c 278 ("IP header (len %"U16_F") does not fit in first pbuf (len %"U16_F"), IP packet dropped.\n",
segundo 0:ac1725ba162c 279 iphdr_hlen, p->len));
segundo 0:ac1725ba162c 280 }
segundo 0:ac1725ba162c 281 if (iphdr_len > p->tot_len) {
segundo 0:ac1725ba162c 282 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_LEVEL_SERIOUS,
segundo 0:ac1725ba162c 283 ("IP (len %"U16_F") is longer than pbuf (len %"U16_F"), IP packet dropped.\n",
segundo 0:ac1725ba162c 284 iphdr_len, p->tot_len));
segundo 0:ac1725ba162c 285 }
segundo 0:ac1725ba162c 286 /* free (drop) packet pbufs */
segundo 0:ac1725ba162c 287 pbuf_free(p);
segundo 0:ac1725ba162c 288 IP_STATS_INC(ip.lenerr);
segundo 0:ac1725ba162c 289 IP_STATS_INC(ip.drop);
segundo 0:ac1725ba162c 290 snmp_inc_ipindiscards();
segundo 0:ac1725ba162c 291 return ERR_OK;
segundo 0:ac1725ba162c 292 }
segundo 0:ac1725ba162c 293
segundo 0:ac1725ba162c 294 /* verify checksum */
segundo 0:ac1725ba162c 295 #if CHECKSUM_CHECK_IP
segundo 0:ac1725ba162c 296 if (inet_chksum(iphdr, iphdr_hlen) != 0) {
segundo 0:ac1725ba162c 297
segundo 0:ac1725ba162c 298 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_LEVEL_SERIOUS,
segundo 0:ac1725ba162c 299 ("Checksum (0x%"X16_F") failed, IP packet dropped.\n", inet_chksum(iphdr, iphdr_hlen)));
segundo 0:ac1725ba162c 300 ip_debug_print(p);
segundo 0:ac1725ba162c 301 pbuf_free(p);
segundo 0:ac1725ba162c 302 IP_STATS_INC(ip.chkerr);
segundo 0:ac1725ba162c 303 IP_STATS_INC(ip.drop);
segundo 0:ac1725ba162c 304 snmp_inc_ipinhdrerrors();
segundo 0:ac1725ba162c 305 return ERR_OK;
segundo 0:ac1725ba162c 306 }
segundo 0:ac1725ba162c 307 #endif
segundo 0:ac1725ba162c 308
segundo 0:ac1725ba162c 309 /* Trim pbuf. This should have been done at the netif layer,
segundo 0:ac1725ba162c 310 * but we'll do it anyway just to be sure that its done. */
segundo 0:ac1725ba162c 311 pbuf_realloc(p, iphdr_len);
segundo 0:ac1725ba162c 312
segundo 0:ac1725ba162c 313 /* copy IP addresses to aligned ip_addr_t */
segundo 0:ac1725ba162c 314 ip_addr_copy(current_iphdr_dest, iphdr->dest);
segundo 0:ac1725ba162c 315 ip_addr_copy(current_iphdr_src, iphdr->src);
segundo 0:ac1725ba162c 316
segundo 0:ac1725ba162c 317 /* match packet against an interface, i.e. is this packet for us? */
segundo 0:ac1725ba162c 318 #if LWIP_IGMP
segundo 0:ac1725ba162c 319 if (ip_addr_ismulticast(&current_iphdr_dest)) {
segundo 0:ac1725ba162c 320 if ((inp->flags & NETIF_FLAG_IGMP) && (igmp_lookfor_group(inp, &current_iphdr_dest))) {
segundo 0:ac1725ba162c 321 netif = inp;
segundo 0:ac1725ba162c 322 } else {
segundo 0:ac1725ba162c 323 netif = NULL;
segundo 0:ac1725ba162c 324 }
segundo 0:ac1725ba162c 325 } else
segundo 0:ac1725ba162c 326 #endif /* LWIP_IGMP */
segundo 0:ac1725ba162c 327 {
segundo 0:ac1725ba162c 328 /* start trying with inp. if that's not acceptable, start walking the
segundo 0:ac1725ba162c 329 list of configured netifs.
segundo 0:ac1725ba162c 330 'first' is used as a boolean to mark whether we started walking the list */
segundo 0:ac1725ba162c 331 int first = 1;
segundo 0:ac1725ba162c 332 netif = inp;
segundo 0:ac1725ba162c 333 do {
segundo 0:ac1725ba162c 334 LWIP_DEBUGF(IP_DEBUG, ("ip_input: iphdr->dest 0x%"X32_F" netif->ip_addr 0x%"X32_F" (0x%"X32_F", 0x%"X32_F", 0x%"X32_F")\n",
segundo 0:ac1725ba162c 335 ip4_addr_get_u32(&iphdr->dest), ip4_addr_get_u32(&netif->ip_addr),
segundo 0:ac1725ba162c 336 ip4_addr_get_u32(&iphdr->dest) & ip4_addr_get_u32(&netif->netmask),
segundo 0:ac1725ba162c 337 ip4_addr_get_u32(&netif->ip_addr) & ip4_addr_get_u32(&netif->netmask),
segundo 0:ac1725ba162c 338 ip4_addr_get_u32(&iphdr->dest) & ~ip4_addr_get_u32(&netif->netmask)));
segundo 0:ac1725ba162c 339
segundo 0:ac1725ba162c 340 /* interface is up and configured? */
segundo 0:ac1725ba162c 341 if ((netif_is_up(netif)) && (!ip_addr_isany(&(netif->ip_addr)))) {
segundo 0:ac1725ba162c 342 /* unicast to this interface address? */
segundo 0:ac1725ba162c 343 if (ip_addr_cmp(&current_iphdr_dest, &(netif->ip_addr)) ||
segundo 0:ac1725ba162c 344 /* or broadcast on this interface network address? */
segundo 0:ac1725ba162c 345 ip_addr_isbroadcast(&current_iphdr_dest, netif)) {
segundo 0:ac1725ba162c 346 LWIP_DEBUGF(IP_DEBUG, ("ip_input: packet accepted on interface %c%c\n",
segundo 0:ac1725ba162c 347 netif->name[0], netif->name[1]));
segundo 0:ac1725ba162c 348 /* break out of for loop */
segundo 0:ac1725ba162c 349 break;
segundo 0:ac1725ba162c 350 }
segundo 0:ac1725ba162c 351 #if LWIP_AUTOIP
segundo 0:ac1725ba162c 352 /* connections to link-local addresses must persist after changing
segundo 0:ac1725ba162c 353 the netif's address (RFC3927 ch. 1.9) */
segundo 0:ac1725ba162c 354 if ((netif->autoip != NULL) &&
segundo 0:ac1725ba162c 355 ip_addr_cmp(&current_iphdr_dest, &(netif->autoip->llipaddr))) {
segundo 0:ac1725ba162c 356 LWIP_DEBUGF(IP_DEBUG, ("ip_input: LLA packet accepted on interface %c%c\n",
segundo 0:ac1725ba162c 357 netif->name[0], netif->name[1]));
segundo 0:ac1725ba162c 358 /* break out of for loop */
segundo 0:ac1725ba162c 359 break;
segundo 0:ac1725ba162c 360 }
segundo 0:ac1725ba162c 361 #endif /* LWIP_AUTOIP */
segundo 0:ac1725ba162c 362 }
segundo 0:ac1725ba162c 363 if (first) {
segundo 0:ac1725ba162c 364 first = 0;
segundo 0:ac1725ba162c 365 netif = netif_list;
segundo 0:ac1725ba162c 366 } else {
segundo 0:ac1725ba162c 367 netif = netif->next;
segundo 0:ac1725ba162c 368 }
segundo 0:ac1725ba162c 369 if (netif == inp) {
segundo 0:ac1725ba162c 370 netif = netif->next;
segundo 0:ac1725ba162c 371 }
segundo 0:ac1725ba162c 372 } while(netif != NULL);
segundo 0:ac1725ba162c 373 }
segundo 0:ac1725ba162c 374
segundo 0:ac1725ba162c 375 #if IP_ACCEPT_LINK_LAYER_ADDRESSING
segundo 0:ac1725ba162c 376 /* Pass DHCP messages regardless of destination address. DHCP traffic is addressed
segundo 0:ac1725ba162c 377 * using link layer addressing (such as Ethernet MAC) so we must not filter on IP.
segundo 0:ac1725ba162c 378 * According to RFC 1542 section 3.1.1, referred by RFC 2131).
segundo 0:ac1725ba162c 379 *
segundo 0:ac1725ba162c 380 * If you want to accept private broadcast communication while a netif is down,
segundo 0:ac1725ba162c 381 * define LWIP_IP_ACCEPT_UDP_PORT(dst_port), e.g.:
segundo 0:ac1725ba162c 382 *
segundo 0:ac1725ba162c 383 * #define LWIP_IP_ACCEPT_UDP_PORT(dst_port) ((dst_port) == PP_NTOHS(12345))
segundo 0:ac1725ba162c 384 */
segundo 0:ac1725ba162c 385 if (netif == NULL) {
segundo 0:ac1725ba162c 386 /* remote port is DHCP server? */
segundo 0:ac1725ba162c 387 if (IPH_PROTO(iphdr) == IP_PROTO_UDP) {
segundo 0:ac1725ba162c 388 struct udp_hdr *udphdr = (struct udp_hdr *)((u8_t *)iphdr + iphdr_hlen);
segundo 0:ac1725ba162c 389 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_TRACE, ("ip_input: UDP packet to DHCP client port %"U16_F"\n",
segundo 0:ac1725ba162c 390 ntohs(udphdr->dest)));
segundo 0:ac1725ba162c 391 if (IP_ACCEPT_LINK_LAYER_ADDRESSED_PORT(udphdr->dest)) {
segundo 0:ac1725ba162c 392 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_TRACE, ("ip_input: DHCP packet accepted.\n"));
segundo 0:ac1725ba162c 393 netif = inp;
segundo 0:ac1725ba162c 394 check_ip_src = 0;
segundo 0:ac1725ba162c 395 }
segundo 0:ac1725ba162c 396 }
segundo 0:ac1725ba162c 397 }
segundo 0:ac1725ba162c 398 #endif /* IP_ACCEPT_LINK_LAYER_ADDRESSING */
segundo 0:ac1725ba162c 399
segundo 0:ac1725ba162c 400 /* broadcast or multicast packet source address? Compliant with RFC 1122: 3.2.1.3 */
segundo 0:ac1725ba162c 401 #if IP_ACCEPT_LINK_LAYER_ADDRESSING
segundo 0:ac1725ba162c 402 /* DHCP servers need 0.0.0.0 to be allowed as source address (RFC 1.1.2.2: 3.2.1.3/a) */
segundo 0:ac1725ba162c 403 if (check_ip_src && !ip_addr_isany(&current_iphdr_src))
segundo 0:ac1725ba162c 404 #endif /* IP_ACCEPT_LINK_LAYER_ADDRESSING */
segundo 0:ac1725ba162c 405 { if ((ip_addr_isbroadcast(&current_iphdr_src, inp)) ||
segundo 0:ac1725ba162c 406 (ip_addr_ismulticast(&current_iphdr_src))) {
segundo 0:ac1725ba162c 407 /* packet source is not valid */
segundo 0:ac1725ba162c 408 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_TRACE | LWIP_DBG_LEVEL_WARNING, ("ip_input: packet source is not valid.\n"));
segundo 0:ac1725ba162c 409 /* free (drop) packet pbufs */
segundo 0:ac1725ba162c 410 pbuf_free(p);
segundo 0:ac1725ba162c 411 IP_STATS_INC(ip.drop);
segundo 0:ac1725ba162c 412 snmp_inc_ipinaddrerrors();
segundo 0:ac1725ba162c 413 snmp_inc_ipindiscards();
segundo 0:ac1725ba162c 414 return ERR_OK;
segundo 0:ac1725ba162c 415 }
segundo 0:ac1725ba162c 416 }
segundo 0:ac1725ba162c 417
segundo 0:ac1725ba162c 418 /* packet not for us? */
segundo 0:ac1725ba162c 419 if (netif == NULL) {
segundo 0:ac1725ba162c 420 /* packet not for us, route or discard */
segundo 0:ac1725ba162c 421 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_TRACE, ("ip_input: packet not for us.\n"));
segundo 0:ac1725ba162c 422 #if IP_FORWARD
segundo 0:ac1725ba162c 423 /* non-broadcast packet? */
segundo 0:ac1725ba162c 424 if (!ip_addr_isbroadcast(&current_iphdr_dest, inp)) {
segundo 0:ac1725ba162c 425 /* try to forward IP packet on (other) interfaces */
segundo 0:ac1725ba162c 426 ip_forward(p, iphdr, inp);
segundo 0:ac1725ba162c 427 } else
segundo 0:ac1725ba162c 428 #endif /* IP_FORWARD */
segundo 0:ac1725ba162c 429 {
segundo 0:ac1725ba162c 430 snmp_inc_ipinaddrerrors();
segundo 0:ac1725ba162c 431 snmp_inc_ipindiscards();
segundo 0:ac1725ba162c 432 }
segundo 0:ac1725ba162c 433 pbuf_free(p);
segundo 0:ac1725ba162c 434 return ERR_OK;
segundo 0:ac1725ba162c 435 }
segundo 0:ac1725ba162c 436 /* packet consists of multiple fragments? */
segundo 0:ac1725ba162c 437 if ((IPH_OFFSET(iphdr) & PP_HTONS(IP_OFFMASK | IP_MF)) != 0) {
segundo 0:ac1725ba162c 438 #if IP_REASSEMBLY /* packet fragment reassembly code present? */
segundo 0:ac1725ba162c 439 LWIP_DEBUGF(IP_DEBUG, ("IP packet is a fragment (id=0x%04"X16_F" tot_len=%"U16_F" len=%"U16_F" MF=%"U16_F" offset=%"U16_F"), calling ip_reass()\n",
segundo 0:ac1725ba162c 440 ntohs(IPH_ID(iphdr)), p->tot_len, ntohs(IPH_LEN(iphdr)), !!(IPH_OFFSET(iphdr) & PP_HTONS(IP_MF)), (ntohs(IPH_OFFSET(iphdr)) & IP_OFFMASK)*8));
segundo 0:ac1725ba162c 441 /* reassemble the packet*/
segundo 0:ac1725ba162c 442 p = ip_reass(p);
segundo 0:ac1725ba162c 443 /* packet not fully reassembled yet? */
segundo 0:ac1725ba162c 444 if (p == NULL) {
segundo 0:ac1725ba162c 445 return ERR_OK;
segundo 0:ac1725ba162c 446 }
segundo 0:ac1725ba162c 447 iphdr = (struct ip_hdr *)p->payload;
segundo 0:ac1725ba162c 448 #else /* IP_REASSEMBLY == 0, no packet fragment reassembly code present */
segundo 0:ac1725ba162c 449 pbuf_free(p);
segundo 0:ac1725ba162c 450 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_LEVEL_SERIOUS, ("IP packet dropped since it was fragmented (0x%"X16_F") (while IP_REASSEMBLY == 0).\n",
segundo 0:ac1725ba162c 451 ntohs(IPH_OFFSET(iphdr))));
segundo 0:ac1725ba162c 452 IP_STATS_INC(ip.opterr);
segundo 0:ac1725ba162c 453 IP_STATS_INC(ip.drop);
segundo 0:ac1725ba162c 454 /* unsupported protocol feature */
segundo 0:ac1725ba162c 455 snmp_inc_ipinunknownprotos();
segundo 0:ac1725ba162c 456 return ERR_OK;
segundo 0:ac1725ba162c 457 #endif /* IP_REASSEMBLY */
segundo 0:ac1725ba162c 458 }
segundo 0:ac1725ba162c 459
segundo 0:ac1725ba162c 460 #if IP_OPTIONS_ALLOWED == 0 /* no support for IP options in the IP header? */
segundo 0:ac1725ba162c 461
segundo 0:ac1725ba162c 462 #if LWIP_IGMP
segundo 0:ac1725ba162c 463 /* there is an extra "router alert" option in IGMP messages which we allow for but do not police */
segundo 0:ac1725ba162c 464 if((iphdr_hlen > IP_HLEN) && (IPH_PROTO(iphdr) != IP_PROTO_IGMP)) {
segundo 0:ac1725ba162c 465 #else
segundo 0:ac1725ba162c 466 if (iphdr_hlen > IP_HLEN) {
segundo 0:ac1725ba162c 467 #endif /* LWIP_IGMP */
segundo 0:ac1725ba162c 468 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_LEVEL_SERIOUS, ("IP packet dropped since there were IP options (while IP_OPTIONS_ALLOWED == 0).\n"));
segundo 0:ac1725ba162c 469 pbuf_free(p);
segundo 0:ac1725ba162c 470 IP_STATS_INC(ip.opterr);
segundo 0:ac1725ba162c 471 IP_STATS_INC(ip.drop);
segundo 0:ac1725ba162c 472 /* unsupported protocol feature */
segundo 0:ac1725ba162c 473 snmp_inc_ipinunknownprotos();
segundo 0:ac1725ba162c 474 return ERR_OK;
segundo 0:ac1725ba162c 475 }
segundo 0:ac1725ba162c 476 #endif /* IP_OPTIONS_ALLOWED == 0 */
segundo 0:ac1725ba162c 477
segundo 0:ac1725ba162c 478 /* send to upper layers */
segundo 0:ac1725ba162c 479 LWIP_DEBUGF(IP_DEBUG, ("ip_input: \n"));
segundo 0:ac1725ba162c 480 ip_debug_print(p);
segundo 0:ac1725ba162c 481 LWIP_DEBUGF(IP_DEBUG, ("ip_input: p->len %"U16_F" p->tot_len %"U16_F"\n", p->len, p->tot_len));
segundo 0:ac1725ba162c 482
segundo 0:ac1725ba162c 483 current_netif = inp;
segundo 0:ac1725ba162c 484 current_header = iphdr;
segundo 0:ac1725ba162c 485
segundo 0:ac1725ba162c 486 #if LWIP_RAW
segundo 0:ac1725ba162c 487 /* raw input did not eat the packet? */
segundo 0:ac1725ba162c 488 if (raw_input(p, inp) == 0)
segundo 0:ac1725ba162c 489 #endif /* LWIP_RAW */
segundo 0:ac1725ba162c 490 {
segundo 0:ac1725ba162c 491
segundo 0:ac1725ba162c 492 switch (IPH_PROTO(iphdr)) {
segundo 0:ac1725ba162c 493 #if LWIP_UDP
segundo 0:ac1725ba162c 494 case IP_PROTO_UDP:
segundo 0:ac1725ba162c 495 #if LWIP_UDPLITE
segundo 0:ac1725ba162c 496 case IP_PROTO_UDPLITE:
segundo 0:ac1725ba162c 497 #endif /* LWIP_UDPLITE */
segundo 0:ac1725ba162c 498 snmp_inc_ipindelivers();
segundo 0:ac1725ba162c 499 udp_input(p, inp);
segundo 0:ac1725ba162c 500 break;
segundo 0:ac1725ba162c 501 #endif /* LWIP_UDP */
segundo 0:ac1725ba162c 502 #if LWIP_TCP
segundo 0:ac1725ba162c 503 case IP_PROTO_TCP:
segundo 0:ac1725ba162c 504 snmp_inc_ipindelivers();
segundo 0:ac1725ba162c 505 tcp_input(p, inp);
segundo 0:ac1725ba162c 506 break;
segundo 0:ac1725ba162c 507 #endif /* LWIP_TCP */
segundo 0:ac1725ba162c 508 #if LWIP_ICMP
segundo 0:ac1725ba162c 509 case IP_PROTO_ICMP:
segundo 0:ac1725ba162c 510 snmp_inc_ipindelivers();
segundo 0:ac1725ba162c 511 icmp_input(p, inp);
segundo 0:ac1725ba162c 512 break;
segundo 0:ac1725ba162c 513 #endif /* LWIP_ICMP */
segundo 0:ac1725ba162c 514 #if LWIP_IGMP
segundo 0:ac1725ba162c 515 case IP_PROTO_IGMP:
segundo 0:ac1725ba162c 516 igmp_input(p, inp, &current_iphdr_dest);
segundo 0:ac1725ba162c 517 break;
segundo 0:ac1725ba162c 518 #endif /* LWIP_IGMP */
segundo 0:ac1725ba162c 519 default:
segundo 0:ac1725ba162c 520 #if LWIP_ICMP
segundo 0:ac1725ba162c 521 /* send ICMP destination protocol unreachable unless is was a broadcast */
segundo 0:ac1725ba162c 522 if (!ip_addr_isbroadcast(&current_iphdr_dest, inp) &&
segundo 0:ac1725ba162c 523 !ip_addr_ismulticast(&current_iphdr_dest)) {
segundo 0:ac1725ba162c 524 p->payload = iphdr;
segundo 0:ac1725ba162c 525 icmp_dest_unreach(p, ICMP_DUR_PROTO);
segundo 0:ac1725ba162c 526 }
segundo 0:ac1725ba162c 527 #endif /* LWIP_ICMP */
segundo 0:ac1725ba162c 528 pbuf_free(p);
segundo 0:ac1725ba162c 529
segundo 0:ac1725ba162c 530 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_LEVEL_SERIOUS, ("Unsupported transport protocol %"U16_F"\n", IPH_PROTO(iphdr)));
segundo 0:ac1725ba162c 531
segundo 0:ac1725ba162c 532 IP_STATS_INC(ip.proterr);
segundo 0:ac1725ba162c 533 IP_STATS_INC(ip.drop);
segundo 0:ac1725ba162c 534 snmp_inc_ipinunknownprotos();
segundo 0:ac1725ba162c 535 }
segundo 0:ac1725ba162c 536 }
segundo 0:ac1725ba162c 537
segundo 0:ac1725ba162c 538 current_netif = NULL;
segundo 0:ac1725ba162c 539 current_header = NULL;
segundo 0:ac1725ba162c 540 ip_addr_set_any(&current_iphdr_src);
segundo 0:ac1725ba162c 541 ip_addr_set_any(&current_iphdr_dest);
segundo 0:ac1725ba162c 542
segundo 0:ac1725ba162c 543 return ERR_OK;
segundo 0:ac1725ba162c 544 }
segundo 0:ac1725ba162c 545
segundo 0:ac1725ba162c 546 /**
segundo 0:ac1725ba162c 547 * Sends an IP packet on a network interface. This function constructs
segundo 0:ac1725ba162c 548 * the IP header and calculates the IP header checksum. If the source
segundo 0:ac1725ba162c 549 * IP address is NULL, the IP address of the outgoing network
segundo 0:ac1725ba162c 550 * interface is filled in as source address.
segundo 0:ac1725ba162c 551 * If the destination IP address is IP_HDRINCL, p is assumed to already
segundo 0:ac1725ba162c 552 * include an IP header and p->payload points to it instead of the data.
segundo 0:ac1725ba162c 553 *
segundo 0:ac1725ba162c 554 * @param p the packet to send (p->payload points to the data, e.g. next
segundo 0:ac1725ba162c 555 protocol header; if dest == IP_HDRINCL, p already includes an IP
segundo 0:ac1725ba162c 556 header and p->payload points to that IP header)
segundo 0:ac1725ba162c 557 * @param src the source IP address to send from (if src == IP_ADDR_ANY, the
segundo 0:ac1725ba162c 558 * IP address of the netif used to send is used as source address)
segundo 0:ac1725ba162c 559 * @param dest the destination IP address to send the packet to
segundo 0:ac1725ba162c 560 * @param ttl the TTL value to be set in the IP header
segundo 0:ac1725ba162c 561 * @param tos the TOS value to be set in the IP header
segundo 0:ac1725ba162c 562 * @param proto the PROTOCOL to be set in the IP header
segundo 0:ac1725ba162c 563 * @param netif the netif on which to send this packet
segundo 0:ac1725ba162c 564 * @return ERR_OK if the packet was sent OK
segundo 0:ac1725ba162c 565 * ERR_BUF if p doesn't have enough space for IP/LINK headers
segundo 0:ac1725ba162c 566 * returns errors returned by netif->output
segundo 0:ac1725ba162c 567 *
segundo 0:ac1725ba162c 568 * @note ip_id: RFC791 "some host may be able to simply use
segundo 0:ac1725ba162c 569 * unique identifiers independent of destination"
segundo 0:ac1725ba162c 570 */
segundo 0:ac1725ba162c 571 err_t
segundo 0:ac1725ba162c 572 ip_output_if(struct pbuf *p, ip_addr_t *src, ip_addr_t *dest,
segundo 0:ac1725ba162c 573 u8_t ttl, u8_t tos,
segundo 0:ac1725ba162c 574 u8_t proto, struct netif *netif)
segundo 0:ac1725ba162c 575 {
segundo 0:ac1725ba162c 576 #if IP_OPTIONS_SEND
segundo 0:ac1725ba162c 577 return ip_output_if_opt(p, src, dest, ttl, tos, proto, netif, NULL, 0);
segundo 0:ac1725ba162c 578 }
segundo 0:ac1725ba162c 579
segundo 0:ac1725ba162c 580 /**
segundo 0:ac1725ba162c 581 * Same as ip_output_if() but with the possibility to include IP options:
segundo 0:ac1725ba162c 582 *
segundo 0:ac1725ba162c 583 * @ param ip_options pointer to the IP options, copied into the IP header
segundo 0:ac1725ba162c 584 * @ param optlen length of ip_options
segundo 0:ac1725ba162c 585 */
segundo 0:ac1725ba162c 586 err_t ip_output_if_opt(struct pbuf *p, ip_addr_t *src, ip_addr_t *dest,
segundo 0:ac1725ba162c 587 u8_t ttl, u8_t tos, u8_t proto, struct netif *netif, void *ip_options,
segundo 0:ac1725ba162c 588 u16_t optlen)
segundo 0:ac1725ba162c 589 {
segundo 0:ac1725ba162c 590 #endif /* IP_OPTIONS_SEND */
segundo 0:ac1725ba162c 591 struct ip_hdr *iphdr;
segundo 0:ac1725ba162c 592 ip_addr_t dest_addr;
segundo 0:ac1725ba162c 593 #if CHECKSUM_GEN_IP_INLINE
segundo 0:ac1725ba162c 594 u32_t chk_sum = 0;
segundo 0:ac1725ba162c 595 #endif /* CHECKSUM_GEN_IP_INLINE */
segundo 0:ac1725ba162c 596
segundo 0:ac1725ba162c 597 /* pbufs passed to IP must have a ref-count of 1 as their payload pointer
segundo 0:ac1725ba162c 598 gets altered as the packet is passed down the stack */
segundo 0:ac1725ba162c 599 LWIP_ASSERT("p->ref == 1", p->ref == 1);
segundo 0:ac1725ba162c 600
segundo 0:ac1725ba162c 601 snmp_inc_ipoutrequests();
segundo 0:ac1725ba162c 602
segundo 0:ac1725ba162c 603 /* Should the IP header be generated or is it already included in p? */
segundo 0:ac1725ba162c 604 if (dest != IP_HDRINCL) {
segundo 0:ac1725ba162c 605 u16_t ip_hlen = IP_HLEN;
segundo 0:ac1725ba162c 606 #if IP_OPTIONS_SEND
segundo 0:ac1725ba162c 607 u16_t optlen_aligned = 0;
segundo 0:ac1725ba162c 608 if (optlen != 0) {
segundo 0:ac1725ba162c 609 #if CHECKSUM_GEN_IP_INLINE
segundo 0:ac1725ba162c 610 int i;
segundo 0:ac1725ba162c 611 #endif /* CHECKSUM_GEN_IP_INLINE */
segundo 0:ac1725ba162c 612 /* round up to a multiple of 4 */
segundo 0:ac1725ba162c 613 optlen_aligned = ((optlen + 3) & ~3);
segundo 0:ac1725ba162c 614 ip_hlen += optlen_aligned;
segundo 0:ac1725ba162c 615 /* First write in the IP options */
segundo 0:ac1725ba162c 616 if (pbuf_header(p, optlen_aligned)) {
segundo 0:ac1725ba162c 617 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_LEVEL_SERIOUS, ("ip_output_if_opt: not enough room for IP options in pbuf\n"));
segundo 0:ac1725ba162c 618 IP_STATS_INC(ip.err);
segundo 0:ac1725ba162c 619 snmp_inc_ipoutdiscards();
segundo 0:ac1725ba162c 620 return ERR_BUF;
segundo 0:ac1725ba162c 621 }
segundo 0:ac1725ba162c 622 MEMCPY(p->payload, ip_options, optlen);
segundo 0:ac1725ba162c 623 if (optlen < optlen_aligned) {
segundo 0:ac1725ba162c 624 /* zero the remaining bytes */
segundo 0:ac1725ba162c 625 memset(((char*)p->payload) + optlen, 0, optlen_aligned - optlen);
segundo 0:ac1725ba162c 626 }
segundo 0:ac1725ba162c 627 #if CHECKSUM_GEN_IP_INLINE
segundo 0:ac1725ba162c 628 for (i = 0; i < optlen_aligned; i += sizeof(u16_t)) {
segundo 0:ac1725ba162c 629 chk_sum += ((u16_t*)p->payload)[i];
segundo 0:ac1725ba162c 630 }
segundo 0:ac1725ba162c 631 #endif /* CHECKSUM_GEN_IP_INLINE */
segundo 0:ac1725ba162c 632 }
segundo 0:ac1725ba162c 633 #endif /* IP_OPTIONS_SEND */
segundo 0:ac1725ba162c 634 /* generate IP header */
segundo 0:ac1725ba162c 635 if (pbuf_header(p, IP_HLEN)) {
segundo 0:ac1725ba162c 636 LWIP_DEBUGF(IP_DEBUG | LWIP_DBG_LEVEL_SERIOUS, ("ip_output: not enough room for IP header in pbuf\n"));
segundo 0:ac1725ba162c 637
segundo 0:ac1725ba162c 638 IP_STATS_INC(ip.err);
segundo 0:ac1725ba162c 639 snmp_inc_ipoutdiscards();
segundo 0:ac1725ba162c 640 return ERR_BUF;
segundo 0:ac1725ba162c 641 }
segundo 0:ac1725ba162c 642
segundo 0:ac1725ba162c 643 iphdr = (struct ip_hdr *)p->payload;
segundo 0:ac1725ba162c 644 LWIP_ASSERT("check that first pbuf can hold struct ip_hdr",
segundo 0:ac1725ba162c 645 (p->len >= sizeof(struct ip_hdr)));
segundo 0:ac1725ba162c 646
segundo 0:ac1725ba162c 647 IPH_TTL_SET(iphdr, ttl);
segundo 0:ac1725ba162c 648 IPH_PROTO_SET(iphdr, proto);
segundo 0:ac1725ba162c 649 #if CHECKSUM_GEN_IP_INLINE
segundo 0:ac1725ba162c 650 chk_sum += LWIP_MAKE_U16(proto, ttl);
segundo 0:ac1725ba162c 651 #endif /* CHECKSUM_GEN_IP_INLINE */
segundo 0:ac1725ba162c 652
segundo 0:ac1725ba162c 653 /* dest cannot be NULL here */
segundo 0:ac1725ba162c 654 ip_addr_copy(iphdr->dest, *dest);
segundo 0:ac1725ba162c 655 #if CHECKSUM_GEN_IP_INLINE
segundo 0:ac1725ba162c 656 chk_sum += ip4_addr_get_u32(&iphdr->dest) & 0xFFFF;
segundo 0:ac1725ba162c 657 chk_sum += ip4_addr_get_u32(&iphdr->dest) >> 16;
segundo 0:ac1725ba162c 658 #endif /* CHECKSUM_GEN_IP_INLINE */
segundo 0:ac1725ba162c 659
segundo 0:ac1725ba162c 660 IPH_VHLTOS_SET(iphdr, 4, ip_hlen / 4, tos);
segundo 0:ac1725ba162c 661 #if CHECKSUM_GEN_IP_INLINE
segundo 0:ac1725ba162c 662 chk_sum += iphdr->_v_hl_tos;
segundo 0:ac1725ba162c 663 #endif /* CHECKSUM_GEN_IP_INLINE */
segundo 0:ac1725ba162c 664 IPH_LEN_SET(iphdr, htons(p->tot_len));
segundo 0:ac1725ba162c 665 #if CHECKSUM_GEN_IP_INLINE
segundo 0:ac1725ba162c 666 chk_sum += iphdr->_len;
segundo 0:ac1725ba162c 667 #endif /* CHECKSUM_GEN_IP_INLINE */
segundo 0:ac1725ba162c 668 IPH_OFFSET_SET(iphdr, 0);
segundo 0:ac1725ba162c 669 IPH_ID_SET(iphdr, htons(ip_id));
segundo 0:ac1725ba162c 670 #if CHECKSUM_GEN_IP_INLINE
segundo 0:ac1725ba162c 671 chk_sum += iphdr->_id;
segundo 0:ac1725ba162c 672 #endif /* CHECKSUM_GEN_IP_INLINE */
segundo 0:ac1725ba162c 673 ++ip_id;
segundo 0:ac1725ba162c 674
segundo 0:ac1725ba162c 675 if (ip_addr_isany(src)) {
segundo 0:ac1725ba162c 676 ip_addr_copy(iphdr->src, netif->ip_addr);
segundo 0:ac1725ba162c 677 } else {
segundo 0:ac1725ba162c 678 /* src cannot be NULL here */
segundo 0:ac1725ba162c 679 ip_addr_copy(iphdr->src, *src);
segundo 0:ac1725ba162c 680 }
segundo 0:ac1725ba162c 681
segundo 0:ac1725ba162c 682 #if CHECKSUM_GEN_IP_INLINE
segundo 0:ac1725ba162c 683 chk_sum += ip4_addr_get_u32(&iphdr->src) & 0xFFFF;
segundo 0:ac1725ba162c 684 chk_sum += ip4_addr_get_u32(&iphdr->src) >> 16;
segundo 0:ac1725ba162c 685 chk_sum = (chk_sum >> 16) + (chk_sum & 0xFFFF);
segundo 0:ac1725ba162c 686 chk_sum = (chk_sum >> 16) + chk_sum;
segundo 0:ac1725ba162c 687 chk_sum = ~chk_sum;
segundo 0:ac1725ba162c 688 iphdr->_chksum = chk_sum; /* network order */
segundo 0:ac1725ba162c 689 #else /* CHECKSUM_GEN_IP_INLINE */
segundo 0:ac1725ba162c 690 IPH_CHKSUM_SET(iphdr, 0);
segundo 0:ac1725ba162c 691 #if CHECKSUM_GEN_IP
segundo 0:ac1725ba162c 692 IPH_CHKSUM_SET(iphdr, inet_chksum(iphdr, ip_hlen));
segundo 0:ac1725ba162c 693 #endif
segundo 0:ac1725ba162c 694 #endif /* CHECKSUM_GEN_IP_INLINE */
segundo 0:ac1725ba162c 695 } else {
segundo 0:ac1725ba162c 696 /* IP header already included in p */
segundo 0:ac1725ba162c 697 iphdr = (struct ip_hdr *)p->payload;
segundo 0:ac1725ba162c 698 ip_addr_copy(dest_addr, iphdr->dest);
segundo 0:ac1725ba162c 699 dest = &dest_addr;
segundo 0:ac1725ba162c 700 }
segundo 0:ac1725ba162c 701
segundo 0:ac1725ba162c 702 IP_STATS_INC(ip.xmit);
segundo 0:ac1725ba162c 703
segundo 0:ac1725ba162c 704 LWIP_DEBUGF(IP_DEBUG, ("ip_output_if: %c%c%"U16_F"\n", netif->name[0], netif->name[1], netif->num));
segundo 0:ac1725ba162c 705 ip_debug_print(p);
segundo 0:ac1725ba162c 706
segundo 0:ac1725ba162c 707 #if ENABLE_LOOPBACK
segundo 0:ac1725ba162c 708 if (ip_addr_cmp(dest, &netif->ip_addr)) {
segundo 0:ac1725ba162c 709 /* Packet to self, enqueue it for loopback */
segundo 0:ac1725ba162c 710 LWIP_DEBUGF(IP_DEBUG, ("netif_loop_output()"));
segundo 0:ac1725ba162c 711 return netif_loop_output(netif, p, dest);
segundo 0:ac1725ba162c 712 }
segundo 0:ac1725ba162c 713 #if LWIP_IGMP
segundo 0:ac1725ba162c 714 if ((p->flags & PBUF_FLAG_MCASTLOOP) != 0) {
segundo 0:ac1725ba162c 715 netif_loop_output(netif, p, dest);
segundo 0:ac1725ba162c 716 }
segundo 0:ac1725ba162c 717 #endif /* LWIP_IGMP */
segundo 0:ac1725ba162c 718 #endif /* ENABLE_LOOPBACK */
segundo 0:ac1725ba162c 719 #if IP_FRAG
segundo 0:ac1725ba162c 720 /* don't fragment if interface has mtu set to 0 [loopif] */
segundo 0:ac1725ba162c 721 if (netif->mtu && (p->tot_len > netif->mtu)) {
segundo 0:ac1725ba162c 722 return ip_frag(p, netif, dest);
segundo 0:ac1725ba162c 723 }
segundo 0:ac1725ba162c 724 #endif /* IP_FRAG */
segundo 0:ac1725ba162c 725
segundo 0:ac1725ba162c 726 LWIP_DEBUGF(IP_DEBUG, ("netif->output()"));
segundo 0:ac1725ba162c 727 return netif->output(netif, p, dest);
segundo 0:ac1725ba162c 728 }
segundo 0:ac1725ba162c 729
segundo 0:ac1725ba162c 730 /**
segundo 0:ac1725ba162c 731 * Simple interface to ip_output_if. It finds the outgoing network
segundo 0:ac1725ba162c 732 * interface and calls upon ip_output_if to do the actual work.
segundo 0:ac1725ba162c 733 *
segundo 0:ac1725ba162c 734 * @param p the packet to send (p->payload points to the data, e.g. next
segundo 0:ac1725ba162c 735 protocol header; if dest == IP_HDRINCL, p already includes an IP
segundo 0:ac1725ba162c 736 header and p->payload points to that IP header)
segundo 0:ac1725ba162c 737 * @param src the source IP address to send from (if src == IP_ADDR_ANY, the
segundo 0:ac1725ba162c 738 * IP address of the netif used to send is used as source address)
segundo 0:ac1725ba162c 739 * @param dest the destination IP address to send the packet to
segundo 0:ac1725ba162c 740 * @param ttl the TTL value to be set in the IP header
segundo 0:ac1725ba162c 741 * @param tos the TOS value to be set in the IP header
segundo 0:ac1725ba162c 742 * @param proto the PROTOCOL to be set in the IP header
segundo 0:ac1725ba162c 743 *
segundo 0:ac1725ba162c 744 * @return ERR_RTE if no route is found
segundo 0:ac1725ba162c 745 * see ip_output_if() for more return values
segundo 0:ac1725ba162c 746 */
segundo 0:ac1725ba162c 747 err_t
segundo 0:ac1725ba162c 748 ip_output(struct pbuf *p, ip_addr_t *src, ip_addr_t *dest,
segundo 0:ac1725ba162c 749 u8_t ttl, u8_t tos, u8_t proto)
segundo 0:ac1725ba162c 750 {
segundo 0:ac1725ba162c 751 struct netif *netif;
segundo 0:ac1725ba162c 752
segundo 0:ac1725ba162c 753 /* pbufs passed to IP must have a ref-count of 1 as their payload pointer
segundo 0:ac1725ba162c 754 gets altered as the packet is passed down the stack */
segundo 0:ac1725ba162c 755 LWIP_ASSERT("p->ref == 1", p->ref == 1);
segundo 0:ac1725ba162c 756
segundo 0:ac1725ba162c 757 if ((netif = ip_route(dest)) == NULL) {
segundo 0:ac1725ba162c 758 LWIP_DEBUGF(IP_DEBUG, ("ip_output: No route to %"U16_F".%"U16_F".%"U16_F".%"U16_F"\n",
segundo 0:ac1725ba162c 759 ip4_addr1_16(dest), ip4_addr2_16(dest), ip4_addr3_16(dest), ip4_addr4_16(dest)));
segundo 0:ac1725ba162c 760 IP_STATS_INC(ip.rterr);
segundo 0:ac1725ba162c 761 return ERR_RTE;
segundo 0:ac1725ba162c 762 }
segundo 0:ac1725ba162c 763
segundo 0:ac1725ba162c 764 return ip_output_if(p, src, dest, ttl, tos, proto, netif);
segundo 0:ac1725ba162c 765 }
segundo 0:ac1725ba162c 766
segundo 0:ac1725ba162c 767 #if LWIP_NETIF_HWADDRHINT
segundo 0:ac1725ba162c 768 /** Like ip_output, but takes and addr_hint pointer that is passed on to netif->addr_hint
segundo 0:ac1725ba162c 769 * before calling ip_output_if.
segundo 0:ac1725ba162c 770 *
segundo 0:ac1725ba162c 771 * @param p the packet to send (p->payload points to the data, e.g. next
segundo 0:ac1725ba162c 772 protocol header; if dest == IP_HDRINCL, p already includes an IP
segundo 0:ac1725ba162c 773 header and p->payload points to that IP header)
segundo 0:ac1725ba162c 774 * @param src the source IP address to send from (if src == IP_ADDR_ANY, the
segundo 0:ac1725ba162c 775 * IP address of the netif used to send is used as source address)
segundo 0:ac1725ba162c 776 * @param dest the destination IP address to send the packet to
segundo 0:ac1725ba162c 777 * @param ttl the TTL value to be set in the IP header
segundo 0:ac1725ba162c 778 * @param tos the TOS value to be set in the IP header
segundo 0:ac1725ba162c 779 * @param proto the PROTOCOL to be set in the IP header
segundo 0:ac1725ba162c 780 * @param addr_hint address hint pointer set to netif->addr_hint before
segundo 0:ac1725ba162c 781 * calling ip_output_if()
segundo 0:ac1725ba162c 782 *
segundo 0:ac1725ba162c 783 * @return ERR_RTE if no route is found
segundo 0:ac1725ba162c 784 * see ip_output_if() for more return values
segundo 0:ac1725ba162c 785 */
segundo 0:ac1725ba162c 786 err_t
segundo 0:ac1725ba162c 787 ip_output_hinted(struct pbuf *p, ip_addr_t *src, ip_addr_t *dest,
segundo 0:ac1725ba162c 788 u8_t ttl, u8_t tos, u8_t proto, u8_t *addr_hint)
segundo 0:ac1725ba162c 789 {
segundo 0:ac1725ba162c 790 struct netif *netif;
segundo 0:ac1725ba162c 791 err_t err;
segundo 0:ac1725ba162c 792
segundo 0:ac1725ba162c 793 /* pbufs passed to IP must have a ref-count of 1 as their payload pointer
segundo 0:ac1725ba162c 794 gets altered as the packet is passed down the stack */
segundo 0:ac1725ba162c 795 LWIP_ASSERT("p->ref == 1", p->ref == 1);
segundo 0:ac1725ba162c 796
segundo 0:ac1725ba162c 797 if ((netif = ip_route(dest)) == NULL) {
segundo 0:ac1725ba162c 798 LWIP_DEBUGF(IP_DEBUG, ("ip_output: No route to %"U16_F".%"U16_F".%"U16_F".%"U16_F"\n",
segundo 0:ac1725ba162c 799 ip4_addr1_16(dest), ip4_addr2_16(dest), ip4_addr3_16(dest), ip4_addr4_16(dest)));
segundo 0:ac1725ba162c 800 IP_STATS_INC(ip.rterr);
segundo 0:ac1725ba162c 801 return ERR_RTE;
segundo 0:ac1725ba162c 802 }
segundo 0:ac1725ba162c 803
segundo 0:ac1725ba162c 804 netif->addr_hint = addr_hint;
segundo 0:ac1725ba162c 805 err = ip_output_if(p, src, dest, ttl, tos, proto, netif);
segundo 0:ac1725ba162c 806 netif->addr_hint = NULL;
segundo 0:ac1725ba162c 807
segundo 0:ac1725ba162c 808 return err;
segundo 0:ac1725ba162c 809 }
segundo 0:ac1725ba162c 810 #endif /* LWIP_NETIF_HWADDRHINT*/
segundo 0:ac1725ba162c 811
segundo 0:ac1725ba162c 812 #if IP_DEBUG
segundo 0:ac1725ba162c 813 /* Print an IP header by using LWIP_DEBUGF
segundo 0:ac1725ba162c 814 * @param p an IP packet, p->payload pointing to the IP header
segundo 0:ac1725ba162c 815 */
segundo 0:ac1725ba162c 816 void
segundo 0:ac1725ba162c 817 ip_debug_print(struct pbuf *p)
segundo 0:ac1725ba162c 818 {
segundo 0:ac1725ba162c 819 struct ip_hdr *iphdr = (struct ip_hdr *)p->payload;
segundo 0:ac1725ba162c 820 u8_t *payload;
segundo 0:ac1725ba162c 821
segundo 0:ac1725ba162c 822 payload = (u8_t *)iphdr + IP_HLEN;
segundo 0:ac1725ba162c 823
segundo 0:ac1725ba162c 824 LWIP_DEBUGF(IP_DEBUG, ("IP header:\n"));
segundo 0:ac1725ba162c 825 LWIP_DEBUGF(IP_DEBUG, ("+-------------------------------+\n"));
segundo 0:ac1725ba162c 826 LWIP_DEBUGF(IP_DEBUG, ("|%2"S16_F" |%2"S16_F" | 0x%02"X16_F" | %5"U16_F" | (v, hl, tos, len)\n",
segundo 0:ac1725ba162c 827 IPH_V(iphdr),
segundo 0:ac1725ba162c 828 IPH_HL(iphdr),
segundo 0:ac1725ba162c 829 IPH_TOS(iphdr),
segundo 0:ac1725ba162c 830 ntohs(IPH_LEN(iphdr))));
segundo 0:ac1725ba162c 831 LWIP_DEBUGF(IP_DEBUG, ("+-------------------------------+\n"));
segundo 0:ac1725ba162c 832 LWIP_DEBUGF(IP_DEBUG, ("| %5"U16_F" |%"U16_F"%"U16_F"%"U16_F"| %4"U16_F" | (id, flags, offset)\n",
segundo 0:ac1725ba162c 833 ntohs(IPH_ID(iphdr)),
segundo 0:ac1725ba162c 834 ntohs(IPH_OFFSET(iphdr)) >> 15 & 1,
segundo 0:ac1725ba162c 835 ntohs(IPH_OFFSET(iphdr)) >> 14 & 1,
segundo 0:ac1725ba162c 836 ntohs(IPH_OFFSET(iphdr)) >> 13 & 1,
segundo 0:ac1725ba162c 837 ntohs(IPH_OFFSET(iphdr)) & IP_OFFMASK));
segundo 0:ac1725ba162c 838 LWIP_DEBUGF(IP_DEBUG, ("+-------------------------------+\n"));
segundo 0:ac1725ba162c 839 LWIP_DEBUGF(IP_DEBUG, ("| %3"U16_F" | %3"U16_F" | 0x%04"X16_F" | (ttl, proto, chksum)\n",
segundo 0:ac1725ba162c 840 IPH_TTL(iphdr),
segundo 0:ac1725ba162c 841 IPH_PROTO(iphdr),
segundo 0:ac1725ba162c 842 ntohs(IPH_CHKSUM(iphdr))));
segundo 0:ac1725ba162c 843 LWIP_DEBUGF(IP_DEBUG, ("+-------------------------------+\n"));
segundo 0:ac1725ba162c 844 LWIP_DEBUGF(IP_DEBUG, ("| %3"U16_F" | %3"U16_F" | %3"U16_F" | %3"U16_F" | (src)\n",
segundo 0:ac1725ba162c 845 ip4_addr1_16(&iphdr->src),
segundo 0:ac1725ba162c 846 ip4_addr2_16(&iphdr->src),
segundo 0:ac1725ba162c 847 ip4_addr3_16(&iphdr->src),
segundo 0:ac1725ba162c 848 ip4_addr4_16(&iphdr->src)));
segundo 0:ac1725ba162c 849 LWIP_DEBUGF(IP_DEBUG, ("+-------------------------------+\n"));
segundo 0:ac1725ba162c 850 LWIP_DEBUGF(IP_DEBUG, ("| %3"U16_F" | %3"U16_F" | %3"U16_F" | %3"U16_F" | (dest)\n",
segundo 0:ac1725ba162c 851 ip4_addr1_16(&iphdr->dest),
segundo 0:ac1725ba162c 852 ip4_addr2_16(&iphdr->dest),
segundo 0:ac1725ba162c 853 ip4_addr3_16(&iphdr->dest),
segundo 0:ac1725ba162c 854 ip4_addr4_16(&iphdr->dest)));
segundo 0:ac1725ba162c 855 LWIP_DEBUGF(IP_DEBUG, ("+-------------------------------+\n"));
segundo 0:ac1725ba162c 856 }
segundo 0:ac1725ba162c 857 #endif /* IP_DEBUG */