target_stack -> current_top_target() throughout
[external/binutils.git] / gdb / mi / mi-cmd-catch.c
1 /* MI Command Set - catch commands.
2    Copyright (C) 2012-2018 Free Software Foundation, Inc.
3
4    Contributed by Intel Corporation.
5
6    This file is part of GDB.
7
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.
12
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.
17
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/>.  */
20
21 #include "defs.h"
22 #include "arch-utils.h"
23 #include "breakpoint.h"
24 #include "ada-lang.h"
25 #include "mi-cmds.h"
26 #include "mi-getopt.h"
27 #include "mi-cmd-break.h"
28
29 /* Handler for the -catch-assert command.  */
30
31 void
32 mi_cmd_catch_assert (const char *cmd, char *argv[], int argc)
33 {
34   struct gdbarch *gdbarch = get_current_arch();
35   std::string condition;
36   int enabled = 1;
37   int temp = 0;
38
39   int oind = 0;
40   char *oarg;
41
42   enum opt
43     {
44       OPT_CONDITION, OPT_DISABLED, OPT_TEMP,
45     };
46   static const struct mi_opt opts[] =
47     {
48       { "c", OPT_CONDITION, 1},
49       { "d", OPT_DISABLED, 0 },
50       { "t", OPT_TEMP, 0 },
51       { 0, 0, 0 }
52     };
53
54   for (;;)
55     {
56       int opt = mi_getopt ("-catch-assert", argc, argv, opts,
57                            &oind, &oarg);
58
59       if (opt < 0)
60         break;
61
62       switch ((enum opt) opt)
63         {
64         case OPT_CONDITION:
65           condition.assign (oarg);
66           break;
67         case OPT_DISABLED:
68           enabled = 0;
69           break;
70         case OPT_TEMP:
71           temp = 1;
72           break;
73         }
74     }
75
76   /* This command does not accept any argument.  Make sure the user
77      did not provide any.  */
78   if (oind != argc)
79     error (_("Invalid argument: %s"), argv[oind]);
80
81   scoped_restore restore_breakpoint_reporting = setup_breakpoint_reporting ();
82   create_ada_exception_catchpoint (gdbarch, ada_catch_assert, std::string (),
83                                    condition, temp, enabled, 0);
84 }
85
86 /* Handler for the -catch-exception command.  */
87
88 void
89 mi_cmd_catch_exception (const char *cmd, char *argv[], int argc)
90 {
91   struct gdbarch *gdbarch = get_current_arch();
92   std::string condition;
93   int enabled = 1;
94   std::string exception_name;
95   int temp = 0;
96   enum ada_exception_catchpoint_kind ex_kind = ada_catch_exception;
97
98   int oind = 0;
99   char *oarg;
100
101   enum opt
102     {
103       OPT_CONDITION, OPT_DISABLED, OPT_EXCEPTION_NAME, OPT_TEMP,
104       OPT_UNHANDLED,
105     };
106   static const struct mi_opt opts[] =
107     {
108       { "c", OPT_CONDITION, 1},
109       { "d", OPT_DISABLED, 0 },
110       { "e", OPT_EXCEPTION_NAME, 1 },
111       { "t", OPT_TEMP, 0 },
112       { "u", OPT_UNHANDLED, 0},
113       { 0, 0, 0 }
114     };
115
116   for (;;)
117     {
118       int opt = mi_getopt ("-catch-exception", argc, argv, opts,
119                            &oind, &oarg);
120
121       if (opt < 0)
122         break;
123
124       switch ((enum opt) opt)
125         {
126         case OPT_CONDITION:
127           condition.assign (oarg);
128           break;
129         case OPT_DISABLED:
130           enabled = 0;
131           break;
132         case OPT_EXCEPTION_NAME:
133           exception_name = oarg;
134           break;
135         case OPT_TEMP:
136           temp = 1;
137           break;
138         case OPT_UNHANDLED:
139           ex_kind = ada_catch_exception_unhandled;
140           break;
141         }
142     }
143
144   /* This command does not accept any argument.  Make sure the user
145      did not provide any.  */
146   if (oind != argc)
147     error (_("Invalid argument: %s"), argv[oind]);
148
149   /* Specifying an exception name does not make sense when requesting
150      an unhandled exception breakpoint.  */
151   if (ex_kind == ada_catch_exception_unhandled && !exception_name.empty ())
152     error (_("\"-e\" and \"-u\" are mutually exclusive"));
153
154   scoped_restore restore_breakpoint_reporting = setup_breakpoint_reporting ();
155   create_ada_exception_catchpoint (gdbarch, ex_kind,
156                                    exception_name,
157                                    condition, temp, enabled, 0);
158 }
159
160 /* Handler for the -catch-handlers command.  */
161
162 void
163 mi_cmd_catch_handlers (const char *cmd, char *argv[], int argc)
164 {
165   struct gdbarch *gdbarch = get_current_arch ();
166   std::string condition;
167   int enabled = 1;
168   std::string exception_name;
169   int temp = 0;
170
171   int oind = 0;
172   char *oarg;
173
174   enum opt
175     {
176       OPT_CONDITION, OPT_DISABLED, OPT_EXCEPTION_NAME, OPT_TEMP
177     };
178   static const struct mi_opt opts[] =
179     {
180       { "c", OPT_CONDITION, 1},
181       { "d", OPT_DISABLED, 0 },
182       { "e", OPT_EXCEPTION_NAME, 1 },
183       { "t", OPT_TEMP, 0 },
184       { 0, 0, 0 }
185     };
186
187   for (;;)
188     {
189       int opt = mi_getopt ("-catch-handlers", argc, argv, opts,
190                            &oind, &oarg);
191
192       if (opt < 0)
193         break;
194
195       switch ((enum opt) opt)
196         {
197         case OPT_CONDITION:
198           condition.assign (oarg);
199           break;
200         case OPT_DISABLED:
201           enabled = 0;
202           break;
203         case OPT_EXCEPTION_NAME:
204           exception_name = oarg;
205           break;
206         case OPT_TEMP:
207           temp = 1;
208           break;
209         }
210     }
211
212   /* This command does not accept any argument.  Make sure the user
213      did not provide any.  */
214   if (oind != argc)
215     error (_("Invalid argument: %s"), argv[oind]);
216
217   scoped_restore restore_breakpoint_reporting
218     = setup_breakpoint_reporting ();
219   create_ada_exception_catchpoint (gdbarch, ada_catch_handlers,
220                                    exception_name,
221                                    condition, temp, enabled, 0);
222 }
223
224 /* Common path for the -catch-load and -catch-unload.  */
225
226 static void
227 mi_catch_load_unload (int load, char *argv[], int argc)
228 {
229   const char *actual_cmd = load ? "-catch-load" : "-catch-unload";
230   int temp = 0;
231   int enabled = 1;
232   int oind = 0;
233   char *oarg;
234   enum opt
235     {
236       OPT_TEMP,
237       OPT_DISABLED,
238     };
239   static const struct mi_opt opts[] =
240     {
241       { "t", OPT_TEMP, 0 },
242       { "d", OPT_DISABLED, 0 },
243       { 0, 0, 0 }
244     };
245
246   for (;;)
247     {
248       int opt = mi_getopt (actual_cmd, argc, argv, opts,
249                            &oind, &oarg);
250
251       if (opt < 0)
252         break;
253
254       switch ((enum opt) opt)
255         {
256         case OPT_TEMP:
257           temp = 1;
258           break;
259         case OPT_DISABLED:
260           enabled = 0;
261           break;
262         }
263     }
264
265   if (oind >= argc)
266     error (_("-catch-load/unload: Missing <library name>"));
267   if (oind < argc -1)
268     error (_("-catch-load/unload: Garbage following the <library name>"));
269
270   scoped_restore restore_breakpoint_reporting = setup_breakpoint_reporting ();
271   add_solib_catchpoint (argv[oind], load, temp, enabled);
272 }
273
274 /* Handler for the -catch-load.  */
275
276 void
277 mi_cmd_catch_load (const char *cmd, char *argv[], int argc)
278 {
279   mi_catch_load_unload (1, argv, argc);
280 }
281
282
283 /* Handler for the -catch-unload.  */
284
285 void
286 mi_cmd_catch_unload (const char *cmd, char *argv[], int argc)
287 {
288   mi_catch_load_unload (0, argv, argc);
289 }
290