diff options
author | Stephen Rothwell <sfr@canb.auug.org.au> | 2005-10-13 01:52:04 -0400 |
---|---|---|
committer | Stephen Rothwell <sfr@canb.auug.org.au> | 2005-10-13 01:52:04 -0400 |
commit | e8a30302abc42a0c537b9326883523da9963deb6 (patch) | |
tree | 3d4dc948afff95a2a86805d75162a8cdb3baded6 /arch/ppc64 | |
parent | eec5ef909888cd9d25a61f904cd8f0db50ea0455 (diff) |
powerpc: merge ptrace.c
Signed-off-by: Stephen Rothwell <sfr@canb.auug.org.au>
Diffstat (limited to 'arch/ppc64')
-rw-r--r-- | arch/ppc64/kernel/Makefile | 2 | ||||
-rw-r--r-- | arch/ppc64/kernel/ptrace.c | 363 |
2 files changed, 1 insertions, 364 deletions
diff --git a/arch/ppc64/kernel/Makefile b/arch/ppc64/kernel/Makefile index 1a8f3532885a..b1203b79edf0 100644 --- a/arch/ppc64/kernel/Makefile +++ b/arch/ppc64/kernel/Makefile | |||
@@ -12,7 +12,7 @@ obj-y := setup.o entry.o misc.o prom.o | |||
12 | endif | 12 | endif |
13 | 13 | ||
14 | obj-y += irq.o idle.o dma.o \ | 14 | obj-y += irq.o idle.o dma.o \ |
15 | time.o signal.o syscalls.o ptrace.o \ | 15 | time.o signal.o syscalls.o \ |
16 | align.o bitops.o pacaData.o \ | 16 | align.o bitops.o pacaData.o \ |
17 | udbg.o sys_ppc32.o ioctl32.o \ | 17 | udbg.o sys_ppc32.o ioctl32.o \ |
18 | ptrace32.o signal32.o rtc.o \ | 18 | ptrace32.o signal32.o rtc.o \ |
diff --git a/arch/ppc64/kernel/ptrace.c b/arch/ppc64/kernel/ptrace.c deleted file mode 100644 index b1c044ca5756..000000000000 --- a/arch/ppc64/kernel/ptrace.c +++ /dev/null | |||
@@ -1,363 +0,0 @@ | |||
1 | /* | ||
2 | * linux/arch/ppc64/kernel/ptrace.c | ||
3 | * | ||
4 | * PowerPC version | ||
5 | * Copyright (C) 1995-1996 Gary Thomas (gdt@linuxppc.org) | ||
6 | * | ||
7 | * Derived from "arch/m68k/kernel/ptrace.c" | ||
8 | * Copyright (C) 1994 by Hamish Macdonald | ||
9 | * Taken from linux/kernel/ptrace.c and modified for M680x0. | ||
10 | * linux/kernel/ptrace.c is by Ross Biro 1/23/92, edited by Linus Torvalds | ||
11 | * | ||
12 | * Modified by Cort Dougan (cort@hq.fsmlabs.com) | ||
13 | * and Paul Mackerras (paulus@linuxcare.com.au). | ||
14 | * | ||
15 | * This file is subject to the terms and conditions of the GNU General | ||
16 | * Public License. See the file README.legal in the main directory of | ||
17 | * this archive for more details. | ||
18 | */ | ||
19 | |||
20 | #include <linux/config.h> | ||
21 | #include <linux/kernel.h> | ||
22 | #include <linux/sched.h> | ||
23 | #include <linux/mm.h> | ||
24 | #include <linux/smp.h> | ||
25 | #include <linux/smp_lock.h> | ||
26 | #include <linux/errno.h> | ||
27 | #include <linux/ptrace.h> | ||
28 | #include <linux/user.h> | ||
29 | #include <linux/security.h> | ||
30 | #include <linux/audit.h> | ||
31 | #include <linux/seccomp.h> | ||
32 | #include <linux/signal.h> | ||
33 | |||
34 | #include <asm/uaccess.h> | ||
35 | #include <asm/page.h> | ||
36 | #include <asm/pgtable.h> | ||
37 | #include <asm/system.h> | ||
38 | #include <asm/ptrace-common.h> | ||
39 | |||
40 | /* | ||
41 | * does not yet catch signals sent when the child dies. | ||
42 | * in exit.c or in signal.c. | ||
43 | */ | ||
44 | |||
45 | /* | ||
46 | * Called by kernel/ptrace.c when detaching.. | ||
47 | * | ||
48 | * Make sure single step bits etc are not set. | ||
49 | */ | ||
50 | void ptrace_disable(struct task_struct *child) | ||
51 | { | ||
52 | /* make sure the single step bit is not set. */ | ||
53 | clear_single_step(child); | ||
54 | } | ||
55 | |||
56 | int sys_ptrace(long request, long pid, long addr, long data) | ||
57 | { | ||
58 | struct task_struct *child; | ||
59 | int ret = -EPERM; | ||
60 | |||
61 | lock_kernel(); | ||
62 | if (request == PTRACE_TRACEME) { | ||
63 | /* are we already being traced? */ | ||
64 | if (current->ptrace & PT_PTRACED) | ||
65 | goto out; | ||
66 | ret = security_ptrace(current->parent, current); | ||
67 | if (ret) | ||
68 | goto out; | ||
69 | /* set the ptrace bit in the process flags. */ | ||
70 | current->ptrace |= PT_PTRACED; | ||
71 | ret = 0; | ||
72 | goto out; | ||
73 | } | ||
74 | ret = -ESRCH; | ||
75 | read_lock(&tasklist_lock); | ||
76 | child = find_task_by_pid(pid); | ||
77 | if (child) | ||
78 | get_task_struct(child); | ||
79 | read_unlock(&tasklist_lock); | ||
80 | if (!child) | ||
81 | goto out; | ||
82 | |||
83 | ret = -EPERM; | ||
84 | if (pid == 1) /* you may not mess with init */ | ||
85 | goto out_tsk; | ||
86 | |||
87 | if (request == PTRACE_ATTACH) { | ||
88 | ret = ptrace_attach(child); | ||
89 | goto out_tsk; | ||
90 | } | ||
91 | |||
92 | ret = ptrace_check_attach(child, request == PTRACE_KILL); | ||
93 | if (ret < 0) | ||
94 | goto out_tsk; | ||
95 | |||
96 | switch (request) { | ||
97 | /* when I and D space are separate, these will need to be fixed. */ | ||
98 | case PTRACE_PEEKTEXT: /* read word at location addr. */ | ||
99 | case PTRACE_PEEKDATA: { | ||
100 | unsigned long tmp; | ||
101 | int copied; | ||
102 | |||
103 | copied = access_process_vm(child, addr, &tmp, sizeof(tmp), 0); | ||
104 | ret = -EIO; | ||
105 | if (copied != sizeof(tmp)) | ||
106 | break; | ||
107 | ret = put_user(tmp,(unsigned long __user *) data); | ||
108 | break; | ||
109 | } | ||
110 | |||
111 | /* read the word at location addr in the USER area. */ | ||
112 | case PTRACE_PEEKUSR: { | ||
113 | unsigned long index; | ||
114 | unsigned long tmp; | ||
115 | |||
116 | ret = -EIO; | ||
117 | /* convert to index and check */ | ||
118 | index = (unsigned long) addr >> 3; | ||
119 | if ((addr & 7) || (index > PT_FPSCR)) | ||
120 | break; | ||
121 | |||
122 | if (index < PT_FPR0) { | ||
123 | tmp = get_reg(child, (int)index); | ||
124 | } else { | ||
125 | flush_fp_to_thread(child); | ||
126 | tmp = ((unsigned long *)child->thread.fpr)[index - PT_FPR0]; | ||
127 | } | ||
128 | ret = put_user(tmp,(unsigned long __user *) data); | ||
129 | break; | ||
130 | } | ||
131 | |||
132 | /* If I and D space are separate, this will have to be fixed. */ | ||
133 | case PTRACE_POKETEXT: /* write the word at location addr. */ | ||
134 | case PTRACE_POKEDATA: | ||
135 | ret = 0; | ||
136 | if (access_process_vm(child, addr, &data, sizeof(data), 1) | ||
137 | == sizeof(data)) | ||
138 | break; | ||
139 | ret = -EIO; | ||
140 | break; | ||
141 | |||
142 | /* write the word at location addr in the USER area */ | ||
143 | case PTRACE_POKEUSR: { | ||
144 | unsigned long index; | ||
145 | |||
146 | ret = -EIO; | ||
147 | /* convert to index and check */ | ||
148 | index = (unsigned long) addr >> 3; | ||
149 | if ((addr & 7) || (index > PT_FPSCR)) | ||
150 | break; | ||
151 | |||
152 | if (index == PT_ORIG_R3) | ||
153 | break; | ||
154 | if (index < PT_FPR0) { | ||
155 | ret = put_reg(child, index, data); | ||
156 | } else { | ||
157 | flush_fp_to_thread(child); | ||
158 | ((unsigned long *)child->thread.fpr)[index - PT_FPR0] = data; | ||
159 | ret = 0; | ||
160 | } | ||
161 | break; | ||
162 | } | ||
163 | |||
164 | case PTRACE_SYSCALL: /* continue and stop at next (return from) syscall */ | ||
165 | case PTRACE_CONT: { /* restart after signal. */ | ||
166 | ret = -EIO; | ||
167 | if (!valid_signal(data)) | ||
168 | break; | ||
169 | if (request == PTRACE_SYSCALL) | ||
170 | set_tsk_thread_flag(child, TIF_SYSCALL_TRACE); | ||
171 | else | ||
172 | clear_tsk_thread_flag(child, TIF_SYSCALL_TRACE); | ||
173 | child->exit_code = data; | ||
174 | /* make sure the single step bit is not set. */ | ||
175 | clear_single_step(child); | ||
176 | wake_up_process(child); | ||
177 | ret = 0; | ||
178 | break; | ||
179 | } | ||
180 | |||
181 | /* | ||
182 | * make the child exit. Best I can do is send it a sigkill. | ||
183 | * perhaps it should be put in the status that it wants to | ||
184 | * exit. | ||
185 | */ | ||
186 | case PTRACE_KILL: { | ||
187 | ret = 0; | ||
188 | if (child->exit_state == EXIT_ZOMBIE) /* already dead */ | ||
189 | break; | ||
190 | child->exit_code = SIGKILL; | ||
191 | /* make sure the single step bit is not set. */ | ||
192 | clear_single_step(child); | ||
193 | wake_up_process(child); | ||
194 | break; | ||
195 | } | ||
196 | |||
197 | case PTRACE_SINGLESTEP: { /* set the trap flag. */ | ||
198 | ret = -EIO; | ||
199 | if (!valid_signal(data)) | ||
200 | break; | ||
201 | clear_tsk_thread_flag(child, TIF_SYSCALL_TRACE); | ||
202 | set_single_step(child); | ||
203 | child->exit_code = data; | ||
204 | /* give it a chance to run. */ | ||
205 | wake_up_process(child); | ||
206 | ret = 0; | ||
207 | break; | ||
208 | } | ||
209 | |||
210 | case PTRACE_GET_DEBUGREG: { | ||
211 | ret = -EINVAL; | ||
212 | /* We only support one DABR and no IABRS at the moment */ | ||
213 | if (addr > 0) | ||
214 | break; | ||
215 | ret = put_user(child->thread.dabr, | ||
216 | (unsigned long __user *)data); | ||
217 | break; | ||
218 | } | ||
219 | |||
220 | case PTRACE_SET_DEBUGREG: | ||
221 | ret = ptrace_set_debugreg(child, addr, data); | ||
222 | break; | ||
223 | |||
224 | case PTRACE_DETACH: | ||
225 | ret = ptrace_detach(child, data); | ||
226 | break; | ||
227 | |||
228 | case PPC_PTRACE_GETREGS: { /* Get GPRs 0 - 31. */ | ||
229 | int i; | ||
230 | unsigned long *reg = &((unsigned long *)child->thread.regs)[0]; | ||
231 | unsigned long __user *tmp = (unsigned long __user *)addr; | ||
232 | |||
233 | for (i = 0; i < 32; i++) { | ||
234 | ret = put_user(*reg, tmp); | ||
235 | if (ret) | ||
236 | break; | ||
237 | reg++; | ||
238 | tmp++; | ||
239 | } | ||
240 | break; | ||
241 | } | ||
242 | |||
243 | case PPC_PTRACE_SETREGS: { /* Set GPRs 0 - 31. */ | ||
244 | int i; | ||
245 | unsigned long *reg = &((unsigned long *)child->thread.regs)[0]; | ||
246 | unsigned long __user *tmp = (unsigned long __user *)addr; | ||
247 | |||
248 | for (i = 0; i < 32; i++) { | ||
249 | ret = get_user(*reg, tmp); | ||
250 | if (ret) | ||
251 | break; | ||
252 | reg++; | ||
253 | tmp++; | ||
254 | } | ||
255 | break; | ||
256 | } | ||
257 | |||
258 | case PPC_PTRACE_GETFPREGS: { /* Get FPRs 0 - 31. */ | ||
259 | int i; | ||
260 | unsigned long *reg = &((unsigned long *)child->thread.fpr)[0]; | ||
261 | unsigned long __user *tmp = (unsigned long __user *)addr; | ||
262 | |||
263 | flush_fp_to_thread(child); | ||
264 | |||
265 | for (i = 0; i < 32; i++) { | ||
266 | ret = put_user(*reg, tmp); | ||
267 | if (ret) | ||
268 | break; | ||
269 | reg++; | ||
270 | tmp++; | ||
271 | } | ||
272 | break; | ||
273 | } | ||
274 | |||
275 | case PPC_PTRACE_SETFPREGS: { /* Get FPRs 0 - 31. */ | ||
276 | int i; | ||
277 | unsigned long *reg = &((unsigned long *)child->thread.fpr)[0]; | ||
278 | unsigned long __user *tmp = (unsigned long __user *)addr; | ||
279 | |||
280 | flush_fp_to_thread(child); | ||
281 | |||
282 | for (i = 0; i < 32; i++) { | ||
283 | ret = get_user(*reg, tmp); | ||
284 | if (ret) | ||
285 | break; | ||
286 | reg++; | ||
287 | tmp++; | ||
288 | } | ||
289 | break; | ||
290 | } | ||
291 | |||
292 | #ifdef CONFIG_ALTIVEC | ||
293 | case PTRACE_GETVRREGS: | ||
294 | /* Get the child altivec register state. */ | ||
295 | flush_altivec_to_thread(child); | ||
296 | ret = get_vrregs((unsigned long __user *)data, child); | ||
297 | break; | ||
298 | |||
299 | case PTRACE_SETVRREGS: | ||
300 | /* Set the child altivec register state. */ | ||
301 | flush_altivec_to_thread(child); | ||
302 | ret = set_vrregs(child, (unsigned long __user *)data); | ||
303 | break; | ||
304 | #endif | ||
305 | |||
306 | default: | ||
307 | ret = ptrace_request(child, request, addr, data); | ||
308 | break; | ||
309 | } | ||
310 | out_tsk: | ||
311 | put_task_struct(child); | ||
312 | out: | ||
313 | unlock_kernel(); | ||
314 | return ret; | ||
315 | } | ||
316 | |||
317 | static void do_syscall_trace(void) | ||
318 | { | ||
319 | /* the 0x80 provides a way for the tracing parent to distinguish | ||
320 | between a syscall stop and SIGTRAP delivery */ | ||
321 | ptrace_notify(SIGTRAP | ((current->ptrace & PT_TRACESYSGOOD) | ||
322 | ? 0x80 : 0)); | ||
323 | |||
324 | /* | ||
325 | * this isn't the same as continuing with a signal, but it will do | ||
326 | * for normal use. strace only continues with a signal if the | ||
327 | * stopping signal is not SIGTRAP. -brl | ||
328 | */ | ||
329 | if (current->exit_code) { | ||
330 | send_sig(current->exit_code, current, 1); | ||
331 | current->exit_code = 0; | ||
332 | } | ||
333 | } | ||
334 | |||
335 | void do_syscall_trace_enter(struct pt_regs *regs) | ||
336 | { | ||
337 | secure_computing(regs->gpr[0]); | ||
338 | |||
339 | if (test_thread_flag(TIF_SYSCALL_TRACE) | ||
340 | && (current->ptrace & PT_PTRACED)) | ||
341 | do_syscall_trace(); | ||
342 | |||
343 | if (unlikely(current->audit_context)) | ||
344 | audit_syscall_entry(current, | ||
345 | test_thread_flag(TIF_32BIT)?AUDIT_ARCH_PPC:AUDIT_ARCH_PPC64, | ||
346 | regs->gpr[0], | ||
347 | regs->gpr[3], regs->gpr[4], | ||
348 | regs->gpr[5], regs->gpr[6]); | ||
349 | |||
350 | } | ||
351 | |||
352 | void do_syscall_trace_leave(struct pt_regs *regs) | ||
353 | { | ||
354 | if (unlikely(current->audit_context)) | ||
355 | audit_syscall_exit(current, | ||
356 | (regs->ccr&0x1000)?AUDITSC_FAILURE:AUDITSC_SUCCESS, | ||
357 | regs->result); | ||
358 | |||
359 | if ((test_thread_flag(TIF_SYSCALL_TRACE) | ||
360 | || test_thread_flag(TIF_SINGLESTEP)) | ||
361 | && (current->ptrace & PT_PTRACED)) | ||
362 | do_syscall_trace(); | ||
363 | } | ||