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