blob: c7b213ab01abbc35dc32da97c600351b7b1513cc [file] [log] [blame]
Greg Kroah-Hartmanb2441312017-11-01 15:07:57 +01001/* SPDX-License-Identifier: GPL-2.0 */
Linus Torvalds1da177e2005-04-16 15:20:36 -07002/*
3 * arch/alpha/lib/csum_ipv6_magic.S
4 * Contributed by Richard Henderson <rth@tamu.edu>
5 *
6 * unsigned short csum_ipv6_magic(struct in6_addr *saddr,
7 * struct in6_addr *daddr,
8 * __u32 len,
9 * unsigned short proto,
10 * unsigned int csum);
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070011 *
12 * Misalignment handling (which costs 16 instructions / 8 cycles)
13 * added by Ivan Kokshaysky <ink@jurassic.park.msu.ru>
Linus Torvalds1da177e2005-04-16 15:20:36 -070014 */
15
Al Viro00fc0e02016-01-11 09:51:29 -050016#include <asm/export.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070017 .globl csum_ipv6_magic
18 .align 4
19 .ent csum_ipv6_magic
20 .frame $30,0,$26,0
21csum_ipv6_magic:
22 .prologue 0
23
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070024 ldq_u $0,0($16) # e0 : load src & dst addr words
Linus Torvalds1da177e2005-04-16 15:20:36 -070025 zapnot $20,15,$20 # .. e1 : zero extend incoming csum
26 extqh $18,1,$4 # e0 : byte swap len & proto while we wait
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070027 ldq_u $21,7($16) # .. e1 : handle misalignment
Linus Torvalds1da177e2005-04-16 15:20:36 -070028
29 extbl $18,1,$5 # e0 :
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070030 ldq_u $1,8($16) # .. e1 :
Linus Torvalds1da177e2005-04-16 15:20:36 -070031 extbl $18,2,$6 # e0 :
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070032 ldq_u $22,15($16) # .. e1 :
Linus Torvalds1da177e2005-04-16 15:20:36 -070033
34 extbl $18,3,$18 # e0 :
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070035 ldq_u $2,0($17) # .. e1 :
Linus Torvalds1da177e2005-04-16 15:20:36 -070036 sra $4,32,$4 # e0 :
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070037 ldq_u $23,7($17) # .. e1 :
38
39 extql $0,$16,$0 # e0 :
40 ldq_u $3,8($17) # .. e1 :
41 extqh $21,$16,$21 # e0 :
42 ldq_u $24,15($17) # .. e1 :
43
Linus Torvalds1da177e2005-04-16 15:20:36 -070044 sll $5,16,$5 # e0 :
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070045 or $0,$21,$0 # .. e1 : 1st src word complete
46 extql $1,$16,$1 # e0 :
Linus Torvalds1da177e2005-04-16 15:20:36 -070047 addq $20,$0,$20 # .. e1 : begin summing the words
48
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070049 extqh $22,$16,$22 # e0 :
Linus Torvalds1da177e2005-04-16 15:20:36 -070050 cmpult $20,$0,$0 # .. e1 :
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070051 sll $6,8,$6 # e0 :
52 or $1,$22,$1 # .. e1 : 2nd src word complete
53
54 extql $2,$17,$2 # e0 :
Linus Torvalds1da177e2005-04-16 15:20:36 -070055 or $4,$18,$18 # .. e1 :
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070056 extqh $23,$17,$23 # e0 :
Linus Torvalds1da177e2005-04-16 15:20:36 -070057 or $5,$6,$5 # .. e1 :
Linus Torvalds1da177e2005-04-16 15:20:36 -070058
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070059 extql $3,$17,$3 # e0 :
60 or $2,$23,$2 # .. e1 : 1st dst word complete
61 extqh $24,$17,$24 # e0 :
62 or $18,$5,$18 # .. e1 : len complete
63
64 extwh $19,7,$7 # e0 :
65 or $3,$24,$3 # .. e1 : 2nd dst word complete
66 extbl $19,1,$19 # e0 :
Linus Torvalds1da177e2005-04-16 15:20:36 -070067 addq $20,$1,$20 # .. e1 :
Linus Torvalds1da177e2005-04-16 15:20:36 -070068
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -070069 or $19,$7,$19 # e0 :
70 cmpult $20,$1,$1 # .. e1 :
71 sll $19,48,$19 # e0 :
72 nop # .. e0 :
73
74 sra $19,32,$19 # e0 : proto complete
Linus Torvalds1da177e2005-04-16 15:20:36 -070075 addq $20,$2,$20 # .. e1 :
76 cmpult $20,$2,$2 # e0 :
77 addq $20,$3,$20 # .. e1 :
78
79 cmpult $20,$3,$3 # e0 :
80 addq $20,$18,$20 # .. e1 :
81 cmpult $20,$18,$18 # e0 :
82 addq $20,$19,$20 # .. e1 :
83
84 cmpult $20,$19,$19 # e0 :
85 addq $0,$1,$0 # .. e1 : merge the carries back into the csum
86 addq $2,$3,$2 # e0 :
87 addq $18,$19,$18 # .. e1 :
88
89 addq $0,$2,$0 # e0 :
90 addq $20,$18,$20 # .. e1 :
91 addq $0,$20,$0 # e0 :
92 unop # :
93
94 extwl $0,2,$2 # e0 : begin folding the 64-bit value
95 zapnot $0,3,$3 # .. e1 :
96 extwl $0,4,$1 # e0 :
97 addq $2,$3,$3 # .. e1 :
98
99 extwl $0,6,$0 # e0 :
100 addq $3,$1,$3 # .. e1 :
101 addq $0,$3,$0 # e0 :
102 unop # :
103
104 extwl $0,2,$1 # e0 : fold 18-bit value
105 zapnot $0,3,$0 # .. e1 :
106 addq $0,$1,$0 # e0 :
107 unop # :
108
109 extwl $0,2,$1 # e0 : fold 17-bit value
110 zapnot $0,3,$0 # .. e1 :
111 addq $0,$1,$0 # e0 :
Ivan Kokshaysky58ed2f92007-06-23 17:16:35 -0700112 not $0,$0 # .. e1 : and complement.
Linus Torvalds1da177e2005-04-16 15:20:36 -0700113
114 zapnot $0,3,$0 # e0 :
115 ret # .. e1 :
116
117 .end csum_ipv6_magic
Al Viro00fc0e02016-01-11 09:51:29 -0500118 EXPORT_SYMBOL(csum_ipv6_magic)