aes/asm/aes-586.pl

83 $s0="eax";
120 	&mov	($v1,$s[0]);				# copy s0
125 	&mov	($s[0],&DWP(0,$te,$s[0],8));		# s0>>0
127 	&mov	($s[3],&DWP(3,$te,$s[2],8));		# s0>>8
130 	&mov	($s[2],&DWP(2,$te,$v1,8));		# s0>>16
132 	&mov	($s[1],&DWP(1,$te,$s[1],8));		# s0>>24
256 	&xor	($s0,&DWP(0,$key));		# xor with key
270 		    &encvert("ebp",$s0,$s1,$s2,$s3);
272 		    &encstep(0,"ebp",$s0,$s1,$s2,$s3);
273 		    &encstep(1,"ebp",$s1,$s2,$s3,$s0);
274 		    &encstep(2,"ebp",$s2,$s3,$s0,$s1);
275 		    &encstep(3,"ebp",$s3,$s0,$s1,$s2);
278 		&xor	($s0,&DWP(0,$key));
295 		    &encvert("ebp",$s0,$s1,$s2,$s3);
297 		    &encstep(0,"ebp",$s0,$s1,$s2,$s3);
298 		    &encstep(1,"ebp",$s1,$s2,$s3,$s0);
299 		    &encstep(2,"ebp",$s2,$s3,$s0,$s1);
300 		    &encstep(3,"ebp",$s3,$s0,$s1,$s2);
302 		&xor	($s0,&DWP(16*$i+0,$key));
312 		    &encvert("ebp",$s0,$s1,$s2,$s3);
314 		    &encstep(0,"ebp",$s0,$s1,$s2,$s3);
315 		    &encstep(1,"ebp",$s1,$s2,$s3,$s0);
316 		    &encstep(2,"ebp",$s2,$s3,$s0,$s1);
317 		    &encstep(3,"ebp",$s3,$s0,$s1,$s2);
319 		&xor	($s0,&DWP(16*$i+0,$key));
329 		    &encvert("ebp",$s0,$s1,$s2,$s3);
331 		    &encstep(0,"ebp",$s0,$s1,$s2,$s3);
332 		    &encstep(1,"ebp",$s1,$s2,$s3,$s0);
333 		    &encstep(2,"ebp",$s2,$s3,$s0,$s1);
334 		    &encstep(3,"ebp",$s3,$s0,$s1,$s2);
336 		&xor	($s0,&DWP(16*$i+0,$key));
348 	&enclast(0,"ebp",$s0,$s1,$s2,$s3);
349 	&enclast(1,"ebp",$s1,$s2,$s3,$s0);
350 	&enclast(2,"ebp",$s2,$s3,$s0,$s1);
351 	&enclast(3,"ebp",$s3,$s0,$s1,$s2);
354 	&xor	($s0,&DWP(0,$key));
438 	&mov	($s0,"esp");
442 	&mov	(&DWP(16,"esp"),$s0);
449 	&mov	($s0,&DWP(0,$acc));		# load input data
459 	&mov	(&DWP(0,$acc),$s0);		# write output data
540 	&xor	($s0,&DWP(0,$key));		# xor with key
553 		&decstep(0,"ebp",$s0,$s3,$s2,$s1);
554 		&decstep(1,"ebp",$s1,$s0,$s3,$s2);
555 		&decstep(2,"ebp",$s2,$s1,$s0,$s3);
556 		&decstep(3,"ebp",$s3,$s2,$s1,$s0);
558 		&xor	($s0,&DWP(0,$key));
574 		&decstep(0,"ebp",$s0,$s3,$s2,$s1);
575 		&decstep(1,"ebp",$s1,$s0,$s3,$s2);
576 		&decstep(2,"ebp",$s2,$s1,$s0,$s3);
577 		&decstep(3,"ebp",$s3,$s2,$s1,$s0);
578 		&xor	($s0,&DWP(16*$i+0,$key));
587 		&decstep(0,"ebp",$s0,$s3,$s2,$s1);
588 		&decstep(1,"ebp",$s1,$s0,$s3,$s2);
589 		&decstep(2,"ebp",$s2,$s1,$s0,$s3);
590 		&decstep(3,"ebp",$s3,$s2,$s1,$s0);
591 		&xor	($s0,&DWP(16*$i+0,$key));
600 		&decstep(0,"ebp",$s0,$s3,$s2,$s1);
601 		&decstep(1,"ebp",$s1,$s0,$s3,$s2);
602 		&decstep(2,"ebp",$s2,$s1,$s0,$s3);
603 		&decstep(3,"ebp",$s3,$s2,$s1,$s0);
604 		&xor	($s0,&DWP(16*$i+0,$key));
611 	&declast(0,"ebp",$s0,$s3,$s2,$s1);
612 	&declast(1,"ebp",$s1,$s0,$s3,$s2);
613 	&declast(2,"ebp",$s2,$s1,$s0,$s3);
614 	&declast(3,"ebp",$s3,$s2,$s1,$s0);
617 	&xor	($s0,&DWP(0,$key));
762 	&mov	($s0,"esp");
766 	&mov	(&DWP(16,"esp"),$s0);
773 	&mov	($s0,&DWP(0,$acc));		# load input data
783 	&mov	(&DWP(0,$acc),$s0);		# write output data
833 	&mov	($s0,"ebp");
836 	&and	($s0,0xfff);		# s = %ebp&0xfff
846 	&sub	($s3,$s0);
853 	&mov	($s0,&wparam(0));	# load inp
862 	&mov	($_inp,$s0);		# save copy of inp
881 	&mov	($acc,$s0);
885 		&mov	($s0,&DWP(0,"ebp"));
899 	&mov	($s0,&DWP(0,$key));		# load iv
907 		&xor	($s0,&DWP(0,$acc));	# xor input data
918 		&mov	(&DWP(0,$key),$s0);	# save output data
940 	&mov	(&DWP(0,$acc),$s0);	# save ivec
977 	&xor	($s0,$s0);
983 	&mov	($s0,&DWP(0,$key));
998 	&mov	($s0,"ebp");
1001 	&and	($s0,0xfff);		# s = %ebp&0xfff
1011 	&sub	($s3,$s0);
1018 	&mov	($s0,&wparam(0));	# load inp
1027 	&mov	($_inp,$s0);		# save copy of inp
1046 	&mov	($acc,$s0);
1050 		&mov	($s0,&DWP(0,"ebp"));
1067 		&mov	($s0,&DWP(0,$acc));	# read input
1077 		&xor	($s0,&DWP(0,$key));	# xor iv
1088 		&mov	(&DWP(0,$key),$s0);	# write output
1104 	&mov	($s0,&DWP(0,$key));	# load iv
1108 	&mov	(&DWP(0,$acc),$s0);	# copy back to user
1117 	&mov	(&DWP(0,$key),$s0);	# dump output to stack
1132 		&mov	($s0,&DWP(0,$acc));	# read input
1137 		&mov	(&DWP(0,$key),$s0);	# copy to temp
1147 		&xor	($s0,&DWP(0,$key));	# xor iv
1152 		&mov	(&DWP(0,$acc),$s0);	# write output
1161 		&mov	($s0,&DWP(0,$acc));	# read temp
1166 		&mov	(&DWP(0,$key),$s0);	# copy iv