Commit | Line | Data |
---|---|---|
4a8f6654 AC |
1 | /* Manages interpreters for GDB, the GNU debugger. |
2 | ||
42a4f53d | 3 | Copyright (C) 2000-2019 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 | 27 | struct ui; |
0d12e84c | 28 | class completion_tracker; |
8322445e PA |
29 | |
30 | typedef struct interp *(*interp_factory_func) (const char *name); | |
31 | ||
32 | /* Each interpreter kind (CLI, MI, etc.) registers itself with a call | |
33 | to this function, passing along its name, and a pointer to a | |
34 | function that creates a new instance of an interpreter with that | |
35 | name. */ | |
36 | extern void interp_factory_register (const char *name, | |
37 | interp_factory_func func); | |
4a8f6654 | 38 | |
71fff37b AC |
39 | extern struct gdb_exception interp_exec (struct interp *interp, |
40 | const char *command); | |
4a8f6654 | 41 | |
d6f9b0fb PA |
42 | class interp |
43 | { | |
44 | public: | |
45 | explicit interp (const char *name); | |
46 | virtual ~interp () = 0; | |
4a8f6654 | 47 | |
d6f9b0fb PA |
48 | virtual void init (bool top_level) |
49 | {} | |
37ce89eb | 50 | |
d6f9b0fb PA |
51 | virtual void resume () = 0; |
52 | virtual void suspend () = 0; | |
3c216924 | 53 | |
d6f9b0fb | 54 | virtual gdb_exception exec (const char *command) = 0; |
4801a9a3 PA |
55 | |
56 | /* Returns the ui_out currently used to collect results for this | |
57 | interpreter. It can be a formatter for stdout, as is the case | |
58 | for the console & mi outputs, or it might be a result | |
59 | formatter. */ | |
d6f9b0fb | 60 | virtual ui_out *interp_ui_out () = 0; |
4801a9a3 | 61 | |
37ce89eb SS |
62 | /* Provides a hook for interpreters to do any additional |
63 | setup/cleanup that they might need when logging is enabled or | |
64 | disabled. */ | |
ca1285d1 AH |
65 | virtual void set_logging (ui_file_up logfile, bool logging_redirect, |
66 | bool debug_redirect) = 0; | |
37ce89eb | 67 | |
b2d86570 PA |
68 | /* Called before starting an event loop, to give the interpreter a |
69 | chance to e.g., print a prompt. */ | |
d6f9b0fb PA |
70 | virtual void pre_command_loop () |
71 | {} | |
3c216924 PA |
72 | |
73 | /* Returns true if this interpreter supports using the readline | |
74 | library; false if it uses GDB's own simplified readline | |
75 | emulation. */ | |
d6f9b0fb PA |
76 | virtual bool supports_command_editing () |
77 | { return false; } | |
78 | ||
d525a99b TT |
79 | const char *name () const |
80 | { | |
81 | return m_name; | |
82 | } | |
83 | ||
d6f9b0fb | 84 | /* This is the name in "-i=" and "set interpreter". */ |
fbe61a36 GB |
85 | private: |
86 | char *m_name; | |
d6f9b0fb PA |
87 | |
88 | /* Interpreters are stored in a linked list, this is the next | |
89 | one... */ | |
fbe61a36 | 90 | public: |
d6f9b0fb PA |
91 | struct interp *next; |
92 | ||
93 | /* Has the init method been run? */ | |
94 | bool inited; | |
4a8f6654 AC |
95 | }; |
96 | ||
8322445e | 97 | extern void interp_add (struct ui *ui, struct interp *interp); |
8322445e PA |
98 | |
99 | /* Look up the interpreter for NAME, creating one if none exists yet. | |
100 | If NAME is not a interpreter type previously registered with | |
101 | interp_factory_register, return NULL; otherwise return a pointer to | |
102 | the interpreter. */ | |
103 | extern struct interp *interp_lookup (struct ui *ui, const char *name); | |
104 | ||
60eb5395 PA |
105 | /* Set the current UI's top level interpreter to the interpreter named |
106 | NAME. Throws an error if NAME is not a known interpreter or the | |
107 | interpreter fails to initialize. */ | |
108 | extern void set_top_level_interpreter (const char *name); | |
109 | ||
be0d7abb TT |
110 | /* Temporarily set the current interpreter, and reset it on |
111 | destruction. */ | |
112 | class scoped_restore_interp | |
113 | { | |
114 | public: | |
115 | ||
116 | scoped_restore_interp (const char *name) | |
117 | : m_interp (set_interp (name)) | |
118 | { | |
119 | } | |
120 | ||
121 | ~scoped_restore_interp () | |
122 | { | |
d525a99b | 123 | set_interp (m_interp->name ()); |
be0d7abb TT |
124 | } |
125 | ||
126 | scoped_restore_interp (const scoped_restore_interp &) = delete; | |
127 | scoped_restore_interp &operator= (const scoped_restore_interp &) = delete; | |
128 | ||
129 | private: | |
130 | ||
131 | struct interp *set_interp (const char *name); | |
132 | ||
133 | struct interp *m_interp; | |
134 | }; | |
135 | ||
4a8f6654 | 136 | extern int current_interp_named_p (const char *name); |
92bcb5f9 | 137 | |
37ce89eb SS |
138 | /* Call this function to give the current interpreter an opportunity |
139 | to do any special handling of streams when logging is enabled or | |
616268b6 PA |
140 | disabled. LOGFILE is the stream for the log file when logging is |
141 | starting and is NULL when logging is ending. LOGGING_REDIRECT is | |
142 | the value of the "set logging redirect" setting. If true, the | |
143 | interpreter should configure the output streams to send output only | |
144 | to the logfile. If false, the interpreter should configure the | |
145 | output streams to send output to both the current output stream | |
ca1285d1 AH |
146 | (i.e., the terminal) and the log file. DEBUG_REDIRECT is same as |
147 | LOGGING_REDIRECT, but for the value of "set logging debugredirect" | |
148 | instead. */ | |
616268b6 | 149 | extern void current_interp_set_logging (ui_file_up logfile, |
ca1285d1 AH |
150 | bool logging_redirect, |
151 | bool debug_redirect); | |
37ce89eb | 152 | |
d6f9b0fb | 153 | /* Returns the top-level interpreter. */ |
79a68887 | 154 | extern struct interp *top_level_interpreter (void); |
4a8f6654 | 155 | |
9204d692 PA |
156 | /* Return the current UI's current interpreter. */ |
157 | extern struct interp *current_interpreter (void); | |
158 | ||
17b2616c PA |
159 | extern struct interp *command_interp (void); |
160 | ||
b9362cc7 | 161 | extern void clear_interpreter_hooks (void); |
4a8f6654 | 162 | |
3c216924 PA |
163 | /* Returns true if INTERP supports using the readline library; false |
164 | if it uses GDB's own simplified form of readline. */ | |
165 | extern int interp_supports_command_editing (struct interp *interp); | |
166 | ||
b2d86570 PA |
167 | /* Called before starting an event loop, to give the interpreter a |
168 | chance to e.g., print a prompt. */ | |
169 | extern void interp_pre_command_loop (struct interp *interp); | |
170 | ||
60eb5395 PA |
171 | /* List the possible interpreters which could complete the given |
172 | text. */ | |
eb3ff9a5 PA |
173 | extern void interpreter_completer (struct cmd_list_element *ignore, |
174 | completion_tracker &tracker, | |
175 | const char *text, | |
176 | const char *word); | |
60eb5395 | 177 | |
4a8f6654 AC |
178 | /* well-known interpreters */ |
179 | #define INTERP_CONSOLE "console" | |
180 | #define INTERP_MI1 "mi1" | |
2fcf52f0 AC |
181 | #define INTERP_MI2 "mi2" |
182 | #define INTERP_MI3 "mi3" | |
4a8f6654 | 183 | #define INTERP_MI "mi" |
226361c4 | 184 | #define INTERP_TUI "tui" |
cc4349ed | 185 | #define INTERP_INSIGHT "insight" |
4a8f6654 AC |
186 | |
187 | #endif |