]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - gdb/obsd-nat.c
Remove ptid_get_pid
[thirdparty/binutils-gdb.git] / gdb / obsd-nat.c
CommitLineData
863e4da4
MK
1/* Native-dependent code for OpenBSD.
2
e2882c85 3 Copyright (C) 2012-2018 Free Software Foundation, Inc.
863e4da4
MK
4
5 This file is part of GDB.
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
19
20#include "defs.h"
21#include "gdbthread.h"
22#include "inferior.h"
23#include "target.h"
24
863e4da4
MK
25#include <sys/types.h>
26#include <sys/ptrace.h>
dc92ace0 27#include "gdb_wait.h"
863e4da4
MK
28
29#include "inf-child.h"
30#include "obsd-nat.h"
31
32/* OpenBSD 5.2 and later include rthreads which uses a thread model
ab4756af 33 that maps userland threads directly onto kernel threads in a 1:1
863e4da4
MK
34 fashion. */
35
36#ifdef PT_GET_THREAD_FIRST
37
f6ac5f3d
PA
38const char *
39obsd_nat_target::pid_to_str (ptid_t ptid)
863e4da4
MK
40{
41 if (ptid_get_lwp (ptid) != 0)
42 {
43 static char buf[64];
44
45 xsnprintf (buf, sizeof buf, "thread %ld", ptid_get_lwp (ptid));
46 return buf;
47 }
48
49 return normal_pid_to_str (ptid);
50}
51
f6ac5f3d
PA
52void
53obsd_nat_target::update_thread_list ()
863e4da4 54{
e99b03dc 55 pid_t pid = inferior_ptid.pid ();
863e4da4
MK
56 struct ptrace_thread_state pts;
57
e8032dde
PA
58 prune_threads ();
59
ab4756af 60 if (ptrace (PT_GET_THREAD_FIRST, pid, (caddr_t)&pts, sizeof pts) == -1)
863e4da4
MK
61 perror_with_name (("ptrace"));
62
63 while (pts.pts_tid != -1)
64 {
fd79271b 65 ptid_t ptid = ptid_t (pid, pts.pts_tid, 0);
863e4da4
MK
66
67 if (!in_thread_list (ptid))
68 {
69 if (ptid_get_lwp (inferior_ptid) == 0)
70 thread_change_ptid (inferior_ptid, ptid);
71 else
72 add_thread (ptid);
73 }
74
ab4756af 75 if (ptrace (PT_GET_THREAD_NEXT, pid, (caddr_t)&pts, sizeof pts) == -1)
863e4da4
MK
76 perror_with_name (("ptrace"));
77 }
78}
79
f6ac5f3d
PA
80ptid_t
81obsd_nat_target::wait (ptid_t ptid, struct target_waitstatus *ourstatus,
82 int options)
863e4da4
MK
83{
84 pid_t pid;
85 int status, save_errno;
86
87 do
88 {
89 set_sigint_trap ();
90
91 do
92 {
e99b03dc 93 pid = waitpid (ptid.pid (), &status, 0);
863e4da4
MK
94 save_errno = errno;
95 }
96 while (pid == -1 && errno == EINTR);
97
98 clear_sigint_trap ();
99
100 if (pid == -1)
101 {
102 fprintf_unfiltered (gdb_stderr,
103 _("Child process unexpectedly missing: %s.\n"),
104 safe_strerror (save_errno));
105
106 /* Claim it exited with unknown signal. */
107 ourstatus->kind = TARGET_WAITKIND_SIGNALLED;
108 ourstatus->value.sig = GDB_SIGNAL_UNKNOWN;
109 return inferior_ptid;
110 }
111
112 /* Ignore terminated detached child processes. */
e99b03dc 113 if (!WIFSTOPPED (status) && pid != inferior_ptid.pid ())
863e4da4
MK
114 pid = -1;
115 }
116 while (pid == -1);
117
f2907e49 118 ptid = ptid_t (pid);
863e4da4
MK
119
120 if (WIFSTOPPED (status))
121 {
122 ptrace_state_t pe;
123 pid_t fpid;
124
125 if (ptrace (PT_GET_PROCESS_STATE, pid, (caddr_t)&pe, sizeof pe) == -1)
126 perror_with_name (("ptrace"));
127
128 switch (pe.pe_report_event)
129 {
130 case PTRACE_FORK:
131 ourstatus->kind = TARGET_WAITKIND_FORKED;
f2907e49 132 ourstatus->value.related_pid = ptid_t (pe.pe_other_pid);
863e4da4
MK
133
134 /* Make sure the other end of the fork is stopped too. */
135 fpid = waitpid (pe.pe_other_pid, &status, 0);
136 if (fpid == -1)
137 perror_with_name (("waitpid"));
138
139 if (ptrace (PT_GET_PROCESS_STATE, fpid,
140 (caddr_t)&pe, sizeof pe) == -1)
141 perror_with_name (("ptrace"));
142
143 gdb_assert (pe.pe_report_event == PTRACE_FORK);
144 gdb_assert (pe.pe_other_pid == pid);
e99b03dc 145 if (fpid == inferior_ptid.pid ())
863e4da4 146 {
f2907e49
TT
147 ourstatus->value.related_pid = ptid_t (pe.pe_other_pid);
148 return ptid_t (fpid);
863e4da4
MK
149 }
150
f2907e49 151 return ptid_t (pid);
863e4da4
MK
152 }
153
fd79271b 154 ptid = ptid_t (pid, pe.pe_tid, 0);
863e4da4
MK
155 if (!in_thread_list (ptid))
156 {
157 if (ptid_get_lwp (inferior_ptid) == 0)
158 thread_change_ptid (inferior_ptid, ptid);
159 else
160 add_thread (ptid);
161 }
162 }
163
164 store_waitstatus (ourstatus, status);
165 return ptid;
166}
167
863e4da4 168#endif /* PT_GET_THREAD_FIRST */