mirror of
https://github.com/espressif/binutils-gdb.git
synced 2025-06-20 09:58:19 +08:00
PR symtab/12406:
* solib.c (update_solib_list): Update the program space's added_solibs and deleted_solibs fields. * progspace.h (struct program_space) <added_solibs, deleted_solibs>: New fields. (clear_program_space_solib_cache): Declare. * progspace.c (release_program_space): Call clear_program_space_solib_cache. (clear_program_space_solib_cache): New function. * infrun.c (handle_inferior_event) <TARGET_WAITKIND_LOADED>: Call bpstat_stop_status. Use handle_solib_event. * breakpoint.c: Include gdb_regex.h. (print_solib_event): New function. (bpstat_print): Use print_solib_event. (bpstat_stop_status): Add special case for bp_shlib_event. (handle_solib_event): New function. (bpstat_what): Use handle_solib_event. (struct solib_catchpoint): New. (dtor_catch_solib, insert_catch_solib, remove_catch_solib) (breakpoint_hit_catch_solib, check_status_catch_solib) (print_it_catch_solib, print_one_catch_solib) (print_mention_catch_solib, print_recreate_catch_solib): New functions. (catch_solib_breakpoint_ops): New global. (catch_load_or_unload, catch_load_command_1) (catch_unload_command_1): New functions. (internal_bkpt_check_status): Add special case for bp_shlib_event. (internal_bkpt_print_it): Use print_solib_event. (initialize_breakpoint_ops): Initialize catch_solib_breakpoint_ops. (_initialize_breakpoint): Register "catch load" and "catch unload". * breakpoint.h (handle_solib_event): Declare. * NEWS: Add entry for "catch load" and "catch unload". gdb/doc * gdb.texinfo (Set Catchpoints): Document "catch load" and "catch unload". (Files): Mention new catch commands. (GDB/MI Async Records): Likewise. gdb/testsuite * lib/mi-support.exp (mi_expect_stop): Add special case for solib-event. * gdb.base/catch-load-so.c: New file. * gdb.base/catch-load.exp: New file. * gdb.base/catch-load.c: New file. * gdb.base/break-interp.exp (reach_1): Update regexp.
This commit is contained in:
433
gdb/breakpoint.c
433
gdb/breakpoint.c
@ -65,6 +65,7 @@
|
||||
#include "stack.h"
|
||||
#include "skip.h"
|
||||
#include "record.h"
|
||||
#include "gdb_regex.h"
|
||||
|
||||
/* readline include files */
|
||||
#include "readline/readline.h"
|
||||
@ -259,6 +260,11 @@ static int is_masked_watchpoint (const struct breakpoint *b);
|
||||
|
||||
static int strace_marker_p (struct breakpoint *b);
|
||||
|
||||
static void init_catchpoint (struct breakpoint *b,
|
||||
struct gdbarch *gdbarch, int tempflag,
|
||||
char *cond_string,
|
||||
const struct breakpoint_ops *ops);
|
||||
|
||||
/* The abstract base class all breakpoint_ops structures inherit
|
||||
from. */
|
||||
static struct breakpoint_ops base_breakpoint_ops;
|
||||
@ -3490,6 +3496,78 @@ print_bp_stop_message (bpstat bs)
|
||||
}
|
||||
}
|
||||
|
||||
/* A helper function that prints a shared library stopped event. */
|
||||
|
||||
static void
|
||||
print_solib_event (int is_catchpoint)
|
||||
{
|
||||
int any_deleted
|
||||
= !VEC_empty (char_ptr, current_program_space->deleted_solibs);
|
||||
int any_added
|
||||
= !VEC_empty (so_list_ptr, current_program_space->added_solibs);
|
||||
|
||||
if (!is_catchpoint)
|
||||
{
|
||||
if (any_added || any_deleted)
|
||||
ui_out_text (current_uiout,
|
||||
_("Stopped due to shared library event:\n"));
|
||||
else
|
||||
ui_out_text (current_uiout,
|
||||
_("Stopped due to shared library event (no "
|
||||
"libraries added or removed)\n"));
|
||||
}
|
||||
|
||||
if (ui_out_is_mi_like_p (current_uiout))
|
||||
ui_out_field_string (current_uiout, "reason",
|
||||
async_reason_lookup (EXEC_ASYNC_SOLIB_EVENT));
|
||||
|
||||
if (any_deleted)
|
||||
{
|
||||
struct cleanup *cleanup;
|
||||
char *name;
|
||||
int ix;
|
||||
|
||||
ui_out_text (current_uiout, _(" Inferior unloaded "));
|
||||
cleanup = make_cleanup_ui_out_list_begin_end (current_uiout,
|
||||
"removed");
|
||||
for (ix = 0;
|
||||
VEC_iterate (char_ptr, current_program_space->deleted_solibs,
|
||||
ix, name);
|
||||
++ix)
|
||||
{
|
||||
if (ix > 0)
|
||||
ui_out_text (current_uiout, " ");
|
||||
ui_out_field_string (current_uiout, "library", name);
|
||||
ui_out_text (current_uiout, "\n");
|
||||
}
|
||||
|
||||
do_cleanups (cleanup);
|
||||
}
|
||||
|
||||
if (any_added)
|
||||
{
|
||||
struct so_list *iter;
|
||||
int ix;
|
||||
struct cleanup *cleanup;
|
||||
|
||||
ui_out_text (current_uiout, _(" Inferior loaded "));
|
||||
cleanup = make_cleanup_ui_out_list_begin_end (current_uiout,
|
||||
"added");
|
||||
for (ix = 0;
|
||||
VEC_iterate (so_list_ptr, current_program_space->added_solibs,
|
||||
ix, iter);
|
||||
++ix)
|
||||
{
|
||||
if (ix > 0)
|
||||
ui_out_text (current_uiout, " ");
|
||||
ui_out_field_string (current_uiout, "library", iter->so_name);
|
||||
ui_out_text (current_uiout, "\n");
|
||||
}
|
||||
|
||||
do_cleanups (cleanup);
|
||||
}
|
||||
}
|
||||
|
||||
/* Print a message indicating what happened. This is called from
|
||||
normal_stop(). The input to this routine is the head of the bpstat
|
||||
list - a list of the eventpoints that caused this stop. KIND is
|
||||
@ -3534,10 +3612,7 @@ bpstat_print (bpstat bs, int kind)
|
||||
OS-level shared library event, do the same thing. */
|
||||
if (kind == TARGET_WAITKIND_LOADED)
|
||||
{
|
||||
ui_out_text (current_uiout, _("Stopped due to shared library event\n"));
|
||||
if (ui_out_is_mi_like_p (current_uiout))
|
||||
ui_out_field_string (current_uiout, "reason",
|
||||
async_reason_lookup (EXEC_ASYNC_SOLIB_EVENT));
|
||||
print_solib_event (0);
|
||||
return PRINT_NOTHING;
|
||||
}
|
||||
|
||||
@ -4222,6 +4297,19 @@ bpstat_stop_status (struct address_space *aspace,
|
||||
}
|
||||
}
|
||||
|
||||
/* A bit of special processing for shlib breakpoints. We need to
|
||||
process solib loading here, so that the lists of loaded and
|
||||
unloaded libraries are correct before we handle "catch load" and
|
||||
"catch unload". */
|
||||
for (bs = bs_head; bs != NULL; bs = bs->next)
|
||||
{
|
||||
if (bs->breakpoint_at->type == bp_shlib_event)
|
||||
{
|
||||
handle_solib_event ();
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
/* Now go through the locations that caused the target to stop, and
|
||||
check whether we're interested in reporting this stop to higher
|
||||
layers, or whether we should resume the target transparently. */
|
||||
@ -4311,6 +4399,25 @@ handle_jit_event (void)
|
||||
target_terminal_inferior ();
|
||||
}
|
||||
|
||||
/* Handle an solib event by calling solib_add. */
|
||||
|
||||
void
|
||||
handle_solib_event (void)
|
||||
{
|
||||
clear_program_space_solib_cache (current_inferior ()->pspace);
|
||||
|
||||
/* Check for any newly added shared libraries if we're supposed to
|
||||
be adding them automatically. Switch terminal for any messages
|
||||
produced by breakpoint_re_set. */
|
||||
target_terminal_ours_for_output ();
|
||||
#ifdef SOLIB_ADD
|
||||
SOLIB_ADD (NULL, 0, ¤t_target, auto_solib_add);
|
||||
#else
|
||||
solib_add (NULL, 0, ¤t_target, auto_solib_add);
|
||||
#endif
|
||||
target_terminal_inferior ();
|
||||
}
|
||||
|
||||
/* Prepare WHAT final decision for infrun. */
|
||||
|
||||
/* Decide what infrun needs to do with this bpstat. */
|
||||
@ -4319,10 +4426,6 @@ struct bpstat_what
|
||||
bpstat_what (bpstat bs_head)
|
||||
{
|
||||
struct bpstat_what retval;
|
||||
/* We need to defer calling `solib_add', as adding new symbols
|
||||
resets breakpoints, which in turn deletes breakpoint locations,
|
||||
and hence may clear unprocessed entries in the BS chain. */
|
||||
int shlib_event = 0;
|
||||
int jit_event = 0;
|
||||
bpstat bs;
|
||||
|
||||
@ -4346,9 +4449,6 @@ bpstat_what (bpstat bs_head)
|
||||
else
|
||||
bptype = bs->breakpoint_at->type;
|
||||
|
||||
if (bptype == bp_shlib_event)
|
||||
shlib_event = 1;
|
||||
|
||||
switch (bptype)
|
||||
{
|
||||
case bp_none:
|
||||
@ -4480,27 +4580,6 @@ bpstat_what (bpstat bs_head)
|
||||
/* These operations may affect the bs->breakpoint_at state so they are
|
||||
delayed after MAIN_ACTION is decided above. */
|
||||
|
||||
if (shlib_event)
|
||||
{
|
||||
if (debug_infrun)
|
||||
fprintf_unfiltered (gdb_stdlog, "bpstat_what: bp_shlib_event\n");
|
||||
|
||||
/* Check for any newly added shared libraries if we're supposed
|
||||
to be adding them automatically. */
|
||||
|
||||
/* Switch terminal for any messages produced by
|
||||
breakpoint_re_set. */
|
||||
target_terminal_ours_for_output ();
|
||||
|
||||
#ifdef SOLIB_ADD
|
||||
SOLIB_ADD (NULL, 0, ¤t_target, auto_solib_add);
|
||||
#else
|
||||
solib_add (NULL, 0, ¤t_target, auto_solib_add);
|
||||
#endif
|
||||
|
||||
target_terminal_inferior ();
|
||||
}
|
||||
|
||||
if (jit_event)
|
||||
{
|
||||
if (debug_infrun)
|
||||
@ -6431,6 +6510,264 @@ print_recreate_catch_vfork (struct breakpoint *b, struct ui_file *fp)
|
||||
|
||||
static struct breakpoint_ops catch_vfork_breakpoint_ops;
|
||||
|
||||
/* An instance of this type is used to represent an solib catchpoint.
|
||||
It includes a "struct breakpoint" as a kind of base class; users
|
||||
downcast to "struct breakpoint *" when needed. A breakpoint is
|
||||
really of this type iff its ops pointer points to
|
||||
CATCH_SOLIB_BREAKPOINT_OPS. */
|
||||
|
||||
struct solib_catchpoint
|
||||
{
|
||||
/* The base class. */
|
||||
struct breakpoint base;
|
||||
|
||||
/* True for "catch load", false for "catch unload". */
|
||||
unsigned char is_load;
|
||||
|
||||
/* Regular expression to match, if any. COMPILED is only valid when
|
||||
REGEX is non-NULL. */
|
||||
char *regex;
|
||||
regex_t compiled;
|
||||
};
|
||||
|
||||
static void
|
||||
dtor_catch_solib (struct breakpoint *b)
|
||||
{
|
||||
struct solib_catchpoint *self = (struct solib_catchpoint *) b;
|
||||
|
||||
if (self->regex)
|
||||
regfree (&self->compiled);
|
||||
xfree (self->regex);
|
||||
|
||||
base_breakpoint_ops.dtor (b);
|
||||
}
|
||||
|
||||
static int
|
||||
insert_catch_solib (struct bp_location *ignore)
|
||||
{
|
||||
return 0;
|
||||
}
|
||||
|
||||
static int
|
||||
remove_catch_solib (struct bp_location *ignore)
|
||||
{
|
||||
return 0;
|
||||
}
|
||||
|
||||
static int
|
||||
breakpoint_hit_catch_solib (const struct bp_location *bl,
|
||||
struct address_space *aspace,
|
||||
CORE_ADDR bp_addr,
|
||||
const struct target_waitstatus *ws)
|
||||
{
|
||||
struct solib_catchpoint *self = (struct solib_catchpoint *) bl->owner;
|
||||
struct breakpoint *other;
|
||||
|
||||
if (ws->kind == TARGET_WAITKIND_LOADED)
|
||||
return 1;
|
||||
|
||||
ALL_BREAKPOINTS (other)
|
||||
{
|
||||
struct bp_location *other_bl;
|
||||
|
||||
if (other == bl->owner)
|
||||
continue;
|
||||
|
||||
if (other->type != bp_shlib_event)
|
||||
continue;
|
||||
|
||||
if (self->base.pspace != NULL && other->pspace != self->base.pspace)
|
||||
continue;
|
||||
|
||||
for (other_bl = other->loc; other_bl != NULL; other_bl = other_bl->next)
|
||||
{
|
||||
if (other->ops->breakpoint_hit (other_bl, aspace, bp_addr, ws))
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
static void
|
||||
check_status_catch_solib (struct bpstats *bs)
|
||||
{
|
||||
struct solib_catchpoint *self
|
||||
= (struct solib_catchpoint *) bs->breakpoint_at;
|
||||
int ix;
|
||||
|
||||
if (self->is_load)
|
||||
{
|
||||
struct so_list *iter;
|
||||
|
||||
for (ix = 0;
|
||||
VEC_iterate (so_list_ptr, current_program_space->added_solibs,
|
||||
ix, iter);
|
||||
++ix)
|
||||
{
|
||||
if (!self->regex
|
||||
|| regexec (&self->compiled, iter->so_name, 0, NULL, 0) == 0)
|
||||
return;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
char *iter;
|
||||
|
||||
for (ix = 0;
|
||||
VEC_iterate (char_ptr, current_program_space->deleted_solibs,
|
||||
ix, iter);
|
||||
++ix)
|
||||
{
|
||||
if (!self->regex
|
||||
|| regexec (&self->compiled, iter, 0, NULL, 0) == 0)
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
bs->stop = 0;
|
||||
bs->print_it = print_it_noop;
|
||||
}
|
||||
|
||||
static enum print_stop_action
|
||||
print_it_catch_solib (bpstat bs)
|
||||
{
|
||||
struct breakpoint *b = bs->breakpoint_at;
|
||||
struct ui_out *uiout = current_uiout;
|
||||
|
||||
annotate_catchpoint (b->number);
|
||||
if (b->disposition == disp_del)
|
||||
ui_out_text (uiout, "\nTemporary catchpoint ");
|
||||
else
|
||||
ui_out_text (uiout, "\nCatchpoint ");
|
||||
ui_out_field_int (uiout, "bkptno", b->number);
|
||||
ui_out_text (uiout, "\n");
|
||||
if (ui_out_is_mi_like_p (uiout))
|
||||
ui_out_field_string (uiout, "disp", bpdisp_text (b->disposition));
|
||||
print_solib_event (1);
|
||||
return PRINT_SRC_AND_LOC;
|
||||
}
|
||||
|
||||
static void
|
||||
print_one_catch_solib (struct breakpoint *b, struct bp_location **locs)
|
||||
{
|
||||
struct solib_catchpoint *self = (struct solib_catchpoint *) b;
|
||||
struct value_print_options opts;
|
||||
struct ui_out *uiout = current_uiout;
|
||||
char *msg;
|
||||
|
||||
get_user_print_options (&opts);
|
||||
/* Field 4, the address, is omitted (which makes the columns not
|
||||
line up too nicely with the headers, but the effect is relatively
|
||||
readable). */
|
||||
if (opts.addressprint)
|
||||
{
|
||||
annotate_field (4);
|
||||
ui_out_field_skip (uiout, "addr");
|
||||
}
|
||||
|
||||
annotate_field (5);
|
||||
if (self->is_load)
|
||||
{
|
||||
if (self->regex)
|
||||
msg = xstrprintf (_("load of library matching %s"), self->regex);
|
||||
else
|
||||
msg = xstrdup (_("load of library"));
|
||||
}
|
||||
else
|
||||
{
|
||||
if (self->regex)
|
||||
msg = xstrprintf (_("unload of library matching %s"), self->regex);
|
||||
else
|
||||
msg = xstrdup (_("unload of library"));
|
||||
}
|
||||
ui_out_field_string (uiout, "what", msg);
|
||||
xfree (msg);
|
||||
}
|
||||
|
||||
static void
|
||||
print_mention_catch_solib (struct breakpoint *b)
|
||||
{
|
||||
struct solib_catchpoint *self = (struct solib_catchpoint *) b;
|
||||
|
||||
printf_filtered (_("Catchpoint %d (%s)"), b->number,
|
||||
self->is_load ? "load" : "unload");
|
||||
}
|
||||
|
||||
static void
|
||||
print_recreate_catch_solib (struct breakpoint *b, struct ui_file *fp)
|
||||
{
|
||||
struct solib_catchpoint *self = (struct solib_catchpoint *) b;
|
||||
|
||||
fprintf_unfiltered (fp, "%s %s",
|
||||
b->disposition == disp_del ? "tcatch" : "catch",
|
||||
self->is_load ? "load" : "unload");
|
||||
if (self->regex)
|
||||
fprintf_unfiltered (fp, " %s", self->regex);
|
||||
fprintf_unfiltered (fp, "\n");
|
||||
}
|
||||
|
||||
static struct breakpoint_ops catch_solib_breakpoint_ops;
|
||||
|
||||
/* A helper function that does all the work for "catch load" and
|
||||
"catch unload". */
|
||||
|
||||
static void
|
||||
catch_load_or_unload (char *arg, int from_tty, int is_load,
|
||||
struct cmd_list_element *command)
|
||||
{
|
||||
struct solib_catchpoint *c;
|
||||
struct gdbarch *gdbarch = get_current_arch ();
|
||||
int tempflag;
|
||||
regex_t compiled;
|
||||
struct cleanup *cleanup;
|
||||
|
||||
tempflag = get_cmd_context (command) == CATCH_TEMPORARY;
|
||||
|
||||
if (!arg)
|
||||
arg = "";
|
||||
arg = skip_spaces (arg);
|
||||
|
||||
c = XCNEW (struct solib_catchpoint);
|
||||
cleanup = make_cleanup (xfree, c);
|
||||
|
||||
if (*arg != '\0')
|
||||
{
|
||||
int errcode;
|
||||
|
||||
errcode = regcomp (&c->compiled, arg, REG_NOSUB);
|
||||
if (errcode != 0)
|
||||
{
|
||||
char *err = get_regcomp_error (errcode, &c->compiled);
|
||||
|
||||
make_cleanup (xfree, err);
|
||||
error (_("Invalid regexp (%s): %s"), err, arg);
|
||||
}
|
||||
c->regex = xstrdup (arg);
|
||||
}
|
||||
|
||||
c->is_load = is_load;
|
||||
init_catchpoint (&c->base, gdbarch, tempflag, NULL,
|
||||
&catch_solib_breakpoint_ops);
|
||||
|
||||
discard_cleanups (cleanup);
|
||||
install_breakpoint (0, &c->base, 1);
|
||||
}
|
||||
|
||||
static void
|
||||
catch_load_command_1 (char *arg, int from_tty,
|
||||
struct cmd_list_element *command)
|
||||
{
|
||||
catch_load_or_unload (arg, from_tty, 1, command);
|
||||
}
|
||||
|
||||
static void
|
||||
catch_unload_command_1 (char *arg, int from_tty,
|
||||
struct cmd_list_element *command)
|
||||
{
|
||||
catch_load_or_unload (arg, from_tty, 0, command);
|
||||
}
|
||||
|
||||
/* An instance of this type is used to represent a syscall catchpoint.
|
||||
It includes a "struct breakpoint" as a kind of base class; users
|
||||
downcast to "struct breakpoint *" when needed. A breakpoint is
|
||||
@ -11199,10 +11536,7 @@ internal_bkpt_print_it (bpstat bs)
|
||||
/* Did we stop because the user set the stop_on_solib_events
|
||||
variable? (If so, we report this as a generic, "Stopped due
|
||||
to shlib event" message.) */
|
||||
ui_out_text (uiout, _("Stopped due to shared library event\n"));
|
||||
if (ui_out_is_mi_like_p (uiout))
|
||||
ui_out_field_string (uiout, "reason",
|
||||
async_reason_lookup (EXEC_ASYNC_SOLIB_EVENT));
|
||||
print_solib_event (0);
|
||||
break;
|
||||
|
||||
case bp_thread_event:
|
||||
@ -13841,6 +14175,19 @@ initialize_breakpoint_ops (void)
|
||||
ops->print_one = print_one_catch_syscall;
|
||||
ops->print_mention = print_mention_catch_syscall;
|
||||
ops->print_recreate = print_recreate_catch_syscall;
|
||||
|
||||
/* Solib-related catchpoints. */
|
||||
ops = &catch_solib_breakpoint_ops;
|
||||
*ops = base_breakpoint_ops;
|
||||
ops->dtor = dtor_catch_solib;
|
||||
ops->insert_location = insert_catch_solib;
|
||||
ops->remove_location = remove_catch_solib;
|
||||
ops->breakpoint_hit = breakpoint_hit_catch_solib;
|
||||
ops->check_status = check_status_catch_solib;
|
||||
ops->print_it = print_it_catch_solib;
|
||||
ops->print_one = print_one_catch_solib;
|
||||
ops->print_mention = print_mention_catch_solib;
|
||||
ops->print_recreate = print_recreate_catch_solib;
|
||||
}
|
||||
|
||||
void
|
||||
@ -14144,6 +14491,20 @@ Catch an exception, when thrown."),
|
||||
NULL,
|
||||
CATCH_PERMANENT,
|
||||
CATCH_TEMPORARY);
|
||||
add_catch_command ("load", _("Catch loads of shared libraries.\n\
|
||||
Usage: catch load [REGEX]\n\
|
||||
If REGEX is given, only stop for libraries matching the regular expression."),
|
||||
catch_load_command_1,
|
||||
NULL,
|
||||
CATCH_PERMANENT,
|
||||
CATCH_TEMPORARY);
|
||||
add_catch_command ("unload", _("Catch unloads of shared libraries.\n\
|
||||
Usage: catch unload [REGEX]\n\
|
||||
If REGEX is given, only stop for libraries matching the regular expression."),
|
||||
catch_unload_command_1,
|
||||
NULL,
|
||||
CATCH_PERMANENT,
|
||||
CATCH_TEMPORARY);
|
||||
add_catch_command ("syscall", _("\
|
||||
Catch system calls by their names and/or numbers.\n\
|
||||
Arguments say which system calls to catch. If no arguments\n\
|
||||
|
Reference in New Issue
Block a user