From ae087d0195ddbd57e4e065c617076c6236237837 Mon Sep 17 00:00:00 2001 From: Daniel Jacobowitz Date: Wed, 18 Jun 2003 23:33:31 +0000 Subject: [PATCH] * config/nm-linux.h (linux_record_stopped_pid): New prototype. * lin-lwp.c (child_wait): Call linux_record_stopped_pid. (lin_lwp_wait): Likewise. Update comments. * linux-nat.c (struct simple_pid_list, add_to_pid_list) (pull_pid_from_list, linux_record_stopped_pid): New. --- gdb/ChangeLog | 8 ++++++++ gdb/config/nm-linux.h | 2 ++ gdb/lin-lwp.c | 40 ++++++++++++++++++++++++++++++++++++++++ gdb/linux-nat.c | 41 +++++++++++++++++++++++++++++++++++++++++ 4 files changed, 91 insertions(+) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index b8ed3a1110..d86c33ac14 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,11 @@ +2003-06-18 Daniel Jacobowitz + + * config/nm-linux.h (linux_record_stopped_pid): New prototype. + * lin-lwp.c (child_wait): Call linux_record_stopped_pid. + (lin_lwp_wait): Likewise. Update comments. + * linux-nat.c (struct simple_pid_list, add_to_pid_list) + (pull_pid_from_list, linux_record_stopped_pid): New. + 2003-06-17 Stephane Carrez * ada-lang.c (scan_discrim_bound): Name first argument. diff --git a/gdb/config/nm-linux.h b/gdb/config/nm-linux.h index 7e0a076210..6890cca56f 100644 --- a/gdb/config/nm-linux.h +++ b/gdb/config/nm-linux.h @@ -78,6 +78,8 @@ extern int linux_proc_xfer_memory (CORE_ADDR addr, char *myaddr, int len, int write, struct mem_attrib *attrib, struct target_ops *target); +extern void linux_record_stopped_pid (int pid); + #define CHILD_INSERT_FORK_CATCHPOINT #define CHILD_INSERT_VFORK_CATCHPOINT #define CHILD_INSERT_EXEC_CATCHPOINT diff --git a/gdb/lin-lwp.c b/gdb/lin-lwp.c index 48fd51673d..25c06eb4a1 100644 --- a/gdb/lin-lwp.c +++ b/gdb/lin-lwp.c @@ -1109,6 +1109,23 @@ child_wait (ptid_t ptid, struct target_waitstatus *ourstatus) save_errno = EINTR; } + /* Check for stop events reported by a process we didn't already + know about - in this case, anything other than inferior_ptid. + + If we're expecting to receive stopped processes after fork, + vfork, and clone events, then we'll just add the new one to + our list and go back to waiting for the event to be reported + - the stopped process might be returned from waitpid before + or after the event is. If we want to handle debugging of + CLONE_PTRACE processes we need to do more here, i.e. switch + to multi-threaded mode. */ + if (pid != -1 && WIFSTOPPED (status) && WSTOPSIG (status) == SIGSTOP + && pid != GET_PID (inferior_ptid)) + { + pid = -1; + save_errno = EINTR; + } + clear_sigio_trap (); clear_sigint_trap (); } @@ -1272,6 +1289,22 @@ retry: lp = find_lwp_pid (pid_to_ptid (lwpid)); + /* Check for stop events reported by a process we didn't + already know about - anything not already in our LWP + list. + + If we're expecting to receive stopped processes after + fork, vfork, and clone events, then we'll just add the + new one to our list and go back to waiting for the event + to be reported - the stopped process might be returned + from waitpid before or after the event is. */ + if (WIFSTOPPED (status) && !lp) + { + linux_record_stopped_pid (lwpid); + status = 0; + continue; + } + /* Make sure we don't report an event for the exit of an LWP not in our list, i.e. not part of the current process. This can happen if we detach from a program we original forked and then it @@ -1282,6 +1315,13 @@ retry: continue; } + /* NOTE drow/2003-06-17: This code seems to be meant for debugging + CLONE_PTRACE processes which do not use the thread library - + otherwise we wouldn't find the new LWP this way. That doesn't + currently work, and the following code is currently unreachable + due to the two blocks above. If it's fixed some day, this code + should be broken out into a function so that we can also pick up + LWPs from the new interface. */ if (!lp) { lp = add_lwp (BUILD_LWP (lwpid, GET_PID (inferior_ptid))); diff --git a/gdb/linux-nat.c b/gdb/linux-nat.c index 046544d1d3..bef737b92a 100644 --- a/gdb/linux-nat.c +++ b/gdb/linux-nat.c @@ -54,11 +54,52 @@ #define __WALL 0x40000000 /* Wait for any child. */ #endif +struct simple_pid_list +{ + int pid; + struct simple_pid_list *next; +}; +struct simple_pid_list *stopped_pids; + /* This variable is a tri-state flag: -1 for unknown, 0 if PTRACE_O_TRACEFORK can not be used, 1 if it can. */ static int linux_supports_tracefork_flag = -1; + +/* Trivial list manipulation functions to keep track of a list of + new stopped processes. */ +static void +add_to_pid_list (struct simple_pid_list **listp, int pid) +{ + struct simple_pid_list *new_pid = xmalloc (sizeof (struct simple_pid_list)); + new_pid->pid = pid; + new_pid->next = *listp; + *listp = new_pid; +} + +static int +pull_pid_from_list (struct simple_pid_list **listp, int pid) +{ + struct simple_pid_list **p; + + for (p = listp; *p != NULL; p = &(*p)->next) + if ((*p)->pid == pid) + { + struct simple_pid_list *next = (*p)->next; + xfree (*p); + *p = next; + return 1; + } + return 0; +} + +void +linux_record_stopped_pid (int pid) +{ + add_to_pid_list (&stopped_pids, pid); +} + /* A helper function for linux_test_for_tracefork, called after fork (). */ -- 2.34.1