Back to index

glibc  2.9
Defines | Enumerations | Functions
ptrace.h File Reference
#include <features.h>

Go to the source code of this file.

Defines

#define PT_TRACE_ME   PTRACE_TRACEME
#define PT_READ_I   PTRACE_PEEKTEXT
#define PT_READ_D   PTRACE_PEEKDATA
#define PT_READ_U   PTRACE_PEEKUSER
#define PT_WRITE_I   PTRACE_POKETEXT
#define PT_WRITE_D   PTRACE_POKEDATA
#define PT_WRITE_U   PTRACE_POKEUSER
#define PT_CONTINUE   PTRACE_CONT
#define PT_KILL   PTRACE_KILL
#define PT_STEP   PTRACE_SINGLESTEP
#define PT_ATTACH   PTRACE_ATTACH
#define PT_DETACH   PTRACE_DETACH
#define PT_SYSCALL   PTRACE_SYSCALL
#define PT_SETOPTIONS   PTRACE_SETOPTIONS
#define PT_GETEVENTMSG   PTRACE_GETEVENTMSG
#define PT_GETSIGINFO   PTRACE_GETSIGINFO
#define PT_SETSIGINFO   PTRACE_SETSIGINFO

Enumerations

enum  __ptrace_request {
  PTRACE_TRACEME = 0, PTRACE_PEEKTEXT, PTRACE_PEEKDATA, PTRACE_PEEKUSER,
  PTRACE_POKETEXT, PTRACE_POKEDATA, PTRACE_POKEUSER, PTRACE_CONT,
  PTRACE_KILL, PTRACE_SINGLESTEP, PTRACE_ATTACH, PTRACE_DETACH,
  PTRACE_GETREGS = 12, PTRACE_SETREGS, PTRACE_GETFPREGS = 14, PTRACE_SETFPREGS,
  PTRACE_READDATA = 16, PTRACE_WRITEDATA, PTRACE_READTEXT = 18, PTRACE_WRITETEXT,
  PTRACE_GETFPAREGS = 20, PTRACE_SETFPAREGS, PTRACE_TRACEME = 0, PTRACE_PEEKTEXT = 1,
  PTRACE_PEEKDATA = 2, PTRACE_PEEKUSER = 3, PTRACE_POKETEXT = 4, PTRACE_POKEDATA = 5,
  PTRACE_POKEUSER = 6, PTRACE_CONT = 7, PTRACE_KILL = 8, PTRACE_SINGLESTEP = 9,
  PTRACE_SINGLEBLOCK = 12, PTRACE_ATTACH = 16, PTRACE_DETACH = 17, PTRACE_GETREGS = 18,
  PTRACE_SETREGS = 19, PTRACE_SYSCALL = 24, PTRACE_SETOPTIONS = 0x4200, PTRACE_GETEVENTMSG = 0x4201,
  PTRACE_GETSIGINFO = 0x4202, PTRACE_SETSIGINFO, PTRACE_TRACEME = 0, PTRACE_PEEKTEXT = 1,
  PTRACE_PEEKDATA = 2, PTRACE_PEEKUSER = 3, PTRACE_POKETEXT = 4, PTRACE_POKEDATA = 5,
  PTRACE_POKEUSER = 6, PTRACE_CONT = 7, PTRACE_KILL = 8, PTRACE_SINGLESTEP = 9,
  PTRACE_ATTACH = 16, PTRACE_DETACH = 17, PTRACE_SYSCALL = 24, PTRACE_SETOPTIONS = 0x4200,
  PTRACE_GETEVENTMSG = 0x4201, PTRACE_GETSIGINFO = 0x4202, PTRACE_SETSIGINFO, PTRACE_TRACEME = 0,
  PTRACE_PEEKTEXT = 1, PTRACE_PEEKDATA = 2, PTRACE_PEEKUSER = 3, PTRACE_POKETEXT = 4,
  PTRACE_POKEDATA = 5, PTRACE_POKEUSER = 6, PTRACE_CONT = 7, PTRACE_KILL = 8,
  PTRACE_SINGLESTEP = 9, PTRACE_GETREGS = 12, PTRACE_SETREGS = 13, PTRACE_GETFPREGS = 14,
  PTRACE_SETFPREGS = 15, PTRACE_ATTACH = 16, PTRACE_DETACH = 17, PTRACE_SYSCALL = 24,
  PTRACE_SETOPTIONS = 0x4200, PTRACE_GETEVENTMSG = 0x4201, PTRACE_GETSIGINFO = 0x4202, PTRACE_SETSIGINFO,
  PTRACE_TRACEME = 0, PTRACE_PEEKTEXT = 1, PTRACE_PEEKDATA = 2, PTRACE_PEEKUSER = 3,
  PTRACE_POKETEXT = 4, PTRACE_POKEDATA = 5, PTRACE_POKEUSER = 6, PTRACE_CONT = 7,
  PTRACE_KILL = 8, PTRACE_SINGLESTEP = 9, PTRACE_DETACH = 11, PTRACE_ATTACH = 16,
  PTRACE_WRITEDATA = 17, PTRACE_WRITEDATA = 17, PTRACE_READTEXT = 18, PTRACE_READTEXT = 18,
  PTRACE_WRITETEXT = 19, PTRACE_WRITETEXT = 19, PTRACE_SYSCALL = 24, PTRACE_SYSCALL = 24,
  PTRACE_SETOPTIONS = 0x4200, PTRACE_GETEVENTMSG = 0x4201, PTRACE_GETSIGINFO = 0x4202, PTRACE_SETSIGINFO,
  PTRACE_TRACEME = 0, PTRACE_PEEKTEXT = 1, PTRACE_PEEKDATA = 2, PTRACE_PEEKUSER = 3,
  PTRACE_POKETEXT = 4, PTRACE_POKEDATA = 5, PTRACE_POKEUSER = 6, PTRACE_CONT = 7,
  PTRACE_KILL = 8, PTRACE_SINGLESTEP = 9, PTRACE_GETREGS = 12, PTRACE_SETREGS = 13,
  PTRACE_GETFPREGS = 14, PTRACE_SETFPREGS = 15, PTRACE_ATTACH = 16, PTRACE_DETACH = 17,
  PTRACE_GETFPXREGS = 18, PTRACE_SETFPXREGS = 19, PTRACE_SYSCALL = 24, PTRACE_SETOPTIONS = 0x4200,
  PTRACE_GETEVENTMSG = 0x4201, PTRACE_GETSIGINFO = 0x4202, PTRACE_SETSIGINFO
}
enum  __ptrace_setoptions {
  PTRACE_O_TRACESYSGOOD = 0x00000001, PTRACE_O_TRACEFORK = 0x00000002, PTRACE_O_TRACEVFORK = 0x00000004, PTRACE_O_TRACECLONE = 0x00000008,
  PTRACE_O_TRACEEXEC = 0x00000010, PTRACE_O_TRACEVFORKDONE = 0x00000020, PTRACE_O_TRACEEXIT = 0x00000040, PTRACE_O_MASK = 0x0000007f,
  PTRACE_O_TRACESYSGOOD = 0x00000001, PTRACE_O_TRACEFORK = 0x00000002, PTRACE_O_TRACEVFORK = 0x00000004, PTRACE_O_TRACECLONE = 0x00000008,
  PTRACE_O_TRACEEXEC = 0x00000010, PTRACE_O_TRACEVFORKDONE = 0x00000020, PTRACE_O_TRACEEXIT = 0x00000040, PTRACE_O_MASK = 0x0000007f,
  PTRACE_O_TRACESYSGOOD = 0x00000001, PTRACE_O_TRACEFORK = 0x00000002, PTRACE_O_TRACEVFORK = 0x00000004, PTRACE_O_TRACECLONE = 0x00000008,
  PTRACE_O_TRACEEXEC = 0x00000010, PTRACE_O_TRACEVFORKDONE = 0x00000020, PTRACE_O_TRACEEXIT = 0x00000040, PTRACE_O_MASK = 0x0000007f,
  PTRACE_O_TRACESYSGOOD = 0x00000001, PTRACE_O_TRACEFORK = 0x00000002, PTRACE_O_TRACEVFORK = 0x00000004, PTRACE_O_TRACECLONE = 0x00000008,
  PTRACE_O_TRACEEXEC = 0x00000010, PTRACE_O_TRACEVFORKDONE = 0x00000020, PTRACE_O_TRACEEXIT = 0x00000040, PTRACE_O_MASK = 0x0000007f,
  PTRACE_O_TRACESYSGOOD = 0x00000001, PTRACE_O_TRACEFORK = 0x00000002, PTRACE_O_TRACEVFORK = 0x00000004, PTRACE_O_TRACECLONE = 0x00000008,
  PTRACE_O_TRACEEXEC = 0x00000010, PTRACE_O_TRACEVFORKDONE = 0x00000020, PTRACE_O_TRACEEXIT = 0x00000040, PTRACE_O_MASK = 0x0000007f
}
enum  __ptrace_eventcodes {
  PTRACE_EVENT_FORK = 1, PTRACE_EVENT_VFORK = 2, PTRACE_EVENT_CLONE = 3, PTRACE_EVENT_EXEC = 4,
  PTRACE_EVENT_VFORK_DONE = 5, PTRACE_EVENT_EXIT = 6, PTRACE_EVENT_FORK = 1, PTRACE_EVENT_VFORK = 2,
  PTRACE_EVENT_CLONE = 3, PTRACE_EVENT_EXEC = 4, PTRACE_EVENT_VFORK_DONE = 5, PTRACE_EVENT_EXIT = 6,
  PTRACE_EVENT_FORK = 1, PTRACE_EVENT_VFORK = 2, PTRACE_EVENT_CLONE = 3, PTRACE_EVENT_EXEC = 4,
  PTRACE_EVENT_VFORK_DONE = 5, PTRACE_EVENT_EXIT = 6, PTRACE_EVENT_FORK = 1, PTRACE_EVENT_VFORK = 2,
  PTRACE_EVENT_CLONE = 3, PTRACE_EVENT_EXEC = 4, PTRACE_EVENT_VFORK_DONE = 5, PTRACE_EVENT_EXIT = 6,
  PTRACE_EVENT_FORK = 1, PTRACE_EVENT_VFORK = 2, PTRACE_EVENT_CLONE = 3, PTRACE_EVENT_EXEC = 4,
  PTRACE_EVENT_VFORK_DONE = 5, PTRACE_EVENT_EXIT = 6
}

Functions

long int ptrace (enum __ptrace_request __request,...) __THROW

Define Documentation

#define PT_ATTACH   PTRACE_ATTACH

Definition at line 75 of file ptrace.h.

#define PT_CONTINUE   PTRACE_CONT

Definition at line 62 of file ptrace.h.

#define PT_DETACH   PTRACE_DETACH

Definition at line 79 of file ptrace.h.

Definition at line 91 of file ptrace.h.

Definition at line 95 of file ptrace.h.

#define PT_KILL   PTRACE_KILL

Definition at line 66 of file ptrace.h.

#define PT_READ_D   PTRACE_PEEKDATA

Definition at line 42 of file ptrace.h.

#define PT_READ_I   PTRACE_PEEKTEXT

Definition at line 38 of file ptrace.h.

#define PT_READ_U   PTRACE_PEEKUSER

Definition at line 46 of file ptrace.h.

Definition at line 87 of file ptrace.h.

#define PT_STEP   PTRACE_SINGLESTEP

Definition at line 71 of file ptrace.h.

#define PT_SYSCALL   PTRACE_SYSCALL

Definition at line 83 of file ptrace.h.

Definition at line 34 of file ptrace.h.

Definition at line 54 of file ptrace.h.

Definition at line 50 of file ptrace.h.

Definition at line 58 of file ptrace.h.


Enumeration Type Documentation

Enumerator:
PTRACE_EVENT_FORK 
PTRACE_EVENT_VFORK 
PTRACE_EVENT_CLONE 
PTRACE_EVENT_EXEC 
PTRACE_EVENT_VFORK_DONE 
PTRACE_EVENT_EXIT 
PTRACE_EVENT_FORK 
PTRACE_EVENT_VFORK 
PTRACE_EVENT_CLONE 
PTRACE_EVENT_EXEC 
PTRACE_EVENT_VFORK_DONE 
PTRACE_EVENT_EXIT 
PTRACE_EVENT_FORK 
PTRACE_EVENT_VFORK 
PTRACE_EVENT_CLONE 
PTRACE_EVENT_EXEC 
PTRACE_EVENT_VFORK_DONE 
PTRACE_EVENT_EXIT 
PTRACE_EVENT_FORK 
PTRACE_EVENT_VFORK 
PTRACE_EVENT_CLONE 
PTRACE_EVENT_EXEC 
PTRACE_EVENT_VFORK_DONE 
PTRACE_EVENT_EXIT 
PTRACE_EVENT_FORK 
PTRACE_EVENT_VFORK 
PTRACE_EVENT_CLONE 
PTRACE_EVENT_EXEC 
PTRACE_EVENT_VFORK_DONE 
PTRACE_EVENT_EXIT 

Definition at line 115 of file ptrace.h.

Enumerator:
PTRACE_TRACEME 
PTRACE_PEEKTEXT 
PTRACE_PEEKDATA 
PTRACE_PEEKUSER 
PTRACE_POKETEXT 
PTRACE_POKEDATA 
PTRACE_POKEUSER 
PTRACE_CONT 
PTRACE_KILL 
PTRACE_SINGLESTEP 
PTRACE_ATTACH 
PTRACE_DETACH 
PTRACE_GETREGS 
PTRACE_SETREGS 
PTRACE_GETFPREGS 
PTRACE_SETFPREGS 
PTRACE_READDATA 
PTRACE_WRITEDATA 
PTRACE_READTEXT 
PTRACE_WRITETEXT 
PTRACE_GETFPAREGS 
PTRACE_SETFPAREGS 
PTRACE_TRACEME 
PTRACE_PEEKTEXT 
PTRACE_PEEKDATA 
PTRACE_PEEKUSER 
PTRACE_POKETEXT 
PTRACE_POKEDATA 
PTRACE_POKEUSER 
PTRACE_CONT 
PTRACE_KILL 
PTRACE_SINGLESTEP 
PTRACE_SINGLEBLOCK 
PTRACE_ATTACH 
PTRACE_DETACH 
PTRACE_GETREGS 
PTRACE_SETREGS 
PTRACE_SYSCALL 
PTRACE_SETOPTIONS 
PTRACE_GETEVENTMSG 
PTRACE_GETSIGINFO 
PTRACE_SETSIGINFO 
PTRACE_TRACEME 
PTRACE_PEEKTEXT 
PTRACE_PEEKDATA 
PTRACE_PEEKUSER 
PTRACE_POKETEXT 
PTRACE_POKEDATA 
PTRACE_POKEUSER 
PTRACE_CONT 
PTRACE_KILL 
PTRACE_SINGLESTEP 
PTRACE_ATTACH 
PTRACE_DETACH 
PTRACE_SYSCALL 
PTRACE_SETOPTIONS 
PTRACE_GETEVENTMSG 
PTRACE_GETSIGINFO 
PTRACE_SETSIGINFO 
PTRACE_TRACEME 
PTRACE_PEEKTEXT 
PTRACE_PEEKDATA 
PTRACE_PEEKUSER 
PTRACE_POKETEXT 
PTRACE_POKEDATA 
PTRACE_POKEUSER 
PTRACE_CONT 
PTRACE_KILL 
PTRACE_SINGLESTEP 
PTRACE_GETREGS 
PTRACE_SETREGS 
PTRACE_GETFPREGS 
PTRACE_SETFPREGS 
PTRACE_ATTACH 
PTRACE_DETACH 
PTRACE_SYSCALL 
PTRACE_SETOPTIONS 
PTRACE_GETEVENTMSG 
PTRACE_GETSIGINFO 
PTRACE_SETSIGINFO 
PTRACE_TRACEME 
PTRACE_PEEKTEXT 
PTRACE_PEEKDATA 
PTRACE_PEEKUSER 
PTRACE_POKETEXT 
PTRACE_POKEDATA 
PTRACE_POKEUSER 
PTRACE_CONT 
PTRACE_KILL 
PTRACE_SINGLESTEP 
PTRACE_DETACH 
PTRACE_ATTACH 
PTRACE_WRITEDATA 
PTRACE_WRITEDATA 
PTRACE_READTEXT 
PTRACE_READTEXT 
PTRACE_WRITETEXT 
PTRACE_WRITETEXT 
PTRACE_SYSCALL 
PTRACE_SYSCALL 
PTRACE_SETOPTIONS 
PTRACE_GETEVENTMSG 
PTRACE_GETSIGINFO 
PTRACE_SETSIGINFO 
PTRACE_TRACEME 
PTRACE_PEEKTEXT 
PTRACE_PEEKDATA 
PTRACE_PEEKUSER 
PTRACE_POKETEXT 
PTRACE_POKEDATA 
PTRACE_POKEUSER 
PTRACE_CONT 
PTRACE_KILL 
PTRACE_SINGLESTEP 
PTRACE_GETREGS 
PTRACE_SETREGS 
PTRACE_GETFPREGS 
PTRACE_SETFPREGS 
PTRACE_ATTACH 
PTRACE_DETACH 
PTRACE_GETFPXREGS 
PTRACE_SETFPXREGS 
PTRACE_SYSCALL 
PTRACE_SETOPTIONS 
PTRACE_GETEVENTMSG 
PTRACE_GETSIGINFO 
PTRACE_SETSIGINFO 

Definition at line 28 of file ptrace.h.

{
  /* Indicate that the process making this request should be traced.
     All signals received by this process can be intercepted by its
     parent, and its parent can use the other `ptrace' requests.  */
  PTRACE_TRACEME = 0,
#define PT_TRACE_ME PTRACE_TRACEME

  /* Return the word in the process's text space at address ADDR.  */
  PTRACE_PEEKTEXT = 1,
#define PT_READ_I PTRACE_PEEKTEXT

  /* Return the word in the process's data space at address ADDR.  */
  PTRACE_PEEKDATA = 2,
#define PT_READ_D PTRACE_PEEKDATA

  /* Return the word in the process's user area at offset ADDR.  */
  PTRACE_PEEKUSER = 3,
#define PT_READ_U PTRACE_PEEKUSER

  /* Write the word DATA into the process's text space at address ADDR.  */
  PTRACE_POKETEXT = 4,
#define PT_WRITE_I PTRACE_POKETEXT

  /* Write the word DATA into the process's data space at address ADDR.  */
  PTRACE_POKEDATA = 5,
#define PT_WRITE_D PTRACE_POKEDATA

  /* Write the word DATA into the process's user area at offset ADDR.  */
  PTRACE_POKEUSER = 6,
#define PT_WRITE_U PTRACE_POKEUSER

  /* Continue the process.  */
  PTRACE_CONT = 7,
#define PT_CONTINUE PTRACE_CONT

  /* Kill the process.  */
  PTRACE_KILL = 8,
#define PT_KILL PTRACE_KILL

  /* Single step the process.
     This is not supported on all machines.  */
  PTRACE_SINGLESTEP = 9,
#define PT_STEP PTRACE_SINGLESTEP

  /* Attach to a process that is already running. */
  PTRACE_ATTACH = 16,
#define PT_ATTACH PTRACE_ATTACH

  /* Detach from a process attached to with PTRACE_ATTACH.  */
  PTRACE_DETACH = 17,
#define PT_DETACH PTRACE_DETACH

  /* Continue and stop at the next (return from) syscall.  */
  PTRACE_SYSCALL = 24,
#define PT_SYSCALL PTRACE_SYSCALL

  /* Set ptrace filter options.  */
  PTRACE_SETOPTIONS = 0x4200,
#define PT_SETOPTIONS PTRACE_SETOPTIONS

  /* Get last ptrace message.  */
  PTRACE_GETEVENTMSG = 0x4201,
#define PT_GETEVENTMSG PTRACE_GETEVENTMSG

  /* Get siginfo for process.  */
  PTRACE_GETSIGINFO = 0x4202,
#define PT_GETSIGINFO PTRACE_GETSIGINFO

  /* Set new siginfo for process.  */
  PTRACE_SETSIGINFO = 0x4203
#define PT_SETSIGINFO PTRACE_SETSIGINFO
};
Enumerator:
PTRACE_O_TRACESYSGOOD 
PTRACE_O_TRACEFORK 
PTRACE_O_TRACEVFORK 
PTRACE_O_TRACECLONE 
PTRACE_O_TRACEEXEC 
PTRACE_O_TRACEVFORKDONE 
PTRACE_O_TRACEEXIT 
PTRACE_O_MASK 
PTRACE_O_TRACESYSGOOD 
PTRACE_O_TRACEFORK 
PTRACE_O_TRACEVFORK 
PTRACE_O_TRACECLONE 
PTRACE_O_TRACEEXEC 
PTRACE_O_TRACEVFORKDONE 
PTRACE_O_TRACEEXIT 
PTRACE_O_MASK 
PTRACE_O_TRACESYSGOOD 
PTRACE_O_TRACEFORK 
PTRACE_O_TRACEVFORK 
PTRACE_O_TRACECLONE 
PTRACE_O_TRACEEXEC 
PTRACE_O_TRACEVFORKDONE 
PTRACE_O_TRACEEXIT 
PTRACE_O_MASK 
PTRACE_O_TRACESYSGOOD 
PTRACE_O_TRACEFORK 
PTRACE_O_TRACEVFORK 
PTRACE_O_TRACECLONE 
PTRACE_O_TRACEEXEC 
PTRACE_O_TRACEVFORKDONE 
PTRACE_O_TRACEEXIT 
PTRACE_O_MASK 
PTRACE_O_TRACESYSGOOD 
PTRACE_O_TRACEFORK 
PTRACE_O_TRACEVFORK 
PTRACE_O_TRACECLONE 
PTRACE_O_TRACEEXEC 
PTRACE_O_TRACEVFORKDONE 
PTRACE_O_TRACEEXIT 
PTRACE_O_MASK 

Definition at line 103 of file ptrace.h.

                         {
  PTRACE_O_TRACESYSGOOD     = 0x00000001,
  PTRACE_O_TRACEFORK = 0x00000002,
  PTRACE_O_TRACEVFORK   = 0x00000004,
  PTRACE_O_TRACECLONE       = 0x00000008,
  PTRACE_O_TRACEEXEC = 0x00000010,
  PTRACE_O_TRACEVFORKDONE = 0x00000020,
  PTRACE_O_TRACEEXIT = 0x00000040,
  PTRACE_O_MASK             = 0x0000007f
};

Function Documentation

long int ptrace ( enum __ptrace_request  __request,
  ... 
)

Definition at line 39 of file ptrace.c.

{
  pid_t pid;
  void *addr, *addr2;
  natural_t data;
  va_list ap;

  /* Read data from PID's address space, from ADDR for DATA bytes.  */
  error_t read_data (task_t task, vm_address_t *ourpage, vm_size_t *size)
    {
      /* Read the pages containing the addressed range.  */
      error_t err;
      *size = round_page (addr + data) - trunc_page (addr);
      err = __vm_read (task, trunc_page (addr), *size, ourpage, size);
      return err;
    }

  /* Fetch the thread port for PID's user thread.  */
  error_t fetch_user_thread (task_t task, thread_t *thread)
    {
      thread_t threadbuf[3], *threads = threadbuf;
      mach_msg_type_number_t nthreads = 3, i;
      error_t err = __task_threads (task, &threads, &nthreads);
      if (err)
       return err;
      if (nthreads == 0)
       return EINVAL;
      *thread = threads[0]; /* Assume user thread is first.  */
      for (i = 1; i < nthreads; ++i)
       __mach_port_deallocate (__mach_task_self (), threads[i]);
      if (threads != threadbuf)
       __vm_deallocate (__mach_task_self (),
                      (vm_address_t) threads, nthreads * sizeof threads[0]);
      return 0;
    }

  /* Fetch a thread state structure from PID and store it at ADDR.  */
  int get_regs (int flavor, mach_msg_type_number_t count)
    {
      error_t err;
      task_t task = __pid2task (pid);
      thread_t thread;
      if (task == MACH_PORT_NULL)
       return -1;
      err = fetch_user_thread (task, &thread);
      __mach_port_deallocate (__mach_task_self (), task);
      if (!err)
       err = __thread_get_state (thread, flavor, addr, &count);
      __mach_port_deallocate (__mach_task_self (), thread);
      return err ? __hurd_fail (err) : 0;
    }


  switch (request)
    {
    case PTRACE_TRACEME:
      /* Make this process be traced.  */
      __sigfillset (&_hurdsig_traced);
      __USEPORT (PROC, __proc_mark_traced (port));
      break;

    case PTRACE_CONT:
      va_start (ap, request);
      pid = va_arg (ap, pid_t);
      addr = va_arg (ap, void *);
      data = va_arg (ap, int);
      va_end (ap);
      {
       /* Send a DATA signal to PID, telling it to take the signal
          normally even if it's traced.  */
       error_t err;
       task_t task = __pid2task (pid);
       if (task == MACH_PORT_NULL)
         return -1;
       if (data == SIGKILL)
         err = __task_terminate (task);
       else
         {
           if (addr != (void *) 1)
             {
              /* Move the user thread's PC to ADDR.  */
              thread_t thread;
              err = fetch_user_thread (task, &thread);
              if (!err)
                {
                  struct machine_thread_state state;
                  mach_msg_type_number_t count = MACHINE_THREAD_STATE_COUNT;
                  err = __thread_get_state (thread,
                                         MACHINE_THREAD_STATE_FLAVOR,
                                         (natural_t *) &state, &count);
                  if (!err)
                    {
                     MACHINE_THREAD_STATE_SET_PC (&state, addr);
                     err = __thread_set_state (thread,
                                            MACHINE_THREAD_STATE_FLAVOR,
                                            (natural_t *) &state, count);
                    }

                }
              __mach_port_deallocate (__mach_task_self (), thread);
             }
           else
             err = 0;

           if (! err)
             /* Tell the process to take the signal (or just resume if 0).  */
             err = HURD_MSGPORT_RPC
              (__USEPORT (PROC, __proc_getmsgport (port, pid, &msgport)),
               0, 0, __msg_sig_post_untraced (msgport, data, 0, task));
         }
       __mach_port_deallocate (__mach_task_self (), task);
       return err ? __hurd_fail (err) : 0;
      }

    case PTRACE_KILL:
      va_start (ap, request);
      pid = va_arg (ap, pid_t);
      va_end (ap);
      /* SIGKILL always just terminates the task,
        so normal kill is just the same when traced.  */
      return kill (pid, SIGKILL);

    case PTRACE_SINGLESTEP:
      /* This is a machine-dependent kernel RPC on
        machines that support it.  Punt.  */
      return EOPNOTSUPP;

    case PTRACE_ATTACH:
    case PTRACE_DETACH:
      va_start (ap, request);
      pid = va_arg (ap, pid_t);
      va_end (ap);
      {
       /* Tell PID to set or clear its trace bit.  */
       error_t err;
       mach_port_t msgport;
       task_t task = __pid2task (pid);
       if (task == MACH_PORT_NULL)
         return -1;
       err = __USEPORT (PROC, __proc_getmsgport (port, pid, &msgport));
       if (! err)
         {
           err = __msg_set_init_int (msgport, task, INIT_TRACEMASK,
                                  request == PTRACE_DETACH ? 0 :
                                  ~(sigset_t) 0);
           if (! err)
             {
              if (request == PTRACE_ATTACH)
                /* Now stop the process.  */
                err = __msg_sig_post (msgport, SIGSTOP, 0, task);
              else
                /* Resume the process from tracing stop.  */
                err = __msg_sig_post_untraced (msgport, 0, 0, task);
             }
           __mach_port_deallocate (__mach_task_self (), msgport);
         }
       __mach_port_deallocate (__mach_task_self (), task);
       return err ? __hurd_fail (err) : 0;
      }

    case PTRACE_PEEKTEXT:
    case PTRACE_PEEKDATA:
      va_start (ap, request);
      pid = va_arg (ap, pid_t);
      addr = va_arg (ap, void *);
      va_end (ap);
      {
       /* Read the page (or two pages, if the word lies on a boundary)
          containing the addressed word.  */
       error_t err;
       vm_address_t ourpage;
       vm_size_t size;
       natural_t word;
       task_t task = __pid2task (pid);
       if (task == MACH_PORT_NULL)
         return -1;
       data = sizeof word;
       ourpage = 0;
       size = 0;
       err = read_data (task, &ourpage, &size);
       __mach_port_deallocate (__mach_task_self (), task);
       if (err)
         return __hurd_fail (err);
       word = *(natural_t *) ((vm_address_t) addr - trunc_page (addr)
                            + ourpage);
       __vm_deallocate (__mach_task_self (), ourpage, size);
       return word;
      }

    case PTRACE_PEEKUSER:
    case PTRACE_POKEUSER:
      /* U area, what's that?  */
      return EOPNOTSUPP;

    case PTRACE_GETREGS:
    case PTRACE_SETREGS:
      va_start (ap, request);
      pid = va_arg (ap, pid_t);
      addr = va_arg (ap, void *);
      va_end (ap);
      return get_regs (MACHINE_THREAD_STATE_FLAVOR,
                     MACHINE_THREAD_STATE_COUNT);

    case PTRACE_GETFPREGS:
    case PTRACE_SETFPREGS:
      va_start (ap, request);
      pid = va_arg (ap, pid_t);
      addr = va_arg (ap, void *);
      va_end (ap);
#ifdef MACHINE_THREAD_FLOAT_STATE_FLAVOR
      return get_regs (MACHINE_THREAD_FLOAT_STATE_FLAVOR,
                     MACHINE_THREAD_FLOAT_STATE_COUNT);
#else
      return EOPNOTSUPP;
#endif

    case PTRACE_GETFPAREGS:
    case PTRACE_SETFPAREGS:
      va_start (ap, request);
      pid = va_arg (ap, pid_t);
      addr = va_arg (ap, void *);
      va_end (ap);
#ifdef MACHINE_THREAD_FPA_STATE_FLAVOR
      return get_regs (MACHINE_THREAD_FPA_STATE_FLAVOR,
                     MACHINE_THREAD_FPA_STATE_COUNT);
#else
      return EOPNOTSUPP;
#endif

    case PTRACE_POKETEXT:
    case PTRACE_POKEDATA:
      va_start (ap, request);
      pid = va_arg (ap, pid_t);
      addr = va_arg (ap, void *);
      data = va_arg (ap, int);
      va_end (ap);
      {
       /* Read the page (or two pages, if the word lies on a boundary)
          containing the addressed word.  */
       error_t err;
       vm_address_t ourpage;
       vm_size_t size;
       task_t task = __pid2task (pid);
       if (task == MACH_PORT_NULL)
         return -1;
       data = sizeof (natural_t);
       ourpage = 0;
       size = 0;
       err = read_data (task, &ourpage, &size);

       if (!err)
         {
           /* Now modify the specified word and write the page back.  */
           *(natural_t *) ((vm_address_t) addr - trunc_page (addr)
                         + ourpage) = data;
           err = __vm_write (task, trunc_page (addr), ourpage, size);
           __vm_deallocate (__mach_task_self (), ourpage, size);
         }

       __mach_port_deallocate (__mach_task_self (), task);
       return err ? __hurd_fail (err) : 0;
      }

    case PTRACE_READDATA:
    case PTRACE_READTEXT:
      va_start (ap, request);
      pid = va_arg (ap, pid_t);
      addr = va_arg (ap, void *);
      data = va_arg (ap, int);
      addr2 = va_arg (ap, void *);
      va_end (ap);
      {
       error_t err;
       vm_address_t ourpage;
       vm_size_t size;
       task_t task = __pid2task (pid);
       if (task == MACH_PORT_NULL)
         return -1;
       if (((vm_address_t) addr2 + data) % __vm_page_size == 0)
         {
           /* Perhaps we can write directly to the user's buffer.  */
           ourpage = (vm_address_t) addr2;
           size = data;
         }
       else
         {
           ourpage = 0;
           size = 0;
         }
       err = read_data (task, &ourpage, &size);
       __mach_port_deallocate (__mach_task_self (), task);
       if (!err && ourpage != (vm_address_t) addr2)
         {
           memcpy (addr2, (void *) ourpage, data);
           __vm_deallocate (__mach_task_self (), ourpage, size);
         }
       return err ? __hurd_fail (err) : 0;
      }

    case PTRACE_WRITEDATA:
    case PTRACE_WRITETEXT:
      va_start (ap, request);
      pid = va_arg (ap, pid_t);
      addr = va_arg (ap, void *);
      data = va_arg (ap, int);
      addr2 = va_arg (ap, void *);
      va_end (ap);
      {
       error_t err;
       vm_address_t ourpage;
       vm_size_t size;
       task_t task = __pid2task (pid);
       if (task == MACH_PORT_NULL)
         return -1;
       if ((vm_address_t) addr % __vm_page_size == 0 &&
           (vm_address_t) data % __vm_page_size == 0)
         {
           /* Writing whole pages; can go directly from the user's buffer.  */
           ourpage = (vm_address_t) addr2;
           size = data;
           err = 0;
         }
       else
         {
           /* Read the task's pages and modify our own copy.  */
           ourpage = 0;
           size = 0;
           err = read_data (task, &ourpage, &size);
           if (!err)
             memcpy ((void *) ((vm_address_t) addr - trunc_page (addr)
                            + ourpage),
                    addr2,
                    data);
         }
       if (!err)
         /* Write back the modified pages.  */
         err = __vm_write (task, trunc_page (addr), ourpage, size);
       __mach_port_deallocate (__mach_task_self (), task);
       return err ? __hurd_fail (err) : 0;
      }

    default:
      errno = EINVAL;
      return -1;
    }

  return 0;
}