1 /* By Ross Biro 1/23/92 */
3 * Pentium III FXSR, SSE support
4 * Gareth Hughes <gareth@valinux.com>, May 2000
7 #include <linux/kernel.h>
8 #include <linux/sched.h>
10 #include <linux/smp.h>
11 #include <linux/errno.h>
12 #include <linux/slab.h>
13 #include <linux/ptrace.h>
14 #include <linux/tracehook.h>
15 #include <linux/user.h>
16 #include <linux/elf.h>
17 #include <linux/security.h>
18 #include <linux/audit.h>
19 #include <linux/seccomp.h>
20 #include <linux/signal.h>
21 #include <linux/perf_event.h>
22 #include <linux/hw_breakpoint.h>
23 #include <linux/rcupdate.h>
24 #include <linux/export.h>
25 #include <linux/context_tracking.h>
27 #include <asm/uaccess.h>
28 #include <asm/pgtable.h>
29 #include <asm/processor.h>
30 #include <asm/fpu/internal.h>
31 #include <asm/fpu/signal.h>
32 #include <asm/fpu/regset.h>
33 #include <asm/debugreg.h>
36 #include <asm/prctl.h>
37 #include <asm/proto.h>
38 #include <asm/hw_breakpoint.h>
39 #include <asm/traps.h>
40 #include <asm/syscall.h>
48 REGSET_IOPERM64
= REGSET_XFP
,
54 struct pt_regs_offset
{
59 #define REG_OFFSET_NAME(r) {.name = #r, .offset = offsetof(struct pt_regs, r)}
60 #define REG_OFFSET_END {.name = NULL, .offset = 0}
62 static const struct pt_regs_offset regoffset_table
[] = {
86 REG_OFFSET_NAME(orig_ax
),
89 REG_OFFSET_NAME(flags
),
96 * regs_query_register_offset() - query register offset from its name
97 * @name: the name of a register
99 * regs_query_register_offset() returns the offset of a register in struct
100 * pt_regs from its name. If the name is invalid, this returns -EINVAL;
102 int regs_query_register_offset(const char *name
)
104 const struct pt_regs_offset
*roff
;
105 for (roff
= regoffset_table
; roff
->name
!= NULL
; roff
++)
106 if (!strcmp(roff
->name
, name
))
112 * regs_query_register_name() - query register name from its offset
113 * @offset: the offset of a register in struct pt_regs.
115 * regs_query_register_name() returns the name of a register from its
116 * offset in struct pt_regs. If the @offset is invalid, this returns NULL;
118 const char *regs_query_register_name(unsigned int offset
)
120 const struct pt_regs_offset
*roff
;
121 for (roff
= regoffset_table
; roff
->name
!= NULL
; roff
++)
122 if (roff
->offset
== offset
)
128 * does not yet catch signals sent when the child dies.
129 * in exit.c or in signal.c.
133 * Determines which flags the user has access to [1 = access, 0 = no access].
135 #define FLAG_MASK_32 ((unsigned long) \
136 (X86_EFLAGS_CF | X86_EFLAGS_PF | \
137 X86_EFLAGS_AF | X86_EFLAGS_ZF | \
138 X86_EFLAGS_SF | X86_EFLAGS_TF | \
139 X86_EFLAGS_DF | X86_EFLAGS_OF | \
140 X86_EFLAGS_RF | X86_EFLAGS_AC))
143 * Determines whether a value may be installed in a segment register.
145 static inline bool invalid_selector(u16 value
)
147 return unlikely(value
!= 0 && (value
& SEGMENT_RPL_MASK
) != USER_RPL
);
152 #define FLAG_MASK FLAG_MASK_32
155 * X86_32 CPUs don't save ss and esp if the CPU is already in kernel mode
156 * when it traps. The previous stack will be directly underneath the saved
157 * registers, and 'sp/ss' won't even have been saved. Thus the '®s->sp'.
159 * Now, if the stack is empty, '®s->sp' is out of range. In this
160 * case we try to take the previous stack. To always return a non-null
161 * stack pointer we fall back to regs as stack if no previous stack
164 * This is valid only for kernel mode traps.
166 unsigned long kernel_stack_pointer(struct pt_regs
*regs
)
168 unsigned long context
= (unsigned long)regs
& ~(THREAD_SIZE
- 1);
169 unsigned long sp
= (unsigned long)®s
->sp
;
172 if (context
== (sp
& ~(THREAD_SIZE
- 1)))
175 prev_esp
= (u32
*)(context
);
177 return (unsigned long)prev_esp
;
179 return (unsigned long)regs
;
181 EXPORT_SYMBOL_GPL(kernel_stack_pointer
);
183 static unsigned long *pt_regs_access(struct pt_regs
*regs
, unsigned long regno
)
185 BUILD_BUG_ON(offsetof(struct pt_regs
, bx
) != 0);
186 return ®s
->bx
+ (regno
>> 2);
189 static u16
get_segment_reg(struct task_struct
*task
, unsigned long offset
)
192 * Returning the value truncates it to 16 bits.
195 if (offset
!= offsetof(struct user_regs_struct
, gs
))
196 retval
= *pt_regs_access(task_pt_regs(task
), offset
);
199 retval
= get_user_gs(task_pt_regs(task
));
201 retval
= task_user_gs(task
);
206 static int set_segment_reg(struct task_struct
*task
,
207 unsigned long offset
, u16 value
)
210 * The value argument was already truncated to 16 bits.
212 if (invalid_selector(value
))
216 * For %cs and %ss we cannot permit a null selector.
217 * We can permit a bogus selector as long as it has USER_RPL.
218 * Null selectors are fine for other segment registers, but
219 * we will never get back to user mode with invalid %cs or %ss
220 * and will take the trap in iret instead. Much code relies
221 * on user_mode() to distinguish a user trap frame (which can
222 * safely use invalid selectors) from a kernel trap frame.
225 case offsetof(struct user_regs_struct
, cs
):
226 case offsetof(struct user_regs_struct
, ss
):
227 if (unlikely(value
== 0))
231 *pt_regs_access(task_pt_regs(task
), offset
) = value
;
234 case offsetof(struct user_regs_struct
, gs
):
236 set_user_gs(task_pt_regs(task
), value
);
238 task_user_gs(task
) = value
;
244 #else /* CONFIG_X86_64 */
246 #define FLAG_MASK (FLAG_MASK_32 | X86_EFLAGS_NT)
248 static unsigned long *pt_regs_access(struct pt_regs
*regs
, unsigned long offset
)
250 BUILD_BUG_ON(offsetof(struct pt_regs
, r15
) != 0);
251 return ®s
->r15
+ (offset
/ sizeof(regs
->r15
));
254 static u16
get_segment_reg(struct task_struct
*task
, unsigned long offset
)
257 * Returning the value truncates it to 16 bits.
262 case offsetof(struct user_regs_struct
, fs
):
263 if (task
== current
) {
264 /* Older gas can't assemble movq %?s,%r?? */
265 asm("movl %%fs,%0" : "=r" (seg
));
268 return task
->thread
.fsindex
;
269 case offsetof(struct user_regs_struct
, gs
):
270 if (task
== current
) {
271 asm("movl %%gs,%0" : "=r" (seg
));
274 return task
->thread
.gsindex
;
275 case offsetof(struct user_regs_struct
, ds
):
276 if (task
== current
) {
277 asm("movl %%ds,%0" : "=r" (seg
));
280 return task
->thread
.ds
;
281 case offsetof(struct user_regs_struct
, es
):
282 if (task
== current
) {
283 asm("movl %%es,%0" : "=r" (seg
));
286 return task
->thread
.es
;
288 case offsetof(struct user_regs_struct
, cs
):
289 case offsetof(struct user_regs_struct
, ss
):
292 return *pt_regs_access(task_pt_regs(task
), offset
);
295 static int set_segment_reg(struct task_struct
*task
,
296 unsigned long offset
, u16 value
)
299 * The value argument was already truncated to 16 bits.
301 if (invalid_selector(value
))
305 case offsetof(struct user_regs_struct
,fs
):
307 * If this is setting fs as for normal 64-bit use but
308 * setting fs_base has implicitly changed it, leave it.
310 if ((value
== FS_TLS_SEL
&& task
->thread
.fsindex
== 0 &&
311 task
->thread
.fs
!= 0) ||
312 (value
== 0 && task
->thread
.fsindex
== FS_TLS_SEL
&&
313 task
->thread
.fs
== 0))
315 task
->thread
.fsindex
= value
;
317 loadsegment(fs
, task
->thread
.fsindex
);
319 case offsetof(struct user_regs_struct
,gs
):
321 * If this is setting gs as for normal 64-bit use but
322 * setting gs_base has implicitly changed it, leave it.
324 if ((value
== GS_TLS_SEL
&& task
->thread
.gsindex
== 0 &&
325 task
->thread
.gs
!= 0) ||
326 (value
== 0 && task
->thread
.gsindex
== GS_TLS_SEL
&&
327 task
->thread
.gs
== 0))
329 task
->thread
.gsindex
= value
;
331 load_gs_index(task
->thread
.gsindex
);
333 case offsetof(struct user_regs_struct
,ds
):
334 task
->thread
.ds
= value
;
336 loadsegment(ds
, task
->thread
.ds
);
338 case offsetof(struct user_regs_struct
,es
):
339 task
->thread
.es
= value
;
341 loadsegment(es
, task
->thread
.es
);
345 * Can't actually change these in 64-bit mode.
347 case offsetof(struct user_regs_struct
,cs
):
348 if (unlikely(value
== 0))
350 task_pt_regs(task
)->cs
= value
;
352 case offsetof(struct user_regs_struct
,ss
):
353 if (unlikely(value
== 0))
355 task_pt_regs(task
)->ss
= value
;
362 #endif /* CONFIG_X86_32 */
364 static unsigned long get_flags(struct task_struct
*task
)
366 unsigned long retval
= task_pt_regs(task
)->flags
;
369 * If the debugger set TF, hide it from the readout.
371 if (test_tsk_thread_flag(task
, TIF_FORCED_TF
))
372 retval
&= ~X86_EFLAGS_TF
;
377 static int set_flags(struct task_struct
*task
, unsigned long value
)
379 struct pt_regs
*regs
= task_pt_regs(task
);
382 * If the user value contains TF, mark that
383 * it was not "us" (the debugger) that set it.
384 * If not, make sure it stays set if we had.
386 if (value
& X86_EFLAGS_TF
)
387 clear_tsk_thread_flag(task
, TIF_FORCED_TF
);
388 else if (test_tsk_thread_flag(task
, TIF_FORCED_TF
))
389 value
|= X86_EFLAGS_TF
;
391 regs
->flags
= (regs
->flags
& ~FLAG_MASK
) | (value
& FLAG_MASK
);
396 static int putreg(struct task_struct
*child
,
397 unsigned long offset
, unsigned long value
)
400 case offsetof(struct user_regs_struct
, cs
):
401 case offsetof(struct user_regs_struct
, ds
):
402 case offsetof(struct user_regs_struct
, es
):
403 case offsetof(struct user_regs_struct
, fs
):
404 case offsetof(struct user_regs_struct
, gs
):
405 case offsetof(struct user_regs_struct
, ss
):
406 return set_segment_reg(child
, offset
, value
);
408 case offsetof(struct user_regs_struct
, flags
):
409 return set_flags(child
, value
);
412 case offsetof(struct user_regs_struct
,fs_base
):
413 if (value
>= TASK_SIZE_OF(child
))
416 * When changing the segment base, use do_arch_prctl
417 * to set either thread.fs or thread.fsindex and the
418 * corresponding GDT slot.
420 if (child
->thread
.fs
!= value
)
421 return do_arch_prctl(child
, ARCH_SET_FS
, value
);
423 case offsetof(struct user_regs_struct
,gs_base
):
425 * Exactly the same here as the %fs handling above.
427 if (value
>= TASK_SIZE_OF(child
))
429 if (child
->thread
.gs
!= value
)
430 return do_arch_prctl(child
, ARCH_SET_GS
, value
);
435 *pt_regs_access(task_pt_regs(child
), offset
) = value
;
439 static unsigned long getreg(struct task_struct
*task
, unsigned long offset
)
442 case offsetof(struct user_regs_struct
, cs
):
443 case offsetof(struct user_regs_struct
, ds
):
444 case offsetof(struct user_regs_struct
, es
):
445 case offsetof(struct user_regs_struct
, fs
):
446 case offsetof(struct user_regs_struct
, gs
):
447 case offsetof(struct user_regs_struct
, ss
):
448 return get_segment_reg(task
, offset
);
450 case offsetof(struct user_regs_struct
, flags
):
451 return get_flags(task
);
454 case offsetof(struct user_regs_struct
, fs_base
): {
456 * do_arch_prctl may have used a GDT slot instead of
457 * the MSR. To userland, it appears the same either
458 * way, except the %fs segment selector might not be 0.
460 unsigned int seg
= task
->thread
.fsindex
;
461 if (task
->thread
.fs
!= 0)
462 return task
->thread
.fs
;
464 asm("movl %%fs,%0" : "=r" (seg
));
465 if (seg
!= FS_TLS_SEL
)
467 return get_desc_base(&task
->thread
.tls_array
[FS_TLS
]);
469 case offsetof(struct user_regs_struct
, gs_base
): {
471 * Exactly the same here as the %fs handling above.
473 unsigned int seg
= task
->thread
.gsindex
;
474 if (task
->thread
.gs
!= 0)
475 return task
->thread
.gs
;
477 asm("movl %%gs,%0" : "=r" (seg
));
478 if (seg
!= GS_TLS_SEL
)
480 return get_desc_base(&task
->thread
.tls_array
[GS_TLS
]);
485 return *pt_regs_access(task_pt_regs(task
), offset
);
488 static int genregs_get(struct task_struct
*target
,
489 const struct user_regset
*regset
,
490 unsigned int pos
, unsigned int count
,
491 void *kbuf
, void __user
*ubuf
)
494 unsigned long *k
= kbuf
;
495 while (count
>= sizeof(*k
)) {
496 *k
++ = getreg(target
, pos
);
501 unsigned long __user
*u
= ubuf
;
502 while (count
>= sizeof(*u
)) {
503 if (__put_user(getreg(target
, pos
), u
++))
513 static int genregs_set(struct task_struct
*target
,
514 const struct user_regset
*regset
,
515 unsigned int pos
, unsigned int count
,
516 const void *kbuf
, const void __user
*ubuf
)
520 const unsigned long *k
= kbuf
;
521 while (count
>= sizeof(*k
) && !ret
) {
522 ret
= putreg(target
, pos
, *k
++);
527 const unsigned long __user
*u
= ubuf
;
528 while (count
>= sizeof(*u
) && !ret
) {
530 ret
= __get_user(word
, u
++);
533 ret
= putreg(target
, pos
, word
);
541 static void ptrace_triggered(struct perf_event
*bp
,
542 struct perf_sample_data
*data
,
543 struct pt_regs
*regs
)
546 struct thread_struct
*thread
= &(current
->thread
);
549 * Store in the virtual DR6 register the fact that the breakpoint
550 * was hit so the thread's debugger will see it.
552 for (i
= 0; i
< HBP_NUM
; i
++) {
553 if (thread
->ptrace_bps
[i
] == bp
)
557 thread
->debugreg6
|= (DR_TRAP0
<< i
);
561 * Walk through every ptrace breakpoints for this thread and
562 * build the dr7 value on top of their attributes.
565 static unsigned long ptrace_get_dr7(struct perf_event
*bp
[])
569 struct arch_hw_breakpoint
*info
;
571 for (i
= 0; i
< HBP_NUM
; i
++) {
572 if (bp
[i
] && !bp
[i
]->attr
.disabled
) {
573 info
= counter_arch_bp(bp
[i
]);
574 dr7
|= encode_dr7(i
, info
->len
, info
->type
);
581 static int ptrace_fill_bp_fields(struct perf_event_attr
*attr
,
582 int len
, int type
, bool disabled
)
584 int err
, bp_len
, bp_type
;
586 err
= arch_bp_generic_fields(len
, type
, &bp_len
, &bp_type
);
588 attr
->bp_len
= bp_len
;
589 attr
->bp_type
= bp_type
;
590 attr
->disabled
= disabled
;
596 static struct perf_event
*
597 ptrace_register_breakpoint(struct task_struct
*tsk
, int len
, int type
,
598 unsigned long addr
, bool disabled
)
600 struct perf_event_attr attr
;
603 ptrace_breakpoint_init(&attr
);
606 err
= ptrace_fill_bp_fields(&attr
, len
, type
, disabled
);
610 return register_user_hw_breakpoint(&attr
, ptrace_triggered
,
614 static int ptrace_modify_breakpoint(struct perf_event
*bp
, int len
, int type
,
617 struct perf_event_attr attr
= bp
->attr
;
620 err
= ptrace_fill_bp_fields(&attr
, len
, type
, disabled
);
624 return modify_user_hw_breakpoint(bp
, &attr
);
628 * Handle ptrace writes to debug register 7.
630 static int ptrace_write_dr7(struct task_struct
*tsk
, unsigned long data
)
632 struct thread_struct
*thread
= &tsk
->thread
;
633 unsigned long old_dr7
;
634 bool second_pass
= false;
637 data
&= ~DR_CONTROL_RESERVED
;
638 old_dr7
= ptrace_get_dr7(thread
->ptrace_bps
);
642 for (i
= 0; i
< HBP_NUM
; i
++) {
644 bool disabled
= !decode_dr7(data
, i
, &len
, &type
);
645 struct perf_event
*bp
= thread
->ptrace_bps
[i
];
651 bp
= ptrace_register_breakpoint(tsk
,
652 len
, type
, 0, disabled
);
658 thread
->ptrace_bps
[i
] = bp
;
662 rc
= ptrace_modify_breakpoint(bp
, len
, type
, disabled
);
667 /* Restore if the first pass failed, second_pass shouldn't fail. */
668 if (rc
&& !WARN_ON(second_pass
)) {
679 * Handle PTRACE_PEEKUSR calls for the debug register area.
681 static unsigned long ptrace_get_debugreg(struct task_struct
*tsk
, int n
)
683 struct thread_struct
*thread
= &tsk
->thread
;
684 unsigned long val
= 0;
687 struct perf_event
*bp
= thread
->ptrace_bps
[n
];
690 val
= bp
->hw
.info
.address
;
692 val
= thread
->debugreg6
;
694 val
= thread
->ptrace_dr7
;
699 static int ptrace_set_breakpoint_addr(struct task_struct
*tsk
, int nr
,
702 struct thread_struct
*t
= &tsk
->thread
;
703 struct perf_event
*bp
= t
->ptrace_bps
[nr
];
708 * Put stub len and type to create an inactive but correct bp.
710 * CHECKME: the previous code returned -EIO if the addr wasn't
711 * a valid task virtual addr. The new one will return -EINVAL in
713 * -EINVAL may be what we want for in-kernel breakpoints users,
714 * but -EIO looks better for ptrace, since we refuse a register
715 * writing for the user. And anyway this is the previous
718 bp
= ptrace_register_breakpoint(tsk
,
719 X86_BREAKPOINT_LEN_1
, X86_BREAKPOINT_WRITE
,
724 t
->ptrace_bps
[nr
] = bp
;
726 struct perf_event_attr attr
= bp
->attr
;
729 err
= modify_user_hw_breakpoint(bp
, &attr
);
736 * Handle PTRACE_POKEUSR calls for the debug register area.
738 static int ptrace_set_debugreg(struct task_struct
*tsk
, int n
,
741 struct thread_struct
*thread
= &tsk
->thread
;
742 /* There are no DR4 or DR5 registers */
746 rc
= ptrace_set_breakpoint_addr(tsk
, n
, val
);
748 thread
->debugreg6
= val
;
751 rc
= ptrace_write_dr7(tsk
, val
);
753 thread
->ptrace_dr7
= val
;
759 * These access the current or another (stopped) task's io permission
760 * bitmap for debugging or core dump.
762 static int ioperm_active(struct task_struct
*target
,
763 const struct user_regset
*regset
)
765 return target
->thread
.io_bitmap_max
/ regset
->size
;
768 static int ioperm_get(struct task_struct
*target
,
769 const struct user_regset
*regset
,
770 unsigned int pos
, unsigned int count
,
771 void *kbuf
, void __user
*ubuf
)
773 if (!target
->thread
.io_bitmap_ptr
)
776 return user_regset_copyout(&pos
, &count
, &kbuf
, &ubuf
,
777 target
->thread
.io_bitmap_ptr
,
782 * Called by kernel/ptrace.c when detaching..
784 * Make sure the single step bit is not set.
786 void ptrace_disable(struct task_struct
*child
)
788 user_disable_single_step(child
);
789 #ifdef TIF_SYSCALL_EMU
790 clear_tsk_thread_flag(child
, TIF_SYSCALL_EMU
);
794 #if defined CONFIG_X86_32 || defined CONFIG_IA32_EMULATION
795 static const struct user_regset_view user_x86_32_view
; /* Initialized below. */
798 long arch_ptrace(struct task_struct
*child
, long request
,
799 unsigned long addr
, unsigned long data
)
802 unsigned long __user
*datap
= (unsigned long __user
*)data
;
805 /* read the word at location addr in the USER area. */
806 case PTRACE_PEEKUSR
: {
810 if ((addr
& (sizeof(data
) - 1)) || addr
>= sizeof(struct user
))
813 tmp
= 0; /* Default return condition */
814 if (addr
< sizeof(struct user_regs_struct
))
815 tmp
= getreg(child
, addr
);
816 else if (addr
>= offsetof(struct user
, u_debugreg
[0]) &&
817 addr
<= offsetof(struct user
, u_debugreg
[7])) {
818 addr
-= offsetof(struct user
, u_debugreg
[0]);
819 tmp
= ptrace_get_debugreg(child
, addr
/ sizeof(data
));
821 ret
= put_user(tmp
, datap
);
825 case PTRACE_POKEUSR
: /* write the word at location addr in the USER area */
827 if ((addr
& (sizeof(data
) - 1)) || addr
>= sizeof(struct user
))
830 if (addr
< sizeof(struct user_regs_struct
))
831 ret
= putreg(child
, addr
, data
);
832 else if (addr
>= offsetof(struct user
, u_debugreg
[0]) &&
833 addr
<= offsetof(struct user
, u_debugreg
[7])) {
834 addr
-= offsetof(struct user
, u_debugreg
[0]);
835 ret
= ptrace_set_debugreg(child
,
836 addr
/ sizeof(data
), data
);
840 case PTRACE_GETREGS
: /* Get all gp regs from the child. */
841 return copy_regset_to_user(child
,
842 task_user_regset_view(current
),
844 0, sizeof(struct user_regs_struct
),
847 case PTRACE_SETREGS
: /* Set all gp regs in the child. */
848 return copy_regset_from_user(child
,
849 task_user_regset_view(current
),
851 0, sizeof(struct user_regs_struct
),
854 case PTRACE_GETFPREGS
: /* Get the child FPU state. */
855 return copy_regset_to_user(child
,
856 task_user_regset_view(current
),
858 0, sizeof(struct user_i387_struct
),
861 case PTRACE_SETFPREGS
: /* Set the child FPU state. */
862 return copy_regset_from_user(child
,
863 task_user_regset_view(current
),
865 0, sizeof(struct user_i387_struct
),
869 case PTRACE_GETFPXREGS
: /* Get the child extended FPU state. */
870 return copy_regset_to_user(child
, &user_x86_32_view
,
872 0, sizeof(struct user_fxsr_struct
),
875 case PTRACE_SETFPXREGS
: /* Set the child extended FPU state. */
876 return copy_regset_from_user(child
, &user_x86_32_view
,
878 0, sizeof(struct user_fxsr_struct
),
882 #if defined CONFIG_X86_32 || defined CONFIG_IA32_EMULATION
883 case PTRACE_GET_THREAD_AREA
:
886 ret
= do_get_thread_area(child
, addr
,
887 (struct user_desc __user
*)data
);
890 case PTRACE_SET_THREAD_AREA
:
893 ret
= do_set_thread_area(child
, addr
,
894 (struct user_desc __user
*)data
, 0);
899 /* normal 64bit interface to access TLS data.
900 Works just like arch_prctl, except that the arguments
902 case PTRACE_ARCH_PRCTL
:
903 ret
= do_arch_prctl(child
, data
, addr
);
908 ret
= ptrace_request(child
, request
, addr
, data
);
915 #ifdef CONFIG_IA32_EMULATION
917 #include <linux/compat.h>
918 #include <linux/syscalls.h>
919 #include <asm/ia32.h>
920 #include <asm/user32.h>
923 case offsetof(struct user32, regs.l): \
924 regs->q = value; break
927 case offsetof(struct user32, regs.rs): \
928 return set_segment_reg(child, \
929 offsetof(struct user_regs_struct, rs), \
933 static int putreg32(struct task_struct
*child
, unsigned regno
, u32 value
)
935 struct pt_regs
*regs
= task_pt_regs(child
);
956 case offsetof(struct user32
, regs
.orig_eax
):
958 * A 32-bit debugger setting orig_eax means to restore
959 * the state of the task restarting a 32-bit syscall.
960 * Make sure we interpret the -ERESTART* codes correctly
961 * in case the task is not actually still sitting at the
962 * exit from a 32-bit syscall with TS_COMPAT still set.
964 regs
->orig_ax
= value
;
965 if (syscall_get_nr(child
, regs
) >= 0)
966 task_thread_info(child
)->status
|= TS_COMPAT
;
969 case offsetof(struct user32
, regs
.eflags
):
970 return set_flags(child
, value
);
972 case offsetof(struct user32
, u_debugreg
[0]) ...
973 offsetof(struct user32
, u_debugreg
[7]):
974 regno
-= offsetof(struct user32
, u_debugreg
[0]);
975 return ptrace_set_debugreg(child
, regno
/ 4, value
);
978 if (regno
> sizeof(struct user32
) || (regno
& 3))
982 * Other dummy fields in the virtual user structure
994 case offsetof(struct user32, regs.l): \
995 *val = regs->q; break
998 case offsetof(struct user32, regs.rs): \
999 *val = get_segment_reg(child, \
1000 offsetof(struct user_regs_struct, rs)); \
1003 static int getreg32(struct task_struct
*child
, unsigned regno
, u32
*val
)
1005 struct pt_regs
*regs
= task_pt_regs(child
);
1023 R32(orig_eax
, orig_ax
);
1027 case offsetof(struct user32
, regs
.eflags
):
1028 *val
= get_flags(child
);
1031 case offsetof(struct user32
, u_debugreg
[0]) ...
1032 offsetof(struct user32
, u_debugreg
[7]):
1033 regno
-= offsetof(struct user32
, u_debugreg
[0]);
1034 *val
= ptrace_get_debugreg(child
, regno
/ 4);
1038 if (regno
> sizeof(struct user32
) || (regno
& 3))
1042 * Other dummy fields in the virtual user structure
1054 static int genregs32_get(struct task_struct
*target
,
1055 const struct user_regset
*regset
,
1056 unsigned int pos
, unsigned int count
,
1057 void *kbuf
, void __user
*ubuf
)
1060 compat_ulong_t
*k
= kbuf
;
1061 while (count
>= sizeof(*k
)) {
1062 getreg32(target
, pos
, k
++);
1063 count
-= sizeof(*k
);
1067 compat_ulong_t __user
*u
= ubuf
;
1068 while (count
>= sizeof(*u
)) {
1069 compat_ulong_t word
;
1070 getreg32(target
, pos
, &word
);
1071 if (__put_user(word
, u
++))
1073 count
-= sizeof(*u
);
1081 static int genregs32_set(struct task_struct
*target
,
1082 const struct user_regset
*regset
,
1083 unsigned int pos
, unsigned int count
,
1084 const void *kbuf
, const void __user
*ubuf
)
1088 const compat_ulong_t
*k
= kbuf
;
1089 while (count
>= sizeof(*k
) && !ret
) {
1090 ret
= putreg32(target
, pos
, *k
++);
1091 count
-= sizeof(*k
);
1095 const compat_ulong_t __user
*u
= ubuf
;
1096 while (count
>= sizeof(*u
) && !ret
) {
1097 compat_ulong_t word
;
1098 ret
= __get_user(word
, u
++);
1101 ret
= putreg32(target
, pos
, word
);
1102 count
-= sizeof(*u
);
1109 static long ia32_arch_ptrace(struct task_struct
*child
, compat_long_t request
,
1110 compat_ulong_t caddr
, compat_ulong_t cdata
)
1112 unsigned long addr
= caddr
;
1113 unsigned long data
= cdata
;
1114 void __user
*datap
= compat_ptr(data
);
1119 case PTRACE_PEEKUSR
:
1120 ret
= getreg32(child
, addr
, &val
);
1122 ret
= put_user(val
, (__u32 __user
*)datap
);
1125 case PTRACE_POKEUSR
:
1126 ret
= putreg32(child
, addr
, data
);
1129 case PTRACE_GETREGS
: /* Get all gp regs from the child. */
1130 return copy_regset_to_user(child
, &user_x86_32_view
,
1132 0, sizeof(struct user_regs_struct32
),
1135 case PTRACE_SETREGS
: /* Set all gp regs in the child. */
1136 return copy_regset_from_user(child
, &user_x86_32_view
,
1138 sizeof(struct user_regs_struct32
),
1141 case PTRACE_GETFPREGS
: /* Get the child FPU state. */
1142 return copy_regset_to_user(child
, &user_x86_32_view
,
1144 sizeof(struct user_i387_ia32_struct
),
1147 case PTRACE_SETFPREGS
: /* Set the child FPU state. */
1148 return copy_regset_from_user(
1149 child
, &user_x86_32_view
, REGSET_FP
,
1150 0, sizeof(struct user_i387_ia32_struct
), datap
);
1152 case PTRACE_GETFPXREGS
: /* Get the child extended FPU state. */
1153 return copy_regset_to_user(child
, &user_x86_32_view
,
1155 sizeof(struct user32_fxsr_struct
),
1158 case PTRACE_SETFPXREGS
: /* Set the child extended FPU state. */
1159 return copy_regset_from_user(child
, &user_x86_32_view
,
1161 sizeof(struct user32_fxsr_struct
),
1164 case PTRACE_GET_THREAD_AREA
:
1165 case PTRACE_SET_THREAD_AREA
:
1166 return arch_ptrace(child
, request
, addr
, data
);
1169 return compat_ptrace_request(child
, request
, addr
, data
);
1174 #endif /* CONFIG_IA32_EMULATION */
1176 #ifdef CONFIG_X86_X32_ABI
1177 static long x32_arch_ptrace(struct task_struct
*child
,
1178 compat_long_t request
, compat_ulong_t caddr
,
1179 compat_ulong_t cdata
)
1181 unsigned long addr
= caddr
;
1182 unsigned long data
= cdata
;
1183 void __user
*datap
= compat_ptr(data
);
1187 /* Read 32bits at location addr in the USER area. Only allow
1188 to return the lower 32bits of segment and debug registers. */
1189 case PTRACE_PEEKUSR
: {
1193 if ((addr
& (sizeof(data
) - 1)) || addr
>= sizeof(struct user
) ||
1194 addr
< offsetof(struct user_regs_struct
, cs
))
1197 tmp
= 0; /* Default return condition */
1198 if (addr
< sizeof(struct user_regs_struct
))
1199 tmp
= getreg(child
, addr
);
1200 else if (addr
>= offsetof(struct user
, u_debugreg
[0]) &&
1201 addr
<= offsetof(struct user
, u_debugreg
[7])) {
1202 addr
-= offsetof(struct user
, u_debugreg
[0]);
1203 tmp
= ptrace_get_debugreg(child
, addr
/ sizeof(data
));
1205 ret
= put_user(tmp
, (__u32 __user
*)datap
);
1209 /* Write the word at location addr in the USER area. Only allow
1210 to update segment and debug registers with the upper 32bits
1212 case PTRACE_POKEUSR
:
1214 if ((addr
& (sizeof(data
) - 1)) || addr
>= sizeof(struct user
) ||
1215 addr
< offsetof(struct user_regs_struct
, cs
))
1218 if (addr
< sizeof(struct user_regs_struct
))
1219 ret
= putreg(child
, addr
, data
);
1220 else if (addr
>= offsetof(struct user
, u_debugreg
[0]) &&
1221 addr
<= offsetof(struct user
, u_debugreg
[7])) {
1222 addr
-= offsetof(struct user
, u_debugreg
[0]);
1223 ret
= ptrace_set_debugreg(child
,
1224 addr
/ sizeof(data
), data
);
1228 case PTRACE_GETREGS
: /* Get all gp regs from the child. */
1229 return copy_regset_to_user(child
,
1230 task_user_regset_view(current
),
1232 0, sizeof(struct user_regs_struct
),
1235 case PTRACE_SETREGS
: /* Set all gp regs in the child. */
1236 return copy_regset_from_user(child
,
1237 task_user_regset_view(current
),
1239 0, sizeof(struct user_regs_struct
),
1242 case PTRACE_GETFPREGS
: /* Get the child FPU state. */
1243 return copy_regset_to_user(child
,
1244 task_user_regset_view(current
),
1246 0, sizeof(struct user_i387_struct
),
1249 case PTRACE_SETFPREGS
: /* Set the child FPU state. */
1250 return copy_regset_from_user(child
,
1251 task_user_regset_view(current
),
1253 0, sizeof(struct user_i387_struct
),
1257 return compat_ptrace_request(child
, request
, addr
, data
);
1264 #ifdef CONFIG_COMPAT
1265 long compat_arch_ptrace(struct task_struct
*child
, compat_long_t request
,
1266 compat_ulong_t caddr
, compat_ulong_t cdata
)
1268 #ifdef CONFIG_X86_X32_ABI
1269 if (!is_ia32_task())
1270 return x32_arch_ptrace(child
, request
, caddr
, cdata
);
1272 #ifdef CONFIG_IA32_EMULATION
1273 return ia32_arch_ptrace(child
, request
, caddr
, cdata
);
1278 #endif /* CONFIG_COMPAT */
1280 #ifdef CONFIG_X86_64
1282 static struct user_regset x86_64_regsets
[] __read_mostly
= {
1283 [REGSET_GENERAL
] = {
1284 .core_note_type
= NT_PRSTATUS
,
1285 .n
= sizeof(struct user_regs_struct
) / sizeof(long),
1286 .size
= sizeof(long), .align
= sizeof(long),
1287 .get
= genregs_get
, .set
= genregs_set
1290 .core_note_type
= NT_PRFPREG
,
1291 .n
= sizeof(struct user_i387_struct
) / sizeof(long),
1292 .size
= sizeof(long), .align
= sizeof(long),
1293 .active
= regset_xregset_fpregs_active
, .get
= xfpregs_get
, .set
= xfpregs_set
1296 .core_note_type
= NT_X86_XSTATE
,
1297 .size
= sizeof(u64
), .align
= sizeof(u64
),
1298 .active
= xstateregs_active
, .get
= xstateregs_get
,
1299 .set
= xstateregs_set
1301 [REGSET_IOPERM64
] = {
1302 .core_note_type
= NT_386_IOPERM
,
1303 .n
= IO_BITMAP_LONGS
,
1304 .size
= sizeof(long), .align
= sizeof(long),
1305 .active
= ioperm_active
, .get
= ioperm_get
1309 static const struct user_regset_view user_x86_64_view
= {
1310 .name
= "x86_64", .e_machine
= EM_X86_64
,
1311 .regsets
= x86_64_regsets
, .n
= ARRAY_SIZE(x86_64_regsets
)
1314 #else /* CONFIG_X86_32 */
1316 #define user_regs_struct32 user_regs_struct
1317 #define genregs32_get genregs_get
1318 #define genregs32_set genregs_set
1320 #endif /* CONFIG_X86_64 */
1322 #if defined CONFIG_X86_32 || defined CONFIG_IA32_EMULATION
1323 static struct user_regset x86_32_regsets
[] __read_mostly
= {
1324 [REGSET_GENERAL
] = {
1325 .core_note_type
= NT_PRSTATUS
,
1326 .n
= sizeof(struct user_regs_struct32
) / sizeof(u32
),
1327 .size
= sizeof(u32
), .align
= sizeof(u32
),
1328 .get
= genregs32_get
, .set
= genregs32_set
1331 .core_note_type
= NT_PRFPREG
,
1332 .n
= sizeof(struct user_i387_ia32_struct
) / sizeof(u32
),
1333 .size
= sizeof(u32
), .align
= sizeof(u32
),
1334 .active
= regset_fpregs_active
, .get
= fpregs_get
, .set
= fpregs_set
1337 .core_note_type
= NT_PRXFPREG
,
1338 .n
= sizeof(struct user32_fxsr_struct
) / sizeof(u32
),
1339 .size
= sizeof(u32
), .align
= sizeof(u32
),
1340 .active
= regset_xregset_fpregs_active
, .get
= xfpregs_get
, .set
= xfpregs_set
1343 .core_note_type
= NT_X86_XSTATE
,
1344 .size
= sizeof(u64
), .align
= sizeof(u64
),
1345 .active
= xstateregs_active
, .get
= xstateregs_get
,
1346 .set
= xstateregs_set
1349 .core_note_type
= NT_386_TLS
,
1350 .n
= GDT_ENTRY_TLS_ENTRIES
, .bias
= GDT_ENTRY_TLS_MIN
,
1351 .size
= sizeof(struct user_desc
),
1352 .align
= sizeof(struct user_desc
),
1353 .active
= regset_tls_active
,
1354 .get
= regset_tls_get
, .set
= regset_tls_set
1356 [REGSET_IOPERM32
] = {
1357 .core_note_type
= NT_386_IOPERM
,
1358 .n
= IO_BITMAP_BYTES
/ sizeof(u32
),
1359 .size
= sizeof(u32
), .align
= sizeof(u32
),
1360 .active
= ioperm_active
, .get
= ioperm_get
1364 static const struct user_regset_view user_x86_32_view
= {
1365 .name
= "i386", .e_machine
= EM_386
,
1366 .regsets
= x86_32_regsets
, .n
= ARRAY_SIZE(x86_32_regsets
)
1371 * This represents bytes 464..511 in the memory layout exported through
1372 * the REGSET_XSTATE interface.
1374 u64 xstate_fx_sw_bytes
[USER_XSTATE_FX_SW_WORDS
];
1376 void update_regset_xstate_info(unsigned int size
, u64 xstate_mask
)
1378 #ifdef CONFIG_X86_64
1379 x86_64_regsets
[REGSET_XSTATE
].n
= size
/ sizeof(u64
);
1381 #if defined CONFIG_X86_32 || defined CONFIG_IA32_EMULATION
1382 x86_32_regsets
[REGSET_XSTATE
].n
= size
/ sizeof(u64
);
1384 xstate_fx_sw_bytes
[USER_XSTATE_XCR0_WORD
] = xstate_mask
;
1387 const struct user_regset_view
*task_user_regset_view(struct task_struct
*task
)
1389 #ifdef CONFIG_IA32_EMULATION
1390 if (test_tsk_thread_flag(task
, TIF_IA32
))
1392 #if defined CONFIG_X86_32 || defined CONFIG_IA32_EMULATION
1393 return &user_x86_32_view
;
1395 #ifdef CONFIG_X86_64
1396 return &user_x86_64_view
;
1400 static void fill_sigtrap_info(struct task_struct
*tsk
,
1401 struct pt_regs
*regs
,
1402 int error_code
, int si_code
,
1403 struct siginfo
*info
)
1405 tsk
->thread
.trap_nr
= X86_TRAP_DB
;
1406 tsk
->thread
.error_code
= error_code
;
1408 memset(info
, 0, sizeof(*info
));
1409 info
->si_signo
= SIGTRAP
;
1410 info
->si_code
= si_code
;
1411 info
->si_addr
= user_mode(regs
) ? (void __user
*)regs
->ip
: NULL
;
1414 void user_single_step_siginfo(struct task_struct
*tsk
,
1415 struct pt_regs
*regs
,
1416 struct siginfo
*info
)
1418 fill_sigtrap_info(tsk
, regs
, 0, TRAP_BRKPT
, info
);
1421 void send_sigtrap(struct task_struct
*tsk
, struct pt_regs
*regs
,
1422 int error_code
, int si_code
)
1424 struct siginfo info
;
1426 fill_sigtrap_info(tsk
, regs
, error_code
, si_code
, &info
);
1427 /* Send us the fake SIGTRAP */
1428 force_sig_info(SIGTRAP
, &info
, tsk
);