mips/crypto/poly1305-mips.pl

75 my ($ctx,$inp,$len,$padbit) = ($a0,$a1,$a2,$a3);
128 	beqz	$inp,.Lno_key
131 	andi	$tmp0,$inp,7		# $inp % 8
132 	dsubu	$inp,$inp,$tmp0		# align $inp
134 	ld	$in0,0($inp)
135 	ld	$in1,8($inp)
137 	ld	$tmp2,16($inp)
155 	ldl	$in0,0+MSB($inp)
156 	ldl	$in1,8+MSB($inp)
157 	ldr	$in0,0+LSB($inp)
158 	ldr	$in1,8+LSB($inp)
271 	andi	$shr,$inp,7
272 	dsubu	$inp,$inp,$shr		# align $inp
286 	daddu	$len,$inp		# end of buffer
292 	ld	$in0,0($inp)		# load input
293 	ld	$in1,8($inp)
296 	ld	$tmp2,16($inp)
312 	ldl	$in0,0+MSB($inp)	# load input
313 	ldl	$in1,8+MSB($inp)
314 	ldr	$in0,0+LSB($inp)
315 	ldr	$in1,8+LSB($inp)
317 	daddiu	$inp,16
416 	bne	$inp,$len,.Loop
546 my ($ctx,$inp,$len,$padbit) = ($a0,$a1,$a2,$a3);
602 	beqz	$inp,.Lno_key
605 	andi	$tmp0,$inp,3		# $inp % 4
606 	subu	$inp,$inp,$tmp0		# align $inp
608 	lw	$in0,0($inp)
609 	lw	$in1,4($inp)
610 	lw	$in2,8($inp)
611 	lw	$in3,12($inp)
614 	lw	$tmp2,16($inp)
645 	lwl	$in0,0+MSB($inp)
646 	lwl	$in1,4+MSB($inp)
647 	lwl	$in2,8+MSB($inp)
648 	lwl	$in3,12+MSB($inp)
649 	lwr	$in0,0+LSB($inp)
650 	lwr	$in1,4+LSB($inp)
651 	lwr	$in2,8+LSB($inp)
652 	lwr	$in3,12+LSB($inp)
772 	andi	$shr,$inp,3
773 	subu	$inp,$inp,$shr		# align $inp
792 	addu	$len,$len,$inp		# end of buffer
798 	lw	$d0,0($inp)		# load input
799 	lw	$d1,4($inp)
800 	lw	$d2,8($inp)
801 	lw	$d3,12($inp)
804 	lw	$t0,16($inp)
835 	lwl	$d0,0+MSB($inp)		# load input
836 	lwl	$d1,4+MSB($inp)
837 	lwl	$d2,8+MSB($inp)
838 	lwl	$d3,12+MSB($inp)
839 	lwr	$d0,0+LSB($inp)
840 	lwr	$d1,4+LSB($inp)
841 	lwr	$d2,8+LSB($inp)
842 	lwr	$d3,12+LSB($inp)
961 	 addiu	$inp,$inp,16
977 	 addiu	$inp,$inp,16
1121 	bne	$inp,$len,.Loop