1 /* TUI Interpreter definitions for GDB, the GNU debugger.
3 Copyright (C) 2003, 2007, 2008, 2009, 2010, 2011
4 Free Software Foundation, Inc.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>. */
24 #include "event-top.h"
25 #include "event-loop.h"
28 #include "tui/tui-data.h"
29 #include "readline/readline.h"
30 #include "tui/tui-win.h"
32 #include "tui/tui-io.h"
33 #include "exceptions.h"
35 /* Set to 1 when the TUI mode must be activated when we first start
37 static int tui_start_enabled
= 0;
39 /* Cleanup the tui before exiting. */
44 /* Disable the tui. Curses mode is left leaving the screen in a
45 clean state (see endwin()). */
49 /* True if TUI is the top-level interpreter. */
50 static int tui_is_toplevel
= 0;
52 /* These implement the TUI interpreter. */
55 tui_init (int top_level
)
57 tui_is_toplevel
= top_level
;
59 /* Install exit handler to leave the screen in a good shape. */
62 tui_initialize_static_data ();
65 tui_initialize_win ();
66 if (ui_file_isatty (gdb_stdout
))
67 tui_initialize_readline ();
72 /* True if enabling the TUI is allowed. Example, if the top level
73 interpreter is MI, enabling curses will certainly lose. */
78 /* Only if TUI is the top level interpreter. Also don't try to
79 setup curses (and print funny control characters) if we're not
80 outputting to a terminal. */
81 return tui_is_toplevel
&& ui_file_isatty (gdb_stdout
);
85 tui_resume (void *data
)
87 struct ui_file
*stream
;
89 /* gdb_setup_readline will change gdb_stdout. If the TUI was
90 previously writing to gdb_stdout, then set it to the new
91 gdb_stdout afterwards. */
93 stream
= cli_out_set_stream (tui_old_uiout
, gdb_stdout
);
94 if (stream
!= gdb_stdout
)
96 cli_out_set_stream (tui_old_uiout
, stream
);
100 gdb_setup_readline ();
103 cli_out_set_stream (tui_old_uiout
, gdb_stdout
);
105 if (tui_start_enabled
)
111 tui_suspend (void *data
)
113 tui_start_enabled
= tui_active
;
118 /* Display the prompt if we are silent. */
121 tui_display_prompt_p (void *data
)
123 if (interp_quiet_p (NULL
))
129 static struct gdb_exception
130 tui_exec (void *data
, const char *command_str
)
132 internal_error (__FILE__
, __LINE__
, _("tui_exec called"));
135 /* Provide a prototype to silence -Wmissing-prototypes. */
136 extern initialize_file_ftype _initialize_tui_interp
;
139 _initialize_tui_interp (void)
141 static const struct interp_procs procs
= {
146 tui_display_prompt_p
,
149 /* Create a default uiout builder for the TUI. */
150 tui_out
= tui_out_new (gdb_stdout
);
151 interp_add (interp_new (INTERP_TUI
, NULL
, tui_out
, &procs
));
152 if (interpreter_p
&& strcmp (interpreter_p
, INTERP_TUI
) == 0)
153 tui_start_enabled
= 1;
155 if (interpreter_p
&& strcmp (interpreter_p
, INTERP_CONSOLE
) == 0)
157 xfree (interpreter_p
);
158 interpreter_p
= xstrdup (INTERP_TUI
);