1 /* Program and address space management, for GDB, the GNU debugger.
3 Copyright (C) 2009-2017 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"
26 #include "gdbthread.h"
28 /* The last program space number assigned. */
29 int last_program_space_num
= 0;
31 /* The head of the program spaces list. */
32 struct program_space
*program_spaces
;
34 /* Pointer to the current program space. */
35 struct program_space
*current_program_space
;
37 /* The last address space number assigned. */
38 static int highest_address_space_num
;
42 /* Keep a registry of per-program_space data-pointers required by other GDB
45 DEFINE_REGISTRY (program_space
, REGISTRY_ACCESS_FIELD
)
47 /* An address space. It is used for comparing if pspaces/inferior/threads
48 see the same address space and for associating caches to each address
55 /* Per aspace data-pointers required by other GDB modules. */
59 /* Keep a registry of per-address_space data-pointers required by other GDB
62 DEFINE_REGISTRY (address_space
, REGISTRY_ACCESS_FIELD
)
66 /* Create a new address space object, and add it to the list. */
68 struct address_space
*
69 new_address_space (void)
71 struct address_space
*aspace
;
73 aspace
= XCNEW (struct address_space
);
74 aspace
->num
= ++highest_address_space_num
;
75 address_space_alloc_data (aspace
);
80 /* Maybe create a new address space object, and add it to the list, or
81 return a pointer to an existing address space, in case inferiors
82 share an address space on this target system. */
84 struct address_space
*
85 maybe_new_address_space (void)
87 int shared_aspace
= gdbarch_has_shared_address_space (target_gdbarch ());
91 /* Just return the first in the list. */
92 return program_spaces
->aspace
;
95 return new_address_space ();
99 free_address_space (struct address_space
*aspace
)
101 address_space_free_data (aspace
);
106 address_space_num (struct address_space
*aspace
)
111 /* Start counting over from scratch. */
114 init_address_spaces (void)
116 highest_address_space_num
= 0;
121 /* Adds a new empty program space to the program space list, and binds
122 it to ASPACE. Returns the pointer to the new object. */
124 struct program_space
*
125 add_program_space (struct address_space
*aspace
)
127 struct program_space
*pspace
;
129 pspace
= XCNEW (struct program_space
);
131 pspace
->num
= ++last_program_space_num
;
132 pspace
->aspace
= aspace
;
134 program_space_alloc_data (pspace
);
136 if (program_spaces
== NULL
)
137 program_spaces
= pspace
;
140 struct program_space
*last
;
142 for (last
= program_spaces
; last
->next
!= NULL
; last
= last
->next
)
150 /* Releases program space PSPACE, and all its contents (shared
151 libraries, objfiles, and any other references to the PSPACE in
152 other modules). It is an internal error to call this when PSPACE
153 is the current program space, since there should always be a
157 release_program_space (struct program_space
*pspace
)
159 struct cleanup
*old_chain
= save_current_program_space ();
161 gdb_assert (pspace
!= current_program_space
);
163 set_current_program_space (pspace
);
165 breakpoint_program_space_exit (pspace
);
166 no_shared_libraries (NULL
, 0);
168 free_all_objfiles ();
169 if (!gdbarch_has_shared_address_space (target_gdbarch ()))
170 free_address_space (pspace
->aspace
);
171 clear_section_table (&pspace
->target_sections
);
172 clear_program_space_solib_cache (pspace
);
173 /* Discard any data modules have associated with the PSPACE. */
174 program_space_free_data (pspace
);
177 do_cleanups (old_chain
);
180 /* Copies program space SRC to DEST. Copies the main executable file,
181 and the main symbol file. Returns DEST. */
183 struct program_space
*
184 clone_program_space (struct program_space
*dest
, struct program_space
*src
)
186 struct cleanup
*old_chain
;
188 old_chain
= save_current_program_space ();
190 set_current_program_space (dest
);
192 if (src
->pspace_exec_filename
!= NULL
)
193 exec_file_attach (src
->pspace_exec_filename
, 0);
195 if (src
->symfile_object_file
!= NULL
)
196 symbol_file_add_main (objfile_name (src
->symfile_object_file
), 0);
198 do_cleanups (old_chain
);
202 /* Sets PSPACE as the current program space. It is the caller's
203 responsibility to make sure that the currently selected
204 inferior/thread matches the selected program space. */
207 set_current_program_space (struct program_space
*pspace
)
209 if (current_program_space
== pspace
)
212 gdb_assert (pspace
!= NULL
);
214 current_program_space
= pspace
;
216 /* Different symbols change our view of the frame chain. */
217 reinit_frame_cache ();
220 /* A cleanups callback, helper for save_current_program_space
224 restore_program_space (void *arg
)
226 struct program_space
*saved_pspace
= (struct program_space
*) arg
;
228 set_current_program_space (saved_pspace
);
231 /* Save the current program space so that it may be restored by a later
232 call to do_cleanups. Returns the struct cleanup pointer needed for
233 later doing the cleanup. */
236 save_current_program_space (void)
238 struct cleanup
*old_chain
= make_cleanup (restore_program_space
,
239 current_program_space
);
244 /* Returns true iff there's no inferior bound to PSPACE. */
247 program_space_empty_p (struct program_space
*pspace
)
249 if (find_inferior_for_program_space (pspace
) != NULL
)
255 /* Remove a program space from the program spaces list and release it. It is
256 an error to call this function while PSPACE is the current program space. */
259 delete_program_space (struct program_space
*pspace
)
261 struct program_space
*ss
, **ss_link
;
262 gdb_assert (pspace
!= NULL
);
263 gdb_assert (pspace
!= current_program_space
);
266 ss_link
= &program_spaces
;
279 release_program_space (pspace
);
282 /* Prints the list of program spaces and their details on UIOUT. If
283 REQUESTED is not -1, it's the ID of the pspace that should be
284 printed. Otherwise, all spaces are printed. */
287 print_program_space (struct ui_out
*uiout
, int requested
)
289 struct program_space
*pspace
;
291 struct cleanup
*old_chain
;
293 /* Compute number of pspaces we will print. */
296 if (requested
!= -1 && pspace
->num
!= requested
)
302 /* There should always be at least one. */
303 gdb_assert (count
> 0);
305 old_chain
= make_cleanup_ui_out_table_begin_end (uiout
, 3, count
, "pspaces");
306 uiout
->table_header (1, ui_left
, "current", "");
307 uiout
->table_header (4, ui_left
, "id", "Id");
308 uiout
->table_header (17, ui_left
, "exec", "Executable");
309 uiout
->table_body ();
313 struct inferior
*inf
;
316 if (requested
!= -1 && requested
!= pspace
->num
)
319 ui_out_emit_tuple
tuple_emitter (uiout
, NULL
);
321 if (pspace
== current_program_space
)
322 uiout
->field_string ("current", "*");
324 uiout
->field_skip ("current");
326 uiout
->field_int ("id", pspace
->num
);
328 if (pspace
->pspace_exec_filename
)
329 uiout
->field_string ("exec", pspace
->pspace_exec_filename
);
331 uiout
->field_skip ("exec");
333 /* Print extra info that doesn't really fit in tabular form.
334 Currently, we print the list of inferiors bound to a pspace.
335 There can be more than one inferior bound to the same pspace,
336 e.g., both parent/child inferiors in a vfork, or, on targets
337 that share pspaces between inferiors. */
339 for (inf
= inferior_list
; inf
; inf
= inf
->next
)
340 if (inf
->pspace
== pspace
)
345 printf_filtered ("\n\tBound inferiors: ID %d (%s)",
347 target_pid_to_str (pid_to_ptid (inf
->pid
)));
350 printf_filtered (", ID %d (%s)",
352 target_pid_to_str (pid_to_ptid (inf
->pid
)));
358 do_cleanups (old_chain
);
361 /* Boolean test for an already-known program space id. */
364 valid_program_space_id (int num
)
366 struct program_space
*pspace
;
369 if (pspace
->num
== num
)
375 /* If ARGS is NULL or empty, print information about all program
376 spaces. Otherwise, ARGS is a text representation of a LONG
377 indicating which the program space to print information about. */
380 maintenance_info_program_spaces_command (char *args
, int from_tty
)
386 requested
= parse_and_eval_long (args
);
387 if (!valid_program_space_id (requested
))
388 error (_("program space ID %d not known."), requested
);
391 print_program_space (current_uiout
, requested
);
394 /* Simply returns the count of program spaces. */
397 number_of_program_spaces (void)
399 struct program_space
*pspace
;
408 /* Update all program spaces matching to address spaces. The user may
409 have created several program spaces, and loaded executables into
410 them before connecting to the target interface that will create the
411 inferiors. All that happens before GDB has a chance to know if the
412 inferiors will share an address space or not. Call this after
413 having connected to the target interface and having fetched the
414 target description, to fixup the program/address spaces mappings.
416 It is assumed that there are no bound inferiors yet, otherwise,
417 they'd be left with stale referenced to released aspaces. */
420 update_address_spaces (void)
422 int shared_aspace
= gdbarch_has_shared_address_space (target_gdbarch ());
423 struct program_space
*pspace
;
424 struct inferior
*inf
;
426 init_address_spaces ();
430 struct address_space
*aspace
= new_address_space ();
432 free_address_space (current_program_space
->aspace
);
434 pspace
->aspace
= aspace
;
439 free_address_space (pspace
->aspace
);
440 pspace
->aspace
= new_address_space ();
443 for (inf
= inferior_list
; inf
; inf
= inf
->next
)
444 if (gdbarch_has_global_solist (target_gdbarch ()))
445 inf
->aspace
= maybe_new_address_space ();
447 inf
->aspace
= inf
->pspace
->aspace
;
450 /* Save the current program space so that it may be restored by a later
451 call to do_cleanups. Returns the struct cleanup pointer needed for
452 later doing the cleanup. */
455 save_current_space_and_thread (void)
457 struct cleanup
*old_chain
;
459 /* If restoring to null thread, we need to restore the pspace as
460 well, hence, we need to save the current program space first. */
461 old_chain
= save_current_program_space ();
462 /* There's no need to save the current inferior here.
463 That is handled by make_cleanup_restore_current_thread. */
464 make_cleanup_restore_current_thread ();
469 /* See progspace.h */
472 switch_to_program_space_and_thread (struct program_space
*pspace
)
474 struct inferior
*inf
;
476 inf
= find_inferior_for_program_space (pspace
);
477 if (inf
!= NULL
&& inf
->pid
!= 0)
479 struct thread_info
*tp
;
481 tp
= any_live_thread_of_process (inf
->pid
);
484 switch_to_thread (tp
->ptid
);
485 /* Switching thread switches pspace implicitly. We're
491 switch_to_thread (null_ptid
);
492 set_current_program_space (pspace
);
497 /* See progspace.h. */
500 clear_program_space_solib_cache (struct program_space
*pspace
)
502 VEC_free (so_list_ptr
, pspace
->added_solibs
);
504 free_char_ptr_vec (pspace
->deleted_solibs
);
505 pspace
->deleted_solibs
= NULL
;
511 initialize_progspace (void)
513 add_cmd ("program-spaces", class_maintenance
,
514 maintenance_info_program_spaces_command
,
515 _("Info about currently known program spaces."),
516 &maintenanceinfolist
);
518 /* There's always one program space. Note that this function isn't
519 an automatic _initialize_foo function, since other
520 _initialize_foo routines may need to install their per-pspace
521 data keys. We can only allocate a progspace when all those
522 modules have done that. Do this before
523 initialize_current_architecture, because that accesses exec_bfd,
524 which in turn dereferences current_program_space. */
525 current_program_space
= add_program_space (new_address_space ());