2005-04-16 18:20:36 -04:00
|
|
|
#ifndef _S390_CHECKSUM_H
|
|
|
|
#define _S390_CHECKSUM_H
|
|
|
|
|
|
|
|
/*
|
|
|
|
* include/asm-s390/checksum.h
|
|
|
|
* S390 fast network checksum routines
|
|
|
|
* see also arch/S390/lib/checksum.c
|
|
|
|
*
|
|
|
|
* S390 version
|
|
|
|
* Copyright (C) 1999 IBM Deutschland Entwicklung GmbH, IBM Corporation
|
|
|
|
* Author(s): Ulrich Hild (first version)
|
|
|
|
* Martin Schwidefsky (heavily optimized CKSM version)
|
|
|
|
* D.J. Barrow (third attempt)
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <asm/uaccess.h>
|
|
|
|
|
|
|
|
/*
|
|
|
|
* computes the checksum of a memory block at buff, length len,
|
|
|
|
* and adds in "sum" (32-bit)
|
|
|
|
*
|
|
|
|
* returns a 32-bit number suitable for feeding into itself
|
|
|
|
* or csum_tcpudp_magic
|
|
|
|
*
|
|
|
|
* this function must be called with even lengths, except
|
|
|
|
* for the last fragment, which may be odd
|
|
|
|
*
|
|
|
|
* it's best to have buff aligned on a 32-bit boundary
|
|
|
|
*/
|
2006-11-15 00:22:18 -05:00
|
|
|
static inline __wsum
|
|
|
|
csum_partial(const void *buff, int len, __wsum sum)
|
2005-04-16 18:20:36 -04:00
|
|
|
{
|
2006-09-28 10:56:43 -04:00
|
|
|
register unsigned long reg2 asm("2") = (unsigned long) buff;
|
|
|
|
register unsigned long reg3 asm("3") = (unsigned long) len;
|
2005-04-16 18:20:36 -04:00
|
|
|
|
2006-09-28 10:56:43 -04:00
|
|
|
asm volatile(
|
|
|
|
"0: cksm %0,%1\n" /* do checksum on longs */
|
|
|
|
" jo 0b\n"
|
|
|
|
: "+d" (sum), "+d" (reg2), "+d" (reg3) : : "cc", "memory");
|
2005-04-16 18:20:36 -04:00
|
|
|
return sum;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* the same as csum_partial_copy, but copies from user space.
|
|
|
|
*
|
|
|
|
* here even more important to align src and dst on a 32-bit (or even
|
|
|
|
* better 64-bit) boundary
|
|
|
|
*
|
|
|
|
* Copy from userspace and compute checksum. If we catch an exception
|
|
|
|
* then zero the rest of the buffer.
|
|
|
|
*/
|
2006-11-15 00:22:18 -05:00
|
|
|
static inline __wsum
|
|
|
|
csum_partial_copy_from_user(const void __user *src, void *dst,
|
|
|
|
int len, __wsum sum,
|
2005-04-16 18:20:36 -04:00
|
|
|
int *err_ptr)
|
|
|
|
{
|
|
|
|
int missing;
|
|
|
|
|
|
|
|
missing = copy_from_user(dst, src, len);
|
|
|
|
if (missing) {
|
|
|
|
memset(dst + len - missing, 0, missing);
|
|
|
|
*err_ptr = -EFAULT;
|
|
|
|
}
|
|
|
|
|
|
|
|
return csum_partial(dst, len, sum);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2006-11-15 00:22:18 -05:00
|
|
|
static inline __wsum
|
|
|
|
csum_partial_copy_nocheck (const void *src, void *dst, int len, __wsum sum)
|
2005-04-16 18:20:36 -04:00
|
|
|
{
|
|
|
|
memcpy(dst,src,len);
|
2006-09-28 10:56:43 -04:00
|
|
|
return csum_partial(dst, len, sum);
|
2005-04-16 18:20:36 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Fold a partial checksum without adding pseudo headers
|
|
|
|
*/
|
2006-11-15 00:22:18 -05:00
|
|
|
static inline __sum16 csum_fold(__wsum sum)
|
2005-04-16 18:20:36 -04:00
|
|
|
{
|
|
|
|
#ifndef __s390x__
|
|
|
|
register_pair rp;
|
|
|
|
|
2006-09-28 10:56:43 -04:00
|
|
|
asm volatile(
|
|
|
|
" slr %N1,%N1\n" /* %0 = H L */
|
|
|
|
" lr %1,%0\n" /* %0 = H L, %1 = H L 0 0 */
|
|
|
|
" srdl %1,16\n" /* %0 = H L, %1 = 0 H L 0 */
|
|
|
|
" alr %1,%N1\n" /* %0 = H L, %1 = L H L 0 */
|
|
|
|
" alr %0,%1\n" /* %0 = H+L+C L+H */
|
|
|
|
" srl %0,16\n" /* %0 = H+L+C */
|
|
|
|
: "+&d" (sum), "=d" (rp) : : "cc");
|
2005-04-16 18:20:36 -04:00
|
|
|
#else /* __s390x__ */
|
2006-09-28 10:56:43 -04:00
|
|
|
asm volatile(
|
|
|
|
" sr 3,3\n" /* %0 = H*65536 + L */
|
|
|
|
" lr 2,%0\n" /* %0 = H L, 2/3 = H L / 0 0 */
|
|
|
|
" srdl 2,16\n" /* %0 = H L, 2/3 = 0 H / L 0 */
|
|
|
|
" alr 2,3\n" /* %0 = H L, 2/3 = L H / L 0 */
|
|
|
|
" alr %0,2\n" /* %0 = H+L+C L+H */
|
|
|
|
" srl %0,16\n" /* %0 = H+L+C */
|
2005-04-16 18:20:36 -04:00
|
|
|
: "+&d" (sum) : : "cc", "2", "3");
|
|
|
|
#endif /* __s390x__ */
|
2006-11-15 00:22:18 -05:00
|
|
|
return (__force __sum16) ~sum;
|
2005-04-16 18:20:36 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* This is a version of ip_compute_csum() optimized for IP headers,
|
|
|
|
* which always checksum on 4 octet boundaries.
|
|
|
|
*
|
|
|
|
*/
|
2006-11-15 00:22:18 -05:00
|
|
|
static inline __sum16 ip_fast_csum(const void *iph, unsigned int ihl)
|
2005-04-16 18:20:36 -04:00
|
|
|
{
|
2006-09-28 10:56:43 -04:00
|
|
|
return csum_fold(csum_partial(iph, ihl*4, 0));
|
2005-04-16 18:20:36 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* computes the checksum of the TCP/UDP pseudo-header
|
|
|
|
* returns a 32-bit checksum
|
|
|
|
*/
|
2006-11-15 00:22:18 -05:00
|
|
|
static inline __wsum
|
|
|
|
csum_tcpudp_nofold(__be32 saddr, __be32 daddr,
|
2005-04-16 18:20:36 -04:00
|
|
|
unsigned short len, unsigned short proto,
|
2006-11-15 00:22:18 -05:00
|
|
|
__wsum sum)
|
2005-04-16 18:20:36 -04:00
|
|
|
{
|
|
|
|
#ifndef __s390x__
|
2006-09-28 10:56:43 -04:00
|
|
|
asm volatile(
|
|
|
|
" alr %0,%1\n" /* sum += saddr */
|
|
|
|
" brc 12,0f\n"
|
|
|
|
" ahi %0,1\n" /* add carry */
|
2005-04-16 18:20:36 -04:00
|
|
|
"0:"
|
2006-09-28 10:56:43 -04:00
|
|
|
: "+&d" (sum) : "d" (saddr) : "cc");
|
|
|
|
asm volatile(
|
|
|
|
" alr %0,%1\n" /* sum += daddr */
|
|
|
|
" brc 12,1f\n"
|
|
|
|
" ahi %0,1\n" /* add carry */
|
2005-04-16 18:20:36 -04:00
|
|
|
"1:"
|
2006-09-28 10:56:43 -04:00
|
|
|
: "+&d" (sum) : "d" (daddr) : "cc");
|
|
|
|
asm volatile(
|
2006-11-15 00:22:18 -05:00
|
|
|
" alr %0,%1\n" /* sum += len + proto */
|
2006-09-28 10:56:43 -04:00
|
|
|
" brc 12,2f\n"
|
|
|
|
" ahi %0,1\n" /* add carry */
|
2005-04-16 18:20:36 -04:00
|
|
|
"2:"
|
|
|
|
: "+&d" (sum)
|
2006-11-15 00:22:18 -05:00
|
|
|
: "d" (len + proto)
|
2006-09-28 10:56:43 -04:00
|
|
|
: "cc");
|
2005-04-16 18:20:36 -04:00
|
|
|
#else /* __s390x__ */
|
2006-09-28 10:56:43 -04:00
|
|
|
asm volatile(
|
|
|
|
" lgfr %0,%0\n"
|
|
|
|
" algr %0,%1\n" /* sum += saddr */
|
|
|
|
" brc 12,0f\n"
|
|
|
|
" aghi %0,1\n" /* add carry */
|
|
|
|
"0: algr %0,%2\n" /* sum += daddr */
|
|
|
|
" brc 12,1f\n"
|
|
|
|
" aghi %0,1\n" /* add carry */
|
2006-11-15 00:22:18 -05:00
|
|
|
"1: algfr %0,%3\n" /* sum += len + proto */
|
2006-09-28 10:56:43 -04:00
|
|
|
" brc 12,2f\n"
|
|
|
|
" aghi %0,1\n" /* add carry */
|
|
|
|
"2: srlg 0,%0,32\n"
|
|
|
|
" alr %0,0\n" /* fold to 32 bits */
|
|
|
|
" brc 12,3f\n"
|
|
|
|
" ahi %0,1\n" /* add carry */
|
|
|
|
"3: llgfr %0,%0"
|
2005-04-16 18:20:36 -04:00
|
|
|
: "+&d" (sum)
|
|
|
|
: "d" (saddr), "d" (daddr),
|
2006-11-15 00:22:18 -05:00
|
|
|
"d" (len + proto)
|
2006-09-28 10:56:43 -04:00
|
|
|
: "cc", "0");
|
2005-04-16 18:20:36 -04:00
|
|
|
#endif /* __s390x__ */
|
|
|
|
return sum;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* computes the checksum of the TCP/UDP pseudo-header
|
|
|
|
* returns a 16-bit checksum, already complemented
|
|
|
|
*/
|
|
|
|
|
2006-11-15 00:22:18 -05:00
|
|
|
static inline __sum16
|
|
|
|
csum_tcpudp_magic(__be32 saddr, __be32 daddr,
|
2005-04-16 18:20:36 -04:00
|
|
|
unsigned short len, unsigned short proto,
|
2006-11-15 00:22:18 -05:00
|
|
|
__wsum sum)
|
2005-04-16 18:20:36 -04:00
|
|
|
{
|
|
|
|
return csum_fold(csum_tcpudp_nofold(saddr,daddr,len,proto,sum));
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* this routine is used for miscellaneous IP-like checksums, mainly
|
|
|
|
* in icmp.c
|
|
|
|
*/
|
|
|
|
|
2006-11-15 00:22:18 -05:00
|
|
|
static inline __sum16 ip_compute_csum(const void *buff, int len)
|
2005-04-16 18:20:36 -04:00
|
|
|
{
|
|
|
|
return csum_fold(csum_partial(buff, len, 0));
|
|
|
|
}
|
|
|
|
|
|
|
|
#endif /* _S390_CHECKSUM_H */
|
|
|
|
|
|
|
|
|