1999-10-06 01:13:56 +02:00
|
|
|
/* Handling of inferior events for the event loop for GDB, the GNU debugger.
|
2008-01-01 23:53:26 +01:00
|
|
|
Copyright (C) 1999, 2007, 2008 Free Software Foundation, Inc.
|
1999-10-06 01:13:56 +02:00
|
|
|
Written by Elena Zannoni <ezannoni@cygnus.com> of Cygnus Solutions.
|
|
|
|
|
|
|
|
This file is part of GDB.
|
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
it under the terms of the GNU General Public License as published by
|
2007-08-23 20:08:50 +02:00
|
|
|
the Free Software Foundation; either version 3 of the License, or
|
1999-10-06 01:13:56 +02:00
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
2007-08-23 20:08:50 +02:00
|
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
1999-10-06 01:13:56 +02:00
|
|
|
|
|
|
|
#include "defs.h"
|
|
|
|
#include "inferior.h" /* For fetch_inferior_event. */
|
|
|
|
#include "target.h" /* For enum inferior_event_type. */
|
|
|
|
#include "event-loop.h"
|
|
|
|
#include "event-top.h"
|
|
|
|
#include "inf-loop.h"
|
2008-03-14 16:14:49 +01:00
|
|
|
#include "remote.h"
|
2005-01-12 Andrew Cagney <cagney@gnu.org>
* exceptions.h (enum return_reason, RETURN_MASK)
(RETURN_MASK_QUIT, RETURN_MASK_ERROR, RETURN_MASK_ALL)
(return_mask, throw_exception, catch_exceptions_ftype)
(catch_exceptions_with_msg, catch_errors_ftype, catch_errors)
(catch_command_errors_ftype, catch_command_errors): Move to
exceptions.h.
* exceptions.c, exceptions.h: New files.
* top.c: Do not include <setjmp.h>.
(SIGJMP_BUF, SIGSETJMP, SIGLONGJMP, catch_return)
(throw_exception, catcher, catch_exceptions)
(catch_exceptions_with_msg, struct catch_errors_args)
(do_catch_errors, catch_errors, struct captured_command_args)
(do_captured_command, catch_command_errors): Move to exceptions.c.
* wrapper.c, wince.c, win32-nat.c, utils.c: Include "exceptions.h".
* tui/tui-interp.c, top.c, thread.c, symmisc.c: Ditto.
* symfile-mem.c, stack.c, solib.c, rs6000-nat.c: Ditto.
* remote-sds.c, remote-mips.c, remote-fileio.c: Ditto.
* remote-e7000.c, objc-lang.c, ocd.c: Ditto.
* remote.c, nto-procfs.c, monitor.c, mi/mi-main.c: Ditto.
* main.c, m32r-rom.c, infrun.c, inf-loop.c: Ditto.
* hppa-hpux-tdep.c, frame.c, event-top.c, event-loop.c: Ditto.
* corelow.c, corefile.c, cli/cli-interp.c, breakpoint.c: Ditto.
* ada-valprint.c, ada-lang.c: Ditto.
* Makefile.in (HFILES_NO_SRCDIR, COMMON_OBS): Add exceptions.h and
exceptions.o. Update all dependencies.
2005-01-12 19:31:35 +01:00
|
|
|
#include "exceptions.h"
|
2008-03-14 19:57:44 +01:00
|
|
|
#include "language.h"
|
1999-10-06 01:13:56 +02:00
|
|
|
|
|
|
|
static int fetch_inferior_event_wrapper (gdb_client_data client_data);
|
|
|
|
|
1999-10-12 06:37:53 +02:00
|
|
|
void
|
|
|
|
inferior_event_handler_wrapper (gdb_client_data client_data)
|
|
|
|
{
|
|
|
|
inferior_event_handler (INF_QUIT_REQ, client_data);
|
|
|
|
}
|
|
|
|
|
1999-10-06 01:13:56 +02:00
|
|
|
/* 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)
|
|
|
|
{
|
2008-03-14 19:57:44 +01:00
|
|
|
int was_sync = 0;
|
1999-10-06 01:13:56 +02:00
|
|
|
switch (event_type)
|
|
|
|
{
|
|
|
|
case INF_ERROR:
|
2005-02-11 Andrew Cagney <cagney@gnu.org>
Mark up some of printf_filtered and printf_unfiltered.
* ada-lang.c, annotate.c, arch-utils.c, breakpoint.c: Update.
* corelow.c, cp-namespace.c, cp-support.c, dcache.c: Update.
* demangle.c, dsrec.c, dwarf2read.c, dwarfread.c: Update.
* event-loop.c, event-top.c, exec.c, f-valprint.c: Update.
* gdbtypes.c, inf-loop.c, inf-ptrace.c, inf-ttrace.c: Update.
* infcmd.c, inflow.c, infrun.c, inftarg.c, language.c: Update.
* linespec.c, linux-nat.c, linux-thread-db.c, maint.c: Update.
* mdebugread.c, memattr.c, monitor.c, objc-lang.c: Update.
* ocd.c, osabi.c, printcmd.c, procfs.c, regcache.c: Update.
* remote.c, solib-som.c, solib.c, somsolib.c, source.c: Update.
* stack.c, symfile.c, symmisc.c, target.c, thread.c: Update.
* top.c, utils.c, valprint.c, value.c, cli/cli-cmds.c: Update.
* cli/cli-dump.c, cli/cli-logging.c, tui/tui-hooks.c: Update.
* tui/tui-regs.c, tui/tui-win.c: Update.
2005-02-12 01:39:24 +01:00
|
|
|
printf_unfiltered (_("error detected from target.\n"));
|
1999-10-06 01:13:56 +02:00
|
|
|
target_async (NULL, 0);
|
|
|
|
pop_target ();
|
|
|
|
discard_all_continuations ();
|
2008-03-14 20:55:51 +01:00
|
|
|
async_enable_stdin ();
|
1999-10-06 01:13:56 +02:00
|
|
|
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_continuations ();
|
2008-03-14 20:55:51 +01:00
|
|
|
async_enable_stdin ();
|
1999-10-06 01:13:56 +02:00
|
|
|
display_gdb_prompt (0);
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
case INF_EXEC_COMPLETE:
|
2008-03-14 19:57:44 +01:00
|
|
|
|
|
|
|
/* This is the first thing to do -- so that continuations know that
|
|
|
|
the target is stopped. For example, command_line_handler_continuation
|
|
|
|
will run breakpoint commands, and if we think that the target is
|
|
|
|
running, we'll refuse to execute most commands. MI continuation
|
|
|
|
presently uses target_executing to either print or not print *stopped. */
|
|
|
|
target_executing = 0;
|
|
|
|
|
|
|
|
/* 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);
|
|
|
|
|
2008-03-14 20:55:51 +01:00
|
|
|
/* 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. */
|
2008-03-14 19:57:44 +01:00
|
|
|
was_sync = sync_execution;
|
2008-03-14 20:55:51 +01:00
|
|
|
async_enable_stdin ();
|
2008-03-14 19:57:44 +01:00
|
|
|
|
2008-04-17 13:49:56 +02:00
|
|
|
/* 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. */
|
|
|
|
do_all_intermediate_continuations ();
|
|
|
|
|
1999-10-06 01:13:56 +02:00
|
|
|
do_all_continuations ();
|
2008-03-14 19:57:44 +01:00
|
|
|
|
|
|
|
if (current_language != expected_language)
|
|
|
|
{
|
|
|
|
if (language_mode == language_mode_auto)
|
|
|
|
{
|
|
|
|
language_info (1); /* Print what changed. */
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* If the continuation did not start the target again,
|
|
|
|
prepare for interation with the user. */
|
|
|
|
if (!target_executing)
|
|
|
|
{
|
|
|
|
if (was_sync)
|
|
|
|
{
|
|
|
|
display_gdb_prompt (0);
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
if (exec_done_display_p)
|
|
|
|
printf_unfiltered (_("completed.\n"));
|
|
|
|
}
|
|
|
|
}
|
1999-10-06 01:13:56 +02:00
|
|
|
break;
|
|
|
|
|
1999-12-07 04:56:43 +01:00
|
|
|
case INF_EXEC_CONTINUE:
|
|
|
|
/* Is there anything left to do for the command issued to
|
|
|
|
complete? */
|
|
|
|
do_all_intermediate_continuations ();
|
|
|
|
break;
|
|
|
|
|
2008-03-14 16:14:49 +01:00
|
|
|
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);
|
1999-10-12 06:37:53 +02:00
|
|
|
break;
|
|
|
|
|
1999-10-06 01:13:56 +02:00
|
|
|
case INF_TIMER:
|
|
|
|
default:
|
2005-02-11 Andrew Cagney <cagney@gnu.org>
Mark up some of printf_filtered and printf_unfiltered.
* ada-lang.c, annotate.c, arch-utils.c, breakpoint.c: Update.
* corelow.c, cp-namespace.c, cp-support.c, dcache.c: Update.
* demangle.c, dsrec.c, dwarf2read.c, dwarfread.c: Update.
* event-loop.c, event-top.c, exec.c, f-valprint.c: Update.
* gdbtypes.c, inf-loop.c, inf-ptrace.c, inf-ttrace.c: Update.
* infcmd.c, inflow.c, infrun.c, inftarg.c, language.c: Update.
* linespec.c, linux-nat.c, linux-thread-db.c, maint.c: Update.
* mdebugread.c, memattr.c, monitor.c, objc-lang.c: Update.
* ocd.c, osabi.c, printcmd.c, procfs.c, regcache.c: Update.
* remote.c, solib-som.c, solib.c, somsolib.c, source.c: Update.
* stack.c, symfile.c, symmisc.c, target.c, thread.c: Update.
* top.c, utils.c, valprint.c, value.c, cli/cli-cmds.c: Update.
* cli/cli-dump.c, cli/cli-logging.c, tui/tui-hooks.c: Update.
* tui/tui-regs.c, tui/tui-win.c: Update.
2005-02-12 01:39:24 +01:00
|
|
|
printf_unfiltered (_("Event type not recognized.\n"));
|
1999-10-06 01:13:56 +02:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
|
|
|
fetch_inferior_event_wrapper (gdb_client_data client_data)
|
|
|
|
{
|
|
|
|
fetch_inferior_event (client_data);
|
|
|
|
return 1;
|
|
|
|
}
|