xref: /netbsd-src/sys/compat/freebsd/freebsd_ptrace.c (revision 7fa608457b817eca6e0977b37f758ae064f3c99c)
1 /*	$NetBSD: freebsd_ptrace.c,v 1.15 2007/06/23 15:24:26 dsl 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.15 2007/06/23 15:24:26 dsl Exp $");
75 
76 #if defined(_KERNEL_OPT)
77 #include "opt_ptrace.h"
78 #endif
79 
80 #include <sys/param.h>
81 #include <sys/systm.h>
82 #include <sys/proc.h>
83 #include <sys/errno.h>
84 #include <sys/ptrace.h>
85 #include <sys/uio.h>
86 #include <sys/user.h>
87 #include <sys/mount.h>
88 #include <sys/syscallargs.h>
89 
90 #include <compat/sys/signal.h>
91 #include <compat/sys/signalvar.h>
92 
93 #include <machine/reg.h>
94 #include <machine/freebsd_machdep.h>
95 
96 #include <compat/common/compat_util.h>
97 #include <compat/freebsd/freebsd_syscallargs.h>
98 #include <compat/freebsd/freebsd_ptrace.h>
99 
100 /*
101  * Process debugging system call.
102  */
103 int
104 freebsd_sys_ptrace(l, v, retval)
105 	struct lwp *l;
106 	void *v;
107 	register_t *retval;
108 {
109 #if defined(PTRACE) || defined(_LKM)
110 	struct freebsd_sys_ptrace_args /* {
111 		syscallarg(int) req;
112 		syscallarg(pid_t) pid;
113 		syscallarg(void *) addr;
114 		syscallarg(int) data;
115 	} */ *uap = v;
116 	struct sys_ptrace_args npa;
117 #ifdef _LKM
118 	sy_call_t sys_ptrace = sysent[SYS_ptrace].sy_call;
119 #endif
120 
121 	switch (SCARG(uap, req)) {
122 #ifdef PT_STEP
123 	case FREEBSD_PT_STEP:
124 		SCARG(&npa, req) = PT_STEP;
125 		SCARG(&npa, pid) = SCARG(uap, pid);
126 		SCARG(&npa, addr) = SCARG(uap, addr);
127 		SCARG(&npa, data) = SCARG(uap, data);
128 		return sys_ptrace(l, &npa, retval);
129 #endif
130 	case FREEBSD_PT_TRACE_ME:
131 	case FREEBSD_PT_READ_I:
132 	case FREEBSD_PT_READ_D:
133 	case FREEBSD_PT_WRITE_I:
134 	case FREEBSD_PT_WRITE_D:
135 	case FREEBSD_PT_CONTINUE:
136 	case FREEBSD_PT_KILL:
137 		/* These requests are compatible with NetBSD */
138 		return sys_ptrace(l, uap, retval);
139 
140 #if 0
141 /*
142  * XXX: I've commented out this code, it is broken on too many fronts to fix.
143  *	1) It is doing an unlocked read-modify-write cycle on process that
144  *	   I assume might be running!
145  *	   and in code that might sleep (due to a pagefault), never mind
146  *	   what happens on an SMP system
147  *      2) It accesses data in userspace without using copyin/out.
148  *	3) It all looks like a nasty hack that isn't likely to work.
149  *	4) It uses the stackgap.
150  * dsl June 2007
151  */
152 	case FREEBSD_PT_READ_U:
153 	case FREEBSD_PT_WRITE_U:
154     {
155 	int error;
156 	struct {
157 		struct reg regs;
158 		struct fpreg fpregs;
159 	} *nrp;
160 	struct freebsd_ptrace_reg fr;
161 		sg = stackgap_init(p, 0);
162 		nrp = stackgap_alloc(p, &sg, sizeof(*nrp));
163 #ifdef PT_GETREGS
164 		SCARG(&npa, req) = PT_GETREGS;
165 		SCARG(&npa, pid) = SCARG(uap, pid);
166 		SCARG(&npa, addr) = (void *)&nrp->regs;
167 		if ((error = sys_ptrace(l, &npa, retval)) != 0)
168 			return error;
169 #endif
170 #ifdef PT_GETFPREGS
171 		SCARG(&npa, req) = PT_GETFPREGS;
172 		SCARG(&npa, pid) = SCARG(uap, pid);
173 		SCARG(&npa, addr) = (void *)&nrp->fpregs;
174 		if ((error = sys_ptrace(l, &npa, retval)) != 0)
175 			return error;
176 #endif
177 		netbsd_to_freebsd_ptrace_regs(&nrp->regs, &nrp->fpregs, &fr);
178 		switch (SCARG(uap, req)) {
179 		case FREEBSD_PT_READ_U:
180 			return freebsd_ptrace_getregs(&fr, SCARG(uap, addr),
181 						      retval);
182 
183 		case FREEBSD_PT_WRITE_U:
184 			error = freebsd_ptrace_setregs(&fr,
185 			    SCARG(uap, addr), SCARG(uap, data));
186 			if (error)
187 				return error;
188 			freebsd_to_netbsd_ptrace_regs(&fr,
189 						&nrp->regs, &nrp->fpregs);
190 #ifdef PT_SETREGS
191 			SCARG(&npa, req) = PT_SETREGS;
192 			SCARG(&npa, pid) = SCARG(uap, pid);
193 			SCARG(&npa, addr) = (void *)&nrp->regs;
194 			if ((error = sys_ptrace(l, &npa, retval)) != 0)
195 				return error;
196 #endif
197 #ifdef PT_SETFPREGS
198 			SCARG(&npa, req) = PT_SETFPREGS;
199 			SCARG(&npa, pid) = SCARG(uap, pid);
200 			SCARG(&npa, addr) = (void *)&nrp->fpregs;
201 			if ((error = sys_ptrace(l, &npa, retval)) != 0)
202 				return error;
203 #endif
204 			return 0;
205 		}
206     }
207 #endif
208 
209 	default:			/* It was not a legal request. */
210 		return (EINVAL);
211 	}
212 
213 #ifdef DIAGNOSTIC
214 	panic("freebsd_ptrace: impossible");
215 #endif
216 #else
217 	return (ENOSYS);
218 #endif /* PTRACE || _LKM */
219 }
220