Loading...
1/* ptrace.c: Sparc process tracing support.
2 *
3 * Copyright (C) 1996, 2008 David S. Miller (davem@davemloft.net)
4 * Copyright (C) 1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
5 *
6 * Based upon code written by Ross Biro, Linus Torvalds, Bob Manson,
7 * and David Mosberger.
8 *
9 * Added Linux support -miguel (weird, eh?, the original code was meant
10 * to emulate SunOS).
11 */
12
13#include <linux/kernel.h>
14#include <linux/sched.h>
15#include <linux/mm.h>
16#include <linux/errno.h>
17#include <linux/ptrace.h>
18#include <linux/user.h>
19#include <linux/smp.h>
20#include <linux/security.h>
21#include <linux/seccomp.h>
22#include <linux/audit.h>
23#include <linux/signal.h>
24#include <linux/regset.h>
25#include <linux/tracehook.h>
26#include <trace/syscall.h>
27#include <linux/compat.h>
28#include <linux/elf.h>
29
30#include <asm/asi.h>
31#include <asm/pgtable.h>
32#include <asm/uaccess.h>
33#include <asm/psrcompat.h>
34#include <asm/visasm.h>
35#include <asm/spitfire.h>
36#include <asm/page.h>
37#include <asm/cpudata.h>
38#include <asm/cacheflush.h>
39
40#define CREATE_TRACE_POINTS
41#include <trace/events/syscalls.h>
42
43#include "entry.h"
44
45/* #define ALLOW_INIT_TRACING */
46
47/*
48 * Called by kernel/ptrace.c when detaching..
49 *
50 * Make sure single step bits etc are not set.
51 */
52void ptrace_disable(struct task_struct *child)
53{
54 /* nothing to do */
55}
56
57/* To get the necessary page struct, access_process_vm() first calls
58 * get_user_pages(). This has done a flush_dcache_page() on the
59 * accessed page. Then our caller (copy_{to,from}_user_page()) did
60 * to memcpy to read/write the data from that page.
61 *
62 * Now, the only thing we have to do is:
63 * 1) flush the D-cache if it's possible than an illegal alias
64 * has been created
65 * 2) flush the I-cache if this is pre-cheetah and we did a write
66 */
67void flush_ptrace_access(struct vm_area_struct *vma, struct page *page,
68 unsigned long uaddr, void *kaddr,
69 unsigned long len, int write)
70{
71 BUG_ON(len > PAGE_SIZE);
72
73 if (tlb_type == hypervisor)
74 return;
75
76 preempt_disable();
77
78#ifdef DCACHE_ALIASING_POSSIBLE
79 /* If bit 13 of the kernel address we used to access the
80 * user page is the same as the virtual address that page
81 * is mapped to in the user's address space, we can skip the
82 * D-cache flush.
83 */
84 if ((uaddr ^ (unsigned long) kaddr) & (1UL << 13)) {
85 unsigned long start = __pa(kaddr);
86 unsigned long end = start + len;
87 unsigned long dcache_line_size;
88
89 dcache_line_size = local_cpu_data().dcache_line_size;
90
91 if (tlb_type == spitfire) {
92 for (; start < end; start += dcache_line_size)
93 spitfire_put_dcache_tag(start & 0x3fe0, 0x0);
94 } else {
95 start &= ~(dcache_line_size - 1);
96 for (; start < end; start += dcache_line_size)
97 __asm__ __volatile__(
98 "stxa %%g0, [%0] %1\n\t"
99 "membar #Sync"
100 : /* no outputs */
101 : "r" (start),
102 "i" (ASI_DCACHE_INVALIDATE));
103 }
104 }
105#endif
106 if (write && tlb_type == spitfire) {
107 unsigned long start = (unsigned long) kaddr;
108 unsigned long end = start + len;
109 unsigned long icache_line_size;
110
111 icache_line_size = local_cpu_data().icache_line_size;
112
113 for (; start < end; start += icache_line_size)
114 flushi(start);
115 }
116
117 preempt_enable();
118}
119
120static int get_from_target(struct task_struct *target, unsigned long uaddr,
121 void *kbuf, int len)
122{
123 if (target == current) {
124 if (copy_from_user(kbuf, (void __user *) uaddr, len))
125 return -EFAULT;
126 } else {
127 int len2 = access_process_vm(target, uaddr, kbuf, len, 0);
128 if (len2 != len)
129 return -EFAULT;
130 }
131 return 0;
132}
133
134static int set_to_target(struct task_struct *target, unsigned long uaddr,
135 void *kbuf, int len)
136{
137 if (target == current) {
138 if (copy_to_user((void __user *) uaddr, kbuf, len))
139 return -EFAULT;
140 } else {
141 int len2 = access_process_vm(target, uaddr, kbuf, len, 1);
142 if (len2 != len)
143 return -EFAULT;
144 }
145 return 0;
146}
147
148static int regwindow64_get(struct task_struct *target,
149 const struct pt_regs *regs,
150 struct reg_window *wbuf)
151{
152 unsigned long rw_addr = regs->u_regs[UREG_I6];
153
154 if (test_tsk_thread_flag(current, TIF_32BIT)) {
155 struct reg_window32 win32;
156 int i;
157
158 if (get_from_target(target, rw_addr, &win32, sizeof(win32)))
159 return -EFAULT;
160 for (i = 0; i < 8; i++)
161 wbuf->locals[i] = win32.locals[i];
162 for (i = 0; i < 8; i++)
163 wbuf->ins[i] = win32.ins[i];
164 } else {
165 rw_addr += STACK_BIAS;
166 if (get_from_target(target, rw_addr, wbuf, sizeof(*wbuf)))
167 return -EFAULT;
168 }
169
170 return 0;
171}
172
173static int regwindow64_set(struct task_struct *target,
174 const struct pt_regs *regs,
175 struct reg_window *wbuf)
176{
177 unsigned long rw_addr = regs->u_regs[UREG_I6];
178
179 if (test_tsk_thread_flag(current, TIF_32BIT)) {
180 struct reg_window32 win32;
181 int i;
182
183 for (i = 0; i < 8; i++)
184 win32.locals[i] = wbuf->locals[i];
185 for (i = 0; i < 8; i++)
186 win32.ins[i] = wbuf->ins[i];
187
188 if (set_to_target(target, rw_addr, &win32, sizeof(win32)))
189 return -EFAULT;
190 } else {
191 rw_addr += STACK_BIAS;
192 if (set_to_target(target, rw_addr, wbuf, sizeof(*wbuf)))
193 return -EFAULT;
194 }
195
196 return 0;
197}
198
199enum sparc_regset {
200 REGSET_GENERAL,
201 REGSET_FP,
202};
203
204static int genregs64_get(struct task_struct *target,
205 const struct user_regset *regset,
206 unsigned int pos, unsigned int count,
207 void *kbuf, void __user *ubuf)
208{
209 const struct pt_regs *regs = task_pt_regs(target);
210 int ret;
211
212 if (target == current)
213 flushw_user();
214
215 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
216 regs->u_regs,
217 0, 16 * sizeof(u64));
218 if (!ret && count && pos < (32 * sizeof(u64))) {
219 struct reg_window window;
220
221 if (regwindow64_get(target, regs, &window))
222 return -EFAULT;
223 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
224 &window,
225 16 * sizeof(u64),
226 32 * sizeof(u64));
227 }
228
229 if (!ret) {
230 /* TSTATE, TPC, TNPC */
231 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
232 ®s->tstate,
233 32 * sizeof(u64),
234 35 * sizeof(u64));
235 }
236
237 if (!ret) {
238 unsigned long y = regs->y;
239
240 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
241 &y,
242 35 * sizeof(u64),
243 36 * sizeof(u64));
244 }
245
246 if (!ret) {
247 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
248 36 * sizeof(u64), -1);
249
250 }
251 return ret;
252}
253
254static int genregs64_set(struct task_struct *target,
255 const struct user_regset *regset,
256 unsigned int pos, unsigned int count,
257 const void *kbuf, const void __user *ubuf)
258{
259 struct pt_regs *regs = task_pt_regs(target);
260 int ret;
261
262 if (target == current)
263 flushw_user();
264
265 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
266 regs->u_regs,
267 0, 16 * sizeof(u64));
268 if (!ret && count && pos < (32 * sizeof(u64))) {
269 struct reg_window window;
270
271 if (regwindow64_get(target, regs, &window))
272 return -EFAULT;
273
274 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
275 &window,
276 16 * sizeof(u64),
277 32 * sizeof(u64));
278
279 if (!ret &&
280 regwindow64_set(target, regs, &window))
281 return -EFAULT;
282 }
283
284 if (!ret && count > 0) {
285 unsigned long tstate;
286
287 /* TSTATE */
288 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
289 &tstate,
290 32 * sizeof(u64),
291 33 * sizeof(u64));
292 if (!ret) {
293 /* Only the condition codes and the "in syscall"
294 * state can be modified in the %tstate register.
295 */
296 tstate &= (TSTATE_ICC | TSTATE_XCC | TSTATE_SYSCALL);
297 regs->tstate &= ~(TSTATE_ICC | TSTATE_XCC | TSTATE_SYSCALL);
298 regs->tstate |= tstate;
299 }
300 }
301
302 if (!ret) {
303 /* TPC, TNPC */
304 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
305 ®s->tpc,
306 33 * sizeof(u64),
307 35 * sizeof(u64));
308 }
309
310 if (!ret) {
311 unsigned long y;
312
313 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
314 &y,
315 35 * sizeof(u64),
316 36 * sizeof(u64));
317 if (!ret)
318 regs->y = y;
319 }
320
321 if (!ret)
322 ret = user_regset_copyin_ignore(&pos, &count, &kbuf, &ubuf,
323 36 * sizeof(u64), -1);
324
325 return ret;
326}
327
328static int fpregs64_get(struct task_struct *target,
329 const struct user_regset *regset,
330 unsigned int pos, unsigned int count,
331 void *kbuf, void __user *ubuf)
332{
333 const unsigned long *fpregs = task_thread_info(target)->fpregs;
334 unsigned long fprs, fsr, gsr;
335 int ret;
336
337 if (target == current)
338 save_and_clear_fpu();
339
340 fprs = task_thread_info(target)->fpsaved[0];
341
342 if (fprs & FPRS_DL)
343 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
344 fpregs,
345 0, 16 * sizeof(u64));
346 else
347 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
348 0,
349 16 * sizeof(u64));
350
351 if (!ret) {
352 if (fprs & FPRS_DU)
353 ret = user_regset_copyout(&pos, &count,
354 &kbuf, &ubuf,
355 fpregs + 16,
356 16 * sizeof(u64),
357 32 * sizeof(u64));
358 else
359 ret = user_regset_copyout_zero(&pos, &count,
360 &kbuf, &ubuf,
361 16 * sizeof(u64),
362 32 * sizeof(u64));
363 }
364
365 if (fprs & FPRS_FEF) {
366 fsr = task_thread_info(target)->xfsr[0];
367 gsr = task_thread_info(target)->gsr[0];
368 } else {
369 fsr = gsr = 0;
370 }
371
372 if (!ret)
373 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
374 &fsr,
375 32 * sizeof(u64),
376 33 * sizeof(u64));
377 if (!ret)
378 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
379 &gsr,
380 33 * sizeof(u64),
381 34 * sizeof(u64));
382 if (!ret)
383 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
384 &fprs,
385 34 * sizeof(u64),
386 35 * sizeof(u64));
387
388 if (!ret)
389 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
390 35 * sizeof(u64), -1);
391
392 return ret;
393}
394
395static int fpregs64_set(struct task_struct *target,
396 const struct user_regset *regset,
397 unsigned int pos, unsigned int count,
398 const void *kbuf, const void __user *ubuf)
399{
400 unsigned long *fpregs = task_thread_info(target)->fpregs;
401 unsigned long fprs;
402 int ret;
403
404 if (target == current)
405 save_and_clear_fpu();
406
407 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
408 fpregs,
409 0, 32 * sizeof(u64));
410 if (!ret)
411 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
412 task_thread_info(target)->xfsr,
413 32 * sizeof(u64),
414 33 * sizeof(u64));
415 if (!ret)
416 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
417 task_thread_info(target)->gsr,
418 33 * sizeof(u64),
419 34 * sizeof(u64));
420
421 fprs = task_thread_info(target)->fpsaved[0];
422 if (!ret && count > 0) {
423 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
424 &fprs,
425 34 * sizeof(u64),
426 35 * sizeof(u64));
427 }
428
429 fprs |= (FPRS_FEF | FPRS_DL | FPRS_DU);
430 task_thread_info(target)->fpsaved[0] = fprs;
431
432 if (!ret)
433 ret = user_regset_copyin_ignore(&pos, &count, &kbuf, &ubuf,
434 35 * sizeof(u64), -1);
435 return ret;
436}
437
438static const struct user_regset sparc64_regsets[] = {
439 /* Format is:
440 * G0 --> G7
441 * O0 --> O7
442 * L0 --> L7
443 * I0 --> I7
444 * TSTATE, TPC, TNPC, Y
445 */
446 [REGSET_GENERAL] = {
447 .core_note_type = NT_PRSTATUS,
448 .n = 36,
449 .size = sizeof(u64), .align = sizeof(u64),
450 .get = genregs64_get, .set = genregs64_set
451 },
452 /* Format is:
453 * F0 --> F63
454 * FSR
455 * GSR
456 * FPRS
457 */
458 [REGSET_FP] = {
459 .core_note_type = NT_PRFPREG,
460 .n = 35,
461 .size = sizeof(u64), .align = sizeof(u64),
462 .get = fpregs64_get, .set = fpregs64_set
463 },
464};
465
466static const struct user_regset_view user_sparc64_view = {
467 .name = "sparc64", .e_machine = EM_SPARCV9,
468 .regsets = sparc64_regsets, .n = ARRAY_SIZE(sparc64_regsets)
469};
470
471#ifdef CONFIG_COMPAT
472static int genregs32_get(struct task_struct *target,
473 const struct user_regset *regset,
474 unsigned int pos, unsigned int count,
475 void *kbuf, void __user *ubuf)
476{
477 const struct pt_regs *regs = task_pt_regs(target);
478 compat_ulong_t __user *reg_window;
479 compat_ulong_t *k = kbuf;
480 compat_ulong_t __user *u = ubuf;
481 compat_ulong_t reg;
482
483 if (target == current)
484 flushw_user();
485
486 pos /= sizeof(reg);
487 count /= sizeof(reg);
488
489 if (kbuf) {
490 for (; count > 0 && pos < 16; count--)
491 *k++ = regs->u_regs[pos++];
492
493 reg_window = (compat_ulong_t __user *) regs->u_regs[UREG_I6];
494 reg_window -= 16;
495 if (target == current) {
496 for (; count > 0 && pos < 32; count--) {
497 if (get_user(*k++, ®_window[pos++]))
498 return -EFAULT;
499 }
500 } else {
501 for (; count > 0 && pos < 32; count--) {
502 if (access_process_vm(target,
503 (unsigned long)
504 ®_window[pos],
505 k, sizeof(*k), 0)
506 != sizeof(*k))
507 return -EFAULT;
508 k++;
509 pos++;
510 }
511 }
512 } else {
513 for (; count > 0 && pos < 16; count--) {
514 if (put_user((compat_ulong_t) regs->u_regs[pos++], u++))
515 return -EFAULT;
516 }
517
518 reg_window = (compat_ulong_t __user *) regs->u_regs[UREG_I6];
519 reg_window -= 16;
520 if (target == current) {
521 for (; count > 0 && pos < 32; count--) {
522 if (get_user(reg, ®_window[pos++]) ||
523 put_user(reg, u++))
524 return -EFAULT;
525 }
526 } else {
527 for (; count > 0 && pos < 32; count--) {
528 if (access_process_vm(target,
529 (unsigned long)
530 ®_window[pos],
531 ®, sizeof(reg), 0)
532 != sizeof(reg))
533 return -EFAULT;
534 if (access_process_vm(target,
535 (unsigned long) u,
536 ®, sizeof(reg), 1)
537 != sizeof(reg))
538 return -EFAULT;
539 pos++;
540 u++;
541 }
542 }
543 }
544 while (count > 0) {
545 switch (pos) {
546 case 32: /* PSR */
547 reg = tstate_to_psr(regs->tstate);
548 break;
549 case 33: /* PC */
550 reg = regs->tpc;
551 break;
552 case 34: /* NPC */
553 reg = regs->tnpc;
554 break;
555 case 35: /* Y */
556 reg = regs->y;
557 break;
558 case 36: /* WIM */
559 case 37: /* TBR */
560 reg = 0;
561 break;
562 default:
563 goto finish;
564 }
565
566 if (kbuf)
567 *k++ = reg;
568 else if (put_user(reg, u++))
569 return -EFAULT;
570 pos++;
571 count--;
572 }
573finish:
574 pos *= sizeof(reg);
575 count *= sizeof(reg);
576
577 return user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
578 38 * sizeof(reg), -1);
579}
580
581static int genregs32_set(struct task_struct *target,
582 const struct user_regset *regset,
583 unsigned int pos, unsigned int count,
584 const void *kbuf, const void __user *ubuf)
585{
586 struct pt_regs *regs = task_pt_regs(target);
587 compat_ulong_t __user *reg_window;
588 const compat_ulong_t *k = kbuf;
589 const compat_ulong_t __user *u = ubuf;
590 compat_ulong_t reg;
591
592 if (target == current)
593 flushw_user();
594
595 pos /= sizeof(reg);
596 count /= sizeof(reg);
597
598 if (kbuf) {
599 for (; count > 0 && pos < 16; count--)
600 regs->u_regs[pos++] = *k++;
601
602 reg_window = (compat_ulong_t __user *) regs->u_regs[UREG_I6];
603 reg_window -= 16;
604 if (target == current) {
605 for (; count > 0 && pos < 32; count--) {
606 if (put_user(*k++, ®_window[pos++]))
607 return -EFAULT;
608 }
609 } else {
610 for (; count > 0 && pos < 32; count--) {
611 if (access_process_vm(target,
612 (unsigned long)
613 ®_window[pos],
614 (void *) k,
615 sizeof(*k), 1)
616 != sizeof(*k))
617 return -EFAULT;
618 k++;
619 pos++;
620 }
621 }
622 } else {
623 for (; count > 0 && pos < 16; count--) {
624 if (get_user(reg, u++))
625 return -EFAULT;
626 regs->u_regs[pos++] = reg;
627 }
628
629 reg_window = (compat_ulong_t __user *) regs->u_regs[UREG_I6];
630 reg_window -= 16;
631 if (target == current) {
632 for (; count > 0 && pos < 32; count--) {
633 if (get_user(reg, u++) ||
634 put_user(reg, ®_window[pos++]))
635 return -EFAULT;
636 }
637 } else {
638 for (; count > 0 && pos < 32; count--) {
639 if (access_process_vm(target,
640 (unsigned long)
641 u,
642 ®, sizeof(reg), 0)
643 != sizeof(reg))
644 return -EFAULT;
645 if (access_process_vm(target,
646 (unsigned long)
647 ®_window[pos],
648 ®, sizeof(reg), 1)
649 != sizeof(reg))
650 return -EFAULT;
651 pos++;
652 u++;
653 }
654 }
655 }
656 while (count > 0) {
657 unsigned long tstate;
658
659 if (kbuf)
660 reg = *k++;
661 else if (get_user(reg, u++))
662 return -EFAULT;
663
664 switch (pos) {
665 case 32: /* PSR */
666 tstate = regs->tstate;
667 tstate &= ~(TSTATE_ICC | TSTATE_XCC | TSTATE_SYSCALL);
668 tstate |= psr_to_tstate_icc(reg);
669 if (reg & PSR_SYSCALL)
670 tstate |= TSTATE_SYSCALL;
671 regs->tstate = tstate;
672 break;
673 case 33: /* PC */
674 regs->tpc = reg;
675 break;
676 case 34: /* NPC */
677 regs->tnpc = reg;
678 break;
679 case 35: /* Y */
680 regs->y = reg;
681 break;
682 case 36: /* WIM */
683 case 37: /* TBR */
684 break;
685 default:
686 goto finish;
687 }
688
689 pos++;
690 count--;
691 }
692finish:
693 pos *= sizeof(reg);
694 count *= sizeof(reg);
695
696 return user_regset_copyin_ignore(&pos, &count, &kbuf, &ubuf,
697 38 * sizeof(reg), -1);
698}
699
700static int fpregs32_get(struct task_struct *target,
701 const struct user_regset *regset,
702 unsigned int pos, unsigned int count,
703 void *kbuf, void __user *ubuf)
704{
705 const unsigned long *fpregs = task_thread_info(target)->fpregs;
706 compat_ulong_t enabled;
707 unsigned long fprs;
708 compat_ulong_t fsr;
709 int ret = 0;
710
711 if (target == current)
712 save_and_clear_fpu();
713
714 fprs = task_thread_info(target)->fpsaved[0];
715 if (fprs & FPRS_FEF) {
716 fsr = task_thread_info(target)->xfsr[0];
717 enabled = 1;
718 } else {
719 fsr = 0;
720 enabled = 0;
721 }
722
723 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
724 fpregs,
725 0, 32 * sizeof(u32));
726
727 if (!ret)
728 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
729 32 * sizeof(u32),
730 33 * sizeof(u32));
731 if (!ret)
732 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
733 &fsr,
734 33 * sizeof(u32),
735 34 * sizeof(u32));
736
737 if (!ret) {
738 compat_ulong_t val;
739
740 val = (enabled << 8) | (8 << 16);
741 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
742 &val,
743 34 * sizeof(u32),
744 35 * sizeof(u32));
745 }
746
747 if (!ret)
748 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
749 35 * sizeof(u32), -1);
750
751 return ret;
752}
753
754static int fpregs32_set(struct task_struct *target,
755 const struct user_regset *regset,
756 unsigned int pos, unsigned int count,
757 const void *kbuf, const void __user *ubuf)
758{
759 unsigned long *fpregs = task_thread_info(target)->fpregs;
760 unsigned long fprs;
761 int ret;
762
763 if (target == current)
764 save_and_clear_fpu();
765
766 fprs = task_thread_info(target)->fpsaved[0];
767
768 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
769 fpregs,
770 0, 32 * sizeof(u32));
771 if (!ret)
772 user_regset_copyin_ignore(&pos, &count, &kbuf, &ubuf,
773 32 * sizeof(u32),
774 33 * sizeof(u32));
775 if (!ret && count > 0) {
776 compat_ulong_t fsr;
777 unsigned long val;
778
779 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
780 &fsr,
781 33 * sizeof(u32),
782 34 * sizeof(u32));
783 if (!ret) {
784 val = task_thread_info(target)->xfsr[0];
785 val &= 0xffffffff00000000UL;
786 val |= fsr;
787 task_thread_info(target)->xfsr[0] = val;
788 }
789 }
790
791 fprs |= (FPRS_FEF | FPRS_DL);
792 task_thread_info(target)->fpsaved[0] = fprs;
793
794 if (!ret)
795 ret = user_regset_copyin_ignore(&pos, &count, &kbuf, &ubuf,
796 34 * sizeof(u32), -1);
797 return ret;
798}
799
800static const struct user_regset sparc32_regsets[] = {
801 /* Format is:
802 * G0 --> G7
803 * O0 --> O7
804 * L0 --> L7
805 * I0 --> I7
806 * PSR, PC, nPC, Y, WIM, TBR
807 */
808 [REGSET_GENERAL] = {
809 .core_note_type = NT_PRSTATUS,
810 .n = 38,
811 .size = sizeof(u32), .align = sizeof(u32),
812 .get = genregs32_get, .set = genregs32_set
813 },
814 /* Format is:
815 * F0 --> F31
816 * empty 32-bit word
817 * FSR (32--bit word)
818 * FPU QUEUE COUNT (8-bit char)
819 * FPU QUEUE ENTRYSIZE (8-bit char)
820 * FPU ENABLED (8-bit char)
821 * empty 8-bit char
822 * FPU QUEUE (64 32-bit ints)
823 */
824 [REGSET_FP] = {
825 .core_note_type = NT_PRFPREG,
826 .n = 99,
827 .size = sizeof(u32), .align = sizeof(u32),
828 .get = fpregs32_get, .set = fpregs32_set
829 },
830};
831
832static const struct user_regset_view user_sparc32_view = {
833 .name = "sparc", .e_machine = EM_SPARC,
834 .regsets = sparc32_regsets, .n = ARRAY_SIZE(sparc32_regsets)
835};
836#endif /* CONFIG_COMPAT */
837
838const struct user_regset_view *task_user_regset_view(struct task_struct *task)
839{
840#ifdef CONFIG_COMPAT
841 if (test_tsk_thread_flag(task, TIF_32BIT))
842 return &user_sparc32_view;
843#endif
844 return &user_sparc64_view;
845}
846
847#ifdef CONFIG_COMPAT
848struct compat_fps {
849 unsigned int regs[32];
850 unsigned int fsr;
851 unsigned int flags;
852 unsigned int extra;
853 unsigned int fpqd;
854 struct compat_fq {
855 unsigned int insnaddr;
856 unsigned int insn;
857 } fpq[16];
858};
859
860long compat_arch_ptrace(struct task_struct *child, compat_long_t request,
861 compat_ulong_t caddr, compat_ulong_t cdata)
862{
863 const struct user_regset_view *view = task_user_regset_view(current);
864 compat_ulong_t caddr2 = task_pt_regs(current)->u_regs[UREG_I4];
865 struct pt_regs32 __user *pregs;
866 struct compat_fps __user *fps;
867 unsigned long addr2 = caddr2;
868 unsigned long addr = caddr;
869 unsigned long data = cdata;
870 int ret;
871
872 pregs = (struct pt_regs32 __user *) addr;
873 fps = (struct compat_fps __user *) addr;
874
875 switch (request) {
876 case PTRACE_PEEKUSR:
877 ret = (addr != 0) ? -EIO : 0;
878 break;
879
880 case PTRACE_GETREGS:
881 ret = copy_regset_to_user(child, view, REGSET_GENERAL,
882 32 * sizeof(u32),
883 4 * sizeof(u32),
884 &pregs->psr);
885 if (!ret)
886 ret = copy_regset_to_user(child, view, REGSET_GENERAL,
887 1 * sizeof(u32),
888 15 * sizeof(u32),
889 &pregs->u_regs[0]);
890 break;
891
892 case PTRACE_SETREGS:
893 ret = copy_regset_from_user(child, view, REGSET_GENERAL,
894 32 * sizeof(u32),
895 4 * sizeof(u32),
896 &pregs->psr);
897 if (!ret)
898 ret = copy_regset_from_user(child, view, REGSET_GENERAL,
899 1 * sizeof(u32),
900 15 * sizeof(u32),
901 &pregs->u_regs[0]);
902 break;
903
904 case PTRACE_GETFPREGS:
905 ret = copy_regset_to_user(child, view, REGSET_FP,
906 0 * sizeof(u32),
907 32 * sizeof(u32),
908 &fps->regs[0]);
909 if (!ret)
910 ret = copy_regset_to_user(child, view, REGSET_FP,
911 33 * sizeof(u32),
912 1 * sizeof(u32),
913 &fps->fsr);
914 if (!ret) {
915 if (__put_user(0, &fps->flags) ||
916 __put_user(0, &fps->extra) ||
917 __put_user(0, &fps->fpqd) ||
918 clear_user(&fps->fpq[0], 32 * sizeof(unsigned int)))
919 ret = -EFAULT;
920 }
921 break;
922
923 case PTRACE_SETFPREGS:
924 ret = copy_regset_from_user(child, view, REGSET_FP,
925 0 * sizeof(u32),
926 32 * sizeof(u32),
927 &fps->regs[0]);
928 if (!ret)
929 ret = copy_regset_from_user(child, view, REGSET_FP,
930 33 * sizeof(u32),
931 1 * sizeof(u32),
932 &fps->fsr);
933 break;
934
935 case PTRACE_READTEXT:
936 case PTRACE_READDATA:
937 ret = ptrace_readdata(child, addr,
938 (char __user *)addr2, data);
939 if (ret == data)
940 ret = 0;
941 else if (ret >= 0)
942 ret = -EIO;
943 break;
944
945 case PTRACE_WRITETEXT:
946 case PTRACE_WRITEDATA:
947 ret = ptrace_writedata(child, (char __user *) addr2,
948 addr, data);
949 if (ret == data)
950 ret = 0;
951 else if (ret >= 0)
952 ret = -EIO;
953 break;
954
955 default:
956 if (request == PTRACE_SPARC_DETACH)
957 request = PTRACE_DETACH;
958 ret = compat_ptrace_request(child, request, addr, data);
959 break;
960 }
961
962 return ret;
963}
964#endif /* CONFIG_COMPAT */
965
966struct fps {
967 unsigned int regs[64];
968 unsigned long fsr;
969};
970
971long arch_ptrace(struct task_struct *child, long request,
972 unsigned long addr, unsigned long data)
973{
974 const struct user_regset_view *view = task_user_regset_view(current);
975 unsigned long addr2 = task_pt_regs(current)->u_regs[UREG_I4];
976 struct pt_regs __user *pregs;
977 struct fps __user *fps;
978 void __user *addr2p;
979 int ret;
980
981 pregs = (struct pt_regs __user *) addr;
982 fps = (struct fps __user *) addr;
983 addr2p = (void __user *) addr2;
984
985 switch (request) {
986 case PTRACE_PEEKUSR:
987 ret = (addr != 0) ? -EIO : 0;
988 break;
989
990 case PTRACE_GETREGS64:
991 ret = copy_regset_to_user(child, view, REGSET_GENERAL,
992 1 * sizeof(u64),
993 15 * sizeof(u64),
994 &pregs->u_regs[0]);
995 if (!ret) {
996 /* XXX doesn't handle 'y' register correctly XXX */
997 ret = copy_regset_to_user(child, view, REGSET_GENERAL,
998 32 * sizeof(u64),
999 4 * sizeof(u64),
1000 &pregs->tstate);
1001 }
1002 break;
1003
1004 case PTRACE_SETREGS64:
1005 ret = copy_regset_from_user(child, view, REGSET_GENERAL,
1006 1 * sizeof(u64),
1007 15 * sizeof(u64),
1008 &pregs->u_regs[0]);
1009 if (!ret) {
1010 /* XXX doesn't handle 'y' register correctly XXX */
1011 ret = copy_regset_from_user(child, view, REGSET_GENERAL,
1012 32 * sizeof(u64),
1013 4 * sizeof(u64),
1014 &pregs->tstate);
1015 }
1016 break;
1017
1018 case PTRACE_GETFPREGS64:
1019 ret = copy_regset_to_user(child, view, REGSET_FP,
1020 0 * sizeof(u64),
1021 33 * sizeof(u64),
1022 fps);
1023 break;
1024
1025 case PTRACE_SETFPREGS64:
1026 ret = copy_regset_from_user(child, view, REGSET_FP,
1027 0 * sizeof(u64),
1028 33 * sizeof(u64),
1029 fps);
1030 break;
1031
1032 case PTRACE_READTEXT:
1033 case PTRACE_READDATA:
1034 ret = ptrace_readdata(child, addr, addr2p, data);
1035 if (ret == data)
1036 ret = 0;
1037 else if (ret >= 0)
1038 ret = -EIO;
1039 break;
1040
1041 case PTRACE_WRITETEXT:
1042 case PTRACE_WRITEDATA:
1043 ret = ptrace_writedata(child, addr2p, addr, data);
1044 if (ret == data)
1045 ret = 0;
1046 else if (ret >= 0)
1047 ret = -EIO;
1048 break;
1049
1050 default:
1051 if (request == PTRACE_SPARC_DETACH)
1052 request = PTRACE_DETACH;
1053 ret = ptrace_request(child, request, addr, data);
1054 break;
1055 }
1056
1057 return ret;
1058}
1059
1060asmlinkage int syscall_trace_enter(struct pt_regs *regs)
1061{
1062 int ret = 0;
1063
1064 /* do the secure computing check first */
1065 secure_computing_strict(regs->u_regs[UREG_G1]);
1066
1067 if (test_thread_flag(TIF_SYSCALL_TRACE))
1068 ret = tracehook_report_syscall_entry(regs);
1069
1070 if (unlikely(test_thread_flag(TIF_SYSCALL_TRACEPOINT)))
1071 trace_sys_enter(regs, regs->u_regs[UREG_G1]);
1072
1073 audit_syscall_entry((test_thread_flag(TIF_32BIT) ?
1074 AUDIT_ARCH_SPARC :
1075 AUDIT_ARCH_SPARC64),
1076 regs->u_regs[UREG_G1],
1077 regs->u_regs[UREG_I0],
1078 regs->u_regs[UREG_I1],
1079 regs->u_regs[UREG_I2],
1080 regs->u_regs[UREG_I3]);
1081
1082 return ret;
1083}
1084
1085asmlinkage void syscall_trace_leave(struct pt_regs *regs)
1086{
1087 audit_syscall_exit(regs);
1088
1089 if (unlikely(test_thread_flag(TIF_SYSCALL_TRACEPOINT)))
1090 trace_sys_exit(regs, regs->u_regs[UREG_G1]);
1091
1092 if (test_thread_flag(TIF_SYSCALL_TRACE))
1093 tracehook_report_syscall_exit(regs, 0);
1094}
1/* ptrace.c: Sparc process tracing support.
2 *
3 * Copyright (C) 1996, 2008 David S. Miller (davem@davemloft.net)
4 * Copyright (C) 1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
5 *
6 * Based upon code written by Ross Biro, Linus Torvalds, Bob Manson,
7 * and David Mosberger.
8 *
9 * Added Linux support -miguel (weird, eh?, the original code was meant
10 * to emulate SunOS).
11 */
12
13#include <linux/kernel.h>
14#include <linux/sched.h>
15#include <linux/mm.h>
16#include <linux/errno.h>
17#include <linux/export.h>
18#include <linux/ptrace.h>
19#include <linux/user.h>
20#include <linux/smp.h>
21#include <linux/security.h>
22#include <linux/seccomp.h>
23#include <linux/audit.h>
24#include <linux/signal.h>
25#include <linux/regset.h>
26#include <linux/tracehook.h>
27#include <trace/syscall.h>
28#include <linux/compat.h>
29#include <linux/elf.h>
30#include <linux/context_tracking.h>
31
32#include <asm/asi.h>
33#include <asm/pgtable.h>
34#include <linux/uaccess.h>
35#include <asm/psrcompat.h>
36#include <asm/visasm.h>
37#include <asm/spitfire.h>
38#include <asm/page.h>
39#include <asm/cpudata.h>
40#include <asm/cacheflush.h>
41
42#define CREATE_TRACE_POINTS
43#include <trace/events/syscalls.h>
44
45#include "entry.h"
46
47/* #define ALLOW_INIT_TRACING */
48
49struct pt_regs_offset {
50 const char *name;
51 int offset;
52};
53
54#define REG_OFFSET_NAME(n, r) \
55 {.name = n, .offset = (PT_V9_##r)}
56#define REG_OFFSET_END {.name = NULL, .offset = 0}
57
58static const struct pt_regs_offset regoffset_table[] = {
59 REG_OFFSET_NAME("g0", G0),
60 REG_OFFSET_NAME("g1", G1),
61 REG_OFFSET_NAME("g2", G2),
62 REG_OFFSET_NAME("g3", G3),
63 REG_OFFSET_NAME("g4", G4),
64 REG_OFFSET_NAME("g5", G5),
65 REG_OFFSET_NAME("g6", G6),
66 REG_OFFSET_NAME("g7", G7),
67
68 REG_OFFSET_NAME("i0", I0),
69 REG_OFFSET_NAME("i1", I1),
70 REG_OFFSET_NAME("i2", I2),
71 REG_OFFSET_NAME("i3", I3),
72 REG_OFFSET_NAME("i4", I4),
73 REG_OFFSET_NAME("i5", I5),
74 REG_OFFSET_NAME("i6", I6),
75 REG_OFFSET_NAME("i7", I7),
76
77 REG_OFFSET_NAME("tstate", TSTATE),
78 REG_OFFSET_NAME("pc", TPC),
79 REG_OFFSET_NAME("npc", TNPC),
80 REG_OFFSET_NAME("y", Y),
81 REG_OFFSET_NAME("lr", I7),
82
83 REG_OFFSET_END,
84};
85
86/*
87 * Called by kernel/ptrace.c when detaching..
88 *
89 * Make sure single step bits etc are not set.
90 */
91void ptrace_disable(struct task_struct *child)
92{
93 /* nothing to do */
94}
95
96/* To get the necessary page struct, access_process_vm() first calls
97 * get_user_pages(). This has done a flush_dcache_page() on the
98 * accessed page. Then our caller (copy_{to,from}_user_page()) did
99 * to memcpy to read/write the data from that page.
100 *
101 * Now, the only thing we have to do is:
102 * 1) flush the D-cache if it's possible than an illegal alias
103 * has been created
104 * 2) flush the I-cache if this is pre-cheetah and we did a write
105 */
106void flush_ptrace_access(struct vm_area_struct *vma, struct page *page,
107 unsigned long uaddr, void *kaddr,
108 unsigned long len, int write)
109{
110 BUG_ON(len > PAGE_SIZE);
111
112 if (tlb_type == hypervisor)
113 return;
114
115 preempt_disable();
116
117#ifdef DCACHE_ALIASING_POSSIBLE
118 /* If bit 13 of the kernel address we used to access the
119 * user page is the same as the virtual address that page
120 * is mapped to in the user's address space, we can skip the
121 * D-cache flush.
122 */
123 if ((uaddr ^ (unsigned long) kaddr) & (1UL << 13)) {
124 unsigned long start = __pa(kaddr);
125 unsigned long end = start + len;
126 unsigned long dcache_line_size;
127
128 dcache_line_size = local_cpu_data().dcache_line_size;
129
130 if (tlb_type == spitfire) {
131 for (; start < end; start += dcache_line_size)
132 spitfire_put_dcache_tag(start & 0x3fe0, 0x0);
133 } else {
134 start &= ~(dcache_line_size - 1);
135 for (; start < end; start += dcache_line_size)
136 __asm__ __volatile__(
137 "stxa %%g0, [%0] %1\n\t"
138 "membar #Sync"
139 : /* no outputs */
140 : "r" (start),
141 "i" (ASI_DCACHE_INVALIDATE));
142 }
143 }
144#endif
145 if (write && tlb_type == spitfire) {
146 unsigned long start = (unsigned long) kaddr;
147 unsigned long end = start + len;
148 unsigned long icache_line_size;
149
150 icache_line_size = local_cpu_data().icache_line_size;
151
152 for (; start < end; start += icache_line_size)
153 flushi(start);
154 }
155
156 preempt_enable();
157}
158EXPORT_SYMBOL_GPL(flush_ptrace_access);
159
160static int get_from_target(struct task_struct *target, unsigned long uaddr,
161 void *kbuf, int len)
162{
163 if (target == current) {
164 if (copy_from_user(kbuf, (void __user *) uaddr, len))
165 return -EFAULT;
166 } else {
167 int len2 = access_process_vm(target, uaddr, kbuf, len,
168 FOLL_FORCE);
169 if (len2 != len)
170 return -EFAULT;
171 }
172 return 0;
173}
174
175static int set_to_target(struct task_struct *target, unsigned long uaddr,
176 void *kbuf, int len)
177{
178 if (target == current) {
179 if (copy_to_user((void __user *) uaddr, kbuf, len))
180 return -EFAULT;
181 } else {
182 int len2 = access_process_vm(target, uaddr, kbuf, len,
183 FOLL_FORCE | FOLL_WRITE);
184 if (len2 != len)
185 return -EFAULT;
186 }
187 return 0;
188}
189
190static int regwindow64_get(struct task_struct *target,
191 const struct pt_regs *regs,
192 struct reg_window *wbuf)
193{
194 unsigned long rw_addr = regs->u_regs[UREG_I6];
195
196 if (!test_thread_64bit_stack(rw_addr)) {
197 struct reg_window32 win32;
198 int i;
199
200 if (get_from_target(target, rw_addr, &win32, sizeof(win32)))
201 return -EFAULT;
202 for (i = 0; i < 8; i++)
203 wbuf->locals[i] = win32.locals[i];
204 for (i = 0; i < 8; i++)
205 wbuf->ins[i] = win32.ins[i];
206 } else {
207 rw_addr += STACK_BIAS;
208 if (get_from_target(target, rw_addr, wbuf, sizeof(*wbuf)))
209 return -EFAULT;
210 }
211
212 return 0;
213}
214
215static int regwindow64_set(struct task_struct *target,
216 const struct pt_regs *regs,
217 struct reg_window *wbuf)
218{
219 unsigned long rw_addr = regs->u_regs[UREG_I6];
220
221 if (!test_thread_64bit_stack(rw_addr)) {
222 struct reg_window32 win32;
223 int i;
224
225 for (i = 0; i < 8; i++)
226 win32.locals[i] = wbuf->locals[i];
227 for (i = 0; i < 8; i++)
228 win32.ins[i] = wbuf->ins[i];
229
230 if (set_to_target(target, rw_addr, &win32, sizeof(win32)))
231 return -EFAULT;
232 } else {
233 rw_addr += STACK_BIAS;
234 if (set_to_target(target, rw_addr, wbuf, sizeof(*wbuf)))
235 return -EFAULT;
236 }
237
238 return 0;
239}
240
241enum sparc_regset {
242 REGSET_GENERAL,
243 REGSET_FP,
244};
245
246static int genregs64_get(struct task_struct *target,
247 const struct user_regset *regset,
248 unsigned int pos, unsigned int count,
249 void *kbuf, void __user *ubuf)
250{
251 const struct pt_regs *regs = task_pt_regs(target);
252 int ret;
253
254 if (target == current)
255 flushw_user();
256
257 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
258 regs->u_regs,
259 0, 16 * sizeof(u64));
260 if (!ret && count && pos < (32 * sizeof(u64))) {
261 struct reg_window window;
262
263 if (regwindow64_get(target, regs, &window))
264 return -EFAULT;
265 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
266 &window,
267 16 * sizeof(u64),
268 32 * sizeof(u64));
269 }
270
271 if (!ret) {
272 /* TSTATE, TPC, TNPC */
273 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
274 ®s->tstate,
275 32 * sizeof(u64),
276 35 * sizeof(u64));
277 }
278
279 if (!ret) {
280 unsigned long y = regs->y;
281
282 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
283 &y,
284 35 * sizeof(u64),
285 36 * sizeof(u64));
286 }
287
288 if (!ret) {
289 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
290 36 * sizeof(u64), -1);
291
292 }
293 return ret;
294}
295
296static int genregs64_set(struct task_struct *target,
297 const struct user_regset *regset,
298 unsigned int pos, unsigned int count,
299 const void *kbuf, const void __user *ubuf)
300{
301 struct pt_regs *regs = task_pt_regs(target);
302 int ret;
303
304 if (target == current)
305 flushw_user();
306
307 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
308 regs->u_regs,
309 0, 16 * sizeof(u64));
310 if (!ret && count && pos < (32 * sizeof(u64))) {
311 struct reg_window window;
312
313 if (regwindow64_get(target, regs, &window))
314 return -EFAULT;
315
316 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
317 &window,
318 16 * sizeof(u64),
319 32 * sizeof(u64));
320
321 if (!ret &&
322 regwindow64_set(target, regs, &window))
323 return -EFAULT;
324 }
325
326 if (!ret && count > 0) {
327 unsigned long tstate;
328
329 /* TSTATE */
330 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
331 &tstate,
332 32 * sizeof(u64),
333 33 * sizeof(u64));
334 if (!ret) {
335 /* Only the condition codes and the "in syscall"
336 * state can be modified in the %tstate register.
337 */
338 tstate &= (TSTATE_ICC | TSTATE_XCC | TSTATE_SYSCALL);
339 regs->tstate &= ~(TSTATE_ICC | TSTATE_XCC | TSTATE_SYSCALL);
340 regs->tstate |= tstate;
341 }
342 }
343
344 if (!ret) {
345 /* TPC, TNPC */
346 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
347 ®s->tpc,
348 33 * sizeof(u64),
349 35 * sizeof(u64));
350 }
351
352 if (!ret) {
353 unsigned long y = regs->y;
354
355 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
356 &y,
357 35 * sizeof(u64),
358 36 * sizeof(u64));
359 if (!ret)
360 regs->y = y;
361 }
362
363 if (!ret)
364 ret = user_regset_copyin_ignore(&pos, &count, &kbuf, &ubuf,
365 36 * sizeof(u64), -1);
366
367 return ret;
368}
369
370static int fpregs64_get(struct task_struct *target,
371 const struct user_regset *regset,
372 unsigned int pos, unsigned int count,
373 void *kbuf, void __user *ubuf)
374{
375 const unsigned long *fpregs = task_thread_info(target)->fpregs;
376 unsigned long fprs, fsr, gsr;
377 int ret;
378
379 if (target == current)
380 save_and_clear_fpu();
381
382 fprs = task_thread_info(target)->fpsaved[0];
383
384 if (fprs & FPRS_DL)
385 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
386 fpregs,
387 0, 16 * sizeof(u64));
388 else
389 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
390 0,
391 16 * sizeof(u64));
392
393 if (!ret) {
394 if (fprs & FPRS_DU)
395 ret = user_regset_copyout(&pos, &count,
396 &kbuf, &ubuf,
397 fpregs + 16,
398 16 * sizeof(u64),
399 32 * sizeof(u64));
400 else
401 ret = user_regset_copyout_zero(&pos, &count,
402 &kbuf, &ubuf,
403 16 * sizeof(u64),
404 32 * sizeof(u64));
405 }
406
407 if (fprs & FPRS_FEF) {
408 fsr = task_thread_info(target)->xfsr[0];
409 gsr = task_thread_info(target)->gsr[0];
410 } else {
411 fsr = gsr = 0;
412 }
413
414 if (!ret)
415 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
416 &fsr,
417 32 * sizeof(u64),
418 33 * sizeof(u64));
419 if (!ret)
420 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
421 &gsr,
422 33 * sizeof(u64),
423 34 * sizeof(u64));
424 if (!ret)
425 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
426 &fprs,
427 34 * sizeof(u64),
428 35 * sizeof(u64));
429
430 if (!ret)
431 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
432 35 * sizeof(u64), -1);
433
434 return ret;
435}
436
437static int fpregs64_set(struct task_struct *target,
438 const struct user_regset *regset,
439 unsigned int pos, unsigned int count,
440 const void *kbuf, const void __user *ubuf)
441{
442 unsigned long *fpregs = task_thread_info(target)->fpregs;
443 unsigned long fprs;
444 int ret;
445
446 if (target == current)
447 save_and_clear_fpu();
448
449 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
450 fpregs,
451 0, 32 * sizeof(u64));
452 if (!ret)
453 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
454 task_thread_info(target)->xfsr,
455 32 * sizeof(u64),
456 33 * sizeof(u64));
457 if (!ret)
458 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
459 task_thread_info(target)->gsr,
460 33 * sizeof(u64),
461 34 * sizeof(u64));
462
463 fprs = task_thread_info(target)->fpsaved[0];
464 if (!ret && count > 0) {
465 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
466 &fprs,
467 34 * sizeof(u64),
468 35 * sizeof(u64));
469 }
470
471 fprs |= (FPRS_FEF | FPRS_DL | FPRS_DU);
472 task_thread_info(target)->fpsaved[0] = fprs;
473
474 if (!ret)
475 ret = user_regset_copyin_ignore(&pos, &count, &kbuf, &ubuf,
476 35 * sizeof(u64), -1);
477 return ret;
478}
479
480static const struct user_regset sparc64_regsets[] = {
481 /* Format is:
482 * G0 --> G7
483 * O0 --> O7
484 * L0 --> L7
485 * I0 --> I7
486 * TSTATE, TPC, TNPC, Y
487 */
488 [REGSET_GENERAL] = {
489 .core_note_type = NT_PRSTATUS,
490 .n = 36,
491 .size = sizeof(u64), .align = sizeof(u64),
492 .get = genregs64_get, .set = genregs64_set
493 },
494 /* Format is:
495 * F0 --> F63
496 * FSR
497 * GSR
498 * FPRS
499 */
500 [REGSET_FP] = {
501 .core_note_type = NT_PRFPREG,
502 .n = 35,
503 .size = sizeof(u64), .align = sizeof(u64),
504 .get = fpregs64_get, .set = fpregs64_set
505 },
506};
507
508static const struct user_regset_view user_sparc64_view = {
509 .name = "sparc64", .e_machine = EM_SPARCV9,
510 .regsets = sparc64_regsets, .n = ARRAY_SIZE(sparc64_regsets)
511};
512
513#ifdef CONFIG_COMPAT
514static int genregs32_get(struct task_struct *target,
515 const struct user_regset *regset,
516 unsigned int pos, unsigned int count,
517 void *kbuf, void __user *ubuf)
518{
519 const struct pt_regs *regs = task_pt_regs(target);
520 compat_ulong_t __user *reg_window;
521 compat_ulong_t *k = kbuf;
522 compat_ulong_t __user *u = ubuf;
523 compat_ulong_t reg;
524
525 if (target == current)
526 flushw_user();
527
528 pos /= sizeof(reg);
529 count /= sizeof(reg);
530
531 if (kbuf) {
532 for (; count > 0 && pos < 16; count--)
533 *k++ = regs->u_regs[pos++];
534
535 reg_window = (compat_ulong_t __user *) regs->u_regs[UREG_I6];
536 reg_window -= 16;
537 if (target == current) {
538 for (; count > 0 && pos < 32; count--) {
539 if (get_user(*k++, ®_window[pos++]))
540 return -EFAULT;
541 }
542 } else {
543 for (; count > 0 && pos < 32; count--) {
544 if (access_process_vm(target,
545 (unsigned long)
546 ®_window[pos],
547 k, sizeof(*k),
548 FOLL_FORCE)
549 != sizeof(*k))
550 return -EFAULT;
551 k++;
552 pos++;
553 }
554 }
555 } else {
556 for (; count > 0 && pos < 16; count--) {
557 if (put_user((compat_ulong_t) regs->u_regs[pos++], u++))
558 return -EFAULT;
559 }
560
561 reg_window = (compat_ulong_t __user *) regs->u_regs[UREG_I6];
562 reg_window -= 16;
563 if (target == current) {
564 for (; count > 0 && pos < 32; count--) {
565 if (get_user(reg, ®_window[pos++]) ||
566 put_user(reg, u++))
567 return -EFAULT;
568 }
569 } else {
570 for (; count > 0 && pos < 32; count--) {
571 if (access_process_vm(target,
572 (unsigned long)
573 ®_window[pos],
574 ®, sizeof(reg),
575 FOLL_FORCE)
576 != sizeof(reg))
577 return -EFAULT;
578 if (access_process_vm(target,
579 (unsigned long) u,
580 ®, sizeof(reg),
581 FOLL_FORCE | FOLL_WRITE)
582 != sizeof(reg))
583 return -EFAULT;
584 pos++;
585 u++;
586 }
587 }
588 }
589 while (count > 0) {
590 switch (pos) {
591 case 32: /* PSR */
592 reg = tstate_to_psr(regs->tstate);
593 break;
594 case 33: /* PC */
595 reg = regs->tpc;
596 break;
597 case 34: /* NPC */
598 reg = regs->tnpc;
599 break;
600 case 35: /* Y */
601 reg = regs->y;
602 break;
603 case 36: /* WIM */
604 case 37: /* TBR */
605 reg = 0;
606 break;
607 default:
608 goto finish;
609 }
610
611 if (kbuf)
612 *k++ = reg;
613 else if (put_user(reg, u++))
614 return -EFAULT;
615 pos++;
616 count--;
617 }
618finish:
619 pos *= sizeof(reg);
620 count *= sizeof(reg);
621
622 return user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
623 38 * sizeof(reg), -1);
624}
625
626static int genregs32_set(struct task_struct *target,
627 const struct user_regset *regset,
628 unsigned int pos, unsigned int count,
629 const void *kbuf, const void __user *ubuf)
630{
631 struct pt_regs *regs = task_pt_regs(target);
632 compat_ulong_t __user *reg_window;
633 const compat_ulong_t *k = kbuf;
634 const compat_ulong_t __user *u = ubuf;
635 compat_ulong_t reg;
636
637 if (target == current)
638 flushw_user();
639
640 pos /= sizeof(reg);
641 count /= sizeof(reg);
642
643 if (kbuf) {
644 for (; count > 0 && pos < 16; count--)
645 regs->u_regs[pos++] = *k++;
646
647 reg_window = (compat_ulong_t __user *) regs->u_regs[UREG_I6];
648 reg_window -= 16;
649 if (target == current) {
650 for (; count > 0 && pos < 32; count--) {
651 if (put_user(*k++, ®_window[pos++]))
652 return -EFAULT;
653 }
654 } else {
655 for (; count > 0 && pos < 32; count--) {
656 if (access_process_vm(target,
657 (unsigned long)
658 ®_window[pos],
659 (void *) k,
660 sizeof(*k),
661 FOLL_FORCE | FOLL_WRITE)
662 != sizeof(*k))
663 return -EFAULT;
664 k++;
665 pos++;
666 }
667 }
668 } else {
669 for (; count > 0 && pos < 16; count--) {
670 if (get_user(reg, u++))
671 return -EFAULT;
672 regs->u_regs[pos++] = reg;
673 }
674
675 reg_window = (compat_ulong_t __user *) regs->u_regs[UREG_I6];
676 reg_window -= 16;
677 if (target == current) {
678 for (; count > 0 && pos < 32; count--) {
679 if (get_user(reg, u++) ||
680 put_user(reg, ®_window[pos++]))
681 return -EFAULT;
682 }
683 } else {
684 for (; count > 0 && pos < 32; count--) {
685 if (access_process_vm(target,
686 (unsigned long)
687 u,
688 ®, sizeof(reg),
689 FOLL_FORCE)
690 != sizeof(reg))
691 return -EFAULT;
692 if (access_process_vm(target,
693 (unsigned long)
694 ®_window[pos],
695 ®, sizeof(reg),
696 FOLL_FORCE | FOLL_WRITE)
697 != sizeof(reg))
698 return -EFAULT;
699 pos++;
700 u++;
701 }
702 }
703 }
704 while (count > 0) {
705 unsigned long tstate;
706
707 if (kbuf)
708 reg = *k++;
709 else if (get_user(reg, u++))
710 return -EFAULT;
711
712 switch (pos) {
713 case 32: /* PSR */
714 tstate = regs->tstate;
715 tstate &= ~(TSTATE_ICC | TSTATE_XCC | TSTATE_SYSCALL);
716 tstate |= psr_to_tstate_icc(reg);
717 if (reg & PSR_SYSCALL)
718 tstate |= TSTATE_SYSCALL;
719 regs->tstate = tstate;
720 break;
721 case 33: /* PC */
722 regs->tpc = reg;
723 break;
724 case 34: /* NPC */
725 regs->tnpc = reg;
726 break;
727 case 35: /* Y */
728 regs->y = reg;
729 break;
730 case 36: /* WIM */
731 case 37: /* TBR */
732 break;
733 default:
734 goto finish;
735 }
736
737 pos++;
738 count--;
739 }
740finish:
741 pos *= sizeof(reg);
742 count *= sizeof(reg);
743
744 return user_regset_copyin_ignore(&pos, &count, &kbuf, &ubuf,
745 38 * sizeof(reg), -1);
746}
747
748static int fpregs32_get(struct task_struct *target,
749 const struct user_regset *regset,
750 unsigned int pos, unsigned int count,
751 void *kbuf, void __user *ubuf)
752{
753 const unsigned long *fpregs = task_thread_info(target)->fpregs;
754 compat_ulong_t enabled;
755 unsigned long fprs;
756 compat_ulong_t fsr;
757 int ret = 0;
758
759 if (target == current)
760 save_and_clear_fpu();
761
762 fprs = task_thread_info(target)->fpsaved[0];
763 if (fprs & FPRS_FEF) {
764 fsr = task_thread_info(target)->xfsr[0];
765 enabled = 1;
766 } else {
767 fsr = 0;
768 enabled = 0;
769 }
770
771 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
772 fpregs,
773 0, 32 * sizeof(u32));
774
775 if (!ret)
776 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
777 32 * sizeof(u32),
778 33 * sizeof(u32));
779 if (!ret)
780 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
781 &fsr,
782 33 * sizeof(u32),
783 34 * sizeof(u32));
784
785 if (!ret) {
786 compat_ulong_t val;
787
788 val = (enabled << 8) | (8 << 16);
789 ret = user_regset_copyout(&pos, &count, &kbuf, &ubuf,
790 &val,
791 34 * sizeof(u32),
792 35 * sizeof(u32));
793 }
794
795 if (!ret)
796 ret = user_regset_copyout_zero(&pos, &count, &kbuf, &ubuf,
797 35 * sizeof(u32), -1);
798
799 return ret;
800}
801
802static int fpregs32_set(struct task_struct *target,
803 const struct user_regset *regset,
804 unsigned int pos, unsigned int count,
805 const void *kbuf, const void __user *ubuf)
806{
807 unsigned long *fpregs = task_thread_info(target)->fpregs;
808 unsigned long fprs;
809 int ret;
810
811 if (target == current)
812 save_and_clear_fpu();
813
814 fprs = task_thread_info(target)->fpsaved[0];
815
816 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
817 fpregs,
818 0, 32 * sizeof(u32));
819 if (!ret)
820 user_regset_copyin_ignore(&pos, &count, &kbuf, &ubuf,
821 32 * sizeof(u32),
822 33 * sizeof(u32));
823 if (!ret && count > 0) {
824 compat_ulong_t fsr;
825 unsigned long val;
826
827 ret = user_regset_copyin(&pos, &count, &kbuf, &ubuf,
828 &fsr,
829 33 * sizeof(u32),
830 34 * sizeof(u32));
831 if (!ret) {
832 val = task_thread_info(target)->xfsr[0];
833 val &= 0xffffffff00000000UL;
834 val |= fsr;
835 task_thread_info(target)->xfsr[0] = val;
836 }
837 }
838
839 fprs |= (FPRS_FEF | FPRS_DL);
840 task_thread_info(target)->fpsaved[0] = fprs;
841
842 if (!ret)
843 ret = user_regset_copyin_ignore(&pos, &count, &kbuf, &ubuf,
844 34 * sizeof(u32), -1);
845 return ret;
846}
847
848static const struct user_regset sparc32_regsets[] = {
849 /* Format is:
850 * G0 --> G7
851 * O0 --> O7
852 * L0 --> L7
853 * I0 --> I7
854 * PSR, PC, nPC, Y, WIM, TBR
855 */
856 [REGSET_GENERAL] = {
857 .core_note_type = NT_PRSTATUS,
858 .n = 38,
859 .size = sizeof(u32), .align = sizeof(u32),
860 .get = genregs32_get, .set = genregs32_set
861 },
862 /* Format is:
863 * F0 --> F31
864 * empty 32-bit word
865 * FSR (32--bit word)
866 * FPU QUEUE COUNT (8-bit char)
867 * FPU QUEUE ENTRYSIZE (8-bit char)
868 * FPU ENABLED (8-bit char)
869 * empty 8-bit char
870 * FPU QUEUE (64 32-bit ints)
871 */
872 [REGSET_FP] = {
873 .core_note_type = NT_PRFPREG,
874 .n = 99,
875 .size = sizeof(u32), .align = sizeof(u32),
876 .get = fpregs32_get, .set = fpregs32_set
877 },
878};
879
880static const struct user_regset_view user_sparc32_view = {
881 .name = "sparc", .e_machine = EM_SPARC,
882 .regsets = sparc32_regsets, .n = ARRAY_SIZE(sparc32_regsets)
883};
884#endif /* CONFIG_COMPAT */
885
886const struct user_regset_view *task_user_regset_view(struct task_struct *task)
887{
888#ifdef CONFIG_COMPAT
889 if (test_tsk_thread_flag(task, TIF_32BIT))
890 return &user_sparc32_view;
891#endif
892 return &user_sparc64_view;
893}
894
895#ifdef CONFIG_COMPAT
896struct compat_fps {
897 unsigned int regs[32];
898 unsigned int fsr;
899 unsigned int flags;
900 unsigned int extra;
901 unsigned int fpqd;
902 struct compat_fq {
903 unsigned int insnaddr;
904 unsigned int insn;
905 } fpq[16];
906};
907
908long compat_arch_ptrace(struct task_struct *child, compat_long_t request,
909 compat_ulong_t caddr, compat_ulong_t cdata)
910{
911 const struct user_regset_view *view = task_user_regset_view(current);
912 compat_ulong_t caddr2 = task_pt_regs(current)->u_regs[UREG_I4];
913 struct pt_regs32 __user *pregs;
914 struct compat_fps __user *fps;
915 unsigned long addr2 = caddr2;
916 unsigned long addr = caddr;
917 unsigned long data = cdata;
918 int ret;
919
920 pregs = (struct pt_regs32 __user *) addr;
921 fps = (struct compat_fps __user *) addr;
922
923 switch (request) {
924 case PTRACE_PEEKUSR:
925 ret = (addr != 0) ? -EIO : 0;
926 break;
927
928 case PTRACE_GETREGS:
929 ret = copy_regset_to_user(child, view, REGSET_GENERAL,
930 32 * sizeof(u32),
931 4 * sizeof(u32),
932 &pregs->psr);
933 if (!ret)
934 ret = copy_regset_to_user(child, view, REGSET_GENERAL,
935 1 * sizeof(u32),
936 15 * sizeof(u32),
937 &pregs->u_regs[0]);
938 break;
939
940 case PTRACE_SETREGS:
941 ret = copy_regset_from_user(child, view, REGSET_GENERAL,
942 32 * sizeof(u32),
943 4 * sizeof(u32),
944 &pregs->psr);
945 if (!ret)
946 ret = copy_regset_from_user(child, view, REGSET_GENERAL,
947 1 * sizeof(u32),
948 15 * sizeof(u32),
949 &pregs->u_regs[0]);
950 break;
951
952 case PTRACE_GETFPREGS:
953 ret = copy_regset_to_user(child, view, REGSET_FP,
954 0 * sizeof(u32),
955 32 * sizeof(u32),
956 &fps->regs[0]);
957 if (!ret)
958 ret = copy_regset_to_user(child, view, REGSET_FP,
959 33 * sizeof(u32),
960 1 * sizeof(u32),
961 &fps->fsr);
962 if (!ret) {
963 if (__put_user(0, &fps->flags) ||
964 __put_user(0, &fps->extra) ||
965 __put_user(0, &fps->fpqd) ||
966 clear_user(&fps->fpq[0], 32 * sizeof(unsigned int)))
967 ret = -EFAULT;
968 }
969 break;
970
971 case PTRACE_SETFPREGS:
972 ret = copy_regset_from_user(child, view, REGSET_FP,
973 0 * sizeof(u32),
974 32 * sizeof(u32),
975 &fps->regs[0]);
976 if (!ret)
977 ret = copy_regset_from_user(child, view, REGSET_FP,
978 33 * sizeof(u32),
979 1 * sizeof(u32),
980 &fps->fsr);
981 break;
982
983 case PTRACE_READTEXT:
984 case PTRACE_READDATA:
985 ret = ptrace_readdata(child, addr,
986 (char __user *)addr2, data);
987 if (ret == data)
988 ret = 0;
989 else if (ret >= 0)
990 ret = -EIO;
991 break;
992
993 case PTRACE_WRITETEXT:
994 case PTRACE_WRITEDATA:
995 ret = ptrace_writedata(child, (char __user *) addr2,
996 addr, data);
997 if (ret == data)
998 ret = 0;
999 else if (ret >= 0)
1000 ret = -EIO;
1001 break;
1002
1003 default:
1004 if (request == PTRACE_SPARC_DETACH)
1005 request = PTRACE_DETACH;
1006 ret = compat_ptrace_request(child, request, addr, data);
1007 break;
1008 }
1009
1010 return ret;
1011}
1012#endif /* CONFIG_COMPAT */
1013
1014struct fps {
1015 unsigned int regs[64];
1016 unsigned long fsr;
1017};
1018
1019long arch_ptrace(struct task_struct *child, long request,
1020 unsigned long addr, unsigned long data)
1021{
1022 const struct user_regset_view *view = task_user_regset_view(current);
1023 unsigned long addr2 = task_pt_regs(current)->u_regs[UREG_I4];
1024 struct pt_regs __user *pregs;
1025 struct fps __user *fps;
1026 void __user *addr2p;
1027 int ret;
1028
1029 pregs = (struct pt_regs __user *) addr;
1030 fps = (struct fps __user *) addr;
1031 addr2p = (void __user *) addr2;
1032
1033 switch (request) {
1034 case PTRACE_PEEKUSR:
1035 ret = (addr != 0) ? -EIO : 0;
1036 break;
1037
1038 case PTRACE_GETREGS64:
1039 ret = copy_regset_to_user(child, view, REGSET_GENERAL,
1040 1 * sizeof(u64),
1041 15 * sizeof(u64),
1042 &pregs->u_regs[0]);
1043 if (!ret) {
1044 /* XXX doesn't handle 'y' register correctly XXX */
1045 ret = copy_regset_to_user(child, view, REGSET_GENERAL,
1046 32 * sizeof(u64),
1047 4 * sizeof(u64),
1048 &pregs->tstate);
1049 }
1050 break;
1051
1052 case PTRACE_SETREGS64:
1053 ret = copy_regset_from_user(child, view, REGSET_GENERAL,
1054 1 * sizeof(u64),
1055 15 * sizeof(u64),
1056 &pregs->u_regs[0]);
1057 if (!ret) {
1058 /* XXX doesn't handle 'y' register correctly XXX */
1059 ret = copy_regset_from_user(child, view, REGSET_GENERAL,
1060 32 * sizeof(u64),
1061 4 * sizeof(u64),
1062 &pregs->tstate);
1063 }
1064 break;
1065
1066 case PTRACE_GETFPREGS64:
1067 ret = copy_regset_to_user(child, view, REGSET_FP,
1068 0 * sizeof(u64),
1069 33 * sizeof(u64),
1070 fps);
1071 break;
1072
1073 case PTRACE_SETFPREGS64:
1074 ret = copy_regset_from_user(child, view, REGSET_FP,
1075 0 * sizeof(u64),
1076 33 * sizeof(u64),
1077 fps);
1078 break;
1079
1080 case PTRACE_READTEXT:
1081 case PTRACE_READDATA:
1082 ret = ptrace_readdata(child, addr, addr2p, data);
1083 if (ret == data)
1084 ret = 0;
1085 else if (ret >= 0)
1086 ret = -EIO;
1087 break;
1088
1089 case PTRACE_WRITETEXT:
1090 case PTRACE_WRITEDATA:
1091 ret = ptrace_writedata(child, addr2p, addr, data);
1092 if (ret == data)
1093 ret = 0;
1094 else if (ret >= 0)
1095 ret = -EIO;
1096 break;
1097
1098 default:
1099 if (request == PTRACE_SPARC_DETACH)
1100 request = PTRACE_DETACH;
1101 ret = ptrace_request(child, request, addr, data);
1102 break;
1103 }
1104
1105 return ret;
1106}
1107
1108asmlinkage int syscall_trace_enter(struct pt_regs *regs)
1109{
1110 int ret = 0;
1111
1112 /* do the secure computing check first */
1113 secure_computing_strict(regs->u_regs[UREG_G1]);
1114
1115 if (test_thread_flag(TIF_NOHZ))
1116 user_exit();
1117
1118 if (test_thread_flag(TIF_SYSCALL_TRACE))
1119 ret = tracehook_report_syscall_entry(regs);
1120
1121 if (unlikely(test_thread_flag(TIF_SYSCALL_TRACEPOINT)))
1122 trace_sys_enter(regs, regs->u_regs[UREG_G1]);
1123
1124 audit_syscall_entry(regs->u_regs[UREG_G1], regs->u_regs[UREG_I0],
1125 regs->u_regs[UREG_I1], regs->u_regs[UREG_I2],
1126 regs->u_regs[UREG_I3]);
1127
1128 return ret;
1129}
1130
1131asmlinkage void syscall_trace_leave(struct pt_regs *regs)
1132{
1133 if (test_thread_flag(TIF_NOHZ))
1134 user_exit();
1135
1136 audit_syscall_exit(regs);
1137
1138 if (unlikely(test_thread_flag(TIF_SYSCALL_TRACEPOINT)))
1139 trace_sys_exit(regs, regs->u_regs[UREG_I0]);
1140
1141 if (test_thread_flag(TIF_SYSCALL_TRACE))
1142 tracehook_report_syscall_exit(regs, 0);
1143
1144 if (test_thread_flag(TIF_NOHZ))
1145 user_enter();
1146}
1147
1148/**
1149 * regs_query_register_offset() - query register offset from its name
1150 * @name: the name of a register
1151 *
1152 * regs_query_register_offset() returns the offset of a register in struct
1153 * pt_regs from its name. If the name is invalid, this returns -EINVAL;
1154 */
1155int regs_query_register_offset(const char *name)
1156{
1157 const struct pt_regs_offset *roff;
1158
1159 for (roff = regoffset_table; roff->name != NULL; roff++)
1160 if (!strcmp(roff->name, name))
1161 return roff->offset;
1162 return -EINVAL;
1163}