Orange Pi5 kernel

^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  1) // SPDX-License-Identifier: GPL-2.0
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  2) #include <linux/types.h>
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  3) #include <linux/errno.h>
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  4) #include <linux/uaccess.h>
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  5) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  6) #include <asm/sfp-machine.h>
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  7) #include <math-emu/soft-fp.h>
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  8) #include <math-emu/double.h>
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300  9) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 10) int
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 11) fmul(void *frD, void *frA, void *frB)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 12) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 13) 	FP_DECL_D(A);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 14) 	FP_DECL_D(B);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 15) 	FP_DECL_D(R);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 16) 	FP_DECL_EX;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 17) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 18) #ifdef DEBUG
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 19) 	printk("%s: %p %p %p\n", __func__, frD, frA, frB);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 20) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 21) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 22) 	FP_UNPACK_DP(A, frA);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 23) 	FP_UNPACK_DP(B, frB);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 24) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 25) #ifdef DEBUG
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 26) 	printk("A: %ld %lu %lu %ld (%ld) [%08lx.%08lx %lx]\n",
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 27) 	       A_s, A_f1, A_f0, A_e, A_c, A_f1, A_f0, A_e + 1023);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 28) 	printk("B: %ld %lu %lu %ld (%ld) [%08lx.%08lx %lx]\n",
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 29) 	       B_s, B_f1, B_f0, B_e, B_c, B_f1, B_f0, B_e + 1023);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 30) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 31) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 32) 	if ((A_c == FP_CLS_INF && B_c == FP_CLS_ZERO) ||
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 33) 	    (A_c == FP_CLS_ZERO && B_c == FP_CLS_INF))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 34) 		FP_SET_EXCEPTION(EFLAG_VXIMZ);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 35) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 36) 	FP_MUL_D(R, A, B);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 37) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 38) #ifdef DEBUG
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 39) 	printk("D: %ld %lu %lu %ld (%ld) [%08lx.%08lx %lx]\n",
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 40) 	       R_s, R_f1, R_f0, R_e, R_c, R_f1, R_f0, R_e + 1023);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 41) #endif
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 42) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 43) 	__FP_PACK_D(frD, R);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 44) 
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 45) 	return FP_CUR_EXCEPTIONS;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 46) }