Skip to content

Commit

Permalink
gdb: add interp::on_memory_changed method
Browse files Browse the repository at this point in the history
Same idea as previous patches, but for memory_changed.

Change-Id: Ic19f20c24d8a6431d4a89c5625e8ef4898f76e82
  • Loading branch information
simark committed May 30, 2023
1 parent 3d654fa commit ec517d1
Show file tree
Hide file tree
Showing 5 changed files with 52 additions and 38 deletions.
13 changes: 12 additions & 1 deletion gdb/corefile.c
Original file line number Diff line number Diff line change
Expand Up @@ -33,6 +33,7 @@
#include "observable.h"
#include "cli/cli-utils.h"
#include "gdbarch.h"
#include "interps.h"

/* You can have any number of hooks for `exec_file_command' command to
call. If there's only one hook, it is set in exec_file_display
Expand Down Expand Up @@ -353,14 +354,24 @@ write_memory (CORE_ADDR memaddr,
memory_error (TARGET_XFER_E_IO, memaddr);
}

/* Notify interpreters and observers that INF's memory was changed. */

static void
notify_memory_changed (inferior *inf, CORE_ADDR addr, ssize_t len,
const bfd_byte *data)
{
interps_notify_memory_changed (inf, addr, len, data);
gdb::observers::memory_changed.notify (inf, addr, len, data);
}

/* Same as write_memory, but notify 'memory_changed' observers. */

void
write_memory_with_notification (CORE_ADDR memaddr, const bfd_byte *myaddr,
ssize_t len)
{
write_memory (memaddr, myaddr, len);
gdb::observers::memory_changed.notify (current_inferior (), memaddr, len, myaddr);
notify_memory_changed (current_inferior (), memaddr, len, myaddr);
}

/* Store VALUE at ADDR in the inferior as a LEN-byte unsigned
Expand Down
9 changes: 9 additions & 0 deletions gdb/interps.c
Original file line number Diff line number Diff line change
Expand Up @@ -591,6 +591,15 @@ interps_notify_param_changed (const char *param, const char *value)
interps_notify (&interp::on_param_changed, param, value);
}

/* See interps.h. */

void
interps_notify_memory_changed (inferior *inf, CORE_ADDR addr, ssize_t len,
const bfd_byte *data)
{
interps_notify (&interp::on_memory_changed, inf, addr, len, data);
}

/* This just adds the "interpreter-exec" command. */
void _initialize_interpreter ();
void
Expand Down
8 changes: 8 additions & 0 deletions gdb/interps.h
Original file line number Diff line number Diff line change
Expand Up @@ -178,6 +178,10 @@ class interp : public intrusive_list_node<interp>
/* Notify the interpreter that parameter PARAM changed to VALUE. */
virtual void on_param_changed (const char *param, const char *value) {}

/* Notify the interpreter that inferior INF's memory was changed. */
virtual void on_memory_changed (inferior *inf, CORE_ADDR addr, ssize_t len,
const bfd_byte *data) {}

private:
/* The memory for this is static, it comes from literal strings (e.g. "cli"). */
const char *m_name;
Expand Down Expand Up @@ -359,6 +363,10 @@ extern void interps_notify_breakpoint_modified (breakpoint *b);
/* Notify all interpreters that parameter PARAM changed to VALUE. */
extern void interps_notify_param_changed (const char *param, const char *value);

/* Notify all interpreters that inferior INF's memory was changed. */
extern void interps_notify_memory_changed (inferior *inf, CORE_ADDR addr,
ssize_t len, const bfd_byte *data);

/* well-known interpreters */
#define INTERP_CONSOLE "console"
#define INTERP_MI2 "mi2"
Expand Down
58 changes: 21 additions & 37 deletions gdb/mi/mi-interp.c
Original file line number Diff line number Diff line change
Expand Up @@ -60,9 +60,6 @@ static int mi_interp_query_hook (const char *ctlstr, va_list ap)
static void mi_insert_notify_hooks (void);
static void mi_remove_notify_hooks (void);

static void mi_memory_changed (struct inferior *inf, CORE_ADDR memaddr,
ssize_t len, const bfd_byte *myaddr);

/* Display the MI prompt. */

static void
Expand Down Expand Up @@ -813,50 +810,39 @@ mi_interp::on_param_changed (const char *param, const char *value)
gdb_flush (this->event_channel);
}

/* Emit notification about the target memory change. */

static void
mi_memory_changed (struct inferior *inferior, CORE_ADDR memaddr,
ssize_t len, const bfd_byte *myaddr)
void
mi_interp::on_memory_changed (inferior *inferior, CORE_ADDR memaddr,
ssize_t len, const bfd_byte *myaddr)
{
if (mi_suppress_notification.memory)
return;

SWITCH_THRU_ALL_UIS ()
{
struct mi_interp *mi = as_mi_interp (top_level_interpreter ());
struct ui_out *mi_uiout;
struct obj_section *sec;

if (mi == NULL)
continue;

mi_uiout = top_level_interpreter ()->interp_ui_out ();

target_terminal::scoped_restore_terminal_state term_state;
target_terminal::ours_for_output ();
ui_out *mi_uiout = this->interp_ui_out ();

gdb_printf (mi->event_channel, "memory-changed");
target_terminal::scoped_restore_terminal_state term_state;
target_terminal::ours_for_output ();

ui_out_redirect_pop redir (mi_uiout, mi->event_channel);
gdb_printf (this->event_channel, "memory-changed");

mi_uiout->field_fmt ("thread-group", "i%d", inferior->num);
mi_uiout->field_core_addr ("addr", target_gdbarch (), memaddr);
mi_uiout->field_string ("len", hex_string (len));
ui_out_redirect_pop redir (mi_uiout, this->event_channel);

/* Append 'type=code' into notification if MEMADDR falls in the range of
sections contain code. */
sec = find_pc_section (memaddr);
if (sec != NULL && sec->objfile != NULL)
{
flagword flags = bfd_section_flags (sec->the_bfd_section);
mi_uiout->field_fmt ("thread-group", "i%d", inferior->num);
mi_uiout->field_core_addr ("addr", target_gdbarch (), memaddr);
mi_uiout->field_string ("len", hex_string (len));

if (flags & SEC_CODE)
mi_uiout->field_string ("type", "code");
}
/* Append 'type=code' into notification if MEMADDR falls in the range of
sections contain code. */
obj_section *sec = find_pc_section (memaddr);
if (sec != nullptr && sec->objfile != nullptr)
{
flagword flags = bfd_section_flags (sec->the_bfd_section);

gdb_flush (mi->event_channel);
if (flags & SEC_CODE)
mi_uiout->field_string ("type", "code");
}

gdb_flush (this->event_channel);
}

void
Expand Down Expand Up @@ -960,6 +946,4 @@ _initialize_mi_interp ()
interp_factory_register (INTERP_MI3, mi_interp_factory);
interp_factory_register (INTERP_MI4, mi_interp_factory);
interp_factory_register (INTERP_MI, mi_interp_factory);

gdb::observers::memory_changed.attach (mi_memory_changed, "mi-interp");
}
2 changes: 2 additions & 0 deletions gdb/mi/mi-interp.h
Original file line number Diff line number Diff line change
Expand Up @@ -70,6 +70,8 @@ class mi_interp final : public interp
void on_breakpoint_deleted (breakpoint *b) override;
void on_breakpoint_modified (breakpoint *b) override;
void on_param_changed (const char *param, const char *value) override;
void on_memory_changed (inferior *inf, CORE_ADDR addr, ssize_t len,
const bfd_byte *data) override;

/* MI's output channels */
mi_console_file *out;
Expand Down

0 comments on commit ec517d1

Please sign in to comment.