powerpc/crypto/curve25519-ppc64le_asm.S

1 /* SPDX-License-Identifier: GPL-2.0-or-later */
3 # This code is taken from CRYPTOGAMs[1] and is included here using the option
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)
74 	std	21,56(1)
75 	std	22,64(1)
76 	std	23,72(1)
77 	std	24,80(1)
78 	std	25,88(1)
79 	std	26,96(1)
80 	std	27,104(1)
81 	std	28,112(1)
82 	std	29,120(1)
83 	std	30,128(1)
84 	std	31,136(1)
87 	ld	7,0(4)
93 	mulld	22,7,6
94 	mulhdu	23,7,6
114 	mulld	12,7,4
115 	mulhdu	21,7,4
152 	mulld	12,7,6
153 	mulhdu	21,7,6
183 	mulld	12,7,4
184 	mulhdu	21,7,4
207 	mulld	12,7,6
208 	mulhdu	21,7,6
213 	li	0,-1
220 	and	7,22,0
242 	add	7,7,12
248 	srdi	12,7,51
249 	and	7,7,0
255 	std	7,0(3)
258 	ld	21,56(1)
259 	ld	22,64(1)
260 	ld	23,72(1)
261 	ld	24,80(1)
262 	ld	25,88(1)
263 	ld	26,96(1)
264 	ld	27,104(1)
265 	ld	28,112(1)
266 	ld	29,120(1)
267 	ld	30,128(1)
268 	ld	31,136(1)
269 	addi	1,1,144
276 	stdu	1,-144(1)
277 	std	21,56(1)
278 	std	22,64(1)
279 	std	23,72(1)
280 	std	24,80(1)
281 	std	25,88(1)
282 	std	26,96(1)
283 	std	27,104(1)
284 	std	28,112(1)
285 	std	29,120(1)
286 	std	30,128(1)
287 	std	31,136(1)
289 	ld	7,0(4)
295 	add	6,7,7
298 	mulld	22,7,7
299 	mulhdu	23,7,7
362 	stdu	1,-144(1)
363 	std	21,56(1)
364 	std	22,64(1)
365 	std	23,72(1)
366 	std	24,80(1)
367 	std	25,88(1)
368 	std	26,96(1)
369 	std	27,104(1)
370 	std	28,112(1)
371 	std	29,120(1)
372 	std	30,128(1)
373 	std	31,136(1)
375 	lis	6,1
377 	ld	7,0(4)
383 	mulld	22,7,6
384 	mulhdu	23,7,6
400 	stdu	1,-144(1)
401 	std	21,56(1)
402 	std	22,64(1)
403 	std	23,72(1)
404 	std	24,80(1)
405 	std	25,88(1)
406 	std	26,96(1)
407 	std	27,104(1)
408 	std	28,112(1)
409 	std	29,120(1)
410 	std	30,128(1)
411 	std	31,136(1)
413 	ld	7,0(4)
422 	add	6,7,7
425 	mulld	22,7,7
426 	mulhdu	23,7,7
484 	li	0,-1
491 	and	7,22,0
513 	add	7,7,12
519 	srdi	12,7,51
520 	and	7,7,0
528 	std	7,0(3)
531 	ld	21,56(1)
532 	ld	22,64(1)
533 	ld	23,72(1)
534 	ld	24,80(1)
535 	ld	25,88(1)
536 	ld	26,96(1)
537 	ld	27,104(1)
538 	ld	28,112(1)
539 	ld	29,120(1)
540 	ld	30,128(1)
541 	ld	31,136(1)
542 	addi	1,1,144
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
579 	std	7, 16(3)
591 	ld	7, 16(4)
595 	li	12, -1
603 	add	10, 10, 7
615 	add	7, 7, 11
616 	srdi	11, 7, 51
623 	and	7, 7, 12
631 	sldi	10, 7, 38
634 	srdi	11, 7, 26
636 	or	7, 11, 10	# s2
644 	std	7, 16(3)
653 	li	7, 5
655 	mtctr	7