18c2ecf20Sopenharmony_ci// SPDX-License-Identifier: GPL-2.0
28c2ecf20Sopenharmony_ci#include <linux/types.h>
38c2ecf20Sopenharmony_ci#include <linux/errno.h>
48c2ecf20Sopenharmony_ci#include <linux/uaccess.h>
58c2ecf20Sopenharmony_ci
68c2ecf20Sopenharmony_ci#include <asm/sfp-machine.h>
78c2ecf20Sopenharmony_ci#include <math-emu/soft-fp.h>
88c2ecf20Sopenharmony_ci#include <math-emu/double.h>
98c2ecf20Sopenharmony_ci#include <math-emu/single.h>
108c2ecf20Sopenharmony_ci
118c2ecf20Sopenharmony_ciint
128c2ecf20Sopenharmony_cistfs(void *frS, void *ea)
138c2ecf20Sopenharmony_ci{
148c2ecf20Sopenharmony_ci	FP_DECL_D(A);
158c2ecf20Sopenharmony_ci	FP_DECL_S(R);
168c2ecf20Sopenharmony_ci	FP_DECL_EX;
178c2ecf20Sopenharmony_ci	float f;
188c2ecf20Sopenharmony_ci
198c2ecf20Sopenharmony_ci#ifdef DEBUG
208c2ecf20Sopenharmony_ci	printk("%s: S %p, ea %p\n", __func__, frS, ea);
218c2ecf20Sopenharmony_ci#endif
228c2ecf20Sopenharmony_ci
238c2ecf20Sopenharmony_ci	FP_UNPACK_DP(A, frS);
248c2ecf20Sopenharmony_ci
258c2ecf20Sopenharmony_ci#ifdef DEBUG
268c2ecf20Sopenharmony_ci	printk("A: %ld %lu %lu %ld (%ld)\n", A_s, A_f1, A_f0, A_e, A_c);
278c2ecf20Sopenharmony_ci#endif
288c2ecf20Sopenharmony_ci
298c2ecf20Sopenharmony_ci	FP_CONV(S, D, 1, 2, R, A);
308c2ecf20Sopenharmony_ci
318c2ecf20Sopenharmony_ci#ifdef DEBUG
328c2ecf20Sopenharmony_ci	printk("R: %ld %lu %ld (%ld)\n", R_s, R_f, R_e, R_c);
338c2ecf20Sopenharmony_ci#endif
348c2ecf20Sopenharmony_ci
358c2ecf20Sopenharmony_ci	_FP_PACK_CANONICAL(S, 1, R);
368c2ecf20Sopenharmony_ci	if (!FP_CUR_EXCEPTIONS || !__FPU_TRAP_P(FP_CUR_EXCEPTIONS)) {
378c2ecf20Sopenharmony_ci		_FP_PACK_RAW_1_P(S, &f, R);
388c2ecf20Sopenharmony_ci		if (copy_to_user(ea, &f, sizeof(float)))
398c2ecf20Sopenharmony_ci			return -EFAULT;
408c2ecf20Sopenharmony_ci	}
418c2ecf20Sopenharmony_ci
428c2ecf20Sopenharmony_ci	return FP_CUR_EXCEPTIONS;
438c2ecf20Sopenharmony_ci}
44