2011-07-22 Phil Muldoon <pmuldoon@redhat.com>

[deliverable/binutils-gdb.git] / gdb / top.c

diff --git a/gdb/top.c b/gdb/top.c
index 69a11ad5be1b64df285ff2edf4433bbbc24e2800..8dba0e086b3a3a246b7f735984b9808ee82061a9 100644 (file)
--- a/gdb/top.c
+++ b/gdb/top.c
@@ -2,7 +2,7 @@
 
    Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995,
    1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
 
    Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995,
    1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,

-   2008, 2009 Free Software Foundation, Inc.
+   2008, 2009, 2010, 2011 Free Software Foundation, Inc.

 
    This file is part of GDB.
 
 
    This file is part of GDB.
 


@@ -47,8 +47,9 @@
 #include "main.h"
 #include "event-loop.h"
 #include "gdbthread.h"
 #include "main.h"
 #include "event-loop.h"
 #include "gdbthread.h"

+#include "python/python.h"

 
 

-/* readline include files */
+/* readline include files.  */

 #include "readline/readline.h"
 #include "readline/history.h"
 
 #include "readline/readline.h"
 #include "readline/history.h"
 


@@ -64,7 +65,11 @@
 #include "ui-out.h"
 #include "cli-out.h"
 
 #include "ui-out.h"
 #include "cli-out.h"
 

-/* Default command line prompt.  This is overriden in some configs. */
+#define PROMPT(X) the_prompts.prompt_stack[the_prompts.top + X].prompt
+#define PREFIX(X) the_prompts.prompt_stack[the_prompts.top + X].prefix
+#define SUFFIX(X) the_prompts.prompt_stack[the_prompts.top + X].suffix
+
+/* Default command line prompt.  This is overriden in some configs.  */

 
 #ifndef DEFAULT_PROMPT
 #define DEFAULT_PROMPT "(gdb) "
 
 #ifndef DEFAULT_PROMPT
 #define DEFAULT_PROMPT "(gdb) "


@@ -96,19 +101,20 @@ extern char lang_frame_mismatch_warn[];            /* language.c */
 
 /* Flag for whether we want all the "from_tty" gubbish printed.  */
 
 
 /* Flag for whether we want all the "from_tty" gubbish printed.  */
 

-int caution = 1;               /* Default is yes, sigh. */
+int caution = 1;               /* Default is yes, sigh.  */

 static void
 show_caution (struct ui_file *file, int from_tty,
              struct cmd_list_element *c, const char *value)
 {
 static void
 show_caution (struct ui_file *file, int from_tty,
              struct cmd_list_element *c, const char *value)
 {

-  fprintf_filtered (file, _("\
-Whether to confirm potentially dangerous operations is %s.\n"),
+  fprintf_filtered (file, _("Whether to confirm potentially "
+                           "dangerous operations is %s.\n"),

                    value);
 }
 
                    value);
 }
 

-/* stdio stream that command input is being read from.  Set to stdin normally.
-   Set by source_command to the file we are sourcing.  Set to NULL if we are
-   executing a user-defined command or interacting via a GUI.  */
+/* stdio stream that command input is being read from.  Set to stdin
+   normally.  Set by source_command to the file we are sourcing.  Set
+   to NULL if we are executing a user-defined command or interacting
+   via a GUI.  */

 
 FILE *instream;
 
 
 FILE *instream;
 


@@ -135,8 +141,8 @@ int xgdb_verbose;
 /* Buffer used for reading command lines, and the size
    allocated for it so far.  */
 
 /* Buffer used for reading command lines, and the size
    allocated for it so far.  */
 

-char *line;
-int linesize = 100;
+char *saved_command_line;
+int saved_command_line_size = 100;

 
 /* Nonzero if the current command is modified by "server ".  This
    affects things like recording into the command history, commands
 
 /* Nonzero if the current command is modified by "server ".  This
    affects things like recording into the command history, commands


@@ -148,12 +154,12 @@ int server_command;
 
 /* Baud rate specified for talking to serial target systems.  Default
    is left as -1, so targets can choose their own defaults.  */
 
 /* Baud rate specified for talking to serial target systems.  Default
    is left as -1, so targets can choose their own defaults.  */

-/* FIXME: This means that "show remotebaud" and gr_files_info can print -1
-   or (unsigned int)-1.  This is a Bad User Interface.  */
+/* FIXME: This means that "show remotebaud" and gr_files_info can
+   print -1 or (unsigned int)-1.  This is a Bad User Interface.  */

 
 int baud_rate = -1;
 
 
 int baud_rate = -1;
 

-/* Timeout limit for response from target. */
+/* Timeout limit for response from target.  */

 
 /* The default value has been changed many times over the years.  It 
    was originally 5 seconds.  But that was thought to be a long time 
 
 /* The default value has been changed many times over the years.  It 
    was originally 5 seconds.  But that was thought to be a long time 


@@ -171,7 +177,7 @@ int baud_rate = -1;
    a single variable for all protocol timeouts.
 
    As remote.c is used much more than remote-e7000.c, it was changed 
    a single variable for all protocol timeouts.
 
    As remote.c is used much more than remote-e7000.c, it was changed 

-   back to 2 seconds in 1999. */
+   back to 2 seconds in 1999.  */

 
 int remote_timeout = 2;
 
 
 int remote_timeout = 2;
 


@@ -184,28 +190,20 @@ int remote_debug = 0;
 char *lim_at_start;
 #endif
 
 char *lim_at_start;
 #endif
 

-/* Signal to catch ^Z typed while reading a command: SIGTSTP or SIGCONT.  */
-
-#ifndef STOP_SIGNAL
-#ifdef SIGTSTP
-#define STOP_SIGNAL SIGTSTP
-static void stop_sig (int);
-#endif
-#endif
-

 /* Hooks for alternate command interfaces.  */
 
 /* Hooks for alternate command interfaces.  */
 

-/* Called after most modules have been initialized, but before taking users
-   command file.
+/* Called after most modules have been initialized, but before taking
+   users command file.

 
 

-   If the UI fails to initialize and it wants GDB to continue
-   using the default UI, then it should clear this hook before returning. */
+   If the UI fails to initialize and it wants GDB to continue using
+   the default UI, then it should clear this hook before returning.  */

 
 void (*deprecated_init_ui_hook) (char *argv0);
 
 
 void (*deprecated_init_ui_hook) (char *argv0);
 

-/* This hook is called from within gdb's many mini-event loops which could
-   steal control from a real user interface's event loop. It returns
-   non-zero if the user is requesting a detach, zero otherwise. */
+/* This hook is called from within gdb's many mini-event loops which
+   could steal control from a real user interface's event loop.  It
+   returns non-zero if the user is requesting a detach, zero
+   otherwise.  */

 
 int (*deprecated_ui_loop_hook) (int);
 
 
 int (*deprecated_ui_loop_hook) (int);
 


@@ -217,8 +215,10 @@ void (*deprecated_command_loop_hook) (void);
 
 /* Called from print_frame_info to list the line we stopped in.  */
 
 
 /* Called from print_frame_info to list the line we stopped in.  */
 

-void (*deprecated_print_frame_info_listing_hook) (struct symtab * s, int line,
-                                                 int stopline, int noerror);
+void (*deprecated_print_frame_info_listing_hook) (struct symtab * s, 
+                                                 int line,
+                                                 int stopline, 
+                                                 int noerror);

 /* Replaces most of query.  */
 
 int (*deprecated_query_hook) (const char *, va_list);
 /* Replaces most of query.  */
 
 int (*deprecated_query_hook) (const char *, va_list);


@@ -244,33 +244,33 @@ char *(*deprecated_readline_hook) (char *);
 void (*deprecated_readline_end_hook) (void);
 
 /* Called as appropriate to notify the interface that we have attached
 void (*deprecated_readline_end_hook) (void);
 
 /* Called as appropriate to notify the interface that we have attached

-   to or detached from an already running process. */
+   to or detached from an already running process.  */

 
 void (*deprecated_attach_hook) (void);
 void (*deprecated_detach_hook) (void);
 
 
 void (*deprecated_attach_hook) (void);
 void (*deprecated_detach_hook) (void);
 

-/* Called during long calculations to allow GUI to repair window damage, and to
-   check for stop buttons, etc... */
+/* Called during long calculations to allow GUI to repair window
+   damage, and to check for stop buttons, etc...  */

 
 void (*deprecated_interactive_hook) (void);
 
 
 void (*deprecated_interactive_hook) (void);
 

-/* Tell the GUI someone changed the register REGNO. -1 means
+/* Tell the GUI someone changed the register REGNO.  -1 means

    that the caller does not know which register changed or
    that the caller does not know which register changed or

-   that several registers have changed (see value_assign). */
+   that several registers have changed (see value_assign).  */

 void (*deprecated_register_changed_hook) (int regno);
 
 void (*deprecated_register_changed_hook) (int regno);
 

-/* Called when going to wait for the target.  Usually allows the GUI to run
-   while waiting for target events.  */
+/* Called when going to wait for the target.  Usually allows the GUI
+   to run while waiting for target events.  */

 
 ptid_t (*deprecated_target_wait_hook) (ptid_t ptid,
                                       struct target_waitstatus *status,
                                       int options);
 
 
 ptid_t (*deprecated_target_wait_hook) (ptid_t ptid,
                                       struct target_waitstatus *status,
                                       int options);
 

-/* Used by UI as a wrapper around command execution.  May do various things
-   like enabling/disabling buttons, etc...  */
+/* Used by UI as a wrapper around command execution.  May do various
+   things like enabling/disabling buttons, etc...  */

 
 

-void (*deprecated_call_command_hook) (struct cmd_list_element * c, char *cmd,
-                                     int from_tty);
+void (*deprecated_call_command_hook) (struct cmd_list_element * c, 
+                                     char *cmd, int from_tty);

 
 /* Called after a `set' command has finished.  Is only run if the
    `set' command succeeded.  */
 
 /* Called after a `set' command has finished.  Is only run if the
    `set' command succeeded.  */


@@ -286,28 +286,29 @@ void (*deprecated_context_hook) (int id);
 #ifdef SIGHUP
 /* NOTE 1999-04-29: This function will be static again, once we modify
    gdb to use the event loop as the default command loop and we merge
 #ifdef SIGHUP
 /* NOTE 1999-04-29: This function will be static again, once we modify
    gdb to use the event loop as the default command loop and we merge

-   event-top.c into this file, top.c */
+   event-top.c into this file, top.c.  */

 /* static */ int
 quit_cover (void *s)
 {
   caution = 0;                 /* Throw caution to the wind -- we're exiting.
 /* static */ int
 quit_cover (void *s)
 {
   caution = 0;                 /* Throw caution to the wind -- we're exiting.

-                                  This prevents asking the user dumb questions.  */
+                                  This prevents asking the user dumb 
+                                  questions.  */

   quit_command ((char *) 0, 0);
   return 0;
 }
 #endif /* defined SIGHUP */
 \f
   quit_command ((char *) 0, 0);
   return 0;
 }
 #endif /* defined SIGHUP */
 \f

-/* Line number we are currently in in a file which is being sourced.  */
+/* Line number we are currently in, in a file which is being sourced.  */

 /* NOTE 1999-04-29: This variable will be static again, once we modify
    gdb to use the event loop as the default command loop and we merge
 /* NOTE 1999-04-29: This variable will be static again, once we modify
    gdb to use the event loop as the default command loop and we merge

-   event-top.c into this file, top.c */
+   event-top.c into this file, top.c.  */

 /* static */ int source_line_number;
 
 /* Name of the file we are sourcing.  */
 /* NOTE 1999-04-29: This variable will be static again, once we modify
    gdb to use the event loop as the default command loop and we merge
 /* static */ int source_line_number;
 
 /* Name of the file we are sourcing.  */
 /* NOTE 1999-04-29: This variable will be static again, once we modify
    gdb to use the event loop as the default command loop and we merge

-   event-top.c into this file, top.c */
-/* static */ char *source_file_name;
+   event-top.c into this file, top.c.  */
+/* static */ const char *source_file_name;

 
 /* Clean up on error during a "source" command (or execution of a
    user-defined command).  */
 
 /* Clean up on error during a "source" command (or execution of a
    user-defined command).  */


@@ -342,17 +343,23 @@ do_chdir_cleanup (void *old_dir)
 }
 #endif
 
 }
 #endif
 

-void
+struct cleanup *

 prepare_execute_command (void)
 {
 prepare_execute_command (void)
 {

-  free_all_values ();
+  struct value *mark;
+  struct cleanup *cleanup;
+
+  mark = value_mark ();
+  cleanup = make_cleanup_value_free_to_mark (mark);

 
 

-  /* With multiple threads running while the one we're examining is stopped,
-     the dcache can get stale without us being able to detect it.
-     For the duration of the command, though, use the dcache to help
-     things like backtrace.  */
+  /* With multiple threads running while the one we're examining is
+     stopped, the dcache can get stale without us being able to detect
+     it.  For the duration of the command, though, use the dcache to
+     help things like backtrace.  */

   if (non_stop)
     target_dcache_invalidate ();
   if (non_stop)
     target_dcache_invalidate ();

+
+  return cleanup;

 }
 
 /* Execute the line P as a command, in the current user context.
 }
 
 /* Execute the line P as a command, in the current user context.


@@ -361,31 +368,13 @@ prepare_execute_command (void)
 void
 execute_command (char *p, int from_tty)
 {
 void
 execute_command (char *p, int from_tty)
 {

+  struct cleanup *cleanup;

   struct cmd_list_element *c;
   enum language flang;
   static int warned = 0;
   char *line;
   struct cmd_list_element *c;
   enum language flang;
   static int warned = 0;
   char *line;

-  long time_at_cmd_start = 0;
-#ifdef HAVE_SBRK
-  long space_at_cmd_start = 0;
-#endif
-  extern int display_time;
-  extern int display_space;
-
-  if (target_can_async_p ())
-    {
-      time_at_cmd_start = get_run_time ();
-
-      if (display_space)
-       {
-#ifdef HAVE_SBRK
-         char *lim = (char *) sbrk (0);
-         space_at_cmd_start = lim - lim_at_start;
-#endif
-       }
-    }

 
 

-  prepare_execute_command ();
+  cleanup = prepare_execute_command ();

 
   /* Force cleanup of any alloca areas if using C alloca instead of
      a builtin alloca.  */
 
   /* Force cleanup of any alloca areas if using C alloca instead of
      a builtin alloca.  */


@@ -393,7 +382,10 @@ execute_command (char *p, int from_tty)
 
   /* This can happen when command_line_input hits end of file.  */
   if (p == NULL)
 
   /* This can happen when command_line_input hits end of file.  */
   if (p == NULL)

-    return;
+    {
+      do_cleanups (cleanup);
+      return;
+    }

 
   target_log_command (p);
 
 
   target_log_command (p);
 


@@ -432,7 +424,7 @@ execute_command (char *p, int from_tty)
          *(p + 1) = '\0';
        }
 
          *(p + 1) = '\0';
        }
 

-      /* If this command has been pre-hooked, run the hook first. */
+      /* If this command has been pre-hooked, run the hook first.  */

       execute_cmd_pre_hook (c);
 
       if (c->flags & DEPRECATED_WARN_USER)
       execute_cmd_pre_hook (c);
 
       if (c->flags & DEPRECATED_WARN_USER)


@@ -449,7 +441,7 @@ execute_command (char *p, int from_tty)
       else
        cmd_func (c, arg, from_tty & caution);
        
       else
        cmd_func (c, arg, from_tty & caution);
        

-      /* If this command has been post-hooked, run the hook last. */
+      /* If this command has been post-hooked, run the hook last.  */

       execute_cmd_post_hook (c);
 
     }
       execute_cmd_post_hook (c);
 
     }


@@ -469,7 +461,7 @@ execute_command (char *p, int from_tty)
 
   /* Warn the user if the working language does not match the
      language of the current frame.  Only warn the user if we are
 
   /* Warn the user if the working language does not match the
      language of the current frame.  Only warn the user if we are

-     actually running the program, i.e. there is a stack. */
+     actually running the program, i.e. there is a stack.  */

   /* FIXME:  This should be cacheing the frame and only running when
      the frame changes.  */
 
   /* FIXME:  This should be cacheing the frame and only running when
      the frame changes.  */
 


@@ -484,6 +476,52 @@ execute_command (char *p, int from_tty)
          warned = 1;
        }
     }
          warned = 1;
        }
     }

+
+    do_cleanups (cleanup);
+}
+
+/* Run execute_command for P and FROM_TTY.  Capture its output into the
+   returned string, do not display it to the screen.  BATCH_FLAG will be
+   temporarily set to true.  */
+
+char *
+execute_command_to_string (char *p, int from_tty)
+{
+  struct ui_file *str_file;
+  struct cleanup *cleanup;
+  char *retval;
+
+  /* GDB_STDOUT should be better already restored during these
+     restoration callbacks.  */
+  cleanup = set_batch_flag_and_make_cleanup_restore_page_info ();
+
+  str_file = mem_fileopen ();
+
+  make_cleanup_ui_file_delete (str_file);
+  make_cleanup_restore_ui_file (&gdb_stdout);
+  make_cleanup_restore_ui_file (&gdb_stderr);
+  make_cleanup_restore_ui_file (&gdb_stdlog);
+  make_cleanup_restore_ui_file (&gdb_stdtarg);
+  make_cleanup_restore_ui_file (&gdb_stdtargerr);
+
+  if (ui_out_redirect (uiout, str_file) < 0)
+    warning (_("Current output protocol does not support redirection"));
+  else
+    make_cleanup_ui_out_redirect_pop (uiout);
+
+  gdb_stdout = str_file;
+  gdb_stderr = str_file;
+  gdb_stdlog = str_file;
+  gdb_stdtarg = str_file;
+  gdb_stdtargerr = str_file;
+
+  execute_command (p, from_tty);
+
+  retval = ui_file_xstrdup (str_file, NULL);
+
+  do_cleanups (cleanup);
+
+  return retval;

 }
 
 /* Read commands from `instream' and execute them
 }
 
 /* Read commands from `instream' and execute them


@@ -495,85 +533,70 @@ command_loop (void)
   struct cleanup *old_chain;
   char *command;
   int stdin_is_tty = ISATTY (stdin);
   struct cleanup *old_chain;
   char *command;
   int stdin_is_tty = ISATTY (stdin);

-  long time_at_cmd_start;
-#ifdef HAVE_SBRK
-  long space_at_cmd_start = 0;
-#endif
-  extern int display_time;
-  extern int display_space;

 
   while (instream && !feof (instream))
     {
       if (window_hook && instream == stdin)
 
   while (instream && !feof (instream))
     {
       if (window_hook && instream == stdin)

-       (*window_hook) (instream, get_prompt ());
+       (*window_hook) (instream, get_prompt (0));

 
       quit_flag = 0;
       if (instream == stdin && stdin_is_tty)
        reinitialize_more_filter ();
       old_chain = make_cleanup (null_cleanup, 0);
 
 
       quit_flag = 0;
       if (instream == stdin && stdin_is_tty)
        reinitialize_more_filter ();
       old_chain = make_cleanup (null_cleanup, 0);
 

-      /* Get a command-line. This calls the readline package. */
+      /* Get a command-line.  This calls the readline package.  */

       command = command_line_input (instream == stdin ?
       command = command_line_input (instream == stdin ?

-                                   get_prompt () : (char *) NULL,
+                                   get_prompt (0) : (char *) NULL,

                                    instream == stdin, "prompt");
       if (command == 0)
                                    instream == stdin, "prompt");
       if (command == 0)

-       return;
-
-      time_at_cmd_start = get_run_time ();
-
-      if (display_space)

        {
        {

-#ifdef HAVE_SBRK
-         char *lim = (char *) sbrk (0);
-         space_at_cmd_start = lim - lim_at_start;
-#endif
+         do_cleanups (old_chain);
+         return;

        }
 
        }
 

+      make_command_stats_cleanup (1);
+

       execute_command (command, instream == stdin);
 
       /* Do any commands attached to breakpoint we are stopped at.  */
       bpstat_do_actions ();
 
       do_cleanups (old_chain);
       execute_command (command, instream == stdin);
 
       /* Do any commands attached to breakpoint we are stopped at.  */
       bpstat_do_actions ();
 
       do_cleanups (old_chain);

-
-      if (display_time)
-       {
-         long cmd_time = get_run_time () - time_at_cmd_start;
-
-         printf_unfiltered (_("Command execution time: %ld.%06ld\n"),
-                            cmd_time / 1000000, cmd_time % 1000000);
-       }
-
-      if (display_space)
-       {
-#ifdef HAVE_SBRK
-         char *lim = (char *) sbrk (0);
-         long space_now = lim - lim_at_start;
-         long space_diff = space_now - space_at_cmd_start;
-
-         printf_unfiltered (_("Space used: %ld (%s%ld for this command)\n"),
-                            space_now,
-                            (space_diff >= 0 ? "+" : ""),
-                            space_diff);
-#endif
-       }

     }
 }
 \f
     }
 }
 \f

+/* When nonzero, cause dont_repeat to do nothing.  This should only be
+   set via prevent_dont_repeat.  */
+
+static int suppress_dont_repeat = 0;
+

 /* Commands call this if they do not want to be repeated by null lines.  */
 
 void
 dont_repeat (void)
 {
 /* Commands call this if they do not want to be repeated by null lines.  */
 
 void
 dont_repeat (void)
 {

-  if (server_command)
+  if (suppress_dont_repeat || server_command)

     return;
 
   /* If we aren't reading from standard input, we are saving the last
     return;
 
   /* If we aren't reading from standard input, we are saving the last

-     thing read from stdin in line and don't want to delete it.  Null lines
-     won't repeat here in any case.  */
+     thing read from stdin in line and don't want to delete it.  Null
+     lines won't repeat here in any case.  */

   if (instream == stdin)
   if (instream == stdin)

-    *line = 0;
+    *saved_command_line = 0;

 }
 }

+
+/* Prevent dont_repeat from working, and return a cleanup that
+   restores the previous state.  */
+
+struct cleanup *
+prevent_dont_repeat (void)
+{
+  struct cleanup *result = make_cleanup_restore_integer (&suppress_dont_repeat);
+
+  suppress_dont_repeat = 1;
+  return result;
+}
+

 \f
 /* Read a line from the stream "instream" without command line editing.
 
 \f
 /* Read a line from the stream "instream" without command line editing.
 


@@ -644,7 +667,7 @@ static int command_editing_p;
 
 /* NOTE 1999-04-29: This variable will be static again, once we modify
    gdb to use the event loop as the default command loop and we merge
 
 /* NOTE 1999-04-29: This variable will be static again, once we modify
    gdb to use the event loop as the default command loop and we merge

-   event-top.c into this file, top.c */
+   event-top.c into this file, top.c.  */

 
 /* static */ int history_expansion_p;
 
 
 /* static */ int history_expansion_p;
 


@@ -671,8 +694,8 @@ static void
 show_history_filename (struct ui_file *file, int from_tty,
                       struct cmd_list_element *c, const char *value)
 {
 show_history_filename (struct ui_file *file, int from_tty,
                       struct cmd_list_element *c, const char *value)
 {

-  fprintf_filtered (file, _("\
-The filename in which to record the command history is \"%s\".\n"),
+  fprintf_filtered (file, _("The filename in which to record "
+                           "the command history is \"%s\".\n"),

                    value);
 }
 
                    value);
 }
 


@@ -785,57 +808,6 @@ gdb_readline_wrapper (char *prompt)
 }
 
 \f
 }
 
 \f

-#ifdef STOP_SIGNAL
-static void
-stop_sig (int signo)
-{
-#if STOP_SIGNAL == SIGTSTP
-  signal (SIGTSTP, SIG_DFL);
-#if HAVE_SIGPROCMASK
-  {
-    sigset_t zero;
-
-    sigemptyset (&zero);
-    sigprocmask (SIG_SETMASK, &zero, 0);
-  }
-#elif HAVE_SIGSETMASK
-  sigsetmask (0);
-#endif
-  kill (getpid (), SIGTSTP);
-  signal (SIGTSTP, stop_sig);
-#else
-  signal (STOP_SIGNAL, stop_sig);
-#endif
-  printf_unfiltered ("%s", get_prompt ());
-  gdb_flush (gdb_stdout);
-
-  /* Forget about any previous command -- null line now will do nothing.  */
-  dont_repeat ();
-}
-#endif /* STOP_SIGNAL */
-
-/* Initialize signal handlers. */
-static void
-float_handler (int signo)
-{
-  /* This message is based on ANSI C, section 4.7.  Note that integer
-     divide by zero causes this, so "float" is a misnomer.  */
-  signal (SIGFPE, float_handler);
-  error (_("Erroneous arithmetic operation."));
-}
-
-static void
-do_nothing (int signo)
-{
-  /* Under System V the default disposition of a signal is reinstated after
-     the signal is caught and delivered to an application process.  On such
-     systems one must restore the replacement signal handler if one wishes
-     to continue handling the signal in one's program.  On BSD systems this
-     is not needed but it is harmless, and it simplifies the code to just do
-     it unconditionally. */
-  signal (signo, do_nothing);
-}
-

 /* The current saved history number from operate-and-get-next.
    This is -1 if not valid.  */
 static int operate_saved_history = -1;
 /* The current saved history number from operate-and-get-next.
    This is -1 if not valid.  */
 static int operate_saved_history = -1;


@@ -846,6 +818,7 @@ static void
 gdb_rl_operate_and_get_next_completion (void)
 {
   int delta = where_history () - operate_saved_history;
 gdb_rl_operate_and_get_next_completion (void)
 {
   int delta = where_history () - operate_saved_history;

+

   /* The `key' argument to rl_get_previous_history is ignored.  */
   rl_get_previous_history (delta, 0);
   operate_saved_history = -1;
   /* The `key' argument to rl_get_previous_history is ignored.  */
   rl_get_previous_history (delta, 0);
   operate_saved_history = -1;


@@ -949,8 +922,9 @@ command_line_input (char *prompt_arg, int repeat, char *annotation_suffix)
 
   while (1)
     {
 
   while (1)
     {

-      /* Make sure that all output has been output.  Some machines may let
-         you get away with leaving out some of the gdb_flush, but not all.  */
+      /* Make sure that all output has been output.  Some machines may
+         let you get away with leaving out some of the gdb_flush, but
+         not all.  */

       wrap_here ("");
       gdb_flush (gdb_stdout);
       gdb_flush (gdb_stderr);
       wrap_here ("");
       gdb_flush (gdb_stdout);
       gdb_flush (gdb_stderr);


@@ -1000,7 +974,7 @@ command_line_input (char *prompt_arg, int repeat, char *annotation_suffix)
        }
       p1 = rl;
       /* Copy line.  Don't copy null at end.  (Leaves line alone
        }
       p1 = rl;
       /* Copy line.  Don't copy null at end.  (Leaves line alone

-         if this was just a newline)  */
+         if this was just a newline).  */

       while (*p1)
        *p++ = *p1++;
 
       while (*p1)
        *p++ = *p1++;
 


@@ -1053,7 +1027,8 @@ command_line_input (char *prompt_arg, int repeat, char *annotation_suffix)
          if (expanded < 0)
            {
              xfree (history_value);
          if (expanded < 0)
            {
              xfree (history_value);

-             return command_line_input (prompt_arg, repeat, annotation_suffix);
+             return command_line_input (prompt_arg, repeat,
+                                        annotation_suffix);

            }
          if (strlen (history_value) > linelength)
            {
            }
          if (strlen (history_value) > linelength)
            {


@@ -1066,14 +1041,13 @@ command_line_input (char *prompt_arg, int repeat, char *annotation_suffix)
       xfree (history_value);
     }
 
       xfree (history_value);
     }
 

-  /* If we just got an empty line, and that is supposed
-     to repeat the previous command, return the value in the
-     global buffer.  */
+  /* If we just got an empty line, and that is supposed to repeat the
+     previous command, return the value in the global buffer.  */

   if (repeat && p == linebuffer)
   if (repeat && p == linebuffer)

-    return line;
+    return saved_command_line;

   for (p1 = linebuffer; *p1 == ' ' || *p1 == '\t'; p1++);
   if (repeat && !*p1)
   for (p1 = linebuffer; *p1 == ' ' || *p1 == '\t'; p1++);
   if (repeat && !*p1)

-    return line;
+    return saved_command_line;

 
   *p = 0;
 
 
   *p = 0;
 


@@ -1089,54 +1063,56 @@ command_line_input (char *prompt_arg, int repeat, char *annotation_suffix)
      and remove the '#'.  The kill ring is probably better, but some
      people are in the habit of commenting things out.  */
   if (*p1 == '#')
      and remove the '#'.  The kill ring is probably better, but some
      people are in the habit of commenting things out.  */
   if (*p1 == '#')

-    *p1 = '\0';                        /* Found a comment. */
+    *p1 = '\0';                        /* Found a comment.  */

 
   /* Save into global buffer if appropriate.  */
   if (repeat)
     {
 
   /* Save into global buffer if appropriate.  */
   if (repeat)
     {

-      if (linelength > linesize)
+      if (linelength > saved_command_line_size)

        {
        {

-         line = xrealloc (line, linelength);
-         linesize = linelength;
+         saved_command_line = xrealloc (saved_command_line, linelength);
+         saved_command_line_size = linelength;

        }
        }

-      strcpy (line, linebuffer);
-      return line;
+      strcpy (saved_command_line, linebuffer);
+      return saved_command_line;

     }
 
   return linebuffer;
 }
 \f
     }
 
   return linebuffer;
 }
 \f

-/* Print the GDB banner. */
+/* Print the GDB banner.  */

 void
 print_gdb_version (struct ui_file *stream)
 {
   /* From GNU coding standards, first line is meant to be easy for a
      program to parse, and is just canonical program name and version
 void
 print_gdb_version (struct ui_file *stream)
 {
   /* From GNU coding standards, first line is meant to be easy for a
      program to parse, and is just canonical program name and version

-     number, which starts after last space. */
+     number, which starts after last space.  */

 
   fprintf_filtered (stream, "GNU gdb %s%s\n", PKGVERSION, version);
 
 
   fprintf_filtered (stream, "GNU gdb %s%s\n", PKGVERSION, version);
 

-  /* Second line is a copyright notice. */
+  /* Second line is a copyright notice.  */

 
 

-  fprintf_filtered (stream, "Copyright (C) 2009 Free Software Foundation, Inc.\n");
+  fprintf_filtered (stream,
+                   "Copyright (C) 2011 Free Software Foundation, Inc.\n");

 
   /* Following the copyright is a brief statement that the program is
      free software, that users are free to copy and change it on
      certain conditions, that it is covered by the GNU GPL, and that
 
   /* Following the copyright is a brief statement that the program is
      free software, that users are free to copy and change it on
      certain conditions, that it is covered by the GNU GPL, and that

-     there is no warranty. */
+     there is no warranty.  */

 
   fprintf_filtered (stream, "\
 
   fprintf_filtered (stream, "\

-License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>\n\
-This is free software: you are free to change and redistribute it.\n\
+License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>\
+\nThis is free software: you are free to change and redistribute it.\n\

 There is NO WARRANTY, to the extent permitted by law.  Type \"show copying\"\n\
 and \"show warranty\" for details.\n");
 
 There is NO WARRANTY, to the extent permitted by law.  Type \"show copying\"\n\
 and \"show warranty\" for details.\n");
 

-  /* After the required info we print the configuration information. */
+  /* After the required info we print the configuration information.  */

 
   fprintf_filtered (stream, "This GDB was configured as \"");
   if (strcmp (host_name, target_name) != 0)
     {
 
   fprintf_filtered (stream, "This GDB was configured as \"");
   if (strcmp (host_name, target_name) != 0)
     {

-      fprintf_filtered (stream, "--host=%s --target=%s", host_name, target_name);
+      fprintf_filtered (stream, "--host=%s --target=%s",
+                       host_name, target_name);

     }
   else
     {
     }
   else
     {


@@ -1152,23 +1128,98 @@ and \"show warranty\" for details.\n");
     }
 }
 \f
     }
 }
 \f

-/* get_prompt: access method for the GDB prompt string.  */
+
+/* get_prefix: access method for the GDB prefix string.  */
+
+char *
+get_prefix (int level)
+{
+  return PREFIX (level);
+}
+
+/* set_prefix: set method for the GDB prefix string.  */
+
+void
+set_prefix (const char *s, int level)
+{
+  /* If S is NULL, just free the PREFIX at level LEVEL and set to
+     NULL.  */
+  if (s == NULL)
+    {
+      xfree (PREFIX (level));
+      PREFIX (level) = NULL;
+    }
+  else
+    {
+      char *p = xstrdup (s);
+
+      xfree (PREFIX (level));
+      PREFIX (level) =  p;
+    }
+}
+
+/* get_suffix: access method for the GDB suffix string.  */
+
+char *
+get_suffix (int level)
+{
+  return SUFFIX (level);
+}
+
+/* set_suffix: set method for the GDB suffix string.  */
+
+void
+set_suffix (const char *s, int level)
+{
+  /* If S is NULL, just free the SUFFIX at level LEVEL and set to
+     NULL.  */
+  if (s == NULL)
+    {
+      xfree (SUFFIX (level));
+      SUFFIX (level) = NULL;
+    }
+  else
+    {
+      char *p = xstrdup (s);
+
+      xfree (SUFFIX (level));
+      SUFFIX (level) =  p;
+    }
+}
+
+ /* get_prompt: access method for the GDB prompt string.  */

 
 char *
 
 char *

-get_prompt (void)
+get_prompt (int level)

 {
 {

-  return PROMPT (0);
+  return PROMPT (level);

 }
 
 void
 }
 
 void

-set_prompt (char *s)
+set_prompt (const char *s, int level)

 {
 {

-/* ??rehrauer: I don't know why this fails, since it looks as though
-   assignments to prompt are wrapped in calls to xstrdup...
-   if (prompt != NULL)
-   xfree (prompt);
- */
-  PROMPT (0) = xstrdup (s);
+  /* If S is NULL, just free the PROMPT at level LEVEL and set to
+     NULL.  */
+  if (s == NULL)
+    {
+      xfree (PROMPT (level));
+      PROMPT (level) = NULL;
+    }
+  else
+    {
+      char *p = xstrdup (s);
+
+      xfree (PROMPT (0));
+      PROMPT (0) = p;
+
+      if (level == 0)
+       {
+         /* Also, free and set new_async_prompt so prompt changes sync up
+            with set/show prompt.  */
+           xfree (new_async_prompt);
+           new_async_prompt = xstrdup (PROMPT (0));
+         }
+      }

 }
 \f
 
 }
 \f
 


@@ -1290,8 +1341,8 @@ quit_target (void *arg)
   if (write_history_p && history_filename)
     write_history (history_filename);
 
   if (write_history_p && history_filename)
     write_history (history_filename);
 

-  do_final_cleanups (ALL_CLEANUPS);    /* Do any final cleanups before exiting */
-
+  do_final_cleanups (ALL_CLEANUPS);    /* Do any final cleanups before
+                                         exiting.  */

   return 0;
 }
 
   return 0;
 }
 


@@ -1304,7 +1355,7 @@ quit_force (char *args, int from_tty)
   struct qt_args qt;
 
   /* An optional expression may be used to cause gdb to terminate with the 
   struct qt_args qt;
 
   /* An optional expression may be used to cause gdb to terminate with the 

-     value of that expression. */
+     value of that expression.  */

   if (args)
     {
       struct value *val = parse_and_eval (args);
   if (args)
     {
       struct value *val = parse_and_eval (args);


@@ -1324,37 +1375,14 @@ quit_force (char *args, int from_tty)
   exit (exit_code);
 }
 
   exit (exit_code);
 }
 

-/* If OFF, the debugger will run in non-interactive mode, which means
-   that it will automatically select the default answer to all the
-   queries made to the user.  If ON, gdb will wait for the user to
-   answer all queries.  If AUTO, gdb will determine whether to run
-   in interactive mode or not depending on whether stdin is a terminal
-   or not.  */
-static enum auto_boolean interactive_mode = AUTO_BOOLEAN_AUTO;
-
-/* Implement the "show interactive-mode" option.  */
-
-static void
-show_interactive_mode (struct ui_file *file, int from_tty,
-                       struct cmd_list_element *c,
-                       const char *value)
-{
-  if (interactive_mode == AUTO_BOOLEAN_AUTO)
-    fprintf_filtered (file, "\
-Debugger's interactive mode is %s (currently %s).\n",
-                      value, input_from_terminal_p () ? "on" : "off");
-  else
-    fprintf_filtered (file, "Debugger's interactive mode is %s.\n", value);
-}
-

 /* Returns whether GDB is running on a terminal and input is
    currently coming from that terminal.  */
 
 int
 input_from_terminal_p (void)
 {
 /* Returns whether GDB is running on a terminal and input is
    currently coming from that terminal.  */
 
 int
 input_from_terminal_p (void)
 {

-  if (interactive_mode != AUTO_BOOLEAN_AUTO)
-    return interactive_mode == AUTO_BOOLEAN_TRUE;
+  if (batch_flag)
+    return 0;

 
   if (gdb_has_a_terminal () && instream == stdin)
     return 1;
 
   if (gdb_has_a_terminal () && instream == stdin)
     return 1;


@@ -1371,8 +1399,9 @@ input_from_terminal_p (void)
 static void
 dont_repeat_command (char *ignored, int from_tty)
 {
 static void
 dont_repeat_command (char *ignored, int from_tty)
 {

-  *line = 0;                   /* Can't call dont_repeat here because we're not
-                                  necessarily reading from stdin.  */
+  /* Can't call dont_repeat here because we're not necessarily reading
+     from stdin.  */
+  *saved_command_line = 0;

 }
 \f
 /* Functions to manipulate command line editing control variables.  */
 }
 \f
 /* Functions to manipulate command line editing control variables.  */


@@ -1470,7 +1499,8 @@ set_history_size_command (char *args, int from_tty, struct cmd_list_element *c)
 void
 set_history (char *args, int from_tty)
 {
 void
 set_history (char *args, int from_tty)
 {

-  printf_unfiltered (_("\"set history\" must be followed by the name of a history subcommand.\n"));
+  printf_unfiltered (_("\"set history\" must be followed "
+                      "by the name of a history subcommand.\n"));

   help_list (sethistlist, "set history ", -1, gdb_stdout);
 }
 
   help_list (sethistlist, "set history ", -1, gdb_stdout);
 }
 


@@ -1480,7 +1510,7 @@ show_history (char *args, int from_tty)
   cmd_show_list (showhistlist, from_tty, "");
 }
 
   cmd_show_list (showhistlist, from_tty, "");
 }
 

-int info_verbose = 0;          /* Default verbose msgs off */
+int info_verbose = 0;          /* Default verbose msgs off.  */

 
 /* Called by do_setshow_command.  An elaborate joke.  */
 void
 
 /* Called by do_setshow_command.  An elaborate joke.  */
 void


@@ -1490,6 +1520,7 @@ set_verbose (char *args, int from_tty, struct cmd_list_element *c)
   struct cmd_list_element *showcmd;
 
   showcmd = lookup_cmd_1 (&cmdname, showlist, NULL, 1);
   struct cmd_list_element *showcmd;
 
   showcmd = lookup_cmd_1 (&cmdname, showlist, NULL, 1);

+  gdb_assert (showcmd != NULL && showcmd != CMD_LIST_AMBIGUOUS);

 
   if (info_verbose)
     {
 
   if (info_verbose)
     {


@@ -1504,10 +1535,9 @@ set_verbose (char *args, int from_tty, struct cmd_list_element *c)
 }
 
 /* Init the history buffer.  Note that we are called after the init file(s)
 }
 
 /* Init the history buffer.  Note that we are called after the init file(s)

- * have been read so that the user can change the history file via his
- * .gdbinit file (for instance).  The GDBHISTFILE environment variable
- * overrides all of this.
- */
+   have been read so that the user can change the history file via his
+   .gdbinit file (for instance).  The GDBHISTFILE environment variable
+   overrides all of this.  */

 
 void
 init_history (void)
 
 void
 init_history (void)


@@ -1553,8 +1583,8 @@ static void
 show_async_command_editing_p (struct ui_file *file, int from_tty,
                              struct cmd_list_element *c, const char *value)
 {
 show_async_command_editing_p (struct ui_file *file, int from_tty,
                              struct cmd_list_element *c, const char *value)
 {

-  fprintf_filtered (file, _("\
-Editing of command lines as they are typed is %s.\n"),
+  fprintf_filtered (file, _("Editing of command lines as "
+                           "they are typed is %s.\n"),

                    value);
 }
 
                    value);
 }
 


@@ -1569,26 +1599,22 @@ static void
 show_exec_done_display_p (struct ui_file *file, int from_tty,
                          struct cmd_list_element *c, const char *value)
 {
 show_exec_done_display_p (struct ui_file *file, int from_tty,
                          struct cmd_list_element *c, const char *value)
 {

-  fprintf_filtered (file, _("\
-Notification of completion for asynchronous execution commands is %s.\n"),
+  fprintf_filtered (file, _("Notification of completion for "
+                           "asynchronous execution commands is %s.\n"),

                    value);
 }
 static void
 init_main (void)
 {
                    value);
 }
 static void
 init_main (void)
 {

-  struct cmd_list_element *c;
-

   /* initialize the prompt stack to a simple "(gdb) " prompt or to
      whatever the DEFAULT_PROMPT is.  */
   the_prompts.top = 0;
   PREFIX (0) = "";
   /* initialize the prompt stack to a simple "(gdb) " prompt or to
      whatever the DEFAULT_PROMPT is.  */
   the_prompts.top = 0;
   PREFIX (0) = "";

-  PROMPT (0) = xstrdup (DEFAULT_PROMPT);
+  set_prompt (DEFAULT_PROMPT, 0);

   SUFFIX (0) = "";
   /* Set things up for annotation_level > 1, if the user ever decides
      to use it.  */
   async_annotation_suffix = "prompt";
   SUFFIX (0) = "";
   /* Set things up for annotation_level > 1, if the user ever decides
      to use it.  */
   async_annotation_suffix = "prompt";

-  /* Set the variable associated with the setshow prompt command.  */
-  new_async_prompt = xstrdup (PROMPT (0));

 
   /* If gdb was started with --annotate=2, this is equivalent to the
      user entering the command 'set annotate 2' at the gdb prompt, so
 
   /* If gdb was started with --annotate=2, this is equivalent to the
      user entering the command 'set annotate 2' at the gdb prompt, so


@@ -1614,16 +1640,16 @@ init_main (void)
   rl_add_defun ("operate-and-get-next", gdb_rl_operate_and_get_next, 15);
 
   add_setshow_string_cmd ("prompt", class_support,
   rl_add_defun ("operate-and-get-next", gdb_rl_operate_and_get_next, 15);
 
   add_setshow_string_cmd ("prompt", class_support,

-                         &new_async_prompt, _("\
-Set gdb's prompt"), _("\
-Show gdb's prompt"), NULL,
-                         set_async_prompt,
+                         &new_async_prompt,
+                         _("Set gdb's prompt"),
+                         _("Show gdb's prompt"),
+                         NULL, set_async_prompt,

                          show_new_async_prompt,
                          &setlist, &showlist);
 
   add_com ("dont-repeat", class_support, dont_repeat_command, _("\
                          show_new_async_prompt,
                          &setlist, &showlist);
 
   add_com ("dont-repeat", class_support, dont_repeat_command, _("\

-Don't repeat this command.\n\
-Primarily used inside of user-defined commands that should not be repeated when\n\
+Don't repeat this command.\nPrimarily \
+used inside of user-defined commands that should not be repeated when\n\

 hitting return."));
 
   add_setshow_boolean_cmd ("editing", class_support,
 hitting return."));
 
   add_setshow_boolean_cmd ("editing", class_support,


@@ -1687,18 +1713,6 @@ Use \"on\" to enable the notification, and \"off\" to disable it."),
                           show_exec_done_display_p,
                           &setlist, &showlist);
 
                           show_exec_done_display_p,
                           &setlist, &showlist);
 

-  add_setshow_auto_boolean_cmd ("interactive-mode", class_support,
-                                &interactive_mode, _("\
-Set whether GDB should run in interactive mode or not"), _("\
-Show whether GDB runs in interactive mode"), _("\
-If on, run in interactive mode and wait for the user to answer\n\
-all queries.  If off, run in non-interactive mode and automatically\n\
-assume the default answer to all queries.  If auto (the default),\n\
-determine which mode to use based on the standard input settings"),
-                        NULL,
-                        show_interactive_mode,
-                        &setlist, &showlist);
-

   add_setshow_filename_cmd ("data-directory", class_maintenance,
                            &gdb_datadir, _("Set GDB's data directory."),
                            _("Show GDB's data directory."),
   add_setshow_filename_cmd ("data-directory", class_maintenance,
                            &gdb_datadir, _("Set GDB's data directory."),
                            _("Show GDB's data directory."),


@@ -1715,7 +1729,7 @@ gdb_init (char *argv0)
   if (pre_init_ui_hook)
     pre_init_ui_hook ();
 
   if (pre_init_ui_hook)
     pre_init_ui_hook ();
 

-  /* Run the init function of each source file */
+  /* Run the init function of each source file.  */

 
 #ifdef __MSDOS__
   /* Make sure we return to the original directory upon exit, come
 
 #ifdef __MSDOS__
   /* Make sure we return to the original directory upon exit, come


@@ -1723,10 +1737,13 @@ gdb_init (char *argv0)
   make_final_cleanup (do_chdir_cleanup, xstrdup (current_directory));
 #endif
 
   make_final_cleanup (do_chdir_cleanup, xstrdup (current_directory));
 #endif
 

-  init_cmd_lists ();           /* This needs to be done first */
-  initialize_targets ();       /* Setup target_terminal macros for utils.c */
-  initialize_utils ();         /* Make errors and warnings possible */
+  init_cmd_lists ();       /* This needs to be done first.  */
+  initialize_targets ();    /* Setup target_terminal macros for utils.c.  */
+  initialize_utils ();     /* Make errors and warnings possible.  */
+
+  /* Here is where we call all the _initialize_foo routines.  */

   initialize_all_files ();
   initialize_all_files ();

+

   /* This creates the current_program_space.  Do this after all the
      _initialize_foo routines have had a chance to install their
      per-sspace data keys.  Also do this before
   /* This creates the current_program_space.  Do this after all the
      _initialize_foo routines have had a chance to install their
      per-sspace data keys.  Also do this before


@@ -1736,21 +1753,30 @@ gdb_init (char *argv0)
   initialize_inferiors ();
   initialize_current_architecture ();
   init_cli_cmds();
   initialize_inferiors ();
   initialize_current_architecture ();
   init_cli_cmds();

-  init_main ();                        /* But that omits this file!  Do it now */
+  init_main ();                        /* But that omits this file!  Do it now.  */

 
   initialize_stdin_serial ();
 
   async_init_signals ();
 
 
   initialize_stdin_serial ();
 
   async_init_signals ();
 

-  /* We need a default language for parsing expressions, so simple things like
-     "set width 0" won't fail if no language is explicitly set in a config file
-     or implicitly set by reading an executable during startup. */
+  /* We need a default language for parsing expressions, so simple
+     things like "set width 0" won't fail if no language is explicitly
+     set in a config file or implicitly set by reading an executable
+     during startup.  */

   set_language (language_c);
   set_language (language_c);

-  expected_language = current_language;                /* don't warn about the change.  */
+  expected_language = current_language;        /* Don't warn about the change.  */

 
 

-  /* Allow another UI to initialize. If the UI fails to initialize,
+  /* Allow another UI to initialize.  If the UI fails to initialize,

      and it wants GDB to revert to the CLI, it should clear
      deprecated_init_ui_hook.  */
   if (deprecated_init_ui_hook)
     deprecated_init_ui_hook (argv0);
      and it wants GDB to revert to the CLI, it should clear
      deprecated_init_ui_hook.  */
   if (deprecated_init_ui_hook)
     deprecated_init_ui_hook (argv0);

+
+#ifdef HAVE_PYTHON
+  /* Python initialization can require various commands to be
+     installed.  For example "info pretty-printer" needs the "info"
+     prefix to be installed.  Keep things simple and just do final
+     python initialization here.  */
+  finish_python_initialization ();
+#endif

 }
 }