powerpc/crypto/aesp8-ppc.pl

120 my ($inp,$bits,$out,$ptr,$cnt,$rounds)=map("r$_",(3..8));
262 	li		$rounds,10
336 	li		$rounds,12
344 	li		$rounds,14
398 	stw		$rounds,0($out)
418 	slwi		$cnt,$rounds,4
420 	srwi		$rounds,$rounds,1
422 	mtctr		$rounds
460 my ($inp,$out,$key,$rounds,$idx)=map("r$_",(3..7));
464 	lwz		$rounds,240($key)
481 	srwi		$rounds,$rounds,1
484 	subi		$rounds,$rounds,1
490 	mtctr		$rounds
535 my ($inp,$out,$len,$key,$ivp,$enc,$rounds,$idx)=map("r$_",(3..10));
561 	lwz		$rounds,240($key)
574 	srwi		$rounds,$rounds,1
576 	subi		$rounds,$rounds,1
583 	mtctr		$rounds
631 	mtctr		$rounds
754 	subi		$rounds,$rounds,3	# -4 in total
763 	mtctr		$rounds
831 	mtctr		$rounds
991 	mtctr		$rounds
1308 my ($inp,$out,$len,$key,$ivp,$x10,$rounds,$idx)=map("r$_",(3..10));
1337 	lwz		$rounds,240($key)
1344 	srwi		$rounds,$rounds,1
1346 	subi		$rounds,$rounds,1
1358 	mtctr		$rounds
1399 	 mtctr		$rounds
1476 	subi		$rounds,$rounds,3	# -4 in total
1484 	mtctr		$rounds
1543 	mtctr		$rounds
1699 	mtctr		$rounds
1967 my ($inp,$out,$len,$key1,$key2,$ivp,$rounds,$idx) =	map("r$_",(3..10));
2009 	lwz		$rounds,240($key2)
2010 	srwi		$rounds,$rounds,1
2011 	subi		$rounds,$rounds,1
2021 	mtctr		$rounds
2053 	lwz		$rounds,240($key1)
2054 	srwi		$rounds,$rounds,1
2055 	subi		$rounds,$rounds,1
2082 	mtctr		$rounds
2140 	mtctr		$rounds
2160 	mtctr		$rounds
2223 	lwz		$rounds,240($key2)
2224 	srwi		$rounds,$rounds,1
2225 	subi		$rounds,$rounds,1
2235 	mtctr		$rounds
2268 	lwz		$rounds,240($key1)
2269 	srwi		$rounds,$rounds,1
2270 	subi		$rounds,$rounds,1
2290 	mtctr		$rounds
2345 	mtctr		$rounds
2414 	mtctr		$rounds
2510 	subi		$rounds,$rounds,3	# -4 in total
2518 	mtctr		$rounds
2625 	mtctr		$rounds
2795 	mtctr		$rounds
2978 	mtctr		$rounds
3187 	subi		$rounds,$rounds,3	# -4 in total
3195 	mtctr		$rounds
3294 	mtctr		$rounds
3462 	mtctr		$rounds
3610 	mtctr		$rounds
3683 	mtctr		$rounds
3830 	mtctr		$rounds