Home | History | Annotate | Line # | Download | only in netbsd32
netbsd32_ptrace.c revision 1.2.4.4
      1  1.2.4.4  skrll /*	$NetBSD: netbsd32_ptrace.c,v 1.2.4.4 2017/08/28 17:51:59 skrll Exp $	*/
      2  1.2.4.2  skrll 
      3  1.2.4.2  skrll /*
      4  1.2.4.2  skrll  * Copyright (c) 2016 The NetBSD Foundation, Inc.
      5  1.2.4.2  skrll  * All rights reserved.
      6  1.2.4.2  skrll  *
      7  1.2.4.2  skrll  * This code is derived from software contributed to The NetBSD Foundation
      8  1.2.4.2  skrll  * by Nick Hudson
      9  1.2.4.2  skrll  *
     10  1.2.4.2  skrll  * Redistribution and use in source and binary forms, with or without
     11  1.2.4.2  skrll  * modification, are permitted provided that the following conditions
     12  1.2.4.2  skrll  * are met:
     13  1.2.4.2  skrll  * 1. Redistributions of source code must retain the above copyright
     14  1.2.4.2  skrll  *    notice, this list of conditions and the following disclaimer.
     15  1.2.4.2  skrll  * 2. Redistributions in binary form must reproduce the above copyright
     16  1.2.4.2  skrll  *    notice, this list of conditions and the following disclaimer in the
     17  1.2.4.2  skrll  *    documentation and/or other materials provided with the distribution.
     18  1.2.4.2  skrll  *
     19  1.2.4.2  skrll  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  1.2.4.2  skrll  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  1.2.4.2  skrll  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  1.2.4.2  skrll  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  1.2.4.2  skrll  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  1.2.4.2  skrll  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  1.2.4.2  skrll  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  1.2.4.2  skrll  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  1.2.4.2  skrll  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  1.2.4.2  skrll  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  1.2.4.2  skrll  * POSSIBILITY OF SUCH DAMAGE.
     30  1.2.4.2  skrll  */
     31  1.2.4.2  skrll 
     32  1.2.4.2  skrll #include <sys/cdefs.h>
     33  1.2.4.4  skrll __KERNEL_RCSID(0, "$NetBSD: netbsd32_ptrace.c,v 1.2.4.4 2017/08/28 17:51:59 skrll Exp $");
     34  1.2.4.2  skrll 
     35  1.2.4.2  skrll #if defined(_KERNEL_OPT)
     36  1.2.4.2  skrll #include "opt_ptrace.h"
     37  1.2.4.2  skrll #include "opt_compat_netbsd.h"
     38  1.2.4.2  skrll #endif
     39  1.2.4.2  skrll 
     40  1.2.4.2  skrll #include <sys/param.h>
     41  1.2.4.2  skrll #include <sys/module.h>
     42  1.2.4.2  skrll #include <sys/ptrace.h>
     43  1.2.4.2  skrll #include <sys/syscallvar.h>
     44  1.2.4.2  skrll 
     45  1.2.4.2  skrll #include <compat/netbsd32/netbsd32.h>
     46  1.2.4.2  skrll #include <compat/netbsd32/netbsd32_syscall.h>
     47  1.2.4.2  skrll #include <compat/netbsd32/netbsd32_syscallargs.h>
     48  1.2.4.2  skrll #include <compat/netbsd32/netbsd32_conv.h>
     49  1.2.4.2  skrll 
     50  1.2.4.2  skrll extern struct emul emul_netbsd32;
     51  1.2.4.2  skrll 
     52  1.2.4.2  skrll 
     53  1.2.4.2  skrll /*
     54  1.2.4.2  skrll  * PTRACE methods
     55  1.2.4.2  skrll  */
     56  1.2.4.2  skrll 
     57  1.2.4.2  skrll static int netbsd32_copyinpiod(struct ptrace_io_desc *, const void *);
     58  1.2.4.2  skrll static void netbsd32_copyoutpiod(const struct ptrace_io_desc *, void *);
     59  1.2.4.2  skrll static int netbsd32_doregs(struct lwp *, struct lwp *, struct uio *);
     60  1.2.4.2  skrll static int netbsd32_dofpregs(struct lwp *, struct lwp *, struct uio *);
     61  1.2.4.4  skrll static int netbsd32_dodbregs(struct lwp *, struct lwp *, struct uio *);
     62  1.2.4.2  skrll 
     63  1.2.4.2  skrll 
     64  1.2.4.2  skrll static int
     65  1.2.4.2  skrll netbsd32_copyinpiod(struct ptrace_io_desc *piod, const void *addr)
     66  1.2.4.2  skrll {
     67  1.2.4.2  skrll 	struct netbsd32_ptrace_io_desc piod32;
     68  1.2.4.2  skrll 
     69  1.2.4.2  skrll 	int error = copyin(addr, &piod32, sizeof(piod32));
     70  1.2.4.2  skrll 	if (error)
     71  1.2.4.2  skrll 		return error;
     72  1.2.4.2  skrll 	piod->piod_op = piod32.piod_op;
     73  1.2.4.2  skrll 	piod->piod_offs = NETBSD32PTR64(piod32.piod_offs);
     74  1.2.4.2  skrll 	piod->piod_addr = NETBSD32PTR64(piod32.piod_addr);
     75  1.2.4.2  skrll 	piod->piod_len = (size_t)piod32.piod_len;
     76  1.2.4.2  skrll 
     77  1.2.4.2  skrll 	return 0;
     78  1.2.4.2  skrll }
     79  1.2.4.2  skrll 
     80  1.2.4.2  skrll static void
     81  1.2.4.2  skrll netbsd32_copyoutpiod(const struct ptrace_io_desc *piod, void *addr)
     82  1.2.4.2  skrll {
     83  1.2.4.2  skrll 	struct netbsd32_ptrace_io_desc piod32;
     84  1.2.4.2  skrll 
     85  1.2.4.2  skrll 	piod32.piod_op = piod->piod_op;
     86  1.2.4.2  skrll 	NETBSD32PTR32(piod32.piod_offs, piod->piod_offs);
     87  1.2.4.2  skrll 	NETBSD32PTR32(piod32.piod_addr, piod->piod_addr);
     88  1.2.4.2  skrll 	piod32.piod_len = (netbsd32_size_t)piod->piod_len;
     89  1.2.4.2  skrll 	(void) copyout(&piod32, addr, sizeof(piod32));
     90  1.2.4.2  skrll }
     91  1.2.4.2  skrll 
     92  1.2.4.2  skrll 
     93  1.2.4.2  skrll static int
     94  1.2.4.2  skrll netbsd32_doregs(struct lwp *curl /*tracer*/,
     95  1.2.4.2  skrll     struct lwp *l /*traced*/,
     96  1.2.4.2  skrll     struct uio *uio)
     97  1.2.4.2  skrll {
     98  1.2.4.2  skrll #if defined(PT_GETREGS) || defined(PT_SETREGS)
     99  1.2.4.2  skrll 	process_reg32 r32;
    100  1.2.4.2  skrll 	int error;
    101  1.2.4.2  skrll 	char *kv;
    102  1.2.4.2  skrll 	int kl;
    103  1.2.4.2  skrll 
    104  1.2.4.2  skrll 	if (uio->uio_offset < 0 || uio->uio_offset > (off_t)sizeof(r32))
    105  1.2.4.2  skrll 		return EINVAL;
    106  1.2.4.2  skrll 
    107  1.2.4.2  skrll 	kl = sizeof(r32);
    108  1.2.4.2  skrll 	kv = (char *)&r32;
    109  1.2.4.2  skrll 
    110  1.2.4.2  skrll 	kv += uio->uio_offset;
    111  1.2.4.2  skrll 	kl -= uio->uio_offset;
    112  1.2.4.2  skrll 	if ((size_t)kl > uio->uio_resid)
    113  1.2.4.2  skrll 		kl = uio->uio_resid;
    114  1.2.4.2  skrll 	error = process_read_regs32(l, &r32);
    115  1.2.4.2  skrll 	if (error == 0)
    116  1.2.4.2  skrll 		error = uiomove(kv, kl, uio);
    117  1.2.4.2  skrll 	if (error == 0 && uio->uio_rw == UIO_WRITE) {
    118  1.2.4.2  skrll 		if (l->l_stat != LSSTOP)
    119  1.2.4.2  skrll 			error = EBUSY;
    120  1.2.4.2  skrll 		else
    121  1.2.4.2  skrll 			error = process_write_regs32(l, &r32);
    122  1.2.4.2  skrll 	}
    123  1.2.4.2  skrll 
    124  1.2.4.2  skrll 	uio->uio_offset = 0;
    125  1.2.4.2  skrll 	return error;
    126  1.2.4.2  skrll #else
    127  1.2.4.2  skrll 	return EINVAL;
    128  1.2.4.2  skrll #endif
    129  1.2.4.2  skrll }
    130  1.2.4.2  skrll 
    131  1.2.4.2  skrll static int
    132  1.2.4.2  skrll netbsd32_dofpregs(struct lwp *curl /*tracer*/,
    133  1.2.4.2  skrll     struct lwp *l /*traced*/,
    134  1.2.4.2  skrll     struct uio *uio)
    135  1.2.4.2  skrll {
    136  1.2.4.2  skrll #if defined(PT_GETFPREGS) || defined(PT_SETFPREGS)
    137  1.2.4.2  skrll 	process_fpreg32 r32;
    138  1.2.4.2  skrll 	int error;
    139  1.2.4.2  skrll 	char *kv;
    140  1.2.4.2  skrll 	size_t kl;
    141  1.2.4.2  skrll 
    142  1.2.4.2  skrll 	KASSERT(l->l_proc->p_flag & PK_32);
    143  1.2.4.2  skrll 	if (uio->uio_offset < 0 || uio->uio_offset > (off_t)sizeof(r32))
    144  1.2.4.2  skrll 		return EINVAL;
    145  1.2.4.2  skrll 	kl = sizeof(r32);
    146  1.2.4.2  skrll 	kv = (char *)&r32;
    147  1.2.4.2  skrll 
    148  1.2.4.2  skrll 	kv += uio->uio_offset;
    149  1.2.4.2  skrll 	kl -= uio->uio_offset;
    150  1.2.4.2  skrll 	if (kl > uio->uio_resid)
    151  1.2.4.2  skrll 		kl = uio->uio_resid;
    152  1.2.4.2  skrll 
    153  1.2.4.2  skrll 	error = process_read_fpregs32(l, &r32, &kl);
    154  1.2.4.2  skrll 	if (error == 0)
    155  1.2.4.2  skrll 		error = uiomove(kv, kl, uio);
    156  1.2.4.2  skrll 	if (error == 0 && uio->uio_rw == UIO_WRITE) {
    157  1.2.4.2  skrll 		if (l->l_stat != LSSTOP)
    158  1.2.4.2  skrll 			error = EBUSY;
    159  1.2.4.2  skrll 		else
    160  1.2.4.2  skrll 			error = process_write_fpregs32(l, &r32, kl);
    161  1.2.4.2  skrll 	}
    162  1.2.4.2  skrll 	uio->uio_offset = 0;
    163  1.2.4.2  skrll 	return error;
    164  1.2.4.2  skrll #else
    165  1.2.4.2  skrll 	return EINVAL;
    166  1.2.4.2  skrll #endif
    167  1.2.4.2  skrll }
    168  1.2.4.2  skrll 
    169  1.2.4.3  skrll static int
    170  1.2.4.4  skrll netbsd32_dodbregs(struct lwp *curl /*tracer*/,
    171  1.2.4.4  skrll     struct lwp *l /*traced*/,
    172  1.2.4.4  skrll     struct uio *uio)
    173  1.2.4.3  skrll {
    174  1.2.4.4  skrll #if defined(PT_GETDBREGS) || defined(PT_SETDBREGS)
    175  1.2.4.4  skrll 	process_dbreg32 r32;
    176  1.2.4.4  skrll 	int error;
    177  1.2.4.4  skrll 	char *kv;
    178  1.2.4.4  skrll 	size_t kl;
    179  1.2.4.3  skrll 
    180  1.2.4.4  skrll 	KASSERT(l->l_proc->p_flag & PK_32);
    181  1.2.4.4  skrll 	if (uio->uio_offset < 0 || uio->uio_offset > (off_t)sizeof(r32))
    182  1.2.4.4  skrll 		return EINVAL;
    183  1.2.4.4  skrll 	kl = sizeof(r32);
    184  1.2.4.4  skrll 	kv = (char *)&r32;
    185  1.2.4.4  skrll 
    186  1.2.4.4  skrll 	kv += uio->uio_offset;
    187  1.2.4.4  skrll 	kl -= uio->uio_offset;
    188  1.2.4.4  skrll 	if (kl > uio->uio_resid)
    189  1.2.4.4  skrll 		kl = uio->uio_resid;
    190  1.2.4.3  skrll 
    191  1.2.4.4  skrll 	error = process_read_dbregs32(l, &r32, &kl);
    192  1.2.4.4  skrll 	if (error == 0)
    193  1.2.4.4  skrll 		error = uiomove(kv, kl, uio);
    194  1.2.4.4  skrll 	if (error == 0 && uio->uio_rw == UIO_WRITE) {
    195  1.2.4.4  skrll 		if (l->l_stat != LSSTOP)
    196  1.2.4.4  skrll 			error = EBUSY;
    197  1.2.4.4  skrll 		else
    198  1.2.4.4  skrll 			error = process_write_dbregs32(l, &r32, kl);
    199  1.2.4.4  skrll 	}
    200  1.2.4.4  skrll 	uio->uio_offset = 0;
    201  1.2.4.4  skrll 	return error;
    202  1.2.4.4  skrll #else
    203  1.2.4.3  skrll 	return EINVAL;
    204  1.2.4.4  skrll #endif
    205  1.2.4.3  skrll }
    206  1.2.4.3  skrll 
    207  1.2.4.2  skrll static struct ptrace_methods netbsd32_ptm = {
    208  1.2.4.2  skrll 	.ptm_copyinpiod = netbsd32_copyinpiod,
    209  1.2.4.2  skrll 	.ptm_copyoutpiod = netbsd32_copyoutpiod,
    210  1.2.4.2  skrll 	.ptm_doregs = netbsd32_doregs,
    211  1.2.4.3  skrll 	.ptm_dofpregs = netbsd32_dofpregs,
    212  1.2.4.4  skrll 	.ptm_dodbregs = netbsd32_dodbregs
    213  1.2.4.2  skrll };
    214  1.2.4.2  skrll 
    215  1.2.4.2  skrll 
    216  1.2.4.2  skrll int
    217  1.2.4.2  skrll netbsd32_ptrace(struct lwp *l, const struct netbsd32_ptrace_args *uap,
    218  1.2.4.2  skrll     register_t *retval)
    219  1.2.4.2  skrll {
    220  1.2.4.2  skrll 	/* {
    221  1.2.4.2  skrll 		syscallarg(int) req;
    222  1.2.4.2  skrll 		syscallarg(pid_t) pid;
    223  1.2.4.2  skrll 		syscallarg(netbsd32_voidp *) addr;
    224  1.2.4.2  skrll 		syscallarg(int) data;
    225  1.2.4.2  skrll 	} */
    226  1.2.4.2  skrll 
    227  1.2.4.2  skrll 	return do_ptrace(&netbsd32_ptm, l, SCARG(uap, req), SCARG(uap, pid),
    228  1.2.4.2  skrll 	    SCARG_P32(uap, addr), SCARG(uap, data), retval);
    229  1.2.4.2  skrll }
    230  1.2.4.2  skrll 
    231  1.2.4.2  skrll static const struct syscall_package compat_ptrace_syscalls[] = {
    232  1.2.4.2  skrll 	{ NETBSD32_SYS_netbsd32_ptrace, 0, (sy_call_t *)netbsd32_ptrace },
    233  1.2.4.2  skrll 	{ 0, 0, NULL },
    234  1.2.4.2  skrll };
    235  1.2.4.2  skrll 
    236  1.2.4.2  skrll #define	DEPS	"compat_netbsd32,ptrace_common"
    237  1.2.4.2  skrll 
    238  1.2.4.2  skrll MODULE(MODULE_CLASS_EXEC, compat_netbsd32_ptrace, DEPS);
    239  1.2.4.2  skrll 
    240  1.2.4.2  skrll static int
    241  1.2.4.2  skrll compat_netbsd32_ptrace_modcmd(modcmd_t cmd, void *arg)
    242  1.2.4.2  skrll {
    243  1.2.4.2  skrll 	int error;
    244  1.2.4.2  skrll 
    245  1.2.4.2  skrll 	switch (cmd) {
    246  1.2.4.2  skrll 	case MODULE_CMD_INIT:
    247  1.2.4.2  skrll 		error = syscall_establish(&emul_netbsd32,
    248  1.2.4.2  skrll 		    compat_ptrace_syscalls);
    249  1.2.4.2  skrll 		break;
    250  1.2.4.2  skrll 	case MODULE_CMD_FINI:
    251  1.2.4.2  skrll 		error = syscall_disestablish(&emul_netbsd32,
    252  1.2.4.2  skrll 		    compat_ptrace_syscalls);
    253  1.2.4.2  skrll 		break;
    254  1.2.4.2  skrll 	default:
    255  1.2.4.2  skrll 		error = ENOTTY;
    256  1.2.4.2  skrll 		break;
    257  1.2.4.2  skrll 	}
    258  1.2.4.2  skrll 	return error;
    259  1.2.4.2  skrll }
    260