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/context_tracking.h>
19#include <linux/elf.h>
20#include <linux/kernel.h>
21#include <linux/sched.h>
22#include <linux/mm.h>
23#include <linux/errno.h>
24#include <linux/ptrace.h>
25#include <linux/regset.h>
26#include <linux/smp.h>
27#include <linux/security.h>
28#include <linux/stddef.h>
29#include <linux/tracehook.h>
30#include <linux/audit.h>
31#include <linux/seccomp.h>
32#include <linux/ftrace.h>
33
34#include <asm/byteorder.h>
35#include <asm/cpu.h>
36#include <asm/cpu-info.h>
37#include <asm/dsp.h>
38#include <asm/fpu.h>
39#include <asm/mipsregs.h>
40#include <asm/mipsmtregs.h>
41#include <asm/pgtable.h>
42#include <asm/page.h>
43#include <asm/syscall.h>
44#include <asm/uaccess.h>
45#include <asm/bootinfo.h>
46#include <asm/reg.h>
47
48#define CREATE_TRACE_POINTS
49#include <trace/events/syscalls.h>
50
51static void init_fp_ctx(struct task_struct *target)
52{
53 /* If FP has been used then the target already has context */
54 if (tsk_used_math(target))
55 return;
56
57 /* Begin with data registers set to all 1s... */
58 memset(&target->thread.fpu.fpr, ~0, sizeof(target->thread.fpu.fpr));
59
60 /* ...and FCSR zeroed */
61 target->thread.fpu.fcr31 = 0;
62
63 /*
64 * Record that the target has "used" math, such that the context
65 * just initialised, and any modifications made by the caller,
66 * aren't discarded.
67 */
68 set_stopped_child_used_math(target);
69}
70
71/*
72 * Called by kernel/ptrace.c when detaching..
73 *
74 * Make sure single step bits etc are not set.
75 */
76void ptrace_disable(struct task_struct *child)
77{
78 /* Don't load the watchpoint registers for the ex-child. */
79 clear_tsk_thread_flag(child, TIF_LOAD_WATCH);
80}
81
82/*
83 * Read a general register set. We always use the 64-bit format, even
84 * for 32-bit kernels and for 32-bit processes on a 64-bit kernel.
85 * Registers are sign extended to fill the available space.
86 */
87int ptrace_getregs(struct task_struct *child, struct user_pt_regs __user *data)
88{
89 struct pt_regs *regs;
90 int i;
91
92 if (!access_ok(VERIFY_WRITE, data, 38 * 8))
93 return -EIO;
94
95 regs = task_pt_regs(child);
96
97 for (i = 0; i < 32; i++)
98 __put_user((long)regs->regs[i], (__s64 __user *)&data->regs[i]);
99 __put_user((long)regs->lo, (__s64 __user *)&data->lo);
100 __put_user((long)regs->hi, (__s64 __user *)&data->hi);
101 __put_user((long)regs->cp0_epc, (__s64 __user *)&data->cp0_epc);
102 __put_user((long)regs->cp0_badvaddr, (__s64 __user *)&data->cp0_badvaddr);
103 __put_user((long)regs->cp0_status, (__s64 __user *)&data->cp0_status);
104 __put_user((long)regs->cp0_cause, (__s64 __user *)&data->cp0_cause);
105
106 return 0;
107}
108
109/*
110 * Write a general register set. As for PTRACE_GETREGS, we always use
111 * the 64-bit format. On a 32-bit kernel only the lower order half
112 * (according to endianness) will be used.
113 */
114int ptrace_setregs(struct task_struct *child, struct user_pt_regs __user *data)
115{
116 struct pt_regs *regs;
117 int i;
118
119 if (!access_ok(VERIFY_READ, data, 38 * 8))
120 return -EIO;
121
122 regs = task_pt_regs(child);
123
124 for (i = 0; i < 32; i++)
125 __get_user(regs->regs[i], (__s64 __user *)&data->regs[i]);
126 __get_user(regs->lo, (__s64 __user *)&data->lo);
127 __get_user(regs->hi, (__s64 __user *)&data->hi);
128 __get_user(regs->cp0_epc, (__s64 __user *)&data->cp0_epc);
129
130 /* badvaddr, status, and cause may not be written. */
131
132 return 0;
133}
134
135int ptrace_getfpregs(struct task_struct *child, __u32 __user *data)
136{
137 int i;
138
139 if (!access_ok(VERIFY_WRITE, data, 33 * 8))
140 return -EIO;
141
142 if (tsk_used_math(child)) {
143 union fpureg *fregs = get_fpu_regs(child);
144 for (i = 0; i < 32; i++)
145 __put_user(get_fpr64(&fregs[i], 0),
146 i + (__u64 __user *)data);
147 } else {
148 for (i = 0; i < 32; i++)
149 __put_user((__u64) -1, i + (__u64 __user *) data);
150 }
151
152 __put_user(child->thread.fpu.fcr31, data + 64);
153 __put_user(boot_cpu_data.fpu_id, data + 65);
154
155 return 0;
156}
157
158int ptrace_setfpregs(struct task_struct *child, __u32 __user *data)
159{
160 union fpureg *fregs;
161 u64 fpr_val;
162 u32 fcr31;
163 u32 value;
164 u32 mask;
165 int i;
166
167 if (!access_ok(VERIFY_READ, data, 33 * 8))
168 return -EIO;
169
170 init_fp_ctx(child);
171 fregs = get_fpu_regs(child);
172
173 for (i = 0; i < 32; i++) {
174 __get_user(fpr_val, i + (__u64 __user *)data);
175 set_fpr64(&fregs[i], 0, fpr_val);
176 }
177
178 __get_user(value, data + 64);
179 fcr31 = child->thread.fpu.fcr31;
180 mask = boot_cpu_data.fpu_msk31;
181 child->thread.fpu.fcr31 = (value & ~mask) | (fcr31 & mask);
182
183 /* FIR may not be written. */
184
185 return 0;
186}
187
188int ptrace_get_watch_regs(struct task_struct *child,
189 struct pt_watch_regs __user *addr)
190{
191 enum pt_watch_style style;
192 int i;
193
194 if (!cpu_has_watch || boot_cpu_data.watch_reg_use_cnt == 0)
195 return -EIO;
196 if (!access_ok(VERIFY_WRITE, addr, sizeof(struct pt_watch_regs)))
197 return -EIO;
198
199#ifdef CONFIG_32BIT
200 style = pt_watch_style_mips32;
201#define WATCH_STYLE mips32
202#else
203 style = pt_watch_style_mips64;
204#define WATCH_STYLE mips64
205#endif
206
207 __put_user(style, &addr->style);
208 __put_user(boot_cpu_data.watch_reg_use_cnt,
209 &addr->WATCH_STYLE.num_valid);
210 for (i = 0; i < boot_cpu_data.watch_reg_use_cnt; i++) {
211 __put_user(child->thread.watch.mips3264.watchlo[i],
212 &addr->WATCH_STYLE.watchlo[i]);
213 __put_user(child->thread.watch.mips3264.watchhi[i] & 0xfff,
214 &addr->WATCH_STYLE.watchhi[i]);
215 __put_user(boot_cpu_data.watch_reg_masks[i],
216 &addr->WATCH_STYLE.watch_masks[i]);
217 }
218 for (; i < 8; i++) {
219 __put_user(0, &addr->WATCH_STYLE.watchlo[i]);
220 __put_user(0, &addr->WATCH_STYLE.watchhi[i]);
221 __put_user(0, &addr->WATCH_STYLE.watch_masks[i]);
222 }
223
224 return 0;
225}
226
227int ptrace_set_watch_regs(struct task_struct *child,
228 struct pt_watch_regs __user *addr)
229{
230 int i;
231 int watch_active = 0;
232 unsigned long lt[NUM_WATCH_REGS];
233 u16 ht[NUM_WATCH_REGS];
234
235 if (!cpu_has_watch || boot_cpu_data.watch_reg_use_cnt == 0)
236 return -EIO;
237 if (!access_ok(VERIFY_READ, addr, sizeof(struct pt_watch_regs)))
238 return -EIO;
239 /* Check the values. */
240 for (i = 0; i < boot_cpu_data.watch_reg_use_cnt; i++) {
241 __get_user(lt[i], &addr->WATCH_STYLE.watchlo[i]);
242#ifdef CONFIG_32BIT
243 if (lt[i] & __UA_LIMIT)
244 return -EINVAL;
245#else
246 if (test_tsk_thread_flag(child, TIF_32BIT_ADDR)) {
247 if (lt[i] & 0xffffffff80000000UL)
248 return -EINVAL;
249 } else {
250 if (lt[i] & __UA_LIMIT)
251 return -EINVAL;
252 }
253#endif
254 __get_user(ht[i], &addr->WATCH_STYLE.watchhi[i]);
255 if (ht[i] & ~0xff8)
256 return -EINVAL;
257 }
258 /* Install them. */
259 for (i = 0; i < boot_cpu_data.watch_reg_use_cnt; i++) {
260 if (lt[i] & 7)
261 watch_active = 1;
262 child->thread.watch.mips3264.watchlo[i] = lt[i];
263 /* Set the G bit. */
264 child->thread.watch.mips3264.watchhi[i] = ht[i];
265 }
266
267 if (watch_active)
268 set_tsk_thread_flag(child, TIF_LOAD_WATCH);
269 else
270 clear_tsk_thread_flag(child, TIF_LOAD_WATCH);
271
272 return 0;
273}
274
275/* regset get/set implementations */
276
277#if defined(CONFIG_32BIT) || defined(CONFIG_MIPS32_O32)
278
279static int gpr32_get(struct task_struct *target,
280 const struct user_regset *regset,
281 unsigned int pos, unsigned int count,
282 void *kbuf, void __user *ubuf)
283{
284 struct pt_regs *regs = task_pt_regs(target);
285 u32 uregs[ELF_NGREG] = {};
286 unsigned i;
287
288 for (i = MIPS32_EF_R1; i <= MIPS32_EF_R31; i++) {
289 /* k0/k1 are copied as zero. */
290 if (i == MIPS32_EF_R26 || i == MIPS32_EF_R27)
291 continue;
292
293 uregs[i] = regs->regs[i - MIPS32_EF_R0];
294 }
295
296 uregs[MIPS32_EF_LO] = regs->lo;
297 uregs[MIPS32_EF_HI] = regs->hi;
298 uregs[MIPS32_EF_CP0_EPC] = regs->cp0_epc;
299 uregs[MIPS32_EF_CP0_BADVADDR] = regs->cp0_badvaddr;
300 uregs[MIPS32_EF_CP0_STATUS] = regs->cp0_status;
301 uregs[MIPS32_EF_CP0_CAUSE] = regs->cp0_cause;
302
303 return user_regset_copyout(&pos, &count, &kbuf, &ubuf, uregs, 0,
304 sizeof(uregs));
305}
306
307static int gpr32_set(struct task_struct *target,
308 const struct user_regset *regset,
309 unsigned int pos, unsigned int count,
310 const void *kbuf, const void __user *ubuf)
311{
312 struct pt_regs *regs = task_pt_regs(target);
313 u32 uregs[ELF_NGREG];
314 unsigned start, num_regs, i;
315 int err;
316
317 start = pos / sizeof(u32);
318 num_regs = count / sizeof(u32);
319
320 if (start + num_regs > ELF_NGREG)
321 return -EIO;
322
323 err = user_regset_copyin(&pos, &count, &kbuf, &ubuf, uregs, 0,
324 sizeof(uregs));
325 if (err)
326 return err;
327
328 for (i = start; i < num_regs; i++) {
329 /*
330 * Cast all values to signed here so that if this is a 64-bit
331 * kernel, the supplied 32-bit values will be sign extended.
332 */
333 switch (i) {
334 case MIPS32_EF_R1 ... MIPS32_EF_R25:
335 /* k0/k1 are ignored. */
336 case MIPS32_EF_R28 ... MIPS32_EF_R31:
337 regs->regs[i - MIPS32_EF_R0] = (s32)uregs[i];
338 break;
339 case MIPS32_EF_LO:
340 regs->lo = (s32)uregs[i];
341 break;
342 case MIPS32_EF_HI:
343 regs->hi = (s32)uregs[i];
344 break;
345 case MIPS32_EF_CP0_EPC:
346 regs->cp0_epc = (s32)uregs[i];
347 break;
348 }
349 }
350
351 return 0;
352}
353
354#endif /* CONFIG_32BIT || CONFIG_MIPS32_O32 */
355
356#ifdef CONFIG_64BIT
357
358static int gpr64_get(struct task_struct *target,
359 const struct user_regset *regset,
360 unsigned int pos, unsigned int count,
361 void *kbuf, void __user *ubuf)
362{
363 struct pt_regs *regs = task_pt_regs(target);
364 u64 uregs[ELF_NGREG] = {};
365 unsigned i;
366
367 for (i = MIPS64_EF_R1; i <= MIPS64_EF_R31; i++) {
368 /* k0/k1 are copied as zero. */
369 if (i == MIPS64_EF_R26 || i == MIPS64_EF_R27)
370 continue;
371
372 uregs[i] = regs->regs[i - MIPS64_EF_R0];
373 }
374
375 uregs[MIPS64_EF_LO] = regs->lo;
376 uregs[MIPS64_EF_HI] = regs->hi;
377 uregs[MIPS64_EF_CP0_EPC] = regs->cp0_epc;
378 uregs[MIPS64_EF_CP0_BADVADDR] = regs->cp0_badvaddr;
379 uregs[MIPS64_EF_CP0_STATUS] = regs->cp0_status;
380 uregs[MIPS64_EF_CP0_CAUSE] = regs->cp0_cause;
381
382 return user_regset_copyout(&pos, &count, &kbuf, &ubuf, uregs, 0,
383 sizeof(uregs));
384}
385
386static int gpr64_set(struct task_struct *target,
387 const struct user_regset *regset,
388 unsigned int pos, unsigned int count,
389 const void *kbuf, const void __user *ubuf)
390{
391 struct pt_regs *regs = task_pt_regs(target);
392 u64 uregs[ELF_NGREG];
393 unsigned start, num_regs, i;
394 int err;
395
396 start = pos / sizeof(u64);
397 num_regs = count / sizeof(u64);
398
399 if (start + num_regs > ELF_NGREG)
400 return -EIO;
401
402 err = user_regset_copyin(&pos, &count, &kbuf, &ubuf, uregs, 0,
403 sizeof(uregs));
404 if (err)
405 return err;
406
407 for (i = start; i < num_regs; i++) {
408 switch (i) {
409 case MIPS64_EF_R1 ... MIPS64_EF_R25:
410 /* k0/k1 are ignored. */
411 case MIPS64_EF_R28 ... MIPS64_EF_R31:
412 regs->regs[i - MIPS64_EF_R0] = uregs[i];
413 break;
414 case MIPS64_EF_LO:
415 regs->lo = uregs[i];
416 break;
417 case MIPS64_EF_HI:
418 regs->hi = uregs[i];
419 break;
420 case MIPS64_EF_CP0_EPC:
421 regs->cp0_epc = uregs[i];
422 break;
423 }
424 }
425
426 return 0;
427}
428
429#endif /* CONFIG_64BIT */
430
431static int fpr_get(struct task_struct *target,
432 const struct user_regset *regset,
433 unsigned int pos, unsigned int count,
434 void *kbuf, void __user *ubuf)
435{
436 unsigned i;
437 int err;
438 u64 fpr_val;
439
440 /* XXX fcr31 */
441
442 if (sizeof(target->thread.fpu.fpr[i]) == sizeof(elf_fpreg_t))
443 return user_regset_copyout(&pos, &count, &kbuf, &ubuf,
444 &target->thread.fpu,
445 0, sizeof(elf_fpregset_t));
446
447 for (i = 0; i < NUM_FPU_REGS; i++) {
448 fpr_val = get_fpr64(&target->thread.fpu.fpr[i], 0);
449 err = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
450 &fpr_val, i * sizeof(elf_fpreg_t),
451 (i + 1) * sizeof(elf_fpreg_t));
452 if (err)
453 return err;
454 }
455
456 return 0;
457}
458
459static int fpr_set(struct task_struct *target,
460 const struct user_regset *regset,
461 unsigned int pos, unsigned int count,
462 const void *kbuf, const void __user *ubuf)
463{
464 unsigned i;
465 int err;
466 u64 fpr_val;
467
468 /* XXX fcr31 */
469
470 init_fp_ctx(target);
471
472 if (sizeof(target->thread.fpu.fpr[i]) == sizeof(elf_fpreg_t))
473 return user_regset_copyin(&pos, &count, &kbuf, &ubuf,
474 &target->thread.fpu,
475 0, sizeof(elf_fpregset_t));
476
477 for (i = 0; i < NUM_FPU_REGS; i++) {
478 err = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
479 &fpr_val, i * sizeof(elf_fpreg_t),
480 (i + 1) * sizeof(elf_fpreg_t));
481 if (err)
482 return err;
483 set_fpr64(&target->thread.fpu.fpr[i], 0, fpr_val);
484 }
485
486 return 0;
487}
488
489enum mips_regset {
490 REGSET_GPR,
491 REGSET_FPR,
492};
493
494struct pt_regs_offset {
495 const char *name;
496 int offset;
497};
498
499#define REG_OFFSET_NAME(reg, r) { \
500 .name = #reg, \
501 .offset = offsetof(struct pt_regs, r) \
502}
503
504#define REG_OFFSET_END { \
505 .name = NULL, \
506 .offset = 0 \
507}
508
509static const struct pt_regs_offset regoffset_table[] = {
510 REG_OFFSET_NAME(r0, regs[0]),
511 REG_OFFSET_NAME(r1, regs[1]),
512 REG_OFFSET_NAME(r2, regs[2]),
513 REG_OFFSET_NAME(r3, regs[3]),
514 REG_OFFSET_NAME(r4, regs[4]),
515 REG_OFFSET_NAME(r5, regs[5]),
516 REG_OFFSET_NAME(r6, regs[6]),
517 REG_OFFSET_NAME(r7, regs[7]),
518 REG_OFFSET_NAME(r8, regs[8]),
519 REG_OFFSET_NAME(r9, regs[9]),
520 REG_OFFSET_NAME(r10, regs[10]),
521 REG_OFFSET_NAME(r11, regs[11]),
522 REG_OFFSET_NAME(r12, regs[12]),
523 REG_OFFSET_NAME(r13, regs[13]),
524 REG_OFFSET_NAME(r14, regs[14]),
525 REG_OFFSET_NAME(r15, regs[15]),
526 REG_OFFSET_NAME(r16, regs[16]),
527 REG_OFFSET_NAME(r17, regs[17]),
528 REG_OFFSET_NAME(r18, regs[18]),
529 REG_OFFSET_NAME(r19, regs[19]),
530 REG_OFFSET_NAME(r20, regs[20]),
531 REG_OFFSET_NAME(r21, regs[21]),
532 REG_OFFSET_NAME(r22, regs[22]),
533 REG_OFFSET_NAME(r23, regs[23]),
534 REG_OFFSET_NAME(r24, regs[24]),
535 REG_OFFSET_NAME(r25, regs[25]),
536 REG_OFFSET_NAME(r26, regs[26]),
537 REG_OFFSET_NAME(r27, regs[27]),
538 REG_OFFSET_NAME(r28, regs[28]),
539 REG_OFFSET_NAME(r29, regs[29]),
540 REG_OFFSET_NAME(r30, regs[30]),
541 REG_OFFSET_NAME(r31, regs[31]),
542 REG_OFFSET_NAME(c0_status, cp0_status),
543 REG_OFFSET_NAME(hi, hi),
544 REG_OFFSET_NAME(lo, lo),
545#ifdef CONFIG_CPU_HAS_SMARTMIPS
546 REG_OFFSET_NAME(acx, acx),
547#endif
548 REG_OFFSET_NAME(c0_badvaddr, cp0_badvaddr),
549 REG_OFFSET_NAME(c0_cause, cp0_cause),
550 REG_OFFSET_NAME(c0_epc, cp0_epc),
551#ifdef CONFIG_CPU_CAVIUM_OCTEON
552 REG_OFFSET_NAME(mpl0, mpl[0]),
553 REG_OFFSET_NAME(mpl1, mpl[1]),
554 REG_OFFSET_NAME(mpl2, mpl[2]),
555 REG_OFFSET_NAME(mtp0, mtp[0]),
556 REG_OFFSET_NAME(mtp1, mtp[1]),
557 REG_OFFSET_NAME(mtp2, mtp[2]),
558#endif
559 REG_OFFSET_END,
560};
561
562/**
563 * regs_query_register_offset() - query register offset from its name
564 * @name: the name of a register
565 *
566 * regs_query_register_offset() returns the offset of a register in struct
567 * pt_regs from its name. If the name is invalid, this returns -EINVAL;
568 */
569int regs_query_register_offset(const char *name)
570{
571 const struct pt_regs_offset *roff;
572 for (roff = regoffset_table; roff->name != NULL; roff++)
573 if (!strcmp(roff->name, name))
574 return roff->offset;
575 return -EINVAL;
576}
577
578#if defined(CONFIG_32BIT) || defined(CONFIG_MIPS32_O32)
579
580static const struct user_regset mips_regsets[] = {
581 [REGSET_GPR] = {
582 .core_note_type = NT_PRSTATUS,
583 .n = ELF_NGREG,
584 .size = sizeof(unsigned int),
585 .align = sizeof(unsigned int),
586 .get = gpr32_get,
587 .set = gpr32_set,
588 },
589 [REGSET_FPR] = {
590 .core_note_type = NT_PRFPREG,
591 .n = ELF_NFPREG,
592 .size = sizeof(elf_fpreg_t),
593 .align = sizeof(elf_fpreg_t),
594 .get = fpr_get,
595 .set = fpr_set,
596 },
597};
598
599static const struct user_regset_view user_mips_view = {
600 .name = "mips",
601 .e_machine = ELF_ARCH,
602 .ei_osabi = ELF_OSABI,
603 .regsets = mips_regsets,
604 .n = ARRAY_SIZE(mips_regsets),
605};
606
607#endif /* CONFIG_32BIT || CONFIG_MIPS32_O32 */
608
609#ifdef CONFIG_64BIT
610
611static const struct user_regset mips64_regsets[] = {
612 [REGSET_GPR] = {
613 .core_note_type = NT_PRSTATUS,
614 .n = ELF_NGREG,
615 .size = sizeof(unsigned long),
616 .align = sizeof(unsigned long),
617 .get = gpr64_get,
618 .set = gpr64_set,
619 },
620 [REGSET_FPR] = {
621 .core_note_type = NT_PRFPREG,
622 .n = ELF_NFPREG,
623 .size = sizeof(elf_fpreg_t),
624 .align = sizeof(elf_fpreg_t),
625 .get = fpr_get,
626 .set = fpr_set,
627 },
628};
629
630static const struct user_regset_view user_mips64_view = {
631 .name = "mips64",
632 .e_machine = ELF_ARCH,
633 .ei_osabi = ELF_OSABI,
634 .regsets = mips64_regsets,
635 .n = ARRAY_SIZE(mips64_regsets),
636};
637
638#endif /* CONFIG_64BIT */
639
640const struct user_regset_view *task_user_regset_view(struct task_struct *task)
641{
642#ifdef CONFIG_32BIT
643 return &user_mips_view;
644#else
645#ifdef CONFIG_MIPS32_O32
646 if (test_tsk_thread_flag(task, TIF_32BIT_REGS))
647 return &user_mips_view;
648#endif
649 return &user_mips64_view;
650#endif
651}
652
653long arch_ptrace(struct task_struct *child, long request,
654 unsigned long addr, unsigned long data)
655{
656 int ret;
657 void __user *addrp = (void __user *) addr;
658 void __user *datavp = (void __user *) data;
659 unsigned long __user *datalp = (void __user *) data;
660
661 switch (request) {
662 /* when I and D space are separate, these will need to be fixed. */
663 case PTRACE_PEEKTEXT: /* read word at location addr. */
664 case PTRACE_PEEKDATA:
665 ret = generic_ptrace_peekdata(child, addr, data);
666 break;
667
668 /* Read the word at location addr in the USER area. */
669 case PTRACE_PEEKUSR: {
670 struct pt_regs *regs;
671 union fpureg *fregs;
672 unsigned long tmp = 0;
673
674 regs = task_pt_regs(child);
675 ret = 0; /* Default return value. */
676
677 switch (addr) {
678 case 0 ... 31:
679 tmp = regs->regs[addr];
680 break;
681 case FPR_BASE ... FPR_BASE + 31:
682 if (!tsk_used_math(child)) {
683 /* FP not yet used */
684 tmp = -1;
685 break;
686 }
687 fregs = get_fpu_regs(child);
688
689#ifdef CONFIG_32BIT
690 if (test_thread_flag(TIF_32BIT_FPREGS)) {
691 /*
692 * The odd registers are actually the high
693 * order bits of the values stored in the even
694 * registers - unless we're using r2k_switch.S.
695 */
696 tmp = get_fpr32(&fregs[(addr & ~1) - FPR_BASE],
697 addr & 1);
698 break;
699 }
700#endif
701 tmp = get_fpr32(&fregs[addr - FPR_BASE], 0);
702 break;
703 case PC:
704 tmp = regs->cp0_epc;
705 break;
706 case CAUSE:
707 tmp = regs->cp0_cause;
708 break;
709 case BADVADDR:
710 tmp = regs->cp0_badvaddr;
711 break;
712 case MMHI:
713 tmp = regs->hi;
714 break;
715 case MMLO:
716 tmp = regs->lo;
717 break;
718#ifdef CONFIG_CPU_HAS_SMARTMIPS
719 case ACX:
720 tmp = regs->acx;
721 break;
722#endif
723 case FPC_CSR:
724 tmp = child->thread.fpu.fcr31;
725 break;
726 case FPC_EIR:
727 /* implementation / version register */
728 tmp = boot_cpu_data.fpu_id;
729 break;
730 case DSP_BASE ... DSP_BASE + 5: {
731 dspreg_t *dregs;
732
733 if (!cpu_has_dsp) {
734 tmp = 0;
735 ret = -EIO;
736 goto out;
737 }
738 dregs = __get_dsp_regs(child);
739 tmp = (unsigned long) (dregs[addr - DSP_BASE]);
740 break;
741 }
742 case DSP_CONTROL:
743 if (!cpu_has_dsp) {
744 tmp = 0;
745 ret = -EIO;
746 goto out;
747 }
748 tmp = child->thread.dsp.dspcontrol;
749 break;
750 default:
751 tmp = 0;
752 ret = -EIO;
753 goto out;
754 }
755 ret = put_user(tmp, datalp);
756 break;
757 }
758
759 /* when I and D space are separate, this will have to be fixed. */
760 case PTRACE_POKETEXT: /* write the word at location addr. */
761 case PTRACE_POKEDATA:
762 ret = generic_ptrace_pokedata(child, addr, data);
763 break;
764
765 case PTRACE_POKEUSR: {
766 struct pt_regs *regs;
767 ret = 0;
768 regs = task_pt_regs(child);
769
770 switch (addr) {
771 case 0 ... 31:
772 regs->regs[addr] = data;
773 break;
774 case FPR_BASE ... FPR_BASE + 31: {
775 union fpureg *fregs = get_fpu_regs(child);
776
777 init_fp_ctx(child);
778#ifdef CONFIG_32BIT
779 if (test_thread_flag(TIF_32BIT_FPREGS)) {
780 /*
781 * The odd registers are actually the high
782 * order bits of the values stored in the even
783 * registers - unless we're using r2k_switch.S.
784 */
785 set_fpr32(&fregs[(addr & ~1) - FPR_BASE],
786 addr & 1, data);
787 break;
788 }
789#endif
790 set_fpr64(&fregs[addr - FPR_BASE], 0, data);
791 break;
792 }
793 case PC:
794 regs->cp0_epc = data;
795 break;
796 case MMHI:
797 regs->hi = data;
798 break;
799 case MMLO:
800 regs->lo = data;
801 break;
802#ifdef CONFIG_CPU_HAS_SMARTMIPS
803 case ACX:
804 regs->acx = data;
805 break;
806#endif
807 case FPC_CSR:
808 child->thread.fpu.fcr31 = data & ~FPU_CSR_ALL_X;
809 break;
810 case DSP_BASE ... DSP_BASE + 5: {
811 dspreg_t *dregs;
812
813 if (!cpu_has_dsp) {
814 ret = -EIO;
815 break;
816 }
817
818 dregs = __get_dsp_regs(child);
819 dregs[addr - DSP_BASE] = data;
820 break;
821 }
822 case DSP_CONTROL:
823 if (!cpu_has_dsp) {
824 ret = -EIO;
825 break;
826 }
827 child->thread.dsp.dspcontrol = data;
828 break;
829 default:
830 /* The rest are not allowed. */
831 ret = -EIO;
832 break;
833 }
834 break;
835 }
836
837 case PTRACE_GETREGS:
838 ret = ptrace_getregs(child, datavp);
839 break;
840
841 case PTRACE_SETREGS:
842 ret = ptrace_setregs(child, datavp);
843 break;
844
845 case PTRACE_GETFPREGS:
846 ret = ptrace_getfpregs(child, datavp);
847 break;
848
849 case PTRACE_SETFPREGS:
850 ret = ptrace_setfpregs(child, datavp);
851 break;
852
853 case PTRACE_GET_THREAD_AREA:
854 ret = put_user(task_thread_info(child)->tp_value, datalp);
855 break;
856
857 case PTRACE_GET_WATCH_REGS:
858 ret = ptrace_get_watch_regs(child, addrp);
859 break;
860
861 case PTRACE_SET_WATCH_REGS:
862 ret = ptrace_set_watch_regs(child, addrp);
863 break;
864
865 default:
866 ret = ptrace_request(child, request, addr, data);
867 break;
868 }
869 out:
870 return ret;
871}
872
873/*
874 * Notification of system call entry/exit
875 * - triggered by current->work.syscall_trace
876 */
877asmlinkage long syscall_trace_enter(struct pt_regs *regs, long syscall)
878{
879 long ret = 0;
880 user_exit();
881
882 current_thread_info()->syscall = syscall;
883
884 if (secure_computing() == -1)
885 return -1;
886
887 if (test_thread_flag(TIF_SYSCALL_TRACE) &&
888 tracehook_report_syscall_entry(regs))
889 ret = -1;
890
891 if (unlikely(test_thread_flag(TIF_SYSCALL_TRACEPOINT)))
892 trace_sys_enter(regs, regs->regs[2]);
893
894 audit_syscall_entry(syscall, regs->regs[4], regs->regs[5],
895 regs->regs[6], regs->regs[7]);
896 return syscall;
897}
898
899/*
900 * Notification of system call entry/exit
901 * - triggered by current->work.syscall_trace
902 */
903asmlinkage void syscall_trace_leave(struct pt_regs *regs)
904{
905 /*
906 * We may come here right after calling schedule_user()
907 * or do_notify_resume(), in which case we can be in RCU
908 * user mode.
909 */
910 user_exit();
911
912 audit_syscall_exit(regs);
913
914 if (unlikely(test_thread_flag(TIF_SYSCALL_TRACEPOINT)))
915 trace_sys_exit(regs, regs->regs[2]);
916
917 if (test_thread_flag(TIF_SYSCALL_TRACE))
918 tracehook_report_syscall_exit(regs, 0);
919
920 user_enter();
921}
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/context_tracking.h>
19#include <linux/elf.h>
20#include <linux/kernel.h>
21#include <linux/sched.h>
22#include <linux/mm.h>
23#include <linux/errno.h>
24#include <linux/ptrace.h>
25#include <linux/regset.h>
26#include <linux/smp.h>
27#include <linux/security.h>
28#include <linux/stddef.h>
29#include <linux/tracehook.h>
30#include <linux/audit.h>
31#include <linux/seccomp.h>
32#include <linux/ftrace.h>
33
34#include <asm/byteorder.h>
35#include <asm/cpu.h>
36#include <asm/cpu-info.h>
37#include <asm/dsp.h>
38#include <asm/fpu.h>
39#include <asm/mipsregs.h>
40#include <asm/mipsmtregs.h>
41#include <asm/pgtable.h>
42#include <asm/page.h>
43#include <asm/syscall.h>
44#include <linux/uaccess.h>
45#include <asm/bootinfo.h>
46#include <asm/reg.h>
47
48#define CREATE_TRACE_POINTS
49#include <trace/events/syscalls.h>
50
51static void init_fp_ctx(struct task_struct *target)
52{
53 /* If FP has been used then the target already has context */
54 if (tsk_used_math(target))
55 return;
56
57 /* Begin with data registers set to all 1s... */
58 memset(&target->thread.fpu.fpr, ~0, sizeof(target->thread.fpu.fpr));
59
60 /* FCSR has been preset by `mips_set_personality_nan'. */
61
62 /*
63 * Record that the target has "used" math, such that the context
64 * just initialised, and any modifications made by the caller,
65 * aren't discarded.
66 */
67 set_stopped_child_used_math(target);
68}
69
70/*
71 * Called by kernel/ptrace.c when detaching..
72 *
73 * Make sure single step bits etc are not set.
74 */
75void ptrace_disable(struct task_struct *child)
76{
77 /* Don't load the watchpoint registers for the ex-child. */
78 clear_tsk_thread_flag(child, TIF_LOAD_WATCH);
79}
80
81/*
82 * Poke at FCSR according to its mask. Set the Cause bits even
83 * if a corresponding Enable bit is set. This will be noticed at
84 * the time the thread is switched to and SIGFPE thrown accordingly.
85 */
86static void ptrace_setfcr31(struct task_struct *child, u32 value)
87{
88 u32 fcr31;
89 u32 mask;
90
91 fcr31 = child->thread.fpu.fcr31;
92 mask = boot_cpu_data.fpu_msk31;
93 child->thread.fpu.fcr31 = (value & ~mask) | (fcr31 & mask);
94}
95
96/*
97 * Read a general register set. We always use the 64-bit format, even
98 * for 32-bit kernels and for 32-bit processes on a 64-bit kernel.
99 * Registers are sign extended to fill the available space.
100 */
101int ptrace_getregs(struct task_struct *child, struct user_pt_regs __user *data)
102{
103 struct pt_regs *regs;
104 int i;
105
106 if (!access_ok(VERIFY_WRITE, data, 38 * 8))
107 return -EIO;
108
109 regs = task_pt_regs(child);
110
111 for (i = 0; i < 32; i++)
112 __put_user((long)regs->regs[i], (__s64 __user *)&data->regs[i]);
113 __put_user((long)regs->lo, (__s64 __user *)&data->lo);
114 __put_user((long)regs->hi, (__s64 __user *)&data->hi);
115 __put_user((long)regs->cp0_epc, (__s64 __user *)&data->cp0_epc);
116 __put_user((long)regs->cp0_badvaddr, (__s64 __user *)&data->cp0_badvaddr);
117 __put_user((long)regs->cp0_status, (__s64 __user *)&data->cp0_status);
118 __put_user((long)regs->cp0_cause, (__s64 __user *)&data->cp0_cause);
119
120 return 0;
121}
122
123/*
124 * Write a general register set. As for PTRACE_GETREGS, we always use
125 * the 64-bit format. On a 32-bit kernel only the lower order half
126 * (according to endianness) will be used.
127 */
128int ptrace_setregs(struct task_struct *child, struct user_pt_regs __user *data)
129{
130 struct pt_regs *regs;
131 int i;
132
133 if (!access_ok(VERIFY_READ, data, 38 * 8))
134 return -EIO;
135
136 regs = task_pt_regs(child);
137
138 for (i = 0; i < 32; i++)
139 __get_user(regs->regs[i], (__s64 __user *)&data->regs[i]);
140 __get_user(regs->lo, (__s64 __user *)&data->lo);
141 __get_user(regs->hi, (__s64 __user *)&data->hi);
142 __get_user(regs->cp0_epc, (__s64 __user *)&data->cp0_epc);
143
144 /* badvaddr, status, and cause may not be written. */
145
146 return 0;
147}
148
149int ptrace_getfpregs(struct task_struct *child, __u32 __user *data)
150{
151 int i;
152
153 if (!access_ok(VERIFY_WRITE, data, 33 * 8))
154 return -EIO;
155
156 if (tsk_used_math(child)) {
157 union fpureg *fregs = get_fpu_regs(child);
158 for (i = 0; i < 32; i++)
159 __put_user(get_fpr64(&fregs[i], 0),
160 i + (__u64 __user *)data);
161 } else {
162 for (i = 0; i < 32; i++)
163 __put_user((__u64) -1, i + (__u64 __user *) data);
164 }
165
166 __put_user(child->thread.fpu.fcr31, data + 64);
167 __put_user(boot_cpu_data.fpu_id, data + 65);
168
169 return 0;
170}
171
172int ptrace_setfpregs(struct task_struct *child, __u32 __user *data)
173{
174 union fpureg *fregs;
175 u64 fpr_val;
176 u32 value;
177 int i;
178
179 if (!access_ok(VERIFY_READ, data, 33 * 8))
180 return -EIO;
181
182 init_fp_ctx(child);
183 fregs = get_fpu_regs(child);
184
185 for (i = 0; i < 32; i++) {
186 __get_user(fpr_val, i + (__u64 __user *)data);
187 set_fpr64(&fregs[i], 0, fpr_val);
188 }
189
190 __get_user(value, data + 64);
191 ptrace_setfcr31(child, value);
192
193 /* FIR may not be written. */
194
195 return 0;
196}
197
198int ptrace_get_watch_regs(struct task_struct *child,
199 struct pt_watch_regs __user *addr)
200{
201 enum pt_watch_style style;
202 int i;
203
204 if (!cpu_has_watch || boot_cpu_data.watch_reg_use_cnt == 0)
205 return -EIO;
206 if (!access_ok(VERIFY_WRITE, addr, sizeof(struct pt_watch_regs)))
207 return -EIO;
208
209#ifdef CONFIG_32BIT
210 style = pt_watch_style_mips32;
211#define WATCH_STYLE mips32
212#else
213 style = pt_watch_style_mips64;
214#define WATCH_STYLE mips64
215#endif
216
217 __put_user(style, &addr->style);
218 __put_user(boot_cpu_data.watch_reg_use_cnt,
219 &addr->WATCH_STYLE.num_valid);
220 for (i = 0; i < boot_cpu_data.watch_reg_use_cnt; i++) {
221 __put_user(child->thread.watch.mips3264.watchlo[i],
222 &addr->WATCH_STYLE.watchlo[i]);
223 __put_user(child->thread.watch.mips3264.watchhi[i] &
224 (MIPS_WATCHHI_MASK | MIPS_WATCHHI_IRW),
225 &addr->WATCH_STYLE.watchhi[i]);
226 __put_user(boot_cpu_data.watch_reg_masks[i],
227 &addr->WATCH_STYLE.watch_masks[i]);
228 }
229 for (; i < 8; i++) {
230 __put_user(0, &addr->WATCH_STYLE.watchlo[i]);
231 __put_user(0, &addr->WATCH_STYLE.watchhi[i]);
232 __put_user(0, &addr->WATCH_STYLE.watch_masks[i]);
233 }
234
235 return 0;
236}
237
238int ptrace_set_watch_regs(struct task_struct *child,
239 struct pt_watch_regs __user *addr)
240{
241 int i;
242 int watch_active = 0;
243 unsigned long lt[NUM_WATCH_REGS];
244 u16 ht[NUM_WATCH_REGS];
245
246 if (!cpu_has_watch || boot_cpu_data.watch_reg_use_cnt == 0)
247 return -EIO;
248 if (!access_ok(VERIFY_READ, addr, sizeof(struct pt_watch_regs)))
249 return -EIO;
250 /* Check the values. */
251 for (i = 0; i < boot_cpu_data.watch_reg_use_cnt; i++) {
252 __get_user(lt[i], &addr->WATCH_STYLE.watchlo[i]);
253#ifdef CONFIG_32BIT
254 if (lt[i] & __UA_LIMIT)
255 return -EINVAL;
256#else
257 if (test_tsk_thread_flag(child, TIF_32BIT_ADDR)) {
258 if (lt[i] & 0xffffffff80000000UL)
259 return -EINVAL;
260 } else {
261 if (lt[i] & __UA_LIMIT)
262 return -EINVAL;
263 }
264#endif
265 __get_user(ht[i], &addr->WATCH_STYLE.watchhi[i]);
266 if (ht[i] & ~MIPS_WATCHHI_MASK)
267 return -EINVAL;
268 }
269 /* Install them. */
270 for (i = 0; i < boot_cpu_data.watch_reg_use_cnt; i++) {
271 if (lt[i] & MIPS_WATCHLO_IRW)
272 watch_active = 1;
273 child->thread.watch.mips3264.watchlo[i] = lt[i];
274 /* Set the G bit. */
275 child->thread.watch.mips3264.watchhi[i] = ht[i];
276 }
277
278 if (watch_active)
279 set_tsk_thread_flag(child, TIF_LOAD_WATCH);
280 else
281 clear_tsk_thread_flag(child, TIF_LOAD_WATCH);
282
283 return 0;
284}
285
286/* regset get/set implementations */
287
288#if defined(CONFIG_32BIT) || defined(CONFIG_MIPS32_O32)
289
290static int gpr32_get(struct task_struct *target,
291 const struct user_regset *regset,
292 unsigned int pos, unsigned int count,
293 void *kbuf, void __user *ubuf)
294{
295 struct pt_regs *regs = task_pt_regs(target);
296 u32 uregs[ELF_NGREG] = {};
297 unsigned i;
298
299 for (i = MIPS32_EF_R1; i <= MIPS32_EF_R31; i++) {
300 /* k0/k1 are copied as zero. */
301 if (i == MIPS32_EF_R26 || i == MIPS32_EF_R27)
302 continue;
303
304 uregs[i] = regs->regs[i - MIPS32_EF_R0];
305 }
306
307 uregs[MIPS32_EF_LO] = regs->lo;
308 uregs[MIPS32_EF_HI] = regs->hi;
309 uregs[MIPS32_EF_CP0_EPC] = regs->cp0_epc;
310 uregs[MIPS32_EF_CP0_BADVADDR] = regs->cp0_badvaddr;
311 uregs[MIPS32_EF_CP0_STATUS] = regs->cp0_status;
312 uregs[MIPS32_EF_CP0_CAUSE] = regs->cp0_cause;
313
314 return user_regset_copyout(&pos, &count, &kbuf, &ubuf, uregs, 0,
315 sizeof(uregs));
316}
317
318static int gpr32_set(struct task_struct *target,
319 const struct user_regset *regset,
320 unsigned int pos, unsigned int count,
321 const void *kbuf, const void __user *ubuf)
322{
323 struct pt_regs *regs = task_pt_regs(target);
324 u32 uregs[ELF_NGREG];
325 unsigned start, num_regs, i;
326 int err;
327
328 start = pos / sizeof(u32);
329 num_regs = count / sizeof(u32);
330
331 if (start + num_regs > ELF_NGREG)
332 return -EIO;
333
334 err = user_regset_copyin(&pos, &count, &kbuf, &ubuf, uregs, 0,
335 sizeof(uregs));
336 if (err)
337 return err;
338
339 for (i = start; i < num_regs; i++) {
340 /*
341 * Cast all values to signed here so that if this is a 64-bit
342 * kernel, the supplied 32-bit values will be sign extended.
343 */
344 switch (i) {
345 case MIPS32_EF_R1 ... MIPS32_EF_R25:
346 /* k0/k1 are ignored. */
347 case MIPS32_EF_R28 ... MIPS32_EF_R31:
348 regs->regs[i - MIPS32_EF_R0] = (s32)uregs[i];
349 break;
350 case MIPS32_EF_LO:
351 regs->lo = (s32)uregs[i];
352 break;
353 case MIPS32_EF_HI:
354 regs->hi = (s32)uregs[i];
355 break;
356 case MIPS32_EF_CP0_EPC:
357 regs->cp0_epc = (s32)uregs[i];
358 break;
359 }
360 }
361
362 return 0;
363}
364
365#endif /* CONFIG_32BIT || CONFIG_MIPS32_O32 */
366
367#ifdef CONFIG_64BIT
368
369static int gpr64_get(struct task_struct *target,
370 const struct user_regset *regset,
371 unsigned int pos, unsigned int count,
372 void *kbuf, void __user *ubuf)
373{
374 struct pt_regs *regs = task_pt_regs(target);
375 u64 uregs[ELF_NGREG] = {};
376 unsigned i;
377
378 for (i = MIPS64_EF_R1; i <= MIPS64_EF_R31; i++) {
379 /* k0/k1 are copied as zero. */
380 if (i == MIPS64_EF_R26 || i == MIPS64_EF_R27)
381 continue;
382
383 uregs[i] = regs->regs[i - MIPS64_EF_R0];
384 }
385
386 uregs[MIPS64_EF_LO] = regs->lo;
387 uregs[MIPS64_EF_HI] = regs->hi;
388 uregs[MIPS64_EF_CP0_EPC] = regs->cp0_epc;
389 uregs[MIPS64_EF_CP0_BADVADDR] = regs->cp0_badvaddr;
390 uregs[MIPS64_EF_CP0_STATUS] = regs->cp0_status;
391 uregs[MIPS64_EF_CP0_CAUSE] = regs->cp0_cause;
392
393 return user_regset_copyout(&pos, &count, &kbuf, &ubuf, uregs, 0,
394 sizeof(uregs));
395}
396
397static int gpr64_set(struct task_struct *target,
398 const struct user_regset *regset,
399 unsigned int pos, unsigned int count,
400 const void *kbuf, const void __user *ubuf)
401{
402 struct pt_regs *regs = task_pt_regs(target);
403 u64 uregs[ELF_NGREG];
404 unsigned start, num_regs, i;
405 int err;
406
407 start = pos / sizeof(u64);
408 num_regs = count / sizeof(u64);
409
410 if (start + num_regs > ELF_NGREG)
411 return -EIO;
412
413 err = user_regset_copyin(&pos, &count, &kbuf, &ubuf, uregs, 0,
414 sizeof(uregs));
415 if (err)
416 return err;
417
418 for (i = start; i < num_regs; i++) {
419 switch (i) {
420 case MIPS64_EF_R1 ... MIPS64_EF_R25:
421 /* k0/k1 are ignored. */
422 case MIPS64_EF_R28 ... MIPS64_EF_R31:
423 regs->regs[i - MIPS64_EF_R0] = uregs[i];
424 break;
425 case MIPS64_EF_LO:
426 regs->lo = uregs[i];
427 break;
428 case MIPS64_EF_HI:
429 regs->hi = uregs[i];
430 break;
431 case MIPS64_EF_CP0_EPC:
432 regs->cp0_epc = uregs[i];
433 break;
434 }
435 }
436
437 return 0;
438}
439
440#endif /* CONFIG_64BIT */
441
442static int fpr_get(struct task_struct *target,
443 const struct user_regset *regset,
444 unsigned int pos, unsigned int count,
445 void *kbuf, void __user *ubuf)
446{
447 unsigned i;
448 int err;
449 u64 fpr_val;
450
451 /* XXX fcr31 */
452
453 if (sizeof(target->thread.fpu.fpr[i]) == sizeof(elf_fpreg_t))
454 return user_regset_copyout(&pos, &count, &kbuf, &ubuf,
455 &target->thread.fpu,
456 0, sizeof(elf_fpregset_t));
457
458 for (i = 0; i < NUM_FPU_REGS; i++) {
459 fpr_val = get_fpr64(&target->thread.fpu.fpr[i], 0);
460 err = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
461 &fpr_val, i * sizeof(elf_fpreg_t),
462 (i + 1) * sizeof(elf_fpreg_t));
463 if (err)
464 return err;
465 }
466
467 return 0;
468}
469
470static int fpr_set(struct task_struct *target,
471 const struct user_regset *regset,
472 unsigned int pos, unsigned int count,
473 const void *kbuf, const void __user *ubuf)
474{
475 unsigned i;
476 int err;
477 u64 fpr_val;
478
479 /* XXX fcr31 */
480
481 init_fp_ctx(target);
482
483 if (sizeof(target->thread.fpu.fpr[i]) == sizeof(elf_fpreg_t))
484 return user_regset_copyin(&pos, &count, &kbuf, &ubuf,
485 &target->thread.fpu,
486 0, sizeof(elf_fpregset_t));
487
488 BUILD_BUG_ON(sizeof(fpr_val) != sizeof(elf_fpreg_t));
489 for (i = 0; i < NUM_FPU_REGS && count >= sizeof(elf_fpreg_t); i++) {
490 err = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
491 &fpr_val, i * sizeof(elf_fpreg_t),
492 (i + 1) * sizeof(elf_fpreg_t));
493 if (err)
494 return err;
495 set_fpr64(&target->thread.fpu.fpr[i], 0, fpr_val);
496 }
497
498 return 0;
499}
500
501enum mips_regset {
502 REGSET_GPR,
503 REGSET_FPR,
504};
505
506struct pt_regs_offset {
507 const char *name;
508 int offset;
509};
510
511#define REG_OFFSET_NAME(reg, r) { \
512 .name = #reg, \
513 .offset = offsetof(struct pt_regs, r) \
514}
515
516#define REG_OFFSET_END { \
517 .name = NULL, \
518 .offset = 0 \
519}
520
521static const struct pt_regs_offset regoffset_table[] = {
522 REG_OFFSET_NAME(r0, regs[0]),
523 REG_OFFSET_NAME(r1, regs[1]),
524 REG_OFFSET_NAME(r2, regs[2]),
525 REG_OFFSET_NAME(r3, regs[3]),
526 REG_OFFSET_NAME(r4, regs[4]),
527 REG_OFFSET_NAME(r5, regs[5]),
528 REG_OFFSET_NAME(r6, regs[6]),
529 REG_OFFSET_NAME(r7, regs[7]),
530 REG_OFFSET_NAME(r8, regs[8]),
531 REG_OFFSET_NAME(r9, regs[9]),
532 REG_OFFSET_NAME(r10, regs[10]),
533 REG_OFFSET_NAME(r11, regs[11]),
534 REG_OFFSET_NAME(r12, regs[12]),
535 REG_OFFSET_NAME(r13, regs[13]),
536 REG_OFFSET_NAME(r14, regs[14]),
537 REG_OFFSET_NAME(r15, regs[15]),
538 REG_OFFSET_NAME(r16, regs[16]),
539 REG_OFFSET_NAME(r17, regs[17]),
540 REG_OFFSET_NAME(r18, regs[18]),
541 REG_OFFSET_NAME(r19, regs[19]),
542 REG_OFFSET_NAME(r20, regs[20]),
543 REG_OFFSET_NAME(r21, regs[21]),
544 REG_OFFSET_NAME(r22, regs[22]),
545 REG_OFFSET_NAME(r23, regs[23]),
546 REG_OFFSET_NAME(r24, regs[24]),
547 REG_OFFSET_NAME(r25, regs[25]),
548 REG_OFFSET_NAME(r26, regs[26]),
549 REG_OFFSET_NAME(r27, regs[27]),
550 REG_OFFSET_NAME(r28, regs[28]),
551 REG_OFFSET_NAME(r29, regs[29]),
552 REG_OFFSET_NAME(r30, regs[30]),
553 REG_OFFSET_NAME(r31, regs[31]),
554 REG_OFFSET_NAME(c0_status, cp0_status),
555 REG_OFFSET_NAME(hi, hi),
556 REG_OFFSET_NAME(lo, lo),
557#ifdef CONFIG_CPU_HAS_SMARTMIPS
558 REG_OFFSET_NAME(acx, acx),
559#endif
560 REG_OFFSET_NAME(c0_badvaddr, cp0_badvaddr),
561 REG_OFFSET_NAME(c0_cause, cp0_cause),
562 REG_OFFSET_NAME(c0_epc, cp0_epc),
563#ifdef CONFIG_CPU_CAVIUM_OCTEON
564 REG_OFFSET_NAME(mpl0, mpl[0]),
565 REG_OFFSET_NAME(mpl1, mpl[1]),
566 REG_OFFSET_NAME(mpl2, mpl[2]),
567 REG_OFFSET_NAME(mtp0, mtp[0]),
568 REG_OFFSET_NAME(mtp1, mtp[1]),
569 REG_OFFSET_NAME(mtp2, mtp[2]),
570#endif
571 REG_OFFSET_END,
572};
573
574/**
575 * regs_query_register_offset() - query register offset from its name
576 * @name: the name of a register
577 *
578 * regs_query_register_offset() returns the offset of a register in struct
579 * pt_regs from its name. If the name is invalid, this returns -EINVAL;
580 */
581int regs_query_register_offset(const char *name)
582{
583 const struct pt_regs_offset *roff;
584 for (roff = regoffset_table; roff->name != NULL; roff++)
585 if (!strcmp(roff->name, name))
586 return roff->offset;
587 return -EINVAL;
588}
589
590#if defined(CONFIG_32BIT) || defined(CONFIG_MIPS32_O32)
591
592static const struct user_regset mips_regsets[] = {
593 [REGSET_GPR] = {
594 .core_note_type = NT_PRSTATUS,
595 .n = ELF_NGREG,
596 .size = sizeof(unsigned int),
597 .align = sizeof(unsigned int),
598 .get = gpr32_get,
599 .set = gpr32_set,
600 },
601 [REGSET_FPR] = {
602 .core_note_type = NT_PRFPREG,
603 .n = ELF_NFPREG,
604 .size = sizeof(elf_fpreg_t),
605 .align = sizeof(elf_fpreg_t),
606 .get = fpr_get,
607 .set = fpr_set,
608 },
609};
610
611static const struct user_regset_view user_mips_view = {
612 .name = "mips",
613 .e_machine = ELF_ARCH,
614 .ei_osabi = ELF_OSABI,
615 .regsets = mips_regsets,
616 .n = ARRAY_SIZE(mips_regsets),
617};
618
619#endif /* CONFIG_32BIT || CONFIG_MIPS32_O32 */
620
621#ifdef CONFIG_64BIT
622
623static const struct user_regset mips64_regsets[] = {
624 [REGSET_GPR] = {
625 .core_note_type = NT_PRSTATUS,
626 .n = ELF_NGREG,
627 .size = sizeof(unsigned long),
628 .align = sizeof(unsigned long),
629 .get = gpr64_get,
630 .set = gpr64_set,
631 },
632 [REGSET_FPR] = {
633 .core_note_type = NT_PRFPREG,
634 .n = ELF_NFPREG,
635 .size = sizeof(elf_fpreg_t),
636 .align = sizeof(elf_fpreg_t),
637 .get = fpr_get,
638 .set = fpr_set,
639 },
640};
641
642static const struct user_regset_view user_mips64_view = {
643 .name = "mips64",
644 .e_machine = ELF_ARCH,
645 .ei_osabi = ELF_OSABI,
646 .regsets = mips64_regsets,
647 .n = ARRAY_SIZE(mips64_regsets),
648};
649
650#endif /* CONFIG_64BIT */
651
652const struct user_regset_view *task_user_regset_view(struct task_struct *task)
653{
654#ifdef CONFIG_32BIT
655 return &user_mips_view;
656#else
657#ifdef CONFIG_MIPS32_O32
658 if (test_tsk_thread_flag(task, TIF_32BIT_REGS))
659 return &user_mips_view;
660#endif
661 return &user_mips64_view;
662#endif
663}
664
665long arch_ptrace(struct task_struct *child, long request,
666 unsigned long addr, unsigned long data)
667{
668 int ret;
669 void __user *addrp = (void __user *) addr;
670 void __user *datavp = (void __user *) data;
671 unsigned long __user *datalp = (void __user *) data;
672
673 switch (request) {
674 /* when I and D space are separate, these will need to be fixed. */
675 case PTRACE_PEEKTEXT: /* read word at location addr. */
676 case PTRACE_PEEKDATA:
677 ret = generic_ptrace_peekdata(child, addr, data);
678 break;
679
680 /* Read the word at location addr in the USER area. */
681 case PTRACE_PEEKUSR: {
682 struct pt_regs *regs;
683 union fpureg *fregs;
684 unsigned long tmp = 0;
685
686 regs = task_pt_regs(child);
687 ret = 0; /* Default return value. */
688
689 switch (addr) {
690 case 0 ... 31:
691 tmp = regs->regs[addr];
692 break;
693 case FPR_BASE ... FPR_BASE + 31:
694 if (!tsk_used_math(child)) {
695 /* FP not yet used */
696 tmp = -1;
697 break;
698 }
699 fregs = get_fpu_regs(child);
700
701#ifdef CONFIG_32BIT
702 if (test_thread_flag(TIF_32BIT_FPREGS)) {
703 /*
704 * The odd registers are actually the high
705 * order bits of the values stored in the even
706 * registers - unless we're using r2k_switch.S.
707 */
708 tmp = get_fpr32(&fregs[(addr & ~1) - FPR_BASE],
709 addr & 1);
710 break;
711 }
712#endif
713 tmp = get_fpr32(&fregs[addr - FPR_BASE], 0);
714 break;
715 case PC:
716 tmp = regs->cp0_epc;
717 break;
718 case CAUSE:
719 tmp = regs->cp0_cause;
720 break;
721 case BADVADDR:
722 tmp = regs->cp0_badvaddr;
723 break;
724 case MMHI:
725 tmp = regs->hi;
726 break;
727 case MMLO:
728 tmp = regs->lo;
729 break;
730#ifdef CONFIG_CPU_HAS_SMARTMIPS
731 case ACX:
732 tmp = regs->acx;
733 break;
734#endif
735 case FPC_CSR:
736 tmp = child->thread.fpu.fcr31;
737 break;
738 case FPC_EIR:
739 /* implementation / version register */
740 tmp = boot_cpu_data.fpu_id;
741 break;
742 case DSP_BASE ... DSP_BASE + 5: {
743 dspreg_t *dregs;
744
745 if (!cpu_has_dsp) {
746 tmp = 0;
747 ret = -EIO;
748 goto out;
749 }
750 dregs = __get_dsp_regs(child);
751 tmp = (unsigned long) (dregs[addr - DSP_BASE]);
752 break;
753 }
754 case DSP_CONTROL:
755 if (!cpu_has_dsp) {
756 tmp = 0;
757 ret = -EIO;
758 goto out;
759 }
760 tmp = child->thread.dsp.dspcontrol;
761 break;
762 default:
763 tmp = 0;
764 ret = -EIO;
765 goto out;
766 }
767 ret = put_user(tmp, datalp);
768 break;
769 }
770
771 /* when I and D space are separate, this will have to be fixed. */
772 case PTRACE_POKETEXT: /* write the word at location addr. */
773 case PTRACE_POKEDATA:
774 ret = generic_ptrace_pokedata(child, addr, data);
775 break;
776
777 case PTRACE_POKEUSR: {
778 struct pt_regs *regs;
779 ret = 0;
780 regs = task_pt_regs(child);
781
782 switch (addr) {
783 case 0 ... 31:
784 regs->regs[addr] = data;
785 break;
786 case FPR_BASE ... FPR_BASE + 31: {
787 union fpureg *fregs = get_fpu_regs(child);
788
789 init_fp_ctx(child);
790#ifdef CONFIG_32BIT
791 if (test_thread_flag(TIF_32BIT_FPREGS)) {
792 /*
793 * The odd registers are actually the high
794 * order bits of the values stored in the even
795 * registers - unless we're using r2k_switch.S.
796 */
797 set_fpr32(&fregs[(addr & ~1) - FPR_BASE],
798 addr & 1, data);
799 break;
800 }
801#endif
802 set_fpr64(&fregs[addr - FPR_BASE], 0, data);
803 break;
804 }
805 case PC:
806 regs->cp0_epc = data;
807 break;
808 case MMHI:
809 regs->hi = data;
810 break;
811 case MMLO:
812 regs->lo = data;
813 break;
814#ifdef CONFIG_CPU_HAS_SMARTMIPS
815 case ACX:
816 regs->acx = data;
817 break;
818#endif
819 case FPC_CSR:
820 init_fp_ctx(child);
821 ptrace_setfcr31(child, data);
822 break;
823 case DSP_BASE ... DSP_BASE + 5: {
824 dspreg_t *dregs;
825
826 if (!cpu_has_dsp) {
827 ret = -EIO;
828 break;
829 }
830
831 dregs = __get_dsp_regs(child);
832 dregs[addr - DSP_BASE] = data;
833 break;
834 }
835 case DSP_CONTROL:
836 if (!cpu_has_dsp) {
837 ret = -EIO;
838 break;
839 }
840 child->thread.dsp.dspcontrol = data;
841 break;
842 default:
843 /* The rest are not allowed. */
844 ret = -EIO;
845 break;
846 }
847 break;
848 }
849
850 case PTRACE_GETREGS:
851 ret = ptrace_getregs(child, datavp);
852 break;
853
854 case PTRACE_SETREGS:
855 ret = ptrace_setregs(child, datavp);
856 break;
857
858 case PTRACE_GETFPREGS:
859 ret = ptrace_getfpregs(child, datavp);
860 break;
861
862 case PTRACE_SETFPREGS:
863 ret = ptrace_setfpregs(child, datavp);
864 break;
865
866 case PTRACE_GET_THREAD_AREA:
867 ret = put_user(task_thread_info(child)->tp_value, datalp);
868 break;
869
870 case PTRACE_GET_WATCH_REGS:
871 ret = ptrace_get_watch_regs(child, addrp);
872 break;
873
874 case PTRACE_SET_WATCH_REGS:
875 ret = ptrace_set_watch_regs(child, addrp);
876 break;
877
878 default:
879 ret = ptrace_request(child, request, addr, data);
880 break;
881 }
882 out:
883 return ret;
884}
885
886/*
887 * Notification of system call entry/exit
888 * - triggered by current->work.syscall_trace
889 */
890asmlinkage long syscall_trace_enter(struct pt_regs *regs, long syscall)
891{
892 user_exit();
893
894 current_thread_info()->syscall = syscall;
895
896 if (test_thread_flag(TIF_SYSCALL_TRACE) &&
897 tracehook_report_syscall_entry(regs))
898 return -1;
899
900 if (secure_computing(NULL) == -1)
901 return -1;
902
903 if (unlikely(test_thread_flag(TIF_SYSCALL_TRACEPOINT)))
904 trace_sys_enter(regs, regs->regs[2]);
905
906 audit_syscall_entry(syscall, regs->regs[4], regs->regs[5],
907 regs->regs[6], regs->regs[7]);
908 return syscall;
909}
910
911/*
912 * Notification of system call entry/exit
913 * - triggered by current->work.syscall_trace
914 */
915asmlinkage void syscall_trace_leave(struct pt_regs *regs)
916{
917 /*
918 * We may come here right after calling schedule_user()
919 * or do_notify_resume(), in which case we can be in RCU
920 * user mode.
921 */
922 user_exit();
923
924 audit_syscall_exit(regs);
925
926 if (unlikely(test_thread_flag(TIF_SYSCALL_TRACEPOINT)))
927 trace_sys_exit(regs, regs->regs[2]);
928
929 if (test_thread_flag(TIF_SYSCALL_TRACE))
930 tracehook_report_syscall_exit(regs, 0);
931
932 user_enter();
933}