aes/asm/aes-armv4.pl

45 $i1="r7";
274 	ldmia	$key!,{$t1-$i1}
279 	eor	$s3,$s3,$i1
283 	and	$i1,lr,$s0
288 	ldr	$t1,[$tbl,$i1,lsl#2]	@ Te3[s0>>0]
289 	and	$i1,lr,$s1,lsr#16	@ i0
297 	ldr	$i1,[$tbl,$i1,lsl#2]	@ Te1[s1>>16]
300 	eor	$s0,$s0,$i1,ror#8
302 	and	$i1,lr,$s2,lsr#8	@ i0
304 	and	$i2,lr,$s2,lsr#16	@ i1
307 	ldr	$i1,[$tbl,$i1,lsl#2]	@ Te2[s2>>8]
313 	eor	$s0,$s0,$i1,ror#16
315 	and	$i1,lr,$s3		@ i0
317 	and	$i2,lr,$s3,lsr#8	@ i1
320 	ldr	$i1,[$tbl,$i1,lsl#2]	@ Te3[s3>>0]
326 	eor	$s0,$s0,$i1,ror#24
327 	ldr	$i1,[$key],#16
335 	eor	$s0,$s0,$i1
337 	and	$i1,lr,$s0
350 	ldrb	$t1,[$tbl,$i1,lsl#2]	@ Te4[s0>>0]
351 	and	$i1,lr,$s1,lsr#16	@ i0
359 	ldrb	$i1,[$tbl,$i1,lsl#2]	@ Te4[s1>>16]
362 	eor	$s0,$i1,$s0,lsl#8
364 	and	$i1,lr,$s2,lsr#8	@ i0
366 	and	$i2,lr,$s2,lsr#16	@ i1
369 	ldrb	$i1,[$tbl,$i1,lsl#2]	@ Te4[s2>>8]
375 	eor	$s0,$i1,$s0,lsl#8
377 	and	$i1,lr,$s3		@ i0
379 	and	$i2,lr,$s3,lsr#8	@ i1
382 	ldrb	$i1,[$tbl,$i1,lsl#2]	@ Te4[s3>>0]
388 	eor	$s0,$i1,$s0,lsl#8
389 	ldr	$i1,[$key,#0]
398 	eor	$s0,$s0,$i1
494 	and	$i1,lr,$s3,lsr#16
497 	ldrb	$i1,[$tbl,$i1]
500 	orr	$t2,$t2,$i1,lsl#24
558 	and	$i1,lr,$i3,lsr#16
561 	ldrb	$i1,[$tbl,$i1]
564 	orr	$t2,$t2,$i1,lsl#24
582 	ldr	$i1,[$key,#-32]
584 	eor	$i1,$i1,$s3			@ rk[10]=rk[4]^rk[9]
585 	eor	$i3,$i2,$i1			@ rk[11]=rk[5]^rk[10]
586 	str	$i1,[$key,#-8]
627 	and	$i1,lr,$i3,lsr#16
630 	ldrb	$i1,[$tbl,$i1]
633 	orr	$t2,$t2,$i1,lsl#24
652 	and	$i1,lr,$s3,lsr#8
655 	ldrb	$i1,[$tbl,$i1]
658 	orr	$t2,$t2,$i1,lsl#8
664 	ldr	$i1,[$key,#-44]
668 	eor	$i1,$i1,$t1			@ rk[13]=rk[5]^rk[12]
670 	eor	$i2,$i2,$i1			@ rk[14]=rk[6]^rk[13]
671 	str	$i1,[$key,#-12]
698 	mov	$i1,r2
701 .Linv:	ldr	$s0,[$i1]
702 	ldr	$s1,[$i1,#4]
703 	ldr	$s2,[$i1,#8]
704 	ldr	$s3,[$i1,#12]
713 	str	$t1,[$i1],#16
714 	str	$t2,[$i1,#-12]
715 	str	$t3,[$i1,#-8]
716 	str	$i3,[$i1,#-4]
717 	teq	$i1,$i2
720 $mask80=$i1;
990 	ldmia	$key!,{$t1-$i1}
995 	eor	$s3,$s3,$i1
999 	and	$i1,lr,$s0,lsr#16
1004 	ldr	$t1,[$tbl,$i1,lsl#2]	@ Td1[s0>>16]
1005 	and	$i1,lr,$s1		@ i0
1013 	ldr	$i1,[$tbl,$i1,lsl#2]	@ Td3[s1>>0]
1016 	eor	$s0,$s0,$i1,ror#24
1018 	and	$i1,lr,$s2,lsr#8	@ i0
1020 	and	$i2,lr,$s2		@ i1
1023 	ldr	$i1,[$tbl,$i1,lsl#2]	@ Td2[s2>>8]
1029 	eor	$s0,$s0,$i1,ror#16
1031 	and	$i1,lr,$s3,lsr#16	@ i0
1033 	and	$i2,lr,$s3,lsr#8	@ i1
1036 	ldr	$i1,[$tbl,$i1,lsl#2]	@ Td1[s3>>16]
1042 	eor	$s0,$s0,$i1,ror#8
1043 	ldr	$i1,[$key],#16
1049 	eor	$s0,$s0,$i1
1053 	and	$i1,lr,$s0,lsr#16
1076 	ldrb	$t1,[$tbl,$i1]		@ Td4[s0>>16]
1077 	and	$i1,lr,$s1		@ i0
1083 	ldrb	$i1,[$tbl,$i1]		@ Td4[s1>>0]
1086 	eor	$s0,$i1,$s0,lsl#24
1089 	and	$i1,lr,$s2,lsr#8	@ i0
1091 	and	$i2,lr,$s2		@ i1
1092 	ldrb	$i1,[$tbl,$i1]		@ Td4[s2>>8]
1098 	eor	$s0,$s0,$i1,lsl#8
1101 	and	$i1,lr,$s3,lsr#16	@ i0
1103 	and	$i2,lr,$s3,lsr#8	@ i1
1104 	ldrb	$i1,[$tbl,$i1]		@ Td4[s3>>16]
1111 	eor	$s0,$s0,$i1,lsl#16
1112 	ldr	$i1,[$key,#0]
1120 	eor	$s0,$s0,$i1