powerpc/crypto/curve25519-ppc64le_asm.S

1 /* SPDX-License-Identifier: GPL-2.0-or-later */
9 # [1] https://github.com/dot-asm/cryptogams/
11 # Copyright (c) 2006-2017, CRYPTOGAMS by <appro@openssl.org>
58 # - Added x25519_fe51_sqr_times, x25519_fe51_frombytes, x25519_fe51_tobytes
61 # Copyright 2024- IBM Corp.
63 # X25519 lower-level primitives for PPC64.
73 	stdu	1,-144(1)
90 	ld	10,24(4)
91 	ld	11,32(4)
99 	mulld	30,11,6
100 	mulhdu	31,11,6
102 	mulli	11,11,19
107 	mulld	28,10,6
108 	mulhdu	29,10,6
109 	mulld	12,11,4
110 	mulhdu	21,11,4
119 	mulld	12,10,4
120 	mulhdu	21,10,4
122 	mulli	10,10,19
135 	mulld	12,10,6
136 	mulhdu	21,10,6
140 	mulld	12,11,6
141 	mulhdu	21,11,6
166 	mulld	12,10,4
167 	mulhdu	21,10,4
178 	mulld	12,11,4
179 	mulhdu	21,11,4
197 	mulld	12,10,6
198 	mulhdu	21,10,6
202 	mulld	12,11,6
203 	mulhdu	21,11,6
213 	li	0,-1
228 	and	10,28,0
238 	and	11,30,0
246 	add	10,10,21
253 	std	10,24(3)
254 	std	11,32(3)
276 	stdu	1,-144(1)
292 	ld	10,24(4)
293 	ld	11,32(4)
296 	mulli	21,11,19
304 	mulld	28,10,6
305 	mulhdu	29,10,6
306 	mulld	30,11,6
307 	mulhdu	31,11,6
309 	mulld	12,11,21
310 	mulhdu	11,11,21
312 	adde	29,29,11
314 	mulli	5,10,19
317 	mulhdu	11,8,8
319 	adde	27,27,11
321 	mulhdu	11,9,6
323 	adde	29,29,11
324 	mulld	12,10,6
325 	mulhdu	11,10,6
327 	adde	31,31,11
329 	mulhdu	11,21,6
330 	add	6,10,10
332 	adde	23,23,11
333 	mulld	12,10,5
334 	mulhdu	10,10,5
336 	adde	25,25,10
338 	mulhdu	10,6,21
341 	adde	27,27,10
344 	mulhdu	10,9,9
346 	adde	31,31,10
348 	mulhdu	10,5,6
350 	adde	23,23,10
352 	mulhdu	10,21,6
354 	adde	25,25,10
362 	stdu	1,-144(1)
380 	ld	10,24(4)
381 	ld	11,32(4)
389 	mulld	28,10,6
390 	mulhdu	29,10,6
391 	mulld	30,11,6
392 	mulhdu	31,11,6
400 	stdu	1,-144(1)
416 	ld	10,24(4)
417 	ld	11,32(4)
423 	mulli	21,11,19
431 	mulld	28,10,6
432 	mulhdu	29,10,6
433 	mulld	30,11,6
434 	mulhdu	31,11,6
436 	mulld	12,11,21
437 	mulhdu	11,11,21
439 	adde	29,29,11
441 	mulli	5,10,19
444 	mulhdu	11,8,8
446 	adde	27,27,11
448 	mulhdu	11,9,6
450 	adde	29,29,11
451 	mulld	12,10,6
452 	mulhdu	11,10,6
454 	adde	31,31,11
456 	mulhdu	11,21,6
457 	add	6,10,10
459 	adde	23,23,11
460 	mulld	12,10,5
461 	mulhdu	10,10,5
463 	adde	25,25,10
465 	mulhdu	10,6,21
468 	adde	27,27,10
471 	mulhdu	10,9,9
473 	adde	31,31,10
475 	mulhdu	10,5,6
477 	adde	23,23,10
479 	mulhdu	10,21,6
481 	adde	25,25,10
484 	li	0,-1
499 	and	10,28,0
509 	and	11,30,0
517 	add	10,10,21
526 	std	10,24(3)
527 	std	11,32(3)
549 	li	12, -1
557 	srdi	10, 5, 51
560 	sldi	11, 6, 13
561 	or	11, 10, 11	# h1t
562 	srdi	10, 6, 38
563 	and	6, 11, 12	# h1
565 	sldi	11, 7, 26
566 	or	10, 10, 11	# h2t
568 	srdi	11, 7, 25
569 	and	7, 10, 12	# h2
570 	sldi	10, 8, 39
571 	or	11, 11, 10	# h3t
574 	and	8, 11, 12	# h3
595 	li	12, -1
599 	addi	10, 5, 19
600 	srdi	10, 10, 51
601 	add	10, 10, 6
602 	srdi	10, 10, 51
603 	add	10, 10, 7
604 	srdi	10, 10, 51
605 	add	10, 10, 8
606 	srdi	10, 10, 51
607 	add	10, 10, 9
608 	srdi	10, 10, 51
610 	mulli	10, 10, 19
611 	add	5, 5, 10
612 	srdi	11, 5, 51
613 	add	6, 6, 11
614 	srdi	11, 6, 51
615 	add	7, 7, 11
616 	srdi	11, 7, 51
617 	add	8, 8, 11
618 	srdi	11, 8, 51
619 	add	9, 9, 11
627 	sldi	10, 6, 51
628 	or	5, 5, 10	# s0
630 	srdi	11, 6, 13
631 	sldi	10, 7, 38
632 	or	6, 11, 10	# s1
634 	srdi	11, 7, 26
635 	sldi	10, 8, 25
636 	or	7, 11, 10	# s2
638 	srdi	11, 8, 39
639 	sldi	10, 9, 12
640 	or	8, 11, 10	# s4
660 	xor	10, 8, 9
661 	and	10, 10, 6
662 	xor	11, 8, 10
663 	xor	12, 9, 10
664 	std	11, 0(3)