1 /* Inferior process information for the remote server for GDB.
2 Copyright (C) 2002-2021 Free Software Foundation, Inc.
4 Contributed by MontaVista Software.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>. */
22 #include "gdbsupport/common-inferior.h"
23 #include "gdbthread.h"
26 std::list
<process_info
*> all_processes
;
27 std::list
<thread_info
*> all_threads
;
29 struct thread_info
*current_thread
;
31 /* The current working directory used to start the inferior.
33 Empty if not specified. */
34 static std::string current_inferior_cwd
;
37 add_thread (ptid_t thread_id
, void *target_data
)
39 struct thread_info
*new_thread
= XCNEW (struct thread_info
);
41 new_thread
->id
= thread_id
;
42 new_thread
->last_resume_kind
= resume_continue
;
43 new_thread
->last_status
.kind
= TARGET_WAITKIND_IGNORE
;
45 all_threads
.push_back (new_thread
);
47 if (current_thread
== NULL
)
48 current_thread
= new_thread
;
50 new_thread
->target_data
= target_data
;
55 /* See gdbthread.h. */
58 get_first_thread (void)
60 if (!all_threads
.empty ())
61 return all_threads
.front ();
67 find_thread_ptid (ptid_t ptid
)
69 return find_thread ([&] (thread_info
*thread
) {
70 return thread
->id
== ptid
;
74 /* Find a thread associated with the given PROCESS, or NULL if no
75 such thread exists. */
77 static struct thread_info
*
78 find_thread_process (const struct process_info
*const process
)
80 return find_any_thread_of_pid (process
->pid
);
83 /* See gdbthread.h. */
86 find_any_thread_of_pid (int pid
)
88 return find_thread (pid
, [] (thread_info
*thread
) {
94 free_one_thread (thread_info
*thread
)
96 free_register_cache (thread_regcache_data (thread
));
101 remove_thread (struct thread_info
*thread
)
103 if (thread
->btrace
!= NULL
)
104 target_disable_btrace (thread
->btrace
);
106 discard_queued_stop_replies (ptid_of (thread
));
107 all_threads
.remove (thread
);
108 if (current_thread
== thread
)
109 current_thread
= NULL
;
110 free_one_thread (thread
);
114 thread_target_data (struct thread_info
*thread
)
116 return thread
->target_data
;
120 thread_regcache_data (struct thread_info
*thread
)
122 return thread
->regcache_data
;
126 set_thread_regcache_data (struct thread_info
*thread
, struct regcache
*data
)
128 thread
->regcache_data
= data
;
132 clear_inferiors (void)
134 for_each_thread (free_one_thread
);
135 all_threads
.clear ();
139 current_thread
= NULL
;
142 struct process_info
*
143 add_process (int pid
, int attached
)
145 process_info
*process
= new process_info (pid
, attached
);
147 all_processes
.push_back (process
);
152 /* Remove a process from the common process list and free the memory
154 The caller is responsible for freeing private data first. */
157 remove_process (struct process_info
*process
)
159 clear_symbol_cache (&process
->symbol_cache
);
160 free_all_breakpoints (process
);
161 gdb_assert (find_thread_process (process
) == NULL
);
162 all_processes
.remove (process
);
167 find_process_pid (int pid
)
169 return find_process ([&] (process_info
*process
) {
170 return process
->pid
== pid
;
174 /* Get the first process in the process list, or NULL if the list is empty. */
177 get_first_process (void)
179 if (!all_processes
.empty ())
180 return all_processes
.front ();
185 /* Return non-zero if there are any inferiors that we have created
186 (as opposed to attached-to). */
189 have_started_inferiors_p (void)
191 return find_process ([] (process_info
*process
) {
192 return !process
->attached
;
196 /* Return non-zero if there are any inferiors that we have attached to. */
199 have_attached_inferiors_p (void)
201 return find_process ([] (process_info
*process
) {
202 return process
->attached
;
206 struct process_info
*
207 get_thread_process (const struct thread_info
*thread
)
209 return find_process_pid (thread
->id
.pid ());
212 struct process_info
*
213 current_process (void)
215 gdb_assert (current_thread
!= NULL
);
216 return get_thread_process (current_thread
);
219 /* See gdbsupport/common-gdbthread.h. */
222 switch_to_thread (process_stratum_target
*ops
, ptid_t ptid
)
224 gdb_assert (ptid
!= minus_one_ptid
);
225 current_thread
= find_thread_ptid (ptid
);
228 /* See inferiors.h. */
231 switch_to_process (process_info
*proc
)
233 int pid
= pid_of (proc
);
235 current_thread
= find_any_thread_of_pid (pid
);
238 /* See gdbsupport/common-inferior.h. */
243 return current_inferior_cwd
;
246 /* See inferiors.h. */
249 set_inferior_cwd (std::string cwd
)
251 current_inferior_cwd
= std::move (cwd
);