powerpc/crypto/aesp8-ppc.pl

1961 # If $key2 is NULL, then a "tweak chaining" mode is engaged, in which	#
1962 # input tweak value is assumed to be encrypted already, and last tweak	#
1964 # written back to original buffer. In addition, in "tweak chaining"	#
1970 my ($tweak,$seven,$eighty7,$tmp,$tweak1) =		map("v$_",(8..12));
1993 	lvx		$tweak,0,$ivp			# load [unaligned] iv
1997 	vperm		$tweak,$tweak,$inptail,$inpperm
2018 	vxor		$tweak,$tweak,$rndkey0
2025 	vcipher		$tweak,$tweak,$rndkey1
2029 	vcipher		$tweak,$tweak,$rndkey0
2035 	vcipher		$tweak,$tweak,$rndkey1
2038 	vcipherlast	$tweak,$tweak,$rndkey0
2040 	li		$ivp,0				# don't chain the tweak
2045 	and		$len,$len,$idx			# in "tweak chaining"
2078 	vxor		$inout,$inout,$tweak
2102 	vxor		$rndkey0,$rndkey0,$tweak
2126 	vsrab		$tmp,$tweak,$seven		# next tweak value
2127 	vaddubm		$tweak,$tweak,$tweak
2130 	vxor		$tweak,$tweak,$tmp
2134 	vxor		$inout,$inout,$tweak
2144 	vxor		$output,$output,$tweak
2167 	vsrab		$tmp,$tweak,$seven		# next tweak value
2168 	vaddubm		$tweak,$tweak,$tweak
2171 	vxor		$tweak,$tweak,$tmp
2173 	le?vperm	$tweak,$tweak,$tweak,$leperm
2174 	stvx_u		$tweak,0,$ivp
2207 	lvx		$tweak,0,$ivp			# load [unaligned] iv
2211 	vperm		$tweak,$tweak,$inptail,$inpperm
2232 	vxor		$tweak,$tweak,$rndkey0
2239 	vcipher		$tweak,$tweak,$rndkey1
2243 	vcipher		$tweak,$tweak,$rndkey0
2249 	vcipher		$tweak,$tweak,$rndkey1
2252 	vcipherlast	$tweak,$tweak,$rndkey0
2254 	li		$ivp,0				# don't chain the tweak
2260 	add		$len,$len,$idx			# in "tweak chaining"
2286 	vxor		$inout,$inout,$tweak
2313 	vxor		$rndkey0,$rndkey0,$tweak
2332 	vsrab		$tmp,$tweak,$seven		# next tweak value
2333 	vaddubm		$tweak,$tweak,$tweak
2336 	vxor		$tweak,$tweak,$tmp
2340 	vxor		$inout,$inout,$tweak
2350 	vsrab		$tmp,$tweak,$seven		# next tweak value
2351 	vaddubm		$tweak1,$tweak,$tweak
2359 	vxor		$inout,$inout,$tweak		# :-(
2401 	vxor		$rndkey0,$rndkey0,$tweak
2421 	vsrab		$tmp,$tweak,$seven		# next tweak value
2422 	vaddubm		$tweak,$tweak,$tweak
2425 	vxor		$tweak,$tweak,$tmp
2427 	le?vperm	$tweak,$tweak,$tweak,$leperm
2428 	stvx_u		$tweak,0,$ivp
2552 	# Switch to use the following codes with 0x010101..87 to generate tweak.
2554 	# vsrab         tmp, tweak, seven       # next tweak value, right shift 7 bits
2556 	# vaddubm       tweak, tweak, tweak     # left shift 1 bit (x2)
2558 	# vpermxor      tweak, tweak, tmp, vsx
2562 	vxor		$twk0,$tweak,$rndkey0
2563 	vsrab		$tmp,$tweak,$seven	# next tweak value
2564 	vaddubm		$tweak,$tweak,$tweak
2568 	vpermxor	$tweak, $tweak, $tmp, $in1
2571 	vxor		$twk1,$tweak,$rndkey0
2572 	vsrab		$tmp,$tweak,$seven	# next tweak value
2573 	vaddubm		$tweak,$tweak,$tweak
2578 	vpermxor	$tweak, $tweak, $tmp, $in2
2582 	vxor		$twk2,$tweak,$rndkey0
2583 	vsrab		$tmp,$tweak,$seven	# next tweak value
2584 	vaddubm		$tweak,$tweak,$tweak
2589 	vpermxor	$tweak, $tweak, $tmp, $in3
2593 	vxor		$twk3,$tweak,$rndkey0
2594 	vsrab		$tmp,$tweak,$seven	# next tweak value
2595 	vaddubm		$tweak,$tweak,$tweak
2600 	vpermxor	$tweak, $tweak, $tmp, $in4
2604 	vxor		$twk4,$tweak,$rndkey0
2605 	vsrab		$tmp,$tweak,$seven	# next tweak value
2606 	vaddubm		$tweak,$tweak,$tweak
2611 	vpermxor	$tweak, $tweak, $tmp, $in5
2615 	vxor		$twk5,$tweak,$rndkey0
2616 	vsrab		$tmp,$tweak,$seven	# next tweak value
2617 	vaddubm		$tweak,$tweak,$tweak
2622 	vpermxor	$tweak, $tweak, $tmp, $in0
2654 	 vsrab		$tmp,$tweak,$seven	# next tweak value
2655 	 vxor		$twk0,$tweak,$rndkey0
2656 	 vaddubm	$tweak,$tweak,$tweak
2667 	 vpermxor	$tweak, $tweak, $tmp, $in1
2671 	 vsrab		$tmp,$tweak,$seven	# next tweak value
2672 	 vxor		$twk1,$tweak,$rndkey0
2677 	 vaddubm	$tweak,$tweak,$tweak
2684 	 vpermxor	$tweak, $tweak, $tmp, $in2
2693 	 vsrab		$tmp,$tweak,$seven	# next tweak value
2694 	 vxor		$twk2,$tweak,$rndkey0
2695 	 vaddubm	$tweak,$tweak,$tweak
2706 	 vpermxor	$tweak, $tweak, $tmp, $in3
2710 	 vsrab		$tmp,$tweak,$seven	# next tweak value
2711 	 vxor		$twk3,$tweak,$rndkey0
2714 	 vaddubm	$tweak,$tweak,$tweak
2723 	 vpermxor	$tweak, $tweak, $tmp, $in4
2727 	 vsrab		$tmp,$tweak,$seven	# next tweak value
2728 	 vxor		$twk4,$tweak,$rndkey0
2732 	 vaddubm	$tweak,$tweak,$tweak
2740 	 vpermxor	$tweak, $tweak, $tmp, $in5
2744 	 vsrab		$tmp,$tweak,$seven	# next tweak value
2745 	 vxor		$twk5,$tweak,$rndkey0
2749 	 vaddubm	$tweak,$tweak,$tweak
2764 	 vpermxor	$tweak, $tweak, $tmp, $in0
2821 	vmr		$twk0,$twk5		# unused tweak
2847 	vmr		$twk0,$twk4		# unused tweak
2871 	vmr		$twk0,$twk3		# unused tweak
2893 	vmr		$twk0,$twk2		# unused tweak
2942 	vmr		$twk0,$twk1		# unused tweak
2986 	vxor		$tweak,$twk0,$rndkey0
2987 	le?vperm	$tweak,$tweak,$tweak,$leperm
2988 	stvx_u		$tweak,0,$ivp
3231 	vxor		$twk0,$tweak,$rndkey0
3232 	vsrab		$tmp,$tweak,$seven	# next tweak value
3233 	vaddubm		$tweak,$tweak,$tweak
3237 	vpermxor	$tweak, $tweak, $tmp, $in1
3240 	vxor		$twk1,$tweak,$rndkey0
3241 	vsrab		$tmp,$tweak,$seven	# next tweak value
3242 	vaddubm		$tweak,$tweak,$tweak
3247 	vpermxor	$tweak, $tweak, $tmp, $in2
3251 	vxor		$twk2,$tweak,$rndkey0
3252 	vsrab		$tmp,$tweak,$seven	# next tweak value
3253 	vaddubm		$tweak,$tweak,$tweak
3258 	vpermxor	$tweak, $tweak, $tmp, $in3
3262 	vxor		$twk3,$tweak,$rndkey0
3263 	vsrab		$tmp,$tweak,$seven	# next tweak value
3264 	vaddubm		$tweak,$tweak,$tweak
3269 	vpermxor	$tweak, $tweak, $tmp, $in4
3273 	vxor		$twk4,$tweak,$rndkey0
3274 	vsrab		$tmp,$tweak,$seven	# next tweak value
3275 	vaddubm		$tweak,$tweak,$tweak
3280 	vpermxor	$tweak, $tweak, $tmp, $in5
3284 	vxor		$twk5,$tweak,$rndkey0
3285 	vsrab		$tmp,$tweak,$seven	# next tweak value
3286 	vaddubm		$tweak,$tweak,$tweak
3291 	vpermxor	$tweak, $tweak, $tmp, $in0
3323 	 vsrab		$tmp,$tweak,$seven	# next tweak value
3324 	 vxor		$twk0,$tweak,$rndkey0
3325 	 vaddubm	$tweak,$tweak,$tweak
3336 	 vpermxor	$tweak, $tweak, $tmp, $in1
3340 	 vsrab		$tmp,$tweak,$seven	# next tweak value
3341 	 vxor		$twk1,$tweak,$rndkey0
3346 	 vaddubm	$tweak,$tweak,$tweak
3353 	 vpermxor	$tweak, $tweak, $tmp, $in2
3362 	 vsrab		$tmp,$tweak,$seven	# next tweak value
3363 	 vxor		$twk2,$tweak,$rndkey0
3364 	 vaddubm	$tweak,$tweak,$tweak
3375 	 vpermxor	$tweak, $tweak, $tmp, $in3
3379 	 vsrab		$tmp,$tweak,$seven	# next tweak value
3380 	 vxor		$twk3,$tweak,$rndkey0
3383 	 vaddubm	$tweak,$tweak,$tweak
3392 	 vpermxor	$tweak, $tweak, $tmp, $in4
3396 	 vsrab		$tmp,$tweak,$seven	# next tweak value
3397 	 vxor		$twk4,$tweak,$rndkey0
3401 	 vaddubm	$tweak,$tweak,$tweak
3409 	 vpermxor	$tweak, $tweak, $tmp, $in5
3413 	 vsrab		$tmp,$tweak,$seven	# next tweak value
3414 	 vxor		$twk5,$tweak,$rndkey0
3418 	 vaddubm	$tweak,$tweak,$tweak
3433 	 vpermxor	$tweak, $tweak, $tmp, $in0
3488 	vmr		$twk0,$twk5		# unused tweak
3489 	vxor		$twk1,$tweak,$rndkey0
3515 	vmr		$twk0,$twk4		# unused tweak
3540 	vmr		$twk0,$twk3		# unused tweak
3563 	vmr		$twk0,$twk2		# unused tweak
3613 	vmr		$twk0,$twk1		# unused tweak
3691 	vxor		$tweak,$twk0,$rndkey0
3692 	le?vperm	$tweak,$tweak,$tweak,$leperm
3693 	stvx_u		$tweak,0,$ivp