mirror of
https://github.com/darlinghq/darling-gdb.git
synced 2024-12-12 22:46:16 +00:00
a77053c217
(SOLIB_CREATE_INFERIOR_HOOK, SOLIB_REMOVE_INFERIOR_HOOK) (SOLIB_IN_DYNAMIC_LINKER, SOLIB_RESTART) (DISABLE_UNSETTABLE_BREAK, PC_SOLIB) (IN_SOLIB_DYNSYM_RESOLVE_CODE): Remove defines and orphaned comments. * breakpoint.c: Include "solib.h". (insert_bp_location) [!DISABLE_UNSETTABLE_BREAK]: Call solib_address. (remove_solib_event_breakpoints, create_solib_event_breakpoint) (disable_breakpoints_in_shlibs) (disable_breakpoints_in_unloaded_shlib) (re_enable_breakpoints_in_shlibs): Compile if SOLIB_ADD isn't defined. If PC_SOLIB isn't defined, call solib_address. (_initialize_breakpoint): Unconditionally install observer. * corelow.c: Include "solib.h". [SOLIB_ADD] (solib_add_stub): Remove prototype. (core_close) [!CLEAR_SOLIB]: Call clear_solib. (solib_add_stub) [!SOLIB_ADD] Call solib_add. (core_open): Unconditionally call solib_add_stub. * fork-child.c: Include "solib.h". (fork_inferior) [!SOLIB_CREATE_INFERIOR_HOOK]: Call solib_create_inferior_hook. * infcmd.c: Include "solib.h". (attach_command) [!SOLIB_ADD]: Call shlib_rescan. Unconditionally call re_enable_breakpoints_in_shlibs. * infrun.c: Include "solib.h". (SOLIB_IN_SYNSYM_RESOLVE_CODE): Don't define if not already defined. (stop_on_solib_events, show_stop_on_solib_events): Include unconditionally. (follow_exec) [!SOLIB_CREATE_INFERIOR_HOOK]: Call solib_create_inferior_hook. (handle_inferior_event) [!SOLIB_ADD]: Call shlib_add. [!IN_SOLIB_DYNSYM_RESOLVE_CODE]: Call in_solib_dynsym_resolve_code. (_initialize_infrun): Unconditionally add "stop_on_solib-events" command. * remote.c: Include "solib.h". (remote_open_1): Unconditionally call no_shared_libraries. [!SOLIB_CREATE_INFERIOR_HOOK] Call solib_create_inferior_hook. * stack.c: Include "solib.h". (print_frame) [!PC_SOLIB] Call shlib_for_pc. * xcoffsolib.c (no_shared_libraries): Remove function. * Makefile.in (SFILES): Add solib.c. (ALLDEPFILES): Remove solib.c. (COMMON_OBS): Add solib.o. (breakpoint.o, corelow.o, fork-chiled.o, infcmd.o, infrun.o) (remote.o, stack.o): Update dependencies.
180 lines
4.9 KiB
C
180 lines
4.9 KiB
C
/* Shared library support for RS/6000 (xcoff) object files, for GDB.
|
|
Copyright 1991, 1992, 1995, 1996, 1999, 2000, 2001
|
|
Free Software Foundation, Inc.
|
|
Contributed by IBM Corporation.
|
|
|
|
This file is part of GDB.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
#include "defs.h"
|
|
#include "bfd.h"
|
|
#include "xcoffsolib.h"
|
|
#include "inferior.h"
|
|
#include "gdbcmd.h"
|
|
#include "symfile.h"
|
|
#include "frame.h"
|
|
#include "gdb_regex.h"
|
|
|
|
|
|
/* If ADDR lies in a shared library, return its name.
|
|
Note that returned name points to static data whose content is overwritten
|
|
by each call. */
|
|
|
|
char *
|
|
xcoff_solib_address (CORE_ADDR addr)
|
|
{
|
|
static char *buffer = NULL;
|
|
struct vmap *vp = vmap;
|
|
|
|
/* The first vmap entry is for the exec file. */
|
|
|
|
if (vp == NULL)
|
|
return NULL;
|
|
for (vp = vp->nxt; vp; vp = vp->nxt)
|
|
if (vp->tstart <= addr && addr < vp->tend)
|
|
{
|
|
xfree (buffer);
|
|
buffer = xstrprintf ("%s%s%s%s",
|
|
vp->name,
|
|
*vp->member ? "(" : "",
|
|
vp->member,
|
|
*vp->member ? ")" : "");
|
|
return buffer;
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
static void solib_info (char *, int);
|
|
static void sharedlibrary_command (char *pattern, int from_tty);
|
|
|
|
static void
|
|
solib_info (char *args, int from_tty)
|
|
{
|
|
struct vmap *vp = vmap;
|
|
|
|
/* Check for new shared libraries loaded with load (). */
|
|
if (! ptid_equal (inferior_ptid, null_ptid))
|
|
xcoff_relocate_symtab (PIDGET (inferior_ptid));
|
|
|
|
if (vp == NULL || vp->nxt == NULL)
|
|
{
|
|
printf_unfiltered ("No shared libraries loaded at this time.\n");
|
|
return;
|
|
}
|
|
|
|
/* Skip over the first vmap, it is the main program, always loaded. */
|
|
vp = vp->nxt;
|
|
|
|
printf_unfiltered ("\
|
|
Text Range Data Range Syms Shared Object Library\n");
|
|
|
|
for (; vp != NULL; vp = vp->nxt)
|
|
{
|
|
printf_unfiltered ("0x%s-0x%s 0x%s-0x%s %s %s%s%s%s\n",
|
|
paddr (vp->tstart),paddr (vp->tend),
|
|
paddr (vp->dstart), paddr (vp->dend),
|
|
vp->loaded ? "Yes" : "No ",
|
|
vp->name,
|
|
*vp->member ? "(" : "",
|
|
vp->member,
|
|
*vp->member ? ")" : "");
|
|
}
|
|
}
|
|
|
|
static void
|
|
sharedlibrary_command (char *pattern, int from_tty)
|
|
{
|
|
dont_repeat ();
|
|
|
|
/* Check for new shared libraries loaded with load (). */
|
|
if (! ptid_equal (inferior_ptid, null_ptid))
|
|
xcoff_relocate_symtab (PIDGET (inferior_ptid));
|
|
|
|
if (pattern)
|
|
{
|
|
char *re_err = re_comp (pattern);
|
|
|
|
if (re_err)
|
|
error (_("Invalid regexp: %s"), re_err);
|
|
}
|
|
|
|
/* Walk the list of currently loaded shared libraries, and read
|
|
symbols for any that match the pattern --- or any whose symbols
|
|
aren't already loaded, if no pattern was given. */
|
|
{
|
|
int any_matches = 0;
|
|
int loaded_any_symbols = 0;
|
|
struct vmap *vp = vmap;
|
|
|
|
if (!vp)
|
|
return;
|
|
|
|
/* skip over the first vmap, it is the main program, always loaded. */
|
|
for (vp = vp->nxt; vp; vp = vp->nxt)
|
|
if (! pattern
|
|
|| re_exec (vp->name)
|
|
|| (*vp->member && re_exec (vp->member)))
|
|
{
|
|
any_matches = 1;
|
|
|
|
if (vp->loaded)
|
|
{
|
|
if (from_tty)
|
|
printf_unfiltered ("Symbols already loaded for %s\n",
|
|
vp->name);
|
|
}
|
|
else
|
|
{
|
|
if (vmap_add_symbols (vp))
|
|
loaded_any_symbols = 1;
|
|
}
|
|
}
|
|
|
|
if (from_tty && pattern && ! any_matches)
|
|
printf_unfiltered
|
|
("No loaded shared libraries match the pattern `%s'.\n", pattern);
|
|
|
|
if (loaded_any_symbols)
|
|
{
|
|
/* Getting new symbols may change our opinion about what is
|
|
frameless. */
|
|
reinit_frame_cache ();
|
|
}
|
|
}
|
|
}
|
|
|
|
void
|
|
_initialize_xcoffsolib (void)
|
|
{
|
|
add_com ("sharedlibrary", class_files, sharedlibrary_command,
|
|
_("Load shared object library symbols for files matching REGEXP."));
|
|
add_info ("sharedlibrary", solib_info,
|
|
_("Status of loaded shared object libraries"));
|
|
|
|
add_setshow_boolean_cmd ("auto-solib-add", class_support,
|
|
&auto_solib_add, _("\
|
|
Set autoloading of shared library symbols."), _("\
|
|
Show autoloading of shared library symbols."), _("\
|
|
If \"on\", symbols from all shared object libraries will be loaded\n\
|
|
automatically when the inferior begins execution, when the dynamic linker\n\
|
|
informs gdb that a new library has been loaded, or when attaching to the\n\
|
|
inferior. Otherwise, symbols must be loaded manually, using `sharedlibrary'."),
|
|
NULL,
|
|
NULL, /* FIXME: i18n: */
|
|
&setlist, &showlist);
|
|
}
|