xref: /linux/arch/powerpc/math-emu/stfs.c (revision f838bad1b3be8ca0c785ee0e0c570dfda74cf377)
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
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", __func__, 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