tui-hooks.c revision 130804 
1/* GDB hooks for TUI.
2
3   Copyright 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
4
5   This file is part of GDB.
6
7   This program is free software; you can redistribute it and/or modify
8   it under the terms of the GNU General Public License as published by
9   the Free Software Foundation; either version 2 of the License, or
10   (at your option) any later version.
11
12   This program is distributed in the hope that it will be useful,
13   but WITHOUT ANY WARRANTY; without even the implied warranty of
14   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15   GNU General Public License for more details.
16
17   You should have received a copy of the GNU General Public License
18   along with this program; if not, write to the Free Software
19   Foundation, Inc., 59 Temple Place - Suite 330,
20   Boston, MA 02111-1307, USA.  */
21
22#include "defs.h"
23#include "symtab.h"
24#include "inferior.h"
25#include "command.h"
26#include "bfd.h"
27#include "symfile.h"
28#include "objfiles.h"
29#include "target.h"
30#include "gdbcore.h"
31#include "event-loop.h"
32#include "event-top.h"
33#include "frame.h"
34#include "breakpoint.h"
35#include "gdb-events.h"
36#include "ui-out.h"
37#include "top.h"
38#include "readline/readline.h"
39#include <unistd.h>
40#include <fcntl.h>
41
42#include "tui/tui.h"
43#include "tui/tui-hooks.h"
44#include "tui/tui-data.h"
45#include "tui/tui-layout.h"
46#include "tui/tui-io.h"
47#include "tui/tui-regs.h"
48#include "tui/tui-win.h"
49#include "tui/tui-stack.h"
50#include "tui/tui-windata.h"
51#include "tui/tui-winsource.h"
52
53#include "gdb_curses.h"
54
55int tui_target_has_run = 0;
56
57static void (* tui_target_new_objfile_chain) (struct objfile*);
58
59static void
60tui_new_objfile_hook (struct objfile* objfile)
61{
62  if (tui_active)
63    tui_display_main ();
64
65  if (tui_target_new_objfile_chain)
66    tui_target_new_objfile_chain (objfile);
67}
68
69static int
70tui_query_hook (const char * msg, va_list argp)
71{
72  int retval;
73  int ans2;
74  int answer;
75
76  /* Automatically answer "yes" if input is not from a terminal.  */
77  if (!input_from_terminal_p ())
78    return 1;
79
80  echo ();
81  while (1)
82    {
83      wrap_here ("");		/* Flush any buffered output */
84      gdb_flush (gdb_stdout);
85
86      vfprintf_filtered (gdb_stdout, msg, argp);
87      printf_filtered ("(y or n) ");
88
89      wrap_here ("");
90      gdb_flush (gdb_stdout);
91
92      answer = tui_getc (stdin);
93      clearerr (stdin);		/* in case of C-d */
94      if (answer == EOF)	/* C-d */
95	{
96	  retval = 1;
97	  break;
98	}
99      /* Eat rest of input line, to EOF or newline */
100      if (answer != '\n')
101	do
102	  {
103            ans2 = tui_getc (stdin);
104	    clearerr (stdin);
105	  }
106	while (ans2 != EOF && ans2 != '\n' && ans2 != '\r');
107
108      if (answer >= 'a')
109	answer -= 040;
110      if (answer == 'Y')
111	{
112	  retval = 1;
113	  break;
114	}
115      if (answer == 'N')
116	{
117	  retval = 0;
118	  break;
119	}
120      printf_filtered ("Please answer y or n.\n");
121    }
122  noecho ();
123  return retval;
124}
125
126/* Prevent recursion of registers_changed_hook().  */
127static int tui_refreshing_registers = 0;
128
129static void
130tui_registers_changed_hook (void)
131{
132  struct frame_info *fi;
133
134  fi = deprecated_selected_frame;
135  if (fi && tui_refreshing_registers == 0)
136    {
137      tui_refreshing_registers = 1;
138#if 0
139      tui_check_data_values (fi);
140#endif
141      tui_refreshing_registers = 0;
142    }
143}
144
145static void
146tui_register_changed_hook (int regno)
147{
148  struct frame_info *fi;
149
150  fi = deprecated_selected_frame;
151  if (fi && tui_refreshing_registers == 0)
152    {
153      tui_refreshing_registers = 1;
154      tui_check_data_values (fi);
155      tui_refreshing_registers = 0;
156    }
157}
158
159/* Breakpoint creation hook.
160   Update the screen to show the new breakpoint.  */
161static void
162tui_event_create_breakpoint (int number)
163{
164  tui_update_all_breakpoint_info ();
165}
166
167/* Breakpoint deletion hook.
168   Refresh the screen to update the breakpoint marks.  */
169static void
170tui_event_delete_breakpoint (int number)
171{
172  tui_update_all_breakpoint_info ();
173}
174
175static void
176tui_event_modify_breakpoint (int number)
177{
178  tui_update_all_breakpoint_info ();
179}
180
181static void
182tui_event_default (int number)
183{
184  ;
185}
186
187static struct gdb_events *tui_old_event_hooks;
188
189static struct gdb_events tui_event_hooks =
190{
191  tui_event_create_breakpoint,
192  tui_event_delete_breakpoint,
193  tui_event_modify_breakpoint,
194  tui_event_default,
195  tui_event_default,
196  tui_event_default
197};
198
199/* Called when going to wait for the target.
200   Leave curses mode and setup program mode.  */
201static ptid_t
202tui_target_wait_hook (ptid_t pid, struct target_waitstatus *status)
203{
204  ptid_t res;
205
206  /* Leave tui mode (optional).  */
207#if 0
208  if (tui_active)
209    {
210      target_terminal_ours ();
211      endwin ();
212      target_terminal_inferior ();
213    }
214#endif
215  tui_target_has_run = 1;
216  res = target_wait (pid, status);
217
218  if (tui_active)
219    {
220      /* TODO: need to refresh (optional).  */
221    }
222  return res;
223}
224
225/* The selected frame has changed.  This is happens after a target
226   stop or when the user explicitly changes the frame (up/down/thread/...).  */
227static void
228tui_selected_frame_level_changed_hook (int level)
229{
230  struct frame_info *fi;
231
232  fi = deprecated_selected_frame;
233  /* Ensure that symbols for this frame are read in.  Also, determine the
234     source language of this frame, and switch to it if desired.  */
235  if (fi)
236    {
237      struct symtab *s;
238
239      s = find_pc_symtab (get_frame_pc (fi));
240      /* elz: this if here fixes the problem with the pc not being displayed
241         in the tui asm layout, with no debug symbols. The value of s
242         would be 0 here, and select_source_symtab would abort the
243         command by calling the 'error' function */
244      if (s)
245        select_source_symtab (s);
246
247      /* Display the frame position (even if there is no symbols).  */
248      tui_show_frame_info (fi);
249
250      /* Refresh the register window if it's visible.  */
251      if (tui_is_window_visible (DATA_WIN))
252        {
253          tui_refreshing_registers = 1;
254          tui_check_data_values (fi);
255          tui_refreshing_registers = 0;
256        }
257    }
258}
259
260/* Called from print_frame_info to list the line we stopped in.  */
261static void
262tui_print_frame_info_listing_hook (struct symtab *s, int line,
263                                   int stopline, int noerror)
264{
265  select_source_symtab (s);
266  tui_show_frame_info (deprecated_selected_frame);
267}
268
269/* Called when the target process died or is detached.
270   Update the status line.  */
271static void
272tui_detach_hook (void)
273{
274  tui_show_frame_info (0);
275  tui_display_main ();
276}
277
278/* Install the TUI specific hooks.  */
279void
280tui_install_hooks (void)
281{
282  target_wait_hook = tui_target_wait_hook;
283  selected_frame_level_changed_hook = tui_selected_frame_level_changed_hook;
284  print_frame_info_listing_hook = tui_print_frame_info_listing_hook;
285
286  query_hook = tui_query_hook;
287
288  /* Install the event hooks.  */
289  tui_old_event_hooks = set_gdb_event_hooks (&tui_event_hooks);
290
291  registers_changed_hook = tui_registers_changed_hook;
292  register_changed_hook = tui_register_changed_hook;
293  detach_hook = tui_detach_hook;
294}
295
296/* Remove the TUI specific hooks.  */
297void
298tui_remove_hooks (void)
299{
300  target_wait_hook = 0;
301  selected_frame_level_changed_hook = 0;
302  print_frame_info_listing_hook = 0;
303  query_hook = 0;
304  registers_changed_hook = 0;
305  register_changed_hook = 0;
306  detach_hook = 0;
307
308  /* Restore the previous event hooks.  */
309  set_gdb_event_hooks (tui_old_event_hooks);
310}
311
312void _initialize_tui_hooks (void);
313
314void
315_initialize_tui_hooks (void)
316{
317  /* Install the permanent hooks.  */
318  tui_target_new_objfile_chain = target_new_objfile_hook;
319  target_new_objfile_hook = tui_new_objfile_hook;
320}
321