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