powerpc/math-emu/mtfsf.c

0001 // SPDX-License-Identifier: GPL-2.0
0002 #include <linux/types.h>
0003 #include <linux/errno.h>
0004 #include <linux/uaccess.h>
0005
0006 #include <asm/sfp-machine.h>
0007 #include <math-emu/soft-fp.h>
0008
0009 int
0010 mtfsf(unsigned int FM, u32 *frB)
0011 {
0012     u32 mask;
0013     u32 fpscr;
0014
0015     if (likely(FM == 1))
0016         mask = 0x0f;
0017     else if (likely(FM == 0xff))
0018         mask = ~0;
0019     else {
0020         mask = ((FM & 1) |
0021                 ((FM << 3) & 0x10) |
0022                 ((FM << 6) & 0x100) |
0023                 ((FM << 9) & 0x1000) |
0024                 ((FM << 12) & 0x10000) |
0025                 ((FM << 15) & 0x100000) |
0026                 ((FM << 18) & 0x1000000) |
0027                 ((FM << 21) & 0x10000000)) * 15;
0028     }
0029
0030     fpscr = ((__FPU_FPSCR & ~mask) | (frB[1] & mask)) &
0031         ~(FPSCR_VX | FPSCR_FEX | 0x800);
0032
0033     if (fpscr & (FPSCR_VXSNAN | FPSCR_VXISI | FPSCR_VXIDI |
0034              FPSCR_VXZDZ | FPSCR_VXIMZ | FPSCR_VXVC |
0035              FPSCR_VXSOFT | FPSCR_VXSQRT | FPSCR_VXCVI))
0036         fpscr |= FPSCR_VX;
0037
0038     /* The bit order of exception enables and exception status
0039      * is the same. Simply shift and mask to check for enabled
0040      * exceptions.
0041      */
0042     if (fpscr & (fpscr >> 22) &  0xf8)
0043         fpscr |= FPSCR_FEX;
0044
0045     __FPU_FPSCR = fpscr;
0046
0047 #ifdef DEBUG
0048     printk("%s: %02x %p: %08lx\n", __func__, FM, frB, __FPU_FPSCR);
0049 #endif
0050
0051     return 0;
0052 }