Commit | Line | Data |
---|---|---|
f377b406 | 1 | /* Disassembly display. |
f33c6cbf | 2 | |
65f05602 AC |
3 | Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free Software |
4 | Foundation, Inc. | |
f33c6cbf | 5 | |
f377b406 SC |
6 | Contributed by Hewlett-Packard Company. |
7 | ||
8 | This file is part of GDB. | |
9 | ||
10 | This program is free software; you can redistribute it and/or modify | |
11 | it under the terms of the GNU General Public License as published by | |
12 | the Free Software Foundation; either version 2 of the License, or | |
13 | (at your option) any later version. | |
14 | ||
15 | This program is distributed in the hope that it will be useful, | |
16 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 | GNU General Public License for more details. | |
19 | ||
20 | You should have received a copy of the GNU General Public License | |
21 | along with this program; if not, write to the Free Software | |
22 | Foundation, Inc., 59 Temple Place - Suite 330, | |
23 | Boston, MA 02111-1307, USA. */ | |
c906108c SS |
24 | |
25 | #include "defs.h" | |
26 | #include "symtab.h" | |
27 | #include "breakpoint.h" | |
28 | #include "frame.h" | |
fd0407d6 | 29 | #include "value.h" |
52575520 | 30 | #include "source.h" |
f70a7d61 | 31 | #include "disasm.h" |
6d012f14 | 32 | #include "gdb_string.h" |
d7b2e967 AC |
33 | #include "tui/tui.h" |
34 | #include "tui/tui-data.h" | |
35 | #include "tui/tui-win.h" | |
36 | #include "tui/tui-layout.h" | |
37 | #include "tui/tui-winsource.h" | |
38 | #include "tui/tui-stack.h" | |
39 | #include "tui/tui-file.h" | |
c906108c | 40 | |
96ec9981 DJ |
41 | #ifdef HAVE_NCURSES_H |
42 | #include <ncurses.h> | |
43 | #else | |
44 | #ifdef HAVE_CURSES_H | |
45 | #include <curses.h> | |
46 | #endif | |
47 | #endif | |
48 | ||
aec2f747 SC |
49 | struct tui_asm_line |
50 | { | |
51 | CORE_ADDR addr; | |
52 | char* addr_string; | |
53 | char* insn; | |
54 | }; | |
55 | ||
56 | /* Function to set the disassembly window's content. | |
57 | Disassemble count lines starting at pc. | |
58 | Return address of the count'th instruction after pc. */ | |
59 | static CORE_ADDR | |
60 | tui_disassemble (struct tui_asm_line* lines, CORE_ADDR pc, int count) | |
61 | { | |
62 | struct ui_file *gdb_dis_out; | |
c906108c | 63 | |
aec2f747 SC |
64 | /* now init the ui_file structure */ |
65 | gdb_dis_out = tui_sfileopen (256); | |
66 | ||
aec2f747 SC |
67 | /* Now construct each line */ |
68 | for (; count > 0; count--, lines++) | |
69 | { | |
70 | if (lines->addr_string) | |
71 | xfree (lines->addr_string); | |
72 | if (lines->insn) | |
73 | xfree (lines->insn); | |
74 | ||
75 | print_address (pc, gdb_dis_out); | |
76 | lines->addr = pc; | |
77 | lines->addr_string = xstrdup (tui_file_get_strbuf (gdb_dis_out)); | |
78 | ||
79 | ui_file_rewind (gdb_dis_out); | |
80 | ||
92bf2b80 | 81 | pc = pc + gdb_print_insn (pc, gdb_dis_out); |
aec2f747 SC |
82 | |
83 | lines->insn = xstrdup (tui_file_get_strbuf (gdb_dis_out)); | |
84 | ||
85 | /* reset the buffer to empty */ | |
86 | ui_file_rewind (gdb_dis_out); | |
87 | } | |
88 | ui_file_delete (gdb_dis_out); | |
89 | return pc; | |
90 | } | |
91 | ||
92 | /* Find the disassembly address that corresponds to FROM lines | |
93 | above or below the PC. Variable sized instructions are taken | |
94 | into account by the algorithm. */ | |
95 | static CORE_ADDR | |
96 | tui_find_disassembly_address (CORE_ADDR pc, int from) | |
97 | { | |
d02c80cd | 98 | CORE_ADDR new_low; |
6ba8e26f | 99 | int max_lines; |
aec2f747 SC |
100 | int i; |
101 | struct tui_asm_line* lines; | |
102 | ||
6ba8e26f AC |
103 | max_lines = (from > 0) ? from : - from; |
104 | if (max_lines <= 1) | |
aec2f747 SC |
105 | return pc; |
106 | ||
107 | lines = (struct tui_asm_line*) alloca (sizeof (struct tui_asm_line) | |
6ba8e26f AC |
108 | * max_lines); |
109 | memset (lines, 0, sizeof (struct tui_asm_line) * max_lines); | |
aec2f747 | 110 | |
6ba8e26f | 111 | new_low = pc; |
aec2f747 SC |
112 | if (from > 0) |
113 | { | |
6ba8e26f AC |
114 | tui_disassemble (lines, pc, max_lines); |
115 | new_low = lines[max_lines - 1].addr; | |
aec2f747 SC |
116 | } |
117 | else | |
118 | { | |
119 | CORE_ADDR last_addr; | |
120 | int pos; | |
121 | struct minimal_symbol* msymbol; | |
122 | ||
123 | /* Find backward an address which is a symbol | |
124 | and for which disassembling from that address will fill | |
125 | completely the window. */ | |
6ba8e26f | 126 | pos = max_lines - 1; |
aec2f747 | 127 | do { |
6ba8e26f AC |
128 | new_low -= 1 * max_lines; |
129 | msymbol = lookup_minimal_symbol_by_pc_section (new_low, 0); | |
aec2f747 SC |
130 | |
131 | if (msymbol) | |
6ba8e26f | 132 | new_low = SYMBOL_VALUE_ADDRESS (msymbol); |
aec2f747 | 133 | else |
6ba8e26f | 134 | new_low += 1 * max_lines; |
aec2f747 | 135 | |
6ba8e26f | 136 | tui_disassemble (lines, new_low, max_lines); |
aec2f747 SC |
137 | last_addr = lines[pos].addr; |
138 | } while (last_addr > pc && msymbol); | |
139 | ||
140 | /* Scan forward disassembling one instruction at a time | |
141 | until the last visible instruction of the window | |
142 | matches the pc. We keep the disassembled instructions | |
143 | in the 'lines' window and shift it downward (increasing | |
144 | its addresses). */ | |
145 | if (last_addr < pc) | |
146 | do | |
147 | { | |
148 | CORE_ADDR next_addr; | |
149 | ||
150 | pos++; | |
6ba8e26f | 151 | if (pos >= max_lines) |
aec2f747 SC |
152 | pos = 0; |
153 | ||
154 | next_addr = tui_disassemble (&lines[pos], last_addr, 1); | |
155 | ||
156 | /* If there are some problems while disassembling exit. */ | |
157 | if (next_addr <= last_addr) | |
158 | break; | |
159 | last_addr = next_addr; | |
160 | } while (last_addr <= pc); | |
161 | pos++; | |
6ba8e26f | 162 | if (pos >= max_lines) |
aec2f747 | 163 | pos = 0; |
6ba8e26f | 164 | new_low = lines[pos].addr; |
aec2f747 | 165 | } |
6ba8e26f | 166 | for (i = 0; i < max_lines; i++) |
aec2f747 SC |
167 | { |
168 | xfree (lines[i].addr_string); | |
169 | xfree (lines[i].insn); | |
170 | } | |
6ba8e26f | 171 | return new_low; |
aec2f747 SC |
172 | } |
173 | ||
174 | /* Function to set the disassembly window's content. */ | |
65f05602 AC |
175 | enum tui_status |
176 | tui_set_disassem_content (CORE_ADDR pc) | |
c906108c | 177 | { |
22940a24 | 178 | enum tui_status ret = TUI_FAILURE; |
d02c80cd | 179 | int i; |
6d012f14 | 180 | int offset = TUI_DISASM_WIN->detail.source_info.horizontal_offset; |
d02c80cd | 181 | int line_width, max_lines; |
aec2f747 | 182 | CORE_ADDR cur_pc; |
2a8854a7 | 183 | struct tui_gen_win_info * locator = tui_locator_win_info_ptr (); |
dd1abb8c | 184 | int tab_len = tui_default_tab_len (); |
aec2f747 SC |
185 | struct tui_asm_line* lines; |
186 | int insn_pos; | |
187 | int addr_size, max_size; | |
188 | char* line; | |
189 | ||
190 | if (pc == 0) | |
191 | return TUI_FAILURE; | |
192 | ||
6d012f14 | 193 | ret = tui_alloc_source_buffer (TUI_DISASM_WIN); |
aec2f747 SC |
194 | if (ret != TUI_SUCCESS) |
195 | return ret; | |
196 | ||
6d012f14 | 197 | TUI_DISASM_WIN->detail.source_info.start_line_or_addr.addr = pc; |
aec2f747 | 198 | cur_pc = (CORE_ADDR) |
6d012f14 | 199 | (((struct tui_win_element *) locator->content[0])->which_element.locator.addr); |
aec2f747 | 200 | |
6ba8e26f | 201 | max_lines = TUI_DISASM_WIN->generic.height - 2; /* account for hilite */ |
aec2f747 SC |
202 | |
203 | /* Get temporary table that will hold all strings (addr & insn). */ | |
204 | lines = (struct tui_asm_line*) alloca (sizeof (struct tui_asm_line) | |
6ba8e26f AC |
205 | * max_lines); |
206 | memset (lines, 0, sizeof (struct tui_asm_line) * max_lines); | |
aec2f747 | 207 | |
6ba8e26f | 208 | line_width = TUI_DISASM_WIN->generic.width - 1; |
aec2f747 | 209 | |
6ba8e26f | 210 | tui_disassemble (lines, pc, max_lines); |
aec2f747 SC |
211 | |
212 | /* See what is the maximum length of an address and of a line. */ | |
213 | addr_size = 0; | |
214 | max_size = 0; | |
6ba8e26f | 215 | for (i = 0; i < max_lines; i++) |
c906108c | 216 | { |
aec2f747 SC |
217 | size_t len = strlen (lines[i].addr_string); |
218 | if (len > addr_size) | |
219 | addr_size = len; | |
c906108c | 220 | |
aec2f747 SC |
221 | len = strlen (lines[i].insn) + tab_len; |
222 | if (len > max_size) | |
223 | max_size = len; | |
c906108c | 224 | } |
aec2f747 SC |
225 | max_size += addr_size + tab_len; |
226 | ||
227 | /* Allocate memory to create each line. */ | |
228 | line = (char*) alloca (max_size); | |
229 | insn_pos = (1 + (addr_size / tab_len)) * tab_len; | |
230 | ||
231 | /* Now construct each line */ | |
6ba8e26f | 232 | for (i = 0; i < max_lines; i++) |
aec2f747 | 233 | { |
2a8854a7 AC |
234 | struct tui_win_element * element; |
235 | struct tui_source_element* src; | |
6ba8e26f | 236 | int cur_len; |
aec2f747 | 237 | |
6d012f14 AC |
238 | element = (struct tui_win_element *) TUI_DISASM_WIN->generic.content[i]; |
239 | src = &element->which_element.source; | |
aec2f747 | 240 | strcpy (line, lines[i].addr_string); |
6ba8e26f | 241 | cur_len = strlen (line); |
aec2f747 SC |
242 | |
243 | /* Add spaces to make the instructions start on the same column */ | |
6ba8e26f | 244 | while (cur_len < insn_pos) |
aec2f747 SC |
245 | { |
246 | strcat (line, " "); | |
6ba8e26f | 247 | cur_len++; |
aec2f747 SC |
248 | } |
249 | ||
250 | strcat (line, lines[i].insn); | |
251 | ||
252 | /* Now copy the line taking the offset into account */ | |
253 | if (strlen (line) > offset) | |
254 | strcpy (src->line, &line[offset]); | |
255 | else | |
256 | src->line[0] = '\0'; | |
257 | ||
6d012f14 AC |
258 | src->line_or_addr.addr = lines[i].addr; |
259 | src->is_exec_point = lines[i].addr == cur_pc; | |
aec2f747 SC |
260 | |
261 | /* See whether there is a breakpoint installed. */ | |
6d012f14 | 262 | src->has_break = (!src->is_exec_point |
aec2f747 | 263 | && breakpoint_here_p (pc) != no_breakpoint_here); |
c906108c | 264 | |
aec2f747 SC |
265 | xfree (lines[i].addr_string); |
266 | xfree (lines[i].insn); | |
267 | } | |
6d012f14 | 268 | TUI_DISASM_WIN->generic.content_size = i; |
aec2f747 SC |
269 | return TUI_SUCCESS; |
270 | } | |
c906108c SS |
271 | |
272 | ||
65f05602 | 273 | /* Function to display the disassembly window with disassembled code. */ |
c906108c | 274 | void |
6ba8e26f | 275 | tui_show_disassem (CORE_ADDR start_addr) |
c906108c | 276 | { |
6ba8e26f AC |
277 | struct symtab *s = find_pc_symtab (start_addr); |
278 | struct tui_win_info * win_with_focus = tui_win_with_focus (); | |
2a8854a7 | 279 | union tui_line_or_address val; |
c906108c | 280 | |
6ba8e26f | 281 | val.addr = start_addr; |
080ce8c0 | 282 | tui_add_win_to_layout (DISASSEM_WIN); |
6d012f14 | 283 | tui_update_source_window (TUI_DISASM_WIN, s, val, FALSE); |
c906108c | 284 | /* |
c5aa993b JM |
285 | ** if the focus was in the src win, put it in the asm win, if the |
286 | ** source view isn't split | |
287 | */ | |
6ba8e26f | 288 | if (tui_current_layout () != SRC_DISASSEM_COMMAND && win_with_focus == TUI_SRC_WIN) |
6d012f14 | 289 | tui_set_win_focus_to (TUI_DISASM_WIN); |
c906108c SS |
290 | |
291 | return; | |
65f05602 | 292 | } |
c906108c SS |
293 | |
294 | ||
65f05602 | 295 | /* Function to display the disassembly window. */ |
c906108c | 296 | void |
6ba8e26f | 297 | tui_show_disassem_and_update_source (CORE_ADDR start_addr) |
c906108c SS |
298 | { |
299 | struct symtab_and_line sal; | |
300 | ||
6ba8e26f | 301 | tui_show_disassem (start_addr); |
dd1abb8c | 302 | if (tui_current_layout () == SRC_DISASSEM_COMMAND) |
c906108c | 303 | { |
2a8854a7 | 304 | union tui_line_or_address val; |
aec2f747 | 305 | |
c906108c | 306 | /* |
c5aa993b JM |
307 | ** Update what is in the source window if it is displayed too, |
308 | ** note that it follows what is in the disassembly window and visa-versa | |
309 | */ | |
6ba8e26f | 310 | sal = find_pc_line (start_addr, 0); |
6d012f14 AC |
311 | val.line_no = sal.line; |
312 | tui_update_source_window (TUI_SRC_WIN, sal.symtab, val, TRUE); | |
3024f13a SC |
313 | if (sal.symtab) |
314 | { | |
52575520 | 315 | set_current_source_symtab_and_line (&sal); |
47d3492a | 316 | tui_update_locator_filename (sal.symtab->filename); |
3024f13a SC |
317 | } |
318 | else | |
47d3492a | 319 | tui_update_locator_filename ("?"); |
c906108c SS |
320 | } |
321 | ||
322 | return; | |
65f05602 | 323 | } |
c906108c | 324 | |
c774cec6 | 325 | CORE_ADDR |
65f05602 | 326 | tui_get_begin_asm_address (void) |
c906108c | 327 | { |
2a8854a7 AC |
328 | struct tui_gen_win_info * locator; |
329 | struct tui_locator_element * element; | |
c774cec6 | 330 | CORE_ADDR addr; |
c906108c | 331 | |
dd1abb8c | 332 | locator = tui_locator_win_info_ptr (); |
6d012f14 | 333 | element = &((struct tui_win_element *) locator->content[0])->which_element.locator; |
c906108c | 334 | |
c774cec6 | 335 | if (element->addr == 0) |
c906108c | 336 | { |
0510ab86 SC |
337 | struct minimal_symbol *main_symbol; |
338 | ||
339 | /* Find address of the start of program. | |
340 | Note: this should be language specific. */ | |
341 | main_symbol = lookup_minimal_symbol ("main", NULL, NULL); | |
342 | if (main_symbol == 0) | |
343 | main_symbol = lookup_minimal_symbol ("MAIN", NULL, NULL); | |
344 | if (main_symbol == 0) | |
345 | main_symbol = lookup_minimal_symbol ("_start", NULL, NULL); | |
346 | if (main_symbol) | |
347 | addr = SYMBOL_VALUE_ADDRESS (main_symbol); | |
348 | else | |
349 | addr = 0; | |
c906108c SS |
350 | } |
351 | else /* the target is executing */ | |
352 | addr = element->addr; | |
353 | ||
354 | return addr; | |
65f05602 | 355 | } |
c906108c | 356 | |
77cad3ba SC |
357 | /* Determine what the low address will be to display in the TUI's |
358 | disassembly window. This may or may not be the same as the | |
359 | low address input. */ | |
360 | CORE_ADDR | |
22940a24 | 361 | tui_get_low_disassembly_address (CORE_ADDR low, CORE_ADDR pc) |
77cad3ba SC |
362 | { |
363 | int pos; | |
364 | ||
365 | /* Determine where to start the disassembly so that the pc is about in the | |
366 | middle of the viewport. */ | |
080ce8c0 | 367 | pos = tui_default_win_viewport_height (DISASSEM_WIN, DISASSEM_COMMAND) / 2; |
77cad3ba SC |
368 | pc = tui_find_disassembly_address (pc, -pos); |
369 | ||
370 | if (pc < low) | |
371 | pc = low; | |
372 | return pc; | |
373 | } | |
374 | ||
65f05602 | 375 | /* Scroll the disassembly forward or backward vertically. */ |
c906108c | 376 | void |
6ba8e26f AC |
377 | tui_vertical_disassem_scroll (enum tui_scroll_direction scroll_direction, |
378 | int num_to_scroll) | |
c906108c | 379 | { |
6d012f14 | 380 | if (TUI_DISASM_WIN->generic.content != NULL) |
c906108c | 381 | { |
aec2f747 | 382 | CORE_ADDR pc; |
2a8854a7 | 383 | tui_win_content content; |
c906108c | 384 | struct symtab *s; |
2a8854a7 | 385 | union tui_line_or_address val; |
6ba8e26f | 386 | int max_lines, dir; |
52575520 | 387 | struct symtab_and_line cursal = get_current_source_symtab_and_line (); |
c906108c | 388 | |
6d012f14 | 389 | content = (tui_win_content) TUI_DISASM_WIN->generic.content; |
52575520 | 390 | if (cursal.symtab == (struct symtab *) NULL) |
f70a7d61 | 391 | s = find_pc_symtab (get_frame_pc (deprecated_selected_frame)); |
c906108c | 392 | else |
52575520 | 393 | s = cursal.symtab; |
c906108c | 394 | |
aec2f747 | 395 | /* account for hilite */ |
6ba8e26f | 396 | max_lines = TUI_DISASM_WIN->generic.height - 2; |
6d012f14 | 397 | pc = content[0]->which_element.source.line_or_addr.addr; |
6ba8e26f | 398 | dir = (scroll_direction == FORWARD_SCROLL) ? max_lines : - max_lines; |
c906108c | 399 | |
aec2f747 | 400 | val.addr = tui_find_disassembly_address (pc, dir); |
6d012f14 | 401 | tui_update_source_window_as_is (TUI_DISASM_WIN, s, val, FALSE); |
aec2f747 SC |
402 | } |
403 | } |