xref: /openbmc/linux/arch/mips/kernel/signal.c (revision 87c2ce3b)
1 /*
2  * This file is subject to the terms and conditions of the GNU General Public
3  * License.  See the file "COPYING" in the main directory of this archive
4  * for more details.
5  *
6  * Copyright (C) 1991, 1992  Linus Torvalds
7  * Copyright (C) 1994 - 2000  Ralf Baechle
8  * Copyright (C) 1999, 2000 Silicon Graphics, Inc.
9  */
10 #include <linux/config.h>
11 #include <linux/cache.h>
12 #include <linux/sched.h>
13 #include <linux/mm.h>
14 #include <linux/personality.h>
15 #include <linux/smp.h>
16 #include <linux/smp_lock.h>
17 #include <linux/kernel.h>
18 #include <linux/signal.h>
19 #include <linux/errno.h>
20 #include <linux/wait.h>
21 #include <linux/ptrace.h>
22 #include <linux/unistd.h>
23 #include <linux/compiler.h>
24 
25 #include <asm/abi.h>
26 #include <asm/asm.h>
27 #include <linux/bitops.h>
28 #include <asm/cacheflush.h>
29 #include <asm/fpu.h>
30 #include <asm/sim.h>
31 #include <asm/uaccess.h>
32 #include <asm/ucontext.h>
33 #include <asm/cpu-features.h>
34 #include <asm/war.h>
35 
36 #include "signal-common.h"
37 
38 #define DEBUG_SIG 0
39 
40 #define _BLOCKABLE (~(sigmask(SIGKILL) | sigmask(SIGSTOP)))
41 
42 int do_signal(sigset_t *oldset, struct pt_regs *regs);
43 
44 /*
45  * Atomically swap in the new signal mask, and wait for a signal.
46  */
47 
48 #ifdef CONFIG_TRAD_SIGNALS
49 save_static_function(sys_sigsuspend);
50 __attribute_used__ noinline static int
51 _sys_sigsuspend(nabi_no_regargs struct pt_regs regs)
52 {
53 	sigset_t saveset, newset;
54 	sigset_t __user *uset;
55 
56 	uset = (sigset_t __user *) regs.regs[4];
57 	if (copy_from_user(&newset, uset, sizeof(sigset_t)))
58 		return -EFAULT;
59 	sigdelsetmask(&newset, ~_BLOCKABLE);
60 
61 	spin_lock_irq(&current->sighand->siglock);
62 	saveset = current->blocked;
63 	current->blocked = newset;
64 	recalc_sigpending();
65 	spin_unlock_irq(&current->sighand->siglock);
66 
67 	regs.regs[2] = EINTR;
68 	regs.regs[7] = 1;
69 	while (1) {
70 		current->state = TASK_INTERRUPTIBLE;
71 		schedule();
72 		if (do_signal(&saveset, &regs))
73 			return -EINTR;
74 	}
75 }
76 #endif
77 
78 save_static_function(sys_rt_sigsuspend);
79 __attribute_used__ noinline static int
80 _sys_rt_sigsuspend(nabi_no_regargs struct pt_regs regs)
81 {
82 	sigset_t saveset, newset;
83 	sigset_t __user *unewset;
84 	size_t sigsetsize;
85 
86 	/* XXX Don't preclude handling different sized sigset_t's.  */
87 	sigsetsize = regs.regs[5];
88 	if (sigsetsize != sizeof(sigset_t))
89 		return -EINVAL;
90 
91 	unewset = (sigset_t __user *) regs.regs[4];
92 	if (copy_from_user(&newset, unewset, sizeof(newset)))
93 		return -EFAULT;
94 	sigdelsetmask(&newset, ~_BLOCKABLE);
95 
96 	spin_lock_irq(&current->sighand->siglock);
97 	saveset = current->blocked;
98 	current->blocked = newset;
99         recalc_sigpending();
100 	spin_unlock_irq(&current->sighand->siglock);
101 
102 	regs.regs[2] = EINTR;
103 	regs.regs[7] = 1;
104 	while (1) {
105 		current->state = TASK_INTERRUPTIBLE;
106 		schedule();
107 		if (do_signal(&saveset, &regs))
108 			return -EINTR;
109 	}
110 }
111 
112 #ifdef CONFIG_TRAD_SIGNALS
113 asmlinkage int sys_sigaction(int sig, const struct sigaction *act,
114 	struct sigaction *oact)
115 {
116 	struct k_sigaction new_ka, old_ka;
117 	int ret;
118 	int err = 0;
119 
120 	if (act) {
121 		old_sigset_t mask;
122 
123 		if (!access_ok(VERIFY_READ, act, sizeof(*act)))
124 			return -EFAULT;
125 		err |= __get_user(new_ka.sa.sa_handler, &act->sa_handler);
126 		err |= __get_user(new_ka.sa.sa_flags, &act->sa_flags);
127 		err |= __get_user(mask, &act->sa_mask.sig[0]);
128 		if (err)
129 			return -EFAULT;
130 
131 		siginitset(&new_ka.sa.sa_mask, mask);
132 	}
133 
134 	ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
135 
136 	if (!ret && oact) {
137 		if (!access_ok(VERIFY_WRITE, oact, sizeof(*oact)))
138                         return -EFAULT;
139 		err |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
140 		err |= __put_user(old_ka.sa.sa_handler, &oact->sa_handler);
141 		err |= __put_user(old_ka.sa.sa_mask.sig[0], oact->sa_mask.sig);
142 		err |= __put_user(0, &oact->sa_mask.sig[1]);
143 		err |= __put_user(0, &oact->sa_mask.sig[2]);
144 		err |= __put_user(0, &oact->sa_mask.sig[3]);
145 		if (err)
146 			return -EFAULT;
147 	}
148 
149 	return ret;
150 }
151 #endif
152 
153 asmlinkage int sys_sigaltstack(nabi_no_regargs struct pt_regs regs)
154 {
155 	const stack_t __user *uss = (const stack_t __user *) regs.regs[4];
156 	stack_t __user *uoss = (stack_t __user *) regs.regs[5];
157 	unsigned long usp = regs.regs[29];
158 
159 	return do_sigaltstack(uss, uoss, usp);
160 }
161 
162 /*
163  * Horribly complicated - with the bloody RM9000 workarounds enabled
164  * the signal trampolines is moving to the end of the structure so we can
165  * increase the alignment without breaking software compatibility.
166  */
167 #ifdef CONFIG_TRAD_SIGNALS
168 struct sigframe {
169 	u32 sf_ass[4];			/* argument save space for o32 */
170 #if ICACHE_REFILLS_WORKAROUND_WAR
171 	u32 sf_pad[2];
172 #else
173 	u32 sf_code[2];			/* signal trampoline */
174 #endif
175 	struct sigcontext sf_sc;
176 	sigset_t sf_mask;
177 #if ICACHE_REFILLS_WORKAROUND_WAR
178 	u32 sf_code[8] ____cacheline_aligned;	/* signal trampoline */
179 #endif
180 };
181 #endif
182 
183 struct rt_sigframe {
184 	u32 rs_ass[4];			/* argument save space for o32 */
185 #if ICACHE_REFILLS_WORKAROUND_WAR
186 	u32 rs_pad[2];
187 #else
188 	u32 rs_code[2];			/* signal trampoline */
189 #endif
190 	struct siginfo rs_info;
191 	struct ucontext rs_uc;
192 #if ICACHE_REFILLS_WORKAROUND_WAR
193 	u32 rs_code[8] ____cacheline_aligned;	/* signal trampoline */
194 #endif
195 };
196 
197 #ifdef CONFIG_TRAD_SIGNALS
198 save_static_function(sys_sigreturn);
199 __attribute_used__ noinline static void
200 _sys_sigreturn(nabi_no_regargs struct pt_regs regs)
201 {
202 	struct sigframe *frame;
203 	sigset_t blocked;
204 
205 	frame = (struct sigframe *) regs.regs[29];
206 	if (!access_ok(VERIFY_READ, frame, sizeof(*frame)))
207 		goto badframe;
208 	if (__copy_from_user(&blocked, &frame->sf_mask, sizeof(blocked)))
209 		goto badframe;
210 
211 	sigdelsetmask(&blocked, ~_BLOCKABLE);
212 	spin_lock_irq(&current->sighand->siglock);
213 	current->blocked = blocked;
214 	recalc_sigpending();
215 	spin_unlock_irq(&current->sighand->siglock);
216 
217 	if (restore_sigcontext(&regs, &frame->sf_sc))
218 		goto badframe;
219 
220 	/*
221 	 * Don't let your children do this ...
222 	 */
223 	__asm__ __volatile__(
224 		"move\t$29, %0\n\t"
225 		"j\tsyscall_exit"
226 		:/* no outputs */
227 		:"r" (&regs));
228 	/* Unreached */
229 
230 badframe:
231 	force_sig(SIGSEGV, current);
232 }
233 #endif /* CONFIG_TRAD_SIGNALS */
234 
235 save_static_function(sys_rt_sigreturn);
236 __attribute_used__ noinline static void
237 _sys_rt_sigreturn(nabi_no_regargs struct pt_regs regs)
238 {
239 	struct rt_sigframe *frame;
240 	sigset_t set;
241 	stack_t st;
242 
243 	frame = (struct rt_sigframe *) regs.regs[29];
244 	if (!access_ok(VERIFY_READ, frame, sizeof(*frame)))
245 		goto badframe;
246 	if (__copy_from_user(&set, &frame->rs_uc.uc_sigmask, sizeof(set)))
247 		goto badframe;
248 
249 	sigdelsetmask(&set, ~_BLOCKABLE);
250 	spin_lock_irq(&current->sighand->siglock);
251 	current->blocked = set;
252 	recalc_sigpending();
253 	spin_unlock_irq(&current->sighand->siglock);
254 
255 	if (restore_sigcontext(&regs, &frame->rs_uc.uc_mcontext))
256 		goto badframe;
257 
258 	if (__copy_from_user(&st, &frame->rs_uc.uc_stack, sizeof(st)))
259 		goto badframe;
260 	/* It is more difficult to avoid calling this function than to
261 	   call it and ignore errors.  */
262 	do_sigaltstack(&st, NULL, regs.regs[29]);
263 
264 	/*
265 	 * Don't let your children do this ...
266 	 */
267 	__asm__ __volatile__(
268 		"move\t$29, %0\n\t"
269 		"j\tsyscall_exit"
270 		:/* no outputs */
271 		:"r" (&regs));
272 	/* Unreached */
273 
274 badframe:
275 	force_sig(SIGSEGV, current);
276 }
277 
278 #ifdef CONFIG_TRAD_SIGNALS
279 int setup_frame(struct k_sigaction * ka, struct pt_regs *regs,
280 	int signr, sigset_t *set)
281 {
282 	struct sigframe *frame;
283 	int err = 0;
284 
285 	frame = get_sigframe(ka, regs, sizeof(*frame));
286 	if (!access_ok(VERIFY_WRITE, frame, sizeof (*frame)))
287 		goto give_sigsegv;
288 
289 	install_sigtramp(frame->sf_code, __NR_sigreturn);
290 
291 	err |= setup_sigcontext(regs, &frame->sf_sc);
292 	err |= __copy_to_user(&frame->sf_mask, set, sizeof(*set));
293 	if (err)
294 		goto give_sigsegv;
295 
296 	/*
297 	 * Arguments to signal handler:
298 	 *
299 	 *   a0 = signal number
300 	 *   a1 = 0 (should be cause)
301 	 *   a2 = pointer to struct sigcontext
302 	 *
303 	 * $25 and c0_epc point to the signal handler, $29 points to the
304 	 * struct sigframe.
305 	 */
306 	regs->regs[ 4] = signr;
307 	regs->regs[ 5] = 0;
308 	regs->regs[ 6] = (unsigned long) &frame->sf_sc;
309 	regs->regs[29] = (unsigned long) frame;
310 	regs->regs[31] = (unsigned long) frame->sf_code;
311 	regs->cp0_epc = regs->regs[25] = (unsigned long) ka->sa.sa_handler;
312 
313 #if DEBUG_SIG
314 	printk("SIG deliver (%s:%d): sp=0x%p pc=0x%lx ra=0x%p\n",
315 	       current->comm, current->pid,
316 	       frame, regs->cp0_epc, frame->regs[31]);
317 #endif
318         return 1;
319 
320 give_sigsegv:
321 	force_sigsegv(signr, current);
322 	return 0;
323 }
324 #endif
325 
326 int setup_rt_frame(struct k_sigaction * ka, struct pt_regs *regs,
327 	int signr, sigset_t *set, siginfo_t *info)
328 {
329 	struct rt_sigframe *frame;
330 	int err = 0;
331 
332 	frame = get_sigframe(ka, regs, sizeof(*frame));
333 	if (!access_ok(VERIFY_WRITE, frame, sizeof (*frame)))
334 		goto give_sigsegv;
335 
336 	install_sigtramp(frame->rs_code, __NR_rt_sigreturn);
337 
338 	/* Create siginfo.  */
339 	err |= copy_siginfo_to_user(&frame->rs_info, info);
340 
341 	/* Create the ucontext.  */
342 	err |= __put_user(0, &frame->rs_uc.uc_flags);
343 	err |= __put_user(0, &frame->rs_uc.uc_link);
344 	err |= __put_user((void *)current->sas_ss_sp,
345 	                  &frame->rs_uc.uc_stack.ss_sp);
346 	err |= __put_user(sas_ss_flags(regs->regs[29]),
347 	                  &frame->rs_uc.uc_stack.ss_flags);
348 	err |= __put_user(current->sas_ss_size,
349 	                  &frame->rs_uc.uc_stack.ss_size);
350 	err |= setup_sigcontext(regs, &frame->rs_uc.uc_mcontext);
351 	err |= __copy_to_user(&frame->rs_uc.uc_sigmask, set, sizeof(*set));
352 
353 	if (err)
354 		goto give_sigsegv;
355 
356 	/*
357 	 * Arguments to signal handler:
358 	 *
359 	 *   a0 = signal number
360 	 *   a1 = 0 (should be cause)
361 	 *   a2 = pointer to ucontext
362 	 *
363 	 * $25 and c0_epc point to the signal handler, $29 points to
364 	 * the struct rt_sigframe.
365 	 */
366 	regs->regs[ 4] = signr;
367 	regs->regs[ 5] = (unsigned long) &frame->rs_info;
368 	regs->regs[ 6] = (unsigned long) &frame->rs_uc;
369 	regs->regs[29] = (unsigned long) frame;
370 	regs->regs[31] = (unsigned long) frame->rs_code;
371 	regs->cp0_epc = regs->regs[25] = (unsigned long) ka->sa.sa_handler;
372 
373 #if DEBUG_SIG
374 	printk("SIG deliver (%s:%d): sp=0x%p pc=0x%lx ra=0x%p\n",
375 	       current->comm, current->pid,
376 	       frame, regs->cp0_epc, regs->regs[31]);
377 #endif
378 	return 1;
379 
380 give_sigsegv:
381 	force_sigsegv(signr, current);
382 	return 0;
383 }
384 
385 static inline int handle_signal(unsigned long sig, siginfo_t *info,
386 	struct k_sigaction *ka, sigset_t *oldset, struct pt_regs *regs)
387 {
388 	int ret;
389 
390 	switch(regs->regs[0]) {
391 	case ERESTART_RESTARTBLOCK:
392 	case ERESTARTNOHAND:
393 		regs->regs[2] = EINTR;
394 		break;
395 	case ERESTARTSYS:
396 		if(!(ka->sa.sa_flags & SA_RESTART)) {
397 			regs->regs[2] = EINTR;
398 			break;
399 		}
400 	/* fallthrough */
401 	case ERESTARTNOINTR:		/* Userland will reload $v0.  */
402 		regs->regs[7] = regs->regs[26];
403 		regs->cp0_epc -= 8;
404 	}
405 
406 	regs->regs[0] = 0;		/* Don't deal with this again.  */
407 
408 	if (sig_uses_siginfo(ka))
409 		ret = current->thread.abi->setup_rt_frame(ka, regs, sig, oldset, info);
410 	else
411 		ret = current->thread.abi->setup_frame(ka, regs, sig, oldset);
412 
413 	spin_lock_irq(&current->sighand->siglock);
414 	sigorsets(&current->blocked,&current->blocked,&ka->sa.sa_mask);
415 	if (!(ka->sa.sa_flags & SA_NODEFER))
416 		sigaddset(&current->blocked,sig);
417 	recalc_sigpending();
418 	spin_unlock_irq(&current->sighand->siglock);
419 
420 	return ret;
421 }
422 
423 int do_signal(sigset_t *oldset, struct pt_regs *regs)
424 {
425 	struct k_sigaction ka;
426 	siginfo_t info;
427 	int signr;
428 
429 	/*
430 	 * We want the common case to go fast, which is why we may in certain
431 	 * cases get here from kernel mode. Just return without doing anything
432 	 * if so.
433 	 */
434 	if (!user_mode(regs))
435 		return 1;
436 
437 	if (try_to_freeze())
438 		goto no_signal;
439 
440 	if (!oldset)
441 		oldset = &current->blocked;
442 
443 	signr = get_signal_to_deliver(&info, &ka, regs, NULL);
444 	if (signr > 0)
445 		return handle_signal(signr, &info, &ka, oldset, regs);
446 
447 no_signal:
448 	/*
449 	 * Who's code doesn't conform to the restartable syscall convention
450 	 * dies here!!!  The li instruction, a single machine instruction,
451 	 * must directly be followed by the syscall instruction.
452 	 */
453 	if (regs->regs[0]) {
454 		if (regs->regs[2] == ERESTARTNOHAND ||
455 		    regs->regs[2] == ERESTARTSYS ||
456 		    regs->regs[2] == ERESTARTNOINTR) {
457 			regs->regs[7] = regs->regs[26];
458 			regs->cp0_epc -= 8;
459 		}
460 		if (regs->regs[2] == ERESTART_RESTARTBLOCK) {
461 			regs->regs[2] = __NR_restart_syscall;
462 			regs->regs[7] = regs->regs[26];
463 			regs->cp0_epc -= 4;
464 		}
465 	}
466 	return 0;
467 }
468 
469 /*
470  * notification of userspace execution resumption
471  * - triggered by current->work.notify_resume
472  */
473 asmlinkage void do_notify_resume(struct pt_regs *regs, sigset_t *oldset,
474 	__u32 thread_info_flags)
475 {
476 	/* deal with pending signal delivery */
477 	if (thread_info_flags & _TIF_SIGPENDING) {
478 		current->thread.abi->do_signal(oldset, regs);
479 	}
480 }
481