1 /* Program and address space management, for GDB, the GNU debugger.
3 Copyright (C) 2009-2015 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 pspace->next = program_spaces;
137 program_spaces = pspace;
142 /* Releases program space PSPACE, and all its contents (shared
143 libraries, objfiles, and any other references to the PSPACE in
144 other modules). It is an internal error to call this when PSPACE
145 is the current program space, since there should always be a
149 release_program_space (struct program_space *pspace)
151 struct cleanup *old_chain = save_current_program_space ();
153 gdb_assert (pspace != current_program_space);
155 set_current_program_space (pspace);
157 breakpoint_program_space_exit (pspace);
158 no_shared_libraries (NULL, 0);
160 free_all_objfiles ();
161 if (!gdbarch_has_shared_address_space (target_gdbarch ()))
162 free_address_space (pspace->aspace);
163 clear_section_table (&pspace->target_sections);
164 clear_program_space_solib_cache (pspace);
165 /* Discard any data modules have associated with the PSPACE. */
166 program_space_free_data (pspace);
169 do_cleanups (old_chain);
172 /* Copies program space SRC to DEST. Copies the main executable file,
173 and the main symbol file. Returns DEST. */
175 struct program_space *
176 clone_program_space (struct program_space *dest, struct program_space *src)
178 struct cleanup *old_chain;
180 old_chain = save_current_program_space ();
182 set_current_program_space (dest);
184 if (src->pspace_exec_filename != NULL)
185 exec_file_attach (src->pspace_exec_filename, 0);
187 if (src->symfile_object_file != NULL)
188 symbol_file_add_main (objfile_name (src->symfile_object_file), 0);
190 do_cleanups (old_chain);
194 /* Sets PSPACE as the current program space. It is the caller's
195 responsibility to make sure that the currently selected
196 inferior/thread matches the selected program space. */
199 set_current_program_space (struct program_space *pspace)
201 if (current_program_space == pspace)
204 gdb_assert (pspace != NULL);
206 current_program_space = pspace;
208 /* Different symbols change our view of the frame chain. */
209 reinit_frame_cache ();
212 /* A cleanups callback, helper for save_current_program_space
216 restore_program_space (void *arg)
218 struct program_space *saved_pspace = (struct program_space *) arg;
220 set_current_program_space (saved_pspace);
223 /* Save the current program space so that it may be restored by a later
224 call to do_cleanups. Returns the struct cleanup pointer needed for
225 later doing the cleanup. */
228 save_current_program_space (void)
230 struct cleanup *old_chain = make_cleanup (restore_program_space,
231 current_program_space);
236 /* Returns true iff there's no inferior bound to PSPACE. */
239 program_space_empty_p (struct program_space *pspace)
241 if (find_inferior_for_program_space (pspace) != NULL)
247 /* Remove a program space from the program spaces list and release it. It is
248 an error to call this function while PSPACE is the current program space. */
251 delete_program_space (struct program_space *pspace)
253 struct program_space *ss, **ss_link;
254 gdb_assert (pspace != NULL);
255 gdb_assert (pspace != current_program_space);
258 ss_link = &program_spaces;
271 release_program_space (pspace);
274 /* Prints the list of program spaces and their details on UIOUT. If
275 REQUESTED is not -1, it's the ID of the pspace that should be
276 printed. Otherwise, all spaces are printed. */
279 print_program_space (struct ui_out *uiout, int requested)
281 struct program_space *pspace;
283 struct cleanup *old_chain;
285 /* Compute number of pspaces we will print. */
288 if (requested != -1 && pspace->num != requested)
294 /* There should always be at least one. */
295 gdb_assert (count > 0);
297 old_chain = make_cleanup_ui_out_table_begin_end (uiout, 3, count, "pspaces");
298 ui_out_table_header (uiout, 1, ui_left, "current", "");
299 ui_out_table_header (uiout, 4, ui_left, "id", "Id");
300 ui_out_table_header (uiout, 17, ui_left, "exec", "Executable");
301 ui_out_table_body (uiout);
305 struct cleanup *chain2;
306 struct inferior *inf;
309 if (requested != -1 && requested != pspace->num)
312 chain2 = make_cleanup_ui_out_tuple_begin_end (uiout, NULL);
314 if (pspace == current_program_space)
315 ui_out_field_string (uiout, "current", "*");
317 ui_out_field_skip (uiout, "current");
319 ui_out_field_int (uiout, "id", pspace->num);
321 if (pspace->pspace_exec_filename)
322 ui_out_field_string (uiout, "exec", pspace->pspace_exec_filename);
324 ui_out_field_skip (uiout, "exec");
326 /* Print extra info that doesn't really fit in tabular form.
327 Currently, we print the list of inferiors bound to a pspace.
328 There can be more than one inferior bound to the same pspace,
329 e.g., both parent/child inferiors in a vfork, or, on targets
330 that share pspaces between inferiors. */
332 for (inf = inferior_list; inf; inf = inf->next)
333 if (inf->pspace == pspace)
338 printf_filtered ("\n\tBound inferiors: ID %d (%s)",
340 target_pid_to_str (pid_to_ptid (inf->pid)));
343 printf_filtered (", ID %d (%s)",
345 target_pid_to_str (pid_to_ptid (inf->pid)));
348 ui_out_text (uiout, "\n");
349 do_cleanups (chain2);
352 do_cleanups (old_chain);
355 /* Boolean test for an already-known program space id. */
358 valid_program_space_id (int num)
360 struct program_space *pspace;
363 if (pspace->num == num)
369 /* If ARGS is NULL or empty, print information about all program
370 spaces. Otherwise, ARGS is a text representation of a LONG
371 indicating which the program space to print information about. */
374 maintenance_info_program_spaces_command (char *args, int from_tty)
380 requested = parse_and_eval_long (args);
381 if (!valid_program_space_id (requested))
382 error (_("program space ID %d not known."), requested);
385 print_program_space (current_uiout, requested);
388 /* Simply returns the count of program spaces. */
391 number_of_program_spaces (void)
393 struct program_space *pspace;
402 /* Update all program spaces matching to address spaces. The user may
403 have created several program spaces, and loaded executables into
404 them before connecting to the target interface that will create the
405 inferiors. All that happens before GDB has a chance to know if the
406 inferiors will share an address space or not. Call this after
407 having connected to the target interface and having fetched the
408 target description, to fixup the program/address spaces mappings.
410 It is assumed that there are no bound inferiors yet, otherwise,
411 they'd be left with stale referenced to released aspaces. */
414 update_address_spaces (void)
416 int shared_aspace = gdbarch_has_shared_address_space (target_gdbarch ());
417 struct program_space *pspace;
418 struct inferior *inf;
420 init_address_spaces ();
424 struct address_space *aspace = new_address_space ();
426 free_address_space (current_program_space->aspace);
428 pspace->aspace = aspace;
433 free_address_space (pspace->aspace);
434 pspace->aspace = new_address_space ();
437 for (inf = inferior_list; inf; inf = inf->next)
438 if (gdbarch_has_global_solist (target_gdbarch ()))
439 inf->aspace = maybe_new_address_space ();
441 inf->aspace = inf->pspace->aspace;
444 /* Save the current program space so that it may be restored by a later
445 call to do_cleanups. Returns the struct cleanup pointer needed for
446 later doing the cleanup. */
449 save_current_space_and_thread (void)
451 struct cleanup *old_chain;
453 /* If restoring to null thread, we need to restore the pspace as
454 well, hence, we need to save the current program space first. */
455 old_chain = save_current_program_space ();
456 /* There's no need to save the current inferior here.
457 That is handled by make_cleanup_restore_current_thread. */
458 make_cleanup_restore_current_thread ();
463 /* See progspace.h */
466 switch_to_program_space_and_thread (struct program_space *pspace)
468 struct inferior *inf;
470 inf = find_inferior_for_program_space (pspace);
471 if (inf != NULL && inf->pid != 0)
473 struct thread_info *tp;
475 tp = any_live_thread_of_process (inf->pid);
478 switch_to_thread (tp->ptid);
479 /* Switching thread switches pspace implicitly. We're
485 switch_to_thread (null_ptid);
486 set_current_program_space (pspace);
491 /* See progspace.h. */
494 clear_program_space_solib_cache (struct program_space *pspace)
496 VEC_free (so_list_ptr, pspace->added_solibs);
498 free_char_ptr_vec (pspace->deleted_solibs);
499 pspace->deleted_solibs = NULL;
505 initialize_progspace (void)
507 add_cmd ("program-spaces", class_maintenance,
508 maintenance_info_program_spaces_command,
509 _("Info about currently known program spaces."),
510 &maintenanceinfolist);
512 /* There's always one program space. Note that this function isn't
513 an automatic _initialize_foo function, since other
514 _initialize_foo routines may need to install their per-pspace
515 data keys. We can only allocate a progspace when all those
516 modules have done that. Do this before
517 initialize_current_architecture, because that accesses exec_bfd,
518 which in turn dereferences current_program_space. */
519 current_program_space = add_program_space (new_address_space ());