1 /* TUI display source/assembly window.
3 Copyright (C) 1998-2019 Free Software Foundation, Inc.
5 Contributed by Hewlett-Packard Company.
7 This file is part of GDB.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>. */
26 #include "breakpoint.h"
30 #include "filenames.h"
33 #include "tui/tui-data.h"
34 #include "tui/tui-io.h"
35 #include "tui/tui-stack.h"
36 #include "tui/tui-win.h"
37 #include "tui/tui-wingeneral.h"
38 #include "tui/tui-winsource.h"
39 #include "tui/tui-source.h"
40 #include "tui/tui-disasm.h"
41 #include "gdb_curses.h"
43 /* Function to display the "main" routine. */
47 if (!tui_source_windows ().empty ())
49 struct gdbarch *gdbarch;
52 tui_get_begin_asm_address (&gdbarch, &addr);
53 if (addr != (CORE_ADDR) 0)
57 tui_update_source_windows_with_addr (gdbarch, addr);
58 s = find_pc_line_symtab (addr);
60 tui_update_locator_fullname (symtab_to_fullname (s));
62 tui_update_locator_fullname ("??");
69 /* Function to display source in the source window. This function
70 initializes the horizontal scroll to 0. */
72 tui_update_source_window (struct tui_source_window_base *win_info,
73 struct gdbarch *gdbarch,
75 struct tui_line_or_address line_or_addr,
78 win_info->horizontal_offset = 0;
79 tui_update_source_window_as_is (win_info, gdbarch, s, line_or_addr, noerror);
85 /* Function to display source in the source/asm window. This function
86 shows the source as specified by the horizontal offset. */
88 tui_update_source_window_as_is (struct tui_source_window_base *win_info,
89 struct gdbarch *gdbarch,
91 struct tui_line_or_address line_or_addr,
96 if (win_info->type == SRC_WIN)
97 ret = tui_set_source_content (win_info, s, line_or_addr.u.line_no,
100 ret = tui_set_disassem_content (win_info, gdbarch, line_or_addr.u.addr);
102 if (ret == TUI_FAILURE)
104 tui_clear_source_content (win_info);
105 tui_clear_exec_info_content (win_info);
109 tui_update_breakpoint_info (win_info, nullptr, false);
110 tui_show_source_content (win_info);
111 tui_update_exec_info (win_info);
112 if (win_info->type == SRC_WIN)
116 sal.line = line_or_addr.u.line_no +
117 (win_info->content.size () - 2);
119 sal.pspace = SYMTAB_PSPACE (s);
120 set_current_source_symtab_and_line (sal);
121 /* If the focus was in the asm win, put it in the src win if
122 we don't have a split layout. */
123 if (tui_win_with_focus () == TUI_DISASM_WIN
124 && tui_current_layout () != SRC_DISASSEM_COMMAND)
125 tui_set_win_focus_to (win_info);
134 /* Function to ensure that the source and/or disassemly windows
135 reflect the input address. */
137 tui_update_source_windows_with_addr (struct gdbarch *gdbarch, CORE_ADDR addr)
141 struct symtab_and_line sal;
142 struct tui_line_or_address l;
144 switch (tui_current_layout ())
146 case DISASSEM_COMMAND:
147 case DISASSEM_DATA_COMMAND:
148 tui_show_disassem (gdbarch, addr);
150 case SRC_DISASSEM_COMMAND:
151 tui_show_disassem_and_update_source (gdbarch, addr);
154 sal = find_pc_line (addr, 0);
156 l.u.line_no = sal.line;
157 tui_show_symtab_source (TUI_SRC_WIN, gdbarch, sal.symtab, l, FALSE);
163 for (struct tui_source_window_base *win_info : tui_source_windows ())
165 tui_clear_source_content (win_info);
166 tui_clear_exec_info_content (win_info);
171 /* Function to ensure that the source and/or disassemly windows
172 reflect the input address. */
174 tui_update_source_windows_with_line (struct symtab *s, int line)
176 struct gdbarch *gdbarch;
178 struct tui_line_or_address l;
183 gdbarch = get_objfile_arch (SYMTAB_OBJFILE (s));
185 switch (tui_current_layout ())
187 case DISASSEM_COMMAND:
188 case DISASSEM_DATA_COMMAND:
189 find_line_pc (s, line, &pc);
190 tui_update_source_windows_with_addr (gdbarch, pc);
195 tui_show_symtab_source (TUI_SRC_WIN, gdbarch, s, l, FALSE);
196 if (tui_current_layout () == SRC_DISASSEM_COMMAND)
198 find_line_pc (s, line, &pc);
199 tui_show_disassem (gdbarch, pc);
208 tui_clear_source_content (struct tui_source_window_base *win_info)
210 if (win_info != NULL)
214 tui_erase_source_content (win_info);
215 for (i = 0; i < win_info->content.size (); i++)
217 struct tui_source_element *element = &win_info->content[i];
219 element->break_mode = 0;
220 element->is_exec_point = false;
227 tui_erase_source_content (struct tui_source_window_base *win_info)
230 int half_width = (win_info->width - 2) / 2;
232 if (win_info->handle != NULL)
234 werase (win_info->handle);
235 tui_check_and_display_highlight_if_needed (win_info);
237 const char *no_src_str;
239 if (win_info->type == SRC_WIN)
240 no_src_str = NO_SRC_STRING;
242 no_src_str = NO_DISASSEM_STRING;
243 if (strlen (no_src_str) >= half_width)
246 x_pos = half_width - strlen (no_src_str);
247 mvwaddstr (win_info->handle,
248 (win_info->height / 2),
250 (char *) no_src_str);
252 win_info->content.clear ();
253 win_info->refresh_window ();
258 /* Redraw the complete line of a source or disassembly window. */
260 tui_show_source_line (struct tui_source_window_base *win_info, int lineno)
262 struct tui_source_element *line;
265 line = &win_info->content[lineno - 1];
266 if (line->is_exec_point)
267 tui_set_reverse_mode (win_info->handle, true);
269 wmove (win_info->handle, lineno, 1);
270 tui_puts (line->line,
272 if (line->is_exec_point)
273 tui_set_reverse_mode (win_info->handle, false);
275 /* Clear to end of line but stop before the border. */
276 x = getcurx (win_info->handle);
277 while (x + 1 < win_info->width)
279 waddch (win_info->handle, ' ');
280 x = getcurx (win_info->handle);
285 tui_show_source_content (struct tui_source_window_base *win_info)
287 if (!win_info->content.empty ())
291 for (lineno = 1; lineno <= win_info->content.size (); lineno++)
292 tui_show_source_line (win_info, lineno);
295 tui_erase_source_content (win_info);
297 tui_check_and_display_highlight_if_needed (win_info);
298 win_info->refresh_window ();
301 /* See tui-data.h. */
304 tui_source_window_base::refill ()
310 symtab_and_line cursal = get_current_source_symtab_and_line ();
311 s = (cursal.symtab == NULL
312 ? find_pc_line_symtab (get_frame_pc (get_selected_frame (NULL)))
316 tui_update_source_window_as_is (this, gdbarch, s,
317 content[0].line_or_addr,
321 /* Scroll the source forward or backward horizontally. */
324 tui_source_window_base::do_scroll_horizontal (int num_to_scroll)
326 if (!content.empty ())
328 int offset = horizontal_offset + num_to_scroll;
331 horizontal_offset = offset;
337 /* Set or clear the is_exec_point flag in the line whose line is
341 tui_source_window_base::set_is_exec_point_at (struct tui_line_or_address l)
343 bool changed = false;
347 while (i < content.size ())
350 struct tui_line_or_address content_loa =
351 content[i].line_or_addr;
353 gdb_assert (l.loa == LOA_ADDRESS || l.loa == LOA_LINE);
354 gdb_assert (content_loa.loa == LOA_LINE
355 || content_loa.loa == LOA_ADDRESS);
356 if (content_loa.loa == l.loa
357 && ((l.loa == LOA_LINE && content_loa.u.line_no == l.u.line_no)
358 || (l.loa == LOA_ADDRESS && content_loa.u.addr == l.u.addr)))
362 if (new_state != content[i].is_exec_point)
365 content[i].is_exec_point = new_state;
366 tui_show_source_line (this, i + 1);
374 /* See tui-winsource.h. */
377 tui_update_all_breakpoint_info (struct breakpoint *being_deleted)
379 for (tui_source_window_base *win : tui_source_windows ())
381 if (tui_update_breakpoint_info (win, being_deleted, false))
383 tui_update_exec_info (win);
389 /* Scan the source window and the breakpoints to update the break_mode
390 information for each line.
392 Returns true if something changed and the execution window must be
396 tui_update_breakpoint_info (struct tui_source_window_base *win,
397 struct breakpoint *being_deleted,
401 bool need_refresh = false;
403 for (i = 0; i < win->content.size (); i++)
405 struct breakpoint *bp;
406 extern struct breakpoint *breakpoint_chain;
407 struct tui_source_element *line;
409 line = &win->content[i];
410 if (current_only && !line->is_exec_point)
413 /* Scan each breakpoint to see if the current line has something to
414 do with it. Identify enable/disabled breakpoints as well as
415 those that we already hit. */
416 tui_bp_flags mode = 0;
417 for (bp = breakpoint_chain;
421 struct bp_location *loc;
423 gdb_assert (line->line_or_addr.loa == LOA_LINE
424 || line->line_or_addr.loa == LOA_ADDRESS);
426 if (bp == being_deleted)
429 for (loc = bp->loc; loc != NULL; loc = loc->next)
431 if (win->location_matches_p (loc, i))
433 if (bp->enable_state == bp_disabled)
434 mode |= TUI_BP_DISABLED;
436 mode |= TUI_BP_ENABLED;
440 mode |= TUI_BP_CONDITIONAL;
441 if (bp->type == bp_hardware_breakpoint)
442 mode |= TUI_BP_HARDWARE;
446 if (line->break_mode != mode)
448 line->break_mode = mode;
455 /* See tui-data.h. */
457 tui_exec_info_content *
458 tui_exec_info_window::maybe_allocate_content (int n_elements)
460 if (m_content == nullptr)
461 m_content = XNEWVEC (tui_exec_info_content, n_elements);
466 /* Function to initialize the content of the execution info window,
467 based upon the input window which is either the source or
468 disassembly window. */
470 tui_set_exec_info_content (struct tui_source_window_base *win_info)
472 tui_exec_info_content *content
473 = win_info->execution_info->maybe_allocate_content (win_info->height);
475 tui_update_breakpoint_info (win_info, nullptr, true);
476 for (int i = 0; i < win_info->content.size (); i++)
478 tui_exec_info_content &element = content[i];
479 struct tui_source_element *src_element;
482 src_element = &win_info->content[i];
484 memset (element, ' ', sizeof (tui_exec_info_content));
485 element[TUI_EXECINFO_SIZE - 1] = 0;
487 /* Now update the exec info content based upon the state
488 of each line as indicated by the source content. */
489 mode = src_element->break_mode;
490 if (mode & TUI_BP_HIT)
491 element[TUI_BP_HIT_POS] = (mode & TUI_BP_HARDWARE) ? 'H' : 'B';
492 else if (mode & (TUI_BP_ENABLED | TUI_BP_DISABLED))
493 element[TUI_BP_HIT_POS] = (mode & TUI_BP_HARDWARE) ? 'h' : 'b';
495 if (mode & TUI_BP_ENABLED)
496 element[TUI_BP_BREAK_POS] = '+';
497 else if (mode & TUI_BP_DISABLED)
498 element[TUI_BP_BREAK_POS] = '-';
500 if (src_element->is_exec_point)
501 element[TUI_EXEC_POS] = '>';
507 tui_show_exec_info_content (struct tui_source_window_base *win_info)
509 struct tui_exec_info_window *exec_info = win_info->execution_info;
510 const tui_exec_info_content *content = exec_info->get_content ();
512 werase (exec_info->handle);
513 for (int cur_line = 1; cur_line <= win_info->content.size (); cur_line++)
514 mvwaddstr (exec_info->handle,
517 content[cur_line - 1]);
518 exec_info->refresh_window ();
523 tui_erase_exec_info_content (struct tui_source_window_base *win_info)
525 struct tui_gen_win_info *exec_info = win_info->execution_info;
527 werase (exec_info->handle);
528 exec_info->refresh_window ();
532 tui_clear_exec_info_content (struct tui_source_window_base *win_info)
534 tui_erase_exec_info_content (win_info);
537 /* Function to update the execution info window. */
539 tui_update_exec_info (struct tui_source_window_base *win_info)
541 tui_set_exec_info_content (win_info);
542 tui_show_exec_info_content (win_info);
546 tui_alloc_source_buffer (struct tui_source_window_base *win_info)
548 int i, line_width, max_lines;
550 /* The window width/height includes the highlight box. Determine actual
551 content dimensions, including string null-terminators. */
552 max_lines = win_info->height - 2;
553 line_width = win_info->width - 2 + 1;
555 /* Allocate the buffer for the source lines. */
556 win_info->content.resize (max_lines);
557 for (i = 0; i < max_lines; i++)
559 if (win_info->content[i].line == nullptr)
560 win_info->content[i].line = (char *) xmalloc (line_width);
565 /* Answer whether a particular line number or address is displayed
566 in the current source window. */
568 tui_line_is_displayed (int line,
569 struct tui_source_window_base *win_info,
572 int is_displayed = FALSE;
576 threshold = SCROLL_THRESHOLD;
580 while (i < win_info->content.size () - threshold
584 = win_info->content[i].line_or_addr.loa == LOA_LINE
585 && win_info->content[i].line_or_addr.u.line_no == line;
593 /* Answer whether a particular line number or address is displayed
594 in the current source window. */
596 tui_addr_is_displayed (CORE_ADDR addr,
597 struct tui_source_window_base *win_info,
600 int is_displayed = FALSE;
604 threshold = SCROLL_THRESHOLD;
608 while (i < win_info->content.size () - threshold
612 = win_info->content[i].line_or_addr.loa == LOA_ADDRESS
613 && win_info->content[i].line_or_addr.u.addr == addr;
621 /*****************************************
622 ** STATIC LOCAL FUNCTIONS **
623 ******************************************/