xref: /linux/arch/arm/nwfpe/fpmodule.c (revision 3d0fe49454652117522f60bfbefb978ba0e5300b)
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 
3 /*
4     NetWinder Floating Point Emulator
5     (c) Rebel.com, 1998-1999
6     (c) Philip Blundell, 1998-1999
7 
8     Direct questions, comments to Scott Bambrough <scottb@netwinder.org>
9 
10 */
11 
12 #include "fpa11.h"
13 
14 #include <linux/module.h>
15 #include <linux/moduleparam.h>
16 
17 /* XXX */
18 #include <linux/errno.h>
19 #include <linux/types.h>
20 #include <linux/kernel.h>
21 #include <linux/signal.h>
22 #include <linux/sched/signal.h>
23 #include <linux/init.h>
24 
25 #include <asm/thread_notify.h>
26 
27 #include "softfloat.h"
28 #include "fpopcode.h"
29 #include "fpmodule.h"
30 #include "fpa11.inl"
31 
32 /* kernel symbols required for signal handling */
33 #ifdef CONFIG_FPE_NWFPE_XP
34 #define NWFPE_BITS "extended"
35 #else
36 #define NWFPE_BITS "double"
37 #endif
38 
39 #ifdef MODULE
40 void fp_send_sig(unsigned long sig, struct task_struct *p, int priv);
41 #else
42 #define fp_send_sig	send_sig
43 #define kern_fp_enter	fp_enter
44 
45 extern char fpe_type[];
46 #endif
47 
48 static int nwfpe_notify(struct notifier_block *self, unsigned long cmd, void *v)
49 {
50 	struct thread_info *thread = v;
51 
52 	if (cmd == THREAD_NOTIFY_FLUSH)
53 		nwfpe_init_fpa(&thread->fpstate);
54 
55 	return NOTIFY_DONE;
56 }
57 
58 static struct notifier_block nwfpe_notifier_block = {
59 	.notifier_call = nwfpe_notify,
60 };
61 
62 /* kernel function prototypes required */
63 void fp_setup(void);
64 
65 /* external declarations for saved kernel symbols */
66 extern void (*kern_fp_enter)(void);
67 
68 /* Original value of fp_enter from kernel before patched by fpe_init. */
69 static void (*orig_fp_enter)(void);
70 
71 /* forward declarations */
72 extern void nwfpe_enter(void);
73 
74 static int __init fpe_init(void)
75 {
76 	if (sizeof(FPA11) > sizeof(union fp_state)) {
77 		pr_err("nwfpe: bad structure size\n");
78 		return -EINVAL;
79 	}
80 
81 	if (sizeof(FPREG) != 12) {
82 		pr_err("nwfpe: bad register size\n");
83 		return -EINVAL;
84 	}
85 	if (fpe_type[0] && strcmp(fpe_type, "nwfpe"))
86 		return 0;
87 
88 	/* Display title, version and copyright information. */
89 	pr_info("NetWinder Floating Point Emulator V0.97 ("
90 	        NWFPE_BITS " precision)\n");
91 
92 	thread_register_notifier(&nwfpe_notifier_block);
93 
94 	/* Save pointer to the old FP handler and then patch ourselves in */
95 	orig_fp_enter = kern_fp_enter;
96 	kern_fp_enter = nwfpe_enter;
97 
98 	return 0;
99 }
100 
101 static void __exit fpe_exit(void)
102 {
103 	thread_unregister_notifier(&nwfpe_notifier_block);
104 	/* Restore the values we saved earlier. */
105 	kern_fp_enter = orig_fp_enter;
106 }
107 
108 /*
109 ScottB:  November 4, 1998
110 
111 Moved this function out of softfloat-specialize into fpmodule.c.
112 This effectively isolates all the changes required for integrating with the
113 Linux kernel into fpmodule.c.  Porting to NetBSD should only require modifying
114 fpmodule.c to integrate with the NetBSD kernel (I hope!).
115 
116 [1/1/99: Not quite true any more unfortunately.  There is Linux-specific
117 code to access data in user space in some other source files at the
118 moment (grep for get_user / put_user calls).  --philb]
119 
120 This function is called by the SoftFloat routines to raise a floating
121 point exception.  We check the trap enable byte in the FPSR, and raise
122 a SIGFPE exception if necessary.  If not the relevant bits in the
123 cumulative exceptions flag byte are set and we return.
124 */
125 
126 #ifdef CONFIG_DEBUG_USER
127 /* By default, ignore inexact errors as there are far too many of them to log */
128 static int debug = ~BIT_IXC;
129 #endif
130 
131 void float_raise(signed char flags)
132 {
133 	register unsigned int fpsr, cumulativeTraps;
134 
135 #ifdef CONFIG_DEBUG_USER
136 	if (flags & debug)
137  		printk(KERN_DEBUG
138 		       "NWFPE: %s[%d] takes exception %08x at %ps from %08lx\n",
139 		       current->comm, current->pid, flags,
140 		       __builtin_return_address(0), GET_USERREG()->ARM_pc);
141 #endif
142 
143 	/* Read fpsr and initialize the cumulativeTraps.  */
144 	fpsr = readFPSR();
145 	cumulativeTraps = 0;
146 
147 	/* For each type of exception, the cumulative trap exception bit is only
148 	   set if the corresponding trap enable bit is not set.  */
149 	if ((!(fpsr & BIT_IXE)) && (flags & BIT_IXC))
150 		cumulativeTraps |= BIT_IXC;
151 	if ((!(fpsr & BIT_UFE)) && (flags & BIT_UFC))
152 		cumulativeTraps |= BIT_UFC;
153 	if ((!(fpsr & BIT_OFE)) && (flags & BIT_OFC))
154 		cumulativeTraps |= BIT_OFC;
155 	if ((!(fpsr & BIT_DZE)) && (flags & BIT_DZC))
156 		cumulativeTraps |= BIT_DZC;
157 	if ((!(fpsr & BIT_IOE)) && (flags & BIT_IOC))
158 		cumulativeTraps |= BIT_IOC;
159 
160 	/* Set the cumulative exceptions flags.  */
161 	if (cumulativeTraps)
162 		writeFPSR(fpsr | cumulativeTraps);
163 
164 	/* Raise an exception if necessary.  */
165 	if (fpsr & (flags << 16))
166 		fp_send_sig(SIGFPE, current, 1);
167 }
168 
169 module_init(fpe_init);
170 module_exit(fpe_exit);
171 
172 MODULE_AUTHOR("Scott Bambrough <scottb@rebel.com>");
173 MODULE_DESCRIPTION("NWFPE floating point emulator (" NWFPE_BITS " precision)");
174 MODULE_LICENSE("GPL");
175 
176 #ifdef CONFIG_DEBUG_USER
177 module_param(debug, int, 0644);
178 #endif
179