2 * arch/s390/kernel/compat_signal.c
4 * Copyright (C) IBM Corp. 2000,2006
5 * Author(s): Denis Joseph Barrow (djbarrow@de.ibm.com,barrow_dj@yahoo.com)
6 * Gerhard Tonn (ton@de.ibm.com)
8 * Copyright (C) 1991, 1992 Linus Torvalds
10 * 1997-11-28 Modified for POSIX.1b signals by Richard Henderson
13 #include <linux/compat.h>
14 #include <linux/sched.h>
16 #include <linux/smp.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/stddef.h>
24 #include <linux/tty.h>
25 #include <linux/personality.h>
26 #include <linux/binfmts.h>
27 #include <asm/ucontext.h>
28 #include <asm/uaccess.h>
29 #include <asm/lowcore.h>
30 #include "compat_linux.h"
31 #include "compat_ptrace.h"
34 #define _BLOCKABLE (~(sigmask(SIGKILL) | sigmask(SIGSTOP)))
38 __u8 callee_used_stack
[__SIGNAL_FRAMESIZE32
];
39 struct sigcontext32 sc
;
42 __u8 retcode
[S390_SYSCALL_SIZE
];
47 __u8 callee_used_stack
[__SIGNAL_FRAMESIZE32
];
48 __u8 retcode
[S390_SYSCALL_SIZE
];
49 compat_siginfo_t info
;
53 int copy_siginfo_to_user32(compat_siginfo_t __user
*to
, siginfo_t
*from
)
57 if (!access_ok (VERIFY_WRITE
, to
, sizeof(compat_siginfo_t
)))
60 /* If you change siginfo_t structure, please be sure
61 this code is fixed accordingly.
62 It should never copy any pad contained in the structure
63 to avoid security leaks, but must copy the generic
64 3 ints plus the relevant union member.
65 This routine must convert siginfo from 64bit to 32bit as well
67 err
= __put_user(from
->si_signo
, &to
->si_signo
);
68 err
|= __put_user(from
->si_errno
, &to
->si_errno
);
69 err
|= __put_user((short)from
->si_code
, &to
->si_code
);
70 if (from
->si_code
< 0)
71 err
|= __copy_to_user(&to
->_sifields
._pad
, &from
->_sifields
._pad
, SI_PAD_SIZE
);
73 switch (from
->si_code
>> 16) {
74 case __SI_RT
>> 16: /* This is not generated by the kernel as of now. */
75 case __SI_MESGQ
>> 16:
76 err
|= __put_user(from
->si_int
, &to
->si_int
);
79 err
|= __put_user(from
->si_pid
, &to
->si_pid
);
80 err
|= __put_user(from
->si_uid
, &to
->si_uid
);
83 err
|= __put_user(from
->si_pid
, &to
->si_pid
);
84 err
|= __put_user(from
->si_uid
, &to
->si_uid
);
85 err
|= __put_user(from
->si_utime
, &to
->si_utime
);
86 err
|= __put_user(from
->si_stime
, &to
->si_stime
);
87 err
|= __put_user(from
->si_status
, &to
->si_status
);
89 case __SI_FAULT
>> 16:
90 err
|= __put_user((unsigned long) from
->si_addr
,
94 err
|= __put_user(from
->si_band
, &to
->si_band
);
95 err
|= __put_user(from
->si_fd
, &to
->si_fd
);
97 case __SI_TIMER
>> 16:
98 err
|= __put_user(from
->si_tid
, &to
->si_tid
);
99 err
|= __put_user(from
->si_overrun
, &to
->si_overrun
);
100 err
|= __put_user(from
->si_int
, &to
->si_int
);
109 int copy_siginfo_from_user32(siginfo_t
*to
, compat_siginfo_t __user
*from
)
114 if (!access_ok (VERIFY_READ
, from
, sizeof(compat_siginfo_t
)))
117 err
= __get_user(to
->si_signo
, &from
->si_signo
);
118 err
|= __get_user(to
->si_errno
, &from
->si_errno
);
119 err
|= __get_user(to
->si_code
, &from
->si_code
);
122 err
|= __copy_from_user(&to
->_sifields
._pad
, &from
->_sifields
._pad
, SI_PAD_SIZE
);
124 switch (to
->si_code
>> 16) {
125 case __SI_RT
>> 16: /* This is not generated by the kernel as of now. */
126 case __SI_MESGQ
>> 16:
127 err
|= __get_user(to
->si_int
, &from
->si_int
);
129 case __SI_KILL
>> 16:
130 err
|= __get_user(to
->si_pid
, &from
->si_pid
);
131 err
|= __get_user(to
->si_uid
, &from
->si_uid
);
133 case __SI_CHLD
>> 16:
134 err
|= __get_user(to
->si_pid
, &from
->si_pid
);
135 err
|= __get_user(to
->si_uid
, &from
->si_uid
);
136 err
|= __get_user(to
->si_utime
, &from
->si_utime
);
137 err
|= __get_user(to
->si_stime
, &from
->si_stime
);
138 err
|= __get_user(to
->si_status
, &from
->si_status
);
140 case __SI_FAULT
>> 16:
141 err
|= __get_user(tmp
, &from
->si_addr
);
142 to
->si_addr
= (void __user
*)(u64
) (tmp
& PSW32_ADDR_INSN
);
144 case __SI_POLL
>> 16:
145 err
|= __get_user(to
->si_band
, &from
->si_band
);
146 err
|= __get_user(to
->si_fd
, &from
->si_fd
);
148 case __SI_TIMER
>> 16:
149 err
|= __get_user(to
->si_tid
, &from
->si_tid
);
150 err
|= __get_user(to
->si_overrun
, &from
->si_overrun
);
151 err
|= __get_user(to
->si_int
, &from
->si_int
);
161 sys32_sigaction(int sig
, const struct old_sigaction32 __user
*act
,
162 struct old_sigaction32 __user
*oact
)
164 struct k_sigaction new_ka
, old_ka
;
165 unsigned long sa_handler
, sa_restorer
;
169 compat_old_sigset_t mask
;
170 if (!access_ok(VERIFY_READ
, act
, sizeof(*act
)) ||
171 __get_user(sa_handler
, &act
->sa_handler
) ||
172 __get_user(sa_restorer
, &act
->sa_restorer
) ||
173 __get_user(new_ka
.sa
.sa_flags
, &act
->sa_flags
) ||
174 __get_user(mask
, &act
->sa_mask
))
176 new_ka
.sa
.sa_handler
= (__sighandler_t
) sa_handler
;
177 new_ka
.sa
.sa_restorer
= (void (*)(void)) sa_restorer
;
178 siginitset(&new_ka
.sa
.sa_mask
, mask
);
181 ret
= do_sigaction(sig
, act
? &new_ka
: NULL
, oact
? &old_ka
: NULL
);
184 sa_handler
= (unsigned long) old_ka
.sa
.sa_handler
;
185 sa_restorer
= (unsigned long) old_ka
.sa
.sa_restorer
;
186 if (!access_ok(VERIFY_WRITE
, oact
, sizeof(*oact
)) ||
187 __put_user(sa_handler
, &oact
->sa_handler
) ||
188 __put_user(sa_restorer
, &oact
->sa_restorer
) ||
189 __put_user(old_ka
.sa
.sa_flags
, &oact
->sa_flags
) ||
190 __put_user(old_ka
.sa
.sa_mask
.sig
[0], &oact
->sa_mask
))
198 sys32_rt_sigaction(int sig
, const struct sigaction32 __user
*act
,
199 struct sigaction32 __user
*oact
, size_t sigsetsize
)
201 struct k_sigaction new_ka
, old_ka
;
202 unsigned long sa_handler
;
204 compat_sigset_t set32
;
206 /* XXX: Don't preclude handling different sized sigset_t's. */
207 if (sigsetsize
!= sizeof(compat_sigset_t
))
211 ret
= get_user(sa_handler
, &act
->sa_handler
);
212 ret
|= __copy_from_user(&set32
, &act
->sa_mask
,
213 sizeof(compat_sigset_t
));
214 switch (_NSIG_WORDS
) {
215 case 4: new_ka
.sa
.sa_mask
.sig
[3] = set32
.sig
[6]
216 | (((long)set32
.sig
[7]) << 32);
217 case 3: new_ka
.sa
.sa_mask
.sig
[2] = set32
.sig
[4]
218 | (((long)set32
.sig
[5]) << 32);
219 case 2: new_ka
.sa
.sa_mask
.sig
[1] = set32
.sig
[2]
220 | (((long)set32
.sig
[3]) << 32);
221 case 1: new_ka
.sa
.sa_mask
.sig
[0] = set32
.sig
[0]
222 | (((long)set32
.sig
[1]) << 32);
224 ret
|= __get_user(new_ka
.sa
.sa_flags
, &act
->sa_flags
);
228 new_ka
.sa
.sa_handler
= (__sighandler_t
) sa_handler
;
231 ret
= do_sigaction(sig
, act
? &new_ka
: NULL
, oact
? &old_ka
: NULL
);
234 switch (_NSIG_WORDS
) {
236 set32
.sig
[7] = (old_ka
.sa
.sa_mask
.sig
[3] >> 32);
237 set32
.sig
[6] = old_ka
.sa
.sa_mask
.sig
[3];
239 set32
.sig
[5] = (old_ka
.sa
.sa_mask
.sig
[2] >> 32);
240 set32
.sig
[4] = old_ka
.sa
.sa_mask
.sig
[2];
242 set32
.sig
[3] = (old_ka
.sa
.sa_mask
.sig
[1] >> 32);
243 set32
.sig
[2] = old_ka
.sa
.sa_mask
.sig
[1];
245 set32
.sig
[1] = (old_ka
.sa
.sa_mask
.sig
[0] >> 32);
246 set32
.sig
[0] = old_ka
.sa
.sa_mask
.sig
[0];
248 ret
= put_user((unsigned long)old_ka
.sa
.sa_handler
, &oact
->sa_handler
);
249 ret
|= __copy_to_user(&oact
->sa_mask
, &set32
,
250 sizeof(compat_sigset_t
));
251 ret
|= __put_user(old_ka
.sa
.sa_flags
, &oact
->sa_flags
);
258 sys32_sigaltstack(const stack_t32 __user
*uss
, stack_t32 __user
*uoss
)
260 struct pt_regs
*regs
= task_pt_regs(current
);
264 mm_segment_t old_fs
= get_fs();
267 if (!access_ok(VERIFY_READ
, uss
, sizeof(*uss
)))
269 err
|= __get_user(ss_sp
, &uss
->ss_sp
);
270 err
|= __get_user(kss
.ss_size
, &uss
->ss_size
);
271 err
|= __get_user(kss
.ss_flags
, &uss
->ss_flags
);
274 kss
.ss_sp
= (void __user
*) ss_sp
;
278 ret
= do_sigaltstack((stack_t __force __user
*) (uss
? &kss
: NULL
),
279 (stack_t __force __user
*) (uoss
? &koss
: NULL
),
284 if (!access_ok(VERIFY_WRITE
, uoss
, sizeof(*uoss
)))
286 ss_sp
= (unsigned long) koss
.ss_sp
;
287 err
|= __put_user(ss_sp
, &uoss
->ss_sp
);
288 err
|= __put_user(koss
.ss_size
, &uoss
->ss_size
);
289 err
|= __put_user(koss
.ss_flags
, &uoss
->ss_flags
);
296 static int save_sigregs32(struct pt_regs
*regs
, _sigregs32 __user
*sregs
)
298 _s390_regs_common32 regs32
;
301 regs32
.psw
.mask
= PSW32_MASK_MERGE(psw32_user_bits
,
302 (__u32
)(regs
->psw
.mask
>> 32));
303 regs32
.psw
.addr
= PSW32_ADDR_AMODE31
| (__u32
) regs
->psw
.addr
;
304 for (i
= 0; i
< NUM_GPRS
; i
++)
305 regs32
.gprs
[i
] = (__u32
) regs
->gprs
[i
];
306 save_access_regs(current
->thread
.acrs
);
307 memcpy(regs32
.acrs
, current
->thread
.acrs
, sizeof(regs32
.acrs
));
308 err
= __copy_to_user(&sregs
->regs
, ®s32
, sizeof(regs32
));
311 save_fp_regs(¤t
->thread
.fp_regs
);
312 /* s390_fp_regs and _s390_fp_regs32 are the same ! */
313 return __copy_to_user(&sregs
->fpregs
, ¤t
->thread
.fp_regs
,
314 sizeof(_s390_fp_regs32
));
317 static int restore_sigregs32(struct pt_regs
*regs
,_sigregs32 __user
*sregs
)
319 _s390_regs_common32 regs32
;
322 /* Alwys make any pending restarted system call return -EINTR */
323 current_thread_info()->restart_block
.fn
= do_no_restart_syscall
;
325 err
= __copy_from_user(®s32
, &sregs
->regs
, sizeof(regs32
));
328 regs
->psw
.mask
= PSW_MASK_MERGE(regs
->psw
.mask
,
329 (__u64
)regs32
.psw
.mask
<< 32);
330 regs
->psw
.addr
= (__u64
)(regs32
.psw
.addr
& PSW32_ADDR_INSN
);
331 for (i
= 0; i
< NUM_GPRS
; i
++)
332 regs
->gprs
[i
] = (__u64
) regs32
.gprs
[i
];
333 memcpy(current
->thread
.acrs
, regs32
.acrs
, sizeof(current
->thread
.acrs
));
334 restore_access_regs(current
->thread
.acrs
);
336 err
= __copy_from_user(¤t
->thread
.fp_regs
, &sregs
->fpregs
,
337 sizeof(_s390_fp_regs32
));
338 current
->thread
.fp_regs
.fpc
&= FPC_VALID_MASK
;
342 restore_fp_regs(¤t
->thread
.fp_regs
);
343 regs
->trap
= -1; /* disable syscall checks */
347 asmlinkage
long sys32_sigreturn(void)
349 struct pt_regs
*regs
= task_pt_regs(current
);
350 sigframe32 __user
*frame
= (sigframe32 __user
*)regs
->gprs
[15];
353 if (!access_ok(VERIFY_READ
, frame
, sizeof(*frame
)))
355 if (__copy_from_user(&set
.sig
, &frame
->sc
.oldmask
, _SIGMASK_COPY_SIZE32
))
358 sigdelsetmask(&set
, ~_BLOCKABLE
);
359 spin_lock_irq(¤t
->sighand
->siglock
);
360 current
->blocked
= set
;
362 spin_unlock_irq(¤t
->sighand
->siglock
);
364 if (restore_sigregs32(regs
, &frame
->sregs
))
367 return regs
->gprs
[2];
370 force_sig(SIGSEGV
, current
);
374 asmlinkage
long sys32_rt_sigreturn(void)
376 struct pt_regs
*regs
= task_pt_regs(current
);
377 rt_sigframe32 __user
*frame
= (rt_sigframe32 __user
*)regs
->gprs
[15];
382 mm_segment_t old_fs
= get_fs();
384 if (!access_ok(VERIFY_READ
, frame
, sizeof(*frame
)))
386 if (__copy_from_user(&set
, &frame
->uc
.uc_sigmask
, sizeof(set
)))
389 sigdelsetmask(&set
, ~_BLOCKABLE
);
390 spin_lock_irq(¤t
->sighand
->siglock
);
391 current
->blocked
= set
;
393 spin_unlock_irq(¤t
->sighand
->siglock
);
395 if (restore_sigregs32(regs
, &frame
->uc
.uc_mcontext
))
398 err
= __get_user(ss_sp
, &frame
->uc
.uc_stack
.ss_sp
);
399 st
.ss_sp
= compat_ptr(ss_sp
);
400 err
|= __get_user(st
.ss_size
, &frame
->uc
.uc_stack
.ss_size
);
401 err
|= __get_user(st
.ss_flags
, &frame
->uc
.uc_stack
.ss_flags
);
406 do_sigaltstack((stack_t __force __user
*)&st
, NULL
, regs
->gprs
[15]);
409 return regs
->gprs
[2];
412 force_sig(SIGSEGV
, current
);
417 * Set up a signal frame.
422 * Determine which stack to use..
424 static inline void __user
*
425 get_sigframe(struct k_sigaction
*ka
, struct pt_regs
* regs
, size_t frame_size
)
429 /* Default to using normal stack */
430 sp
= (unsigned long) A(regs
->gprs
[15]);
432 /* Overflow on alternate signal stack gives SIGSEGV. */
433 if (on_sig_stack(sp
) && !on_sig_stack((sp
- frame_size
) & -8UL))
434 return (void __user
*) -1UL;
436 /* This is the X/Open sanctioned signal stack switching. */
437 if (ka
->sa
.sa_flags
& SA_ONSTACK
) {
438 if (! sas_ss_flags(sp
))
439 sp
= current
->sas_ss_sp
+ current
->sas_ss_size
;
442 /* This is the legacy signal stack switching. */
443 else if (!user_mode(regs
) &&
444 !(ka
->sa
.sa_flags
& SA_RESTORER
) &&
445 ka
->sa
.sa_restorer
) {
446 sp
= (unsigned long) ka
->sa
.sa_restorer
;
449 return (void __user
*)((sp
- frame_size
) & -8ul);
452 static inline int map_signal(int sig
)
454 if (current_thread_info()->exec_domain
455 && current_thread_info()->exec_domain
->signal_invmap
457 return current_thread_info()->exec_domain
->signal_invmap
[sig
];
462 static int setup_frame32(int sig
, struct k_sigaction
*ka
,
463 sigset_t
*set
, struct pt_regs
* regs
)
465 sigframe32 __user
*frame
= get_sigframe(ka
, regs
, sizeof(sigframe32
));
466 if (!access_ok(VERIFY_WRITE
, frame
, sizeof(sigframe32
)))
469 if (frame
== (void __user
*) -1UL)
472 if (__copy_to_user(&frame
->sc
.oldmask
, &set
->sig
, _SIGMASK_COPY_SIZE32
))
475 if (save_sigregs32(regs
, &frame
->sregs
))
477 if (__put_user((unsigned long) &frame
->sregs
, &frame
->sc
.sregs
))
480 /* Set up to return from userspace. If provided, use a stub
481 already in userspace. */
482 if (ka
->sa
.sa_flags
& SA_RESTORER
) {
483 regs
->gprs
[14] = (__u64
) ka
->sa
.sa_restorer
;
485 regs
->gprs
[14] = (__u64
) frame
->retcode
;
486 if (__put_user(S390_SYSCALL_OPCODE
| __NR_sigreturn
,
487 (u16 __user
*)(frame
->retcode
)))
491 /* Set up backchain. */
492 if (__put_user(regs
->gprs
[15], (unsigned int __user
*) frame
))
495 /* Set up registers for signal handler */
496 regs
->gprs
[15] = (__u64
) frame
;
497 regs
->psw
.addr
= (__u64
) ka
->sa
.sa_handler
;
499 regs
->gprs
[2] = map_signal(sig
);
500 regs
->gprs
[3] = (__u64
) &frame
->sc
;
502 /* We forgot to include these in the sigcontext.
503 To avoid breaking binary compatibility, they are passed as args. */
504 regs
->gprs
[4] = current
->thread
.trap_no
;
505 regs
->gprs
[5] = current
->thread
.prot_addr
;
507 /* Place signal number on stack to allow backtrace from handler. */
508 if (__put_user(regs
->gprs
[2], (int __user
*) &frame
->signo
))
513 force_sigsegv(sig
, current
);
517 static int setup_rt_frame32(int sig
, struct k_sigaction
*ka
, siginfo_t
*info
,
518 sigset_t
*set
, struct pt_regs
* regs
)
521 rt_sigframe32 __user
*frame
= get_sigframe(ka
, regs
, sizeof(rt_sigframe32
));
522 if (!access_ok(VERIFY_WRITE
, frame
, sizeof(rt_sigframe32
)))
525 if (frame
== (void __user
*) -1UL)
528 if (copy_siginfo_to_user32(&frame
->info
, info
))
531 /* Create the ucontext. */
532 err
|= __put_user(0, &frame
->uc
.uc_flags
);
533 err
|= __put_user(0, &frame
->uc
.uc_link
);
534 err
|= __put_user(current
->sas_ss_sp
, &frame
->uc
.uc_stack
.ss_sp
);
535 err
|= __put_user(sas_ss_flags(regs
->gprs
[15]),
536 &frame
->uc
.uc_stack
.ss_flags
);
537 err
|= __put_user(current
->sas_ss_size
, &frame
->uc
.uc_stack
.ss_size
);
538 err
|= save_sigregs32(regs
, &frame
->uc
.uc_mcontext
);
539 err
|= __copy_to_user(&frame
->uc
.uc_sigmask
, set
, sizeof(*set
));
543 /* Set up to return from userspace. If provided, use a stub
544 already in userspace. */
545 if (ka
->sa
.sa_flags
& SA_RESTORER
) {
546 regs
->gprs
[14] = (__u64
) ka
->sa
.sa_restorer
;
548 regs
->gprs
[14] = (__u64
) frame
->retcode
;
549 err
|= __put_user(S390_SYSCALL_OPCODE
| __NR_rt_sigreturn
,
550 (u16 __user
*)(frame
->retcode
));
553 /* Set up backchain. */
554 if (__put_user(regs
->gprs
[15], (unsigned int __user
*) frame
))
557 /* Set up registers for signal handler */
558 regs
->gprs
[15] = (__u64
) frame
;
559 regs
->psw
.addr
= (__u64
) ka
->sa
.sa_handler
;
561 regs
->gprs
[2] = map_signal(sig
);
562 regs
->gprs
[3] = (__u64
) &frame
->info
;
563 regs
->gprs
[4] = (__u64
) &frame
->uc
;
567 force_sigsegv(sig
, current
);
572 * OK, we're invoking a handler
576 handle_signal32(unsigned long sig
, struct k_sigaction
*ka
,
577 siginfo_t
*info
, sigset_t
*oldset
, struct pt_regs
* regs
)
581 /* Set up the stack frame */
582 if (ka
->sa
.sa_flags
& SA_SIGINFO
)
583 ret
= setup_rt_frame32(sig
, ka
, info
, oldset
, regs
);
585 ret
= setup_frame32(sig
, ka
, oldset
, regs
);
588 spin_lock_irq(¤t
->sighand
->siglock
);
589 sigorsets(¤t
->blocked
,¤t
->blocked
,&ka
->sa
.sa_mask
);
590 if (!(ka
->sa
.sa_flags
& SA_NODEFER
))
591 sigaddset(¤t
->blocked
,sig
);
593 spin_unlock_irq(¤t
->sighand
->siglock
);