]> git.saurik.com Git - apple/xnu.git/blobdiff - bsd/netinet/in_cksum.c
xnu-1699.22.73.tar.gz
[apple/xnu.git] / bsd / netinet / in_cksum.c
index efaaea5b43ef3d13e14345a405621e62d544daed..1fcafd5837e2d3c40ba8402207870989153de134 100644 (file)
@@ -1,31 +1,29 @@
 /*
- * Copyright (c) 2006 Apple Computer, Inc. All Rights Reserved.
+ * Copyright (c) 2000-2009 Apple Inc. All rights reserved.
+ *
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
  * 
- * @APPLE_LICENSE_OSREFERENCE_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. 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.
  * 
- * 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.  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 
- * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES, 
- * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, 
- * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT. 
- * Please see the License for the specific language governing rights and 
+ * 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
+ * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
+ * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
+ * Please see the License for the specific language governing rights and
  * limitations under the License.
- *
- * @APPLE_LICENSE_OSREFERENCE_HEADER_END@
+ * 
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
  */
 /*
  * Copyright (c) 1988, 1992, 1993
 #include <sys/param.h>
 #include <sys/mbuf.h>
 #include <sys/kdebug.h>
+#include <kern/debug.h>
+#include <netinet/in.h>
+#include <netinet/ip.h>
+#include <libkern/libkern.h>
 
 #define DBG_FNC_IN_CKSUM       NETDBG_CODE(DBG_NETIP, (3 << 8))
 
@@ -82,16 +84,16 @@ union s_util {
 
 union l_util {
         u_int16_t s[2];
-        u_int32_t l;   
+        u_int32_t l;
 };
 
 union q_util {
         u_int16_t s[4];
         u_int32_t l[2];
         u_int64_t q;
-};    
+};
 
-#define ADDCARRY(x)  (x > 65535 ? x -= 65535 : x)
+#define ADDCARRY(x)  do { if (x > 65535) { x -= 65535; } } while (0)
 
 #define REDUCE32                                                          \
     {                                                                     \
@@ -108,24 +110,30 @@ union q_util {
 
 #define REDUCE {l_util.l = sum; sum = l_util.s[0] + l_util.s[1]; ADDCARRY(sum);}
 
-                
-#if defined(ppc)
+u_int16_t inet_cksum_simple(struct mbuf *, int);
+
+u_int16_t
+inet_cksum_simple(struct mbuf *m, int len)
+{
+       return (inet_cksum(m, 0, 0, len));
+}
 
-__inline unsigned short
+u_short
 in_addword(u_short a, u_short b)
 {
-        union l_util l_util;   
+        union l_util l_util;
        u_int32_t sum = a + b;
+
        REDUCE;
        return (sum);
 }
 
-__inline unsigned short
+u_short
 in_pseudo(u_int a, u_int b, u_int c)
 {
         u_int64_t sum;
         union q_util q_util;
-        union l_util l_util;   
+        union l_util l_util;
 
         sum = (u_int64_t) a + b + c;
         REDUCE16;
@@ -133,233 +141,81 @@ in_pseudo(u_int a, u_int b, u_int c)
 
 }
 
-int
-in_cksum(m, len)
-       register struct mbuf *m;
-       register int len;
-{
-       register u_short *w;
-       register int sum = 0;
-       register int mlen = 0;
-       int starting_on_odd  = 0;
+#if defined(__arm__) && __ARM_ARCH__ >= 6
 
+extern int cpu_in_cksum(struct mbuf *m, int len, int off, uint32_t initial_sum);
 
-       KERNEL_DEBUG(DBG_FNC_IN_CKSUM | DBG_FUNC_START, len,0,0,0,0);
-
-       for (;m && len; m = m->m_next) {
-               if (m->m_len == 0)
-                       continue;
-               mlen = m->m_len;
-               w = mtod(m, u_short *);
-
-               if (len < mlen)
-                       mlen = len;
-
-               sum = xsum_assym(w, mlen, sum, starting_on_odd);
-               len -= mlen;
-               if (mlen & 0x1)
-               {
-                   if (starting_on_odd)
-                       starting_on_odd = 0;
-                   else
-                       starting_on_odd = 1;
-               }
-       }
-
-       KERNEL_DEBUG(DBG_FNC_IN_CKSUM | DBG_FUNC_END, 0,0,0,0,0);
-       return (~sum & 0xffff);
-}
-
-u_short
-in_cksum_skip(m, len, skip)
-        register struct mbuf *m;
-        register int len;
-        register int skip;
+u_int16_t
+inet_cksum(struct mbuf *m, unsigned int nxt, unsigned int skip,
+    unsigned int len)
 {
-       register u_short *w;
-       register int sum = 0;
-       register int mlen = 0;
-       int starting_on_odd  = 0;
-
-       len -= skip;
-        for (; skip && m; m = m->m_next) {
-                if (m->m_len > skip) {
-                        mlen = m->m_len - skip;
-                       w = (u_short *)(m->m_data+skip);
-                        goto skip_start;
-                } else {    
-                        skip -= m->m_len;
-                }
-        }
-       for (;m && len; m = m->m_next) {
-               if (m->m_len == 0)
-                       continue;
-               mlen = m->m_len;
-               w = mtod(m, u_short *);
+       u_int32_t sum = 0;
 
-skip_start:
-               if (len < mlen)
-                       mlen = len;
-               sum = xsum_assym(w, mlen, sum, starting_on_odd);
-               len -= mlen;
-               if (mlen & 0x1)
-               {
-                   if (starting_on_odd)
-                       starting_on_odd = 0;
-                   else
-                       starting_on_odd = 1;
-               }
+       /* sanity check */
+       if ((m->m_flags & M_PKTHDR) && m->m_pkthdr.len < skip + len) {
+               panic("inet_cksum: mbuf len (%d) < off+len (%d+%d)\n",
+                   m->m_pkthdr.len, skip, len);
        }
 
-       return (~sum & 0xffff);
-}
-#else
+       /* include pseudo header checksum? */
+       if (nxt != 0) {
+               struct ip *iph;
 
-u_short 
-in_addword(u_short a, u_short b)
-{       
-        union l_util l_util;   
-        u_int32_t sum = a + b;
-        REDUCE(sum);
-        return (sum);
-}       
+               if (m->m_len < sizeof (struct ip))
+                       panic("inet_cksum: bad mbuf chain");
 
-u_short
-in_pseudo(u_int a, u_int b, u_int c)
-{
-        u_int64_t sum;  
-        union q_util q_util;
-        union l_util l_util;   
+               iph = mtod(m, struct ip *);
+               sum = in_pseudo(iph->ip_src.s_addr, iph->ip_dst.s_addr,
+                   htonl(len + nxt));
+       }
 
-        sum = (u_int64_t) a + b + c;
-        REDUCE16;
-        return (sum);
+       return (cpu_in_cksum(m, len, skip, sum));
 }
 
+#else
 
-int
-in_cksum(m, len)
-       register struct mbuf *m;
-       register int len;
+u_int16_t
+inet_cksum(struct mbuf *m, unsigned int nxt, unsigned int skip,
+    unsigned int len)
 {
-       register u_short *w;
-       register int sum = 0;
-       register int mlen = 0;
+       u_short *w;
+       u_int32_t sum = 0;
+       int mlen = 0;
        int byte_swapped = 0;
        union s_util s_util;
-       union l_util l_util;   
+       union l_util l_util;
 
        KERNEL_DEBUG(DBG_FNC_IN_CKSUM | DBG_FUNC_START, len,0,0,0,0);
 
-       for (;m && len; m = m->m_next) {
-               if (m->m_len == 0)
-                       continue;
-               w = mtod(m, u_short *);
-               if (mlen == -1) {
-                       /*
-                        * The first byte of this mbuf is the continuation
-                        * of a word spanning between this mbuf and the
-                        * last mbuf.
-                        *
-                        * s_util.c[0] is already saved when scanning previous
-                        * mbuf.
-                        */
-                       s_util.c[1] = *(char *)w;
-                       sum += s_util.s;
-                       w = (u_short *)((char *)w + 1);
-                       mlen = m->m_len - 1;
-                       len--;
-               } else
-                       mlen = m->m_len;
-               if (len < mlen)
-                       mlen = len;
-               len -= mlen;
-               /*
-                * Force to even boundary.
-                */
-               if ((1 & (int) w) && (mlen > 0)) {
-                       REDUCE;
-                       sum <<= 8;
-                       s_util.c[0] = *(u_char *)w;
-                       w = (u_short *)((char *)w + 1);
-                       mlen--;
-                       byte_swapped = 1;
-               }
-               /*
-                * Unroll the loop to make overhead from
-                * branches &c small.
-                */
-               while ((mlen -= 32) >= 0) {
-                       sum += w[0]; sum += w[1]; sum += w[2]; sum += w[3];
-                       sum += w[4]; sum += w[5]; sum += w[6]; sum += w[7];
-                       sum += w[8]; sum += w[9]; sum += w[10]; sum += w[11];
-                       sum += w[12]; sum += w[13]; sum += w[14]; sum += w[15];
-                       w += 16;
-               }
-               mlen += 32;
-               while ((mlen -= 8) >= 0) {
-                       sum += w[0]; sum += w[1]; sum += w[2]; sum += w[3];
-                       w += 4;
-               }
-               mlen += 8;
-               if (mlen == 0 && byte_swapped == 0)
-                       continue;
-               REDUCE;
-               while ((mlen -= 2) >= 0) {
-                       sum += *w++;
-               }
-               if (byte_swapped) {
-                       REDUCE;
-                       sum <<= 8;
-                       byte_swapped = 0;
-                       if (mlen == -1) {
-                               s_util.c[1] = *(char *)w;
-                               sum += s_util.s;
-                               mlen = 0;
-                       } else
-                               mlen = -1;
-               } else if (mlen == -1)
-                       s_util.c[0] = *(char *)w;
-       }
-       if (len)
-               printf("cksum: out of data\n");
-       if (mlen == -1) {
-               /* The last mbuf has odd # of bytes. Follow the
-                  standard (the odd byte may be shifted left by 8 bits
-                  or not as determined by endian-ness of the machine) */
-               s_util.c[1] = 0;
-               sum += s_util.s;
+       /* sanity check */
+       if ((m->m_flags & M_PKTHDR) && m->m_pkthdr.len < skip + len) {
+               panic("inet_cksum: mbuf len (%d) < off+len (%d+%d)\n",
+                   m->m_pkthdr.len, skip, len);
        }
-       REDUCE;
-       KERNEL_DEBUG(DBG_FNC_IN_CKSUM | DBG_FUNC_END, 0,0,0,0,0);
-       return (~sum & 0xffff);
-}
 
-int
-in_cksum_skip(m, len, skip)
-       register struct mbuf *m;
-       register u_short len;
-       register u_short skip;
-{
-       register u_short *w;
-       register int sum = 0;
-       register int mlen = 0;
-       int byte_swapped = 0;
-       union s_util s_util;
-       union l_util l_util;   
+       /* include pseudo header checksum? */
+       if (nxt != 0) {
+               struct ip *iph;
 
-       KERNEL_DEBUG(DBG_FNC_IN_CKSUM | DBG_FUNC_START, len,0,0,0,0);
+               if (m->m_len < sizeof (struct ip))
+                       panic("inet_cksum: bad mbuf chain");
+
+               iph = mtod(m, struct ip *);
+               sum = in_pseudo(iph->ip_src.s_addr, iph->ip_dst.s_addr,
+                   htonl(len + nxt));
+       }
 
-       len -= skip;
-        for (; skip && m; m = m->m_next) {
-                if (m->m_len > skip) {
-                        mlen = m->m_len - skip;
-                       w = (u_short *)(m->m_data+skip);
-                        goto skip_start;
-                } else {    
-                        skip -= m->m_len;
-                }
-        }
+       if (skip != 0) {
+               for (; skip && m; m = m->m_next) {
+                       if (m->m_len > skip) {
+                               mlen = m->m_len - skip;
+                               w = (u_short *)(m->m_data+skip);
+                               goto skip_start;
+                       } else {
+                               skip -= m->m_len;
+                       }
+               }
+       }
        for (;m && len; m = m->m_next) {
                if (m->m_len == 0)
                        continue;
@@ -380,17 +236,17 @@ in_cksum_skip(m, len, skip)
                        mlen = m->m_len - 1;
                        len--;
                } else {
-                 mlen = m->m_len;
+                       mlen = m->m_len;
                }
 skip_start:
                if (len < mlen)
-                   mlen = len;
+                       mlen = len;
 
                len -= mlen;
                /*
                 * Force to even boundary.
                 */
-               if ((1 & (int) w) && (mlen > 0)) {
+               if ((1 & (uintptr_t) w) && (mlen > 0)) {
                        REDUCE;
                        sum <<= 8;
                        s_util.c[0] = *(u_char *)w;
@@ -435,7 +291,7 @@ skip_start:
                        s_util.c[0] = *(char *)w;
        }
        if (len)
-               printf("cksum: out of data\n");
+               printf("cksum: out of data by %d\n", len);
        if (mlen == -1) {
                /* The last mbuf has odd # of bytes. Follow the
                   standard (the odd byte may be shifted left by 8 bits