blob: 5a258a3aff7e95c0e8df629f922bd1d3c27568cd [file] [log] [blame]
Juan Cespedesd44c6b81998-09-25 14:48:42 +02001#if HAVE_CONFIG_H
2#include "config.h"
3#endif
4
Juan Cespedes5e01f651998-03-08 22:31:44 +01005#include <sys/types.h>
6#include <sys/wait.h>
7#include <signal.h>
8#include <sys/ptrace.h>
Juan Cespedes64c6dfb1998-07-14 13:49:47 +02009#include <asm/ptrace.h>
Juan Cespedes5e01f651998-03-08 22:31:44 +010010
11#include "ltrace.h"
12
Juan Cespedes5e0acdb1998-04-04 08:34:07 +020013#if (!defined(PTRACE_PEEKUSER) && defined(PTRACE_PEEKUSR))
14# define PTRACE_PEEKUSER PTRACE_PEEKUSR
15#endif
16
17#if (!defined(PTRACE_POKEUSER) && defined(PTRACE_POKEUSR))
18# define PTRACE_POKEUSER PTRACE_POKEUSR
19#endif
20
Juan Cespedes35d70631998-03-15 14:05:40 +010021/* Returns 1 if syscall, 2 if sysret, 0 otherwise.
Juan Cespedes5e01f651998-03-08 22:31:44 +010022 */
Juan Cespedesb1dd77d2002-03-03 00:22:06 +010023int
24syscall_p(struct process * proc, int status, int * sysnum) {
Juan Cespedes5e01f651998-03-08 22:31:44 +010025 if (WIFSTOPPED(status) && WSTOPSIG(status)==SIGTRAP) {
Juan Cespedes5e0acdb1998-04-04 08:34:07 +020026 *sysnum = ptrace(PTRACE_PEEKUSER, proc->pid, 4*ORIG_EAX, 0);
Juan Cespedes21c63a12001-07-07 20:56:56 +020027
28 if (proc->callstack_depth > 0 &&
29 proc->callstack[proc->callstack_depth-1].is_syscall) {
30 return 2;
31 }
32
Juan Cespedes35d70631998-03-15 14:05:40 +010033 if (*sysnum>=0) {
Juan Cespedes21c63a12001-07-07 20:56:56 +020034 return 1;
Juan Cespedesf0fdae91998-03-11 00:03:00 +010035 }
36 }
Juan Cespedes35d70631998-03-15 14:05:40 +010037 return 0;
Juan Cespedes5e01f651998-03-08 22:31:44 +010038}
39
Juan Cespedesb1dd77d2002-03-03 00:22:06 +010040void
41continue_after_breakpoint(struct process *proc, struct breakpoint * sbp) {
Juan Cespedes5b3ffdf2001-07-02 00:52:45 +020042 if (sbp->enabled) disable_breakpoint(proc->pid, sbp);
Juan Cespedes5e01f651998-03-08 22:31:44 +010043 ptrace(PTRACE_POKEUSER, proc->pid, 4*EIP, sbp->addr);
Juan Cespedes5b3ffdf2001-07-02 00:52:45 +020044 if (sbp->enabled == 0) {
Juan Cespedes5e01f651998-03-08 22:31:44 +010045 continue_process(proc->pid);
46 } else {
47 proc->breakpoint_being_enabled = sbp;
48 ptrace(PTRACE_SINGLESTEP, proc->pid, 0, 0);
49 }
50}
51
Juan Cespedesb1dd77d2002-03-03 00:22:06 +010052long
53gimme_arg(enum tof type, struct process * proc, int arg_num) {
Juan Cespedes5e01f651998-03-08 22:31:44 +010054 if (arg_num==-1) { /* return value */
Juan Cespedes5e0acdb1998-04-04 08:34:07 +020055 return ptrace(PTRACE_PEEKUSER, proc->pid, 4*EAX, 0);
Juan Cespedes5e01f651998-03-08 22:31:44 +010056 }
57
58 if (type==LT_TOF_FUNCTION) {
Juan Cespedes5e0acdb1998-04-04 08:34:07 +020059 return ptrace(PTRACE_PEEKTEXT, proc->pid, proc->stack_pointer+4*(arg_num+1), 0);
Juan Cespedes5e01f651998-03-08 22:31:44 +010060 } else if (type==LT_TOF_SYSCALL) {
61#if 0
62 switch(arg_num) {
Juan Cespedes5e0acdb1998-04-04 08:34:07 +020063 case 0: return ptrace(PTRACE_PEEKUSER, proc->pid, 4*EBX, 0);
64 case 1: return ptrace(PTRACE_PEEKUSER, proc->pid, 4*ECX, 0);
65 case 2: return ptrace(PTRACE_PEEKUSER, proc->pid, 4*EDX, 0);
66 case 3: return ptrace(PTRACE_PEEKUSER, proc->pid, 4*ESI, 0);
67 case 4: return ptrace(PTRACE_PEEKUSER, proc->pid, 4*EDI, 0);
Juan Cespedes5e01f651998-03-08 22:31:44 +010068 default:
69 fprintf(stderr, "gimme_arg called with wrong arguments\n");
70 exit(2);
71 }
72#else
Juan Cespedes5e0acdb1998-04-04 08:34:07 +020073 return ptrace(PTRACE_PEEKUSER, proc->pid, 4*arg_num, 0);
Juan Cespedes5e01f651998-03-08 22:31:44 +010074#endif
75 } else {
76 fprintf(stderr, "gimme_arg called with wrong arguments\n");
77 exit(1);
78 }
79
80 return 0;
81}