source: trunk/minix/commands/mdb/trace.c@ 10

/* 
 * 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);
}