From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from simark.ca (simark.ca [158.69.221.121]) by sourceware.org (Postfix) with ESMTPS id 32FFC3858410 for ; Tue, 2 May 2023 20:54:22 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 32FFC3858410 Authentication-Results: sourceware.org; dmarc=fail (p=none dis=none) header.from=efficios.com Authentication-Results: sourceware.org; spf=fail smtp.mailfrom=efficios.com Received: from smarchi-efficios.internal.efficios.com (192-222-143-198.qc.cable.ebox.net [192.222.143.198]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (2048 bits) server-digest SHA256) (No client certificate requested) by simark.ca (Postfix) with ESMTPSA id DC3311E114; Tue, 2 May 2023 16:54:21 -0400 (EDT) From: Simon Marchi To: gdb-patches@sourceware.org Cc: Simon Marchi Subject: [PATCH 17/30] gdb: add interp::on_record_changed method Date: Tue, 2 May 2023 16:49:57 -0400 Message-Id: <20230502205011.132151-18-simon.marchi@efficios.com> X-Mailer: git-send-email 2.40.1 In-Reply-To: <20230502205011.132151-1-simon.marchi@efficios.com> References: <20230502205011.132151-1-simon.marchi@efficios.com> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Status: No, score=-3497.3 required=5.0 tests=BAYES_00,GIT_PATCH_0,KAM_DMARC_NONE,KAM_DMARC_STATUS,SPF_HELO_PASS,SPF_SOFTFAIL,TXREP,T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on server2.sourceware.org List-Id: Same idea as previous patches, but for record_changed Change-Id: I5eeeacd703af8401c315060514c94e8e6439cc40 --- gdb/interps.c | 9 +++++++ gdb/interps.h | 18 +++++++++++++ gdb/mi/mi-interp.c | 63 ++++++++++++++++----------------------------- gdb/mi/mi-interp.h | 2 ++ gdb/observable.c | 1 - gdb/observable.h | 12 --------- gdb/record-btrace.c | 3 ++- gdb/record-full.c | 3 ++- gdb/record.c | 3 ++- 9 files changed, 57 insertions(+), 57 deletions(-) diff --git a/gdb/interps.c b/gdb/interps.c index 1bcc33c2a8c1..986c5b755f84 100644 --- a/gdb/interps.c +++ b/gdb/interps.c @@ -494,6 +494,15 @@ interps_notify_inferior_removed (inferior *inf) interps_notify (&interp::on_inferior_removed, inf); } +/* See interps.h. */ + +void +interps_notify_record_changed (inferior *inf, int started, const char *method, + const char *format) +{ + interps_notify (&interp::on_record_changed, inf, started, method, format); +} + /* This just adds the "interpreter-exec" command. */ void _initialize_interpreter (); void diff --git a/gdb/interps.h b/gdb/interps.h index ad351bbf807f..be3d6d92b99c 100644 --- a/gdb/interps.h +++ b/gdb/interps.h @@ -134,6 +134,11 @@ class interp : public intrusive_list_node /* Notify the interpreter that inferior INF was removed. */ virtual void on_inferior_removed (inferior *inf) {} + /* Notify the interpreter that the status of process record for INF + changed. */ + virtual void on_record_changed (inferior *inf, int started, + const char *method, const char *format) {} + private: /* The memory for this is static, it comes from literal strings (e.g. "cli"). */ const char *m_name; @@ -263,6 +268,19 @@ extern void interps_notify_inferior_disappeared (inferior *inf); /* Notify all interpreters that inferior INF was removed. */ extern void interps_notify_inferior_removed (inferior *inf); +/* Notify all interpreters that the status of process record for INF changed. + + The process record is started if STARTED is true, and the process record is + stopped if STARTED is false. + + When STARTED is true, METHOD indicates the short name of the method used for + recording. If the method supports multiple formats, FORMAT indicates which + one is being used, otherwise it is nullptr. When STARTED is false, they are + both nullptr. */ +extern void interps_notify_record_changed (inferior *inf, int started, + const char *method, + const char *format); + /* well-known interpreters */ #define INTERP_CONSOLE "console" #define INTERP_MI2 "mi2" diff --git a/gdb/mi/mi-interp.c b/gdb/mi/mi-interp.c index e2e7eb56fb57..77050d0860fd 100644 --- a/gdb/mi/mi-interp.c +++ b/gdb/mi/mi-interp.c @@ -60,8 +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_record_changed (struct inferior*, int, const char *, - const char *); static void mi_on_resume (ptid_t ptid); static void mi_solib_loaded (struct so_list *solib); static void mi_solib_unloaded (struct so_list *solib); @@ -311,48 +309,32 @@ mi_interp::on_thread_exited (thread_info *t, int silent) gdb_flush (this->event_channel); } -/* Emit notification on changing the state of record. */ - -static void -mi_record_changed (struct inferior *inferior, int started, const char *method, - const char *format) +void +mi_interp::on_record_changed (inferior *inferior, int started, + const char *method, const char *format) { - SWITCH_THRU_ALL_UIS () - { - struct mi_interp *mi = as_mi_interp (top_level_interpreter ()); - - if (mi == NULL) - continue; - - target_terminal::scoped_restore_terminal_state term_state; - target_terminal::ours_for_output (); + target_terminal::scoped_restore_terminal_state term_state; + target_terminal::ours_for_output (); - if (started) - { - if (format != NULL) - { - gdb_printf (mi->event_channel, - "record-started,thread-group=\"i%d\"," - "method=\"%s\",format=\"%s\"", - inferior->num, method, format); - } - else - { - gdb_printf (mi->event_channel, - "record-started,thread-group=\"i%d\"," - "method=\"%s\"", - inferior->num, method); - } - } + if (started) + { + if (format != NULL) + gdb_printf (this->event_channel, + "record-started,thread-group=\"i%d\"," + "method=\"%s\",format=\"%s\"", + inferior->num, method, format); else - { - gdb_printf (mi->event_channel, - "record-stopped,thread-group=\"i%d\"", - inferior->num); - } - - gdb_flush (mi->event_channel); + gdb_printf (this->event_channel, + "record-started,thread-group=\"i%d\"," + "method=\"%s\"", + inferior->num, method); } + else + gdb_printf (this->event_channel, + "record-stopped,thread-group=\"i%d\"", + inferior->num); + + gdb_flush (this->event_channel); } void @@ -1109,7 +1091,6 @@ _initialize_mi_interp () interp_factory_register (INTERP_MI4, mi_interp_factory); interp_factory_register (INTERP_MI, mi_interp_factory); - gdb::observers::record_changed.attach (mi_record_changed, "mi-interp"); gdb::observers::target_resumed.attach (mi_on_resume, "mi-interp"); gdb::observers::solib_loaded.attach (mi_solib_loaded, "mi-interp"); gdb::observers::solib_unloaded.attach (mi_solib_unloaded, "mi-interp"); diff --git a/gdb/mi/mi-interp.h b/gdb/mi/mi-interp.h index a970c3d0db98..29a437c14f26 100644 --- a/gdb/mi/mi-interp.h +++ b/gdb/mi/mi-interp.h @@ -56,6 +56,8 @@ class mi_interp final : public interp void on_inferior_appeared (inferior *inf) override; void on_inferior_disappeared (inferior *inf) override; void on_inferior_removed (inferior *inf) override; + void on_record_changed (inferior *inf, int started, const char *method, + const char *format) override; /* MI's output channels */ mi_console_file *out; diff --git a/gdb/observable.c b/gdb/observable.c index bfb92b4fe15e..5b78d48908b7 100644 --- a/gdb/observable.c +++ b/gdb/observable.c @@ -39,7 +39,6 @@ DEFINE_OBSERVABLE (executable_changed); DEFINE_OBSERVABLE (inferior_created); DEFINE_OBSERVABLE (inferior_execd); DEFINE_OBSERVABLE (inferior_forked); -DEFINE_OBSERVABLE (record_changed); DEFINE_OBSERVABLE (solib_loaded); DEFINE_OBSERVABLE (solib_unloaded); DEFINE_OBSERVABLE (new_objfile); diff --git a/gdb/observable.h b/gdb/observable.h index 1ec927671e53..be7c6ca8dd23 100644 --- a/gdb/observable.h +++ b/gdb/observable.h @@ -88,18 +88,6 @@ extern observable extern observable inferior_forked; -/* The status of process record for inferior inferior in gdb has - changed. The process record is started if STARTED is true, and - the process record is stopped if STARTED is false. - - When STARTED is true, METHOD indicates the short name of the - method used for recording. If the method supports multiple - formats, FORMAT indicates which one is being used, otherwise it - is NULL. When STARTED is false, they are both NULL. */ -extern observable - record_changed; - /* The shared library specified by SOLIB has been loaded. Note that when gdb calls this observer, the library's symbols probably haven't been loaded yet. */ diff --git a/gdb/record-btrace.c b/gdb/record-btrace.c index 9dd8474673b8..e933a428f3af 100644 --- a/gdb/record-btrace.c +++ b/gdb/record-btrace.c @@ -45,6 +45,7 @@ #include "async-event.h" #include #include "objfiles.h" +#include "interps.h" static const target_info record_btrace_target_info = { "record-btrace", @@ -347,7 +348,7 @@ record_btrace_push_target (void) record_btrace_generating_corefile = 0; format = btrace_format_short_string (record_btrace_conf.format); - gdb::observers::record_changed.notify (current_inferior (), 1, "btrace", format); + interps_notify_record_changed (current_inferior (), 1, "btrace", format); } /* Disable btrace on a set of threads on scope exit. */ diff --git a/gdb/record-full.c b/gdb/record-full.c index 026c309b674c..faf8b595d22c 100644 --- a/gdb/record-full.c +++ b/gdb/record-full.c @@ -40,6 +40,7 @@ #include "gdbsupport/byte-vector.h" #include "async-event.h" #include "valprint.h" +#include "interps.h" #include @@ -981,7 +982,7 @@ record_full_open (const char *name, int from_tty) record_full_init_record_breakpoints (); - gdb::observers::record_changed.notify (current_inferior (), 1, "full", NULL); + interps_notify_record_changed (current_inferior (), 1, "full", NULL); } /* "close" target method. Close the process record target. */ diff --git a/gdb/record.c b/gdb/record.c index f7c951535374..f7c82665b058 100644 --- a/gdb/record.c +++ b/gdb/record.c @@ -26,6 +26,7 @@ #include "gdbsupport/common-utils.h" #include "cli/cli-utils.h" #include "disasm.h" +#include "interps.h" #include @@ -311,7 +312,7 @@ cmd_record_stop (const char *args, int from_tty) gdb_printf (_("Process record is stopped and all execution " "logs are deleted.\n")); - gdb::observers::record_changed.notify (current_inferior (), 0, NULL, NULL); + interps_notify_record_changed (current_inferior (), 0, NULL, NULL); } -- 2.40.1