xref: /netbsd-src/sys/compat/freebsd/freebsd_ptrace.c (revision 23c8222edbfb0f0932d88a8351d3a0cf817dfb9e)
1 /*	$NetBSD: freebsd_ptrace.c,v 1.7 2003/08/07 16:30:39 agc 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.7 2003/08/07 16:30:39 agc 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 <machine/reg.h>
88 #include <machine/freebsd_machdep.h>
89 
90 #include <compat/freebsd/freebsd_syscallargs.h>
91 #include <compat/common/compat_util.h>
92 #include <compat/freebsd/freebsd_ptrace.h>
93 
94 /*
95  * Process debugging system call.
96  */
97 int
98 freebsd_sys_ptrace(l, v, retval)
99 	struct lwp *l;
100 	void *v;
101 	register_t *retval;
102 {
103 	struct freebsd_sys_ptrace_args /* {
104 		syscallarg(int) req;
105 		syscallarg(pid_t) pid;
106 		syscallarg(caddr_t) addr;
107 		syscallarg(int) data;
108 	} */ *uap = v;
109 	struct proc *p = l->l_proc;
110 	int error;
111 	caddr_t sg;
112 	struct {
113 		struct reg regs;
114 		struct fpreg fpregs;
115 	} *nrp;
116 	struct sys_ptrace_args npa;
117 	struct freebsd_ptrace_reg fr;
118 
119 	switch (SCARG(uap, req)) {
120 #ifdef PT_STEP
121 	case FREEBSD_PT_STEP:
122 		SCARG(&npa, req) = PT_STEP;
123 		SCARG(&npa, pid) = SCARG(uap, pid);
124 		SCARG(&npa, addr) = SCARG(uap, addr);
125 		SCARG(&npa, data) = SCARG(uap, data);
126 		return sys_ptrace(l, &npa, retval);
127 #endif
128 	case FREEBSD_PT_TRACE_ME:
129 	case FREEBSD_PT_READ_I:
130 	case FREEBSD_PT_READ_D:
131 	case FREEBSD_PT_WRITE_I:
132 	case FREEBSD_PT_WRITE_D:
133 	case FREEBSD_PT_CONTINUE:
134 	case FREEBSD_PT_KILL:
135 		/* These requests are compatible with NetBSD */
136 		return sys_ptrace(l, uap, retval);
137 
138 	case FREEBSD_PT_READ_U:
139 	case FREEBSD_PT_WRITE_U:
140 		sg = stackgap_init(p, 0);
141 		nrp = stackgap_alloc(p, &sg, sizeof(*nrp));
142 #ifdef PT_GETREGS
143 		SCARG(&npa, req) = PT_GETREGS;
144 		SCARG(&npa, pid) = SCARG(uap, pid);
145 		SCARG(&npa, addr) = (caddr_t)&nrp->regs;
146 		if ((error = sys_ptrace(l, &npa, retval)) != 0)
147 			return error;
148 #endif
149 #ifdef PT_GETFPREGS
150 		SCARG(&npa, req) = PT_GETFPREGS;
151 		SCARG(&npa, pid) = SCARG(uap, pid);
152 		SCARG(&npa, addr) = (caddr_t)&nrp->fpregs;
153 		if ((error = sys_ptrace(l, &npa, retval)) != 0)
154 			return error;
155 #endif
156 		netbsd_to_freebsd_ptrace_regs(&nrp->regs, &nrp->fpregs, &fr);
157 		switch (SCARG(uap, req)) {
158 		case FREEBSD_PT_READ_U:
159 			return freebsd_ptrace_getregs(&fr, SCARG(uap, addr),
160 						      retval);
161 
162 		case FREEBSD_PT_WRITE_U:
163 			error = freebsd_ptrace_setregs(&fr,
164 			    SCARG(uap, addr), SCARG(uap, data));
165 			if (error)
166 			    return error;
167 			freebsd_to_netbsd_ptrace_regs(&fr,
168 						&nrp->regs, &nrp->fpregs);
169 #ifdef PT_SETREGS
170 			SCARG(&npa, req) = PT_SETREGS;
171 			SCARG(&npa, pid) = SCARG(uap, pid);
172 			SCARG(&npa, addr) = (caddr_t)&nrp->regs;
173 			if ((error = sys_ptrace(l, &npa, retval)) != 0)
174 				return error;
175 #endif
176 #ifdef PT_SETFPREGS
177 			SCARG(&npa, req) = PT_SETFPREGS;
178 			SCARG(&npa, pid) = SCARG(uap, pid);
179 			SCARG(&npa, addr) = (caddr_t)&nrp->fpregs;
180 			if ((error = sys_ptrace(l, &npa, retval)) != 0)
181 				return error;
182 #endif
183 			return 0;
184 		}
185 
186 	default:			/* It was not a legal request. */
187 		return (EINVAL);
188 	}
189 
190 #ifdef DIAGNOSTIC
191 	panic("freebsd_ptrace: impossible");
192 #endif
193 }
194