projects / deliverable / binutils-gdb.git / blame
| Commit | Line | Data |
|---|---|---|
| 0d18235f JB |
1 | /* MI Command Set - symbol commands. |
| 2 | Copyright 2003 Free Software Foundation, Inc. | |
| 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 | |
| 18 | Foundation, Inc., 59 Temple Place - Suite 330, | |
| 19 | Boston, MA 02111-1307, USA. */ | |
| 20 | ||
| 21 | #include "defs.h" | |
| 22 | #include "mi-cmds.h" | |
| 23 | #include "symtab.h" | |
| 24 | #include "ui-out.h" | |
| 25 | ||
| 26 | /* SYMBOL-LIST-LINES: | |
| 27 | ||
| 28 | Print the list of all pc addresses and lines of code for | |
| 29 | the provided (full or base) source file name. The entries | |
| 30 | are sorted in ascending PC order. */ | |
| 31 | ||
| 32 | enum mi_cmd_result | |
| 33 | mi_cmd_symbol_list_lines (char *command, char **argv, int argc) | |
| 34 | { | |
| 35 | char *filename; | |
| 36 | struct symtab *s; | |
| 37 | int i; | |
| 38 | struct cleanup *cleanup_stack, *cleanup_tuple; | |
| 39 | ||
| 40 | if (argc != 1) | |
| 41 | error ("mi_cmd_symbol_list_lines: Usage: SOURCE_FILENAME"); | |
| 42 | ||
| 43 | filename = argv[0]; | |
| 44 | s = lookup_symtab (filename); | |
| 45 | ||
| 46 | if (s == NULL) | |
| 47 | error ("mi_cmd_symbol_list_lines: Unknown source file name."); | |
| 48 | ||
| 49 | /* Now, dump the associated line table. The pc addresses are already | |
| 50 | sorted by increasing values in the symbol table, so no need to | |
| 51 | perform any other sorting. */ | |
| 52 | ||
| 53 | cleanup_stack = make_cleanup_ui_out_list_begin_end (uiout, "lines"); | |
| 54 | ||
| 55 | if (LINETABLE (s) != NULL && LINETABLE (s)->nitems > 0) | |
| 56 | for (i = 0; i < LINETABLE (s)->nitems; i++) | |
| 57 | { | |
| 58 | cleanup_tuple = make_cleanup_ui_out_tuple_begin_end (uiout, NULL); | |
| 59 | ui_out_field_core_addr (uiout, "pc", LINETABLE (s)->item[i].pc); | |
| 60 | ui_out_field_int (uiout, "line", LINETABLE (s)->item[i].line); | |
| 61 | do_cleanups (cleanup_tuple); | |
| 62 | } | |
| 63 | ||
| 64 | do_cleanups (cleanup_stack); | |
| 65 | ||
| 66 | return MI_CMD_DONE; | |
| 67 | } |