Loading...
1/*
2 * This file is subject to the terms and conditions of the GNU General Public
3 * License. See the file "COPYING" in the main directory of this archive
4 * for more details.
5 *
6 * Copyright (C) 1992 Ross Biro
7 * Copyright (C) Linus Torvalds
8 * Copyright (C) 1994, 95, 96, 97, 98, 2000 Ralf Baechle
9 * Copyright (C) 1996 David S. Miller
10 * Kevin D. Kissell, kevink@mips.com and Carsten Langgaard, carstenl@mips.com
11 * Copyright (C) 1999 MIPS Technologies, Inc.
12 * Copyright (C) 2000 Ulf Carlsson
13 *
14 * At this time Linux/MIPS64 only supports syscall tracing, even for 32-bit
15 * binaries.
16 */
17#include <linux/compiler.h>
18#include <linux/kernel.h>
19#include <linux/sched.h>
20#include <linux/mm.h>
21#include <linux/errno.h>
22#include <linux/ptrace.h>
23#include <linux/smp.h>
24#include <linux/user.h>
25#include <linux/security.h>
26#include <linux/audit.h>
27#include <linux/seccomp.h>
28
29#include <asm/byteorder.h>
30#include <asm/cpu.h>
31#include <asm/dsp.h>
32#include <asm/fpu.h>
33#include <asm/mipsregs.h>
34#include <asm/mipsmtregs.h>
35#include <asm/pgtable.h>
36#include <asm/page.h>
37#include <asm/uaccess.h>
38#include <asm/bootinfo.h>
39#include <asm/reg.h>
40
41/*
42 * Called by kernel/ptrace.c when detaching..
43 *
44 * Make sure single step bits etc are not set.
45 */
46void ptrace_disable(struct task_struct *child)
47{
48 /* Don't load the watchpoint registers for the ex-child. */
49 clear_tsk_thread_flag(child, TIF_LOAD_WATCH);
50}
51
52/*
53 * Read a general register set. We always use the 64-bit format, even
54 * for 32-bit kernels and for 32-bit processes on a 64-bit kernel.
55 * Registers are sign extended to fill the available space.
56 */
57int ptrace_getregs(struct task_struct *child, __s64 __user *data)
58{
59 struct pt_regs *regs;
60 int i;
61
62 if (!access_ok(VERIFY_WRITE, data, 38 * 8))
63 return -EIO;
64
65 regs = task_pt_regs(child);
66
67 for (i = 0; i < 32; i++)
68 __put_user((long)regs->regs[i], data + i);
69 __put_user((long)regs->lo, data + EF_LO - EF_R0);
70 __put_user((long)regs->hi, data + EF_HI - EF_R0);
71 __put_user((long)regs->cp0_epc, data + EF_CP0_EPC - EF_R0);
72 __put_user((long)regs->cp0_badvaddr, data + EF_CP0_BADVADDR - EF_R0);
73 __put_user((long)regs->cp0_status, data + EF_CP0_STATUS - EF_R0);
74 __put_user((long)regs->cp0_cause, data + EF_CP0_CAUSE - EF_R0);
75
76 return 0;
77}
78
79/*
80 * Write a general register set. As for PTRACE_GETREGS, we always use
81 * the 64-bit format. On a 32-bit kernel only the lower order half
82 * (according to endianness) will be used.
83 */
84int ptrace_setregs(struct task_struct *child, __s64 __user *data)
85{
86 struct pt_regs *regs;
87 int i;
88
89 if (!access_ok(VERIFY_READ, data, 38 * 8))
90 return -EIO;
91
92 regs = task_pt_regs(child);
93
94 for (i = 0; i < 32; i++)
95 __get_user(regs->regs[i], data + i);
96 __get_user(regs->lo, data + EF_LO - EF_R0);
97 __get_user(regs->hi, data + EF_HI - EF_R0);
98 __get_user(regs->cp0_epc, data + EF_CP0_EPC - EF_R0);
99
100 /* badvaddr, status, and cause may not be written. */
101
102 return 0;
103}
104
105int ptrace_getfpregs(struct task_struct *child, __u32 __user *data)
106{
107 int i;
108 unsigned int tmp;
109
110 if (!access_ok(VERIFY_WRITE, data, 33 * 8))
111 return -EIO;
112
113 if (tsk_used_math(child)) {
114 fpureg_t *fregs = get_fpu_regs(child);
115 for (i = 0; i < 32; i++)
116 __put_user(fregs[i], i + (__u64 __user *) data);
117 } else {
118 for (i = 0; i < 32; i++)
119 __put_user((__u64) -1, i + (__u64 __user *) data);
120 }
121
122 __put_user(child->thread.fpu.fcr31, data + 64);
123
124 preempt_disable();
125 if (cpu_has_fpu) {
126 unsigned int flags;
127
128 if (cpu_has_mipsmt) {
129 unsigned int vpflags = dvpe();
130 flags = read_c0_status();
131 __enable_fpu();
132 __asm__ __volatile__("cfc1\t%0,$0" : "=r" (tmp));
133 write_c0_status(flags);
134 evpe(vpflags);
135 } else {
136 flags = read_c0_status();
137 __enable_fpu();
138 __asm__ __volatile__("cfc1\t%0,$0" : "=r" (tmp));
139 write_c0_status(flags);
140 }
141 } else {
142 tmp = 0;
143 }
144 preempt_enable();
145 __put_user(tmp, data + 65);
146
147 return 0;
148}
149
150int ptrace_setfpregs(struct task_struct *child, __u32 __user *data)
151{
152 fpureg_t *fregs;
153 int i;
154
155 if (!access_ok(VERIFY_READ, data, 33 * 8))
156 return -EIO;
157
158 fregs = get_fpu_regs(child);
159
160 for (i = 0; i < 32; i++)
161 __get_user(fregs[i], i + (__u64 __user *) data);
162
163 __get_user(child->thread.fpu.fcr31, data + 64);
164
165 /* FIR may not be written. */
166
167 return 0;
168}
169
170int ptrace_get_watch_regs(struct task_struct *child,
171 struct pt_watch_regs __user *addr)
172{
173 enum pt_watch_style style;
174 int i;
175
176 if (!cpu_has_watch || current_cpu_data.watch_reg_use_cnt == 0)
177 return -EIO;
178 if (!access_ok(VERIFY_WRITE, addr, sizeof(struct pt_watch_regs)))
179 return -EIO;
180
181#ifdef CONFIG_32BIT
182 style = pt_watch_style_mips32;
183#define WATCH_STYLE mips32
184#else
185 style = pt_watch_style_mips64;
186#define WATCH_STYLE mips64
187#endif
188
189 __put_user(style, &addr->style);
190 __put_user(current_cpu_data.watch_reg_use_cnt,
191 &addr->WATCH_STYLE.num_valid);
192 for (i = 0; i < current_cpu_data.watch_reg_use_cnt; i++) {
193 __put_user(child->thread.watch.mips3264.watchlo[i],
194 &addr->WATCH_STYLE.watchlo[i]);
195 __put_user(child->thread.watch.mips3264.watchhi[i] & 0xfff,
196 &addr->WATCH_STYLE.watchhi[i]);
197 __put_user(current_cpu_data.watch_reg_masks[i],
198 &addr->WATCH_STYLE.watch_masks[i]);
199 }
200 for (; i < 8; i++) {
201 __put_user(0, &addr->WATCH_STYLE.watchlo[i]);
202 __put_user(0, &addr->WATCH_STYLE.watchhi[i]);
203 __put_user(0, &addr->WATCH_STYLE.watch_masks[i]);
204 }
205
206 return 0;
207}
208
209int ptrace_set_watch_regs(struct task_struct *child,
210 struct pt_watch_regs __user *addr)
211{
212 int i;
213 int watch_active = 0;
214 unsigned long lt[NUM_WATCH_REGS];
215 u16 ht[NUM_WATCH_REGS];
216
217 if (!cpu_has_watch || current_cpu_data.watch_reg_use_cnt == 0)
218 return -EIO;
219 if (!access_ok(VERIFY_READ, addr, sizeof(struct pt_watch_regs)))
220 return -EIO;
221 /* Check the values. */
222 for (i = 0; i < current_cpu_data.watch_reg_use_cnt; i++) {
223 __get_user(lt[i], &addr->WATCH_STYLE.watchlo[i]);
224#ifdef CONFIG_32BIT
225 if (lt[i] & __UA_LIMIT)
226 return -EINVAL;
227#else
228 if (test_tsk_thread_flag(child, TIF_32BIT_ADDR)) {
229 if (lt[i] & 0xffffffff80000000UL)
230 return -EINVAL;
231 } else {
232 if (lt[i] & __UA_LIMIT)
233 return -EINVAL;
234 }
235#endif
236 __get_user(ht[i], &addr->WATCH_STYLE.watchhi[i]);
237 if (ht[i] & ~0xff8)
238 return -EINVAL;
239 }
240 /* Install them. */
241 for (i = 0; i < current_cpu_data.watch_reg_use_cnt; i++) {
242 if (lt[i] & 7)
243 watch_active = 1;
244 child->thread.watch.mips3264.watchlo[i] = lt[i];
245 /* Set the G bit. */
246 child->thread.watch.mips3264.watchhi[i] = ht[i];
247 }
248
249 if (watch_active)
250 set_tsk_thread_flag(child, TIF_LOAD_WATCH);
251 else
252 clear_tsk_thread_flag(child, TIF_LOAD_WATCH);
253
254 return 0;
255}
256
257long arch_ptrace(struct task_struct *child, long request,
258 unsigned long addr, unsigned long data)
259{
260 int ret;
261 void __user *addrp = (void __user *) addr;
262 void __user *datavp = (void __user *) data;
263 unsigned long __user *datalp = (void __user *) data;
264
265 switch (request) {
266 /* when I and D space are separate, these will need to be fixed. */
267 case PTRACE_PEEKTEXT: /* read word at location addr. */
268 case PTRACE_PEEKDATA:
269 ret = generic_ptrace_peekdata(child, addr, data);
270 break;
271
272 /* Read the word at location addr in the USER area. */
273 case PTRACE_PEEKUSR: {
274 struct pt_regs *regs;
275 unsigned long tmp = 0;
276
277 regs = task_pt_regs(child);
278 ret = 0; /* Default return value. */
279
280 switch (addr) {
281 case 0 ... 31:
282 tmp = regs->regs[addr];
283 break;
284 case FPR_BASE ... FPR_BASE + 31:
285 if (tsk_used_math(child)) {
286 fpureg_t *fregs = get_fpu_regs(child);
287
288#ifdef CONFIG_32BIT
289 /*
290 * The odd registers are actually the high
291 * order bits of the values stored in the even
292 * registers - unless we're using r2k_switch.S.
293 */
294 if (addr & 1)
295 tmp = (unsigned long) (fregs[((addr & ~1) - 32)] >> 32);
296 else
297 tmp = (unsigned long) (fregs[(addr - 32)] & 0xffffffff);
298#endif
299#ifdef CONFIG_64BIT
300 tmp = fregs[addr - FPR_BASE];
301#endif
302 } else {
303 tmp = -1; /* FP not yet used */
304 }
305 break;
306 case PC:
307 tmp = regs->cp0_epc;
308 break;
309 case CAUSE:
310 tmp = regs->cp0_cause;
311 break;
312 case BADVADDR:
313 tmp = regs->cp0_badvaddr;
314 break;
315 case MMHI:
316 tmp = regs->hi;
317 break;
318 case MMLO:
319 tmp = regs->lo;
320 break;
321#ifdef CONFIG_CPU_HAS_SMARTMIPS
322 case ACX:
323 tmp = regs->acx;
324 break;
325#endif
326 case FPC_CSR:
327 tmp = child->thread.fpu.fcr31;
328 break;
329 case FPC_EIR: { /* implementation / version register */
330 unsigned int flags;
331#ifdef CONFIG_MIPS_MT_SMTC
332 unsigned long irqflags;
333 unsigned int mtflags;
334#endif /* CONFIG_MIPS_MT_SMTC */
335
336 preempt_disable();
337 if (!cpu_has_fpu) {
338 preempt_enable();
339 break;
340 }
341
342#ifdef CONFIG_MIPS_MT_SMTC
343 /* Read-modify-write of Status must be atomic */
344 local_irq_save(irqflags);
345 mtflags = dmt();
346#endif /* CONFIG_MIPS_MT_SMTC */
347 if (cpu_has_mipsmt) {
348 unsigned int vpflags = dvpe();
349 flags = read_c0_status();
350 __enable_fpu();
351 __asm__ __volatile__("cfc1\t%0,$0": "=r" (tmp));
352 write_c0_status(flags);
353 evpe(vpflags);
354 } else {
355 flags = read_c0_status();
356 __enable_fpu();
357 __asm__ __volatile__("cfc1\t%0,$0": "=r" (tmp));
358 write_c0_status(flags);
359 }
360#ifdef CONFIG_MIPS_MT_SMTC
361 emt(mtflags);
362 local_irq_restore(irqflags);
363#endif /* CONFIG_MIPS_MT_SMTC */
364 preempt_enable();
365 break;
366 }
367 case DSP_BASE ... DSP_BASE + 5: {
368 dspreg_t *dregs;
369
370 if (!cpu_has_dsp) {
371 tmp = 0;
372 ret = -EIO;
373 goto out;
374 }
375 dregs = __get_dsp_regs(child);
376 tmp = (unsigned long) (dregs[addr - DSP_BASE]);
377 break;
378 }
379 case DSP_CONTROL:
380 if (!cpu_has_dsp) {
381 tmp = 0;
382 ret = -EIO;
383 goto out;
384 }
385 tmp = child->thread.dsp.dspcontrol;
386 break;
387 default:
388 tmp = 0;
389 ret = -EIO;
390 goto out;
391 }
392 ret = put_user(tmp, datalp);
393 break;
394 }
395
396 /* when I and D space are separate, this will have to be fixed. */
397 case PTRACE_POKETEXT: /* write the word at location addr. */
398 case PTRACE_POKEDATA:
399 ret = generic_ptrace_pokedata(child, addr, data);
400 break;
401
402 case PTRACE_POKEUSR: {
403 struct pt_regs *regs;
404 ret = 0;
405 regs = task_pt_regs(child);
406
407 switch (addr) {
408 case 0 ... 31:
409 regs->regs[addr] = data;
410 break;
411 case FPR_BASE ... FPR_BASE + 31: {
412 fpureg_t *fregs = get_fpu_regs(child);
413
414 if (!tsk_used_math(child)) {
415 /* FP not yet used */
416 memset(&child->thread.fpu, ~0,
417 sizeof(child->thread.fpu));
418 child->thread.fpu.fcr31 = 0;
419 }
420#ifdef CONFIG_32BIT
421 /*
422 * The odd registers are actually the high order bits
423 * of the values stored in the even registers - unless
424 * we're using r2k_switch.S.
425 */
426 if (addr & 1) {
427 fregs[(addr & ~1) - FPR_BASE] &= 0xffffffff;
428 fregs[(addr & ~1) - FPR_BASE] |= ((unsigned long long) data) << 32;
429 } else {
430 fregs[addr - FPR_BASE] &= ~0xffffffffLL;
431 fregs[addr - FPR_BASE] |= data;
432 }
433#endif
434#ifdef CONFIG_64BIT
435 fregs[addr - FPR_BASE] = data;
436#endif
437 break;
438 }
439 case PC:
440 regs->cp0_epc = data;
441 break;
442 case MMHI:
443 regs->hi = data;
444 break;
445 case MMLO:
446 regs->lo = data;
447 break;
448#ifdef CONFIG_CPU_HAS_SMARTMIPS
449 case ACX:
450 regs->acx = data;
451 break;
452#endif
453 case FPC_CSR:
454 child->thread.fpu.fcr31 = data;
455 break;
456 case DSP_BASE ... DSP_BASE + 5: {
457 dspreg_t *dregs;
458
459 if (!cpu_has_dsp) {
460 ret = -EIO;
461 break;
462 }
463
464 dregs = __get_dsp_regs(child);
465 dregs[addr - DSP_BASE] = data;
466 break;
467 }
468 case DSP_CONTROL:
469 if (!cpu_has_dsp) {
470 ret = -EIO;
471 break;
472 }
473 child->thread.dsp.dspcontrol = data;
474 break;
475 default:
476 /* The rest are not allowed. */
477 ret = -EIO;
478 break;
479 }
480 break;
481 }
482
483 case PTRACE_GETREGS:
484 ret = ptrace_getregs(child, datavp);
485 break;
486
487 case PTRACE_SETREGS:
488 ret = ptrace_setregs(child, datavp);
489 break;
490
491 case PTRACE_GETFPREGS:
492 ret = ptrace_getfpregs(child, datavp);
493 break;
494
495 case PTRACE_SETFPREGS:
496 ret = ptrace_setfpregs(child, datavp);
497 break;
498
499 case PTRACE_GET_THREAD_AREA:
500 ret = put_user(task_thread_info(child)->tp_value, datalp);
501 break;
502
503 case PTRACE_GET_WATCH_REGS:
504 ret = ptrace_get_watch_regs(child, addrp);
505 break;
506
507 case PTRACE_SET_WATCH_REGS:
508 ret = ptrace_set_watch_regs(child, addrp);
509 break;
510
511 default:
512 ret = ptrace_request(child, request, addr, data);
513 break;
514 }
515 out:
516 return ret;
517}
518
519static inline int audit_arch(void)
520{
521 int arch = EM_MIPS;
522#ifdef CONFIG_64BIT
523 arch |= __AUDIT_ARCH_64BIT;
524#endif
525#if defined(__LITTLE_ENDIAN)
526 arch |= __AUDIT_ARCH_LE;
527#endif
528 return arch;
529}
530
531/*
532 * Notification of system call entry/exit
533 * - triggered by current->work.syscall_trace
534 */
535asmlinkage void syscall_trace_enter(struct pt_regs *regs)
536{
537 /* do the secure computing check first */
538 secure_computing_strict(regs->regs[2]);
539
540 if (!(current->ptrace & PT_PTRACED))
541 goto out;
542
543 if (!test_thread_flag(TIF_SYSCALL_TRACE))
544 goto out;
545
546 /* The 0x80 provides a way for the tracing parent to distinguish
547 between a syscall stop and SIGTRAP delivery */
548 ptrace_notify(SIGTRAP | ((current->ptrace & PT_TRACESYSGOOD) ?
549 0x80 : 0));
550
551 /*
552 * this isn't the same as continuing with a signal, but it will do
553 * for normal use. strace only continues with a signal if the
554 * stopping signal is not SIGTRAP. -brl
555 */
556 if (current->exit_code) {
557 send_sig(current->exit_code, current, 1);
558 current->exit_code = 0;
559 }
560
561out:
562 audit_syscall_entry(audit_arch(), regs->regs[2],
563 regs->regs[4], regs->regs[5],
564 regs->regs[6], regs->regs[7]);
565}
566
567/*
568 * Notification of system call entry/exit
569 * - triggered by current->work.syscall_trace
570 */
571asmlinkage void syscall_trace_leave(struct pt_regs *regs)
572{
573 audit_syscall_exit(regs);
574
575 if (!(current->ptrace & PT_PTRACED))
576 return;
577
578 if (!test_thread_flag(TIF_SYSCALL_TRACE))
579 return;
580
581 /* The 0x80 provides a way for the tracing parent to distinguish
582 between a syscall stop and SIGTRAP delivery */
583 ptrace_notify(SIGTRAP | ((current->ptrace & PT_TRACESYSGOOD) ?
584 0x80 : 0));
585
586 /*
587 * this isn't the same as continuing with a signal, but it will do
588 * for normal use. strace only continues with a signal if the
589 * stopping signal is not SIGTRAP. -brl
590 */
591 if (current->exit_code) {
592 send_sig(current->exit_code, current, 1);
593 current->exit_code = 0;
594 }
595}
1/*
2 * This file is subject to the terms and conditions of the GNU General Public
3 * License. See the file "COPYING" in the main directory of this archive
4 * for more details.
5 *
6 * Copyright (C) 1992 Ross Biro
7 * Copyright (C) Linus Torvalds
8 * Copyright (C) 1994, 95, 96, 97, 98, 2000 Ralf Baechle
9 * Copyright (C) 1996 David S. Miller
10 * Kevin D. Kissell, kevink@mips.com and Carsten Langgaard, carstenl@mips.com
11 * Copyright (C) 1999 MIPS Technologies, Inc.
12 * Copyright (C) 2000 Ulf Carlsson
13 *
14 * At this time Linux/MIPS64 only supports syscall tracing, even for 32-bit
15 * binaries.
16 */
17#include <linux/compiler.h>
18#include <linux/kernel.h>
19#include <linux/sched.h>
20#include <linux/mm.h>
21#include <linux/errno.h>
22#include <linux/ptrace.h>
23#include <linux/smp.h>
24#include <linux/user.h>
25#include <linux/security.h>
26#include <linux/audit.h>
27#include <linux/seccomp.h>
28
29#include <asm/byteorder.h>
30#include <asm/cpu.h>
31#include <asm/dsp.h>
32#include <asm/fpu.h>
33#include <asm/mipsregs.h>
34#include <asm/mipsmtregs.h>
35#include <asm/pgtable.h>
36#include <asm/page.h>
37#include <asm/system.h>
38#include <asm/uaccess.h>
39#include <asm/bootinfo.h>
40#include <asm/reg.h>
41
42/*
43 * Called by kernel/ptrace.c when detaching..
44 *
45 * Make sure single step bits etc are not set.
46 */
47void ptrace_disable(struct task_struct *child)
48{
49 /* Don't load the watchpoint registers for the ex-child. */
50 clear_tsk_thread_flag(child, TIF_LOAD_WATCH);
51}
52
53/*
54 * Read a general register set. We always use the 64-bit format, even
55 * for 32-bit kernels and for 32-bit processes on a 64-bit kernel.
56 * Registers are sign extended to fill the available space.
57 */
58int ptrace_getregs(struct task_struct *child, __s64 __user *data)
59{
60 struct pt_regs *regs;
61 int i;
62
63 if (!access_ok(VERIFY_WRITE, data, 38 * 8))
64 return -EIO;
65
66 regs = task_pt_regs(child);
67
68 for (i = 0; i < 32; i++)
69 __put_user((long)regs->regs[i], data + i);
70 __put_user((long)regs->lo, data + EF_LO - EF_R0);
71 __put_user((long)regs->hi, data + EF_HI - EF_R0);
72 __put_user((long)regs->cp0_epc, data + EF_CP0_EPC - EF_R0);
73 __put_user((long)regs->cp0_badvaddr, data + EF_CP0_BADVADDR - EF_R0);
74 __put_user((long)regs->cp0_status, data + EF_CP0_STATUS - EF_R0);
75 __put_user((long)regs->cp0_cause, data + EF_CP0_CAUSE - EF_R0);
76
77 return 0;
78}
79
80/*
81 * Write a general register set. As for PTRACE_GETREGS, we always use
82 * the 64-bit format. On a 32-bit kernel only the lower order half
83 * (according to endianness) will be used.
84 */
85int ptrace_setregs(struct task_struct *child, __s64 __user *data)
86{
87 struct pt_regs *regs;
88 int i;
89
90 if (!access_ok(VERIFY_READ, data, 38 * 8))
91 return -EIO;
92
93 regs = task_pt_regs(child);
94
95 for (i = 0; i < 32; i++)
96 __get_user(regs->regs[i], data + i);
97 __get_user(regs->lo, data + EF_LO - EF_R0);
98 __get_user(regs->hi, data + EF_HI - EF_R0);
99 __get_user(regs->cp0_epc, data + EF_CP0_EPC - EF_R0);
100
101 /* badvaddr, status, and cause may not be written. */
102
103 return 0;
104}
105
106int ptrace_getfpregs(struct task_struct *child, __u32 __user *data)
107{
108 int i;
109 unsigned int tmp;
110
111 if (!access_ok(VERIFY_WRITE, data, 33 * 8))
112 return -EIO;
113
114 if (tsk_used_math(child)) {
115 fpureg_t *fregs = get_fpu_regs(child);
116 for (i = 0; i < 32; i++)
117 __put_user(fregs[i], i + (__u64 __user *) data);
118 } else {
119 for (i = 0; i < 32; i++)
120 __put_user((__u64) -1, i + (__u64 __user *) data);
121 }
122
123 __put_user(child->thread.fpu.fcr31, data + 64);
124
125 preempt_disable();
126 if (cpu_has_fpu) {
127 unsigned int flags;
128
129 if (cpu_has_mipsmt) {
130 unsigned int vpflags = dvpe();
131 flags = read_c0_status();
132 __enable_fpu();
133 __asm__ __volatile__("cfc1\t%0,$0" : "=r" (tmp));
134 write_c0_status(flags);
135 evpe(vpflags);
136 } else {
137 flags = read_c0_status();
138 __enable_fpu();
139 __asm__ __volatile__("cfc1\t%0,$0" : "=r" (tmp));
140 write_c0_status(flags);
141 }
142 } else {
143 tmp = 0;
144 }
145 preempt_enable();
146 __put_user(tmp, data + 65);
147
148 return 0;
149}
150
151int ptrace_setfpregs(struct task_struct *child, __u32 __user *data)
152{
153 fpureg_t *fregs;
154 int i;
155
156 if (!access_ok(VERIFY_READ, data, 33 * 8))
157 return -EIO;
158
159 fregs = get_fpu_regs(child);
160
161 for (i = 0; i < 32; i++)
162 __get_user(fregs[i], i + (__u64 __user *) data);
163
164 __get_user(child->thread.fpu.fcr31, data + 64);
165
166 /* FIR may not be written. */
167
168 return 0;
169}
170
171int ptrace_get_watch_regs(struct task_struct *child,
172 struct pt_watch_regs __user *addr)
173{
174 enum pt_watch_style style;
175 int i;
176
177 if (!cpu_has_watch || current_cpu_data.watch_reg_use_cnt == 0)
178 return -EIO;
179 if (!access_ok(VERIFY_WRITE, addr, sizeof(struct pt_watch_regs)))
180 return -EIO;
181
182#ifdef CONFIG_32BIT
183 style = pt_watch_style_mips32;
184#define WATCH_STYLE mips32
185#else
186 style = pt_watch_style_mips64;
187#define WATCH_STYLE mips64
188#endif
189
190 __put_user(style, &addr->style);
191 __put_user(current_cpu_data.watch_reg_use_cnt,
192 &addr->WATCH_STYLE.num_valid);
193 for (i = 0; i < current_cpu_data.watch_reg_use_cnt; i++) {
194 __put_user(child->thread.watch.mips3264.watchlo[i],
195 &addr->WATCH_STYLE.watchlo[i]);
196 __put_user(child->thread.watch.mips3264.watchhi[i] & 0xfff,
197 &addr->WATCH_STYLE.watchhi[i]);
198 __put_user(current_cpu_data.watch_reg_masks[i],
199 &addr->WATCH_STYLE.watch_masks[i]);
200 }
201 for (; i < 8; i++) {
202 __put_user(0, &addr->WATCH_STYLE.watchlo[i]);
203 __put_user(0, &addr->WATCH_STYLE.watchhi[i]);
204 __put_user(0, &addr->WATCH_STYLE.watch_masks[i]);
205 }
206
207 return 0;
208}
209
210int ptrace_set_watch_regs(struct task_struct *child,
211 struct pt_watch_regs __user *addr)
212{
213 int i;
214 int watch_active = 0;
215 unsigned long lt[NUM_WATCH_REGS];
216 u16 ht[NUM_WATCH_REGS];
217
218 if (!cpu_has_watch || current_cpu_data.watch_reg_use_cnt == 0)
219 return -EIO;
220 if (!access_ok(VERIFY_READ, addr, sizeof(struct pt_watch_regs)))
221 return -EIO;
222 /* Check the values. */
223 for (i = 0; i < current_cpu_data.watch_reg_use_cnt; i++) {
224 __get_user(lt[i], &addr->WATCH_STYLE.watchlo[i]);
225#ifdef CONFIG_32BIT
226 if (lt[i] & __UA_LIMIT)
227 return -EINVAL;
228#else
229 if (test_tsk_thread_flag(child, TIF_32BIT_ADDR)) {
230 if (lt[i] & 0xffffffff80000000UL)
231 return -EINVAL;
232 } else {
233 if (lt[i] & __UA_LIMIT)
234 return -EINVAL;
235 }
236#endif
237 __get_user(ht[i], &addr->WATCH_STYLE.watchhi[i]);
238 if (ht[i] & ~0xff8)
239 return -EINVAL;
240 }
241 /* Install them. */
242 for (i = 0; i < current_cpu_data.watch_reg_use_cnt; i++) {
243 if (lt[i] & 7)
244 watch_active = 1;
245 child->thread.watch.mips3264.watchlo[i] = lt[i];
246 /* Set the G bit. */
247 child->thread.watch.mips3264.watchhi[i] = ht[i];
248 }
249
250 if (watch_active)
251 set_tsk_thread_flag(child, TIF_LOAD_WATCH);
252 else
253 clear_tsk_thread_flag(child, TIF_LOAD_WATCH);
254
255 return 0;
256}
257
258long arch_ptrace(struct task_struct *child, long request,
259 unsigned long addr, unsigned long data)
260{
261 int ret;
262 void __user *addrp = (void __user *) addr;
263 void __user *datavp = (void __user *) data;
264 unsigned long __user *datalp = (void __user *) data;
265
266 switch (request) {
267 /* when I and D space are separate, these will need to be fixed. */
268 case PTRACE_PEEKTEXT: /* read word at location addr. */
269 case PTRACE_PEEKDATA:
270 ret = generic_ptrace_peekdata(child, addr, data);
271 break;
272
273 /* Read the word at location addr in the USER area. */
274 case PTRACE_PEEKUSR: {
275 struct pt_regs *regs;
276 unsigned long tmp = 0;
277
278 regs = task_pt_regs(child);
279 ret = 0; /* Default return value. */
280
281 switch (addr) {
282 case 0 ... 31:
283 tmp = regs->regs[addr];
284 break;
285 case FPR_BASE ... FPR_BASE + 31:
286 if (tsk_used_math(child)) {
287 fpureg_t *fregs = get_fpu_regs(child);
288
289#ifdef CONFIG_32BIT
290 /*
291 * The odd registers are actually the high
292 * order bits of the values stored in the even
293 * registers - unless we're using r2k_switch.S.
294 */
295 if (addr & 1)
296 tmp = (unsigned long) (fregs[((addr & ~1) - 32)] >> 32);
297 else
298 tmp = (unsigned long) (fregs[(addr - 32)] & 0xffffffff);
299#endif
300#ifdef CONFIG_64BIT
301 tmp = fregs[addr - FPR_BASE];
302#endif
303 } else {
304 tmp = -1; /* FP not yet used */
305 }
306 break;
307 case PC:
308 tmp = regs->cp0_epc;
309 break;
310 case CAUSE:
311 tmp = regs->cp0_cause;
312 break;
313 case BADVADDR:
314 tmp = regs->cp0_badvaddr;
315 break;
316 case MMHI:
317 tmp = regs->hi;
318 break;
319 case MMLO:
320 tmp = regs->lo;
321 break;
322#ifdef CONFIG_CPU_HAS_SMARTMIPS
323 case ACX:
324 tmp = regs->acx;
325 break;
326#endif
327 case FPC_CSR:
328 tmp = child->thread.fpu.fcr31;
329 break;
330 case FPC_EIR: { /* implementation / version register */
331 unsigned int flags;
332#ifdef CONFIG_MIPS_MT_SMTC
333 unsigned long irqflags;
334 unsigned int mtflags;
335#endif /* CONFIG_MIPS_MT_SMTC */
336
337 preempt_disable();
338 if (!cpu_has_fpu) {
339 preempt_enable();
340 break;
341 }
342
343#ifdef CONFIG_MIPS_MT_SMTC
344 /* Read-modify-write of Status must be atomic */
345 local_irq_save(irqflags);
346 mtflags = dmt();
347#endif /* CONFIG_MIPS_MT_SMTC */
348 if (cpu_has_mipsmt) {
349 unsigned int vpflags = dvpe();
350 flags = read_c0_status();
351 __enable_fpu();
352 __asm__ __volatile__("cfc1\t%0,$0": "=r" (tmp));
353 write_c0_status(flags);
354 evpe(vpflags);
355 } else {
356 flags = read_c0_status();
357 __enable_fpu();
358 __asm__ __volatile__("cfc1\t%0,$0": "=r" (tmp));
359 write_c0_status(flags);
360 }
361#ifdef CONFIG_MIPS_MT_SMTC
362 emt(mtflags);
363 local_irq_restore(irqflags);
364#endif /* CONFIG_MIPS_MT_SMTC */
365 preempt_enable();
366 break;
367 }
368 case DSP_BASE ... DSP_BASE + 5: {
369 dspreg_t *dregs;
370
371 if (!cpu_has_dsp) {
372 tmp = 0;
373 ret = -EIO;
374 goto out;
375 }
376 dregs = __get_dsp_regs(child);
377 tmp = (unsigned long) (dregs[addr - DSP_BASE]);
378 break;
379 }
380 case DSP_CONTROL:
381 if (!cpu_has_dsp) {
382 tmp = 0;
383 ret = -EIO;
384 goto out;
385 }
386 tmp = child->thread.dsp.dspcontrol;
387 break;
388 default:
389 tmp = 0;
390 ret = -EIO;
391 goto out;
392 }
393 ret = put_user(tmp, datalp);
394 break;
395 }
396
397 /* when I and D space are separate, this will have to be fixed. */
398 case PTRACE_POKETEXT: /* write the word at location addr. */
399 case PTRACE_POKEDATA:
400 ret = generic_ptrace_pokedata(child, addr, data);
401 break;
402
403 case PTRACE_POKEUSR: {
404 struct pt_regs *regs;
405 ret = 0;
406 regs = task_pt_regs(child);
407
408 switch (addr) {
409 case 0 ... 31:
410 regs->regs[addr] = data;
411 break;
412 case FPR_BASE ... FPR_BASE + 31: {
413 fpureg_t *fregs = get_fpu_regs(child);
414
415 if (!tsk_used_math(child)) {
416 /* FP not yet used */
417 memset(&child->thread.fpu, ~0,
418 sizeof(child->thread.fpu));
419 child->thread.fpu.fcr31 = 0;
420 }
421#ifdef CONFIG_32BIT
422 /*
423 * The odd registers are actually the high order bits
424 * of the values stored in the even registers - unless
425 * we're using r2k_switch.S.
426 */
427 if (addr & 1) {
428 fregs[(addr & ~1) - FPR_BASE] &= 0xffffffff;
429 fregs[(addr & ~1) - FPR_BASE] |= ((unsigned long long) data) << 32;
430 } else {
431 fregs[addr - FPR_BASE] &= ~0xffffffffLL;
432 fregs[addr - FPR_BASE] |= data;
433 }
434#endif
435#ifdef CONFIG_64BIT
436 fregs[addr - FPR_BASE] = data;
437#endif
438 break;
439 }
440 case PC:
441 regs->cp0_epc = data;
442 break;
443 case MMHI:
444 regs->hi = data;
445 break;
446 case MMLO:
447 regs->lo = data;
448 break;
449#ifdef CONFIG_CPU_HAS_SMARTMIPS
450 case ACX:
451 regs->acx = data;
452 break;
453#endif
454 case FPC_CSR:
455 child->thread.fpu.fcr31 = data;
456 break;
457 case DSP_BASE ... DSP_BASE + 5: {
458 dspreg_t *dregs;
459
460 if (!cpu_has_dsp) {
461 ret = -EIO;
462 break;
463 }
464
465 dregs = __get_dsp_regs(child);
466 dregs[addr - DSP_BASE] = data;
467 break;
468 }
469 case DSP_CONTROL:
470 if (!cpu_has_dsp) {
471 ret = -EIO;
472 break;
473 }
474 child->thread.dsp.dspcontrol = data;
475 break;
476 default:
477 /* The rest are not allowed. */
478 ret = -EIO;
479 break;
480 }
481 break;
482 }
483
484 case PTRACE_GETREGS:
485 ret = ptrace_getregs(child, datavp);
486 break;
487
488 case PTRACE_SETREGS:
489 ret = ptrace_setregs(child, datavp);
490 break;
491
492 case PTRACE_GETFPREGS:
493 ret = ptrace_getfpregs(child, datavp);
494 break;
495
496 case PTRACE_SETFPREGS:
497 ret = ptrace_setfpregs(child, datavp);
498 break;
499
500 case PTRACE_GET_THREAD_AREA:
501 ret = put_user(task_thread_info(child)->tp_value, datalp);
502 break;
503
504 case PTRACE_GET_WATCH_REGS:
505 ret = ptrace_get_watch_regs(child, addrp);
506 break;
507
508 case PTRACE_SET_WATCH_REGS:
509 ret = ptrace_set_watch_regs(child, addrp);
510 break;
511
512 default:
513 ret = ptrace_request(child, request, addr, data);
514 break;
515 }
516 out:
517 return ret;
518}
519
520static inline int audit_arch(void)
521{
522 int arch = EM_MIPS;
523#ifdef CONFIG_64BIT
524 arch |= __AUDIT_ARCH_64BIT;
525#endif
526#if defined(__LITTLE_ENDIAN)
527 arch |= __AUDIT_ARCH_LE;
528#endif
529 return arch;
530}
531
532/*
533 * Notification of system call entry/exit
534 * - triggered by current->work.syscall_trace
535 */
536asmlinkage void syscall_trace_enter(struct pt_regs *regs)
537{
538 /* do the secure computing check first */
539 secure_computing(regs->regs[2]);
540
541 if (!(current->ptrace & PT_PTRACED))
542 goto out;
543
544 if (!test_thread_flag(TIF_SYSCALL_TRACE))
545 goto out;
546
547 /* The 0x80 provides a way for the tracing parent to distinguish
548 between a syscall stop and SIGTRAP delivery */
549 ptrace_notify(SIGTRAP | ((current->ptrace & PT_TRACESYSGOOD) ?
550 0x80 : 0));
551
552 /*
553 * this isn't the same as continuing with a signal, but it will do
554 * for normal use. strace only continues with a signal if the
555 * stopping signal is not SIGTRAP. -brl
556 */
557 if (current->exit_code) {
558 send_sig(current->exit_code, current, 1);
559 current->exit_code = 0;
560 }
561
562out:
563 if (unlikely(current->audit_context))
564 audit_syscall_entry(audit_arch(), regs->regs[2],
565 regs->regs[4], regs->regs[5],
566 regs->regs[6], regs->regs[7]);
567}
568
569/*
570 * Notification of system call entry/exit
571 * - triggered by current->work.syscall_trace
572 */
573asmlinkage void syscall_trace_leave(struct pt_regs *regs)
574{
575 if (unlikely(current->audit_context))
576 audit_syscall_exit(AUDITSC_RESULT(regs->regs[7]),
577 -regs->regs[2]);
578
579 if (!(current->ptrace & PT_PTRACED))
580 return;
581
582 if (!test_thread_flag(TIF_SYSCALL_TRACE))
583 return;
584
585 /* The 0x80 provides a way for the tracing parent to distinguish
586 between a syscall stop and SIGTRAP delivery */
587 ptrace_notify(SIGTRAP | ((current->ptrace & PT_TRACESYSGOOD) ?
588 0x80 : 0));
589
590 /*
591 * this isn't the same as continuing with a signal, but it will do
592 * for normal use. strace only continues with a signal if the
593 * stopping signal is not SIGTRAP. -brl
594 */
595 if (current->exit_code) {
596 send_sig(current->exit_code, current, 1);
597 current->exit_code = 0;
598 }
599}