arch/parisc/kernel/signal32.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*    Signal support for 32-bit kernel builds
   3  *
   4  *    Copyright (C) 2001 Matthew Wilcox <willy at parisc-linux.org>
   5  *    Copyright (C) 2006 Kyle McMartin <kyle at parisc-linux.org>
   6  *
   7  *    Code was mostly borrowed from kernel/signal.c.
   8  *    See kernel/signal.c for additional Copyrights.
   9  */
  10
  11 #include <linux/compat.h>
  12 #include <linux/module.h>
  13 #include <linux/unistd.h>
  14 #include <linux/init.h>
  15 #include <linux/sched.h>
  16 #include <linux/syscalls.h>
  17 #include <linux/types.h>
  18 #include <linux/errno.h>
  19
  20 #include <linux/uaccess.h>
  21
  22 #include "signal32.h"
  23
  24 #define DEBUG_COMPAT_SIG 0
  25 #define DEBUG_COMPAT_SIG_LEVEL 2
  26
  27 #if DEBUG_COMPAT_SIG
  28 #define DBG(LEVEL, ...) \
  29         ((DEBUG_COMPAT_SIG_LEVEL >= LEVEL) \
  30         ? printk(__VA_ARGS__) : (void) 0)
  31 #else
  32 #define DBG(LEVEL, ...)
  33 #endif
  34
  35 long
  36 restore_sigcontext32(struct compat_sigcontext __user *sc, struct compat_regfile __user * rf,
  37                 struct pt_regs *regs)
  38 {
  39         long err = 0;
  40         compat_uint_t compat_reg;
  41         compat_uint_t compat_regt;
  42         int regn;
  43
  44         /* When loading 32-bit values into 64-bit registers make
  45            sure to clear the upper 32-bits */
  46         DBG(2,"restore_sigcontext32: PER_LINUX32 process\n");
  47         DBG(2,"restore_sigcontext32: sc = 0x%p, rf = 0x%p, regs = 0x%p\n", sc, rf, regs);
  48         DBG(2,"restore_sigcontext32: compat_sigcontext is %#lx bytes\n", sizeof(*sc));
  49         for(regn=0; regn < 32; regn++){
  50                 err |= __get_user(compat_reg,&sc->sc_gr[regn]);
  51                 regs->gr[regn] = compat_reg;
  52                 /* Load upper half */
  53                 err |= __get_user(compat_regt,&rf->rf_gr[regn]);
  54                 regs->gr[regn] = ((u64)compat_regt << 32) | (u64)compat_reg;
  55                 DBG(3,"restore_sigcontext32: gr%02d = %#lx (%#x / %#x)\n",
  56                                 regn, regs->gr[regn], compat_regt, compat_reg);
  57         }
  58         DBG(2,"restore_sigcontext32: sc->sc_fr = 0x%p (%#lx)\n",sc->sc_fr, sizeof(sc->sc_fr));
  59         /* XXX: BE WARNED FR's are 64-BIT! */
  60         err |= __copy_from_user(regs->fr, sc->sc_fr, sizeof(regs->fr));
  61
  62         /* Better safe than sorry, pass __get_user two things of
  63            the same size and let gcc do the upward conversion to
  64            64-bits */
  65         err |= __get_user(compat_reg, &sc->sc_iaoq[0]);
  66         /* Load upper half */
  67         err |= __get_user(compat_regt, &rf->rf_iaoq[0]);
  68         regs->iaoq[0] = ((u64)compat_regt << 32) | (u64)compat_reg;
  69         DBG(2,"restore_sigcontext32: upper half of iaoq[0] = %#lx\n", compat_regt);
  70         DBG(2,"restore_sigcontext32: sc->sc_iaoq[0] = %p => %#x\n",
  71                         &sc->sc_iaoq[0], compat_reg);
  72
  73         err |= __get_user(compat_reg, &sc->sc_iaoq[1]);
  74         /* Load upper half */
  75         err |= __get_user(compat_regt, &rf->rf_iaoq[1]);
  76         regs->iaoq[1] = ((u64)compat_regt << 32) | (u64)compat_reg;
  77         DBG(2,"restore_sigcontext32: upper half of iaoq[1] = %#lx\n", compat_regt);
  78         DBG(2,"restore_sigcontext32: sc->sc_iaoq[1] = %p => %#x\n",
  79                         &sc->sc_iaoq[1],compat_reg);
  80         DBG(2,"restore_sigcontext32: iaoq is %#lx / %#lx\n",
  81                         regs->iaoq[0],regs->iaoq[1]);
  82
  83         err |= __get_user(compat_reg, &sc->sc_iasq[0]);
  84         /* Load the upper half for iasq */
  85         err |= __get_user(compat_regt, &rf->rf_iasq[0]);
  86         regs->iasq[0] = ((u64)compat_regt << 32) | (u64)compat_reg;
  87         DBG(2,"restore_sigcontext32: upper half of iasq[0] = %#lx\n", compat_regt);
  88
  89         err |= __get_user(compat_reg, &sc->sc_iasq[1]);
  90         /* Load the upper half for iasq */
  91         err |= __get_user(compat_regt, &rf->rf_iasq[1]);
  92         regs->iasq[1] = ((u64)compat_regt << 32) | (u64)compat_reg;
  93         DBG(2,"restore_sigcontext32: upper half of iasq[1] = %#lx\n", compat_regt);
  94         DBG(2,"restore_sigcontext32: iasq is %#lx / %#lx\n",
  95                 regs->iasq[0],regs->iasq[1]);
  96
  97         err |= __get_user(compat_reg, &sc->sc_sar);
  98         /* Load the upper half for sar */
  99         err |= __get_user(compat_regt, &rf->rf_sar);
 100         regs->sar = ((u64)compat_regt << 32) | (u64)compat_reg;
 101         DBG(2,"restore_sigcontext32: upper_half & sar = %#lx\n", compat_regt);
 102         DBG(2,"restore_sigcontext32: sar is %#lx\n", regs->sar);
 103         DBG(2,"restore_sigcontext32: r28 is %ld\n", regs->gr[28]);
 104
 105         return err;
 106 }
 107
 108 /*
 109  * Set up the sigcontext structure for this process.
 110  * This is not an easy task if the kernel is 64-bit, it will require
 111  * that we examine the process personality to determine if we need to
 112  * truncate for a 32-bit userspace.
 113  */
 114 long
 115 setup_sigcontext32(struct compat_sigcontext __user *sc, struct compat_regfile __user * rf,
 116                 struct pt_regs *regs, int in_syscall)
 117 {
 118         compat_int_t flags = 0;
 119         long err = 0;
 120         compat_uint_t compat_reg;
 121         compat_uint_t compat_regb;
 122         int regn;
 123
 124         if (on_sig_stack((unsigned long) sc))
 125                 flags |= PARISC_SC_FLAG_ONSTACK;
 126
 127         if (in_syscall) {
 128
 129                 DBG(1,"setup_sigcontext32: in_syscall\n");
 130
 131                 flags |= PARISC_SC_FLAG_IN_SYSCALL;
 132                 /* Truncate gr31 */
 133                 compat_reg = (compat_uint_t)(regs->gr[31]);
 134                 /* regs->iaoq is undefined in the syscall return path */
 135                 err |= __put_user(compat_reg, &sc->sc_iaoq[0]);
 136                 DBG(2,"setup_sigcontext32: sc->sc_iaoq[0] = %p <= %#x\n",
 137                                 &sc->sc_iaoq[0], compat_reg);
 138
 139                 /* Store upper half */
 140                 compat_reg = (compat_uint_t)(regs->gr[31] >> 32);
 141                 err |= __put_user(compat_reg, &rf->rf_iaoq[0]);
 142                 DBG(2,"setup_sigcontext32: upper half iaoq[0] = %#x\n", compat_reg);
 143
 144
 145                 compat_reg = (compat_uint_t)(regs->gr[31]+4);
 146                 err |= __put_user(compat_reg, &sc->sc_iaoq[1]);
 147                 DBG(2,"setup_sigcontext32: sc->sc_iaoq[1] = %p <= %#x\n",
 148                                 &sc->sc_iaoq[1], compat_reg);
 149                 /* Store upper half */
 150                 compat_reg = (compat_uint_t)((regs->gr[31]+4) >> 32);
 151                 err |= __put_user(compat_reg, &rf->rf_iaoq[1]);
 152                 DBG(2,"setup_sigcontext32: upper half iaoq[1] = %#x\n", compat_reg);
 153
 154                 /* Truncate sr3 */
 155                 compat_reg = (compat_uint_t)(regs->sr[3]);
 156                 err |= __put_user(compat_reg, &sc->sc_iasq[0]);
 157                 err |= __put_user(compat_reg, &sc->sc_iasq[1]);
 158
 159                 /* Store upper half */
 160                 compat_reg = (compat_uint_t)(regs->sr[3] >> 32);
 161                 err |= __put_user(compat_reg, &rf->rf_iasq[0]);
 162                 err |= __put_user(compat_reg, &rf->rf_iasq[1]);
 163
 164                 DBG(2,"setup_sigcontext32: upper half iasq[0] = %#x\n", compat_reg);
 165                 DBG(2,"setup_sigcontext32: upper half iasq[1] = %#x\n", compat_reg);
 166                 DBG(1,"setup_sigcontext32: iaoq %#lx / %#lx\n",
 167                         regs->gr[31], regs->gr[31]+4);
 168
 169         } else {
 170
 171                 compat_reg = (compat_uint_t)(regs->iaoq[0]);
 172                 err |= __put_user(compat_reg, &sc->sc_iaoq[0]);
 173                 DBG(2,"setup_sigcontext32: sc->sc_iaoq[0] = %p <= %#x\n",
 174                                 &sc->sc_iaoq[0], compat_reg);
 175                 /* Store upper half */
 176                 compat_reg = (compat_uint_t)(regs->iaoq[0] >> 32);
 177                 err |= __put_user(compat_reg, &rf->rf_iaoq[0]);
 178                 DBG(2,"setup_sigcontext32: upper half iaoq[0] = %#x\n", compat_reg);
 179
 180                 compat_reg = (compat_uint_t)(regs->iaoq[1]);
 181                 err |= __put_user(compat_reg, &sc->sc_iaoq[1]);
 182                 DBG(2,"setup_sigcontext32: sc->sc_iaoq[1] = %p <= %#x\n",
 183                                 &sc->sc_iaoq[1], compat_reg);
 184                 /* Store upper half */
 185                 compat_reg = (compat_uint_t)(regs->iaoq[1] >> 32);
 186                 err |= __put_user(compat_reg, &rf->rf_iaoq[1]);
 187                 DBG(2,"setup_sigcontext32: upper half iaoq[1] = %#x\n", compat_reg);
 188
 189
 190                 compat_reg = (compat_uint_t)(regs->iasq[0]);
 191                 err |= __put_user(compat_reg, &sc->sc_iasq[0]);
 192                 DBG(2,"setup_sigcontext32: sc->sc_iasq[0] = %p <= %#x\n",
 193                                 &sc->sc_iasq[0], compat_reg);
 194                 /* Store upper half */
 195                 compat_reg = (compat_uint_t)(regs->iasq[0] >> 32);
 196                 err |= __put_user(compat_reg, &rf->rf_iasq[0]);
 197                 DBG(2,"setup_sigcontext32: upper half iasq[0] = %#x\n", compat_reg);
 198
 199
 200                 compat_reg = (compat_uint_t)(regs->iasq[1]);
 201                 err |= __put_user(compat_reg, &sc->sc_iasq[1]);
 202                 DBG(2,"setup_sigcontext32: sc->sc_iasq[1] = %p <= %#x\n",
 203                                 &sc->sc_iasq[1], compat_reg);
 204                 /* Store upper half */
 205                 compat_reg = (compat_uint_t)(regs->iasq[1] >> 32);
 206                 err |= __put_user(compat_reg, &rf->rf_iasq[1]);
 207                 DBG(2,"setup_sigcontext32: upper half iasq[1] = %#x\n", compat_reg);
 208
 209                 /* Print out the IAOQ for debugging */
 210                 DBG(1,"setup_sigcontext32: ia0q %#lx / %#lx\n",
 211                         regs->iaoq[0], regs->iaoq[1]);
 212         }
 213
 214         err |= __put_user(flags, &sc->sc_flags);
 215
 216         DBG(1,"setup_sigcontext32: Truncating general registers.\n");
 217
 218         for(regn=0; regn < 32; regn++){
 219                 /* Truncate a general register */
 220                 compat_reg = (compat_uint_t)(regs->gr[regn]);
 221                 err |= __put_user(compat_reg, &sc->sc_gr[regn]);
 222                 /* Store upper half */
 223                 compat_regb = (compat_uint_t)(regs->gr[regn] >> 32);
 224                 err |= __put_user(compat_regb, &rf->rf_gr[regn]);
 225
 226                 /* DEBUG: Write out the "upper / lower" register data */
 227                 DBG(2,"setup_sigcontext32: gr%02d = %#x / %#x\n", regn,
 228                                 compat_regb, compat_reg);
 229         }
 230
 231         /* Copy the floating point registers (same size)
 232            XXX: BE WARNED FR's are 64-BIT! */
 233         DBG(1,"setup_sigcontext32: Copying from regs to sc, "
 234               "sc->sc_fr size = %#lx, regs->fr size = %#lx\n",
 235                 sizeof(regs->fr), sizeof(sc->sc_fr));
 236         err |= __copy_to_user(sc->sc_fr, regs->fr, sizeof(regs->fr));
 237
 238         compat_reg = (compat_uint_t)(regs->sar);
 239         err |= __put_user(compat_reg, &sc->sc_sar);
 240         DBG(2,"setup_sigcontext32: sar is %#x\n", compat_reg);
 241         /* Store upper half */
 242         compat_reg = (compat_uint_t)(regs->sar >> 32);
 243         err |= __put_user(compat_reg, &rf->rf_sar);
 244         DBG(2,"setup_sigcontext32: upper half sar = %#x\n", compat_reg);
 245         DBG(1,"setup_sigcontext32: r28 is %ld\n", regs->gr[28]);
 246
 247         return err;
 248 }