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)
87 	ld	7,0(4)
89 	ld	9,16(4)
93 	mulld	22,7,6
94 	mulhdu	23,7,6
104 	mulld	26,9,6
105 	mulhdu	27,9,6
114 	mulld	12,7,4
115 	mulhdu	21,7,4
131 	mulld	12,9,4
132 	mulhdu	21,9,4
145 	mulld	12,9,6
146 	mulhdu	21,9,6
148 	mulli	9,9,19
152 	mulld	12,7,6
153 	mulhdu	21,7,6
161 	mulld	12,9,4
162 	mulhdu	21,9,4
183 	mulld	12,7,4
184 	mulhdu	21,7,4
192 	mulld	12,9,6
193 	mulhdu	21,9,6
207 	mulld	12,7,6
208 	mulhdu	21,7,6
213 	li	0,-1
217 	and	9,26,0
220 	and	7,22,0
235 	add	9,9,21
242 	add	7,7,12
244 	srdi	21,9,51
245 	and	9,9,0
248 	srdi	12,7,51
249 	and	7,7,0
252 	std	9,16(3)
255 	std	7,0(3)
276 	stdu	1,-144(1)
289 	ld	7,0(4)
291 	ld	9,16(4)
295 	add	6,7,7
298 	mulld	22,7,7
299 	mulhdu	23,7,7
302 	mulld	26,9,6
303 	mulhdu	27,9,6
320 	mulld	12,9,6
321 	mulhdu	11,9,6
339 	add	6,9,9
343 	mulld	12,9,9
344 	mulhdu	10,9,9
362 	stdu	1,-144(1)
377 	ld	7,0(4)
379 	ld	9,16(4)
383 	mulld	22,7,6
384 	mulhdu	23,7,6
387 	mulld	26,9,6
388 	mulhdu	27,9,6
400 	stdu	1,-144(1)
413 	ld	7,0(4)
415 	ld	9,16(4)
422 	add	6,7,7
425 	mulld	22,7,7
426 	mulhdu	23,7,7
429 	mulld	26,9,6
430 	mulhdu	27,9,6
447 	mulld	12,9,6
448 	mulhdu	11,9,6
466 	add	6,9,9
470 	mulld	12,9,9
471 	mulhdu	10,9,9
484 	li	0,-1
488 	and	9,26,0
491 	and	7,22,0
506 	add	9,9,21
513 	add	7,7,12
515 	srdi	21,9,51
516 	and	9,9,0
519 	srdi	12,7,51
520 	and	7,7,0
525 	std	9,16(3)
528 	std	7,0(3)
549 	li	12, -1
554 	ld	7, 16(4)
565 	sldi	11, 7, 26
568 	srdi	11, 7, 25
569 	and	7, 10, 12	# h2
573 	srdi	9, 8, 12
575 	and	9, 9, 12	# h4
579 	std	7, 16(3)
581 	std	9, 32(3)
591 	ld	7, 16(4)
593 	ld	9, 32(4)
595 	li	12, -1
603 	add	10, 10, 7
607 	add	10, 10, 9
615 	add	7, 7, 11
616 	srdi	11, 7, 51
619 	add	9, 9, 11
623 	and	7, 7, 12
625 	and	9, 9, 12
631 	sldi	10, 7, 38
634 	srdi	11, 7, 26
636 	or	7, 11, 10	# s2
639 	sldi	10, 9, 12
644 	std	7, 16(3)
653 	li	7, 5
655 	mtctr	7
659 	ld	9, 0(4)
660 	xor	10, 8, 9
663 	xor	12, 9, 10