X-Git-Url: http://drtracing.org/?a=blobdiff_plain;f=gdb%2Finf-loop.c;h=aac936f374baef7bca2ec08b8c3cf8b3d7fa2788;hb=b08b78e7d4bb56f395d3212eed6184ede236c760;hp=17fbd929999c05cd4dbff29fe4a9a337019309dc;hpb=347bddb745acda8fb591511a547e66bbe00d768b;p=deliverable%2Fbinutils-gdb.git diff --git a/gdb/inf-loop.c b/gdb/inf-loop.c index 17fbd92999..aac936f374 100644 --- a/gdb/inf-loop.c +++ b/gdb/inf-loop.c @@ -1,5 +1,5 @@ /* Handling of inferior events for the event loop for GDB, the GNU debugger. - Copyright (C) 1999, 2007, 2008 Free Software Foundation, Inc. + Copyright (C) 1999-2015 Free Software Foundation, Inc. Written by Elena Zannoni of Cygnus Solutions. This file is part of GDB. @@ -15,136 +15,73 @@ 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, see . */ + along with this program. If not, see . */ #include "defs.h" -#include "inferior.h" /* For fetch_inferior_event. */ -#include "target.h" /* For enum inferior_event_type. */ +#include "inferior.h" +#include "infrun.h" +#include "target.h" /* For enum inferior_event_type. */ #include "event-loop.h" #include "event-top.h" #include "inf-loop.h" #include "remote.h" -#include "exceptions.h" #include "language.h" #include "gdbthread.h" +#include "continuations.h" +#include "interps.h" +#include "top.h" +#include "observer.h" -static int fetch_inferior_event_wrapper (gdb_client_data client_data); +/* General function to handle events in the inferior. */ -void -inferior_event_handler_wrapper (gdb_client_data client_data) -{ - inferior_event_handler (INF_QUIT_REQ, client_data); -} - -/* General function to handle events in the inferior. So far it just - takes care of detecting errors reported by select() or poll(), - otherwise it assumes that all is OK, and goes on reading data from - the fd. This however may not always be what we want to do. */ void inferior_event_handler (enum inferior_event_type event_type, gdb_client_data client_data) { - struct gdb_exception e; - int was_sync = 0; switch (event_type) { - case INF_ERROR: - printf_unfiltered (_("error detected from target.\n")); - target_async (NULL, 0); - pop_target (); - discard_all_intermediate_continuations (); - discard_all_continuations (); - async_enable_stdin (); - break; - case INF_REG_EVENT: - /* Use catch errors for now, until the inner layers of - fetch_inferior_event (i.e. readchar) can return meaningful - error status. If an error occurs while getting an event from - the target, just get rid of the target. */ - if (!catch_errors (fetch_inferior_event_wrapper, - client_data, "", RETURN_MASK_ALL)) - { - target_async (NULL, 0); - pop_target (); - discard_all_intermediate_continuations (); - discard_all_continuations (); - async_enable_stdin (); - display_gdb_prompt (0); - } + fetch_inferior_event (client_data); break; case INF_EXEC_COMPLETE: - if (!non_stop) { - /* Unregister the inferior from the event loop. This is done + /* Unregister the inferior from the event loop. This is done so that when the inferior is not running we don't get distracted by spurious inferior output. */ - if (target_has_execution) - target_async (NULL, 0); + if (target_has_execution && target_can_async_p ()) + target_async (0); } - /* The call to async_enable_stdin below resets 'sync_execution'. - However, if sync_execution is 1 now, we also need to show the - prompt below, so save the current value. */ - was_sync = sync_execution; - async_enable_stdin (); - - /* If we were doing a multi-step (eg: step n, next n), but it - got interrupted by a breakpoint, still do the pending - continuations. The continuation itself is responsible for - distinguishing the cases. The continuations are allowed to - touch the inferior memory, e.g. to remove breakpoints, so run - them before running breakpoint commands, which may resume the - target. */ - do_all_intermediate_continuations (); + /* Do all continuations associated with the whole inferior (not + a particular thread). */ + if (!ptid_equal (inferior_ptid, null_ptid)) + do_all_inferior_continuations (0); - /* Always finish the previous command before running any - breakpoint commands. Any stop cancels the previous command. - E.g. a "finish" or "step-n" command interrupted by an - unrelated breakpoint is canceled. */ - do_all_continuations (); - - if (current_language != expected_language - && language_mode == language_mode_auto) - language_info (1); /* Print what changed. */ - - /* Don't propagate breakpoint commands errors. Either we're - stopping or some command resumes the inferior. The user will - be informed. */ - TRY_CATCH (e, RETURN_MASK_ALL) + /* When running a command list (from a user command, say), these + are only run when the command list is all done. */ + if (interpreter_async) { - bpstat_do_actions (); + check_frame_language_change (); + + /* Don't propagate breakpoint commands errors. Either we're + stopping or some command resumes the inferior. The user will + be informed. */ + TRY + { + bpstat_do_actions (); + } + CATCH (e, RETURN_MASK_ALL) + { + exception_print (gdb_stderr, e); + } + END_CATCH } - - if (!was_sync && !is_running (inferior_ptid) && exec_done_display_p) - printf_unfiltered (_("completed.\n")); - break; - - case INF_EXEC_CONTINUE: - /* Is there anything left to do for the command issued to - complete? */ - do_all_intermediate_continuations (); break; - case INF_QUIT_REQ: - /* FIXME: ezannoni 1999-10-04. This call should really be a - target vector entry, so that it can be used for any kind of - targets. */ - async_remote_interrupt_twice (NULL); - break; - - case INF_TIMER: default: printf_unfiltered (_("Event type not recognized.\n")); break; } } - -static int -fetch_inferior_event_wrapper (gdb_client_data client_data) -{ - fetch_inferior_event (client_data); - return 1; -}