blob: d9b952faee733f1dec2be3c81848423e5d4bdf5a [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
Linus Torvalds1da177e2005-04-16 15:20:36 -07002 * PowerPC version
3 * Copyright (C) 1995-1996 Gary Thomas (gdt@linuxppc.org)
4 *
5 * Derived from "arch/m68k/kernel/ptrace.c"
6 * Copyright (C) 1994 by Hamish Macdonald
7 * Taken from linux/kernel/ptrace.c and modified for M680x0.
8 * linux/kernel/ptrace.c is by Ross Biro 1/23/92, edited by Linus Torvalds
9 *
10 * Modified by Cort Dougan (cort@hq.fsmlabs.com)
Paul Mackerrasb1239232005-10-20 09:11:29 +100011 * and Paul Mackerras (paulus@samba.org).
Linus Torvalds1da177e2005-04-16 15:20:36 -070012 *
13 * This file is subject to the terms and conditions of the GNU General
14 * Public License. See the file README.legal in the main directory of
15 * this archive for more details.
16 */
17
18#include <linux/kernel.h>
19#include <linux/sched.h>
20#include <linux/mm.h>
21#include <linux/smp.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070022#include <linux/errno.h>
23#include <linux/ptrace.h>
Roland McGrathf65255e2007-12-20 03:57:34 -080024#include <linux/regset.h>
Roland McGrath3caf06c2007-12-20 03:57:39 -080025#include <linux/elf.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070026#include <linux/user.h>
27#include <linux/security.h>
Jesper Juhl7ed20e12005-05-01 08:59:14 -070028#include <linux/signal.h>
David Woodhouseea9c1022005-05-08 15:56:09 +010029#include <linux/seccomp.h>
30#include <linux/audit.h>
Stephen Rothwelle8a30302005-10-13 15:52:04 +100031#ifdef CONFIG_PPC32
David Woodhouseea9c1022005-05-08 15:56:09 +010032#include <linux/module.h>
Stephen Rothwelle8a30302005-10-13 15:52:04 +100033#endif
Linus Torvalds1da177e2005-04-16 15:20:36 -070034
35#include <asm/uaccess.h>
36#include <asm/page.h>
37#include <asm/pgtable.h>
38#include <asm/system.h>
Paul Mackerras21a62902005-11-19 20:47:22 +110039
Linus Torvalds1da177e2005-04-16 15:20:36 -070040/*
41 * does not yet catch signals sent when the child dies.
42 * in exit.c or in signal.c.
43 */
44
Linus Torvalds1da177e2005-04-16 15:20:36 -070045/*
Benjamin Herrenschmidtabd06502007-06-04 15:15:47 +100046 * Set of msr bits that gdb can change on behalf of a process.
47 */
48#if defined(CONFIG_40x) || defined(CONFIG_BOOKE)
49#define MSR_DEBUGCHANGE 0
50#else
51#define MSR_DEBUGCHANGE (MSR_SE | MSR_BE)
52#endif
53
54/*
55 * Max register writeable via put_reg
56 */
57#ifdef CONFIG_PPC32
58#define PT_MAX_PUT_REG PT_MQ
59#else
60#define PT_MAX_PUT_REG PT_CCR
61#endif
62
Roland McGrath26f77132007-12-20 03:57:51 -080063static unsigned long get_user_msr(struct task_struct *task)
64{
65 return task->thread.regs->msr | task->thread.fpexc_mode;
66}
67
68static int set_user_msr(struct task_struct *task, unsigned long msr)
69{
70 task->thread.regs->msr &= ~MSR_DEBUGCHANGE;
71 task->thread.regs->msr |= msr & MSR_DEBUGCHANGE;
72 return 0;
73}
74
75/*
76 * We prevent mucking around with the reserved area of trap
77 * which are used internally by the kernel.
78 */
79static int set_user_trap(struct task_struct *task, unsigned long trap)
80{
81 task->thread.regs->trap = trap & 0xfff0;
82 return 0;
83}
84
Benjamin Herrenschmidtabd06502007-06-04 15:15:47 +100085/*
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +100086 * Get contents of register REGNO in task TASK.
87 */
88unsigned long ptrace_get_reg(struct task_struct *task, int regno)
89{
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +100090 if (task->thread.regs == NULL)
91 return -EIO;
92
Roland McGrath26f77132007-12-20 03:57:51 -080093 if (regno == PT_MSR)
94 return get_user_msr(task);
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +100095
96 if (regno < (sizeof(struct pt_regs) / sizeof(unsigned long)))
97 return ((unsigned long *)task->thread.regs)[regno];
98
99 return -EIO;
100}
101
102/*
103 * Write contents of register REGNO in task TASK.
104 */
105int ptrace_put_reg(struct task_struct *task, int regno, unsigned long data)
106{
107 if (task->thread.regs == NULL)
108 return -EIO;
109
Roland McGrath26f77132007-12-20 03:57:51 -0800110 if (regno == PT_MSR)
111 return set_user_msr(task, data);
112 if (regno == PT_TRAP)
113 return set_user_trap(task, data);
114
115 if (regno <= PT_MAX_PUT_REG) {
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000116 ((unsigned long *)task->thread.regs)[regno] = data;
117 return 0;
118 }
119 return -EIO;
120}
121
Roland McGrath44dd3f52007-12-20 03:57:55 -0800122static int gpr_get(struct task_struct *target, const struct user_regset *regset,
123 unsigned int pos, unsigned int count,
124 void *kbuf, void __user *ubuf)
125{
126 int ret;
127
128 if (target->thread.regs == NULL)
129 return -EIO;
130
131 CHECK_FULL_REGS(target->thread.regs);
132
133 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
134 target->thread.regs,
135 0, offsetof(struct pt_regs, msr));
136 if (!ret) {
137 unsigned long msr = get_user_msr(target);
138 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf, &msr,
139 offsetof(struct pt_regs, msr),
140 offsetof(struct pt_regs, msr) +
141 sizeof(msr));
142 }
143
144 BUILD_BUG_ON(offsetof(struct pt_regs, orig_gpr3) !=
145 offsetof(struct pt_regs, msr) + sizeof(long));
146
147 if (!ret)
148 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
149 &target->thread.regs->orig_gpr3,
150 offsetof(struct pt_regs, orig_gpr3),
151 sizeof(struct pt_regs));
152 if (!ret)
153 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
154 sizeof(struct pt_regs), -1);
155
156 return ret;
157}
158
159static int gpr_set(struct task_struct *target, const struct user_regset *regset,
160 unsigned int pos, unsigned int count,
161 const void *kbuf, const void __user *ubuf)
162{
163 unsigned long reg;
164 int ret;
165
166 if (target->thread.regs == NULL)
167 return -EIO;
168
169 CHECK_FULL_REGS(target->thread.regs);
170
171 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
172 target->thread.regs,
173 0, PT_MSR * sizeof(reg));
174
175 if (!ret && count > 0) {
176 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf, &reg,
177 PT_MSR * sizeof(reg),
178 (PT_MSR + 1) * sizeof(reg));
179 if (!ret)
180 ret = set_user_msr(target, reg);
181 }
182
183 BUILD_BUG_ON(offsetof(struct pt_regs, orig_gpr3) !=
184 offsetof(struct pt_regs, msr) + sizeof(long));
185
186 if (!ret)
187 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
188 &target->thread.regs->orig_gpr3,
189 PT_ORIG_R3 * sizeof(reg),
190 (PT_MAX_PUT_REG + 1) * sizeof(reg));
191
192 if (PT_MAX_PUT_REG + 1 < PT_TRAP && !ret)
193 ret = user_regset_copyin_ignore(
194 &pos, &count, &kbuf, &ubuf,
195 (PT_MAX_PUT_REG + 1) * sizeof(reg),
196 PT_TRAP * sizeof(reg));
197
198 if (!ret && count > 0) {
199 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf, &reg,
200 PT_TRAP * sizeof(reg),
201 (PT_TRAP + 1) * sizeof(reg));
202 if (!ret)
203 ret = set_user_trap(target, reg);
204 }
205
206 if (!ret)
207 ret = user_regset_copyin_ignore(
208 &pos, &count, &kbuf, &ubuf,
209 (PT_TRAP + 1) * sizeof(reg), -1);
210
211 return ret;
212}
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000213
Roland McGrathf65255e2007-12-20 03:57:34 -0800214static int fpr_get(struct task_struct *target, const struct user_regset *regset,
215 unsigned int pos, unsigned int count,
216 void *kbuf, void __user *ubuf)
217{
218 flush_fp_to_thread(target);
219
220 BUILD_BUG_ON(offsetof(struct thread_struct, fpscr) !=
221 offsetof(struct thread_struct, fpr[32]));
222
223 return user_regset_copyout(&pos, &count, &kbuf, &ubuf,
224 &target->thread.fpr, 0, -1);
225}
226
227static int fpr_set(struct task_struct *target, const struct user_regset *regset,
228 unsigned int pos, unsigned int count,
229 const void *kbuf, const void __user *ubuf)
230{
231 flush_fp_to_thread(target);
232
233 BUILD_BUG_ON(offsetof(struct thread_struct, fpscr) !=
234 offsetof(struct thread_struct, fpr[32]));
235
236 return user_regset_copyin(&pos, &count, &kbuf, &ubuf,
237 &target->thread.fpr, 0, -1);
238}
239
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000240static int get_fpregs(void __user *data, struct task_struct *task,
241 int has_fpscr)
242{
243 unsigned int count = has_fpscr ? 33 : 32;
Roland McGrathf65255e2007-12-20 03:57:34 -0800244 if (!access_ok(VERIFY_WRITE, data, count * sizeof(double)))
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000245 return -EFAULT;
Roland McGrathf65255e2007-12-20 03:57:34 -0800246 return fpr_get(task, NULL, 0, count * sizeof(double), NULL, data);
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000247}
248
249static int set_fpregs(void __user *data, struct task_struct *task,
250 int has_fpscr)
251{
252 unsigned int count = has_fpscr ? 33 : 32;
Roland McGrathf65255e2007-12-20 03:57:34 -0800253 if (!access_ok(VERIFY_READ, data, count * sizeof(double)))
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000254 return -EFAULT;
Roland McGrathf65255e2007-12-20 03:57:34 -0800255 return fpr_set(task, NULL, 0, count * sizeof(double), NULL, data);
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000256}
257
258
259#ifdef CONFIG_ALTIVEC
260/*
261 * Get/set all the altivec registers vr0..vr31, vscr, vrsave, in one go.
262 * The transfer totals 34 quadword. Quadwords 0-31 contain the
263 * corresponding vector registers. Quadword 32 contains the vscr as the
264 * last word (offset 12) within that quadword. Quadword 33 contains the
265 * vrsave as the first word (offset 0) within the quadword.
266 *
267 * This definition of the VMX state is compatible with the current PPC32
268 * ptrace interface. This allows signal handling and ptrace to use the
269 * same structures. This also simplifies the implementation of a bi-arch
270 * (combined (32- and 64-bit) gdb.
271 */
272
Roland McGrath3caf06c2007-12-20 03:57:39 -0800273static int vr_active(struct task_struct *target,
274 const struct user_regset *regset)
275{
276 flush_altivec_to_thread(target);
277 return target->thread.used_vr ? regset->n : 0;
278}
279
280static int vr_get(struct task_struct *target, const struct user_regset *regset,
281 unsigned int pos, unsigned int count,
282 void *kbuf, void __user *ubuf)
283{
284 int ret;
285
286 flush_altivec_to_thread(target);
287
288 BUILD_BUG_ON(offsetof(struct thread_struct, vscr) !=
289 offsetof(struct thread_struct, vr[32]));
290
291 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
292 &target->thread.vr, 0,
293 33 * sizeof(vector128));
294 if (!ret) {
295 /*
296 * Copy out only the low-order word of vrsave.
297 */
298 union {
299 elf_vrreg_t reg;
300 u32 word;
301 } vrsave;
302 memset(&vrsave, 0, sizeof(vrsave));
303 vrsave.word = target->thread.vrsave;
304 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf, &vrsave,
305 33 * sizeof(vector128), -1);
306 }
307
308 return ret;
309}
310
311static int vr_set(struct task_struct *target, const struct user_regset *regset,
312 unsigned int pos, unsigned int count,
313 const void *kbuf, const void __user *ubuf)
314{
315 int ret;
316
317 flush_altivec_to_thread(target);
318
319 BUILD_BUG_ON(offsetof(struct thread_struct, vscr) !=
320 offsetof(struct thread_struct, vr[32]));
321
322 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
323 &target->thread.vr, 0, 33 * sizeof(vector128));
324 if (!ret && count > 0) {
325 /*
326 * We use only the first word of vrsave.
327 */
328 union {
329 elf_vrreg_t reg;
330 u32 word;
331 } vrsave;
332 memset(&vrsave, 0, sizeof(vrsave));
333 vrsave.word = target->thread.vrsave;
334 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf, &vrsave,
335 33 * sizeof(vector128), -1);
336 if (!ret)
337 target->thread.vrsave = vrsave.word;
338 }
339
340 return ret;
341}
342
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000343/*
344 * Get contents of AltiVec register state in task TASK
345 */
346static int get_vrregs(unsigned long __user *data, struct task_struct *task)
347{
Roland McGrath3caf06c2007-12-20 03:57:39 -0800348 if (!access_ok(VERIFY_WRITE, data,
349 33 * sizeof(vector128) + sizeof(u32)))
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000350 return -EFAULT;
351
Roland McGrath3caf06c2007-12-20 03:57:39 -0800352 return vr_get(task, NULL, 0, 33 * sizeof(vector128) + sizeof(u32),
353 NULL, data);
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000354}
355
356/*
357 * Write contents of AltiVec register state into task TASK.
358 */
359static int set_vrregs(struct task_struct *task, unsigned long __user *data)
360{
Roland McGrath3caf06c2007-12-20 03:57:39 -0800361 if (!access_ok(VERIFY_READ, data, 33 * sizeof(vector128) + sizeof(u32)))
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000362 return -EFAULT;
363
Roland McGrath3caf06c2007-12-20 03:57:39 -0800364 return vr_set(task, NULL, 0, 33 * sizeof(vector128) + sizeof(u32),
365 NULL, data);
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000366}
367#endif /* CONFIG_ALTIVEC */
368
369#ifdef CONFIG_SPE
370
371/*
372 * For get_evrregs/set_evrregs functions 'data' has the following layout:
373 *
374 * struct {
375 * u32 evr[32];
376 * u64 acc;
377 * u32 spefscr;
378 * }
379 */
380
Roland McGratha4e4b172007-12-20 03:57:48 -0800381static int evr_active(struct task_struct *target,
382 const struct user_regset *regset)
383{
384 flush_spe_to_thread(target);
385 return target->thread.used_spe ? regset->n : 0;
386}
387
388static int evr_get(struct task_struct *target, const struct user_regset *regset,
389 unsigned int pos, unsigned int count,
390 void *kbuf, void __user *ubuf)
391{
392 int ret;
393
394 flush_spe_to_thread(target);
395
396 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
397 &target->thread.evr,
398 0, sizeof(target->thread.evr));
399
400 BUILD_BUG_ON(offsetof(struct thread_struct, acc) + sizeof(u64) !=
401 offsetof(struct thread_struct, spefscr));
402
403 if (!ret)
404 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
405 &target->thread.acc,
406 sizeof(target->thread.evr), -1);
407
408 return ret;
409}
410
411static int evr_set(struct task_struct *target, const struct user_regset *regset,
412 unsigned int pos, unsigned int count,
413 const void *kbuf, const void __user *ubuf)
414{
415 int ret;
416
417 flush_spe_to_thread(target);
418
419 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
420 &target->thread.evr,
421 0, sizeof(target->thread.evr));
422
423 BUILD_BUG_ON(offsetof(struct thread_struct, acc) + sizeof(u64) !=
424 offsetof(struct thread_struct, spefscr));
425
426 if (!ret)
427 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
428 &target->thread.acc,
429 sizeof(target->thread.evr), -1);
430
431 return ret;
432}
433
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000434/*
435 * Get contents of SPE register state in task TASK.
436 */
Roland McGratha4e4b172007-12-20 03:57:48 -0800437static int get_evrregs(unsigned long __user *data, struct task_struct *task)
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000438{
Roland McGratha4e4b172007-12-20 03:57:48 -0800439 if (!access_ok(VERIFY_WRITE, data, 35 * sizeof(u32)))
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000440 return -EFAULT;
441
Roland McGratha4e4b172007-12-20 03:57:48 -0800442 return evr_get(task, NULL, 0, 35 * sizeof(u32), NULL, data);
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000443}
444
445/*
446 * Write contents of SPE register state into task TASK.
447 */
448static int set_evrregs(struct task_struct *task, unsigned long *data)
449{
Roland McGratha4e4b172007-12-20 03:57:48 -0800450 if (!access_ok(VERIFY_READ, data, 35 * sizeof(u32)))
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000451 return -EFAULT;
452
Roland McGratha4e4b172007-12-20 03:57:48 -0800453 return evr_set(task, NULL, 0, 35 * sizeof(u32), NULL, data);
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000454}
455#endif /* CONFIG_SPE */
456
457
Roland McGrath2a84b0d2008-01-30 13:30:51 +0100458void user_enable_single_step(struct task_struct *task)
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000459{
460 struct pt_regs *regs = task->thread.regs;
461
462 if (regs != NULL) {
463#if defined(CONFIG_40x) || defined(CONFIG_BOOKE)
464 task->thread.dbcr0 = DBCR0_IDM | DBCR0_IC;
465 regs->msr |= MSR_DE;
466#else
467 regs->msr |= MSR_SE;
468#endif
469 }
470 set_tsk_thread_flag(task, TIF_SINGLESTEP);
471}
472
Roland McGrath2a84b0d2008-01-30 13:30:51 +0100473void user_disable_single_step(struct task_struct *task)
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000474{
475 struct pt_regs *regs = task->thread.regs;
476
477 if (regs != NULL) {
478#if defined(CONFIG_40x) || defined(CONFIG_BOOKE)
479 task->thread.dbcr0 = 0;
480 regs->msr &= ~MSR_DE;
481#else
482 regs->msr &= ~MSR_SE;
483#endif
484 }
485 clear_tsk_thread_flag(task, TIF_SINGLESTEP);
486}
487
Benjamin Herrenschmidtabd06502007-06-04 15:15:47 +1000488static int ptrace_set_debugreg(struct task_struct *task, unsigned long addr,
489 unsigned long data)
490{
491 /* We only support one DABR and no IABRS at the moment */
492 if (addr > 0)
493 return -EINVAL;
494
495 /* The bottom 3 bits are flags */
496 if ((data & ~0x7UL) >= TASK_SIZE)
497 return -EIO;
498
499 /* Ensure translation is on */
500 if (data && !(data & DABR_TRANSLATION))
501 return -EIO;
502
503 task->thread.dabr = data;
504 return 0;
505}
Benjamin Herrenschmidtabd06502007-06-04 15:15:47 +1000506
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000507/*
Linus Torvalds1da177e2005-04-16 15:20:36 -0700508 * Called by kernel/ptrace.c when detaching..
509 *
510 * Make sure single step bits etc are not set.
511 */
512void ptrace_disable(struct task_struct *child)
513{
514 /* make sure the single step bit is not set. */
Roland McGrath2a84b0d2008-01-30 13:30:51 +0100515 user_disable_single_step(child);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700516}
517
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000518/*
519 * Here are the old "legacy" powerpc specific getregs/setregs ptrace calls,
520 * we mark them as obsolete now, they will be removed in a future version
521 */
522static long arch_ptrace_old(struct task_struct *child, long request, long addr,
523 long data)
524{
525 int ret = -EPERM;
526
527 switch(request) {
528 case PPC_PTRACE_GETREGS: { /* Get GPRs 0 - 31. */
529 int i;
530 unsigned long *reg = &((unsigned long *)child->thread.regs)[0];
531 unsigned long __user *tmp = (unsigned long __user *)addr;
532
Roland McGrathfabca2c2007-09-25 09:50:52 +1000533 CHECK_FULL_REGS(child->thread.regs);
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000534 for (i = 0; i < 32; i++) {
535 ret = put_user(*reg, tmp);
536 if (ret)
537 break;
538 reg++;
539 tmp++;
540 }
541 break;
542 }
543
544 case PPC_PTRACE_SETREGS: { /* Set GPRs 0 - 31. */
545 int i;
546 unsigned long *reg = &((unsigned long *)child->thread.regs)[0];
547 unsigned long __user *tmp = (unsigned long __user *)addr;
548
Roland McGrathfabca2c2007-09-25 09:50:52 +1000549 CHECK_FULL_REGS(child->thread.regs);
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000550 for (i = 0; i < 32; i++) {
551 ret = get_user(*reg, tmp);
552 if (ret)
553 break;
554 reg++;
555 tmp++;
556 }
557 break;
558 }
559
560 case PPC_PTRACE_GETFPREGS: { /* Get FPRs 0 - 31. */
561 flush_fp_to_thread(child);
562 ret = get_fpregs((void __user *)addr, child, 0);
563 break;
564 }
565
566 case PPC_PTRACE_SETFPREGS: { /* Get FPRs 0 - 31. */
567 flush_fp_to_thread(child);
568 ret = set_fpregs((void __user *)addr, child, 0);
569 break;
570 }
571
572 }
573 return ret;
574}
575
Christoph Hellwig481bed42005-11-07 00:59:47 -0800576long arch_ptrace(struct task_struct *child, long request, long addr, long data)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700577{
Linus Torvalds1da177e2005-04-16 15:20:36 -0700578 int ret = -EPERM;
579
Linus Torvalds1da177e2005-04-16 15:20:36 -0700580 switch (request) {
581 /* when I and D space are separate, these will need to be fixed. */
582 case PTRACE_PEEKTEXT: /* read word at location addr. */
Alexey Dobriyan76647322007-07-17 04:03:43 -0700583 case PTRACE_PEEKDATA:
584 ret = generic_ptrace_peekdata(child, addr, data);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700585 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700586
587 /* read the word at location addr in the USER area. */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700588 case PTRACE_PEEKUSR: {
589 unsigned long index, tmp;
590
591 ret = -EIO;
592 /* convert to index and check */
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000593#ifdef CONFIG_PPC32
Linus Torvalds1da177e2005-04-16 15:20:36 -0700594 index = (unsigned long) addr >> 2;
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000595 if ((addr & 3) || (index > PT_FPSCR)
596 || (child->thread.regs == NULL))
597#else
598 index = (unsigned long) addr >> 3;
599 if ((addr & 7) || (index > PT_FPSCR))
600#endif
Linus Torvalds1da177e2005-04-16 15:20:36 -0700601 break;
602
603 CHECK_FULL_REGS(child->thread.regs);
604 if (index < PT_FPR0) {
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000605 tmp = ptrace_get_reg(child, (int) index);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700606 } else {
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000607 flush_fp_to_thread(child);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700608 tmp = ((unsigned long *)child->thread.fpr)[index - PT_FPR0];
609 }
610 ret = put_user(tmp,(unsigned long __user *) data);
611 break;
612 }
613
614 /* If I and D space are separate, this will have to be fixed. */
615 case PTRACE_POKETEXT: /* write the word at location addr. */
616 case PTRACE_POKEDATA:
Alexey Dobriyanf284ce72007-07-17 04:03:44 -0700617 ret = generic_ptrace_pokedata(child, addr, data);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700618 break;
619
620 /* write the word at location addr in the USER area */
621 case PTRACE_POKEUSR: {
622 unsigned long index;
623
624 ret = -EIO;
625 /* convert to index and check */
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000626#ifdef CONFIG_PPC32
Linus Torvalds1da177e2005-04-16 15:20:36 -0700627 index = (unsigned long) addr >> 2;
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000628 if ((addr & 3) || (index > PT_FPSCR)
629 || (child->thread.regs == NULL))
630#else
631 index = (unsigned long) addr >> 3;
632 if ((addr & 7) || (index > PT_FPSCR))
633#endif
Linus Torvalds1da177e2005-04-16 15:20:36 -0700634 break;
635
636 CHECK_FULL_REGS(child->thread.regs);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700637 if (index < PT_FPR0) {
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000638 ret = ptrace_put_reg(child, index, data);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700639 } else {
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000640 flush_fp_to_thread(child);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700641 ((unsigned long *)child->thread.fpr)[index - PT_FPR0] = data;
642 ret = 0;
643 }
644 break;
645 }
646
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000647 case PTRACE_GET_DEBUGREG: {
648 ret = -EINVAL;
649 /* We only support one DABR and no IABRS at the moment */
650 if (addr > 0)
651 break;
652 ret = put_user(child->thread.dabr,
653 (unsigned long __user *)data);
654 break;
655 }
656
657 case PTRACE_SET_DEBUGREG:
658 ret = ptrace_set_debugreg(child, addr, data);
659 break;
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000660
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000661#ifdef CONFIG_PPC64
662 case PTRACE_GETREGS64:
663#endif
664 case PTRACE_GETREGS: { /* Get all pt_regs from the child. */
665 int ui;
666 if (!access_ok(VERIFY_WRITE, (void __user *)data,
667 sizeof(struct pt_regs))) {
668 ret = -EIO;
669 break;
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000670 }
Roland McGrathfabca2c2007-09-25 09:50:52 +1000671 CHECK_FULL_REGS(child->thread.regs);
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000672 ret = 0;
673 for (ui = 0; ui < PT_REGS_COUNT; ui ++) {
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000674 ret |= __put_user(ptrace_get_reg(child, ui),
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000675 (unsigned long __user *) data);
676 data += sizeof(long);
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000677 }
678 break;
679 }
680
Benjamin Herrenschmidt0b3d5c42007-06-04 15:15:39 +1000681#ifdef CONFIG_PPC64
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000682 case PTRACE_SETREGS64:
683#endif
684 case PTRACE_SETREGS: { /* Set all gp regs in the child. */
685 unsigned long tmp;
686 int ui;
687 if (!access_ok(VERIFY_READ, (void __user *)data,
688 sizeof(struct pt_regs))) {
689 ret = -EIO;
690 break;
691 }
Roland McGrathfabca2c2007-09-25 09:50:52 +1000692 CHECK_FULL_REGS(child->thread.regs);
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000693 ret = 0;
694 for (ui = 0; ui < PT_REGS_COUNT; ui ++) {
695 ret = __get_user(tmp, (unsigned long __user *) data);
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000696 if (ret)
697 break;
Benjamin Herrenschmidt865418d2007-06-04 15:15:44 +1000698 ptrace_put_reg(child, ui, tmp);
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000699 data += sizeof(long);
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000700 }
701 break;
702 }
703
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000704 case PTRACE_GETFPREGS: { /* Get the child FPU state (FPR0...31 + FPSCR) */
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000705 flush_fp_to_thread(child);
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000706 ret = get_fpregs((void __user *)data, child, 1);
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000707 break;
708 }
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000709
710 case PTRACE_SETFPREGS: { /* Set the child FPU state (FPR0...31 + FPSCR) */
711 flush_fp_to_thread(child);
712 ret = set_fpregs((void __user *)data, child, 1);
713 break;
714 }
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000715
Linus Torvalds1da177e2005-04-16 15:20:36 -0700716#ifdef CONFIG_ALTIVEC
717 case PTRACE_GETVRREGS:
718 /* Get the child altivec register state. */
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000719 flush_altivec_to_thread(child);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700720 ret = get_vrregs((unsigned long __user *)data, child);
721 break;
722
723 case PTRACE_SETVRREGS:
724 /* Set the child altivec register state. */
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000725 flush_altivec_to_thread(child);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700726 ret = set_vrregs(child, (unsigned long __user *)data);
727 break;
728#endif
729#ifdef CONFIG_SPE
730 case PTRACE_GETEVRREGS:
731 /* Get the child spe register state. */
Kumar Gala5e14d212007-09-13 01:44:20 -0500732 flush_spe_to_thread(child);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700733 ret = get_evrregs((unsigned long __user *)data, child);
734 break;
735
736 case PTRACE_SETEVRREGS:
737 /* Set the child spe register state. */
738 /* this is to clear the MSR_SPE bit to force a reload
739 * of register state from memory */
Kumar Gala5e14d212007-09-13 01:44:20 -0500740 flush_spe_to_thread(child);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700741 ret = set_evrregs(child, (unsigned long __user *)data);
742 break;
743#endif
744
Benjamin Herrenschmidte17666b2007-06-04 15:15:43 +1000745 /* Old reverse args ptrace callss */
746 case PPC_PTRACE_GETREGS: /* Get GPRs 0 - 31. */
747 case PPC_PTRACE_SETREGS: /* Set GPRs 0 - 31. */
748 case PPC_PTRACE_GETFPREGS: /* Get FPRs 0 - 31. */
749 case PPC_PTRACE_SETFPREGS: /* Get FPRs 0 - 31. */
750 ret = arch_ptrace_old(child, request, addr, data);
751 break;
752
Linus Torvalds1da177e2005-04-16 15:20:36 -0700753 default:
754 ret = ptrace_request(child, request, addr, data);
755 break;
756 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700757 return ret;
758}
759
David Woodhouseea9c1022005-05-08 15:56:09 +0100760static void do_syscall_trace(void)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700761{
David Woodhouseea9c1022005-05-08 15:56:09 +0100762 /* the 0x80 provides a way for the tracing parent to distinguish
763 between a syscall stop and SIGTRAP delivery */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700764 ptrace_notify(SIGTRAP | ((current->ptrace & PT_TRACESYSGOOD)
765 ? 0x80 : 0));
766
767 /*
768 * this isn't the same as continuing with a signal, but it will do
769 * for normal use. strace only continues with a signal if the
770 * stopping signal is not SIGTRAP. -brl
771 */
772 if (current->exit_code) {
773 send_sig(current->exit_code, current, 1);
774 current->exit_code = 0;
775 }
776}
David Woodhouseea9c1022005-05-08 15:56:09 +0100777
778void do_syscall_trace_enter(struct pt_regs *regs)
779{
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000780 secure_computing(regs->gpr[0]);
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000781
David Woodhouseea9c1022005-05-08 15:56:09 +0100782 if (test_thread_flag(TIF_SYSCALL_TRACE)
783 && (current->ptrace & PT_PTRACED))
784 do_syscall_trace();
785
David Woodhousecfcd1702007-01-14 09:38:18 +0800786 if (unlikely(current->audit_context)) {
787#ifdef CONFIG_PPC64
788 if (!test_thread_flag(TIF_32BIT))
789 audit_syscall_entry(AUDIT_ARCH_PPC64,
790 regs->gpr[0],
791 regs->gpr[3], regs->gpr[4],
792 regs->gpr[5], regs->gpr[6]);
793 else
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000794#endif
David Woodhousecfcd1702007-01-14 09:38:18 +0800795 audit_syscall_entry(AUDIT_ARCH_PPC,
796 regs->gpr[0],
797 regs->gpr[3] & 0xffffffff,
798 regs->gpr[4] & 0xffffffff,
799 regs->gpr[5] & 0xffffffff,
800 regs->gpr[6] & 0xffffffff);
801 }
David Woodhouseea9c1022005-05-08 15:56:09 +0100802}
803
804void do_syscall_trace_leave(struct pt_regs *regs)
805{
David Woodhouseea9c1022005-05-08 15:56:09 +0100806 if (unlikely(current->audit_context))
David Woodhouse4b9c8762006-09-22 09:23:53 +0100807 audit_syscall_exit((regs->ccr&0x10000000)?AUDITSC_FAILURE:AUDITSC_SUCCESS,
David Woodhouseea9c1022005-05-08 15:56:09 +0100808 regs->result);
809
Stephen Rothwelle8a30302005-10-13 15:52:04 +1000810 if ((test_thread_flag(TIF_SYSCALL_TRACE)
Paul Mackerras1bd79332006-03-08 13:24:22 +1100811 || test_thread_flag(TIF_SINGLESTEP))
David Woodhouseea9c1022005-05-08 15:56:09 +0100812 && (current->ptrace & PT_PTRACED))
813 do_syscall_trace();
814}