Commit | Line | Data |
---|---|---|
4a8f6654 AC |
1 | /* Manages interpreters for GDB, the GNU debugger. |
2 | ||
e2882c85 | 3 | Copyright (C) 2000-2018 Free Software Foundation, Inc. |
4a8f6654 AC |
4 | |
5 | Written by Jim Ingham <jingham@apple.com> of Apple Computer, Inc. | |
6 | ||
7 | This file is part of GDB. | |
8 | ||
9 | This program is free software; you can redistribute it and/or modify | |
10 | it under the terms of the GNU General Public License as published by | |
a9762ec7 | 11 | the Free Software Foundation; either version 3 of the License, or |
4a8f6654 AC |
12 | (at your option) any later version. |
13 | ||
14 | This program is distributed in the hope that it will be useful, | |
15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | GNU General Public License for more details. | |
18 | ||
19 | You should have received a copy of the GNU General Public License | |
1777feb0 | 20 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
4a8f6654 AC |
21 | |
22 | #ifndef INTERPS_H | |
23 | #define INTERPS_H | |
24 | ||
25 | struct ui_out; | |
26 | struct interp; | |
8322445e PA |
27 | struct ui; |
28 | ||
29 | typedef struct interp *(*interp_factory_func) (const char *name); | |
30 | ||
31 | /* Each interpreter kind (CLI, MI, etc.) registers itself with a call | |
32 | to this function, passing along its name, and a pointer to a | |
33 | function that creates a new instance of an interpreter with that | |
34 | name. */ | |
35 | extern void interp_factory_register (const char *name, | |
36 | interp_factory_func func); | |
4a8f6654 | 37 | |
71fff37b AC |
38 | extern struct gdb_exception interp_exec (struct interp *interp, |
39 | const char *command); | |
4a8f6654 | 40 | |
d6f9b0fb PA |
41 | class interp |
42 | { | |
43 | public: | |
44 | explicit interp (const char *name); | |
45 | virtual ~interp () = 0; | |
4a8f6654 | 46 | |
d6f9b0fb PA |
47 | virtual void init (bool top_level) |
48 | {} | |
37ce89eb | 49 | |
d6f9b0fb PA |
50 | virtual void resume () = 0; |
51 | virtual void suspend () = 0; | |
3c216924 | 52 | |
d6f9b0fb | 53 | virtual gdb_exception exec (const char *command) = 0; |
4801a9a3 PA |
54 | |
55 | /* Returns the ui_out currently used to collect results for this | |
56 | interpreter. It can be a formatter for stdout, as is the case | |
57 | for the console & mi outputs, or it might be a result | |
58 | formatter. */ | |
d6f9b0fb | 59 | virtual ui_out *interp_ui_out () = 0; |
4801a9a3 | 60 | |
37ce89eb SS |
61 | /* Provides a hook for interpreters to do any additional |
62 | setup/cleanup that they might need when logging is enabled or | |
63 | disabled. */ | |
d6f9b0fb | 64 | virtual void set_logging (ui_file_up logfile, bool logging_redirect) = 0; |
37ce89eb | 65 | |
b2d86570 PA |
66 | /* Called before starting an event loop, to give the interpreter a |
67 | chance to e.g., print a prompt. */ | |
d6f9b0fb PA |
68 | virtual void pre_command_loop () |
69 | {} | |
3c216924 PA |
70 | |
71 | /* Returns true if this interpreter supports using the readline | |
72 | library; false if it uses GDB's own simplified readline | |
73 | emulation. */ | |
d6f9b0fb PA |
74 | virtual bool supports_command_editing () |
75 | { return false; } | |
76 | ||
77 | /* This is the name in "-i=" and "set interpreter". */ | |
78 | const char *name; | |
79 | ||
80 | /* Interpreters are stored in a linked list, this is the next | |
81 | one... */ | |
82 | struct interp *next; | |
83 | ||
84 | /* Has the init method been run? */ | |
85 | bool inited; | |
4a8f6654 AC |
86 | }; |
87 | ||
8322445e | 88 | extern void interp_add (struct ui *ui, struct interp *interp); |
8322445e PA |
89 | |
90 | /* Look up the interpreter for NAME, creating one if none exists yet. | |
91 | If NAME is not a interpreter type previously registered with | |
92 | interp_factory_register, return NULL; otherwise return a pointer to | |
93 | the interpreter. */ | |
94 | extern struct interp *interp_lookup (struct ui *ui, const char *name); | |
95 | ||
60eb5395 PA |
96 | /* Set the current UI's top level interpreter to the interpreter named |
97 | NAME. Throws an error if NAME is not a known interpreter or the | |
98 | interpreter fails to initialize. */ | |
99 | extern void set_top_level_interpreter (const char *name); | |
100 | ||
4a8f6654 | 101 | extern struct ui_out *interp_ui_out (struct interp *interp); |
4801a9a3 | 102 | extern const char *interp_name (struct interp *interp); |
4a8f6654 | 103 | |
be0d7abb TT |
104 | /* Temporarily set the current interpreter, and reset it on |
105 | destruction. */ | |
106 | class scoped_restore_interp | |
107 | { | |
108 | public: | |
109 | ||
110 | scoped_restore_interp (const char *name) | |
111 | : m_interp (set_interp (name)) | |
112 | { | |
113 | } | |
114 | ||
115 | ~scoped_restore_interp () | |
116 | { | |
117 | set_interp (interp_name (m_interp)); | |
118 | } | |
119 | ||
120 | scoped_restore_interp (const scoped_restore_interp &) = delete; | |
121 | scoped_restore_interp &operator= (const scoped_restore_interp &) = delete; | |
122 | ||
123 | private: | |
124 | ||
125 | struct interp *set_interp (const char *name); | |
126 | ||
127 | struct interp *m_interp; | |
128 | }; | |
129 | ||
4a8f6654 | 130 | extern int current_interp_named_p (const char *name); |
92bcb5f9 | 131 | |
37ce89eb SS |
132 | /* Call this function to give the current interpreter an opportunity |
133 | to do any special handling of streams when logging is enabled or | |
616268b6 PA |
134 | disabled. LOGFILE is the stream for the log file when logging is |
135 | starting and is NULL when logging is ending. LOGGING_REDIRECT is | |
136 | the value of the "set logging redirect" setting. If true, the | |
137 | interpreter should configure the output streams to send output only | |
138 | to the logfile. If false, the interpreter should configure the | |
139 | output streams to send output to both the current output stream | |
140 | (i.e., the terminal) and the log file. */ | |
141 | extern void current_interp_set_logging (ui_file_up logfile, | |
142 | bool logging_redirect); | |
37ce89eb | 143 | |
d6f9b0fb | 144 | /* Returns the top-level interpreter. */ |
79a68887 | 145 | extern struct interp *top_level_interpreter (void); |
4a8f6654 | 146 | |
9204d692 PA |
147 | /* Return the current UI's current interpreter. */ |
148 | extern struct interp *current_interpreter (void); | |
149 | ||
17b2616c PA |
150 | extern struct interp *command_interp (void); |
151 | ||
b9362cc7 | 152 | extern void clear_interpreter_hooks (void); |
4a8f6654 | 153 | |
3c216924 PA |
154 | /* Returns true if INTERP supports using the readline library; false |
155 | if it uses GDB's own simplified form of readline. */ | |
156 | extern int interp_supports_command_editing (struct interp *interp); | |
157 | ||
b2d86570 PA |
158 | /* Called before starting an event loop, to give the interpreter a |
159 | chance to e.g., print a prompt. */ | |
160 | extern void interp_pre_command_loop (struct interp *interp); | |
161 | ||
60eb5395 PA |
162 | /* List the possible interpreters which could complete the given |
163 | text. */ | |
eb3ff9a5 PA |
164 | extern void interpreter_completer (struct cmd_list_element *ignore, |
165 | completion_tracker &tracker, | |
166 | const char *text, | |
167 | const char *word); | |
60eb5395 | 168 | |
4a8f6654 AC |
169 | /* well-known interpreters */ |
170 | #define INTERP_CONSOLE "console" | |
171 | #define INTERP_MI1 "mi1" | |
2fcf52f0 AC |
172 | #define INTERP_MI2 "mi2" |
173 | #define INTERP_MI3 "mi3" | |
4a8f6654 | 174 | #define INTERP_MI "mi" |
226361c4 | 175 | #define INTERP_TUI "tui" |
cc4349ed | 176 | #define INTERP_INSIGHT "insight" |
4a8f6654 AC |
177 | |
178 | #endif |