]>
Commit | Line | Data |
---|---|---|
1da177e4 | 1 | /* |
81e7009e | 2 | * Signal handling for 32bit PPC and 32bit tasks on 64bit PPC |
1da177e4 | 3 | * |
81e7009e SR |
4 | * PowerPC version |
5 | * Copyright (C) 1995-1996 Gary Thomas (gdt@linuxppc.org) | |
1da177e4 LT |
6 | * Copyright (C) 2001 IBM |
7 | * Copyright (C) 1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz) | |
8 | * Copyright (C) 1997 David S. Miller (davem@caip.rutgers.edu) | |
9 | * | |
81e7009e SR |
10 | * Derived from "arch/i386/kernel/signal.c" |
11 | * Copyright (C) 1991, 1992 Linus Torvalds | |
12 | * 1997-11-28 Modified for POSIX.1b signals by Richard Henderson | |
1da177e4 | 13 | * |
81e7009e SR |
14 | * This program is free software; you can redistribute it and/or |
15 | * modify it under the terms of the GNU General Public License | |
16 | * as published by the Free Software Foundation; either version | |
17 | * 2 of the License, or (at your option) any later version. | |
1da177e4 LT |
18 | */ |
19 | ||
20 | #include <linux/config.h> | |
21 | #include <linux/sched.h> | |
81e7009e | 22 | #include <linux/mm.h> |
1da177e4 LT |
23 | #include <linux/smp.h> |
24 | #include <linux/smp_lock.h> | |
25 | #include <linux/kernel.h> | |
26 | #include <linux/signal.h> | |
1da177e4 LT |
27 | #include <linux/errno.h> |
28 | #include <linux/elf.h> | |
81e7009e SR |
29 | #ifdef CONFIG_PPC64 |
30 | #include <linux/syscalls.h> | |
1da177e4 LT |
31 | #include <linux/compat.h> |
32 | #include <linux/ptrace.h> | |
81e7009e SR |
33 | #else |
34 | #include <linux/wait.h> | |
35 | #include <linux/ptrace.h> | |
36 | #include <linux/unistd.h> | |
37 | #include <linux/stddef.h> | |
38 | #include <linux/tty.h> | |
39 | #include <linux/binfmts.h> | |
40 | #include <linux/suspend.h> | |
41 | #endif | |
42 | ||
1da177e4 | 43 | #include <asm/uaccess.h> |
81e7009e SR |
44 | #include <asm/cacheflush.h> |
45 | #ifdef CONFIG_PPC64 | |
46 | #include <asm/ppc32.h> | |
1da177e4 LT |
47 | #include <asm/ppcdebug.h> |
48 | #include <asm/unistd.h> | |
1da177e4 | 49 | #include <asm/vdso.h> |
81e7009e SR |
50 | #else |
51 | #include <asm/ucontext.h> | |
52 | #include <asm/pgtable.h> | |
53 | #endif | |
1da177e4 | 54 | |
81e7009e | 55 | #undef DEBUG_SIG |
1da177e4 LT |
56 | |
57 | #define _BLOCKABLE (~(sigmask(SIGKILL) | sigmask(SIGSTOP))) | |
58 | ||
81e7009e SR |
59 | #ifdef CONFIG_PPC64 |
60 | #define do_signal do_signal32 | |
61 | #define sys_sigsuspend sys32_sigsuspend | |
62 | #define sys_rt_sigsuspend sys32_rt_sigsuspend | |
63 | #define sys_rt_sigreturn sys32_rt_sigreturn | |
64 | #define sys_sigaction sys32_sigaction | |
65 | #define sys_swapcontext sys32_swapcontext | |
66 | #define sys_sigreturn sys32_sigreturn | |
67 | ||
68 | #define old_sigaction old_sigaction32 | |
69 | #define sigcontext sigcontext32 | |
70 | #define mcontext mcontext32 | |
71 | #define ucontext ucontext32 | |
72 | ||
73 | /* | |
74 | * Returning 0 means we return to userspace via | |
75 | * ret_from_except and thus restore all user | |
76 | * registers from *regs. This is what we need | |
77 | * to do when a signal has been delivered. | |
78 | */ | |
79 | #define sigreturn_exit(regs) return 0 | |
80 | ||
81 | #define GP_REGS_SIZE min(sizeof(elf_gregset_t32), sizeof(struct pt_regs32)) | |
82 | #undef __SIGNAL_FRAMESIZE | |
83 | #define __SIGNAL_FRAMESIZE __SIGNAL_FRAMESIZE32 | |
84 | #undef ELF_NVRREG | |
85 | #define ELF_NVRREG ELF_NVRREG32 | |
86 | ||
87 | /* | |
88 | * Functions for flipping sigsets (thanks to brain dead generic | |
89 | * implementation that makes things simple for little endian only) | |
90 | */ | |
91 | static inline int put_sigset_t(compat_sigset_t __user *uset, sigset_t *set) | |
92 | { | |
93 | compat_sigset_t cset; | |
94 | ||
95 | switch (_NSIG_WORDS) { | |
96 | case 4: cset.sig[5] = set->sig[3] & 0xffffffffull; | |
97 | cset.sig[7] = set->sig[3] >> 32; | |
98 | case 3: cset.sig[4] = set->sig[2] & 0xffffffffull; | |
99 | cset.sig[5] = set->sig[2] >> 32; | |
100 | case 2: cset.sig[2] = set->sig[1] & 0xffffffffull; | |
101 | cset.sig[3] = set->sig[1] >> 32; | |
102 | case 1: cset.sig[0] = set->sig[0] & 0xffffffffull; | |
103 | cset.sig[1] = set->sig[0] >> 32; | |
104 | } | |
105 | return copy_to_user(uset, &cset, sizeof(*uset)); | |
106 | } | |
107 | ||
108 | static inline int get_sigset_t(sigset_t *set, compat_sigset_t __user *uset) | |
109 | { | |
110 | compat_sigset_t s32; | |
111 | ||
112 | if (copy_from_user(&s32, uset, sizeof(*uset))) | |
113 | return -EFAULT; | |
114 | ||
115 | /* | |
116 | * Swap the 2 words of the 64-bit sigset_t (they are stored | |
117 | * in the "wrong" endian in 32-bit user storage). | |
118 | */ | |
119 | switch (_NSIG_WORDS) { | |
120 | case 4: set->sig[3] = s32.sig[6] | (((long)s32.sig[7]) << 32); | |
121 | case 3: set->sig[2] = s32.sig[4] | (((long)s32.sig[5]) << 32); | |
122 | case 2: set->sig[1] = s32.sig[2] | (((long)s32.sig[3]) << 32); | |
123 | case 1: set->sig[0] = s32.sig[0] | (((long)s32.sig[1]) << 32); | |
124 | } | |
125 | return 0; | |
126 | } | |
127 | ||
128 | static inline int get_old_sigaction(struct k_sigaction *new_ka, | |
129 | struct old_sigaction __user *act) | |
130 | { | |
131 | compat_old_sigset_t mask; | |
132 | compat_uptr_t handler, restorer; | |
133 | ||
134 | if (get_user(handler, &act->sa_handler) || | |
135 | __get_user(restorer, &act->sa_restorer) || | |
136 | __get_user(new_ka->sa.sa_flags, &act->sa_flags) || | |
137 | __get_user(mask, &act->sa_mask)) | |
138 | return -EFAULT; | |
139 | new_ka->sa.sa_handler = compat_ptr(handler); | |
140 | new_ka->sa.sa_restorer = compat_ptr(restorer); | |
141 | siginitset(&new_ka->sa.sa_mask, mask); | |
142 | return 0; | |
143 | } | |
144 | ||
145 | static inline compat_uptr_t to_user_ptr(void *kp) | |
146 | { | |
147 | return (compat_uptr_t)(u64)kp; | |
148 | } | |
149 | ||
150 | #define from_user_ptr(p) compat_ptr(p) | |
151 | ||
152 | static inline int save_general_regs(struct pt_regs *regs, | |
153 | struct mcontext __user *frame) | |
154 | { | |
155 | elf_greg_t64 *gregs = (elf_greg_t64 *)regs; | |
156 | int i; | |
157 | ||
158 | for (i = 0; i <= PT_RESULT; i ++) | |
159 | if (__put_user((unsigned int)gregs[i], &frame->mc_gregs[i])) | |
160 | return -EFAULT; | |
161 | return 0; | |
162 | } | |
163 | ||
164 | static inline int restore_general_regs(struct pt_regs *regs, | |
165 | struct mcontext __user *sr) | |
166 | { | |
167 | elf_greg_t64 *gregs = (elf_greg_t64 *)regs; | |
168 | int i; | |
169 | ||
170 | for (i = 0; i <= PT_RESULT; i++) { | |
171 | if ((i == PT_MSR) || (i == PT_SOFTE)) | |
172 | continue; | |
173 | if (__get_user(gregs[i], &sr->mc_gregs[i])) | |
174 | return -EFAULT; | |
175 | } | |
176 | return 0; | |
177 | } | |
178 | ||
179 | #else /* CONFIG_PPC64 */ | |
180 | ||
181 | extern void sigreturn_exit(struct pt_regs *); | |
182 | ||
183 | #define GP_REGS_SIZE min(sizeof(elf_gregset_t), sizeof(struct pt_regs)) | |
184 | ||
185 | static inline int put_sigset_t(sigset_t __user *uset, sigset_t *set) | |
186 | { | |
187 | return copy_to_user(uset, set, sizeof(*uset)); | |
188 | } | |
189 | ||
190 | static inline int get_sigset_t(sigset_t *set, sigset_t __user *uset) | |
191 | { | |
192 | return copy_from_user(set, uset, sizeof(*uset)); | |
193 | } | |
194 | ||
195 | static inline int get_old_sigaction(struct k_sigaction *new_ka, | |
196 | struct old_sigaction __user *act) | |
197 | { | |
198 | old_sigset_t mask; | |
199 | ||
200 | if (!access_ok(VERIFY_READ, act, sizeof(*act)) || | |
201 | __get_user(new_ka->sa.sa_handler, &act->sa_handler) || | |
202 | __get_user(new_ka->sa.sa_restorer, &act->sa_restorer)) | |
203 | return -EFAULT; | |
204 | __get_user(new_ka->sa.sa_flags, &act->sa_flags); | |
205 | __get_user(mask, &act->sa_mask); | |
206 | siginitset(&new_ka->sa.sa_mask, mask); | |
207 | return 0; | |
208 | } | |
209 | ||
210 | #define to_user_ptr(p) (p) | |
211 | #define from_user_ptr(p) (p) | |
212 | ||
213 | static inline int save_general_regs(struct pt_regs *regs, | |
214 | struct mcontext __user *frame) | |
215 | { | |
216 | return __copy_to_user(&frame->mc_gregs, regs, GP_REGS_SIZE); | |
217 | } | |
218 | ||
219 | static inline int restore_general_regs(struct pt_regs *regs, | |
220 | struct mcontext __user *sr) | |
221 | { | |
222 | /* copy up to but not including MSR */ | |
223 | if (__copy_from_user(regs, &sr->mc_gregs, | |
224 | PT_MSR * sizeof(elf_greg_t))) | |
225 | return -EFAULT; | |
226 | /* copy from orig_r3 (the word after the MSR) up to the end */ | |
227 | if (__copy_from_user(®s->orig_gpr3, &sr->mc_gregs[PT_ORIG_R3], | |
228 | GP_REGS_SIZE - PT_ORIG_R3 * sizeof(elf_greg_t))) | |
229 | return -EFAULT; | |
230 | return 0; | |
231 | } | |
232 | ||
233 | #endif /* CONFIG_PPC64 */ | |
234 | ||
235 | int do_signal(sigset_t *oldset, struct pt_regs *regs); | |
236 | ||
237 | /* | |
238 | * Atomically swap in the new signal mask, and wait for a signal. | |
239 | */ | |
240 | long sys_sigsuspend(old_sigset_t mask, int p2, int p3, int p4, int p6, int p7, | |
241 | struct pt_regs *regs) | |
242 | { | |
243 | sigset_t saveset; | |
244 | ||
245 | mask &= _BLOCKABLE; | |
246 | spin_lock_irq(¤t->sighand->siglock); | |
247 | saveset = current->blocked; | |
248 | siginitset(¤t->blocked, mask); | |
249 | recalc_sigpending(); | |
250 | spin_unlock_irq(¤t->sighand->siglock); | |
251 | ||
252 | regs->result = -EINTR; | |
253 | regs->gpr[3] = EINTR; | |
254 | regs->ccr |= 0x10000000; | |
255 | while (1) { | |
256 | current->state = TASK_INTERRUPTIBLE; | |
257 | schedule(); | |
258 | if (do_signal(&saveset, regs)) | |
259 | sigreturn_exit(regs); | |
260 | } | |
261 | } | |
262 | ||
263 | long sys_rt_sigsuspend( | |
264 | #ifdef CONFIG_PPC64 | |
265 | compat_sigset_t __user *unewset, | |
266 | #else | |
267 | sigset_t __user *unewset, | |
268 | #endif | |
269 | size_t sigsetsize, int p3, int p4, | |
270 | int p6, int p7, struct pt_regs *regs) | |
271 | { | |
272 | sigset_t saveset, newset; | |
273 | ||
274 | /* XXX: Don't preclude handling different sized sigset_t's. */ | |
275 | if (sigsetsize != sizeof(sigset_t)) | |
276 | return -EINVAL; | |
277 | ||
278 | if (get_sigset_t(&newset, unewset)) | |
279 | return -EFAULT; | |
280 | sigdelsetmask(&newset, ~_BLOCKABLE); | |
281 | ||
282 | spin_lock_irq(¤t->sighand->siglock); | |
283 | saveset = current->blocked; | |
284 | current->blocked = newset; | |
285 | recalc_sigpending(); | |
286 | spin_unlock_irq(¤t->sighand->siglock); | |
287 | ||
288 | regs->result = -EINTR; | |
289 | regs->gpr[3] = EINTR; | |
290 | regs->ccr |= 0x10000000; | |
291 | while (1) { | |
292 | current->state = TASK_INTERRUPTIBLE; | |
293 | schedule(); | |
294 | if (do_signal(&saveset, regs)) | |
295 | sigreturn_exit(regs); | |
296 | } | |
297 | } | |
298 | ||
299 | #ifdef CONFIG_PPC32 | |
300 | long sys_sigaltstack(const stack_t __user *uss, stack_t __user *uoss, int r5, | |
301 | int r6, int r7, int r8, struct pt_regs *regs) | |
302 | { | |
303 | return do_sigaltstack(uss, uoss, regs->gpr[1]); | |
304 | } | |
305 | #endif | |
306 | ||
307 | long sys_sigaction(int sig, struct old_sigaction __user *act, | |
308 | struct old_sigaction __user *oact) | |
309 | { | |
310 | struct k_sigaction new_ka, old_ka; | |
311 | int ret; | |
312 | ||
313 | #ifdef CONFIG_PPC64 | |
314 | if (sig < 0) | |
315 | sig = -sig; | |
316 | #endif | |
317 | ||
318 | if (act) { | |
319 | if (get_old_sigaction(&new_ka, act)) | |
320 | return -EFAULT; | |
321 | } | |
322 | ||
323 | ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL); | |
324 | if (!ret && oact) { | |
325 | if (!access_ok(VERIFY_WRITE, oact, sizeof(*oact)) || | |
326 | __put_user(to_user_ptr(old_ka.sa.sa_handler), | |
327 | &oact->sa_handler) || | |
328 | __put_user(to_user_ptr(old_ka.sa.sa_restorer), | |
329 | &oact->sa_restorer) || | |
330 | __put_user(old_ka.sa.sa_flags, &oact->sa_flags) || | |
331 | __put_user(old_ka.sa.sa_mask.sig[0], &oact->sa_mask)) | |
332 | return -EFAULT; | |
333 | } | |
334 | ||
335 | return ret; | |
336 | } | |
1da177e4 LT |
337 | |
338 | /* | |
339 | * When we have signals to deliver, we set up on the | |
340 | * user stack, going down from the original stack pointer: | |
81e7009e SR |
341 | * a sigregs struct |
342 | * a sigcontext struct | |
343 | * a gap of __SIGNAL_FRAMESIZE bytes | |
1da177e4 LT |
344 | * |
345 | * Each of these things must be a multiple of 16 bytes in size. | |
346 | * | |
347 | */ | |
81e7009e SR |
348 | struct sigregs { |
349 | struct mcontext mctx; /* all the register values */ | |
1da177e4 LT |
350 | /* |
351 | * Programs using the rs6000/xcoff abi can save up to 19 gp | |
352 | * regs and 18 fp regs below sp before decrementing it. | |
353 | */ | |
354 | int abigap[56]; | |
355 | }; | |
356 | ||
357 | /* We use the mc_pad field for the signal return trampoline. */ | |
358 | #define tramp mc_pad | |
359 | ||
360 | /* | |
361 | * When we have rt signals to deliver, we set up on the | |
362 | * user stack, going down from the original stack pointer: | |
81e7009e SR |
363 | * one rt_sigframe struct (siginfo + ucontext + ABI gap) |
364 | * a gap of __SIGNAL_FRAMESIZE+16 bytes | |
365 | * (the +16 is to get the siginfo and ucontext in the same | |
1da177e4 LT |
366 | * positions as in older kernels). |
367 | * | |
368 | * Each of these things must be a multiple of 16 bytes in size. | |
369 | * | |
370 | */ | |
81e7009e SR |
371 | struct rt_sigframe { |
372 | #ifdef CONFIG_PPC64 | |
373 | compat_siginfo_t info; | |
374 | #else | |
375 | struct siginfo info; | |
376 | #endif | |
377 | struct ucontext uc; | |
1da177e4 LT |
378 | /* |
379 | * Programs using the rs6000/xcoff abi can save up to 19 gp | |
380 | * regs and 18 fp regs below sp before decrementing it. | |
381 | */ | |
382 | int abigap[56]; | |
383 | }; | |
384 | ||
1da177e4 LT |
385 | /* |
386 | * Save the current user registers on the user stack. | |
81e7009e SR |
387 | * We only save the altivec/spe registers if the process has used |
388 | * altivec/spe instructions at some point. | |
1da177e4 | 389 | */ |
81e7009e SR |
390 | static int save_user_regs(struct pt_regs *regs, struct mcontext __user *frame, |
391 | int sigret) | |
1da177e4 | 392 | { |
81e7009e SR |
393 | #ifdef CONFIG_PPC32 |
394 | CHECK_FULL_REGS(regs); | |
395 | #endif | |
1da177e4 LT |
396 | /* Make sure floating point registers are stored in regs */ |
397 | flush_fp_to_thread(current); | |
398 | ||
399 | /* save general and floating-point registers */ | |
81e7009e SR |
400 | if (save_general_regs(regs, frame) || |
401 | __copy_to_user(&frame->mc_fregs, current->thread.fpr, | |
402 | ELF_NFPREG * sizeof(double))) | |
1da177e4 LT |
403 | return 1; |
404 | ||
405 | current->thread.fpscr = 0; /* turn off all fp exceptions */ | |
406 | ||
407 | #ifdef CONFIG_ALTIVEC | |
408 | /* save altivec registers */ | |
409 | if (current->thread.used_vr) { | |
410 | flush_altivec_to_thread(current); | |
411 | if (__copy_to_user(&frame->mc_vregs, current->thread.vr, | |
81e7009e | 412 | ELF_NVRREG * sizeof(vector128))) |
1da177e4 LT |
413 | return 1; |
414 | /* set MSR_VEC in the saved MSR value to indicate that | |
415 | frame->mc_vregs contains valid data */ | |
416 | if (__put_user(regs->msr | MSR_VEC, &frame->mc_gregs[PT_MSR])) | |
417 | return 1; | |
418 | } | |
419 | /* else assert((regs->msr & MSR_VEC) == 0) */ | |
420 | ||
421 | /* We always copy to/from vrsave, it's 0 if we don't have or don't | |
422 | * use altivec. Since VSCR only contains 32 bits saved in the least | |
423 | * significant bits of a vector, we "cheat" and stuff VRSAVE in the | |
424 | * most significant bits of that same vector. --BenH | |
425 | */ | |
426 | if (__put_user(current->thread.vrsave, (u32 __user *)&frame->mc_vregs[32])) | |
427 | return 1; | |
428 | #endif /* CONFIG_ALTIVEC */ | |
429 | ||
81e7009e SR |
430 | #ifdef CONFIG_SPE |
431 | /* save spe registers */ | |
432 | if (current->thread.used_spe) { | |
433 | flush_spe_to_thread(current); | |
434 | if (__copy_to_user(&frame->mc_vregs, current->thread.evr, | |
435 | ELF_NEVRREG * sizeof(u32))) | |
436 | return 1; | |
437 | /* set MSR_SPE in the saved MSR value to indicate that | |
438 | frame->mc_vregs contains valid data */ | |
439 | if (__put_user(regs->msr | MSR_SPE, &frame->mc_gregs[PT_MSR])) | |
440 | return 1; | |
441 | } | |
442 | /* else assert((regs->msr & MSR_SPE) == 0) */ | |
443 | ||
444 | /* We always copy to/from spefscr */ | |
445 | if (__put_user(current->thread.spefscr, (u32 __user *)&frame->mc_vregs + ELF_NEVRREG)) | |
446 | return 1; | |
447 | #endif /* CONFIG_SPE */ | |
448 | ||
1da177e4 LT |
449 | if (sigret) { |
450 | /* Set up the sigreturn trampoline: li r0,sigret; sc */ | |
451 | if (__put_user(0x38000000UL + sigret, &frame->tramp[0]) | |
452 | || __put_user(0x44000002UL, &frame->tramp[1])) | |
453 | return 1; | |
454 | flush_icache_range((unsigned long) &frame->tramp[0], | |
455 | (unsigned long) &frame->tramp[2]); | |
456 | } | |
457 | ||
458 | return 0; | |
459 | } | |
460 | ||
461 | /* | |
462 | * Restore the current user register values from the user stack, | |
463 | * (except for MSR). | |
464 | */ | |
465 | static long restore_user_regs(struct pt_regs *regs, | |
81e7009e | 466 | struct mcontext __user *sr, int sig) |
1da177e4 | 467 | { |
81e7009e | 468 | long err; |
1da177e4 | 469 | unsigned int save_r2 = 0; |
81e7009e | 470 | #if defined(CONFIG_ALTIVEC) || defined(CONFIG_SPE) |
1da177e4 LT |
471 | unsigned long msr; |
472 | #endif | |
473 | ||
474 | /* | |
475 | * restore general registers but not including MSR or SOFTE. Also | |
476 | * take care of keeping r2 (TLS) intact if not a signal | |
477 | */ | |
478 | if (!sig) | |
479 | save_r2 = (unsigned int)regs->gpr[2]; | |
81e7009e | 480 | err = restore_general_regs(regs, sr); |
1da177e4 LT |
481 | if (!sig) |
482 | regs->gpr[2] = (unsigned long) save_r2; | |
483 | if (err) | |
484 | return 1; | |
485 | ||
486 | /* force the process to reload the FP registers from | |
487 | current->thread when it next does FP instructions */ | |
488 | regs->msr &= ~(MSR_FP | MSR_FE0 | MSR_FE1); | |
489 | if (__copy_from_user(current->thread.fpr, &sr->mc_fregs, | |
490 | sizeof(sr->mc_fregs))) | |
491 | return 1; | |
492 | ||
493 | #ifdef CONFIG_ALTIVEC | |
494 | /* force the process to reload the altivec registers from | |
495 | current->thread when it next does altivec instructions */ | |
496 | regs->msr &= ~MSR_VEC; | |
497 | if (!__get_user(msr, &sr->mc_gregs[PT_MSR]) && (msr & MSR_VEC) != 0) { | |
498 | /* restore altivec registers from the stack */ | |
499 | if (__copy_from_user(current->thread.vr, &sr->mc_vregs, | |
500 | sizeof(sr->mc_vregs))) | |
501 | return 1; | |
502 | } else if (current->thread.used_vr) | |
81e7009e | 503 | memset(current->thread.vr, 0, ELF_NVRREG * sizeof(vector128)); |
1da177e4 LT |
504 | |
505 | /* Always get VRSAVE back */ | |
506 | if (__get_user(current->thread.vrsave, (u32 __user *)&sr->mc_vregs[32])) | |
507 | return 1; | |
508 | #endif /* CONFIG_ALTIVEC */ | |
509 | ||
81e7009e SR |
510 | #ifdef CONFIG_SPE |
511 | /* force the process to reload the spe registers from | |
512 | current->thread when it next does spe instructions */ | |
513 | regs->msr &= ~MSR_SPE; | |
514 | if (!__get_user(msr, &sr->mc_gregs[PT_MSR]) && (msr & MSR_SPE) != 0) { | |
515 | /* restore spe registers from the stack */ | |
516 | if (__copy_from_user(current->thread.evr, &sr->mc_vregs, | |
517 | ELF_NEVRREG * sizeof(u32))) | |
518 | return 1; | |
519 | } else if (current->thread.used_spe) | |
520 | memset(current->thread.evr, 0, ELF_NEVRREG * sizeof(u32)); | |
521 | ||
522 | /* Always get SPEFSCR back */ | |
523 | if (__get_user(current->thread.spefscr, (u32 __user *)&sr->mc_vregs + ELF_NEVRREG)) | |
524 | return 1; | |
525 | #endif /* CONFIG_SPE */ | |
526 | ||
1da177e4 LT |
527 | #ifndef CONFIG_SMP |
528 | preempt_disable(); | |
529 | if (last_task_used_math == current) | |
530 | last_task_used_math = NULL; | |
531 | if (last_task_used_altivec == current) | |
532 | last_task_used_altivec = NULL; | |
81e7009e SR |
533 | #ifdef CONFIG_SPE |
534 | if (last_task_used_spe == current) | |
535 | last_task_used_spe = NULL; | |
536 | #endif | |
1da177e4 LT |
537 | preempt_enable(); |
538 | #endif | |
539 | return 0; | |
540 | } | |
541 | ||
81e7009e | 542 | #ifdef CONFIG_PPC64 |
1da177e4 LT |
543 | long sys32_rt_sigaction(int sig, const struct sigaction32 __user *act, |
544 | struct sigaction32 __user *oact, size_t sigsetsize) | |
545 | { | |
546 | struct k_sigaction new_ka, old_ka; | |
547 | int ret; | |
1da177e4 LT |
548 | |
549 | /* XXX: Don't preclude handling different sized sigset_t's. */ | |
550 | if (sigsetsize != sizeof(compat_sigset_t)) | |
551 | return -EINVAL; | |
552 | ||
553 | if (act) { | |
554 | compat_uptr_t handler; | |
555 | ||
556 | ret = get_user(handler, &act->sa_handler); | |
557 | new_ka.sa.sa_handler = compat_ptr(handler); | |
81e7009e | 558 | ret |= get_sigset_t(&new_ka.sa.sa_mask, &act->sa_mask); |
1da177e4 LT |
559 | ret |= __get_user(new_ka.sa.sa_flags, &act->sa_flags); |
560 | if (ret) | |
561 | return -EFAULT; | |
562 | } | |
563 | ||
564 | ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL); | |
565 | if (!ret && oact) { | |
1da177e4 | 566 | ret = put_user((long)old_ka.sa.sa_handler, &oact->sa_handler); |
81e7009e | 567 | ret |= put_sigset_t(&oact->sa_mask, &old_ka.sa.sa_mask); |
1da177e4 LT |
568 | ret |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags); |
569 | } | |
570 | return ret; | |
571 | } | |
572 | ||
573 | /* | |
574 | * Note: it is necessary to treat how as an unsigned int, with the | |
575 | * corresponding cast to a signed int to insure that the proper | |
576 | * conversion (sign extension) between the register representation | |
577 | * of a signed int (msr in 32-bit mode) and the register representation | |
578 | * of a signed int (msr in 64-bit mode) is performed. | |
579 | */ | |
580 | long sys32_rt_sigprocmask(u32 how, compat_sigset_t __user *set, | |
581 | compat_sigset_t __user *oset, size_t sigsetsize) | |
582 | { | |
583 | sigset_t s; | |
584 | sigset_t __user *up; | |
1da177e4 LT |
585 | int ret; |
586 | mm_segment_t old_fs = get_fs(); | |
587 | ||
588 | if (set) { | |
81e7009e SR |
589 | if (get_sigset_t(&s, set)) |
590 | return -EFAULT; | |
1da177e4 | 591 | } |
81e7009e | 592 | |
1da177e4 LT |
593 | set_fs(KERNEL_DS); |
594 | /* This is valid because of the set_fs() */ | |
595 | up = (sigset_t __user *) &s; | |
596 | ret = sys_rt_sigprocmask((int)how, set ? up : NULL, oset ? up : NULL, | |
81e7009e | 597 | sigsetsize); |
1da177e4 LT |
598 | set_fs(old_fs); |
599 | if (ret) | |
600 | return ret; | |
601 | if (oset) { | |
81e7009e | 602 | if (put_sigset_t(oset, &s)) |
1da177e4 LT |
603 | return -EFAULT; |
604 | } | |
605 | return 0; | |
606 | } | |
607 | ||
608 | long sys32_rt_sigpending(compat_sigset_t __user *set, compat_size_t sigsetsize) | |
609 | { | |
610 | sigset_t s; | |
1da177e4 LT |
611 | int ret; |
612 | mm_segment_t old_fs = get_fs(); | |
613 | ||
614 | set_fs(KERNEL_DS); | |
615 | /* The __user pointer cast is valid because of the set_fs() */ | |
616 | ret = sys_rt_sigpending((sigset_t __user *) &s, sigsetsize); | |
617 | set_fs(old_fs); | |
618 | if (!ret) { | |
81e7009e | 619 | if (put_sigset_t(set, &s)) |
1da177e4 LT |
620 | return -EFAULT; |
621 | } | |
622 | return ret; | |
623 | } | |
624 | ||
625 | ||
626 | int copy_siginfo_to_user32(struct compat_siginfo __user *d, siginfo_t *s) | |
627 | { | |
628 | int err; | |
629 | ||
630 | if (!access_ok (VERIFY_WRITE, d, sizeof(*d))) | |
631 | return -EFAULT; | |
632 | ||
633 | /* If you change siginfo_t structure, please be sure | |
634 | * this code is fixed accordingly. | |
635 | * It should never copy any pad contained in the structure | |
636 | * to avoid security leaks, but must copy the generic | |
637 | * 3 ints plus the relevant union member. | |
638 | * This routine must convert siginfo from 64bit to 32bit as well | |
639 | * at the same time. | |
640 | */ | |
641 | err = __put_user(s->si_signo, &d->si_signo); | |
642 | err |= __put_user(s->si_errno, &d->si_errno); | |
643 | err |= __put_user((short)s->si_code, &d->si_code); | |
644 | if (s->si_code < 0) | |
645 | err |= __copy_to_user(&d->_sifields._pad, &s->_sifields._pad, | |
646 | SI_PAD_SIZE32); | |
647 | else switch(s->si_code >> 16) { | |
648 | case __SI_CHLD >> 16: | |
649 | err |= __put_user(s->si_pid, &d->si_pid); | |
650 | err |= __put_user(s->si_uid, &d->si_uid); | |
651 | err |= __put_user(s->si_utime, &d->si_utime); | |
652 | err |= __put_user(s->si_stime, &d->si_stime); | |
653 | err |= __put_user(s->si_status, &d->si_status); | |
654 | break; | |
655 | case __SI_FAULT >> 16: | |
656 | err |= __put_user((unsigned int)(unsigned long)s->si_addr, | |
657 | &d->si_addr); | |
658 | break; | |
659 | case __SI_POLL >> 16: | |
660 | err |= __put_user(s->si_band, &d->si_band); | |
661 | err |= __put_user(s->si_fd, &d->si_fd); | |
662 | break; | |
663 | case __SI_TIMER >> 16: | |
664 | err |= __put_user(s->si_tid, &d->si_tid); | |
665 | err |= __put_user(s->si_overrun, &d->si_overrun); | |
666 | err |= __put_user(s->si_int, &d->si_int); | |
667 | break; | |
668 | case __SI_RT >> 16: /* This is not generated by the kernel as of now. */ | |
669 | case __SI_MESGQ >> 16: | |
670 | err |= __put_user(s->si_int, &d->si_int); | |
671 | /* fallthrough */ | |
672 | case __SI_KILL >> 16: | |
673 | default: | |
674 | err |= __put_user(s->si_pid, &d->si_pid); | |
675 | err |= __put_user(s->si_uid, &d->si_uid); | |
676 | break; | |
677 | } | |
678 | return err; | |
679 | } | |
680 | ||
81e7009e SR |
681 | #define copy_siginfo_to_user copy_siginfo_to_user32 |
682 | ||
1da177e4 LT |
683 | /* |
684 | * Note: it is necessary to treat pid and sig as unsigned ints, with the | |
685 | * corresponding cast to a signed int to insure that the proper conversion | |
686 | * (sign extension) between the register representation of a signed int | |
687 | * (msr in 32-bit mode) and the register representation of a signed int | |
688 | * (msr in 64-bit mode) is performed. | |
689 | */ | |
690 | long sys32_rt_sigqueueinfo(u32 pid, u32 sig, compat_siginfo_t __user *uinfo) | |
691 | { | |
692 | siginfo_t info; | |
693 | int ret; | |
694 | mm_segment_t old_fs = get_fs(); | |
81e7009e | 695 | |
1da177e4 LT |
696 | if (copy_from_user (&info, uinfo, 3*sizeof(int)) || |
697 | copy_from_user (info._sifields._pad, uinfo->_sifields._pad, SI_PAD_SIZE32)) | |
698 | return -EFAULT; | |
699 | set_fs (KERNEL_DS); | |
700 | /* The __user pointer cast is valid becasuse of the set_fs() */ | |
701 | ret = sys_rt_sigqueueinfo((int)pid, (int)sig, (siginfo_t __user *) &info); | |
702 | set_fs (old_fs); | |
703 | return ret; | |
704 | } | |
1da177e4 LT |
705 | /* |
706 | * Start Alternate signal stack support | |
707 | * | |
708 | * System Calls | |
709 | * sigaltatck sys32_sigaltstack | |
710 | */ | |
711 | ||
712 | int sys32_sigaltstack(u32 __new, u32 __old, int r5, | |
713 | int r6, int r7, int r8, struct pt_regs *regs) | |
714 | { | |
715 | stack_32_t __user * newstack = (stack_32_t __user *)(long) __new; | |
716 | stack_32_t __user * oldstack = (stack_32_t __user *)(long) __old; | |
717 | stack_t uss, uoss; | |
718 | int ret; | |
719 | mm_segment_t old_fs; | |
720 | unsigned long sp; | |
721 | compat_uptr_t ss_sp; | |
722 | ||
723 | /* | |
724 | * set sp to the user stack on entry to the system call | |
725 | * the system call router sets R9 to the saved registers | |
726 | */ | |
727 | sp = regs->gpr[1]; | |
728 | ||
729 | /* Put new stack info in local 64 bit stack struct */ | |
730 | if (newstack) { | |
731 | if (get_user(ss_sp, &newstack->ss_sp) || | |
732 | __get_user(uss.ss_flags, &newstack->ss_flags) || | |
733 | __get_user(uss.ss_size, &newstack->ss_size)) | |
734 | return -EFAULT; | |
735 | uss.ss_sp = compat_ptr(ss_sp); | |
736 | } | |
737 | ||
738 | old_fs = get_fs(); | |
739 | set_fs(KERNEL_DS); | |
740 | /* The __user pointer casts are valid because of the set_fs() */ | |
741 | ret = do_sigaltstack( | |
742 | newstack ? (stack_t __user *) &uss : NULL, | |
743 | oldstack ? (stack_t __user *) &uoss : NULL, | |
744 | sp); | |
745 | set_fs(old_fs); | |
746 | /* Copy the stack information to the user output buffer */ | |
747 | if (!ret && oldstack && | |
748 | (put_user((long)uoss.ss_sp, &oldstack->ss_sp) || | |
749 | __put_user(uoss.ss_flags, &oldstack->ss_flags) || | |
750 | __put_user(uoss.ss_size, &oldstack->ss_size))) | |
751 | return -EFAULT; | |
752 | return ret; | |
753 | } | |
81e7009e | 754 | #endif /* CONFIG_PPC64 */ |
1da177e4 LT |
755 | |
756 | ||
81e7009e SR |
757 | /* |
758 | * Restore the user process's signal mask | |
759 | */ | |
760 | #ifdef CONFIG_PPC64 | |
761 | extern void restore_sigmask(sigset_t *set); | |
762 | #else /* CONFIG_PPC64 */ | |
763 | static void restore_sigmask(sigset_t *set) | |
764 | { | |
765 | sigdelsetmask(set, ~_BLOCKABLE); | |
766 | spin_lock_irq(¤t->sighand->siglock); | |
767 | current->blocked = *set; | |
768 | recalc_sigpending(); | |
769 | spin_unlock_irq(¤t->sighand->siglock); | |
770 | } | |
771 | #endif | |
772 | ||
1da177e4 LT |
773 | /* |
774 | * Set up a signal frame for a "real-time" signal handler | |
775 | * (one which gets siginfo). | |
776 | */ | |
81e7009e SR |
777 | static int handle_rt_signal(unsigned long sig, struct k_sigaction *ka, |
778 | siginfo_t *info, sigset_t *oldset, | |
779 | struct pt_regs *regs, unsigned long newsp) | |
1da177e4 | 780 | { |
81e7009e SR |
781 | struct rt_sigframe __user *rt_sf; |
782 | struct mcontext __user *frame; | |
1da177e4 | 783 | unsigned long origsp = newsp; |
1da177e4 LT |
784 | |
785 | /* Set up Signal Frame */ | |
786 | /* Put a Real Time Context onto stack */ | |
787 | newsp -= sizeof(*rt_sf); | |
81e7009e | 788 | rt_sf = (struct rt_sigframe __user *)newsp; |
1da177e4 LT |
789 | |
790 | /* create a stack frame for the caller of the handler */ | |
81e7009e | 791 | newsp -= __SIGNAL_FRAMESIZE + 16; |
1da177e4 LT |
792 | |
793 | if (!access_ok(VERIFY_WRITE, (void __user *)newsp, origsp - newsp)) | |
794 | goto badframe; | |
795 | ||
1da177e4 | 796 | /* Put the siginfo & fill in most of the ucontext */ |
81e7009e | 797 | if (copy_siginfo_to_user(&rt_sf->info, info) |
1da177e4 LT |
798 | || __put_user(0, &rt_sf->uc.uc_flags) |
799 | || __put_user(0, &rt_sf->uc.uc_link) | |
800 | || __put_user(current->sas_ss_sp, &rt_sf->uc.uc_stack.ss_sp) | |
801 | || __put_user(sas_ss_flags(regs->gpr[1]), | |
802 | &rt_sf->uc.uc_stack.ss_flags) | |
803 | || __put_user(current->sas_ss_size, &rt_sf->uc.uc_stack.ss_size) | |
81e7009e SR |
804 | || __put_user(to_user_ptr(&rt_sf->uc.uc_mcontext), |
805 | &rt_sf->uc.uc_regs) | |
806 | || put_sigset_t(&rt_sf->uc.uc_sigmask, oldset)) | |
1da177e4 LT |
807 | goto badframe; |
808 | ||
809 | /* Save user registers on the stack */ | |
810 | frame = &rt_sf->uc.uc_mcontext; | |
81e7009e | 811 | #ifdef CONFIG_PPC64 |
1da177e4 LT |
812 | if (vdso32_rt_sigtramp && current->thread.vdso_base) { |
813 | if (save_user_regs(regs, frame, 0)) | |
814 | goto badframe; | |
815 | regs->link = current->thread.vdso_base + vdso32_rt_sigtramp; | |
81e7009e SR |
816 | } else |
817 | #endif | |
818 | { | |
1da177e4 LT |
819 | if (save_user_regs(regs, frame, __NR_rt_sigreturn)) |
820 | goto badframe; | |
821 | regs->link = (unsigned long) frame->tramp; | |
822 | } | |
81e7009e SR |
823 | if (put_user(regs->gpr[1], (unsigned long __user *)newsp)) |
824 | goto badframe; | |
825 | regs->gpr[1] = newsp; | |
1da177e4 LT |
826 | regs->gpr[3] = sig; |
827 | regs->gpr[4] = (unsigned long) &rt_sf->info; | |
828 | regs->gpr[5] = (unsigned long) &rt_sf->uc; | |
829 | regs->gpr[6] = (unsigned long) rt_sf; | |
830 | regs->nip = (unsigned long) ka->sa.sa_handler; | |
81e7009e | 831 | regs->link = (unsigned long) frame->tramp; |
1da177e4 | 832 | regs->trap = 0; |
81e7009e | 833 | #ifdef CONFIG_PPC64 |
1da177e4 LT |
834 | regs->result = 0; |
835 | ||
836 | if (test_thread_flag(TIF_SINGLESTEP)) | |
837 | ptrace_notify(SIGTRAP); | |
81e7009e | 838 | #endif |
1da177e4 LT |
839 | return 1; |
840 | ||
841 | badframe: | |
81e7009e | 842 | #ifdef DEBUG_SIG |
1da177e4 LT |
843 | printk("badframe in handle_rt_signal, regs=%p frame=%p newsp=%lx\n", |
844 | regs, frame, newsp); | |
845 | #endif | |
846 | force_sigsegv(sig, current); | |
847 | return 0; | |
848 | } | |
849 | ||
81e7009e | 850 | static int do_setcontext(struct ucontext __user *ucp, struct pt_regs *regs, int sig) |
1da177e4 | 851 | { |
1da177e4 | 852 | sigset_t set; |
81e7009e SR |
853 | struct mcontext __user *mcp; |
854 | ||
855 | if (get_sigset_t(&set, &ucp->uc_sigmask)) | |
856 | return -EFAULT; | |
857 | #ifdef CONFIG_PPC64 | |
858 | { | |
859 | u32 cmcp; | |
1da177e4 | 860 | |
81e7009e SR |
861 | if (__get_user(cmcp, &ucp->uc_regs)) |
862 | return -EFAULT; | |
863 | mcp = (struct mcontext __user *)(u64)cmcp; | |
864 | } | |
865 | #else | |
866 | if (__get_user(mcp, &ucp->uc_regs)) | |
1da177e4 | 867 | return -EFAULT; |
81e7009e | 868 | #endif |
1da177e4 | 869 | restore_sigmask(&set); |
81e7009e | 870 | if (restore_user_regs(regs, mcp, sig)) |
1da177e4 LT |
871 | return -EFAULT; |
872 | ||
873 | return 0; | |
874 | } | |
875 | ||
81e7009e SR |
876 | long sys_swapcontext(struct ucontext __user *old_ctx, |
877 | struct ucontext __user *new_ctx, | |
1da177e4 LT |
878 | int ctx_size, int r6, int r7, int r8, struct pt_regs *regs) |
879 | { | |
880 | unsigned char tmp; | |
1da177e4 LT |
881 | |
882 | /* Context size is for future use. Right now, we only make sure | |
883 | * we are passed something we understand | |
884 | */ | |
81e7009e | 885 | if (ctx_size < sizeof(struct ucontext)) |
1da177e4 LT |
886 | return -EINVAL; |
887 | ||
888 | if (old_ctx != NULL) { | |
1da177e4 LT |
889 | if (!access_ok(VERIFY_WRITE, old_ctx, sizeof(*old_ctx)) |
890 | || save_user_regs(regs, &old_ctx->uc_mcontext, 0) | |
81e7009e SR |
891 | || put_sigset_t(&old_ctx->uc_sigmask, ¤t->blocked) |
892 | || __put_user(to_user_ptr(&old_ctx->uc_mcontext), | |
893 | &old_ctx->uc_regs)) | |
1da177e4 LT |
894 | return -EFAULT; |
895 | } | |
896 | if (new_ctx == NULL) | |
897 | return 0; | |
898 | if (!access_ok(VERIFY_READ, new_ctx, sizeof(*new_ctx)) | |
899 | || __get_user(tmp, (u8 __user *) new_ctx) | |
900 | || __get_user(tmp, (u8 __user *) (new_ctx + 1) - 1)) | |
901 | return -EFAULT; | |
902 | ||
903 | /* | |
904 | * If we get a fault copying the context into the kernel's | |
905 | * image of the user's registers, we can't just return -EFAULT | |
906 | * because the user's registers will be corrupted. For instance | |
907 | * the NIP value may have been updated but not some of the | |
908 | * other registers. Given that we have done the access_ok | |
909 | * and successfully read the first and last bytes of the region | |
910 | * above, this should only happen in an out-of-memory situation | |
911 | * or if another thread unmaps the region containing the context. | |
912 | * We kill the task with a SIGSEGV in this situation. | |
913 | */ | |
81e7009e | 914 | if (do_setcontext(new_ctx, regs, 0)) |
1da177e4 | 915 | do_exit(SIGSEGV); |
81e7009e SR |
916 | sigreturn_exit(regs); |
917 | /* doesn't actually return back to here */ | |
1da177e4 LT |
918 | return 0; |
919 | } | |
920 | ||
81e7009e | 921 | long sys_rt_sigreturn(int r3, int r4, int r5, int r6, int r7, int r8, |
1da177e4 LT |
922 | struct pt_regs *regs) |
923 | { | |
81e7009e | 924 | struct rt_sigframe __user *rt_sf; |
1da177e4 LT |
925 | |
926 | /* Always make any pending restarted system calls return -EINTR */ | |
927 | current_thread_info()->restart_block.fn = do_no_restart_syscall; | |
928 | ||
81e7009e SR |
929 | rt_sf = (struct rt_sigframe __user *) |
930 | (regs->gpr[1] + __SIGNAL_FRAMESIZE + 16); | |
1da177e4 LT |
931 | if (!access_ok(VERIFY_READ, rt_sf, sizeof(*rt_sf))) |
932 | goto bad; | |
81e7009e | 933 | if (do_setcontext(&rt_sf->uc, regs, 1)) |
1da177e4 LT |
934 | goto bad; |
935 | ||
936 | /* | |
937 | * It's not clear whether or why it is desirable to save the | |
938 | * sigaltstack setting on signal delivery and restore it on | |
939 | * signal return. But other architectures do this and we have | |
940 | * always done it up until now so it is probably better not to | |
941 | * change it. -- paulus | |
81e7009e SR |
942 | */ |
943 | #ifdef CONFIG_PPC64 | |
944 | /* | |
1da177e4 LT |
945 | * We use the sys32_ version that does the 32/64 bits conversion |
946 | * and takes userland pointer directly. What about error checking ? | |
947 | * nobody does any... | |
948 | */ | |
81e7009e SR |
949 | sys32_sigaltstack((u32)(u64)&rt_sf->uc.uc_stack, 0, 0, 0, 0, 0, regs); |
950 | return (int)regs->result; | |
951 | #else | |
952 | do_sigaltstack(&rt_sf->uc.uc_stack, NULL, regs->gpr[1]); | |
953 | sigreturn_exit(regs); /* doesn't return here */ | |
954 | return 0; | |
955 | #endif | |
1da177e4 LT |
956 | |
957 | bad: | |
958 | force_sig(SIGSEGV, current); | |
959 | return 0; | |
960 | } | |
961 | ||
81e7009e SR |
962 | #ifdef CONFIG_PPC32 |
963 | int sys_debug_setcontext(struct ucontext __user *ctx, | |
964 | int ndbg, struct sig_dbg_op __user *dbg, | |
965 | int r6, int r7, int r8, | |
966 | struct pt_regs *regs) | |
967 | { | |
968 | struct sig_dbg_op op; | |
969 | int i; | |
970 | unsigned long new_msr = regs->msr; | |
971 | #if defined(CONFIG_4xx) || defined(CONFIG_BOOKE) | |
972 | unsigned long new_dbcr0 = current->thread.dbcr0; | |
973 | #endif | |
974 | ||
975 | for (i=0; i<ndbg; i++) { | |
976 | if (__copy_from_user(&op, dbg, sizeof(op))) | |
977 | return -EFAULT; | |
978 | switch (op.dbg_type) { | |
979 | case SIG_DBG_SINGLE_STEPPING: | |
980 | #if defined(CONFIG_4xx) || defined(CONFIG_BOOKE) | |
981 | if (op.dbg_value) { | |
982 | new_msr |= MSR_DE; | |
983 | new_dbcr0 |= (DBCR0_IDM | DBCR0_IC); | |
984 | } else { | |
985 | new_msr &= ~MSR_DE; | |
986 | new_dbcr0 &= ~(DBCR0_IDM | DBCR0_IC); | |
987 | } | |
988 | #else | |
989 | if (op.dbg_value) | |
990 | new_msr |= MSR_SE; | |
991 | else | |
992 | new_msr &= ~MSR_SE; | |
993 | #endif | |
994 | break; | |
995 | case SIG_DBG_BRANCH_TRACING: | |
996 | #if defined(CONFIG_4xx) || defined(CONFIG_BOOKE) | |
997 | return -EINVAL; | |
998 | #else | |
999 | if (op.dbg_value) | |
1000 | new_msr |= MSR_BE; | |
1001 | else | |
1002 | new_msr &= ~MSR_BE; | |
1003 | #endif | |
1004 | break; | |
1005 | ||
1006 | default: | |
1007 | return -EINVAL; | |
1008 | } | |
1009 | } | |
1010 | ||
1011 | /* We wait until here to actually install the values in the | |
1012 | registers so if we fail in the above loop, it will not | |
1013 | affect the contents of these registers. After this point, | |
1014 | failure is a problem, anyway, and it's very unlikely unless | |
1015 | the user is really doing something wrong. */ | |
1016 | regs->msr = new_msr; | |
1017 | #if defined(CONFIG_4xx) || defined(CONFIG_BOOKE) | |
1018 | current->thread.dbcr0 = new_dbcr0; | |
1019 | #endif | |
1020 | ||
1021 | /* | |
1022 | * If we get a fault copying the context into the kernel's | |
1023 | * image of the user's registers, we can't just return -EFAULT | |
1024 | * because the user's registers will be corrupted. For instance | |
1025 | * the NIP value may have been updated but not some of the | |
1026 | * other registers. Given that we have done the access_ok | |
1027 | * and successfully read the first and last bytes of the region | |
1028 | * above, this should only happen in an out-of-memory situation | |
1029 | * or if another thread unmaps the region containing the context. | |
1030 | * We kill the task with a SIGSEGV in this situation. | |
1031 | */ | |
1032 | if (do_setcontext(ctx, regs, 1)) { | |
1033 | force_sig(SIGSEGV, current); | |
1034 | goto out; | |
1035 | } | |
1036 | ||
1037 | /* | |
1038 | * It's not clear whether or why it is desirable to save the | |
1039 | * sigaltstack setting on signal delivery and restore it on | |
1040 | * signal return. But other architectures do this and we have | |
1041 | * always done it up until now so it is probably better not to | |
1042 | * change it. -- paulus | |
1043 | */ | |
1044 | do_sigaltstack(&ctx->uc_stack, NULL, regs->gpr[1]); | |
1045 | ||
1046 | sigreturn_exit(regs); | |
1047 | /* doesn't actually return back to here */ | |
1048 | ||
1049 | out: | |
1050 | return 0; | |
1051 | } | |
1052 | #endif | |
1da177e4 LT |
1053 | |
1054 | /* | |
1055 | * OK, we're invoking a handler | |
1056 | */ | |
81e7009e SR |
1057 | static int handle_signal(unsigned long sig, struct k_sigaction *ka, |
1058 | siginfo_t *info, sigset_t *oldset, struct pt_regs *regs, | |
1059 | unsigned long newsp) | |
1da177e4 | 1060 | { |
81e7009e SR |
1061 | struct sigcontext __user *sc; |
1062 | struct sigregs __user *frame; | |
1da177e4 LT |
1063 | unsigned long origsp = newsp; |
1064 | ||
1065 | /* Set up Signal Frame */ | |
81e7009e SR |
1066 | newsp -= sizeof(struct sigregs); |
1067 | frame = (struct sigregs __user *) newsp; | |
1da177e4 LT |
1068 | |
1069 | /* Put a sigcontext on the stack */ | |
1070 | newsp -= sizeof(*sc); | |
81e7009e | 1071 | sc = (struct sigcontext __user *) newsp; |
1da177e4 LT |
1072 | |
1073 | /* create a stack frame for the caller of the handler */ | |
81e7009e | 1074 | newsp -= __SIGNAL_FRAMESIZE; |
1da177e4 LT |
1075 | |
1076 | if (!access_ok(VERIFY_WRITE, (void __user *) newsp, origsp - newsp)) | |
1077 | goto badframe; | |
1078 | ||
1079 | #if _NSIG != 64 | |
81e7009e | 1080 | #error "Please adjust handle_signal()" |
1da177e4 | 1081 | #endif |
81e7009e | 1082 | if (__put_user(to_user_ptr(ka->sa.sa_handler), &sc->handler) |
1da177e4 | 1083 | || __put_user(oldset->sig[0], &sc->oldmask) |
81e7009e | 1084 | #ifdef CONFIG_PPC64 |
1da177e4 | 1085 | || __put_user((oldset->sig[0] >> 32), &sc->_unused[3]) |
81e7009e SR |
1086 | #else |
1087 | || __put_user(oldset->sig[1], &sc->_unused[3]) | |
1088 | #endif | |
1089 | || __put_user(to_user_ptr(frame), &sc->regs) | |
1da177e4 LT |
1090 | || __put_user(sig, &sc->signal)) |
1091 | goto badframe; | |
1092 | ||
81e7009e | 1093 | #ifdef CONFIG_PPC64 |
1da177e4 LT |
1094 | if (vdso32_sigtramp && current->thread.vdso_base) { |
1095 | if (save_user_regs(regs, &frame->mctx, 0)) | |
1096 | goto badframe; | |
1097 | regs->link = current->thread.vdso_base + vdso32_sigtramp; | |
81e7009e SR |
1098 | } else |
1099 | #endif | |
1100 | { | |
1da177e4 LT |
1101 | if (save_user_regs(regs, &frame->mctx, __NR_sigreturn)) |
1102 | goto badframe; | |
1103 | regs->link = (unsigned long) frame->mctx.tramp; | |
1104 | } | |
1105 | ||
9747dd6f | 1106 | if (put_user(regs->gpr[1], (u32 __user *)newsp)) |
1da177e4 | 1107 | goto badframe; |
81e7009e | 1108 | regs->gpr[1] = newsp; |
1da177e4 LT |
1109 | regs->gpr[3] = sig; |
1110 | regs->gpr[4] = (unsigned long) sc; | |
1111 | regs->nip = (unsigned long) ka->sa.sa_handler; | |
1112 | regs->trap = 0; | |
81e7009e | 1113 | #ifdef CONFIG_PPC64 |
1da177e4 LT |
1114 | regs->result = 0; |
1115 | ||
1116 | if (test_thread_flag(TIF_SINGLESTEP)) | |
1117 | ptrace_notify(SIGTRAP); | |
81e7009e | 1118 | #endif |
1da177e4 LT |
1119 | |
1120 | return 1; | |
1121 | ||
1122 | badframe: | |
81e7009e SR |
1123 | #ifdef DEBUG_SIG |
1124 | printk("badframe in handle_signal, regs=%p frame=%p newsp=%lx\n", | |
1125 | regs, frame, newsp); | |
1da177e4 LT |
1126 | #endif |
1127 | force_sigsegv(sig, current); | |
1128 | return 0; | |
1129 | } | |
1130 | ||
1131 | /* | |
1132 | * Do a signal return; undo the signal stack. | |
1133 | */ | |
81e7009e | 1134 | long sys_sigreturn(int r3, int r4, int r5, int r6, int r7, int r8, |
1da177e4 LT |
1135 | struct pt_regs *regs) |
1136 | { | |
81e7009e SR |
1137 | struct sigcontext __user *sc; |
1138 | struct sigcontext sigctx; | |
1139 | struct mcontext __user *sr; | |
1da177e4 | 1140 | sigset_t set; |
1da177e4 LT |
1141 | |
1142 | /* Always make any pending restarted system calls return -EINTR */ | |
1143 | current_thread_info()->restart_block.fn = do_no_restart_syscall; | |
1144 | ||
81e7009e | 1145 | sc = (struct sigcontext __user *)(regs->gpr[1] + __SIGNAL_FRAMESIZE); |
1da177e4 LT |
1146 | if (copy_from_user(&sigctx, sc, sizeof(sigctx))) |
1147 | goto badframe; | |
1148 | ||
81e7009e | 1149 | #ifdef CONFIG_PPC64 |
1da177e4 LT |
1150 | /* |
1151 | * Note that PPC32 puts the upper 32 bits of the sigmask in the | |
1152 | * unused part of the signal stackframe | |
1153 | */ | |
1154 | set.sig[0] = sigctx.oldmask + ((long)(sigctx._unused[3]) << 32); | |
81e7009e SR |
1155 | #else |
1156 | set.sig[0] = sigctx.oldmask; | |
1157 | set.sig[1] = sigctx._unused[3]; | |
1158 | #endif | |
1da177e4 LT |
1159 | restore_sigmask(&set); |
1160 | ||
81e7009e | 1161 | sr = (struct mcontext __user *)from_user_ptr(sigctx.regs); |
1da177e4 LT |
1162 | if (!access_ok(VERIFY_READ, sr, sizeof(*sr)) |
1163 | || restore_user_regs(regs, sr, 1)) | |
1164 | goto badframe; | |
1165 | ||
81e7009e SR |
1166 | #ifdef CONFIG_PPC64 |
1167 | return (int)regs->result; | |
1168 | #else | |
1169 | sigreturn_exit(regs); /* doesn't return */ | |
1170 | return 0; | |
1171 | #endif | |
1da177e4 LT |
1172 | |
1173 | badframe: | |
1174 | force_sig(SIGSEGV, current); | |
1175 | return 0; | |
1176 | } | |
1177 | ||
1da177e4 LT |
1178 | /* |
1179 | * Note that 'init' is a special process: it doesn't get signals it doesn't | |
1180 | * want to handle. Thus you cannot kill init even with a SIGKILL even by | |
1181 | * mistake. | |
1182 | */ | |
81e7009e | 1183 | int do_signal(sigset_t *oldset, struct pt_regs *regs) |
1da177e4 LT |
1184 | { |
1185 | siginfo_t info; | |
81e7009e | 1186 | struct k_sigaction ka; |
1da177e4 LT |
1187 | unsigned int frame, newsp; |
1188 | int signr, ret; | |
81e7009e SR |
1189 | |
1190 | #ifdef CONFIG_PPC32 | |
1191 | if (try_to_freeze()) { | |
1192 | signr = 0; | |
1193 | if (!signal_pending(current)) | |
1194 | goto no_signal; | |
1195 | } | |
1196 | #endif | |
1da177e4 LT |
1197 | |
1198 | if (!oldset) | |
1199 | oldset = ¤t->blocked; | |
1200 | ||
1201 | newsp = frame = 0; | |
1202 | ||
1203 | signr = get_signal_to_deliver(&info, &ka, regs, NULL); | |
81e7009e SR |
1204 | #ifdef CONFIG_PPC32 |
1205 | no_signal: | |
1206 | #endif | |
1da177e4 LT |
1207 | if (TRAP(regs) == 0x0C00 /* System Call! */ |
1208 | && regs->ccr & 0x10000000 /* error signalled */ | |
1209 | && ((ret = regs->gpr[3]) == ERESTARTSYS | |
1210 | || ret == ERESTARTNOHAND || ret == ERESTARTNOINTR | |
1211 | || ret == ERESTART_RESTARTBLOCK)) { | |
1212 | ||
1213 | if (signr > 0 | |
1214 | && (ret == ERESTARTNOHAND || ret == ERESTART_RESTARTBLOCK | |
1215 | || (ret == ERESTARTSYS | |
1216 | && !(ka.sa.sa_flags & SA_RESTART)))) { | |
1217 | /* make the system call return an EINTR error */ | |
1218 | regs->result = -EINTR; | |
1219 | regs->gpr[3] = EINTR; | |
1220 | /* note that the cr0.SO bit is already set */ | |
1221 | } else { | |
1222 | regs->nip -= 4; /* Back up & retry system call */ | |
1223 | regs->result = 0; | |
1224 | regs->trap = 0; | |
1225 | if (ret == ERESTART_RESTARTBLOCK) | |
1226 | regs->gpr[0] = __NR_restart_syscall; | |
1227 | else | |
1228 | regs->gpr[3] = regs->orig_gpr3; | |
1229 | } | |
1230 | } | |
1231 | ||
1232 | if (signr == 0) | |
1233 | return 0; /* no signals delivered */ | |
1234 | ||
1235 | if ((ka.sa.sa_flags & SA_ONSTACK) && current->sas_ss_size | |
81e7009e SR |
1236 | && !on_sig_stack(regs->gpr[1])) |
1237 | newsp = current->sas_ss_sp + current->sas_ss_size; | |
1da177e4 LT |
1238 | else |
1239 | newsp = regs->gpr[1]; | |
1240 | newsp &= ~0xfUL; | |
1241 | ||
81e7009e | 1242 | #ifdef CONFIG_PPC64 |
fd9648df AB |
1243 | /* |
1244 | * Reenable the DABR before delivering the signal to | |
1245 | * user space. The DABR will have been cleared if it | |
1246 | * triggered inside the kernel. | |
1247 | */ | |
1248 | if (current->thread.dabr) | |
1249 | set_dabr(current->thread.dabr); | |
81e7009e | 1250 | #endif |
fd9648df | 1251 | |
1da177e4 LT |
1252 | /* Whee! Actually deliver the signal. */ |
1253 | if (ka.sa.sa_flags & SA_SIGINFO) | |
81e7009e | 1254 | ret = handle_rt_signal(signr, &ka, &info, oldset, regs, newsp); |
1da177e4 | 1255 | else |
81e7009e | 1256 | ret = handle_signal(signr, &ka, &info, oldset, regs, newsp); |
1da177e4 | 1257 | |
69be8f18 | 1258 | if (ret) { |
1da177e4 LT |
1259 | spin_lock_irq(¤t->sighand->siglock); |
1260 | sigorsets(¤t->blocked, ¤t->blocked, | |
1261 | &ka.sa.sa_mask); | |
69be8f18 SR |
1262 | if (!(ka.sa.sa_flags & SA_NODEFER)) |
1263 | sigaddset(¤t->blocked, signr); | |
1da177e4 LT |
1264 | recalc_sigpending(); |
1265 | spin_unlock_irq(¤t->sighand->siglock); | |
1266 | } | |
1267 | ||
1268 | return ret; | |
1269 | } |