3 Copyright (C) 2001-2014 Free Software Foundation, Inc.
5 This file is part of GDB.
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 3 of the License, or
10 (at your option) any later version.
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.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
29 #include "event-loop.h"
30 #include "event-top.h"
32 #include "breakpoint.h"
40 #include "tui/tui-hooks.h"
41 #include "tui/tui-data.h"
42 #include "tui/tui-layout.h"
43 #include "tui/tui-io.h"
44 #include "tui/tui-regs.h"
45 #include "tui/tui-win.h"
46 #include "tui/tui-stack.h"
47 #include "tui/tui-windata.h"
48 #include "tui/tui-winsource.h"
50 #include "gdb_curses.h"
52 /* This redefines CTRL if it is not already defined, so it must come
53 after terminal state releated include files like <term.h> and
55 #include "readline/readline.h"
57 int tui_target_has_run
= 0;
60 tui_new_objfile_hook (struct objfile
* objfile
)
66 static int ATTRIBUTE_PRINTF (1, 0)
67 tui_query_hook (const char *msg
, va_list argp
)
73 struct cleanup
*old_chain
;
75 /* Format the question outside of the loop, to avoid reusing
77 question
= xstrvprintf (msg
, argp
);
78 old_chain
= make_cleanup (xfree
, question
);
83 wrap_here (""); /* Flush any buffered output. */
84 gdb_flush (gdb_stdout
);
86 fputs_filtered (question
, gdb_stdout
);
87 printf_filtered (_("(y or n) "));
90 gdb_flush (gdb_stdout
);
92 answer
= tui_getc (stdin
);
93 clearerr (stdin
); /* in case of C-d */
94 if (answer
== EOF
) /* C-d */
99 /* Eat rest of input line, to EOF or newline. */
103 ans2
= tui_getc (stdin
);
106 while (ans2
!= EOF
&& ans2
!= '\n' && ans2
!= '\r');
120 printf_filtered (_("Please answer y or n.\n"));
124 do_cleanups (old_chain
);
128 /* Prevent recursion of deprecated_register_changed_hook(). */
129 static int tui_refreshing_registers
= 0;
132 tui_register_changed_hook (int regno
)
134 struct frame_info
*fi
;
136 fi
= get_selected_frame (NULL
);
137 if (tui_refreshing_registers
== 0)
139 tui_refreshing_registers
= 1;
140 tui_check_data_values (fi
);
141 tui_refreshing_registers
= 0;
145 /* Breakpoint creation hook.
146 Update the screen to show the new breakpoint. */
148 tui_event_create_breakpoint (struct breakpoint
*b
)
150 tui_update_all_breakpoint_info ();
153 /* Breakpoint deletion hook.
154 Refresh the screen to update the breakpoint marks. */
156 tui_event_delete_breakpoint (struct breakpoint
*b
)
158 tui_update_all_breakpoint_info ();
162 tui_event_modify_breakpoint (struct breakpoint
*b
)
164 tui_update_all_breakpoint_info ();
167 /* Called when a command is about to proceed the inferior. */
170 tui_about_to_proceed (void)
172 /* Leave tui mode (optional). */
176 target_terminal_ours ();
178 target_terminal_inferior ();
181 tui_target_has_run
= 1;
184 /* The selected frame has changed. This is happens after a target
185 stop or when the user explicitly changes the frame
186 (up/down/thread/...). */
188 tui_selected_frame_level_changed_hook (int level
)
190 struct frame_info
*fi
;
193 /* Negative level means that the selected frame was cleared. */
197 fi
= get_selected_frame (NULL
);
198 /* Ensure that symbols for this frame are read in. Also, determine
199 the source language of this frame, and switch to it if
201 if (get_frame_pc_if_available (fi
, &pc
))
205 s
= find_pc_symtab (pc
);
206 /* elz: This if here fixes the problem with the pc not being
207 displayed in the tui asm layout, with no debug symbols. The
208 value of s would be 0 here, and select_source_symtab would
209 abort the command by calling the 'error' function. */
211 select_source_symtab (s
);
214 /* Display the frame position (even if there is no symbols or the PC
216 tui_show_frame_info (fi
);
218 /* Refresh the register window if it's visible. */
219 if (tui_is_window_visible (DATA_WIN
))
221 tui_refreshing_registers
= 1;
222 tui_check_data_values (fi
);
223 tui_refreshing_registers
= 0;
227 /* Called from print_frame_info to list the line we stopped in. */
229 tui_print_frame_info_listing_hook (struct symtab
*s
,
234 select_source_symtab (s
);
235 tui_show_frame_info (get_selected_frame (NULL
));
238 /* Perform all necessary cleanups regarding our module's inferior data
239 that is required after the inferior INF just exited. */
242 tui_inferior_exit (struct inferior
*inf
)
244 /* Leave the SingleKey mode to make sure the gdb prompt is visible. */
245 tui_set_key_mode (TUI_COMMAND_MODE
);
246 tui_show_frame_info (0);
250 /* Observers created when installing TUI hooks. */
251 static struct observer
*tui_bp_created_observer
;
252 static struct observer
*tui_bp_deleted_observer
;
253 static struct observer
*tui_bp_modified_observer
;
254 static struct observer
*tui_inferior_exit_observer
;
255 static struct observer
*tui_about_to_proceed_observer
;
257 /* Install the TUI specific hooks. */
259 tui_install_hooks (void)
261 deprecated_selected_frame_level_changed_hook
262 = tui_selected_frame_level_changed_hook
;
263 deprecated_print_frame_info_listing_hook
264 = tui_print_frame_info_listing_hook
;
266 deprecated_query_hook
= tui_query_hook
;
268 /* Install the event hooks. */
269 tui_bp_created_observer
270 = observer_attach_breakpoint_created (tui_event_create_breakpoint
);
271 tui_bp_deleted_observer
272 = observer_attach_breakpoint_deleted (tui_event_delete_breakpoint
);
273 tui_bp_modified_observer
274 = observer_attach_breakpoint_modified (tui_event_modify_breakpoint
);
275 tui_inferior_exit_observer
276 = observer_attach_inferior_exit (tui_inferior_exit
);
277 tui_about_to_proceed_observer
278 = observer_attach_about_to_proceed (tui_about_to_proceed
);
280 deprecated_register_changed_hook
= tui_register_changed_hook
;
283 /* Remove the TUI specific hooks. */
285 tui_remove_hooks (void)
287 deprecated_selected_frame_level_changed_hook
= 0;
288 deprecated_print_frame_info_listing_hook
= 0;
289 deprecated_query_hook
= 0;
290 deprecated_register_changed_hook
= 0;
292 /* Remove our observers. */
293 observer_detach_breakpoint_created (tui_bp_created_observer
);
294 tui_bp_created_observer
= NULL
;
295 observer_detach_breakpoint_deleted (tui_bp_deleted_observer
);
296 tui_bp_deleted_observer
= NULL
;
297 observer_detach_breakpoint_modified (tui_bp_modified_observer
);
298 tui_bp_modified_observer
= NULL
;
299 observer_detach_inferior_exit (tui_inferior_exit_observer
);
300 tui_inferior_exit_observer
= NULL
;
301 observer_detach_about_to_proceed (tui_about_to_proceed_observer
);
302 tui_about_to_proceed_observer
= NULL
;
305 void _initialize_tui_hooks (void);
308 _initialize_tui_hooks (void)
310 /* Install the permanent hooks. */
311 observer_attach_new_objfile (tui_new_objfile_hook
);