1 /* MI Command Set - breakpoint and watchpoint commands. 2 Copyright 2000, 2001, 2002 Free Software Foundation, Inc. 3 Contributed by Cygnus Solutions (a Red Hat company). 4 5 This file is part of GDB. 6 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 2 of the License, or 10 (at your option) any later version. 11 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. 16 17 You should have received a copy of the GNU General Public License 18 along with this program; if not, write to the Free Software 19 Foundation, Inc., 59 Temple Place - Suite 330, 20 Boston, MA 02111-1307, USA. */ 21 22 #include "defs.h" 23 #include "mi-cmds.h" 24 #include "ui-out.h" 25 #include "mi-out.h" 26 #include "breakpoint.h" 27 #include "gdb_string.h" 28 #include "mi-getopt.h" 29 #include "gdb-events.h" 30 #include "gdb.h" 31 32 enum 33 { 34 FROM_TTY = 0 35 }; 36 37 /* Output a single breakpoint. */ 38 39 static void 40 breakpoint_notify (int b) 41 { 42 gdb_breakpoint_query (uiout, b); 43 } 44 45 46 struct gdb_events breakpoint_hooks = 47 { 48 breakpoint_notify, 49 breakpoint_notify, 50 breakpoint_notify, 51 }; 52 53 54 enum bp_type 55 { 56 REG_BP, 57 HW_BP, 58 REGEXP_BP 59 }; 60 61 /* Insert a breakpoint. The type of breakpoint is specified by the 62 first argument: -break-insert <location> --> insert a regular 63 breakpoint. -break-insert -t <location> --> insert a temporary 64 breakpoint. -break-insert -h <location> --> insert an hardware 65 breakpoint. -break-insert -t -h <location> --> insert a temporary 66 hw bp. 67 -break-insert -r <regexp> --> insert a bp at functions matching 68 <regexp> */ 69 70 enum mi_cmd_result 71 mi_cmd_break_insert (char *command, char **argv, int argc) 72 { 73 char *address = NULL; 74 enum bp_type type = REG_BP; 75 int temp_p = 0; 76 int thread = -1; 77 int ignore_count = 0; 78 char *condition = NULL; 79 enum gdb_rc rc; 80 struct gdb_events *old_hooks; 81 enum opt 82 { 83 HARDWARE_OPT, TEMP_OPT /*, REGEXP_OPT */ , CONDITION_OPT, 84 IGNORE_COUNT_OPT, THREAD_OPT 85 }; 86 static struct mi_opt opts[] = 87 { 88 {"h", HARDWARE_OPT, 0}, 89 {"t", TEMP_OPT, 0}, 90 {"c", CONDITION_OPT, 1}, 91 {"i", IGNORE_COUNT_OPT, 1}, 92 {"p", THREAD_OPT, 1}, 93 0 94 }; 95 96 /* Parse arguments. It could be -r or -h or -t, <location> or ``--'' 97 to denote the end of the option list. */ 98 int optind = 0; 99 char *optarg; 100 while (1) 101 { 102 int opt = mi_getopt ("mi_cmd_break_insert", argc, argv, opts, &optind, &optarg); 103 if (opt < 0) 104 break; 105 switch ((enum opt) opt) 106 { 107 case TEMP_OPT: 108 temp_p = 1; 109 break; 110 case HARDWARE_OPT: 111 type = HW_BP; 112 break; 113 #if 0 114 case REGEXP_OPT: 115 type = REGEXP_BP; 116 break; 117 #endif 118 case CONDITION_OPT: 119 condition = optarg; 120 break; 121 case IGNORE_COUNT_OPT: 122 ignore_count = atol (optarg); 123 break; 124 case THREAD_OPT: 125 thread = atol (optarg); 126 break; 127 } 128 } 129 130 if (optind >= argc) 131 error ("mi_cmd_break_insert: Missing <location>"); 132 if (optind < argc - 1) 133 error ("mi_cmd_break_insert: Garbage following <location>"); 134 address = argv[optind]; 135 136 /* Now we have what we need, let's insert the breakpoint! */ 137 old_hooks = deprecated_set_gdb_event_hooks (&breakpoint_hooks); 138 switch (type) 139 { 140 case REG_BP: 141 rc = gdb_breakpoint (address, condition, 142 0 /*hardwareflag */ , temp_p, 143 thread, ignore_count); 144 break; 145 case HW_BP: 146 rc = gdb_breakpoint (address, condition, 147 1 /*hardwareflag */ , temp_p, 148 thread, ignore_count); 149 break; 150 #if 0 151 case REGEXP_BP: 152 if (temp_p) 153 error ("mi_cmd_break_insert: Unsupported tempoary regexp breakpoint"); 154 else 155 rbreak_command_wrapper (address, FROM_TTY); 156 return MI_CMD_DONE; 157 break; 158 #endif 159 default: 160 internal_error (__FILE__, __LINE__, 161 "mi_cmd_break_insert: Bad switch."); 162 } 163 deprecated_set_gdb_event_hooks (old_hooks); 164 165 if (rc == GDB_RC_FAIL) 166 return MI_CMD_CAUGHT_ERROR; 167 else 168 return MI_CMD_DONE; 169 } 170 171 enum wp_type 172 { 173 REG_WP, 174 READ_WP, 175 ACCESS_WP 176 }; 177 178 /* Insert a watchpoint. The type of watchpoint is specified by the 179 first argument: 180 -break-watch <expr> --> insert a regular wp. 181 -break-watch -r <expr> --> insert a read watchpoint. 182 -break-watch -a <expr> --> insert an access wp. */ 183 184 enum mi_cmd_result 185 mi_cmd_break_watch (char *command, char **argv, int argc) 186 { 187 char *expr = NULL; 188 enum wp_type type = REG_WP; 189 enum opt 190 { 191 READ_OPT, ACCESS_OPT 192 }; 193 static struct mi_opt opts[] = 194 { 195 {"r", READ_OPT, 0}, 196 {"a", ACCESS_OPT, 0}, 197 0 198 }; 199 200 /* Parse arguments. */ 201 int optind = 0; 202 char *optarg; 203 while (1) 204 { 205 int opt = mi_getopt ("mi_cmd_break_watch", argc, argv, opts, &optind, &optarg); 206 if (opt < 0) 207 break; 208 switch ((enum opt) opt) 209 { 210 case READ_OPT: 211 type = READ_WP; 212 break; 213 case ACCESS_OPT: 214 type = ACCESS_WP; 215 break; 216 } 217 } 218 if (optind >= argc) 219 error ("mi_cmd_break_watch: Missing <expression>"); 220 if (optind < argc - 1) 221 error ("mi_cmd_break_watch: Garbage following <expression>"); 222 expr = argv[optind]; 223 224 /* Now we have what we need, let's insert the watchpoint! */ 225 switch (type) 226 { 227 case REG_WP: 228 watch_command_wrapper (expr, FROM_TTY); 229 break; 230 case READ_WP: 231 rwatch_command_wrapper (expr, FROM_TTY); 232 break; 233 case ACCESS_WP: 234 awatch_command_wrapper (expr, FROM_TTY); 235 break; 236 default: 237 error ("mi_cmd_break_watch: Unknown watchpoint type."); 238 } 239 return MI_CMD_DONE; 240 } 241