1/**********************************************************************
2wait.c
3
4Copyright (C) 1999 Lars Brinkhoff.  See the file COPYING for licensing
5terms and conditions.
6
7**********************************************************************/
8
9#include <errno.h>
10#include <signal.h>
11#include <sys/wait.h>
12
13#include "ptproxy.h"
14#include "sysdep.h"
15#include "wait.h"
16#include "ptrace_user.h"
17#include "sysdep/ptrace.h"
18#include "sysdep/sigcontext.h"
19
20int proxy_wait_return(struct debugger *debugger, pid_t unused)
21{
22	debugger->waiting = 0;
23
24	if(debugger->debugee->died || (debugger->wait_options & __WCLONE)){
25		debugger_cancelled_return(debugger, -ECHILD);
26		return(0);
27	}
28
29	if(debugger->debugee->zombie && debugger->debugee->event)
30		debugger->debugee->died = 1;
31
32	if(debugger->debugee->event){
33		debugger->debugee->event = 0;
34		ptrace(PTRACE_POKEDATA, debugger->pid,
35		       debugger->wait_status_ptr,
36		       debugger->debugee->wait_status);
37		/* if (wait4)
38		   ptrace (PTRACE_POKEDATA, pid, rusage_ptr, ...); */
39		debugger_cancelled_return(debugger, debugger->debugee->pid);
40		return(0);
41	}
42
43	/* pause will return -EINTR, which happens to be right for wait */
44	debugger_normal_return(debugger, -1);
45	return(0);
46}
47
48int parent_wait_return(struct debugger *debugger, pid_t unused)
49{
50	return(debugger_normal_return(debugger, -1));
51}
52
53int real_wait_return(struct debugger *debugger)
54{
55	unsigned long ip;
56	int pid;
57
58	pid = debugger->pid;
59
60	ip = ptrace(PTRACE_PEEKUSR, pid, PT_IP_OFFSET, 0);
61	IP_RESTART_SYSCALL(ip);
62
63	if(ptrace(PTRACE_POKEUSR, pid, PT_IP_OFFSET, ip) < 0)
64		tracer_panic("real_wait_return : Failed to restart system "
65			     "call, errno = %d\n", errno);
66
67	if((ptrace(PTRACE_SYSCALL, debugger->pid, 0, SIGCHLD) < 0) ||
68	   (ptrace(PTRACE_SYSCALL, debugger->pid, 0, 0) < 0) ||
69	   (ptrace(PTRACE_SYSCALL, debugger->pid, 0, 0) < 0) ||
70	   debugger_normal_return(debugger, -1))
71		tracer_panic("real_wait_return : gdb failed to wait, "
72			     "errno = %d\n", errno);
73	return(0);
74}
75
76/*
77 * Overrides for Emacs so that we follow Linus's tabbing style.
78 * Emacs will notice this stuff at the end of the file and automatically
79 * adjust the settings for this buffer only.  This must remain at the end
80 * of the file.
81 * ---------------------------------------------------------------------------
82 * Local variables:
83 * c-file-style: "linux"
84 * End:
85 */
86