X-Git-Url: https://git.saurik.com/apple/xnu.git/blobdiff_plain/8f6c56a50524aa785f7e596d52dddfb331e18961..6d2010ae8f7a6078e10b361c6962983bab233e0f:/bsd/netinet/in_cksum.c

diff --git a/bsd/netinet/in_cksum.c b/bsd/netinet/in_cksum.c
index 997585bbf..1fcafd583 100644
--- a/bsd/netinet/in_cksum.c
+++ b/bsd/netinet/in_cksum.c
@@ -1,5 +1,5 @@
 /*
- * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
+ * Copyright (c) 2000-2009 Apple Inc. All rights reserved.
  *
  * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
  * 
@@ -63,6 +63,10 @@
 #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))
 
@@ -80,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                                                          \
     {                                                                     \
@@ -106,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);
 
-__inline unsigned short
+u_int16_t
+inet_cksum_simple(struct mbuf *m, int len)
+{
+	return (inet_cksum(m, 0, 0, len));
+}
+
+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;
@@ -131,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
 
-	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;
+extern int cpu_in_cksum(struct mbuf *m, int len, int off, uint32_t initial_sum);
 
-		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;
@@ -378,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;
@@ -433,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