2 * Copyright (C) 2002 Jeff Dike (jdike@karaya.com)
3 * Licensed under the GPL
9 #include <linux/stddef.h>
10 #include <sys/ptrace.h>
11 #include <asm/ptrace.h>
13 #include "kern_util.h"
14 #include "sysdep/thread.h"
18 int ptrace_getregs(long pid, unsigned long *regs_out)
20 return(ptrace(PTRACE_GETREGS, pid, 0, regs_out));
23 int ptrace_setregs(long pid, unsigned long *regs)
25 return(ptrace(PTRACE_SETREGS, pid, 0, regs));
28 int ptrace_getfpregs(long pid, unsigned long *regs)
30 return(ptrace(PTRACE_GETFPREGS, pid, 0, regs));
33 static void write_debugregs(int pid, unsigned long *regs)
39 nregs = sizeof(dummy->u_debugreg)/sizeof(dummy->u_debugreg[0]);
40 for(i = 0; i < nregs; i++){
41 if((i == 4) || (i == 5)) continue;
42 if(ptrace(PTRACE_POKEUSER, pid, &dummy->u_debugreg[i],
44 printk("write_debugregs - ptrace failed on "
45 "register %d, errno = %d\n", errno);
49 static void read_debugregs(int pid, unsigned long *regs)
55 nregs = sizeof(dummy->u_debugreg)/sizeof(dummy->u_debugreg[0]);
56 for(i = 0; i < nregs; i++){
57 regs[i] = ptrace(PTRACE_PEEKUSER, pid,
58 &dummy->u_debugreg[i], 0);
62 /* Accessed only by the tracing thread */
63 static unsigned long kernel_debugregs[8] = { [ 0 ... 7 ] = 0 };
64 static int debugregs_seq = 0;
66 void arch_enter_kernel(void *task, int pid)
68 read_debugregs(pid, TASK_DEBUGREGS(task));
69 write_debugregs(pid, kernel_debugregs);
72 void arch_leave_kernel(void *task, int pid)
74 read_debugregs(pid, kernel_debugregs);
75 write_debugregs(pid, TASK_DEBUGREGS(task));
78 void ptrace_pokeuser(unsigned long addr, unsigned long data)
80 if((addr < offsetof(struct user, u_debugreg[0])) ||
81 (addr > offsetof(struct user, u_debugreg[7])))
83 addr -= offsetof(struct user, u_debugreg[0]);
85 if(kernel_debugregs[addr] == data) return;
87 kernel_debugregs[addr] = data;
91 static void update_debugregs_cb(void *arg)
93 int pid = *((int *) arg);
95 write_debugregs(pid, kernel_debugregs);
98 void update_debugregs(int seq)
102 if(seq == debugregs_seq) return;
105 initial_thread_cb(update_debugregs_cb, &me);
109 * Overrides for Emacs so that we follow Linus's tabbing style.
110 * Emacs will notice this stuff at the end of the file and automatically
111 * adjust the settings for this buffer only. This must remain at the end
113 * ---------------------------------------------------------------------------
115 * c-file-style: "linux"