15cd27208SKumar Gala #include <linux/types.h> 25cd27208SKumar Gala #include <linux/errno.h> 35cd27208SKumar Gala #include <asm/uaccess.h> 45cd27208SKumar Gala 5d2b194edSKumar Gala #include <asm/sfp-machine.h> 6d2b194edSKumar Gala #include <math-emu/soft-fp.h> 7d2b194edSKumar Gala #include <math-emu/double.h> 8d2b194edSKumar Gala #include <math-emu/single.h> 95cd27208SKumar Gala 105cd27208SKumar Gala int 115cd27208SKumar Gala lfs(void *frD, void *ea) 125cd27208SKumar Gala { 135cd27208SKumar Gala FP_DECL_D(R); 145cd27208SKumar Gala FP_DECL_S(A); 15d2b194edSKumar Gala FP_DECL_EX; 165cd27208SKumar Gala float f; 175cd27208SKumar Gala 185cd27208SKumar Gala #ifdef DEBUG 19e48b1b45SHarvey Harrison printk("%s: D %p, ea %p\n", __func__, frD, ea); 205cd27208SKumar Gala #endif 215cd27208SKumar Gala 225cd27208SKumar Gala if (copy_from_user(&f, ea, sizeof(float))) 235cd27208SKumar Gala return -EFAULT; 245cd27208SKumar Gala 25d2b194edSKumar Gala FP_UNPACK_S(A, f); 265cd27208SKumar Gala 275cd27208SKumar Gala #ifdef DEBUG 285cd27208SKumar Gala printk("A: %ld %lu %ld (%ld) [%08lx]\n", A_s, A_f, A_e, A_c, 295cd27208SKumar Gala *(unsigned long *)&f); 305cd27208SKumar Gala #endif 315cd27208SKumar Gala 325cd27208SKumar Gala FP_CONV(D, S, 2, 1, R, A); 335cd27208SKumar Gala 345cd27208SKumar Gala #ifdef DEBUG 355cd27208SKumar Gala printk("R: %ld %lu %lu %ld (%ld)\n", R_s, R_f1, R_f0, R_e, R_c); 365cd27208SKumar Gala #endif 375cd27208SKumar Gala 38d2b194edSKumar Gala if (R_c == FP_CLS_NAN) { 39d2b194edSKumar Gala R_e = _FP_EXPMAX_D; 40d2b194edSKumar Gala _FP_PACK_RAW_2_P(D, frD, R); 41d2b194edSKumar Gala } else { 42d2b194edSKumar Gala __FP_PACK_D(frD, R); 43d2b194edSKumar Gala } 44d2b194edSKumar Gala 45d2b194edSKumar Gala return 0; 465cd27208SKumar Gala } 47