1 /* Program and address space management, for GDB, the GNU debugger.
3 Copyright (C) 2009-2020 Free Software Foundation, Inc.
5 This file is part of GDB.
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.
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.
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/>. */
23 #include "arch-utils.h"
27 #include "gdbthread.h"
31 /* The last program space number assigned. */
32 int last_program_space_num
= 0;
34 /* The head of the program spaces list. */
35 struct program_space
*program_spaces
;
37 /* Pointer to the current program space. */
38 struct program_space
*current_program_space
;
40 /* The last address space number assigned. */
41 static int highest_address_space_num
;
45 /* Keep a registry of per-program_space data-pointers required by other GDB
48 DEFINE_REGISTRY (program_space
, REGISTRY_ACCESS_FIELD
)
50 /* Keep a registry of per-address_space data-pointers required by other GDB
53 DEFINE_REGISTRY (address_space
, REGISTRY_ACCESS_FIELD
)
57 /* Create a new address space object, and add it to the list. */
59 struct address_space
*
60 new_address_space (void)
62 struct address_space
*aspace
;
64 aspace
= XCNEW (struct address_space
);
65 aspace
->num
= ++highest_address_space_num
;
66 address_space_alloc_data (aspace
);
71 /* Maybe create a new address space object, and add it to the list, or
72 return a pointer to an existing address space, in case inferiors
73 share an address space on this target system. */
75 struct address_space
*
76 maybe_new_address_space (void)
78 int shared_aspace
= gdbarch_has_shared_address_space (target_gdbarch ());
82 /* Just return the first in the list. */
83 return program_spaces
->aspace
;
86 return new_address_space ();
90 free_address_space (struct address_space
*aspace
)
92 address_space_free_data (aspace
);
97 address_space_num (struct address_space
*aspace
)
102 /* Start counting over from scratch. */
105 init_address_spaces (void)
107 highest_address_space_num
= 0;
112 /* Add a program space from the program spaces list. */
115 add_program_space (program_space
*pspace
)
117 if (program_spaces
== NULL
)
118 program_spaces
= pspace
;
123 for (last
= program_spaces
; last
->next
!= NULL
; last
= last
->next
)
129 /* Remove a program space from the program spaces list. */
132 remove_program_space (program_space
*pspace
)
134 program_space
*ss
, **ss_link
;
135 gdb_assert (pspace
!= NULL
);
138 ss_link
= &program_spaces
;
152 /* See progspace.h. */
154 program_space::program_space (address_space
*aspace_
)
155 : num (++last_program_space_num
),
158 program_space_alloc_data (this);
160 add_program_space (this);
163 /* See progspace.h. */
165 program_space::~program_space ()
167 gdb_assert (this != current_program_space
);
169 remove_program_space (this);
171 scoped_restore_current_program_space restore_pspace
;
173 set_current_program_space (this);
175 breakpoint_program_space_exit (this);
176 no_shared_libraries (NULL
, 0);
178 free_all_objfiles ();
179 /* Defer breakpoint re-set because we don't want to create new
180 locations for this pspace which we're tearing down. */
181 clear_symtab_users (SYMFILE_DEFER_BP_RESET
);
182 if (!gdbarch_has_shared_address_space (target_gdbarch ()))
183 free_address_space (this->aspace
);
184 clear_section_table (&this->target_sections
);
185 clear_program_space_solib_cache (this);
186 /* Discard any data modules have associated with the PSPACE. */
187 program_space_free_data (this);
190 /* See progspace.h. */
193 program_space::free_all_objfiles ()
195 /* Any objfile reference would become stale. */
196 for (struct so_list
*so
: current_program_space
->solibs ())
197 gdb_assert (so
->objfile
== NULL
);
199 while (!objfiles_list
.empty ())
200 objfiles_list
.front ()->unlink ();
203 /* See progspace.h. */
206 program_space::add_objfile (std::shared_ptr
<objfile
> &&objfile
,
207 struct objfile
*before
)
209 if (before
== nullptr)
210 objfiles_list
.push_back (std::move (objfile
));
213 auto iter
= std::find_if (objfiles_list
.begin (), objfiles_list
.end (),
214 [=] (const std::shared_ptr
<::objfile
> &objf
)
216 return objf
.get () == before
;
218 gdb_assert (iter
!= objfiles_list
.end ());
219 objfiles_list
.insert (iter
, std::move (objfile
));
223 /* See progspace.h. */
226 program_space::remove_objfile (struct objfile
*objfile
)
228 auto iter
= std::find_if (objfiles_list
.begin (), objfiles_list
.end (),
229 [=] (const std::shared_ptr
<::objfile
> &objf
)
231 return objf
.get () == objfile
;
233 gdb_assert (iter
!= objfiles_list
.end ());
234 objfiles_list
.erase (iter
);
236 if (objfile
== symfile_object_file
)
237 symfile_object_file
= NULL
;
240 /* See progspace.h. */
242 next_adapter
<struct so_list
>
243 program_space::solibs () const
245 return next_adapter
<struct so_list
> (this->so_list
);
248 /* Copies program space SRC to DEST. Copies the main executable file,
249 and the main symbol file. Returns DEST. */
251 struct program_space
*
252 clone_program_space (struct program_space
*dest
, struct program_space
*src
)
254 scoped_restore_current_program_space restore_pspace
;
256 set_current_program_space (dest
);
258 if (src
->pspace_exec_filename
!= NULL
)
259 exec_file_attach (src
->pspace_exec_filename
, 0);
261 if (src
->symfile_object_file
!= NULL
)
262 symbol_file_add_main (objfile_name (src
->symfile_object_file
),
263 SYMFILE_DEFER_BP_RESET
);
268 /* Sets PSPACE as the current program space. It is the caller's
269 responsibility to make sure that the currently selected
270 inferior/thread matches the selected program space. */
273 set_current_program_space (struct program_space
*pspace
)
275 if (current_program_space
== pspace
)
278 gdb_assert (pspace
!= NULL
);
280 current_program_space
= pspace
;
282 /* Different symbols change our view of the frame chain. */
283 reinit_frame_cache ();
286 /* Returns true iff there's no inferior bound to PSPACE. */
289 program_space_empty_p (struct program_space
*pspace
)
291 if (find_inferior_for_program_space (pspace
) != NULL
)
297 /* Prints the list of program spaces and their details on UIOUT. If
298 REQUESTED is not -1, it's the ID of the pspace that should be
299 printed. Otherwise, all spaces are printed. */
302 print_program_space (struct ui_out
*uiout
, int requested
)
304 struct program_space
*pspace
;
307 /* Compute number of pspaces we will print. */
310 if (requested
!= -1 && pspace
->num
!= requested
)
316 /* There should always be at least one. */
317 gdb_assert (count
> 0);
319 ui_out_emit_table
table_emitter (uiout
, 3, count
, "pspaces");
320 uiout
->table_header (1, ui_left
, "current", "");
321 uiout
->table_header (4, ui_left
, "id", "Id");
322 uiout
->table_header (17, ui_left
, "exec", "Executable");
323 uiout
->table_body ();
327 struct inferior
*inf
;
330 if (requested
!= -1 && requested
!= pspace
->num
)
333 ui_out_emit_tuple
tuple_emitter (uiout
, NULL
);
335 if (pspace
== current_program_space
)
336 uiout
->field_string ("current", "*");
338 uiout
->field_skip ("current");
340 uiout
->field_signed ("id", pspace
->num
);
342 if (pspace
->pspace_exec_filename
)
343 uiout
->field_string ("exec", pspace
->pspace_exec_filename
);
345 uiout
->field_skip ("exec");
347 /* Print extra info that doesn't really fit in tabular form.
348 Currently, we print the list of inferiors bound to a pspace.
349 There can be more than one inferior bound to the same pspace,
350 e.g., both parent/child inferiors in a vfork, or, on targets
351 that share pspaces between inferiors. */
353 for (inf
= inferior_list
; inf
; inf
= inf
->next
)
354 if (inf
->pspace
== pspace
)
359 printf_filtered ("\n\tBound inferiors: ID %d (%s)",
361 target_pid_to_str (ptid_t (inf
->pid
)).c_str ());
364 printf_filtered (", ID %d (%s)",
366 target_pid_to_str (ptid_t (inf
->pid
)).c_str ());
373 /* Boolean test for an already-known program space id. */
376 valid_program_space_id (int num
)
378 struct program_space
*pspace
;
381 if (pspace
->num
== num
)
387 /* If ARGS is NULL or empty, print information about all program
388 spaces. Otherwise, ARGS is a text representation of a LONG
389 indicating which the program space to print information about. */
392 maintenance_info_program_spaces_command (const char *args
, int from_tty
)
398 requested
= parse_and_eval_long (args
);
399 if (!valid_program_space_id (requested
))
400 error (_("program space ID %d not known."), requested
);
403 print_program_space (current_uiout
, requested
);
406 /* Simply returns the count of program spaces. */
409 number_of_program_spaces (void)
411 struct program_space
*pspace
;
420 /* Update all program spaces matching to address spaces. The user may
421 have created several program spaces, and loaded executables into
422 them before connecting to the target interface that will create the
423 inferiors. All that happens before GDB has a chance to know if the
424 inferiors will share an address space or not. Call this after
425 having connected to the target interface and having fetched the
426 target description, to fixup the program/address spaces mappings.
428 It is assumed that there are no bound inferiors yet, otherwise,
429 they'd be left with stale referenced to released aspaces. */
432 update_address_spaces (void)
434 int shared_aspace
= gdbarch_has_shared_address_space (target_gdbarch ());
435 struct program_space
*pspace
;
436 struct inferior
*inf
;
438 init_address_spaces ();
442 struct address_space
*aspace
= new_address_space ();
444 free_address_space (current_program_space
->aspace
);
446 pspace
->aspace
= aspace
;
451 free_address_space (pspace
->aspace
);
452 pspace
->aspace
= new_address_space ();
455 for (inf
= inferior_list
; inf
; inf
= inf
->next
)
456 if (gdbarch_has_global_solist (target_gdbarch ()))
457 inf
->aspace
= maybe_new_address_space ();
459 inf
->aspace
= inf
->pspace
->aspace
;
464 /* See progspace.h. */
467 clear_program_space_solib_cache (struct program_space
*pspace
)
469 pspace
->added_solibs
.clear ();
470 pspace
->deleted_solibs
.clear ();
476 initialize_progspace (void)
478 add_cmd ("program-spaces", class_maintenance
,
479 maintenance_info_program_spaces_command
,
480 _("Info about currently known program spaces."),
481 &maintenanceinfolist
);
483 /* There's always one program space. Note that this function isn't
484 an automatic _initialize_foo function, since other
485 _initialize_foo routines may need to install their per-pspace
486 data keys. We can only allocate a progspace when all those
487 modules have done that. Do this before
488 initialize_current_architecture, because that accesses exec_bfd,
489 which in turn dereferences current_program_space. */
490 current_program_space
= new program_space (new_address_space ());