1*5cd27208SKumar Gala #include <linux/types.h> 2*5cd27208SKumar Gala #include <linux/errno.h> 3*5cd27208SKumar Gala #include <asm/uaccess.h> 4*5cd27208SKumar Gala 5*5cd27208SKumar Gala #include "soft-fp.h" 6*5cd27208SKumar Gala #include "double.h" 7*5cd27208SKumar Gala #include "single.h" 8*5cd27208SKumar Gala 9*5cd27208SKumar Gala int 10*5cd27208SKumar Gala stfs(void *frS, void *ea) 11*5cd27208SKumar Gala { 12*5cd27208SKumar Gala FP_DECL_D(A); 13*5cd27208SKumar Gala FP_DECL_S(R); 14*5cd27208SKumar Gala float f; 15*5cd27208SKumar Gala int err; 16*5cd27208SKumar Gala 17*5cd27208SKumar Gala #ifdef DEBUG 18*5cd27208SKumar Gala printk("%s: S %p, ea %p\n", __FUNCTION__, frS, ea); 19*5cd27208SKumar Gala #endif 20*5cd27208SKumar Gala 21*5cd27208SKumar Gala __FP_UNPACK_D(A, frS); 22*5cd27208SKumar Gala 23*5cd27208SKumar Gala #ifdef DEBUG 24*5cd27208SKumar Gala printk("A: %ld %lu %lu %ld (%ld)\n", A_s, A_f1, A_f0, A_e, A_c); 25*5cd27208SKumar Gala #endif 26*5cd27208SKumar Gala 27*5cd27208SKumar Gala FP_CONV(S, D, 1, 2, R, A); 28*5cd27208SKumar Gala 29*5cd27208SKumar Gala #ifdef DEBUG 30*5cd27208SKumar Gala printk("R: %ld %lu %ld (%ld)\n", R_s, R_f, R_e, R_c); 31*5cd27208SKumar Gala #endif 32*5cd27208SKumar Gala 33*5cd27208SKumar Gala err = _FP_PACK_CANONICAL(S, 1, R); 34*5cd27208SKumar Gala if (!err || !__FPU_TRAP_P(err)) { 35*5cd27208SKumar Gala __FP_PACK_RAW_1(S, &f, R); 36*5cd27208SKumar Gala if (copy_to_user(ea, &f, sizeof(float))) 37*5cd27208SKumar Gala return -EFAULT; 38*5cd27208SKumar Gala } 39*5cd27208SKumar Gala 40*5cd27208SKumar Gala return err; 41*5cd27208SKumar Gala } 42