2 * Copyright (C) 2002 - 2007 Jeff Dike (jdike@{addtoit,linux.intel}.com)
3 * Licensed under the GPL
13 #include <sys/ptrace.h>
15 #include <asm/unistd.h>
19 #include <skas_ptrace.h>
21 #define ARBITRARY_ADDR -1
22 #define FAILURE_PID -1
24 #define STAT_PATH_LEN sizeof("/proc/#######/stat\0")
25 #define COMM_SCANF "%*[^)])"
27 unsigned long os_process_pc(int pid
)
29 char proc_stat
[STAT_PATH_LEN
], buf
[256];
30 unsigned long pc
= ARBITRARY_ADDR
;
33 sprintf(proc_stat
, "/proc/%d/stat", pid
);
34 fd
= open(proc_stat
, O_RDONLY
, 0);
36 printk(UM_KERN_ERR
"os_process_pc - couldn't open '%s', "
37 "errno = %d\n", proc_stat
, errno
);
40 CATCH_EINTR(err
= read(fd
, buf
, sizeof(buf
)));
42 printk(UM_KERN_ERR
"os_process_pc - couldn't read '%s', "
43 "err = %d\n", proc_stat
, errno
);
48 if (sscanf(buf
, "%*d " COMM_SCANF
" %*c %*d %*d %*d %*d %*d %*d %*d "
49 "%*d %*d %*d %*d %*d %*d %*d %*d %*d %*d %*d %*d %*d %*d "
50 "%*d %*d %*d %*d %*d %lu", &pc
) != 1)
51 printk(UM_KERN_ERR
"os_process_pc - couldn't find pc in '%s'\n",
59 int os_process_parent(int pid
)
61 char stat
[STAT_PATH_LEN
];
63 int parent
= FAILURE_PID
, n
, fd
;
68 snprintf(stat
, sizeof(stat
), "/proc/%d/stat", pid
);
69 fd
= open(stat
, O_RDONLY
, 0);
71 printk(UM_KERN_ERR
"Couldn't open '%s', errno = %d\n", stat
,
76 CATCH_EINTR(n
= read(fd
, data
, sizeof(data
)));
80 printk(UM_KERN_ERR
"Couldn't read '%s', errno = %d\n", stat
,
86 n
= sscanf(data
, "%*d " COMM_SCANF
" %*c %d", &parent
);
88 printk(UM_KERN_ERR
"Failed to scan '%s'\n", data
);
93 void os_stop_process(int pid
)
98 void os_kill_process(int pid
, int reap_child
)
102 CATCH_EINTR(waitpid(pid
, NULL
, __WALL
));
105 /* This is here uniquely to have access to the userspace errno, i.e. the one
106 * used by ptrace in case of error.
109 long os_ptrace_ldt(long pid
, long addr
, long data
)
113 ret
= ptrace(PTRACE_LDT
, pid
, addr
, data
);
120 /* Kill off a ptraced child by all means available. kill it normally first,
121 * then PTRACE_KILL it, then PTRACE_CONT it in case it's in a run state from
122 * which it can't exit directly.
125 void os_kill_ptraced_process(int pid
, int reap_child
)
128 ptrace(PTRACE_KILL
, pid
);
129 ptrace(PTRACE_CONT
, pid
);
131 CATCH_EINTR(waitpid(pid
, NULL
, __WALL
));
134 /* Don't use the glibc version, which caches the result in TLS. It misses some
135 * syscalls, and also breaks with clone(), which does not unshare the TLS.
140 return syscall(__NR_getpid
);
148 int os_map_memory(void *virt
, int fd
, unsigned long long off
, unsigned long len
,
154 prot
= (r
? PROT_READ
: 0) | (w
? PROT_WRITE
: 0) |
157 loc
= mmap64((void *) virt
, len
, prot
, MAP_SHARED
| MAP_FIXED
,
159 if (loc
== MAP_FAILED
)
164 int os_protect_memory(void *addr
, unsigned long len
, int r
, int w
, int x
)
166 int prot
= ((r
? PROT_READ
: 0) | (w
? PROT_WRITE
: 0) |
167 (x
? PROT_EXEC
: 0));
169 if (mprotect(addr
, len
, prot
) < 0)
175 int os_unmap_memory(void *addr
, int len
)
179 err
= munmap(addr
, len
);
186 #define MADV_REMOVE KERNEL_MADV_REMOVE
189 int os_drop_memory(void *addr
, int length
)
193 err
= madvise(addr
, length
, MADV_REMOVE
);
199 int __init
can_drop_memory(void)
204 printk(UM_KERN_INFO
"Checking host MADV_REMOVE support...");
205 fd
= create_mem_file(UM_KERN_PAGE_SIZE
);
207 printk(UM_KERN_ERR
"Creating test memory file failed, "
212 addr
= mmap64(NULL
, UM_KERN_PAGE_SIZE
, PROT_READ
| PROT_WRITE
,
214 if (addr
== MAP_FAILED
) {
215 printk(UM_KERN_ERR
"Mapping test memory file failed, "
216 "err = %d\n", -errno
);
220 if (madvise(addr
, UM_KERN_PAGE_SIZE
, MADV_REMOVE
) != 0) {
221 printk(UM_KERN_ERR
"MADV_REMOVE failed, err = %d\n", -errno
);
225 printk(UM_KERN_CONT
"OK\n");
229 munmap(addr
, UM_KERN_PAGE_SIZE
);
236 static int os_page_mincore(void *addr
)
241 ret
= mincore(addr
, UM_KERN_PAGE_SIZE
, vec
);
243 if (errno
== ENOMEM
|| errno
== EINVAL
)
252 int os_mincore(void *addr
, unsigned long len
)
257 if (len
<= UM_KERN_PAGE_SIZE
)
258 return os_page_mincore(addr
);
260 vec
= calloc(1, (len
+ UM_KERN_PAGE_SIZE
- 1) / UM_KERN_PAGE_SIZE
);
264 ret
= mincore(addr
, UM_KERN_PAGE_SIZE
, vec
);
266 if (errno
== ENOMEM
|| errno
== EINVAL
)
274 for (i
= 0; i
< ((len
+ UM_KERN_PAGE_SIZE
- 1) / UM_KERN_PAGE_SIZE
); i
++) {
287 void init_new_thread_signals(void)
289 set_handler(SIGSEGV
);
290 set_handler(SIGTRAP
);
294 signal(SIGHUP
, SIG_IGN
);
296 signal(SIGWINCH
, SIG_IGN
);