1 /* MI Command Set - breakpoint and watchpoint commands.
2 Copyright (C) 2000-2017 Free Software Foundation, Inc.
3 Contributed by Cygnus Solutions (a Red Hat company).
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/>. */
21 #include "arch-utils.h"
25 #include "breakpoint.h"
26 #include "mi-getopt.h"
29 #include "mi-cmd-break.h"
33 #include "gdb_obstack.h"
41 /* True if MI breakpoint observers have been registered. */
43 static int mi_breakpoint_observers_installed;
45 /* Control whether breakpoint_notify may act. */
47 static int mi_can_breakpoint_notify;
49 /* Output a single breakpoint, when allowed. */
52 breakpoint_notify (struct breakpoint *b)
54 if (mi_can_breakpoint_notify)
60 CATCH (ex, RETURN_MASK_ALL)
62 exception_print (gdb_stderr, ex);
75 /* Arrange for all new breakpoints and catchpoints to be reported to
76 CURRENT_UIOUT until the destructor of the returned scoped_restore
79 Note that MI output will be probably invalid if more than one
80 breakpoint is created inside one MI command. */
82 scoped_restore_tmpl<int>
83 setup_breakpoint_reporting (void)
85 if (! mi_breakpoint_observers_installed)
87 observer_attach_breakpoint_created (breakpoint_notify);
88 mi_breakpoint_observers_installed = 1;
91 return make_scoped_restore (&mi_can_breakpoint_notify, 1);
95 /* Convert arguments in ARGV to the string in "format",argv,argv...
99 mi_argv_to_format (char **argv, int argc)
104 /* Convert ARGV[OIND + 1] to format string and save to FORMAT. */
106 for (i = 0; i < strlen (argv[0]); i++)
138 if (isprint (argv[0][i]))
139 result += argv[0][i];
144 xsnprintf (tmp, sizeof (tmp), "\\%o",
145 (unsigned char) argv[0][i]);
153 /* Apply other argv to FORMAT. */
154 for (i = 1; i < argc; i++)
163 /* Insert breakpoint.
164 If dprintf is true, it will insert dprintf.
165 If not, it will insert other type breakpoint. */
168 mi_cmd_break_insert_1 (int dprintf, const char *command, char **argv, int argc)
170 const char *address = NULL;
174 int ignore_count = 0;
175 char *condition = NULL;
179 enum bptype type_wanted;
180 event_location_up location;
181 struct breakpoint_ops *ops;
183 struct explicit_location explicit_loc;
184 std::string extra_string;
188 HARDWARE_OPT, TEMP_OPT, CONDITION_OPT,
189 IGNORE_COUNT_OPT, THREAD_OPT, PENDING_OPT, DISABLE_OPT,
191 EXPLICIT_SOURCE_OPT, EXPLICIT_FUNC_OPT,
192 EXPLICIT_LABEL_OPT, EXPLICIT_LINE_OPT
194 static const struct mi_opt opts[] =
196 {"h", HARDWARE_OPT, 0},
198 {"c", CONDITION_OPT, 1},
199 {"i", IGNORE_COUNT_OPT, 1},
200 {"p", THREAD_OPT, 1},
201 {"f", PENDING_OPT, 0},
202 {"d", DISABLE_OPT, 0},
203 {"a", TRACEPOINT_OPT, 0},
204 {"-source" , EXPLICIT_SOURCE_OPT, 1},
205 {"-function", EXPLICIT_FUNC_OPT, 1},
206 {"-label", EXPLICIT_LABEL_OPT, 1},
207 {"-line", EXPLICIT_LINE_OPT, 1},
211 /* Parse arguments. It could be -r or -h or -t, <location> or ``--''
212 to denote the end of the option list. */
216 initialize_explicit_location (&explicit_loc);
220 int opt = mi_getopt ("-break-insert", argc, argv,
224 switch ((enum opt) opt)
235 case IGNORE_COUNT_OPT:
236 ignore_count = atol (oarg);
239 thread = atol (oarg);
250 case EXPLICIT_SOURCE_OPT:
252 explicit_loc.source_filename = oarg;
254 case EXPLICIT_FUNC_OPT:
256 explicit_loc.function_name = oarg;
258 case EXPLICIT_LABEL_OPT:
260 explicit_loc.label_name = oarg;
262 case EXPLICIT_LINE_OPT:
264 explicit_loc.line_offset = linespec_parse_line_offset (oarg);
269 if (oind >= argc && !is_explicit)
270 error (_("-%s-insert: Missing <location>"),
271 dprintf ? "dprintf" : "break");
274 int format_num = is_explicit ? oind : oind + 1;
276 if (hardware || tracepoint)
277 error (_("-dprintf-insert: does not support -h or -a"));
278 if (format_num >= argc)
279 error (_("-dprintf-insert: Missing <format>"));
281 extra_string = mi_argv_to_format (argv + format_num, argc - format_num);
282 address = argv[oind];
289 error (_("-break-insert: Garbage following explicit location"));
294 error (_("-break-insert: Garbage following <location>"));
295 address = argv[oind];
299 /* Now we have what we need, let's insert the breakpoint! */
300 scoped_restore restore_breakpoint_reporting = setup_breakpoint_reporting ();
304 /* Note that to request a fast tracepoint, the client uses the
305 "hardware" flag, although there's nothing of hardware related to
306 fast tracepoints -- one can implement slow tracepoints with
307 hardware breakpoints, but fast tracepoints are always software.
308 "fast" is a misnomer, actually, "jump" would be more appropriate.
309 A simulator or an emulator could conceivably implement fast
310 regular non-jump based tracepoints. */
311 type_wanted = hardware ? bp_fast_tracepoint : bp_tracepoint;
312 ops = &tracepoint_breakpoint_ops;
316 type_wanted = bp_dprintf;
317 ops = &dprintf_breakpoint_ops;
321 type_wanted = hardware ? bp_hardware_breakpoint : bp_breakpoint;
322 ops = &bkpt_breakpoint_ops;
327 /* Error check -- we must have one of the other
328 parameters specified. */
329 if (explicit_loc.source_filename != NULL
330 && explicit_loc.function_name == NULL
331 && explicit_loc.label_name == NULL
332 && explicit_loc.line_offset.sign == LINE_OFFSET_UNKNOWN)
333 error (_("-%s-insert: --source option requires --function, --label,"
334 " or --line"), dprintf ? "dprintf" : "break");
336 location = new_explicit_location (&explicit_loc);
340 location = string_to_event_location_basic (&address, current_language);
342 error (_("Garbage '%s' at end of location"), address);
345 create_breakpoint (get_current_arch (), location.get (), condition, thread,
346 extra_string.c_str (),
347 0 /* condition and thread are valid. */,
350 pending ? AUTO_BOOLEAN_TRUE : AUTO_BOOLEAN_FALSE,
351 ops, 0, enabled, 0, 0);
354 /* Implements the -break-insert command.
355 See the MI manual for the list of possible options. */
358 mi_cmd_break_insert (const char *command, char **argv, int argc)
360 mi_cmd_break_insert_1 (0, command, argv, argc);
363 /* Implements the -dprintf-insert command.
364 See the MI manual for the list of possible options. */
367 mi_cmd_dprintf_insert (const char *command, char **argv, int argc)
369 mi_cmd_break_insert_1 (1, command, argv, argc);
380 mi_cmd_break_passcount (const char *command, char **argv, int argc)
384 struct tracepoint *t;
387 error (_("Usage: tracepoint-number passcount"));
391 t = get_tracepoint (n);
396 observer_notify_breakpoint_modified (t);
400 error (_("Could not find tracepoint %d"), n);
404 /* Insert a watchpoint. The type of watchpoint is specified by the
406 -break-watch <expr> --> insert a regular wp.
407 -break-watch -r <expr> --> insert a read watchpoint.
408 -break-watch -a <expr> --> insert an access wp. */
411 mi_cmd_break_watch (const char *command, char **argv, int argc)
414 enum wp_type type = REG_WP;
419 static const struct mi_opt opts[] =
422 {"a", ACCESS_OPT, 0},
426 /* Parse arguments. */
432 int opt = mi_getopt ("-break-watch", argc, argv,
437 switch ((enum opt) opt)
448 error (_("-break-watch: Missing <expression>"));
450 error (_("-break-watch: Garbage following <expression>"));
453 /* Now we have what we need, let's insert the watchpoint! */
457 watch_command_wrapper (expr, FROM_TTY, 0);
460 rwatch_command_wrapper (expr, FROM_TTY, 0);
463 awatch_command_wrapper (expr, FROM_TTY, 0);
466 error (_("-break-watch: Unknown watchpoint type."));
470 /* The mi_read_next_line consults these variable to return successive
471 command lines. While it would be clearer to use a closure pointer,
472 it is not expected that any future code will use read_command_lines_1,
473 therefore no point of overengineering. */
475 static char **mi_command_line_array;
476 static int mi_command_line_array_cnt;
477 static int mi_command_line_array_ptr;
480 mi_read_next_line (void)
482 if (mi_command_line_array_ptr == mi_command_line_array_cnt)
485 return mi_command_line_array[mi_command_line_array_ptr++];
489 mi_cmd_break_commands (const char *command, char **argv, int argc)
491 command_line_up break_command;
494 struct breakpoint *b;
497 error (_("USAGE: %s <BKPT> [<COMMAND> [<COMMAND>...]]"), command);
499 bnum = strtol (argv[0], &endptr, 0);
500 if (endptr == argv[0])
501 error (_("breakpoint number argument \"%s\" is not a number."),
503 else if (*endptr != '\0')
504 error (_("junk at the end of breakpoint number argument \"%s\"."),
507 b = get_breakpoint (bnum);
509 error (_("breakpoint %d not found."), bnum);
511 mi_command_line_array = argv;
512 mi_command_line_array_ptr = 1;
513 mi_command_line_array_cnt = argc;
515 if (is_tracepoint (b))
516 break_command = read_command_lines_1 (mi_read_next_line, 1,
517 check_tracepoint_command, b);
519 break_command = read_command_lines_1 (mi_read_next_line, 1, 0, 0);
521 breakpoint_set_commands (b, std::move (break_command));