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