From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 94646 invoked by alias); 6 May 2016 12:53:29 -0000 Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org Received: (qmail 94563 invoked by uid 89); 6 May 2016 12:53:28 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-4.0 required=5.0 tests=BAYES_00,RP_MATCHES_RCVD,SPF_HELO_PASS autolearn=ham version=3.3.2 spammy= X-HELO: mx1.redhat.com Received: from mx1.redhat.com (HELO mx1.redhat.com) (209.132.183.28) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with (AES256-GCM-SHA384 encrypted) ESMTPS; Fri, 06 May 2016 12:53:26 +0000 Received: from int-mx14.intmail.prod.int.phx2.redhat.com (int-mx14.intmail.prod.int.phx2.redhat.com [10.5.11.27]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by mx1.redhat.com (Postfix) with ESMTPS id 9CEDB7F0B6 for ; Fri, 6 May 2016 12:35:23 +0000 (UTC) Received: from cascais.lan (ovpn01.gateway.prod.ext.phx2.redhat.com [10.5.9.1]) by int-mx14.intmail.prod.int.phx2.redhat.com (8.14.4/8.14.4) with ESMTP id u46CZ5IG017259 for ; Fri, 6 May 2016 08:35:23 -0400 From: Pedro Alves To: gdb-patches@sourceware.org Subject: [PATCH v3 19/34] Simplify starting the command event loop Date: Fri, 06 May 2016 12:53:00 -0000 Message-Id: <1462538104-19109-20-git-send-email-palves@redhat.com> In-Reply-To: <1462538104-19109-1-git-send-email-palves@redhat.com> References: <1462538104-19109-1-git-send-email-palves@redhat.com> X-SW-Source: 2016-05/txt/msg00131.txt.bz2 All interpreter types (CLI/TUI/MI) print the prompt, and then call start_event_loop. Because we'll need an interpreter hook to display the interpreter-specific prompt before going back to the event loop, without actually starting an event loop, this patch moves the start_event_loop call to common code, and replaces the command_loop hook with a pre_command_look hook, that now just prints the prompt. Turns out to be a cleanup on its own right anyway. gdb/ChangeLog: yyyy-mm-dd Pedro Alves * cli/cli-interp.c (cli_interpreter_pre_command_loop): New function. (cli_interp_procs): Install it instead of cli_command_loop. * cli/cli-interp.h (cli_interpreter_pre_command_loop): Declare. * event-top.c (cli_command_loop): Delete. * interps.c (interp_new): Remove reference to command_loop_proc. (current_interp_command_loop): Delete. (interp_pre_command_loop): New function. (interp_command_loop_ftype): Delete. * interps.h (interp_pre_command_loop_ftype): New typedef. (struct interp_procs) : Delele field. : New field. (current_interp_command_loop): Delete declaration. (interp_pre_command_loop): New declaration. * main.c (captured_command_loop): Call interp_pre_command_loop instead of current_interp_command_loop and start an event loop. * mi/mi-interp.c (mi_command_loop): Delete. (mi_interpreter_pre_command_loop): New. (mi_interp_procs): Update. * tui/tui-interp.c (tui_interp_procs): Install cli_interpreter_pre_command_loop instead of cli_command_loop. --- gdb/cli/cli-interp.c | 10 +++++++++- gdb/cli/cli-interp.h | 2 ++ gdb/event-top.c | 13 ------------- gdb/interps.c | 16 ++++++---------- gdb/interps.h | 12 ++++++++---- gdb/main.c | 7 ++++++- gdb/mi/mi-interp.c | 9 +++------ gdb/tui/tui-interp.c | 2 +- 8 files changed, 35 insertions(+), 36 deletions(-) diff --git a/gdb/cli/cli-interp.c b/gdb/cli/cli-interp.c index d67baf3..599507b 100644 --- a/gdb/cli/cli-interp.c +++ b/gdb/cli/cli-interp.c @@ -190,6 +190,14 @@ cli_on_command_error (void) display_gdb_prompt (NULL); } +/* pre_command_loop implementation. */ + +void +cli_interpreter_pre_command_loop (struct interp *self) +{ + display_gdb_prompt (0); +} + /* These implement the cli out interpreter: */ static void * @@ -312,7 +320,7 @@ static const struct interp_procs cli_interp_procs = { cli_interpreter_exec, /* exec_proc */ cli_ui_out, /* ui_out_proc */ NULL, /* set_logging_proc */ - cli_command_loop, /* command_loop_proc */ + cli_interpreter_pre_command_loop, /* pre_command_loop_proc */ cli_interpreter_supports_command_editing, /* supports_command_editing_proc */ }; diff --git a/gdb/cli/cli-interp.h b/gdb/cli/cli-interp.h index 07b7505..85be118 100644 --- a/gdb/cli/cli-interp.h +++ b/gdb/cli/cli-interp.h @@ -22,4 +22,6 @@ struct interp; extern int cli_interpreter_supports_command_editing (struct interp *interp); +extern void cli_interpreter_pre_command_loop (struct interp *self); + #endif diff --git a/gdb/event-top.c b/gdb/event-top.c index e90d00d..5e42c56 100644 --- a/gdb/event-top.c +++ b/gdb/event-top.c @@ -216,19 +216,6 @@ gdb_rl_callback_handler (char *rl) throw_exception_sjlj (gdb_rl_expt); } -/* Initialize all the necessary variables, start the event loop, - register readline, and stdin, start the loop. The DATA is the - interpreter data cookie, ignored for now. */ - -void -cli_command_loop (void *data) -{ - display_gdb_prompt (0); - - /* Now it's time to start the event loop. */ - start_event_loop (); -} - /* Change the function to be invoked every time there is a character ready on stdin. This is used when the user sets the editing off, therefore bypassing readline, and letting gdb handle the input diff --git a/gdb/interps.c b/gdb/interps.c index 36e0422..acc6c1d 100644 --- a/gdb/interps.c +++ b/gdb/interps.c @@ -109,9 +109,6 @@ interp_new (const char *name, const struct interp_procs *procs, void *data) new_interp->procs = procs; new_interp->inited = 0; - /* Check for required procs. */ - gdb_assert (procs->command_loop_proc != NULL); - return new_interp; } @@ -404,16 +401,15 @@ command_interp (void) return ui_interp->current_interpreter; } -/* Run the current command interpreter's main loop. */ +/* See interps.h. */ + void -current_interp_command_loop (void) +interp_pre_command_loop (struct interp *interp) { - struct ui_interp_info *ui_interp = get_current_interp_info (); - struct interp *interp = ui_interp->current_interpreter; - - gdb_assert (ui_interp->current_interpreter != NULL); + gdb_assert (interp != NULL); - interp->procs->command_loop_proc (interp->data); + if (interp->procs->pre_command_loop_proc != NULL) + interp->procs->pre_command_loop_proc (interp); } /* See interp.h */ diff --git a/gdb/interps.h b/gdb/interps.h index 45f9bf2..af97c6a 100644 --- a/gdb/interps.h +++ b/gdb/interps.h @@ -47,7 +47,7 @@ typedef int (interp_resume_ftype) (void *data); typedef int (interp_suspend_ftype) (void *data); typedef struct gdb_exception (interp_exec_ftype) (void *data, const char *command); -typedef void (interp_command_loop_ftype) (void *data); +typedef void (interp_pre_command_loop_ftype) (struct interp *self); typedef struct ui_out *(interp_ui_out_ftype) (struct interp *self); typedef int (interp_set_logging_ftype) (struct interp *self, int start_log, @@ -74,7 +74,9 @@ struct interp_procs disabled. */ interp_set_logging_ftype *set_logging_proc; - interp_command_loop_ftype *command_loop_proc; + /* Called before starting an event loop, to give the interpreter a + chance to e.g., print a prompt. */ + interp_pre_command_loop_ftype *pre_command_loop_proc; /* Returns true if this interpreter supports using the readline library; false if it uses GDB's own simplified readline @@ -101,8 +103,6 @@ extern struct interp *interp_set_temp (const char *name); extern int current_interp_named_p (const char *name); -extern void current_interp_command_loop (void); - /* Call this function to give the current interpreter an opportunity to do any special handling of streams when logging is enabled or disabled. START_LOG is 1 when logging is starting, 0 when it ends, @@ -128,6 +128,10 @@ extern void clear_interpreter_hooks (void); if it uses GDB's own simplified form of readline. */ extern int interp_supports_command_editing (struct interp *interp); +/* Called before starting an event loop, to give the interpreter a + chance to e.g., print a prompt. */ +extern void interp_pre_command_loop (struct interp *interp); + /* well-known interpreters */ #define INTERP_CONSOLE "console" #define INTERP_MI1 "mi1" diff --git a/gdb/main.c b/gdb/main.c index 58e510e..0bf52a9 100644 --- a/gdb/main.c +++ b/gdb/main.c @@ -315,7 +315,12 @@ captured_command_loop (void *data) here on. */ current_ui->async = 1; - current_interp_command_loop (); + /* Give the interpreter a chance to print a prompt. */ + interp_pre_command_loop (top_level_interpreter ()); + + /* Now it's time to start the event loop. */ + start_event_loop (); + /* FIXME: cagney/1999-11-05: A correct command_loop() implementaton would clean things up (restoring the cleanup chain) to the state they were just prior to the call. Technically, this means that diff --git a/gdb/mi/mi-interp.c b/gdb/mi/mi-interp.c index d4c89f7..240ab8d 100644 --- a/gdb/mi/mi-interp.c +++ b/gdb/mi/mi-interp.c @@ -44,7 +44,6 @@ static void mi_execute_command_wrapper (const char *cmd); static void mi_execute_command_input_handler (char *cmd); -static void mi_command_loop (void *data); /* These are hooks that we put in place while doing interpreter_exec so we can report interesting things that happened "behind the MI's @@ -328,9 +327,9 @@ mi_execute_command_input_handler (char *cmd) } static void -mi_command_loop (void *data) +mi_interpreter_pre_command_loop (struct interp *self) { - struct mi_interp *mi = (struct mi_interp *) data; + struct mi_interp *mi = (struct mi_interp *) interp_data (self); /* Turn off 8 bit strings in quoted output. Any character with the high bit set is printed using C's octal format. */ @@ -338,8 +337,6 @@ mi_command_loop (void *data) /* Tell the world that we're alive. */ display_mi_prompt (mi); - - start_event_loop (); } static void @@ -1418,7 +1415,7 @@ static const struct interp_procs mi_interp_procs = mi_interpreter_exec, /* exec_proc */ mi_ui_out, /* ui_out_proc */ mi_set_logging, /* set_logging_proc */ - mi_command_loop /* command_loop_proc */ + mi_interpreter_pre_command_loop /* pre_command_loop_proc */ }; /* Factory for MI interpreters. */ diff --git a/gdb/tui/tui-interp.c b/gdb/tui/tui-interp.c index fc3c0ff..950345c 100644 --- a/gdb/tui/tui-interp.c +++ b/gdb/tui/tui-interp.c @@ -278,7 +278,7 @@ static const struct interp_procs tui_interp_procs = { tui_exec, tui_ui_out, NULL, - cli_command_loop, + cli_interpreter_pre_command_loop, cli_interpreter_supports_command_editing, }; -- 2.5.5