]> git.saurik.com Git - apple/xnu.git/blobdiff - bsd/netinet/ip_icmp.c
xnu-3248.50.21.tar.gz
[apple/xnu.git] / bsd / netinet / ip_icmp.c
index fb94248771ef5e538a0659a028ac11d6c8a51627..cb0e43f7a30455aa5855624d99cd03103184da30 100644 (file)
@@ -1,16 +1,19 @@
 /*
- * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
+ * Copyright (c) 2000-2015 Apple Inc. All rights reserved.
  *
- * @APPLE_LICENSE_HEADER_START@
- * 
- * Copyright (c) 1999-2003 Apple Computer, Inc.  All Rights Reserved.
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
  * 
  * This file contains Original Code and/or Modifications of Original Code
  * as defined in and that are subject to the Apple Public Source License
  * Version 2.0 (the 'License'). You may not use this file except in
- * compliance with the License. Please obtain a copy of the License at
- * http://www.opensource.apple.com/apsl/ and read it before using this
- * file.
+ * compliance with the License. The rights granted to you under the License
+ * may not be used to create, or enable the creation or redistribution of,
+ * unlawful or unlicensed copies of an Apple operating system, or to
+ * circumvent, violate, or enable the circumvention or violation of, any
+ * terms of an Apple operating system software license agreement.
+ * 
+ * Please obtain a copy of the License at
+ * http://www.opensource.apple.com/apsl/ and read it before using this file.
  * 
  * The Original Code and all software distributed under the License are
  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
@@ -20,7 +23,7 @@
  * Please see the License for the specific language governing rights and
  * limitations under the License.
  * 
- * @APPLE_LICENSE_HEADER_END@
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
  */
 /*
  * Copyright (c) 1982, 1986, 1988, 1993
  *
  *     @(#)ip_icmp.c   8.2 (Berkeley) 1/4/94
  */
+/*
+ * NOTICE: This file was modified by SPARTA, Inc. in 2005 to introduce
+ * support for mandatory and extensible security protections.  This notice
+ * is included in support of clause 2.2 (b) of the Apple Public License,
+ * Version 2.0.
+ */
 
 #include <sys/param.h>
 #include <sys/systm.h>
 #include <sys/mbuf.h>
+#include <sys/mcache.h>
 #include <sys/protosw.h>
 #include <sys/socket.h>
 #include <sys/time.h>
 #include <sys/kernel.h>
 #include <sys/sysctl.h>
 
+#include <machine/endian.h>
+
 #include <net/if.h>
 #include <net/route.h>
 
 #include <netinet/ip_icmp.h>
 #include <netinet/ip_var.h>
 #include <netinet/icmp_var.h>
+#include <netinet/tcp.h>
+#include <netinet/tcp_fsm.h>
+#include <netinet/tcp_seq.h>
+#include <netinet/tcp_timer.h>
+#include <netinet/tcp_var.h>
+#include <netinet/tcpip.h>
 
 #if IPSEC
 #include <netinet6/ipsec.h>
 #include <netkey/key.h>
 #endif
 
-#if defined(NFAITH) && NFAITH > 0
-#include "faith.h"
-#include <net/if_types.h>
-#endif
+#if NECP
+#include <net/necp.h>
+#endif /* NECP */
+
+ /* XXX This one should go in sys/mbuf.h. It is used to avoid that
+ * a firewall-generated packet loops forever through the firewall.
+ */
+#ifndef M_SKIP_FIREWALL
+#define M_SKIP_FIREWALL         0x4000
+#endif 
+
+#if CONFIG_MACF_NET
+#include <security/mac_framework.h>
+#endif /* MAC_NET */
+
 
 /*
  * ICMP routines: error generation, receive packet processing, and
  * host table maintenance routines.
  */
 
-static struct  icmpstat icmpstat;
-SYSCTL_STRUCT(_net_inet_icmp, ICMPCTL_STATS, stats, CTLFLAG_RD,
-       &icmpstat, icmpstat, "");
+struct icmpstat icmpstat;
+SYSCTL_STRUCT(_net_inet_icmp, ICMPCTL_STATS, stats,
+    CTLFLAG_RD | CTLFLAG_LOCKED,
+    &icmpstat, icmpstat, "");
 
 static int     icmpmaskrepl = 0;
-SYSCTL_INT(_net_inet_icmp, ICMPCTL_MASKREPL, maskrepl, CTLFLAG_RW,
-       &icmpmaskrepl, 0, "");
+SYSCTL_INT(_net_inet_icmp, ICMPCTL_MASKREPL, maskrepl,
+    CTLFLAG_RW | CTLFLAG_LOCKED,
+    &icmpmaskrepl, 0, "");
+
+static int     icmptimestamp = 0;
+SYSCTL_INT(_net_inet_icmp, ICMPCTL_TIMESTAMP, timestamp,
+    CTLFLAG_RW | CTLFLAG_LOCKED,
+    &icmptimestamp, 0, "");
 
-static int     drop_redirect = 0;
-SYSCTL_INT(_net_inet_icmp, OID_AUTO, drop_redirect, CTLFLAG_RW, 
-       &drop_redirect, 0, "");
+static int     drop_redirect = 1;
+SYSCTL_INT(_net_inet_icmp, OID_AUTO, drop_redirect,
+    CTLFLAG_RW | CTLFLAG_LOCKED,
+    &drop_redirect, 0, "");
 
 static int     log_redirect = 0;
-SYSCTL_INT(_net_inet_icmp, OID_AUTO, log_redirect, CTLFLAG_RW, 
-       &log_redirect, 0, "");
+SYSCTL_INT(_net_inet_icmp, OID_AUTO, log_redirect,
+    CTLFLAG_RW | CTLFLAG_LOCKED,
+    &log_redirect, 0, "");
+
+const static int icmp_datalen = 8;
 
 #if ICMP_BANDLIM 
+
+/* Default values in case CONFIG_ICMP_BANDLIM is not defined in the MASTER file */
+#ifndef CONFIG_ICMP_BANDLIM
+#define CONFIG_ICMP_BANDLIM 250
+#endif /* CONFIG_ICMP_BANDLIM */
+
 /*    
  * ICMP error-response bandwidth limiting sysctl.  If not enabled, sysctl
  *      variable content is -1 and read-only.
  */     
     
-static int      icmplim = 100;
-SYSCTL_INT(_net_inet_icmp, ICMPCTL_ICMPLIM, icmplim, CTLFLAG_RW,
+static int      icmplim = CONFIG_ICMP_BANDLIM;
+SYSCTL_INT(_net_inet_icmp, ICMPCTL_ICMPLIM, icmplim, CTLFLAG_RW | CTLFLAG_LOCKED,
        &icmplim, 0, "");
-#else
+
+#else /* ICMP_BANDLIM */
 
 static int      icmplim = -1;
-SYSCTL_INT(_net_inet_icmp, ICMPCTL_ICMPLIM, icmplim, CTLFLAG_RD,
+SYSCTL_INT(_net_inet_icmp, ICMPCTL_ICMPLIM, icmplim, CTLFLAG_RD | CTLFLAG_LOCKED,
        &icmplim, 0, "");
        
-#endif 
+#endif /* ICMP_BANDLIM */
 
 /*
  * ICMP broadcast echo sysctl
  */
 
 static int     icmpbmcastecho = 1;
-SYSCTL_INT(_net_inet_icmp, OID_AUTO, bmcastecho, CTLFLAG_RW,
+SYSCTL_INT(_net_inet_icmp, OID_AUTO, bmcastecho, CTLFLAG_RW | CTLFLAG_LOCKED,
        &icmpbmcastecho, 0, "");
 
 
@@ -141,32 +187,36 @@ SYSCTL_INT(_net_inet_icmp, OID_AUTO, bmcastecho, CTLFLAG_RW,
 int    icmpprintfs = 0;
 #endif
 
-static void    icmp_reflect __P((struct mbuf *));
-static void    icmp_send __P((struct mbuf *, struct mbuf *));
-static int     ip_next_mtu __P((int, int));
-
-extern struct protosw inetsw[];
+static void    icmp_reflect(struct mbuf *);
+static void    icmp_send(struct mbuf *, struct mbuf *);
 
 /*
  * Generate an error packet of type error
  * in response to bad packet ip.
  */
 void
-icmp_error(n, type, code, dest, destifp)
-       struct mbuf *n;
-       int type, code;
-       n_long dest;
-       struct ifnet *destifp;
+icmp_error(
+       struct mbuf *n,
+       int type,
+       int code,
+       u_int32_t dest,
+       u_int32_t nextmtu)
 {
-       register struct ip *oip = mtod(n, struct ip *), *nip;
-       register unsigned oiplen = IP_VHL_HL(oip->ip_vhl) << 2;
-       register struct icmp *icp;
-       register struct mbuf *m;
-       unsigned icmplen;
+       struct ip *oip, *nip;
+       struct icmp *icp;
+       struct mbuf *m;
+       u_int32_t oiphlen, icmplen, icmpelen, nlen;
+
+       /* Expect 32-bit aligned data pointer on strict-align platforms */
+       MBUF_STRICT_DATA_ALIGNMENT_CHECK_32(n);
+
+       oip = mtod(n, struct ip *);
+       oiphlen = IP_VHL_HL(oip->ip_vhl) << 2;
 
 #if ICMPPRINTFS
        if (icmpprintfs)
-               printf("icmp_error(%p, %x, %d)\n", oip, type, code);
+               printf("icmp_error(0x%llx, %x, %d)\n",
+                   (uint64_t)VM_KERNEL_ADDRPERM(oip), type, code);
 #endif
        if (type != ICMP_REDIRECT)
                icmpstat.icps_error++;
@@ -175,34 +225,92 @@ icmp_error(n, type, code, dest, destifp)
         * Don't error if the old packet protocol was ICMP
         * error message, only known informational types.
         */
-       if (oip->ip_off &(IP_MF|IP_DF))
+       if (oip->ip_off & ~(IP_MF|IP_DF))
                goto freeit;
+
        if (oip->ip_p == IPPROTO_ICMP && type != ICMP_REDIRECT &&
-         n->m_len >= oiplen + ICMP_MINLEN &&
-         !ICMP_INFOTYPE(((struct icmp *)((caddr_t)oip + oiplen))->icmp_type)) {
+         n->m_len >= oiphlen + ICMP_MINLEN &&
+         !ICMP_INFOTYPE(((struct icmp *)(void *)((caddr_t)oip + oiphlen))->
+         icmp_type)) {
                icmpstat.icps_oldicmp++;
                goto freeit;
        }
-       /* Don't send error in response to a multicast or broadcast packet */
+       /*
+        * Don't send error in response to a multicast or
+        * broadcast packet
+        */
        if (n->m_flags & (M_BCAST|M_MCAST))
                goto freeit;
+
+       /*
+        * Calculate the length to quote from original packet and prevent
+        * the ICMP mbuf from overflowing.
+        */
+       nlen = m_length(n);
+       if (oip->ip_p == IPPROTO_TCP) {
+               struct tcphdr *th;
+               u_int16_t tcphlen;
+
+               if (oiphlen + sizeof(struct tcphdr) > n->m_len &&
+                   n->m_next == NULL)
+                       goto stdreply;
+               if (n->m_len < (oiphlen + sizeof(struct tcphdr)) &&
+                   (n = m_pullup(n, (oiphlen + sizeof(struct tcphdr)))) == NULL)
+                       goto freeit;
+
+               th = (struct tcphdr *)(void *)((caddr_t)oip + oiphlen);
+               if (th != ((struct tcphdr *)P2ROUNDDOWN(th,
+                   sizeof(u_int32_t))))
+                       goto freeit;
+               tcphlen = th->th_off << 2;
+               if (tcphlen < sizeof(struct tcphdr))
+                       goto freeit;
+               if (oip->ip_len < (oiphlen + tcphlen))
+                       goto freeit;
+               if ((oiphlen + tcphlen) > n->m_len && n->m_next == NULL)
+                       goto stdreply;
+               if (n->m_len < (oiphlen + tcphlen) &&
+                   (n = m_pullup(n, (oiphlen + tcphlen))) == NULL)
+                       goto freeit;
+
+               icmpelen = max(tcphlen, min(icmp_datalen,
+                   (oip->ip_len - oiphlen)));
+       } else
+stdreply:      icmpelen = max(ICMP_MINLEN, min(icmp_datalen,
+                   (ntohs(oip->ip_len) - oiphlen)));
+
+       icmplen = min(oiphlen + icmpelen, min(nlen, oip->ip_len));
+       if (icmplen < sizeof(struct ip))
+               goto freeit;
        /*
         * First, formulate icmp message
         */
-       m = m_gethdr(M_DONTWAIT, MT_HEADER);
+       if (MHLEN > (sizeof(struct ip) + ICMP_MINLEN + icmplen))
+               m = m_gethdr(M_DONTWAIT, MT_HEADER);    /* MAC-OK */
+       else
+               m = m_getcl(M_DONTWAIT, MT_DATA, M_PKTHDR);
+
        if (m == NULL)
                goto freeit;
-       icmplen = min(oiplen + 8, oip->ip_len);
-       if (icmplen < sizeof(struct ip)) {
-               printf("icmp_error: bad length\n");
-               m_free(m);
-               goto freeit;
+
+       if (n->m_flags & M_SKIP_FIREWALL) {
+               /*
+                * set M_SKIP_FIREWALL to skip firewall check, since
+                * we're called from firewall
+                */
+               m->m_flags |= M_SKIP_FIREWALL;
        }
-       m->m_len = icmplen + ICMP_MINLEN;
+
+#if CONFIG_MACF_NET
+       mac_mbuf_label_associate_netlayer(n, m);
+#endif
+       m->m_len = icmplen + ICMP_MINLEN; /* for ICMP header and data */
        MH_ALIGN(m, m->m_len);
        icp = mtod(m, struct icmp *);
-       if ((u_int)type > ICMP_MAXTYPE)
-               panic("icmp_error");
+       if ((u_int)type > ICMP_MAXTYPE) {
+               m_freem(m);
+               goto freeit;
+       }
        icmpstat.icps_outhist[type]++;
        icp->icmp_type = type;
        if (type == ICMP_REDIRECT)
@@ -217,8 +325,8 @@ icmp_error(n, type, code, dest, destifp)
                        icp->icmp_pptr = code;
                        code = 0;
                } else if (type == ICMP_UNREACH &&
-                       code == ICMP_UNREACH_NEEDFRAG && destifp) {
-                       icp->icmp_nextmtu = htons(destifp->if_mtu);
+                   code == ICMP_UNREACH_NEEDFRAG && nextmtu != 0) {
+                       icp->icmp_nextmtu = htons(nextmtu);
                }
        }
 
@@ -229,62 +337,68 @@ icmp_error(n, type, code, dest, destifp)
        /*
         * Convert fields to network representation.
         */
+#if BYTE_ORDER != BIG_ENDIAN
        HTONS(nip->ip_len);
        HTONS(nip->ip_off);
-
+#endif
        /*
         * Now, copy old ip header (without options)
         * in front of icmp message.
         */
-       if (m->m_data - sizeof(struct ip) < m->m_pktdat)
-               panic("icmp len");
+       if (m->m_data - sizeof(struct ip) < m->m_pktdat) {
+               m_freem(m);
+               goto freeit;
+       }
        m->m_data -= sizeof(struct ip);
        m->m_len += sizeof(struct ip);
        m->m_pkthdr.len = m->m_len;
        m->m_pkthdr.rcvif = n->m_pkthdr.rcvif;
-       m->m_pkthdr.aux = NULL; /* for IPsec */
        nip = mtod(m, struct ip *);
        bcopy((caddr_t)oip, (caddr_t)nip, sizeof(struct ip));
        nip->ip_len = m->m_len;
        nip->ip_vhl = IP_VHL_BORING;
        nip->ip_p = IPPROTO_ICMP;
        nip->ip_tos = 0;
+       nip->ip_off = 0;
        icmp_reflect(m);
 
 freeit:
        m_freem(n);
 }
 
-static struct sockaddr_in icmpsrc = { sizeof (struct sockaddr_in), AF_INET };
-static struct sockaddr_in icmpdst = { sizeof (struct sockaddr_in), AF_INET };
-static struct sockaddr_in icmpgw = { sizeof (struct sockaddr_in), AF_INET };
-
 /*
  * Process a received ICMP message.
  */
 void
-icmp_input(m, hlen)
-       register struct mbuf *m;
-       int hlen;
+icmp_input(struct mbuf *m, int hlen)
 {
-       register struct icmp *icp;
-       register struct ip *ip = mtod(m, struct ip *);
-       int icmplen = ip->ip_len;
-       register int i;
+       struct sockaddr_in icmpsrc, icmpdst, icmpgw;
+       struct icmp *icp;
+       struct ip *ip = mtod(m, struct ip *);
+       int icmplen;
+       int i;
        struct in_ifaddr *ia;
-       void (*ctlfunc) __P((int, struct sockaddr *, void *));
+       void (*ctlfunc)(int, struct sockaddr *, void *);
        int code;
 
+       /* Expect 32-bit aligned data pointer on strict-align platforms */
+       MBUF_STRICT_DATA_ALIGNMENT_CHECK_32(m);
+
+       icmplen = ip->ip_len;
+
        /*
         * Locate icmp structure in mbuf, and check
         * that not corrupted and of at least minimum length.
         */
 #if ICMPPRINTFS
        if (icmpprintfs) {
-               char buf[4 * sizeof "123"];
-               strcpy(buf, inet_ntoa(ip->ip_src));
+               char buf[MAX_IPv4_STR_LEN];
+               char ipv4str[MAX_IPv4_STR_LEN];
+
                printf("icmp_input from %s to %s, len %d\n",
-                      buf, inet_ntoa(ip->ip_dst), icmplen);
+                      inet_ntop(AF_INET, &ip->ip_src, buf, sizeof(buf)),
+                      inet_ntop(AF_INET, &ip->ip_dst, ipv4str, sizeof(ipv4str)),
+                      icmplen);
        }
 #endif
        if (icmplen < ICMP_MINLEN) {
@@ -307,21 +421,6 @@ icmp_input(m, hlen)
        m->m_len += hlen;
        m->m_data -= hlen;
 
-#if defined(NFAITH) && 0 < NFAITH
-       if (m->m_pkthdr.rcvif && m->m_pkthdr.rcvif->if_type == IFT_FAITH) {
-               /*
-                * Deliver very specific ICMP type only.
-                */
-               switch (icp->icmp_type) {
-               case ICMP_UNREACH:
-               case ICMP_TIMXCEED:
-                       break;
-               default:
-                       goto freeit;
-               }
-       }
-#endif
-
 #if ICMPPRINTFS
        if (icmpprintfs)
                printf("icmp_input, type %d code %d\n", icp->icmp_type,
@@ -333,6 +432,18 @@ icmp_input(m, hlen)
         */
        if (icp->icmp_type > ICMP_MAXTYPE)
                goto raw;
+
+       /* Initialize */
+       bzero(&icmpsrc, sizeof (icmpsrc));
+       icmpsrc.sin_len = sizeof (struct sockaddr_in);
+       icmpsrc.sin_family = AF_INET;
+       bzero(&icmpdst, sizeof (icmpdst));
+       icmpdst.sin_len = sizeof (struct sockaddr_in);
+       icmpdst.sin_family = AF_INET;
+       bzero(&icmpgw, sizeof (icmpgw));
+       icmpgw.sin_len = sizeof (struct sockaddr_in);
+       icmpgw.sin_family = AF_INET;
+
        icmpstat.icps_inhist[icp->icmp_type]++;
        code = icp->icmp_code;
        switch (icp->icmp_type) {
@@ -401,7 +512,11 @@ icmp_input(m, hlen)
                        icmpstat.icps_badlen++;
                        goto freeit;
                }
+
+#if BYTE_ORDER != BIG_ENDIAN
                NTOHS(icp->icmp_ip.ip_len);
+#endif
+
                /* Discard ICMP's in response to multicast packets */
                if (IN_MULTICAST(ntohl(icp->icmp_ip.ip_dst.s_addr)))
                        goto badcode;
@@ -410,50 +525,7 @@ icmp_input(m, hlen)
                        printf("deliver to protocol %d\n", icp->icmp_ip.ip_p);
 #endif
                icmpsrc.sin_addr = icp->icmp_ip.ip_dst;
-#if 1
-               /*
-                * MTU discovery:
-                * If we got a needfrag and there is a host route to the
-                * original destination, and the MTU is not locked, then
-                * set the MTU in the route to the suggested new value
-                * (if given) and then notify as usual.  The ULPs will
-                * notice that the MTU has changed and adapt accordingly.
-                * If no new MTU was suggested, then we guess a new one
-                * less than the current value.  If the new MTU is 
-                * unreasonably small (arbitrarily set at 296), then
-                * we reset the MTU to the interface value and enable the
-                * lock bit, indicating that we are no longer doing MTU
-                * discovery.
-                */
-               if (code == PRC_MSGSIZE) {
-                       struct rtentry *rt;
-                       int mtu;
-
-                       rt = rtalloc1((struct sockaddr *)&icmpsrc, 0,
-                                     RTF_CLONING | RTF_PRCLONING);
-                       if (rt && (rt->rt_flags & RTF_HOST)
-                           && !(rt->rt_rmx.rmx_locks & RTV_MTU)) {
-                               mtu = ntohs(icp->icmp_nextmtu);
-                               if (!mtu)
-                                       mtu = ip_next_mtu(rt->rt_rmx.rmx_mtu,
-                                                         1);
-#if DEBUG_MTUDISC
-                               printf("MTU for %s reduced to %d\n",
-                                       inet_ntoa(icmpsrc.sin_addr), mtu);
-#endif
-                               if (mtu < 296) {
-                                       /* rt->rt_rmx.rmx_mtu =
-                                               rt->rt_ifp->if_mtu; */
-                                       rt->rt_rmx.rmx_locks |= RTV_MTU;
-                               } else if (rt->rt_rmx.rmx_mtu > mtu) {
-                                       rt->rt_rmx.rmx_mtu = mtu;
-                               }
-                       }
-                       if (rt)
-                               rtfree(rt);
-               }
 
-#endif
                /*
                 * XXX if the packet contains [IPv4 AH TCP], we can't make a
                 * notification to TCP layer.
@@ -483,6 +555,10 @@ icmp_input(m, hlen)
                        goto reflect;
 
        case ICMP_TSTAMP:
+
+               if (icmptimestamp == 0)
+                       break;
+
                if (!icmpbmcastecho
                    && (m->m_flags & (M_MCAST | M_BCAST)) != 0) {
                        icmpstat.icps_bmcasttstamp++;
@@ -503,7 +579,6 @@ icmp_input(m, hlen)
                        goto reflect;
 
        case ICMP_MASKREQ:
-#define        satosin(sa)     ((struct sockaddr_in *)(sa))
                if (icmpmaskrepl == 0)
                        break;
                /*
@@ -526,8 +601,13 @@ icmp_input(m, hlen)
                            (struct sockaddr *)&icmpdst, m->m_pkthdr.rcvif);
                if (ia == 0)
                        break;
-               if (ia->ia_ifp == 0)
+               IFA_LOCK(&ia->ia_ifa);
+               if (ia->ia_ifp == 0) {
+                       IFA_UNLOCK(&ia->ia_ifa);
+                       IFA_REMREF(&ia->ia_ifa);
+                       ia = NULL;
                        break;
+               }
                icp->icmp_type = ICMP_MASKREPLY;
                icp->icmp_mask = ia->ia_sockmask.sin_addr.s_addr;
                if (ip->ip_src.s_addr == 0) {
@@ -536,6 +616,8 @@ icmp_input(m, hlen)
                        else if (ia->ia_ifp->if_flags & IFF_POINTOPOINT)
                            ip->ip_src = satosin(&ia->ia_dstaddr)->sin_addr;
                }
+               IFA_UNLOCK(&ia->ia_ifa);
+               IFA_REMREF(&ia->ia_ifa);
 reflect:
                ip->ip_len += hlen;     /* since ip_input deducts this */
                icmpstat.icps_reflect++;
@@ -545,7 +627,7 @@ reflect:
 
        case ICMP_REDIRECT:
                if (log_redirect) {
-                       u_long src, dst, gw;
+                       u_int32_t src, dst, gw;
 
                        src = ntohl(ip->ip_src.s_addr);
                        dst = ntohl(icp->icmp_ip.ip_dst.s_addr);
@@ -579,18 +661,18 @@ reflect:
                icmpdst.sin_addr = icp->icmp_gwaddr;
 #if    ICMPPRINTFS
                if (icmpprintfs) {
-                       char buf[4 * sizeof "123"];
-                       strcpy(buf, inet_ntoa(icp->icmp_ip.ip_dst));
+                       char buf[MAX_IPv4_STR_LEN];
 
                        printf("redirect dst %s to %s\n",
-                              buf, inet_ntoa(icp->icmp_gwaddr));
+                              inet_ntop(AF_INET, &icp->icmp_ip.ip_dst, buf, sizeof(buf)),
+                              inet_ntop(AF_INET, &icp->icmp_gwaddr, ipv4str,
+                                                sizeof(ipv4str)));
                }
 #endif
                icmpsrc.sin_addr = icp->icmp_ip.ip_dst;
-               rtredirect((struct sockaddr *)&icmpsrc,
-                 (struct sockaddr *)&icmpdst,
-                 (struct sockaddr *)0, RTF_GATEWAY | RTF_HOST,
-                 (struct sockaddr *)&icmpgw, (struct rtentry **)0);
+               rtredirect(m->m_pkthdr.rcvif, (struct sockaddr *)&icmpsrc,
+                 (struct sockaddr *)&icmpdst, NULL, RTF_GATEWAY | RTF_HOST,
+                 (struct sockaddr *)&icmpgw, NULL);
                pfctlinput(PRC_REDIRECT_HOST, (struct sockaddr *)&icmpsrc);
 #if IPSEC
                key_sa_routechange((struct sockaddr *)&icmpsrc);
@@ -623,13 +705,13 @@ freeit:
  * Reflect the ip packet back to the source
  */
 static void
-icmp_reflect(m)
-       struct mbuf *m;
+icmp_reflect(struct mbuf *m)
 {
-       register struct ip *ip = mtod(m, struct ip *);
-       register struct in_ifaddr *ia;
+       struct ip *ip = mtod(m, struct ip *);
+       struct sockaddr_in icmpdst;
+       struct in_ifaddr *ia;
        struct in_addr t;
-       struct mbuf *opts = 0;
+       struct mbuf *opts = NULL;
        int optlen = (IP_VHL_HL(ip->ip_vhl) << 2) - sizeof(struct ip);
 
        if (!in_canforward(ip->ip_src) &&
@@ -646,13 +728,38 @@ icmp_reflect(m)
         * or anonymous), use the address which corresponds
         * to the incoming interface.
         */
+       lck_rw_lock_shared(in_ifaddr_rwlock);
+       TAILQ_FOREACH(ia, INADDR_HASH(t.s_addr), ia_hash) {
+               IFA_LOCK(&ia->ia_ifa);
+               if (t.s_addr == IA_SIN(ia)->sin_addr.s_addr) {
+                       IFA_ADDREF_LOCKED(&ia->ia_ifa);
+                       IFA_UNLOCK(&ia->ia_ifa);
+                       goto match;
+               }
+               IFA_UNLOCK(&ia->ia_ifa);
+       }
+       /*
+        * Slow path; check for broadcast addresses.  Find a source
+        * IP address to use when replying to the broadcast request;
+        * let IP handle the source interface selection work.
+        */
        for (ia = in_ifaddrhead.tqh_first; ia; ia = ia->ia_link.tqe_next) {
-               if (t.s_addr == IA_SIN(ia)->sin_addr.s_addr)
-                       break;
+               IFA_LOCK(&ia->ia_ifa);
                if (ia->ia_ifp && (ia->ia_ifp->if_flags & IFF_BROADCAST) &&
-                   t.s_addr == satosin(&ia->ia_broadaddr)->sin_addr.s_addr)
+                   t.s_addr == satosin(&ia->ia_broadaddr)->sin_addr.s_addr) {
+                       IFA_ADDREF_LOCKED(&ia->ia_ifa);
+                       IFA_UNLOCK(&ia->ia_ifa);
                        break;
+               }
+               IFA_UNLOCK(&ia->ia_ifa);
        }
+match:
+       lck_rw_done(in_ifaddr_rwlock);
+
+       /* Initialize */
+       bzero(&icmpdst, sizeof (icmpdst));
+       icmpdst.sin_len = sizeof (struct sockaddr_in);
+       icmpdst.sin_family = AF_INET;
        icmpdst.sin_addr = t;
        if ((ia == (struct in_ifaddr *)0) && m->m_pkthdr.rcvif)
                ia = (struct in_ifaddr *)ifaof_ifpforaddr(
@@ -661,14 +768,30 @@ icmp_reflect(m)
         * The following happens if the packet was not addressed to us,
         * and was received on an interface with no IP address.
         */
-       if (ia == (struct in_ifaddr *)0)
+       if (ia == (struct in_ifaddr *)0) {
+               lck_rw_lock_shared(in_ifaddr_rwlock);
                ia = in_ifaddrhead.tqh_first;
+               if (ia == (struct in_ifaddr *)0) {/* no address yet, bail out */
+                       lck_rw_done(in_ifaddr_rwlock);
+                       m_freem(m);
+                       goto done;
+               }
+               IFA_ADDREF(&ia->ia_ifa);
+               lck_rw_done(in_ifaddr_rwlock);
+       }
+#if CONFIG_MACF_NET
+       mac_netinet_icmp_reply(m);
+#endif
+       IFA_LOCK_SPIN(&ia->ia_ifa);
        t = IA_SIN(ia)->sin_addr;
+       IFA_UNLOCK(&ia->ia_ifa);
        ip->ip_src = t;
        ip->ip_ttl = ip_defttl;
+       IFA_REMREF(&ia->ia_ifa);
+       ia = NULL;
 
        if (optlen > 0) {
-               register u_char *cp;
+               u_char *cp;
                int opt, cnt;
                u_int len;
 
@@ -678,7 +801,7 @@ icmp_reflect(m)
                 */
                cp = (u_char *) (ip + 1);
                if ((opts = ip_srcroute()) == 0 &&
-                   (opts = m_gethdr(M_DONTWAIT, MT_HEADER))) {
+                   (opts = m_gethdr(M_DONTWAIT, MT_HEADER))) { /* MAC-OK */
                        opts->m_len = sizeof(struct in_addr);
                        mtod(opts, struct in_addr *)->s_addr = 0;
                }
@@ -751,14 +874,19 @@ done:
  * after supplying a checksum.
  */
 static void
-icmp_send(m, opts)
-       register struct mbuf *m;
-       struct mbuf *opts;
+icmp_send(struct mbuf *m, struct mbuf *opts)
 {
-       register struct ip *ip = mtod(m, struct ip *);
-       register int hlen;
-       register struct icmp *icp;
+       struct ip *ip = mtod(m, struct ip *);
+       int hlen;
+       struct icmp *icp;
        struct route ro;
+       struct ip_out_args ipoa = { IFSCOPE_NONE, { 0 },
+           IPOAF_SELECT_SRCIF | IPOAF_BOUND_SRCADDR, 0 };
+
+       if (!(m->m_pkthdr.pkt_flags & PKTF_LOOP) && m->m_pkthdr.rcvif != NULL) {
+               ipoa.ipoa_boundif = m->m_pkthdr.rcvif->if_index;
+               ipoa.ipoa_flags |= IPOAF_BOUND_IF;
+       }
 
        hlen = IP_VHL_HL(ip->ip_vhl) << 2;
        m->m_data += hlen;
@@ -768,31 +896,31 @@ icmp_send(m, opts)
        icp->icmp_cksum = in_cksum(m, ip->ip_len - hlen);
        m->m_data -= hlen;
        m->m_len += hlen;
-       m->m_pkthdr.rcvif = (struct ifnet *)0;
-       m->m_pkthdr.aux = NULL;
+       m->m_pkthdr.rcvif = NULL;
        m->m_pkthdr.csum_data = 0;
        m->m_pkthdr.csum_flags = 0;
 #if ICMPPRINTFS
        if (icmpprintfs) {
-               char buf[4 * sizeof "123"];
-               strcpy(buf, inet_ntoa(ip->ip_dst));
+               char buf[MAX_IPv4_STR_LEN];
+               char ipv4str[MAX_IPv4_STR_LEN];
+
                printf("icmp_send dst %s src %s\n",
-                      buf, inet_ntoa(ip->ip_src));
+                      inet_ntop(AF_INET, &ip->ip_dst, buf, sizeof(buf)),
+                      inet_ntop(AF_INET, &ip->ip_src, ipv4str, sizeof(ipv4str)));
        }
 #endif
        bzero(&ro, sizeof ro);
-       (void) ip_output(m, opts, &ro, 0, NULL);
-       if (ro.ro_rt)
-               rtfree(ro.ro_rt);
+       (void) ip_output(m, opts, &ro, IP_OUTARGS, NULL, &ipoa);
+       ROUTE_RELEASE(&ro);
 }
 
-n_time
-iptime()
+u_int32_t
+iptime(void)
 {
        struct timeval atv;
-       u_long t;
+       u_int32_t t;
 
-       microtime(&atv);
+       getmicrotime(&atv);
        t = (atv.tv_sec % (24*60*60)) * 1000 + atv.tv_usec / 1000;
        return (htonl(t));
 }
@@ -803,10 +931,8 @@ iptime()
  * given current value MTU.  If DIR is less than zero, a larger plateau
  * is returned; otherwise, a smaller value is returned.
  */
-static int
-ip_next_mtu(mtu, dir)
-       int mtu;
-       int dir;
+int
+ip_next_mtu(int mtu, int dir)
 {
        static int mtutab[] = {
                65535, 32000, 17914, 8166, 4352, 2002, 1492, 1006, 508, 296,
@@ -861,9 +987,9 @@ ip_next_mtu(mtu, dir)
 int
 badport_bandlim(int which)
 {
-       static struct timeval lticks[BANDLIM_MAX + 1];
+       static uint64_t lticks[BANDLIM_MAX + 1];
        static int lpackets[BANDLIM_MAX + 1];
-       struct timeval time;
+       uint64_t time = net_uptime();
        int secs;
 
        const char *bandlimittype[] = {
@@ -882,15 +1008,13 @@ badport_bandlim(int which)
        if (icmplim <= 0 || which > BANDLIM_MAX || which < 0)
                return(0);
 
-       getmicrotime(&time);
+       secs = time - lticks[which];
 
-       secs = time.tv_sec - lticks[which].tv_sec ;
-                       
        /*
         * reset stats when cumulative delta exceeds one second.
         */
 
-       if ((secs > 1) || (secs == 1 && (lticks[which].tv_usec > time.tv_usec))) { 
+       if (secs > 1) {
                if (lpackets[which] > icmplim) {
                        printf("%s from %d to %d packets per second\n",
                                bandlimittype[which],
@@ -898,8 +1022,7 @@ badport_bandlim(int which)
                                icmplim
                        );
                }
-               lticks[which].tv_sec = time.tv_sec;
-               lticks[which].tv_usec = time.tv_usec;
+               lticks[which] = time;
                lpackets[which] = 0;
        }
 
@@ -927,9 +1050,8 @@ badport_bandlim(int which)
 #include <netinet/ip_icmp.h>
 #include <netinet/in_pcb.h>
 
-extern struct domain inetdomain;
-extern u_long rip_sendspace;
-extern u_long rip_recvspace;
+extern u_int32_t rip_sendspace;
+extern u_int32_t rip_recvspace;
 extern struct inpcbinfo ripcbinfo;
 
 int rip_abort(struct socket *);
@@ -944,19 +1066,27 @@ __private_extern__ int icmp_dgram_attach(struct socket *so, int proto, struct pr
 __private_extern__ int icmp_dgram_ctloutput(struct socket *so, struct sockopt *sopt);
 
 __private_extern__ struct pr_usrreqs icmp_dgram_usrreqs = {
-        rip_abort, pru_accept_notsupp, icmp_dgram_attach, rip_bind, rip_connect,
-        pru_connect2_notsupp, in_control, rip_detach, rip_disconnect,
-        pru_listen_notsupp, in_setpeeraddr, pru_rcvd_notsupp,
-        pru_rcvoob_notsupp, icmp_dgram_send, pru_sense_null, rip_shutdown,
-        in_setsockaddr, sosend, soreceive, sopoll
+       .pru_abort =            rip_abort,
+       .pru_attach =           icmp_dgram_attach,
+       .pru_bind =             rip_bind,
+       .pru_connect =          rip_connect,
+       .pru_control =          in_control,
+       .pru_detach =           rip_detach,
+       .pru_disconnect =       rip_disconnect,
+       .pru_peeraddr =         in_getpeeraddr,
+       .pru_send =             icmp_dgram_send,
+       .pru_shutdown =         rip_shutdown,
+       .pru_sockaddr =         in_getsockaddr,
+       .pru_sosend =           sosend,
+       .pru_soreceive =        soreceive,
 };
 
 /* Like rip_attach but without root privilege enforcement */
 __private_extern__ int
-icmp_dgram_attach(struct socket *so, int proto, struct proc *p)
+icmp_dgram_attach(struct socket *so, __unused int proto, struct proc *p)
 {
         struct inpcb *inp;
-        int error, s;
+        int error;
 
         inp = sotoinpcb(so);
         if (inp)
@@ -965,9 +1095,7 @@ icmp_dgram_attach(struct socket *so, int proto, struct proc *p)
         error = soreserve(so, rip_sendspace, rip_recvspace);
         if (error)
                 return error;
-        s = splnet();
         error = in_pcballoc(so, &ripcbinfo, p);
-        splx(s);
         if (error)
                 return error;
         inp = (struct inpcb *)so->so_pcb;       
@@ -983,8 +1111,7 @@ icmp_dgram_attach(struct socket *so, int proto, struct proc *p)
 __private_extern__ int
 icmp_dgram_ctloutput(struct socket *so, struct sockopt *sopt)
 {
-       struct  inpcb *inp = sotoinpcb(so);
-       int     error, optval;
+       int     error;
 
        if (sopt->sopt_level != IPPROTO_IP)
                return (EINVAL);
@@ -999,6 +1126,7 @@ icmp_dgram_ctloutput(struct socket *so, struct sockopt *sopt)
                case IP_RECVDSTADDR:
                case IP_RETOPTS:
                case IP_MULTICAST_IF:
+               case IP_MULTICAST_IFINDEX:
                case IP_MULTICAST_TTL:
                case IP_MULTICAST_LOOP:
                case IP_ADD_MEMBERSHIP:
@@ -1007,13 +1135,16 @@ icmp_dgram_ctloutput(struct socket *so, struct sockopt *sopt)
                case IP_PORTRANGE:
                case IP_RECVIF:
                case IP_IPSEC_POLICY:
-#if defined(NFAITH) && NFAITH > 0
-               case IP_FAITH:
-#endif
                case IP_STRIPHDR:
+               case IP_RECVTTL:
+               case IP_BOUND_IF:
+#if CONFIG_FORCE_OUT_IFP
+                case IP_FORCE_OUT_IFP:
+#endif
+               case IP_NO_IFT_CELLULAR:
                        error = rip_ctloutput(so, sopt);
                        break;
-               
+
                default:
                        error = EINVAL;
                        break;
@@ -1023,8 +1154,8 @@ icmp_dgram_ctloutput(struct socket *so, struct sockopt *sopt)
 }
 
 __private_extern__ int
-icmp_dgram_send(struct socket *so, int flags, struct mbuf *m, struct sockaddr *nam,
-         struct mbuf *control, struct proc *p)
+icmp_dgram_send(struct socket *so, int flags, struct mbuf *m,
+    struct sockaddr *nam, struct mbuf *control, struct proc *p)
 {
        struct ip *ip;
        struct inpcb *inp = sotoinpcb(so);
@@ -1032,10 +1163,24 @@ icmp_dgram_send(struct socket *so, int flags, struct mbuf *m, struct sockaddr *n
        struct icmp *icp;
         struct in_ifaddr *ia = NULL;
        int icmplen;
+       int error = EINVAL;
+
+       if (inp == NULL
+#if NECP
+               || (necp_socket_should_use_flow_divert(inp))
+#endif /* NECP */
+               ) {
+               if (inp != NULL)
+                       error = EPROTOTYPE;
+               goto bad;
+       }
 
        if ((inp->inp_flags & INP_HDRINCL) != 0) {
+               /* Expect 32-bit aligned data ptr on strict-align platforms */
+               MBUF_STRICT_DATA_ALIGNMENT_CHECK_32(m);
                /*
-                * This is not raw IP, we liberal only for fields TOS, id and TTL 
+                * This is not raw IP, we liberal only for fields TOS,
+                * id and TTL.
                 */
                ip = mtod(m, struct ip *);
 
@@ -1047,30 +1192,47 @@ icmp_dgram_send(struct socket *so, int flags, struct mbuf *m, struct sockaddr *n
                /* Only IPv4 */
                if (IP_VHL_V(ip->ip_vhl) != 4)
                        goto bad;
-               if (hlen < 20 || hlen > 40 || ip->ip_len != m->m_pkthdr.len ||
-                       ip->ip_len > 65535)
+               if (hlen < 20 || hlen > 40 || ip->ip_len != m->m_pkthdr.len)
                        goto bad;
-               /* Bogus fragments can tie up peer resources */ 
-               if (ip->ip_off != 0)
+               /* Bogus fragments can tie up peer resources */
+               if ((ip->ip_off & ~IP_DF) !=  0)
                        goto bad;
                /* Allow only ICMP even for user provided IP header */
                if (ip->ip_p != IPPROTO_ICMP)
                        goto bad;
-               /* To prevent spoofing, specified source address must be one of ours */
+               /*
+                * To prevent spoofing, specified source address must
+                * be one of ours.
+                */
                if (ip->ip_src.s_addr != INADDR_ANY) {
-                       if (TAILQ_EMPTY(&in_ifaddrhead))
+                       socket_unlock(so, 0);
+                       lck_rw_lock_shared(in_ifaddr_rwlock);
+                       if (TAILQ_EMPTY(&in_ifaddrhead)) {
+                               lck_rw_done(in_ifaddr_rwlock);
+                               socket_lock(so, 0);
                                goto bad;
-                       TAILQ_FOREACH(ia, &in_ifaddrhead, ia_link) {
-                               if (IA_SIN(ia)->sin_addr.s_addr == ip->ip_src.s_addr)
+                       }
+                       TAILQ_FOREACH(ia, INADDR_HASH(ip->ip_src.s_addr),
+                           ia_hash) {
+                               IFA_LOCK(&ia->ia_ifa);
+                               if (IA_SIN(ia)->sin_addr.s_addr ==
+                                   ip->ip_src.s_addr) {
+                                       IFA_UNLOCK(&ia->ia_ifa);
+                                       lck_rw_done(in_ifaddr_rwlock);
+                                       socket_lock(so, 0);
                                        goto ours;
+                               }
+                               IFA_UNLOCK(&ia->ia_ifa);
                        }
+                       lck_rw_done(in_ifaddr_rwlock);
+                       socket_lock(so, 0);
                        goto bad;
                }
 ours:
                /* Do not trust we got a valid checksum */
                ip->ip_sum = 0;
-               
-               icp = (struct icmp *)(((char *)m->m_data) + hlen);
+
+               icp = (struct icmp *)(void *)(((char *)m->m_data) + hlen);
                icmplen = m->m_pkthdr.len - hlen;
        } else {
                if ((icmplen = m->m_pkthdr.len) < ICMP_MINLEN) {
@@ -1097,11 +1259,16 @@ ours:
                default:
                        goto bad;
        }
-       return rip_send(so, flags, m, nam, control, p);
+       return (rip_send(so, flags, m, nam, control, p));
 bad:
-       m_freem(m);
-       return EINVAL;
+       VERIFY(error != 0);
+
+       if (m != NULL)
+               m_freem(m);
+       if (control != NULL)
+               m_freem(control);
+
+       return (error);
 }
 
 #endif /* __APPLE__ */
-