trace.c revision 65b53df7fa2577c4138aef86c115873eab684a0a
1#if HAVE_CONFIG_H 2#include "config.h" 3#endif 4 5#include <sys/types.h> 6#include <sys/wait.h> 7#include <signal.h> 8#include <sys/ptrace.h> 9#include <asm/ptrace.h> 10 11#include "ltrace.h" 12 13#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 21void get_arch_dep(struct process *proc) 22{ 23} 24 25/* Returns 1 if syscall, 2 if sysret, 0 otherwise. 26 */ 27int syscall_p(struct process *proc, int status, int *sysnum) 28{ 29 int depth; 30 31 if (WIFSTOPPED(status) 32 && WSTOPSIG(status) == (SIGTRAP | proc->tracesysgood)) { 33 *sysnum = ptrace(PTRACE_PEEKUSER, proc->pid, 4 * PT_ORIG_D0, 0); 34 if (*sysnum == -1) 35 return 0; 36 if (*sysnum >= 0) { 37 depth = proc->callstack_depth; 38 if (depth > 0 && 39 proc->callstack[depth - 1].is_syscall && 40 proc->callstack[depth - 1].c_un.syscall == 41 *sysnum) { 42 return 2; 43 } else { 44 return 1; 45 } 46 } 47 } 48 return 0; 49} 50 51long gimme_arg(enum tof type, struct process *proc, arg_type_info *info) 52{ 53 int arg_num = info->arg_num; 54 55 if (arg_num == -1) { /* return value */ 56 return ptrace(PTRACE_PEEKUSER, proc->pid, 4 * PT_D0, 0); 57 } 58 59 if (type == LT_TOF_FUNCTION || type == LT_TOF_FUNCTIONR) { 60 return ptrace(PTRACE_PEEKTEXT, proc->pid, 61 proc->stack_pointer + 4 * (arg_num + 1), 0); 62 } else if (type == LT_TOF_SYSCALL || type == LT_TOF_SYSCALLR) { 63#if 0 64 switch (arg_num) { 65 case 0: 66 return ptrace(PTRACE_PEEKUSER, proc->pid, 4 * PT_D1, 0); 67 case 1: 68 return ptrace(PTRACE_PEEKUSER, proc->pid, 4 * PT_D2, 0); 69 case 2: 70 return ptrace(PTRACE_PEEKUSER, proc->pid, 4 * PT_D3, 0); 71 case 3: 72 return ptrace(PTRACE_PEEKUSER, proc->pid, 4 * PT_D4, 0); 73 case 4: 74 return ptrace(PTRACE_PEEKUSER, proc->pid, 4 * PT_D5, 0); 75 default: 76 fprintf(stderr, 77 "gimme_arg called with wrong arguments\n"); 78 exit(2); 79 } 80#else 81 /* That hack works on m68k, too */ 82 return ptrace(PTRACE_PEEKUSER, proc->pid, 4 * arg_num, 0); 83#endif 84 } else { 85 fprintf(stderr, "gimme_arg called with wrong arguments\n"); 86 exit(1); 87 } 88 89 return 0; 90} 91 92void save_register_args(enum tof type, struct process *proc) 93{ 94} 95