arch/s390/kernel/compat_signal.c

   1 /*
   2  *  arch/s390/kernel/compat_signal.c
   3  *
   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)
   7  *
   8  *  Copyright (C) 1991, 1992  Linus Torvalds
   9  *
  10  *  1997-11-28  Modified for POSIX.1b signals by Richard Henderson
  11  */
  12
  13 #include <linux/compat.h>
  14 #include <linux/sched.h>
  15 #include <linux/mm.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"
  32 #include "entry.h"
  33
  34 #define _BLOCKABLE (~(sigmask(SIGKILL) | sigmask(SIGSTOP)))
  35
  36 typedef struct
  37 {
  38         __u8 callee_used_stack[__SIGNAL_FRAMESIZE32];
  39         struct sigcontext32 sc;
  40         _sigregs32 sregs;
  41         int signo;
  42         __u32 gprs_high[NUM_GPRS];
  43         __u8 retcode[S390_SYSCALL_SIZE];
  44 } sigframe32;
  45
  46 typedef struct
  47 {
  48         __u8 callee_used_stack[__SIGNAL_FRAMESIZE32];
  49         __u8 retcode[S390_SYSCALL_SIZE];
  50         compat_siginfo_t info;
  51         struct ucontext32 uc;
  52         __u32 gprs_high[NUM_GPRS];
  53 } rt_sigframe32;
  54
  55 int copy_siginfo_to_user32(compat_siginfo_t __user *to, siginfo_t *from)
  56 {
  57         int err;
  58
  59         if (!access_ok (VERIFY_WRITE, to, sizeof(compat_siginfo_t)))
  60                 return -EFAULT;
  61
  62         /* If you change siginfo_t structure, please be sure
  63            this code is fixed accordingly.
  64            It should never copy any pad contained in the structure
  65            to avoid security leaks, but must copy the generic
  66            3 ints plus the relevant union member.
  67            This routine must convert siginfo from 64bit to 32bit as well
  68            at the same time.  */
  69         err = __put_user(from->si_signo, &to->si_signo);
  70         err |= __put_user(from->si_errno, &to->si_errno);
  71         err |= __put_user((short)from->si_code, &to->si_code);
  72         if (from->si_code < 0)
  73                 err |= __copy_to_user(&to->_sifields._pad, &from->_sifields._pad, SI_PAD_SIZE);
  74         else {
  75                 switch (from->si_code >> 16) {
  76                 case __SI_RT >> 16: /* This is not generated by the kernel as of now.  */
  77                 case __SI_MESGQ >> 16:
  78                         err |= __put_user(from->si_int, &to->si_int);
  79                         /* fallthrough */
  80                 case __SI_KILL >> 16:
  81                         err |= __put_user(from->si_pid, &to->si_pid);
  82                         err |= __put_user(from->si_uid, &to->si_uid);
  83                         break;
  84                 case __SI_CHLD >> 16:
  85                         err |= __put_user(from->si_pid, &to->si_pid);
  86                         err |= __put_user(from->si_uid, &to->si_uid);
  87                         err |= __put_user(from->si_utime, &to->si_utime);
  88                         err |= __put_user(from->si_stime, &to->si_stime);
  89                         err |= __put_user(from->si_status, &to->si_status);
  90                         break;
  91                 case __SI_FAULT >> 16:
  92                         err |= __put_user((unsigned long) from->si_addr,
  93                                           &to->si_addr);
  94                         break;
  95                 case __SI_POLL >> 16:
  96                         err |= __put_user(from->si_band, &to->si_band);
  97                         err |= __put_user(from->si_fd, &to->si_fd);
  98                         break;
  99                 case __SI_TIMER >> 16:
 100                         err |= __put_user(from->si_tid, &to->si_tid);
 101                         err |= __put_user(from->si_overrun, &to->si_overrun);
 102                         err |= __put_user(from->si_int, &to->si_int);
 103                         break;
 104                 default:
 105                         break;
 106                 }
 107         }
 108         return err;
 109 }
 110
 111 int copy_siginfo_from_user32(siginfo_t *to, compat_siginfo_t __user *from)
 112 {
 113         int err;
 114         u32 tmp;
 115
 116         if (!access_ok (VERIFY_READ, from, sizeof(compat_siginfo_t)))
 117                 return -EFAULT;
 118
 119         err = __get_user(to->si_signo, &from->si_signo);
 120         err |= __get_user(to->si_errno, &from->si_errno);
 121         err |= __get_user(to->si_code, &from->si_code);
 122
 123         if (to->si_code < 0)
 124                 err |= __copy_from_user(&to->_sifields._pad, &from->_sifields._pad, SI_PAD_SIZE);
 125         else {
 126                 switch (to->si_code >> 16) {
 127                 case __SI_RT >> 16: /* This is not generated by the kernel as of now.  */
 128                 case __SI_MESGQ >> 16:
 129                         err |= __get_user(to->si_int, &from->si_int);
 130                         /* fallthrough */
 131                 case __SI_KILL >> 16:
 132                         err |= __get_user(to->si_pid, &from->si_pid);
 133                         err |= __get_user(to->si_uid, &from->si_uid);
 134                         break;
 135                 case __SI_CHLD >> 16:
 136                         err |= __get_user(to->si_pid, &from->si_pid);
 137                         err |= __get_user(to->si_uid, &from->si_uid);
 138                         err |= __get_user(to->si_utime, &from->si_utime);
 139                         err |= __get_user(to->si_stime, &from->si_stime);
 140                         err |= __get_user(to->si_status, &from->si_status);
 141                         break;
 142                 case __SI_FAULT >> 16:
 143                         err |= __get_user(tmp, &from->si_addr);
 144                         to->si_addr = (void __user *)(u64) (tmp & PSW32_ADDR_INSN);
 145                         break;
 146                 case __SI_POLL >> 16:
 147                         err |= __get_user(to->si_band, &from->si_band);
 148                         err |= __get_user(to->si_fd, &from->si_fd);
 149                         break;
 150                 case __SI_TIMER >> 16:
 151                         err |= __get_user(to->si_tid, &from->si_tid);
 152                         err |= __get_user(to->si_overrun, &from->si_overrun);
 153                         err |= __get_user(to->si_int, &from->si_int);
 154                         break;
 155                 default:
 156                         break;
 157                 }
 158         }
 159         return err;
 160 }
 161
 162 asmlinkage long
 163 sys32_sigaction(int sig, const struct old_sigaction32 __user *act,
 164                  struct old_sigaction32 __user *oact)
 165 {
 166         struct k_sigaction new_ka, old_ka;
 167         unsigned long sa_handler, sa_restorer;
 168         int ret;
 169
 170         if (act) {
 171                 compat_old_sigset_t mask;
 172                 if (!access_ok(VERIFY_READ, act, sizeof(*act)) ||
 173                     __get_user(sa_handler, &act->sa_handler) ||
 174                     __get_user(sa_restorer, &act->sa_restorer) ||
 175                     __get_user(new_ka.sa.sa_flags, &act->sa_flags) ||
 176                     __get_user(mask, &act->sa_mask))
 177                         return -EFAULT;
 178                 new_ka.sa.sa_handler = (__sighandler_t) sa_handler;
 179                 new_ka.sa.sa_restorer = (void (*)(void)) sa_restorer;
 180                 siginitset(&new_ka.sa.sa_mask, mask);
 181         }
 182
 183         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
 184
 185         if (!ret && oact) {
 186                 sa_handler = (unsigned long) old_ka.sa.sa_handler;
 187                 sa_restorer = (unsigned long) old_ka.sa.sa_restorer;
 188                 if (!access_ok(VERIFY_WRITE, oact, sizeof(*oact)) ||
 189                     __put_user(sa_handler, &oact->sa_handler) ||
 190                     __put_user(sa_restorer, &oact->sa_restorer) ||
 191                     __put_user(old_ka.sa.sa_flags, &oact->sa_flags) ||
 192                     __put_user(old_ka.sa.sa_mask.sig[0], &oact->sa_mask))
 193                         return -EFAULT;
 194         }
 195
 196         return ret;
 197 }
 198
 199 asmlinkage long
 200 sys32_rt_sigaction(int sig, const struct sigaction32 __user *act,
 201            struct sigaction32 __user *oact,  size_t sigsetsize)
 202 {
 203         struct k_sigaction new_ka, old_ka;
 204         unsigned long sa_handler;
 205         int ret;
 206         compat_sigset_t set32;
 207
 208         /* XXX: Don't preclude handling different sized sigset_t's.  */
 209         if (sigsetsize != sizeof(compat_sigset_t))
 210                 return -EINVAL;
 211
 212         if (act) {
 213                 ret = get_user(sa_handler, &act->sa_handler);
 214                 ret |= __copy_from_user(&set32, &act->sa_mask,
 215                                         sizeof(compat_sigset_t));
 216                 switch (_NSIG_WORDS) {
 217                 case 4: new_ka.sa.sa_mask.sig[3] = set32.sig[6]
 218                                 | (((long)set32.sig[7]) << 32);
 219                 case 3: new_ka.sa.sa_mask.sig[2] = set32.sig[4]
 220                                 | (((long)set32.sig[5]) << 32);
 221                 case 2: new_ka.sa.sa_mask.sig[1] = set32.sig[2]
 222                                 | (((long)set32.sig[3]) << 32);
 223                 case 1: new_ka.sa.sa_mask.sig[0] = set32.sig[0]
 224                                 | (((long)set32.sig[1]) << 32);
 225                 }
 226                 ret |= __get_user(new_ka.sa.sa_flags, &act->sa_flags);
 227
 228                 if (ret)
 229                         return -EFAULT;
 230                 new_ka.sa.sa_handler = (__sighandler_t) sa_handler;
 231         }
 232
 233         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
 234
 235         if (!ret && oact) {
 236                 switch (_NSIG_WORDS) {
 237                 case 4:
 238                         set32.sig[7] = (old_ka.sa.sa_mask.sig[3] >> 32);
 239                         set32.sig[6] = old_ka.sa.sa_mask.sig[3];
 240                 case 3:
 241                         set32.sig[5] = (old_ka.sa.sa_mask.sig[2] >> 32);
 242                         set32.sig[4] = old_ka.sa.sa_mask.sig[2];
 243                 case 2:
 244                         set32.sig[3] = (old_ka.sa.sa_mask.sig[1] >> 32);
 245                         set32.sig[2] = old_ka.sa.sa_mask.sig[1];
 246                 case 1:
 247                         set32.sig[1] = (old_ka.sa.sa_mask.sig[0] >> 32);
 248                         set32.sig[0] = old_ka.sa.sa_mask.sig[0];
 249                 }
 250                 ret = put_user((unsigned long)old_ka.sa.sa_handler, &oact->sa_handler);
 251                 ret |= __copy_to_user(&oact->sa_mask, &set32,
 252                                       sizeof(compat_sigset_t));
 253                 ret |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
 254         }
 255
 256         return ret;
 257 }
 258
 259 asmlinkage long
 260 sys32_sigaltstack(const stack_t32 __user *uss, stack_t32 __user *uoss)
 261 {
 262         struct pt_regs *regs = task_pt_regs(current);
 263         stack_t kss, koss;
 264         unsigned long ss_sp;
 265         int ret, err = 0;
 266         mm_segment_t old_fs = get_fs();
 267
 268         if (uss) {
 269                 if (!access_ok(VERIFY_READ, uss, sizeof(*uss)))
 270                         return -EFAULT;
 271                 err |= __get_user(ss_sp, &uss->ss_sp);
 272                 err |= __get_user(kss.ss_size, &uss->ss_size);
 273                 err |= __get_user(kss.ss_flags, &uss->ss_flags);
 274                 if (err)
 275                         return -EFAULT;
 276                 kss.ss_sp = (void __user *) ss_sp;
 277         }
 278
 279         set_fs (KERNEL_DS);
 280         ret = do_sigaltstack((stack_t __force __user *) (uss ? &kss : NULL),
 281                              (stack_t __force __user *) (uoss ? &koss : NULL),
 282                              regs->gprs[15]);
 283         set_fs (old_fs);
 284
 285         if (!ret && uoss) {
 286                 if (!access_ok(VERIFY_WRITE, uoss, sizeof(*uoss)))
 287                         return -EFAULT;
 288                 ss_sp = (unsigned long) koss.ss_sp;
 289                 err |= __put_user(ss_sp, &uoss->ss_sp);
 290                 err |= __put_user(koss.ss_size, &uoss->ss_size);
 291                 err |= __put_user(koss.ss_flags, &uoss->ss_flags);
 292                 if (err)
 293                         return -EFAULT;
 294         }
 295         return ret;
 296 }
 297
 298 static int save_sigregs32(struct pt_regs *regs, _sigregs32 __user *sregs)
 299 {
 300         _s390_regs_common32 regs32;
 301         int err, i;
 302
 303         regs32.psw.mask = PSW32_MASK_MERGE(psw32_user_bits,
 304                                            (__u32)(regs->psw.mask >> 32));
 305         regs32.psw.addr = PSW32_ADDR_AMODE31 | (__u32) regs->psw.addr;
 306         for (i = 0; i < NUM_GPRS; i++)
 307                 regs32.gprs[i] = (__u32) regs->gprs[i];
 308         save_access_regs(current->thread.acrs);
 309         memcpy(regs32.acrs, current->thread.acrs, sizeof(regs32.acrs));
 310         err = __copy_to_user(&sregs->regs, &regs32, sizeof(regs32));
 311         if (err)
 312                 return err;
 313         save_fp_regs(&current->thread.fp_regs);
 314         /* s390_fp_regs and _s390_fp_regs32 are the same ! */
 315         return __copy_to_user(&sregs->fpregs, &current->thread.fp_regs,
 316                               sizeof(_s390_fp_regs32));
 317 }
 318
 319 static int restore_sigregs32(struct pt_regs *regs,_sigregs32 __user *sregs)
 320 {
 321         _s390_regs_common32 regs32;
 322         int err, i;
 323
 324         /* Alwys make any pending restarted system call return -EINTR */
 325         current_thread_info()->restart_block.fn = do_no_restart_syscall;
 326
 327         err = __copy_from_user(&regs32, &sregs->regs, sizeof(regs32));
 328         if (err)
 329                 return err;
 330         regs->psw.mask = PSW_MASK_MERGE(regs->psw.mask,
 331                                         (__u64)regs32.psw.mask << 32);
 332         regs->psw.addr = (__u64)(regs32.psw.addr & PSW32_ADDR_INSN);
 333         for (i = 0; i < NUM_GPRS; i++)
 334                 regs->gprs[i] = (__u64) regs32.gprs[i];
 335         memcpy(current->thread.acrs, regs32.acrs, sizeof(current->thread.acrs));
 336         restore_access_regs(current->thread.acrs);
 337
 338         err = __copy_from_user(&current->thread.fp_regs, &sregs->fpregs,
 339                                sizeof(_s390_fp_regs32));
 340         current->thread.fp_regs.fpc &= FPC_VALID_MASK;
 341         if (err)
 342                 return err;
 343
 344         restore_fp_regs(&current->thread.fp_regs);
 345         regs->svcnr = 0;        /* disable syscall checks */
 346         return 0;
 347 }
 348
 349 static int save_sigregs_gprs_high(struct pt_regs *regs, __u32 __user *uregs)
 350 {
 351         __u32 gprs_high[NUM_GPRS];
 352         int i;
 353
 354         for (i = 0; i < NUM_GPRS; i++)
 355                 gprs_high[i] = regs->gprs[i] >> 32;
 356
 357         return __copy_to_user(uregs, &gprs_high, sizeof(gprs_high));
 358 }
 359
 360 static int restore_sigregs_gprs_high(struct pt_regs *regs, __u32 __user *uregs)
 361 {
 362         __u32 gprs_high[NUM_GPRS];
 363         int err, i;
 364
 365         err = __copy_from_user(&gprs_high, uregs, sizeof(gprs_high));
 366         if (err)
 367                 return err;
 368         for (i = 0; i < NUM_GPRS; i++)
 369                 *(__u32 *)&regs->gprs[i] = gprs_high[i];
 370         return 0;
 371 }
 372
 373 asmlinkage long sys32_sigreturn(void)
 374 {
 375         struct pt_regs *regs = task_pt_regs(current);
 376         sigframe32 __user *frame = (sigframe32 __user *)regs->gprs[15];
 377         sigset_t set;
 378
 379         if (!access_ok(VERIFY_READ, frame, sizeof(*frame)))
 380                 goto badframe;
 381         if (__copy_from_user(&set.sig, &frame->sc.oldmask, _SIGMASK_COPY_SIZE32))
 382                 goto badframe;
 383         sigdelsetmask(&set, ~_BLOCKABLE);
 384         set_current_blocked(&set);
 385         if (restore_sigregs32(regs, &frame->sregs))
 386                 goto badframe;
 387         if (restore_sigregs_gprs_high(regs, frame->gprs_high))
 388                 goto badframe;
 389         return regs->gprs[2];
 390 badframe:
 391         force_sig(SIGSEGV, current);
 392         return 0;
 393 }
 394
 395 asmlinkage long sys32_rt_sigreturn(void)
 396 {
 397         struct pt_regs *regs = task_pt_regs(current);
 398         rt_sigframe32 __user *frame = (rt_sigframe32 __user *)regs->gprs[15];
 399         sigset_t set;
 400         stack_t st;
 401         __u32 ss_sp;
 402         int err;
 403         mm_segment_t old_fs = get_fs();
 404
 405         if (!access_ok(VERIFY_READ, frame, sizeof(*frame)))
 406                 goto badframe;
 407         if (__copy_from_user(&set, &frame->uc.uc_sigmask, sizeof(set)))
 408                 goto badframe;
 409         sigdelsetmask(&set, ~_BLOCKABLE);
 410         set_current_blocked(&set);
 411         if (restore_sigregs32(regs, &frame->uc.uc_mcontext))
 412                 goto badframe;
 413         if (restore_sigregs_gprs_high(regs, frame->gprs_high))
 414                 goto badframe;
 415         err = __get_user(ss_sp, &frame->uc.uc_stack.ss_sp);
 416         st.ss_sp = compat_ptr(ss_sp);
 417         err |= __get_user(st.ss_size, &frame->uc.uc_stack.ss_size);
 418         err |= __get_user(st.ss_flags, &frame->uc.uc_stack.ss_flags);
 419         if (err)
 420                 goto badframe;
 421         set_fs (KERNEL_DS);
 422         do_sigaltstack((stack_t __force __user *)&st, NULL, regs->gprs[15]);
 423         set_fs (old_fs);
 424         return regs->gprs[2];
 425 badframe:
 426         force_sig(SIGSEGV, current);
 427         return 0;
 428 }
 429
 430 /*
 431  * Set up a signal frame.
 432  */
 433
 434
 435 /*
 436  * Determine which stack to use..
 437  */
 438 static inline void __user *
 439 get_sigframe(struct k_sigaction *ka, struct pt_regs * regs, size_t frame_size)
 440 {
 441         unsigned long sp;
 442
 443         /* Default to using normal stack */
 444         sp = (unsigned long) A(regs->gprs[15]);
 445
 446         /* Overflow on alternate signal stack gives SIGSEGV. */
 447         if (on_sig_stack(sp) && !on_sig_stack((sp - frame_size) & -8UL))
 448                 return (void __user *) -1UL;
 449
 450         /* This is the X/Open sanctioned signal stack switching.  */
 451         if (ka->sa.sa_flags & SA_ONSTACK) {
 452                 if (! sas_ss_flags(sp))
 453                         sp = current->sas_ss_sp + current->sas_ss_size;
 454         }
 455
 456         /* This is the legacy signal stack switching. */
 457         else if (!user_mode(regs) &&
 458                  !(ka->sa.sa_flags & SA_RESTORER) &&
 459                  ka->sa.sa_restorer) {
 460                 sp = (unsigned long) ka->sa.sa_restorer;
 461         }
 462
 463         return (void __user *)((sp - frame_size) & -8ul);
 464 }
 465
 466 static inline int map_signal(int sig)
 467 {
 468         if (current_thread_info()->exec_domain
 469             && current_thread_info()->exec_domain->signal_invmap
 470             && sig < 32)
 471                 return current_thread_info()->exec_domain->signal_invmap[sig];
 472         else
 473                 return sig;
 474 }
 475
 476 static int setup_frame32(int sig, struct k_sigaction *ka,
 477                         sigset_t *set, struct pt_regs * regs)
 478 {
 479         sigframe32 __user *frame = get_sigframe(ka, regs, sizeof(sigframe32));
 480         if (!access_ok(VERIFY_WRITE, frame, sizeof(sigframe32)))
 481                 goto give_sigsegv;
 482
 483         if (frame == (void __user *) -1UL)
 484                 goto give_sigsegv;
 485
 486         if (__copy_to_user(&frame->sc.oldmask, &set->sig, _SIGMASK_COPY_SIZE32))
 487                 goto give_sigsegv;
 488
 489         if (save_sigregs32(regs, &frame->sregs))
 490                 goto give_sigsegv;
 491         if (save_sigregs_gprs_high(regs, frame->gprs_high))
 492                 goto give_sigsegv;
 493         if (__put_user((unsigned long) &frame->sregs, &frame->sc.sregs))
 494                 goto give_sigsegv;
 495
 496         /* Set up to return from userspace.  If provided, use a stub
 497            already in userspace.  */
 498         if (ka->sa.sa_flags & SA_RESTORER) {
 499                 regs->gprs[14] = (__u64) ka->sa.sa_restorer;
 500         } else {
 501                 regs->gprs[14] = (__u64) frame->retcode;
 502                 if (__put_user(S390_SYSCALL_OPCODE | __NR_sigreturn,
 503                                (u16 __user *)(frame->retcode)))
 504                         goto give_sigsegv;
 505         }
 506
 507         /* Set up backchain. */
 508         if (__put_user(regs->gprs[15], (unsigned int __user *) frame))
 509                 goto give_sigsegv;
 510
 511         /* Set up registers for signal handler */
 512         regs->gprs[15] = (__u64) frame;
 513         regs->psw.addr = (__u64) ka->sa.sa_handler;
 514
 515         regs->gprs[2] = map_signal(sig);
 516         regs->gprs[3] = (__u64) &frame->sc;
 517
 518         /* We forgot to include these in the sigcontext.
 519            To avoid breaking binary compatibility, they are passed as args. */
 520         regs->gprs[4] = current->thread.trap_no;
 521         regs->gprs[5] = current->thread.prot_addr;
 522
 523         /* Place signal number on stack to allow backtrace from handler.  */
 524         if (__put_user(regs->gprs[2], (int __user *) &frame->signo))
 525                 goto give_sigsegv;
 526         return 0;
 527
 528 give_sigsegv:
 529         force_sigsegv(sig, current);
 530         return -EFAULT;
 531 }
 532
 533 static int setup_rt_frame32(int sig, struct k_sigaction *ka, siginfo_t *info,
 534                            sigset_t *set, struct pt_regs * regs)
 535 {
 536         int err = 0;
 537         rt_sigframe32 __user *frame = get_sigframe(ka, regs, sizeof(rt_sigframe32));
 538         if (!access_ok(VERIFY_WRITE, frame, sizeof(rt_sigframe32)))
 539                 goto give_sigsegv;
 540
 541         if (frame == (void __user *) -1UL)
 542                 goto give_sigsegv;
 543
 544         if (copy_siginfo_to_user32(&frame->info, info))
 545                 goto give_sigsegv;
 546
 547         /* Create the ucontext.  */
 548         err |= __put_user(UC_EXTENDED, &frame->uc.uc_flags);
 549         err |= __put_user(0, &frame->uc.uc_link);
 550         err |= __put_user(current->sas_ss_sp, &frame->uc.uc_stack.ss_sp);
 551         err |= __put_user(sas_ss_flags(regs->gprs[15]),
 552                           &frame->uc.uc_stack.ss_flags);
 553         err |= __put_user(current->sas_ss_size, &frame->uc.uc_stack.ss_size);
 554         err |= save_sigregs32(regs, &frame->uc.uc_mcontext);
 555         err |= save_sigregs_gprs_high(regs, frame->gprs_high);
 556         err |= __copy_to_user(&frame->uc.uc_sigmask, set, sizeof(*set));
 557         if (err)
 558                 goto give_sigsegv;
 559
 560         /* Set up to return from userspace.  If provided, use a stub
 561            already in userspace.  */
 562         if (ka->sa.sa_flags & SA_RESTORER) {
 563                 regs->gprs[14] = (__u64) ka->sa.sa_restorer;
 564         } else {
 565                 regs->gprs[14] = (__u64) frame->retcode;
 566                 err |= __put_user(S390_SYSCALL_OPCODE | __NR_rt_sigreturn,
 567                                   (u16 __user *)(frame->retcode));
 568         }
 569
 570         /* Set up backchain. */
 571         if (__put_user(regs->gprs[15], (unsigned int __user *) frame))
 572                 goto give_sigsegv;
 573
 574         /* Set up registers for signal handler */
 575         regs->gprs[15] = (__u64) frame;
 576         regs->psw.addr = (__u64) ka->sa.sa_handler;
 577
 578         regs->gprs[2] = map_signal(sig);
 579         regs->gprs[3] = (__u64) &frame->info;
 580         regs->gprs[4] = (__u64) &frame->uc;
 581         return 0;
 582
 583 give_sigsegv:
 584         force_sigsegv(sig, current);
 585         return -EFAULT;
 586 }
 587
 588 /*
 589  * OK, we're invoking a handler
 590  */
 591
 592 int handle_signal32(unsigned long sig, struct k_sigaction *ka,
 593                     siginfo_t *info, sigset_t *oldset, struct pt_regs *regs)
 594 {
 595         sigset_t blocked;
 596         int ret;
 597
 598         /* Set up the stack frame */
 599         if (ka->sa.sa_flags & SA_SIGINFO)
 600                 ret = setup_rt_frame32(sig, ka, info, oldset, regs);
 601         else
 602                 ret = setup_frame32(sig, ka, oldset, regs);
 603         if (ret)
 604                 return ret;
 605         sigorsets(&blocked, &current->blocked, &ka->sa.sa_mask);
 606         if (!(ka->sa.sa_flags & SA_NODEFER))
 607                 sigaddset(&blocked, sig);
 608         set_current_blocked(&blocked);
 609         return 0;
 610 }
 611