xref: /netbsd-src/sys/compat/freebsd/freebsd_ptrace.c (revision aaf4ece63a859a04e37cf3a7229b5fab0157cc06)
1 /*	$NetBSD: freebsd_ptrace.c,v 1.9 2005/12/11 12:20:02 christos Exp $	*/
2 
3 /*-
4  * Copyright (c) 1982, 1986, 1989, 1993
5  *	The Regents of the University of California.  All rights reserved.
6  * (c) UNIX System Laboratories, Inc.
7  * All or some portions of this file are derived from material licensed
8  * to the University of California by American Telephone and Telegraph
9  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
10  * the permission of UNIX System Laboratories, Inc.
11  *
12  * Redistribution and use in source and binary forms, with or without
13  * modification, are permitted provided that the following conditions
14  * are met:
15  * 1. Redistributions of source code must retain the above copyright
16  *    notice, this list of conditions and the following disclaimer.
17  * 2. Redistributions in binary form must reproduce the above copyright
18  *    notice, this list of conditions and the following disclaimer in the
19  *    documentation and/or other materials provided with the distribution.
20  * 3. Neither the name of the University nor the names of its contributors
21  *    may be used to endorse or promote products derived from this software
22  *    without specific prior written permission.
23  *
24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34  * SUCH DAMAGE.
35  *
36  *	from: @(#)sys_process.c	8.1 (Berkeley) 6/10/93
37  */
38 
39 /*-
40  * Copyright (c) 1994 Christopher G. Demetriou.  All rights reserved.
41  *
42  * Redistribution and use in source and binary forms, with or without
43  * modification, are permitted provided that the following conditions
44  * are met:
45  * 1. Redistributions of source code must retain the above copyright
46  *    notice, this list of conditions and the following disclaimer.
47  * 2. Redistributions in binary form must reproduce the above copyright
48  *    notice, this list of conditions and the following disclaimer in the
49  *    documentation and/or other materials provided with the distribution.
50  * 3. All advertising materials mentioning features or use of this software
51  *    must display the following acknowledgement:
52  *	This product includes software developed by the University of
53  *	California, Berkeley and its contributors.
54  * 4. Neither the name of the University nor the names of its contributors
55  *    may be used to endorse or promote products derived from this software
56  *    without specific prior written permission.
57  *
58  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
59  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
60  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
61  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
62  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
63  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
64  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
65  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
66  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
67  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
68  * SUCH DAMAGE.
69  *
70  *	from: @(#)sys_process.c	8.1 (Berkeley) 6/10/93
71  */
72 
73 #include <sys/cdefs.h>
74 __KERNEL_RCSID(0, "$NetBSD: freebsd_ptrace.c,v 1.9 2005/12/11 12:20:02 christos Exp $");
75 
76 #include <sys/param.h>
77 #include <sys/systm.h>
78 #include <sys/proc.h>
79 #include <sys/errno.h>
80 #include <sys/ptrace.h>
81 #include <sys/uio.h>
82 #include <sys/user.h>
83 #include <sys/mount.h>
84 #include <sys/sa.h>
85 #include <sys/syscallargs.h>
86 
87 #include <compat/sys/signal.h>
88 #include <compat/sys/signalvar.h>
89 
90 #include <machine/reg.h>
91 #include <machine/freebsd_machdep.h>
92 
93 #include <compat/common/compat_util.h>
94 #include <compat/freebsd/freebsd_syscallargs.h>
95 #include <compat/freebsd/freebsd_ptrace.h>
96 
97 /*
98  * Process debugging system call.
99  */
100 int
101 freebsd_sys_ptrace(l, v, retval)
102 	struct lwp *l;
103 	void *v;
104 	register_t *retval;
105 {
106 	struct freebsd_sys_ptrace_args /* {
107 		syscallarg(int) req;
108 		syscallarg(pid_t) pid;
109 		syscallarg(caddr_t) addr;
110 		syscallarg(int) data;
111 	} */ *uap = v;
112 	struct proc *p = l->l_proc;
113 	int error;
114 	caddr_t sg;
115 	struct {
116 		struct reg regs;
117 		struct fpreg fpregs;
118 	} *nrp;
119 	struct sys_ptrace_args npa;
120 	struct freebsd_ptrace_reg fr;
121 
122 	switch (SCARG(uap, req)) {
123 #ifdef PT_STEP
124 	case FREEBSD_PT_STEP:
125 		SCARG(&npa, req) = PT_STEP;
126 		SCARG(&npa, pid) = SCARG(uap, pid);
127 		SCARG(&npa, addr) = SCARG(uap, addr);
128 		SCARG(&npa, data) = SCARG(uap, data);
129 		return sys_ptrace(l, &npa, retval);
130 #endif
131 	case FREEBSD_PT_TRACE_ME:
132 	case FREEBSD_PT_READ_I:
133 	case FREEBSD_PT_READ_D:
134 	case FREEBSD_PT_WRITE_I:
135 	case FREEBSD_PT_WRITE_D:
136 	case FREEBSD_PT_CONTINUE:
137 	case FREEBSD_PT_KILL:
138 		/* These requests are compatible with NetBSD */
139 		return sys_ptrace(l, uap, retval);
140 
141 	case FREEBSD_PT_READ_U:
142 	case FREEBSD_PT_WRITE_U:
143 		sg = stackgap_init(p, 0);
144 		nrp = stackgap_alloc(p, &sg, sizeof(*nrp));
145 #ifdef PT_GETREGS
146 		SCARG(&npa, req) = PT_GETREGS;
147 		SCARG(&npa, pid) = SCARG(uap, pid);
148 		SCARG(&npa, addr) = (caddr_t)&nrp->regs;
149 		if ((error = sys_ptrace(l, &npa, retval)) != 0)
150 			return error;
151 #endif
152 #ifdef PT_GETFPREGS
153 		SCARG(&npa, req) = PT_GETFPREGS;
154 		SCARG(&npa, pid) = SCARG(uap, pid);
155 		SCARG(&npa, addr) = (caddr_t)&nrp->fpregs;
156 		if ((error = sys_ptrace(l, &npa, retval)) != 0)
157 			return error;
158 #endif
159 		netbsd_to_freebsd_ptrace_regs(&nrp->regs, &nrp->fpregs, &fr);
160 		switch (SCARG(uap, req)) {
161 		case FREEBSD_PT_READ_U:
162 			return freebsd_ptrace_getregs(&fr, SCARG(uap, addr),
163 						      retval);
164 
165 		case FREEBSD_PT_WRITE_U:
166 			error = freebsd_ptrace_setregs(&fr,
167 			    SCARG(uap, addr), SCARG(uap, data));
168 			if (error)
169 			    return error;
170 			freebsd_to_netbsd_ptrace_regs(&fr,
171 						&nrp->regs, &nrp->fpregs);
172 #ifdef PT_SETREGS
173 			SCARG(&npa, req) = PT_SETREGS;
174 			SCARG(&npa, pid) = SCARG(uap, pid);
175 			SCARG(&npa, addr) = (caddr_t)&nrp->regs;
176 			if ((error = sys_ptrace(l, &npa, retval)) != 0)
177 				return error;
178 #endif
179 #ifdef PT_SETFPREGS
180 			SCARG(&npa, req) = PT_SETFPREGS;
181 			SCARG(&npa, pid) = SCARG(uap, pid);
182 			SCARG(&npa, addr) = (caddr_t)&nrp->fpregs;
183 			if ((error = sys_ptrace(l, &npa, retval)) != 0)
184 				return error;
185 #endif
186 			return 0;
187 		}
188 
189 	default:			/* It was not a legal request. */
190 		return (EINVAL);
191 	}
192 
193 #ifdef DIAGNOSTIC
194 	panic("freebsd_ptrace: impossible");
195 #endif
196 }
197