15cd27208SKumar Gala #include <linux/types.h> 25cd27208SKumar Gala #include <linux/errno.h> 35cd27208SKumar Gala #include <asm/uaccess.h> 45cd27208SKumar Gala 5*d2b194edSKumar Gala #include <asm/sfp-machine.h> 6*d2b194edSKumar Gala #include <math-emu/soft-fp.h> 7*d2b194edSKumar Gala #include <math-emu/double.h> 8*d2b194edSKumar Gala #include <math-emu/single.h> 95cd27208SKumar Gala 105cd27208SKumar Gala int 115cd27208SKumar Gala stfs(void *frS, void *ea) 125cd27208SKumar Gala { 135cd27208SKumar Gala FP_DECL_D(A); 145cd27208SKumar Gala FP_DECL_S(R); 15*d2b194edSKumar Gala FP_DECL_EX; 165cd27208SKumar Gala float f; 175cd27208SKumar Gala 185cd27208SKumar Gala #ifdef DEBUG 19e48b1b45SHarvey Harrison printk("%s: S %p, ea %p\n", __func__, frS, ea); 205cd27208SKumar Gala #endif 215cd27208SKumar Gala 22*d2b194edSKumar Gala FP_UNPACK_DP(A, frS); 235cd27208SKumar Gala 245cd27208SKumar Gala #ifdef DEBUG 255cd27208SKumar Gala printk("A: %ld %lu %lu %ld (%ld)\n", A_s, A_f1, A_f0, A_e, A_c); 265cd27208SKumar Gala #endif 275cd27208SKumar Gala 285cd27208SKumar Gala FP_CONV(S, D, 1, 2, R, A); 295cd27208SKumar Gala 305cd27208SKumar Gala #ifdef DEBUG 315cd27208SKumar Gala printk("R: %ld %lu %ld (%ld)\n", R_s, R_f, R_e, R_c); 325cd27208SKumar Gala #endif 335cd27208SKumar Gala 34*d2b194edSKumar Gala _FP_PACK_CANONICAL(S, 1, R); 35*d2b194edSKumar Gala if (!FP_CUR_EXCEPTIONS || !__FPU_TRAP_P(FP_CUR_EXCEPTIONS)) { 36*d2b194edSKumar Gala _FP_PACK_RAW_1_P(S, &f, R); 375cd27208SKumar Gala if (copy_to_user(ea, &f, sizeof(float))) 385cd27208SKumar Gala return -EFAULT; 395cd27208SKumar Gala } 405cd27208SKumar Gala 41*d2b194edSKumar Gala return FP_CUR_EXCEPTIONS; 425cd27208SKumar Gala } 43