| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1 | /* | 
 | 2 |  * This file is subject to the terms and conditions of the GNU General Public | 
 | 3 |  * License.  See the file "COPYING" in the main directory of this archive | 
 | 4 |  * for more details. | 
 | 5 |  * | 
 | 6 |  * Quick'n'dirty IP checksum ... | 
 | 7 |  * | 
 | 8 |  * Copyright (C) 1998, 1999 Ralf Baechle | 
 | 9 |  * Copyright (C) 1999 Silicon Graphics, Inc. | 
 | 10 |  */ | 
 | 11 | #include <asm/asm.h> | 
 | 12 | #include <asm/regdef.h> | 
 | 13 |  | 
 | 14 | #define ADDC(sum,reg)						\ | 
 | 15 | 	addu	sum, reg;					\ | 
 | 16 | 	sltu	v1, sum, reg;					\ | 
 | 17 | 	addu	sum, v1 | 
 | 18 |  | 
 | 19 | #define CSUM_BIGCHUNK(src, offset, sum, t0, t1, t2, t3)		\ | 
 | 20 | 	lw	t0, (offset + 0x00)(src);			\ | 
 | 21 | 	lw	t1, (offset + 0x04)(src);			\ | 
 | 22 | 	lw	t2, (offset + 0x08)(src); 			\ | 
 | 23 | 	lw	t3, (offset + 0x0c)(src); 			\ | 
 | 24 | 	ADDC(sum, t0);						\ | 
 | 25 | 	ADDC(sum, t1);						\ | 
 | 26 | 	ADDC(sum, t2);						\ | 
 | 27 | 	ADDC(sum, t3);						\ | 
 | 28 | 	lw	t0, (offset + 0x10)(src);			\ | 
 | 29 | 	lw	t1, (offset + 0x14)(src);			\ | 
 | 30 | 	lw	t2, (offset + 0x18)(src);			\ | 
 | 31 | 	lw	t3, (offset + 0x1c)(src);			\ | 
 | 32 | 	ADDC(sum, t0);						\ | 
 | 33 | 	ADDC(sum, t1);						\ | 
 | 34 | 	ADDC(sum, t2);						\ | 
 | 35 | 	ADDC(sum, t3);						\ | 
 | 36 |  | 
 | 37 | /* | 
 | 38 |  * a0: source address | 
 | 39 |  * a1: length of the area to checksum | 
 | 40 |  * a2: partial checksum | 
 | 41 |  */ | 
 | 42 |  | 
 | 43 | #define src a0 | 
 | 44 | #define sum v0 | 
 | 45 |  | 
 | 46 | 	.text | 
 | 47 | 	.set	noreorder | 
 | 48 |  | 
 | 49 | /* unknown src alignment and < 8 bytes to go  */ | 
 | 50 | small_csumcpy: | 
 | 51 | 	move	a1, ta2 | 
 | 52 |  | 
 | 53 | 	andi	ta0, a1, 4 | 
 | 54 | 	beqz	ta0, 1f | 
 | 55 | 	 andi	ta0, a1, 2 | 
 | 56 |  | 
 | 57 | 	/* Still a full word to go  */ | 
 | 58 | 	ulw	ta1, (src) | 
 | 59 | 	daddiu	src, 4 | 
 | 60 | 	ADDC(sum, ta1) | 
 | 61 |  | 
 | 62 | 1:	move	ta1, zero | 
 | 63 | 	beqz	ta0, 1f | 
 | 64 | 	 andi	ta0, a1, 1 | 
 | 65 |  | 
 | 66 | 	/* Still a halfword to go  */ | 
 | 67 | 	ulhu	ta1, (src) | 
 | 68 | 	daddiu	src, 2 | 
 | 69 |  | 
 | 70 | 1:	beqz	ta0, 1f | 
 | 71 | 	 sll	ta1, ta1, 16 | 
 | 72 |  | 
 | 73 | 	lbu	ta2, (src) | 
 | 74 | 	 nop | 
 | 75 |  | 
 | 76 | #ifdef __MIPSEB__ | 
 | 77 | 	sll	ta2, ta2, 8 | 
 | 78 | #endif | 
 | 79 | 	or	ta1, ta2 | 
 | 80 |  | 
 | 81 | 1:	ADDC(sum, ta1) | 
 | 82 |  | 
 | 83 | 	/* fold checksum */ | 
 | 84 | 	sll	v1, sum, 16 | 
 | 85 | 	addu	sum, v1 | 
 | 86 | 	sltu	v1, sum, v1 | 
 | 87 | 	srl	sum, sum, 16 | 
 | 88 | 	addu	sum, v1 | 
 | 89 |  | 
 | 90 | 	/* odd buffer alignment? */ | 
 | 91 | 	beqz	t3, 1f | 
 | 92 | 	 nop | 
 | 93 | 	sll	v1, sum, 8 | 
 | 94 | 	srl	sum, sum, 8 | 
 | 95 | 	or	sum, v1 | 
 | 96 | 	andi	sum, 0xffff | 
 | 97 | 1: | 
 | 98 | 	.set	reorder | 
 | 99 | 	/* Add the passed partial csum.  */ | 
 | 100 | 	ADDC(sum, a2) | 
 | 101 | 	jr	ra | 
 | 102 | 	.set	noreorder | 
 | 103 |  | 
 | 104 | /* ------------------------------------------------------------------------- */ | 
 | 105 |  | 
 | 106 | 	.align	5 | 
 | 107 | LEAF(csum_partial) | 
 | 108 | 	move	sum, zero | 
 | 109 | 	move	t3, zero | 
 | 110 |  | 
 | 111 | 	sltiu	t8, a1, 0x8 | 
 | 112 | 	bnez	t8, small_csumcpy		/* < 8 bytes to copy */ | 
 | 113 | 	 move	ta2, a1 | 
 | 114 |  | 
 | 115 | 	beqz	a1, out | 
 | 116 | 	 andi	t3, src, 0x1			/* odd buffer? */ | 
 | 117 |  | 
 | 118 | hword_align: | 
 | 119 | 	beqz	t3, word_align | 
 | 120 | 	 andi	t8, src, 0x2 | 
 | 121 |  | 
 | 122 | 	lbu	ta0, (src) | 
 | 123 | 	dsubu	a1, a1, 0x1 | 
 | 124 | #ifdef __MIPSEL__ | 
 | 125 | 	sll	ta0, ta0, 8 | 
 | 126 | #endif | 
 | 127 | 	ADDC(sum, ta0) | 
 | 128 | 	daddu	src, src, 0x1 | 
 | 129 | 	andi	t8, src, 0x2 | 
 | 130 |  | 
 | 131 | word_align: | 
 | 132 | 	beqz	t8, dword_align | 
 | 133 | 	 sltiu	t8, a1, 56 | 
 | 134 |  | 
 | 135 | 	lhu	ta0, (src) | 
 | 136 | 	dsubu	a1, a1, 0x2 | 
 | 137 | 	ADDC(sum, ta0) | 
 | 138 | 	sltiu	t8, a1, 56 | 
 | 139 | 	daddu	src, src, 0x2 | 
 | 140 |  | 
 | 141 | dword_align: | 
 | 142 | 	bnez	t8, do_end_words | 
 | 143 | 	 move	t8, a1 | 
 | 144 |  | 
 | 145 | 	andi	t8, src, 0x4 | 
 | 146 | 	beqz	t8, qword_align | 
 | 147 | 	 andi	t8, src, 0x8 | 
 | 148 |  | 
 | 149 | 	lw	ta0, 0x00(src) | 
 | 150 | 	dsubu	a1, a1, 0x4 | 
 | 151 | 	ADDC(sum, ta0) | 
 | 152 | 	daddu	src, src, 0x4 | 
 | 153 | 	andi	t8, src, 0x8 | 
 | 154 |  | 
 | 155 | qword_align: | 
 | 156 | 	beqz	t8, oword_align | 
 | 157 | 	 andi	t8, src, 0x10 | 
 | 158 |  | 
 | 159 | 	lw	ta0, 0x00(src) | 
 | 160 | 	lw	ta1, 0x04(src) | 
 | 161 | 	dsubu	a1, a1, 0x8 | 
 | 162 | 	ADDC(sum, ta0) | 
 | 163 | 	ADDC(sum, ta1) | 
 | 164 | 	daddu	src, src, 0x8 | 
 | 165 | 	andi	t8, src, 0x10 | 
 | 166 |  | 
 | 167 | oword_align: | 
 | 168 | 	beqz	t8, begin_movement | 
 | 169 | 	 dsrl	t8, a1, 0x7 | 
 | 170 |  | 
 | 171 | 	lw	ta3, 0x08(src) | 
 | 172 | 	lw	t0, 0x0c(src) | 
 | 173 | 	lw	ta0, 0x00(src) | 
 | 174 | 	lw	ta1, 0x04(src) | 
 | 175 | 	ADDC(sum, ta3) | 
 | 176 | 	ADDC(sum, t0) | 
 | 177 | 	ADDC(sum, ta0) | 
 | 178 | 	ADDC(sum, ta1) | 
 | 179 | 	dsubu	a1, a1, 0x10 | 
 | 180 | 	daddu	src, src, 0x10 | 
 | 181 | 	dsrl	t8, a1, 0x7 | 
 | 182 |  | 
 | 183 | begin_movement: | 
 | 184 | 	beqz	t8, 1f | 
 | 185 | 	 andi	ta2, a1, 0x40 | 
 | 186 |  | 
 | 187 | move_128bytes: | 
 | 188 | 	CSUM_BIGCHUNK(src, 0x00, sum, ta0, ta1, ta3, t0) | 
 | 189 | 	CSUM_BIGCHUNK(src, 0x20, sum, ta0, ta1, ta3, t0) | 
 | 190 | 	CSUM_BIGCHUNK(src, 0x40, sum, ta0, ta1, ta3, t0) | 
 | 191 | 	CSUM_BIGCHUNK(src, 0x60, sum, ta0, ta1, ta3, t0) | 
 | 192 | 	dsubu	t8, t8, 0x01 | 
 | 193 | 	bnez	t8, move_128bytes | 
 | 194 | 	 daddu	src, src, 0x80 | 
 | 195 |  | 
 | 196 | 1: | 
 | 197 | 	beqz	ta2, 1f | 
 | 198 | 	 andi	ta2, a1, 0x20 | 
 | 199 |  | 
 | 200 | move_64bytes: | 
 | 201 | 	CSUM_BIGCHUNK(src, 0x00, sum, ta0, ta1, ta3, t0) | 
 | 202 | 	CSUM_BIGCHUNK(src, 0x20, sum, ta0, ta1, ta3, t0) | 
 | 203 | 	daddu	src, src, 0x40 | 
 | 204 |  | 
 | 205 | 1: | 
 | 206 | 	beqz	ta2, do_end_words | 
 | 207 | 	 andi	t8, a1, 0x1c | 
 | 208 |  | 
 | 209 | move_32bytes: | 
 | 210 | 	CSUM_BIGCHUNK(src, 0x00, sum, ta0, ta1, ta3, t0) | 
 | 211 | 	andi	t8, a1, 0x1c | 
 | 212 | 	daddu	src, src, 0x20 | 
 | 213 |  | 
 | 214 | do_end_words: | 
 | 215 | 	beqz	t8, maybe_end_cruft | 
 | 216 | 	 dsrl	t8, t8, 0x2 | 
 | 217 |  | 
 | 218 | end_words: | 
 | 219 | 	lw	ta0, (src) | 
 | 220 | 	dsubu	t8, t8, 0x1 | 
 | 221 | 	ADDC(sum, ta0) | 
 | 222 | 	bnez	t8, end_words | 
 | 223 | 	 daddu	src, src, 0x4 | 
 | 224 |  | 
 | 225 | maybe_end_cruft: | 
 | 226 | 	andi	ta2, a1, 0x3 | 
 | 227 |  | 
 | 228 | small_memcpy: | 
 | 229 |  j small_csumcpy; move a1, ta2		/* XXX ??? */ | 
 | 230 | 	beqz	t2, out | 
 | 231 | 	 move	a1, ta2 | 
 | 232 |  | 
 | 233 | end_bytes: | 
 | 234 | 	lb	ta0, (src) | 
 | 235 | 	dsubu	a1, a1, 0x1 | 
 | 236 | 	bnez	a2, end_bytes | 
 | 237 | 	 daddu	src, src, 0x1 | 
 | 238 |  | 
 | 239 | out: | 
 | 240 | 	jr	ra | 
 | 241 | 	 move	v0, sum | 
 | 242 | 	END(csum_partial) |