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 #include <math-emu/double.h> 8 #include <math-emu/single.h> 9 10 int 11 fmuls(void *frD, void *frA, void *frB) 12 { 13 FP_DECL_D(A); 14 FP_DECL_D(B); 15 FP_DECL_D(R); 16 FP_DECL_EX; 17 18 #ifdef DEBUG 19 printk("%s: %p %p %p\n", __func__, frD, frA, frB); 20 #endif 21 22 FP_UNPACK_DP(A, frA); 23 FP_UNPACK_DP(B, frB); 24 25 #ifdef DEBUG 26 printk("A: %ld %lu %lu %ld (%ld) [%08lx.%08lx %lx]\n", 27 A_s, A_f1, A_f0, A_e, A_c, A_f1, A_f0, A_e + 1023); 28 printk("B: %ld %lu %lu %ld (%ld) [%08lx.%08lx %lx]\n", 29 B_s, B_f1, B_f0, B_e, B_c, B_f1, B_f0, B_e + 1023); 30 #endif 31 32 if ((A_c == FP_CLS_INF && B_c == FP_CLS_ZERO) || 33 (A_c == FP_CLS_ZERO && B_c == FP_CLS_INF)) 34 FP_SET_EXCEPTION(EFLAG_VXIMZ); 35 36 FP_MUL_D(R, A, B); 37 38 #ifdef DEBUG 39 printk("D: %ld %lu %lu %ld (%ld) [%08lx.%08lx %lx]\n", 40 R_s, R_f1, R_f0, R_e, R_c, R_f1, R_f0, R_e + 1023); 41 #endif 42 43 __FP_PACK_DS(frD, R); 44 45 return FP_CUR_EXCEPTIONS; 46 } 47