Commit | Line | Data |
---|---|---|
1c95d7ab | 1 | /* Annotation routines for GDB. |
879c0417 | 2 | Copyright 1986, 89, 90, 91, 92, 95, 1998 Free Software Foundation, Inc. |
1c95d7ab JK |
3 | |
4 | This file is part of GDB. | |
5 | ||
6 | This program is free software; you can redistribute it and/or modify | |
7 | it under the terms of the GNU General Public License as published by | |
8 | the Free Software Foundation; either version 2 of the License, or | |
9 | (at your option) any later version. | |
10 | ||
11 | This program is distributed in the hope that it will be useful, | |
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | GNU General Public License for more details. | |
15 | ||
16 | You should have received a copy of the GNU General Public License | |
17 | along with this program; if not, write to the Free Software | |
6c9638b4 | 18 | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ |
1c95d7ab JK |
19 | |
20 | #include "defs.h" | |
21 | #include "annotate.h" | |
22 | #include "value.h" | |
23 | #include "target.h" | |
9c036bd8 | 24 | #include "gdbtypes.h" |
d2a85f11 | 25 | #include "breakpoint.h" |
9c036bd8 | 26 | \f |
879c0417 JM |
27 | |
28 | /* Prototypes for local functions. */ | |
29 | ||
9c036bd8 | 30 | static void print_value_flags PARAMS ((struct type *)); |
879c0417 | 31 | |
b607efe7 | 32 | static void breakpoint_changed PARAMS ((struct breakpoint *)); |
1c95d7ab | 33 | |
929db6e5 EZ |
34 | void (*annotate_starting_hook) PARAMS ((void)); |
35 | void (*annotate_stopped_hook) PARAMS ((void)); | |
36 | void (*annotate_signalled_hook) PARAMS ((void)); | |
37 | void (*annotate_exited_hook) PARAMS ((void)); | |
38 | ||
9c036bd8 JK |
39 | static void |
40 | print_value_flags (t) | |
41 | struct type *t; | |
42 | { | |
43 | if (can_dereference (t)) | |
44 | printf_filtered ("*"); | |
45 | else | |
46 | printf_filtered ("-"); | |
47 | } | |
48 | \f | |
1c95d7ab JK |
49 | void |
50 | breakpoints_changed () | |
51 | { | |
52 | if (annotation_level > 1) | |
53 | { | |
54 | target_terminal_ours (); | |
55 | printf_unfiltered ("\n\032\032breakpoints-invalid\n"); | |
56 | } | |
57 | } | |
58 | ||
59 | void | |
60 | annotate_breakpoint (num) | |
61 | int num; | |
62 | { | |
63 | if (annotation_level > 1) | |
64 | printf_filtered ("\n\032\032breakpoint %d\n", num); | |
65 | } | |
66 | ||
4770ff08 DT |
67 | void |
68 | annotate_catchpoint (num) | |
69 | int num; | |
70 | { | |
71 | if (annotation_level > 1) | |
72 | printf_filtered ("\n\032\032catchpoint %d\n", num); | |
73 | } | |
74 | ||
1c95d7ab JK |
75 | void |
76 | annotate_watchpoint (num) | |
77 | int num; | |
78 | { | |
79 | if (annotation_level > 1) | |
80 | printf_filtered ("\n\032\032watchpoint %d\n", num); | |
81 | } | |
82 | ||
83 | void | |
84 | annotate_starting () | |
85 | { | |
929db6e5 EZ |
86 | |
87 | if (annotate_starting_hook) | |
88 | annotate_starting_hook (); | |
89 | else | |
0c070b57 | 90 | { |
929db6e5 EZ |
91 | if (annotation_level > 1) |
92 | { | |
93 | printf_filtered ("\n\032\032starting\n"); | |
94 | } | |
0c070b57 | 95 | } |
1c95d7ab JK |
96 | } |
97 | ||
98 | void | |
99 | annotate_stopped () | |
100 | { | |
929db6e5 EZ |
101 | if (annotate_stopped_hook) |
102 | annotate_stopped_hook (); | |
103 | else | |
104 | { | |
105 | if (annotation_level > 1) | |
106 | printf_filtered ("\n\032\032stopped\n"); | |
107 | } | |
1c95d7ab JK |
108 | } |
109 | ||
110 | void | |
111 | annotate_exited (exitstatus) | |
112 | int exitstatus; | |
113 | { | |
929db6e5 EZ |
114 | if (annotate_exited_hook) |
115 | annotate_exited_hook (); | |
116 | else | |
117 | { | |
118 | if (annotation_level > 1) | |
119 | printf_filtered ("\n\032\032exited %d\n", exitstatus); | |
120 | } | |
1c95d7ab JK |
121 | } |
122 | ||
123 | void | |
124 | annotate_signalled () | |
125 | { | |
929db6e5 EZ |
126 | if (annotate_signalled_hook) |
127 | annotate_signalled_hook (); | |
128 | ||
1c95d7ab JK |
129 | if (annotation_level > 1) |
130 | printf_filtered ("\n\032\032signalled\n"); | |
131 | } | |
132 | ||
133 | void | |
134 | annotate_signal_name () | |
135 | { | |
136 | if (annotation_level > 1) | |
137 | printf_filtered ("\n\032\032signal-name\n"); | |
138 | } | |
139 | ||
140 | void | |
141 | annotate_signal_name_end () | |
142 | { | |
143 | if (annotation_level > 1) | |
144 | printf_filtered ("\n\032\032signal-name-end\n"); | |
145 | } | |
146 | ||
147 | void | |
148 | annotate_signal_string () | |
149 | { | |
150 | if (annotation_level > 1) | |
151 | printf_filtered ("\n\032\032signal-string\n"); | |
152 | } | |
153 | ||
154 | void | |
155 | annotate_signal_string_end () | |
156 | { | |
157 | if (annotation_level > 1) | |
158 | printf_filtered ("\n\032\032signal-string-end\n"); | |
159 | } | |
160 | ||
161 | void | |
162 | annotate_signal () | |
163 | { | |
164 | if (annotation_level > 1) | |
165 | printf_filtered ("\n\032\032signal\n"); | |
166 | } | |
167 | \f | |
168 | void | |
169 | annotate_breakpoints_headers () | |
170 | { | |
171 | if (annotation_level > 1) | |
172 | printf_filtered ("\n\032\032breakpoints-headers\n"); | |
173 | } | |
174 | ||
175 | void | |
176 | annotate_field (num) | |
177 | int num; | |
178 | { | |
179 | if (annotation_level > 1) | |
180 | printf_filtered ("\n\032\032field %d\n", num); | |
181 | } | |
182 | ||
183 | void | |
184 | annotate_breakpoints_table () | |
185 | { | |
186 | if (annotation_level > 1) | |
187 | printf_filtered ("\n\032\032breakpoints-table\n"); | |
188 | } | |
189 | ||
190 | void | |
191 | annotate_record () | |
192 | { | |
193 | if (annotation_level > 1) | |
194 | printf_filtered ("\n\032\032record\n"); | |
195 | } | |
196 | ||
197 | void | |
198 | annotate_breakpoints_table_end () | |
199 | { | |
200 | if (annotation_level > 1) | |
201 | printf_filtered ("\n\032\032breakpoints-table-end\n"); | |
202 | } | |
203 | ||
204 | void | |
205 | annotate_frames_invalid () | |
206 | { | |
207 | if (annotation_level > 1) | |
208 | { | |
209 | target_terminal_ours (); | |
210 | printf_unfiltered ("\n\032\032frames-invalid\n"); | |
211 | } | |
212 | } | |
213 | ||
214 | void | |
215 | annotate_field_begin (type) | |
216 | struct type *type; | |
217 | { | |
218 | if (annotation_level > 1) | |
219 | { | |
220 | printf_filtered ("\n\032\032field-begin "); | |
221 | print_value_flags (type); | |
222 | printf_filtered ("\n"); | |
223 | } | |
224 | } | |
225 | ||
226 | void | |
227 | annotate_field_name_end () | |
228 | { | |
229 | if (annotation_level > 1) | |
230 | printf_filtered ("\n\032\032field-name-end\n"); | |
231 | } | |
232 | ||
233 | void | |
234 | annotate_field_value () | |
235 | { | |
236 | if (annotation_level > 1) | |
237 | printf_filtered ("\n\032\032field-value\n"); | |
238 | } | |
239 | ||
240 | void | |
241 | annotate_field_end () | |
242 | { | |
243 | if (annotation_level > 1) | |
20b3c1aa | 244 | printf_filtered ("\n\032\032field-end\n"); |
1c95d7ab JK |
245 | } |
246 | \f | |
247 | void | |
248 | annotate_quit () | |
249 | { | |
250 | if (annotation_level > 1) | |
251 | printf_filtered ("\n\032\032quit\n"); | |
252 | } | |
253 | ||
254 | void | |
255 | annotate_error () | |
256 | { | |
257 | if (annotation_level > 1) | |
258 | printf_filtered ("\n\032\032error\n"); | |
259 | } | |
260 | ||
261 | void | |
262 | annotate_error_begin () | |
263 | { | |
264 | if (annotation_level > 1) | |
265 | fprintf_filtered (gdb_stderr, "\n\032\032error-begin\n"); | |
266 | } | |
267 | ||
268 | void | |
269 | annotate_value_history_begin (histindex, type) | |
270 | int histindex; | |
271 | struct type *type; | |
272 | { | |
273 | if (annotation_level > 1) | |
274 | { | |
275 | printf_filtered ("\n\032\032value-history-begin %d ", histindex); | |
276 | print_value_flags (type); | |
277 | printf_filtered ("\n"); | |
278 | } | |
279 | } | |
280 | ||
281 | void | |
282 | annotate_value_begin (type) | |
283 | struct type *type; | |
284 | { | |
285 | if (annotation_level > 1) | |
286 | { | |
287 | printf_filtered ("\n\032\032value-begin "); | |
288 | print_value_flags (type); | |
289 | printf_filtered ("\n"); | |
290 | } | |
291 | } | |
292 | ||
293 | void | |
294 | annotate_value_history_value () | |
295 | { | |
296 | if (annotation_level > 1) | |
297 | printf_filtered ("\n\032\032value-history-value\n"); | |
298 | } | |
299 | ||
300 | void | |
301 | annotate_value_history_end () | |
302 | { | |
303 | if (annotation_level > 1) | |
304 | printf_filtered ("\n\032\032value-history-end\n"); | |
305 | } | |
306 | ||
307 | void | |
308 | annotate_value_end () | |
309 | { | |
310 | if (annotation_level > 1) | |
311 | printf_filtered ("\n\032\032value-end\n"); | |
312 | } | |
313 | ||
314 | void | |
315 | annotate_display_begin () | |
316 | { | |
317 | if (annotation_level > 1) | |
318 | printf_filtered ("\n\032\032display-begin\n"); | |
319 | } | |
320 | ||
321 | void | |
322 | annotate_display_number_end () | |
323 | { | |
324 | if (annotation_level > 1) | |
325 | printf_filtered ("\n\032\032display-number-end\n"); | |
326 | } | |
327 | ||
328 | void | |
329 | annotate_display_format () | |
330 | { | |
331 | if (annotation_level > 1) | |
332 | printf_filtered ("\n\032\032display-format\n"); | |
333 | } | |
334 | ||
335 | void | |
336 | annotate_display_expression () | |
337 | { | |
338 | if (annotation_level > 1) | |
339 | printf_filtered ("\n\032\032display-expression\n"); | |
340 | } | |
341 | ||
342 | void | |
343 | annotate_display_expression_end () | |
344 | { | |
345 | if (annotation_level > 1) | |
346 | printf_filtered ("\n\032\032display-expression-end\n"); | |
347 | } | |
348 | ||
349 | void | |
350 | annotate_display_value () | |
351 | { | |
352 | if (annotation_level > 1) | |
353 | printf_filtered ("\n\032\032display-value\n"); | |
354 | } | |
355 | ||
356 | void | |
357 | annotate_display_end () | |
358 | { | |
359 | if (annotation_level > 1) | |
360 | printf_filtered ("\n\032\032display-end\n"); | |
361 | } | |
362 | ||
363 | void | |
364 | annotate_arg_begin () | |
365 | { | |
366 | if (annotation_level > 1) | |
367 | printf_filtered ("\n\032\032arg-begin\n"); | |
368 | } | |
369 | ||
370 | void | |
371 | annotate_arg_name_end () | |
372 | { | |
373 | if (annotation_level > 1) | |
374 | printf_filtered ("\n\032\032arg-name-end\n"); | |
375 | } | |
376 | ||
377 | void | |
378 | annotate_arg_value (type) | |
379 | struct type *type; | |
380 | { | |
381 | if (annotation_level > 1) | |
382 | { | |
383 | printf_filtered ("\n\032\032arg-value "); | |
384 | print_value_flags (type); | |
385 | printf_filtered ("\n"); | |
386 | } | |
387 | } | |
388 | ||
389 | void | |
390 | annotate_arg_end () | |
391 | { | |
392 | if (annotation_level > 1) | |
393 | printf_filtered ("\n\032\032arg-end\n"); | |
394 | } | |
395 | ||
396 | void | |
397 | annotate_source (filename, line, character, mid, pc) | |
398 | char *filename; | |
399 | int line; | |
400 | int character; | |
401 | int mid; | |
402 | CORE_ADDR pc; | |
403 | { | |
404 | if (annotation_level > 1) | |
405 | printf_filtered ("\n\032\032source "); | |
406 | else | |
407 | printf_filtered ("\032\032"); | |
408 | ||
2e11fdd8 | 409 | printf_filtered ("%s:%d:%d:%s:0x", filename, |
1c95d7ab JK |
410 | line, character, |
411 | mid ? "middle" : "beg"); | |
412 | print_address_numeric (pc, 0, gdb_stdout); | |
413 | printf_filtered ("\n"); | |
414 | } | |
415 | ||
416 | void | |
417 | annotate_frame_begin (level, pc) | |
418 | int level; | |
419 | CORE_ADDR pc; | |
420 | { | |
421 | if (annotation_level > 1) | |
422 | { | |
2e11fdd8 | 423 | printf_filtered ("\n\032\032frame-begin %d 0x", level); |
1c95d7ab JK |
424 | print_address_numeric (pc, 0, gdb_stdout); |
425 | printf_filtered ("\n"); | |
426 | } | |
427 | } | |
428 | ||
429 | void | |
430 | annotate_function_call () | |
431 | { | |
432 | if (annotation_level > 1) | |
433 | printf_filtered ("\n\032\032function-call\n"); | |
434 | } | |
435 | ||
436 | void | |
437 | annotate_signal_handler_caller () | |
438 | { | |
439 | if (annotation_level > 1) | |
440 | printf_filtered ("\n\032\032signal-handler-caller\n"); | |
441 | } | |
442 | ||
443 | void | |
444 | annotate_frame_address () | |
445 | { | |
446 | if (annotation_level > 1) | |
447 | printf_filtered ("\n\032\032frame-address\n"); | |
448 | } | |
449 | ||
450 | void | |
451 | annotate_frame_address_end () | |
452 | { | |
453 | if (annotation_level > 1) | |
454 | printf_filtered ("\n\032\032frame-address-end\n"); | |
455 | } | |
456 | ||
457 | void | |
458 | annotate_frame_function_name () | |
459 | { | |
460 | if (annotation_level > 1) | |
461 | printf_filtered ("\n\032\032frame-function-name\n"); | |
462 | } | |
463 | ||
464 | void | |
465 | annotate_frame_args () | |
466 | { | |
467 | if (annotation_level > 1) | |
468 | printf_filtered ("\n\032\032frame-args\n"); | |
469 | } | |
470 | ||
471 | void | |
472 | annotate_frame_source_begin () | |
473 | { | |
474 | if (annotation_level > 1) | |
475 | printf_filtered ("\n\032\032frame-source-begin\n"); | |
476 | } | |
477 | ||
478 | void | |
479 | annotate_frame_source_file () | |
480 | { | |
481 | if (annotation_level > 1) | |
482 | printf_filtered ("\n\032\032frame-source-file\n"); | |
483 | } | |
484 | ||
485 | void | |
486 | annotate_frame_source_file_end () | |
487 | { | |
488 | if (annotation_level > 1) | |
489 | printf_filtered ("\n\032\032frame-source-file-end\n"); | |
490 | } | |
491 | ||
492 | void | |
493 | annotate_frame_source_line () | |
494 | { | |
495 | if (annotation_level > 1) | |
496 | printf_filtered ("\n\032\032frame-source-line\n"); | |
497 | } | |
498 | ||
499 | void | |
500 | annotate_frame_source_end () | |
501 | { | |
502 | if (annotation_level > 1) | |
503 | printf_filtered ("\n\032\032frame-source-end\n"); | |
504 | } | |
505 | ||
506 | void | |
507 | annotate_frame_where () | |
508 | { | |
509 | if (annotation_level > 1) | |
510 | printf_filtered ("\n\032\032frame-where\n"); | |
511 | } | |
512 | ||
513 | void | |
514 | annotate_frame_end () | |
515 | { | |
516 | if (annotation_level > 1) | |
517 | printf_filtered ("\n\032\032frame-end\n"); | |
518 | } | |
519 | \f | |
520 | void | |
521 | annotate_array_section_begin (index, elttype) | |
522 | int index; | |
523 | struct type *elttype; | |
524 | { | |
525 | if (annotation_level > 1) | |
526 | { | |
527 | printf_filtered ("\n\032\032array-section-begin %d ", index); | |
528 | print_value_flags (elttype); | |
529 | printf_filtered ("\n"); | |
530 | } | |
531 | } | |
532 | ||
533 | void | |
534 | annotate_elt_rep (repcount) | |
535 | unsigned int repcount; | |
536 | { | |
537 | if (annotation_level > 1) | |
538 | printf_filtered ("\n\032\032elt-rep %u\n", repcount); | |
539 | } | |
540 | ||
541 | void | |
542 | annotate_elt_rep_end () | |
543 | { | |
544 | if (annotation_level > 1) | |
545 | printf_filtered ("\n\032\032elt-rep-end\n"); | |
546 | } | |
547 | ||
548 | void | |
549 | annotate_elt () | |
550 | { | |
551 | if (annotation_level > 1) | |
552 | printf_filtered ("\n\032\032elt\n"); | |
553 | } | |
554 | ||
555 | void | |
556 | annotate_array_section_end () | |
557 | { | |
558 | if (annotation_level > 1) | |
559 | printf_filtered ("\n\032\032array-section-end\n"); | |
560 | } | |
561 | ||
d2a85f11 JMD |
562 | static void |
563 | breakpoint_changed (b) | |
564 | struct breakpoint *b; | |
565 | { | |
566 | breakpoints_changed (); | |
567 | } | |
568 | ||
569 | void | |
570 | _initialize_annotate () | |
571 | { | |
572 | if (annotation_level > 1) | |
573 | { | |
574 | delete_breakpoint_hook = breakpoint_changed; | |
6131622e | 575 | modify_breakpoint_hook = breakpoint_changed; |
d2a85f11 JMD |
576 | } |
577 | } |