[PARISC] fix sys_rt_sigqueueinfo
[deliverable/linux.git] / arch / parisc / kernel / signal32.c
1 /* Signal support for 32-bit kernel builds
2 *
3 * Copyright (C) 2001 Matthew Wilcox <willy at parisc-linux.org>
4 * Copyright (C) 2006 Kyle McMartin <kyle at parisc-linux.org>
5 *
6 * Code was mostly borrowed from kernel/signal.c.
7 * See kernel/signal.c for additional Copyrights.
8 *
9 *
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 */
24
25 #include <linux/compat.h>
26 #include <linux/slab.h>
27 #include <linux/module.h>
28 #include <linux/unistd.h>
29 #include <linux/smp_lock.h>
30 #include <linux/init.h>
31 #include <linux/sched.h>
32 #include <linux/syscalls.h>
33 #include <linux/types.h>
34 #include <linux/errno.h>
35
36 #include <asm/uaccess.h>
37
38 #include "signal32.h"
39 #include "sys32.h"
40
41 #define DEBUG_COMPAT_SIG 0
42 #define DEBUG_COMPAT_SIG_LEVEL 2
43
44 #if DEBUG_COMPAT_SIG
45 #define DBG(LEVEL, ...) \
46 ((DEBUG_COMPAT_SIG_LEVEL >= LEVEL) \
47 ? printk(__VA_ARGS__) : (void) 0)
48 #else
49 #define DBG(LEVEL, ...)
50 #endif
51
52 #define _BLOCKABLE (~(sigmask(SIGKILL) | sigmask(SIGSTOP)))
53
54 inline void
55 sigset_32to64(sigset_t *s64, compat_sigset_t *s32)
56 {
57 s64->sig[0] = s32->sig[0] | ((unsigned long)s32->sig[1] << 32);
58 }
59
60 inline void
61 sigset_64to32(compat_sigset_t *s32, sigset_t *s64)
62 {
63 s32->sig[0] = s64->sig[0] & 0xffffffffUL;
64 s32->sig[1] = (s64->sig[0] >> 32) & 0xffffffffUL;
65 }
66
67 static int
68 put_sigset32(compat_sigset_t __user *up, sigset_t *set, size_t sz)
69 {
70 compat_sigset_t s;
71
72 if (sz != sizeof *set) panic("put_sigset32()");
73 sigset_64to32(&s, set);
74
75 return copy_to_user(up, &s, sizeof s);
76 }
77
78 static int
79 get_sigset32(compat_sigset_t __user *up, sigset_t *set, size_t sz)
80 {
81 compat_sigset_t s;
82 int r;
83
84 if (sz != sizeof *set) panic("put_sigset32()");
85
86 if ((r = copy_from_user(&s, up, sz)) == 0) {
87 sigset_32to64(set, &s);
88 }
89
90 return r;
91 }
92
93 int sys32_rt_sigprocmask(int how, compat_sigset_t __user *set, compat_sigset_t __user *oset,
94 unsigned int sigsetsize)
95 {
96 sigset_t old_set, new_set;
97 int ret;
98
99 if (set && get_sigset32(set, &new_set, sigsetsize))
100 return -EFAULT;
101
102 KERNEL_SYSCALL(ret, sys_rt_sigprocmask, how, set ? (sigset_t __user *)&new_set : NULL,
103 oset ? (sigset_t __user *)&old_set : NULL, sigsetsize);
104
105 if (!ret && oset && put_sigset32(oset, &old_set, sigsetsize))
106 return -EFAULT;
107
108 return ret;
109 }
110
111
112 int sys32_rt_sigpending(compat_sigset_t __user *uset, unsigned int sigsetsize)
113 {
114 int ret;
115 sigset_t set;
116
117 KERNEL_SYSCALL(ret, sys_rt_sigpending, (sigset_t __user *)&set, sigsetsize);
118
119 if (!ret && put_sigset32(uset, &set, sigsetsize))
120 return -EFAULT;
121
122 return ret;
123 }
124
125 long
126 sys32_rt_sigaction(int sig, const struct sigaction32 __user *act, struct sigaction32 __user *oact,
127 size_t sigsetsize)
128 {
129 struct k_sigaction32 new_sa32, old_sa32;
130 struct k_sigaction new_sa, old_sa;
131 int ret = -EINVAL;
132
133 if (act) {
134 if (copy_from_user(&new_sa32.sa, act, sizeof new_sa32.sa))
135 return -EFAULT;
136 new_sa.sa.sa_handler = (__sighandler_t)(unsigned long)new_sa32.sa.sa_handler;
137 new_sa.sa.sa_flags = new_sa32.sa.sa_flags;
138 sigset_32to64(&new_sa.sa.sa_mask, &new_sa32.sa.sa_mask);
139 }
140
141 ret = do_sigaction(sig, act ? &new_sa : NULL, oact ? &old_sa : NULL);
142
143 if (!ret && oact) {
144 sigset_64to32(&old_sa32.sa.sa_mask, &old_sa.sa.sa_mask);
145 old_sa32.sa.sa_flags = old_sa.sa.sa_flags;
146 old_sa32.sa.sa_handler = (__sighandler_t32)(unsigned long)old_sa.sa.sa_handler;
147 if (copy_to_user(oact, &old_sa32.sa, sizeof old_sa32.sa))
148 return -EFAULT;
149 }
150 return ret;
151 }
152
153 int
154 do_sigaltstack32 (const compat_stack_t __user *uss32, compat_stack_t __user *uoss32, unsigned long sp)
155 {
156 compat_stack_t ss32, oss32;
157 stack_t ss, oss;
158 stack_t *ssp = NULL, *ossp = NULL;
159 int ret;
160
161 if (uss32) {
162 if (copy_from_user(&ss32, uss32, sizeof ss32))
163 return -EFAULT;
164
165 ss.ss_sp = (void __user *)(unsigned long)ss32.ss_sp;
166 ss.ss_flags = ss32.ss_flags;
167 ss.ss_size = ss32.ss_size;
168
169 ssp = &ss;
170 }
171
172 if (uoss32)
173 ossp = &oss;
174
175 KERNEL_SYSCALL(ret, do_sigaltstack, (const stack_t __user *)ssp, (stack_t __user *)ossp, sp);
176
177 if (!ret && uoss32) {
178 oss32.ss_sp = (unsigned int)(unsigned long)oss.ss_sp;
179 oss32.ss_flags = oss.ss_flags;
180 oss32.ss_size = oss.ss_size;
181 if (copy_to_user(uoss32, &oss32, sizeof *uoss32))
182 return -EFAULT;
183 }
184
185 return ret;
186 }
187
188 long
189 restore_sigcontext32(struct compat_sigcontext __user *sc, struct compat_regfile __user * rf,
190 struct pt_regs *regs)
191 {
192 long err = 0;
193 compat_uint_t compat_reg;
194 compat_uint_t compat_regt;
195 int regn;
196
197 /* When loading 32-bit values into 64-bit registers make
198 sure to clear the upper 32-bits */
199 DBG(2,"restore_sigcontext32: PER_LINUX32 process\n");
200 DBG(2,"restore_sigcontext32: sc = 0x%p, rf = 0x%p, regs = 0x%p\n", sc, rf, regs);
201 DBG(2,"restore_sigcontext32: compat_sigcontext is %#lx bytes\n", sizeof(*sc));
202 for(regn=0; regn < 32; regn++){
203 err |= __get_user(compat_reg,&sc->sc_gr[regn]);
204 regs->gr[regn] = compat_reg;
205 /* Load upper half */
206 err |= __get_user(compat_regt,&rf->rf_gr[regn]);
207 regs->gr[regn] = ((u64)compat_regt << 32) | (u64)compat_reg;
208 DBG(3,"restore_sigcontext32: gr%02d = %#lx (%#x / %#x)\n",
209 regn, regs->gr[regn], compat_regt, compat_reg);
210 }
211 DBG(2,"restore_sigcontext32: sc->sc_fr = 0x%p (%#lx)\n",sc->sc_fr, sizeof(sc->sc_fr));
212 /* XXX: BE WARNED FR's are 64-BIT! */
213 err |= __copy_from_user(regs->fr, sc->sc_fr, sizeof(regs->fr));
214
215 /* Better safe than sorry, pass __get_user two things of
216 the same size and let gcc do the upward conversion to
217 64-bits */
218 err |= __get_user(compat_reg, &sc->sc_iaoq[0]);
219 /* Load upper half */
220 err |= __get_user(compat_regt, &rf->rf_iaoq[0]);
221 regs->iaoq[0] = ((u64)compat_regt << 32) | (u64)compat_reg;
222 DBG(2,"restore_sigcontext32: upper half of iaoq[0] = %#lx\n", compat_regt);
223 DBG(2,"restore_sigcontext32: sc->sc_iaoq[0] = %p => %#x\n",
224 &sc->sc_iaoq[0], compat_reg);
225
226 err |= __get_user(compat_reg, &sc->sc_iaoq[1]);
227 /* Load upper half */
228 err |= __get_user(compat_regt, &rf->rf_iaoq[1]);
229 regs->iaoq[1] = ((u64)compat_regt << 32) | (u64)compat_reg;
230 DBG(2,"restore_sigcontext32: upper half of iaoq[1] = %#lx\n", compat_regt);
231 DBG(2,"restore_sigcontext32: sc->sc_iaoq[1] = %p => %#x\n",
232 &sc->sc_iaoq[1],compat_reg);
233 DBG(2,"restore_sigcontext32: iaoq is %#lx / %#lx\n",
234 regs->iaoq[0],regs->iaoq[1]);
235
236 err |= __get_user(compat_reg, &sc->sc_iasq[0]);
237 /* Load the upper half for iasq */
238 err |= __get_user(compat_regt, &rf->rf_iasq[0]);
239 regs->iasq[0] = ((u64)compat_regt << 32) | (u64)compat_reg;
240 DBG(2,"restore_sigcontext32: upper half of iasq[0] = %#lx\n", compat_regt);
241
242 err |= __get_user(compat_reg, &sc->sc_iasq[1]);
243 /* Load the upper half for iasq */
244 err |= __get_user(compat_regt, &rf->rf_iasq[1]);
245 regs->iasq[1] = ((u64)compat_regt << 32) | (u64)compat_reg;
246 DBG(2,"restore_sigcontext32: upper half of iasq[1] = %#lx\n", compat_regt);
247 DBG(2,"restore_sigcontext32: iasq is %#lx / %#lx\n",
248 regs->iasq[0],regs->iasq[1]);
249
250 err |= __get_user(compat_reg, &sc->sc_sar);
251 /* Load the upper half for sar */
252 err |= __get_user(compat_regt, &rf->rf_sar);
253 regs->sar = ((u64)compat_regt << 32) | (u64)compat_reg;
254 DBG(2,"restore_sigcontext32: upper_half & sar = %#lx\n", compat_regt);
255 DBG(2,"restore_sigcontext32: sar is %#lx\n", regs->sar);
256 DBG(2,"restore_sigcontext32: r28 is %ld\n", regs->gr[28]);
257
258 return err;
259 }
260
261 /*
262 * Set up the sigcontext structure for this process.
263 * This is not an easy task if the kernel is 64-bit, it will require
264 * that we examine the process personality to determine if we need to
265 * truncate for a 32-bit userspace.
266 */
267 long
268 setup_sigcontext32(struct compat_sigcontext __user *sc, struct compat_regfile __user * rf,
269 struct pt_regs *regs, int in_syscall)
270 {
271 compat_int_t flags = 0;
272 long err = 0;
273 compat_uint_t compat_reg;
274 compat_uint_t compat_regb;
275 int regn;
276
277 if (on_sig_stack((unsigned long) sc))
278 flags |= PARISC_SC_FLAG_ONSTACK;
279
280 if (in_syscall) {
281
282 DBG(1,"setup_sigcontext32: in_syscall\n");
283
284 flags |= PARISC_SC_FLAG_IN_SYSCALL;
285 /* Truncate gr31 */
286 compat_reg = (compat_uint_t)(regs->gr[31]);
287 /* regs->iaoq is undefined in the syscall return path */
288 err |= __put_user(compat_reg, &sc->sc_iaoq[0]);
289 DBG(2,"setup_sigcontext32: sc->sc_iaoq[0] = %p <= %#x\n",
290 &sc->sc_iaoq[0], compat_reg);
291
292 /* Store upper half */
293 compat_reg = (compat_uint_t)(regs->gr[32] >> 32);
294 err |= __put_user(compat_reg, &rf->rf_iaoq[0]);
295 DBG(2,"setup_sigcontext32: upper half iaoq[0] = %#x\n", compat_reg);
296
297
298 compat_reg = (compat_uint_t)(regs->gr[31]+4);
299 err |= __put_user(compat_reg, &sc->sc_iaoq[1]);
300 DBG(2,"setup_sigcontext32: sc->sc_iaoq[1] = %p <= %#x\n",
301 &sc->sc_iaoq[1], compat_reg);
302 /* Store upper half */
303 compat_reg = (compat_uint_t)((regs->gr[32]+4) >> 32);
304 err |= __put_user(compat_reg, &rf->rf_iaoq[1]);
305 DBG(2,"setup_sigcontext32: upper half iaoq[1] = %#x\n", compat_reg);
306
307 /* Truncate sr3 */
308 compat_reg = (compat_uint_t)(regs->sr[3]);
309 err |= __put_user(compat_reg, &sc->sc_iasq[0]);
310 err |= __put_user(compat_reg, &sc->sc_iasq[1]);
311
312 /* Store upper half */
313 compat_reg = (compat_uint_t)(regs->sr[3] >> 32);
314 err |= __put_user(compat_reg, &rf->rf_iasq[0]);
315 err |= __put_user(compat_reg, &rf->rf_iasq[1]);
316
317 DBG(2,"setup_sigcontext32: upper half iasq[0] = %#x\n", compat_reg);
318 DBG(2,"setup_sigcontext32: upper half iasq[1] = %#x\n", compat_reg);
319 DBG(1,"setup_sigcontext32: iaoq %#lx / %#lx\n",
320 regs->gr[31], regs->gr[31]+4);
321
322 } else {
323
324 compat_reg = (compat_uint_t)(regs->iaoq[0]);
325 err |= __put_user(compat_reg, &sc->sc_iaoq[0]);
326 DBG(2,"setup_sigcontext32: sc->sc_iaoq[0] = %p <= %#x\n",
327 &sc->sc_iaoq[0], compat_reg);
328 /* Store upper half */
329 compat_reg = (compat_uint_t)(regs->iaoq[0] >> 32);
330 err |= __put_user(compat_reg, &rf->rf_iaoq[0]);
331 DBG(2,"setup_sigcontext32: upper half iaoq[0] = %#x\n", compat_reg);
332
333 compat_reg = (compat_uint_t)(regs->iaoq[1]);
334 err |= __put_user(compat_reg, &sc->sc_iaoq[1]);
335 DBG(2,"setup_sigcontext32: sc->sc_iaoq[1] = %p <= %#x\n",
336 &sc->sc_iaoq[1], compat_reg);
337 /* Store upper half */
338 compat_reg = (compat_uint_t)(regs->iaoq[1] >> 32);
339 err |= __put_user(compat_reg, &rf->rf_iaoq[1]);
340 DBG(2,"setup_sigcontext32: upper half iaoq[1] = %#x\n", compat_reg);
341
342
343 compat_reg = (compat_uint_t)(regs->iasq[0]);
344 err |= __put_user(compat_reg, &sc->sc_iasq[0]);
345 DBG(2,"setup_sigcontext32: sc->sc_iasq[0] = %p <= %#x\n",
346 &sc->sc_iasq[0], compat_reg);
347 /* Store upper half */
348 compat_reg = (compat_uint_t)(regs->iasq[0] >> 32);
349 err |= __put_user(compat_reg, &rf->rf_iasq[0]);
350 DBG(2,"setup_sigcontext32: upper half iasq[0] = %#x\n", compat_reg);
351
352
353 compat_reg = (compat_uint_t)(regs->iasq[1]);
354 err |= __put_user(compat_reg, &sc->sc_iasq[1]);
355 DBG(2,"setup_sigcontext32: sc->sc_iasq[1] = %p <= %#x\n",
356 &sc->sc_iasq[1], compat_reg);
357 /* Store upper half */
358 compat_reg = (compat_uint_t)(regs->iasq[1] >> 32);
359 err |= __put_user(compat_reg, &rf->rf_iasq[1]);
360 DBG(2,"setup_sigcontext32: upper half iasq[1] = %#x\n", compat_reg);
361
362 /* Print out the IAOQ for debugging */
363 DBG(1,"setup_sigcontext32: ia0q %#lx / %#lx\n",
364 regs->iaoq[0], regs->iaoq[1]);
365 }
366
367 err |= __put_user(flags, &sc->sc_flags);
368
369 DBG(1,"setup_sigcontext32: Truncating general registers.\n");
370
371 for(regn=0; regn < 32; regn++){
372 /* Truncate a general register */
373 compat_reg = (compat_uint_t)(regs->gr[regn]);
374 err |= __put_user(compat_reg, &sc->sc_gr[regn]);
375 /* Store upper half */
376 compat_regb = (compat_uint_t)(regs->gr[regn] >> 32);
377 err |= __put_user(compat_regb, &rf->rf_gr[regn]);
378
379 /* DEBUG: Write out the "upper / lower" register data */
380 DBG(2,"setup_sigcontext32: gr%02d = %#x / %#x\n", regn,
381 compat_regb, compat_reg);
382 }
383
384 /* Copy the floating point registers (same size)
385 XXX: BE WARNED FR's are 64-BIT! */
386 DBG(1,"setup_sigcontext32: Copying from regs to sc, "
387 "sc->sc_fr size = %#lx, regs->fr size = %#lx\n",
388 sizeof(regs->fr), sizeof(sc->sc_fr));
389 err |= __copy_to_user(sc->sc_fr, regs->fr, sizeof(regs->fr));
390
391 compat_reg = (compat_uint_t)(regs->sar);
392 err |= __put_user(compat_reg, &sc->sc_sar);
393 DBG(2,"setup_sigcontext32: sar is %#x\n", compat_reg);
394 /* Store upper half */
395 compat_reg = (compat_uint_t)(regs->sar >> 32);
396 err |= __put_user(compat_reg, &rf->rf_sar);
397 DBG(2,"setup_sigcontext32: upper half sar = %#x\n", compat_reg);
398 DBG(1,"setup_sigcontext32: r28 is %ld\n", regs->gr[28]);
399
400 return err;
401 }
402
403 int
404 copy_siginfo_from_user32 (siginfo_t *to, compat_siginfo_t __user *from)
405 {
406 unsigned long tmp;
407 int err;
408
409 if (!access_ok(VERIFY_READ, from, sizeof(compat_siginfo_t)))
410 return -EFAULT;
411
412 err = __get_user(to->si_signo, &from->si_signo);
413 err |= __get_user(to->si_errno, &from->si_errno);
414 err |= __get_user(to->si_code, &from->si_code);
415
416 if (to->si_code < 0)
417 err |= __copy_from_user(&to->_sifields._pad, &from->_sifields._pad, SI_PAD_SIZE);
418 else {
419 switch (to->si_code >> 16) {
420 case __SI_CHLD >> 16:
421 err |= __get_user(to->si_utime, &from->si_utime);
422 err |= __get_user(to->si_stime, &from->si_stime);
423 err |= __get_user(to->si_status, &from->si_status);
424 default:
425 err |= __get_user(to->si_pid, &from->si_pid);
426 err |= __get_user(to->si_uid, &from->si_uid);
427 break;
428 case __SI_FAULT >> 16:
429 err |= __get_user(tmp, &from->si_addr);
430 to->si_addr = (void __user *) tmp;
431 break;
432 case __SI_POLL >> 16:
433 err |= __get_user(to->si_band, &from->si_band);
434 err |= __get_user(to->si_fd, &from->si_fd);
435 break;
436 case __SI_RT >> 16: /* This is not generated by the kernel as of now. */
437 case __SI_MESGQ >> 16:
438 err |= __get_user(to->si_pid, &from->si_pid);
439 err |= __get_user(to->si_uid, &from->si_uid);
440 err |= __get_user(to->si_int, &from->si_int);
441 break;
442 }
443 }
444 return err;
445 }
446
447 int
448 copy_siginfo_to_user32 (compat_siginfo_t __user *to, siginfo_t *from)
449 {
450 unsigned int addr;
451 int err;
452
453 if (!access_ok(VERIFY_WRITE, to, sizeof(compat_siginfo_t)))
454 return -EFAULT;
455
456 /* If you change siginfo_t structure, please be sure
457 this code is fixed accordingly.
458 It should never copy any pad contained in the structure
459 to avoid security leaks, but must copy the generic
460 3 ints plus the relevant union member.
461 This routine must convert siginfo from 64bit to 32bit as well
462 at the same time. */
463 err = __put_user(from->si_signo, &to->si_signo);
464 err |= __put_user(from->si_errno, &to->si_errno);
465 err |= __put_user((short)from->si_code, &to->si_code);
466 if (from->si_code < 0)
467 err |= __copy_to_user(&to->_sifields._pad, &from->_sifields._pad, SI_PAD_SIZE);
468 else {
469 switch (from->si_code >> 16) {
470 case __SI_CHLD >> 16:
471 err |= __put_user(from->si_utime, &to->si_utime);
472 err |= __put_user(from->si_stime, &to->si_stime);
473 err |= __put_user(from->si_status, &to->si_status);
474 default:
475 err |= __put_user(from->si_pid, &to->si_pid);
476 err |= __put_user(from->si_uid, &to->si_uid);
477 break;
478 case __SI_FAULT >> 16:
479 /* avoid type-checking warnings by copying _pad[0] in lieu of si_addr... */
480 err |= __put_user(from->_sifields._pad[0], &to->si_addr);
481 break;
482 case __SI_POLL >> 16:
483 err |= __put_user(from->si_band, &to->si_band);
484 err |= __put_user(from->si_fd, &to->si_fd);
485 break;
486 case __SI_TIMER >> 16:
487 err |= __put_user(from->si_tid, &to->si_tid);
488 err |= __put_user(from->si_overrun, &to->si_overrun);
489 addr = (unsigned long) from->si_ptr;
490 err |= __put_user(addr, &to->si_ptr);
491 break;
492 case __SI_RT >> 16: /* Not generated by the kernel as of now. */
493 case __SI_MESGQ >> 16:
494 err |= __put_user(from->si_uid, &to->si_uid);
495 err |= __put_user(from->si_pid, &to->si_pid);
496 addr = (unsigned long) from->si_ptr;
497 err |= __put_user(addr, &to->si_ptr);
498 break;
499 }
500 }
501 return err;
502 }
503
504 asmlinkage long compat_sys_rt_sigqueueinfo(int pid, int sig,
505 struct compat_siginfo __user *uinfo)
506 {
507 siginfo_t info;
508
509 if (copy_siginfo_from_user32(&info, uinfo))
510 return -EFAULT;
511
512 /* Not even root can pretend to send signals from the kernel.
513 Nor can they impersonate a kill(), which adds source info. */
514 if (info.si_code >= 0)
515 return -EPERM;
516 info.si_signo = sig;
517
518 /* POSIX.1b doesn't mention process groups. */
519 return kill_proc_info(sig, &info, pid);
520 }
521
This page took 0.043674 seconds and 6 git commands to generate.