xref: /linux/arch/powerpc/math-emu/mtfsf.c (revision e2be04c7f9958dde770eeb8b30e829ca969b37bb)
1 // SPDX-License-Identifier: GPL-2.0
2 #include <linux/types.h>
3 #include <linux/errno.h>
4 #include <linux/uaccess.h>
5 
6 #include <asm/sfp-machine.h>
7 #include <math-emu/soft-fp.h>
8 
9 int
10 mtfsf(unsigned int FM, u32 *frB)
11 {
12 	u32 mask;
13 	u32 fpscr;
14 
15 	if (likely(FM == 1))
16 		mask = 0x0f;
17 	else if (likely(FM == 0xff))
18 		mask = ~0;
19 	else {
20 		mask = ((FM & 1) |
21 				((FM << 3) & 0x10) |
22 				((FM << 6) & 0x100) |
23 				((FM << 9) & 0x1000) |
24 				((FM << 12) & 0x10000) |
25 				((FM << 15) & 0x100000) |
26 				((FM << 18) & 0x1000000) |
27 				((FM << 21) & 0x10000000)) * 15;
28 	}
29 
30 	fpscr = ((__FPU_FPSCR & ~mask) | (frB[1] & mask)) &
31 		~(FPSCR_VX | FPSCR_FEX | 0x800);
32 
33 	if (fpscr & (FPSCR_VXSNAN | FPSCR_VXISI | FPSCR_VXIDI |
34 		     FPSCR_VXZDZ | FPSCR_VXIMZ | FPSCR_VXVC |
35 		     FPSCR_VXSOFT | FPSCR_VXSQRT | FPSCR_VXCVI))
36 		fpscr |= FPSCR_VX;
37 
38 	/* The bit order of exception enables and exception status
39 	 * is the same. Simply shift and mask to check for enabled
40 	 * exceptions.
41 	 */
42 	if (fpscr & (fpscr >> 22) &  0xf8)
43 		fpscr |= FPSCR_FEX;
44 
45 	__FPU_FPSCR = fpscr;
46 
47 #ifdef DEBUG
48 	printk("%s: %02x %p: %08lx\n", __func__, FM, frB, __FPU_FPSCR);
49 #endif
50 
51 	return 0;
52 }
53