/*

* trace.c for mdb

*/

#include "mdb.h"

#include <stdio.h>

#include <sys/ptrace.h>

#include "proto.h"

/* mdbtrace()

* Call ptrace and check for error if debugging running process

* Otherwise read 'core' file

*/

PUBLIC long mdbtrace(req, pid, addr, data)

int req, pid;

long addr, data;

{

long val;

int i;

int segment;

#ifdef DEBUG

if (debug) Printf("ptrace: req=%d pid=%d addr=%lx data=%lx\n",

req, pid, addr, data);

#endif

if (corepid < 0)

{

errno = 0;

/* Call normal ptrace and check for error */

val = ptrace(req, pid, addr, data);

if (errno != 0) {

do_error("mdb ptrace error ");

mdb_error("\n");

}

#ifdef DEBUG

if (debug) Printf("ptrace: val=>%lx\n", val);

#endif

return val;

}

else

return read_core(req, addr, data);

}

/* Used by disassembler */

PUBLIC u32_t peek_dword(addr)

off_t addr;

{

return mdbtrace(T_GETINS, curpid, addr, 0L);

}