1 /* SPDX-License-Identifier: GPL-2.0 */
2 #ifndef _PARISC_CHECKSUM_H
3 #define _PARISC_CHECKSUM_H
4
5 #include <linux/in6.h>
6
7 /*
8 * computes the checksum of a memory block at buff, length len,
9 * and adds in "sum" (32-bit)
10 *
11 * returns a 32-bit number suitable for feeding into itself
12 * or csum_tcpudp_magic
13 *
14 * this function must be called with even lengths, except
15 * for the last fragment, which may be odd
16 *
17 * it's best to have buff aligned on a 32-bit boundary
18 */
19 extern __wsum csum_partial(const void *, int, __wsum);
20
21 /*
22 * Optimized for IP headers, which always checksum on 4 octet boundaries.
23 *
24 * Written by Randolph Chung <tausq@debian.org>, and then mucked with by
25 * LaMont Jones <lamont@debian.org>
26 */
ip_fast_csum(const void * iph,unsigned int ihl)27 static inline __sum16 ip_fast_csum(const void *iph, unsigned int ihl)
28 {
29 unsigned int sum;
30 unsigned long t0, t1, t2;
31
32 __asm__ __volatile__ (
33 " ldws,ma 4(%1), %0\n"
34 " addib,<= -4, %2, 2f\n"
35 "\n"
36 " ldws 4(%1), %4\n"
37 " ldws 8(%1), %5\n"
38 " add %0, %4, %0\n"
39 " ldws,ma 12(%1), %3\n"
40 " addc %0, %5, %0\n"
41 " addc %0, %3, %0\n"
42 "1: ldws,ma 4(%1), %3\n"
43 " addib,< 0, %2, 1b\n"
44 " addc %0, %3, %0\n"
45 "\n"
46 " extru %0, 31, 16, %4\n"
47 " extru %0, 15, 16, %5\n"
48 " addc %4, %5, %0\n"
49 " extru %0, 15, 16, %5\n"
50 " add %0, %5, %0\n"
51 " subi -1, %0, %0\n"
52 "2:\n"
53 : "=r" (sum), "=r" (iph), "=r" (ihl), "=r" (t0), "=r" (t1), "=r" (t2)
54 : "1" (iph), "2" (ihl)
55 : "memory");
56
57 return (__force __sum16)sum;
58 }
59
60 /*
61 * Fold a partial checksum
62 */
csum_fold(__wsum csum)63 static inline __sum16 csum_fold(__wsum csum)
64 {
65 u32 sum = (__force u32)csum;
66 /* add the swapped two 16-bit halves of sum,
67 a possible carry from adding the two 16-bit halves,
68 will carry from the lower half into the upper half,
69 giving us the correct sum in the upper half. */
70 sum += (sum << 16) + (sum >> 16);
71 return (__force __sum16)(~sum >> 16);
72 }
73
csum_tcpudp_nofold(__be32 saddr,__be32 daddr,__u32 len,__u8 proto,__wsum sum)74 static inline __wsum csum_tcpudp_nofold(__be32 saddr, __be32 daddr,
75 __u32 len, __u8 proto,
76 __wsum sum)
77 {
78 __asm__(
79 " add %1, %0, %0\n"
80 " addc %2, %0, %0\n"
81 " addc %3, %0, %0\n"
82 " addc %%r0, %0, %0\n"
83 : "=r" (sum)
84 : "r" (daddr), "r"(saddr), "r"(proto+len), "0"(sum));
85 return sum;
86 }
87
88 /*
89 * computes the checksum of the TCP/UDP pseudo-header
90 * returns a 16-bit checksum, already complemented
91 */
csum_tcpudp_magic(__be32 saddr,__be32 daddr,__u32 len,__u8 proto,__wsum sum)92 static inline __sum16 csum_tcpudp_magic(__be32 saddr, __be32 daddr,
93 __u32 len, __u8 proto,
94 __wsum sum)
95 {
96 return csum_fold(csum_tcpudp_nofold(saddr,daddr,len,proto,sum));
97 }
98
99 /*
100 * this routine is used for miscellaneous IP-like checksums, mainly
101 * in icmp.c
102 */
ip_compute_csum(const void * buf,int len)103 static inline __sum16 ip_compute_csum(const void *buf, int len)
104 {
105 return csum_fold (csum_partial(buf, len, 0));
106 }
107
108
109 #define _HAVE_ARCH_IPV6_CSUM
csum_ipv6_magic(const struct in6_addr * saddr,const struct in6_addr * daddr,__u32 len,__u8 proto,__wsum sum)110 static __inline__ __sum16 csum_ipv6_magic(const struct in6_addr *saddr,
111 const struct in6_addr *daddr,
112 __u32 len, __u8 proto,
113 __wsum sum)
114 {
115 unsigned long t0, t1, t2, t3;
116
117 len += proto; /* add 16-bit proto + len */
118
119 __asm__ __volatile__ (
120
121 #if BITS_PER_LONG > 32
122
123 /*
124 ** We can execute two loads and two adds per cycle on PA 8000.
125 ** But add insn's get serialized waiting for the carry bit.
126 ** Try to keep 4 registers with "live" values ahead of the ALU.
127 */
128
129 " ldd,ma 8(%1), %4\n" /* get 1st saddr word */
130 " ldd,ma 8(%2), %5\n" /* get 1st daddr word */
131 " add %4, %0, %0\n"
132 " ldd,ma 8(%1), %6\n" /* 2nd saddr */
133 " ldd,ma 8(%2), %7\n" /* 2nd daddr */
134 " add,dc %5, %0, %0\n"
135 " add,dc %6, %0, %0\n"
136 " add,dc %7, %0, %0\n"
137 " add,dc %3, %0, %0\n" /* fold in proto+len | carry bit */
138 " extrd,u %0, 31, 32, %4\n"/* copy upper half down */
139 " depdi 0, 31, 32, %0\n"/* clear upper half */
140 " add %4, %0, %0\n" /* fold into 32-bits */
141 " addc 0, %0, %0\n" /* add carry */
142
143 #else
144
145 /*
146 ** For PA 1.x, the insn order doesn't matter as much.
147 ** Insn stream is serialized on the carry bit here too.
148 ** result from the previous operation (eg r0 + x)
149 */
150 " ldw,ma 4(%1), %4\n" /* get 1st saddr word */
151 " ldw,ma 4(%2), %5\n" /* get 1st daddr word */
152 " add %4, %0, %0\n"
153 " ldw,ma 4(%1), %6\n" /* 2nd saddr */
154 " addc %5, %0, %0\n"
155 " ldw,ma 4(%2), %7\n" /* 2nd daddr */
156 " addc %6, %0, %0\n"
157 " ldw,ma 4(%1), %4\n" /* 3rd saddr */
158 " addc %7, %0, %0\n"
159 " ldw,ma 4(%2), %5\n" /* 3rd daddr */
160 " addc %4, %0, %0\n"
161 " ldw,ma 4(%1), %6\n" /* 4th saddr */
162 " addc %5, %0, %0\n"
163 " ldw,ma 4(%2), %7\n" /* 4th daddr */
164 " addc %6, %0, %0\n"
165 " addc %7, %0, %0\n"
166 " addc %3, %0, %0\n" /* fold in proto+len, catch carry */
167
168 #endif
169 : "=r" (sum), "=r" (saddr), "=r" (daddr), "=r" (len),
170 "=r" (t0), "=r" (t1), "=r" (t2), "=r" (t3)
171 : "0" (sum), "1" (saddr), "2" (daddr), "3" (len)
172 : "memory");
173 return csum_fold(sum);
174 }
175
176 #endif
177
178
