Subversion Repositories openrisc

/* GDB hooks for TUI.

   Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008

   Free Software Foundation, Inc.

   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

   the Free Software Foundation; either version 3 of the License, or

   (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

   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */

#include "defs.h"

#include "symtab.h"

#include "inferior.h"

#include "command.h"

#include "bfd.h"

#include "symfile.h"

#include "objfiles.h"

#include "target.h"

#include "gdbcore.h"

#include "event-loop.h"

#include "event-top.h"

#include "frame.h"

#include "breakpoint.h"

#include "gdb-events.h"

#include "ui-out.h"

#include "top.h"

#include "observer.h"

#include <unistd.h>

#include <fcntl.h>

#include "tui/tui.h"

#include "tui/tui-hooks.h"

#include "tui/tui-data.h"

#include "tui/tui-layout.h"

#include "tui/tui-io.h"

#include "tui/tui-regs.h"

#include "tui/tui-win.h"

#include "tui/tui-stack.h"

#include "tui/tui-windata.h"

#include "tui/tui-winsource.h"

#include "gdb_curses.h"

/* This redefines CTRL if it is not already defined, so it must come

   after terminal state releated include files like <term.h> and

   "gdb_curses.h".  */

#include "readline/readline.h"

int tui_target_has_run = 0;

static void

tui_new_objfile_hook (struct objfile* objfile)

{

  if (tui_active)

    tui_display_main ();

}

static int ATTR_FORMAT (printf, 1, 0)

tui_query_hook (const char *msg, va_list argp)

{

  int retval;

  int ans2;

  int answer;

  echo ();

  while (1)

    {

      wrap_here ("");           /* Flush any buffered output.  */

      gdb_flush (gdb_stdout);

      vfprintf_filtered (gdb_stdout, msg, argp);

      printf_filtered (_("(y or n) "));

      wrap_here ("");

      gdb_flush (gdb_stdout);

      answer = tui_getc (stdin);

      clearerr (stdin);         /* in case of C-d */

      if (answer == EOF)        /* C-d */

        {

          retval = 1;

          break;

        }

      /* Eat rest of input line, to EOF or newline.  */

      if (answer != '\n')

        do

          {

            ans2 = tui_getc (stdin);

            clearerr (stdin);

          }

        while (ans2 != EOF && ans2 != '\n' && ans2 != '\r');

      if (answer >= 'a')

        answer -= 040;

      if (answer == 'Y')

        {

          retval = 1;

          break;

        }

      if (answer == 'N')

        {

          retval = 0;

          break;

        }

      printf_filtered (_("Please answer y or n.\n"));

    }

  noecho ();

  return retval;

}

/* Prevent recursion of deprecated_register_changed_hook().  */

static int tui_refreshing_registers = 0;

static void

tui_register_changed_hook (int regno)

{

  struct frame_info *fi;

  fi = get_selected_frame (NULL);

  if (tui_refreshing_registers == 0)

    {

      tui_refreshing_registers = 1;

      tui_check_data_values (fi);

      tui_refreshing_registers = 0;

    }

}

/* Breakpoint creation hook.

   Update the screen to show the new breakpoint.  */

static void

tui_event_create_breakpoint (int number)

{

  tui_update_all_breakpoint_info ();

}

/* Breakpoint deletion hook.

   Refresh the screen to update the breakpoint marks.  */

static void

tui_event_delete_breakpoint (int number)

{

  tui_update_all_breakpoint_info ();

}

static void

tui_event_modify_breakpoint (int number)

{

  tui_update_all_breakpoint_info ();

}

static void

tui_event_default (int number)

{

  ;

}

static struct gdb_events *tui_old_event_hooks;

static struct gdb_events tui_event_hooks = {

  tui_event_create_breakpoint,

  tui_event_delete_breakpoint,

  tui_event_modify_breakpoint,

  tui_event_default,

  tui_event_default,

  tui_event_default

};

/* Called when going to wait for the target.

   Leave curses mode and setup program mode.  */

static ptid_t

tui_target_wait_hook (ptid_t pid,

                      struct target_waitstatus *status)

{

  ptid_t res;

  /* Leave tui mode (optional).  */

#if 0

  if (tui_active)

    {

      target_terminal_ours ();

      endwin ();

      target_terminal_inferior ();

    }

#endif

  tui_target_has_run = 1;

  res = target_wait (pid, status);

  if (tui_active)

    {

      /* TODO: need to refresh (optional).  */

    }

  return res;

}

/* The selected frame has changed.  This is happens after a target

   stop or when the user explicitly changes the frame

   (up/down/thread/...).  */

static void

tui_selected_frame_level_changed_hook (int level)

{

  struct frame_info *fi;

  /* Negative level means that the selected frame was cleared.  */

  if (level < 0)

    return;

  fi = get_selected_frame (NULL);

  /* Ensure that symbols for this frame are read in.  Also, determine

     the source language of this frame, and switch to it if

     desired.  */

  if (fi)

    {

      struct symtab *s;

      s = find_pc_symtab (get_frame_pc (fi));

      /* elz: This if here fixes the problem with the pc not being

         displayed in the tui asm layout, with no debug symbols.  The

         value of s would be 0 here, and select_source_symtab would

         abort the command by calling the 'error' function.  */

      if (s)

        select_source_symtab (s);

      /* Display the frame position (even if there is no symbols).  */

      tui_show_frame_info (fi);

      /* Refresh the register window if it's visible.  */

      if (tui_is_window_visible (DATA_WIN))

        {

          tui_refreshing_registers = 1;

          tui_check_data_values (fi);

          tui_refreshing_registers = 0;

        }

    }

}

/* Called from print_frame_info to list the line we stopped in.  */

static void

tui_print_frame_info_listing_hook (struct symtab *s,

                                   int line,

                                   int stopline,

                                   int noerror)

{

  select_source_symtab (s);

  tui_show_frame_info (get_selected_frame (NULL));

}

/* Called when the target process died or is detached.

   Update the status line.  */

static void

tui_detach_hook (void)

{

  tui_show_frame_info (0);

  tui_display_main ();

}

/* Install the TUI specific hooks.  */

void

tui_install_hooks (void)

{

  deprecated_target_wait_hook = tui_target_wait_hook;

  deprecated_selected_frame_level_changed_hook = tui_selected_frame_level_changed_hook;

  deprecated_print_frame_info_listing_hook = tui_print_frame_info_listing_hook;

  deprecated_query_hook = tui_query_hook;

  /* Install the event hooks.  */

  tui_old_event_hooks = deprecated_set_gdb_event_hooks (&tui_event_hooks);

  deprecated_register_changed_hook = tui_register_changed_hook;

  deprecated_detach_hook = tui_detach_hook;

}

/* Remove the TUI specific hooks.  */

void

tui_remove_hooks (void)

{

  deprecated_target_wait_hook = 0;

  deprecated_selected_frame_level_changed_hook = 0;

  deprecated_print_frame_info_listing_hook = 0;

  deprecated_query_hook = 0;

  deprecated_register_changed_hook = 0;

  deprecated_detach_hook = 0;

  /* Restore the previous event hooks.  */

  deprecated_set_gdb_event_hooks (tui_old_event_hooks);

}

void _initialize_tui_hooks (void);

void

_initialize_tui_hooks (void)

{

  /* Install the permanent hooks.  */

  observer_attach_new_objfile (tui_new_objfile_hook);

}