1 /* TUI window generic functions.
3 Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2006, 2007, 2008,
4 2009, 2010 Free Software Foundation, Inc.
6 Contributed by Hewlett-Packard Company.
8 This file is part of GDB.
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 3 of the License, or
13 (at your option) any later version.
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.
20 You should have received a copy of the GNU General Public License
21 along with this program. If not, see <http://www.gnu.org/licenses/>. */
23 /* This module contains procedures for handling tui window functions
24 like resize, scrolling, scrolling, changing focus, etc.
26 Author: Susan B. Macchia */
31 #include "breakpoint.h"
33 #include "cli/cli-cmds.h"
38 #include "tui/tui-data.h"
39 #include "tui/tui-wingeneral.h"
40 #include "tui/tui-stack.h"
41 #include "tui/tui-regs.h"
42 #include "tui/tui-disasm.h"
43 #include "tui/tui-source.h"
44 #include "tui/tui-winsource.h"
45 #include "tui/tui-windata.h"
46 #include "tui/tui-win.h"
48 #include "gdb_curses.h"
50 #include "gdb_string.h"
52 #include "readline/readline.h"
56 /*******************************
58 ********************************/
59 static void make_visible_with_new_height (struct tui_win_info *);
60 static void make_invisible_and_set_new_height (struct tui_win_info *,
62 static enum tui_status tui_adjust_win_heights (struct tui_win_info *,
64 static int new_height_ok (struct tui_win_info *, int);
65 static void tui_set_tab_width_command (char *, int);
66 static void tui_refresh_all_command (char *, int);
67 static void tui_set_win_height_command (char *, int);
68 static void tui_xdb_set_win_height_command (char *, int);
69 static void tui_all_windows_info (char *, int);
70 static void tui_set_focus_command (char *, int);
71 static void tui_scroll_forward_command (char *, int);
72 static void tui_scroll_backward_command (char *, int);
73 static void tui_scroll_left_command (char *, int);
74 static void tui_scroll_right_command (char *, int);
75 static void parse_scrolling_args (char *,
76 struct tui_win_info **,
80 /***************************************
82 ***************************************/
83 #define WIN_HEIGHT_USAGE "Usage: winheight <win_name> [+ | -] <#lines>\n"
84 #define XDBWIN_HEIGHT_USAGE "Usage: w <#lines>\n"
85 #define FOCUS_USAGE "Usage: focus {<win> | next | prev}\n"
87 /***************************************
89 ***************************************/
92 # define ACS_LRCORNER '+'
95 # define ACS_LLCORNER '+'
98 # define ACS_ULCORNER '+'
101 # define ACS_URCORNER '+'
104 # define ACS_HLINE '-'
107 # define ACS_VLINE '|'
110 /* Possible values for tui-border-kind variable. */
111 static const char *tui_border_kind_enums[] = {
118 /* Possible values for tui-border-mode and tui-active-border-mode. */
119 static const char *tui_border_mode_enums[] = {
136 /* Translation table for border-mode variables.
137 The list of values must be terminated by a NULL.
138 After the NULL value, an entry defines the default. */
139 struct tui_translate tui_border_mode_translate[] = {
140 { "normal", A_NORMAL },
141 { "standout", A_STANDOUT },
142 { "reverse", A_REVERSE },
144 { "half-standout", A_DIM | A_STANDOUT },
146 { "bold-standout", A_BOLD | A_STANDOUT },
148 { "normal", A_NORMAL }
151 /* Translation tables for border-kind, one for each border
152 character (see wborder, border curses operations).
153 -1 is used to indicate the ACS because ACS characters
154 are determined at run time by curses (depends on terminal). */
155 struct tui_translate tui_border_kind_translate_vline[] = {
163 struct tui_translate tui_border_kind_translate_hline[] = {
171 struct tui_translate tui_border_kind_translate_ulcorner[] = {
179 struct tui_translate tui_border_kind_translate_urcorner[] = {
187 struct tui_translate tui_border_kind_translate_llcorner[] = {
195 struct tui_translate tui_border_kind_translate_lrcorner[] = {
204 /* Tui configuration variables controlled with set/show command. */
205 const char *tui_active_border_mode = "bold-standout";
207 show_tui_active_border_mode (struct ui_file *file,
209 struct cmd_list_element *c,
212 fprintf_filtered (file, _("\
213 The attribute mode to use for the active TUI window border is \"%s\".\n"),
217 const char *tui_border_mode = "normal";
219 show_tui_border_mode (struct ui_file *file,
221 struct cmd_list_element *c,
224 fprintf_filtered (file, _("\
225 The attribute mode to use for the TUI window borders is \"%s\".\n"),
229 const char *tui_border_kind = "acs";
231 show_tui_border_kind (struct ui_file *file,
233 struct cmd_list_element *c,
236 fprintf_filtered (file, _("The kind of border for TUI windows is \"%s\".\n"),
241 /* Tui internal configuration variables. These variables are updated
242 by tui_update_variables to reflect the tui configuration
244 chtype tui_border_vline;
245 chtype tui_border_hline;
246 chtype tui_border_ulcorner;
247 chtype tui_border_urcorner;
248 chtype tui_border_llcorner;
249 chtype tui_border_lrcorner;
251 int tui_border_attrs;
252 int tui_active_border_attrs;
254 /* Identify the item in the translation table.
255 When the item is not recognized, use the default entry. */
256 static struct tui_translate *
257 translate (const char *name, struct tui_translate *table)
261 if (name && strcmp (table->name, name) == 0)
266 /* Not found, return default entry. */
271 /* Update the tui internal configuration according to gdb settings.
272 Returns 1 if the configuration has changed and the screen should
275 tui_update_variables (void)
278 struct tui_translate *entry;
280 entry = translate (tui_border_mode, tui_border_mode_translate);
281 if (tui_border_attrs != entry->value)
283 tui_border_attrs = entry->value;
286 entry = translate (tui_active_border_mode, tui_border_mode_translate);
287 if (tui_active_border_attrs != entry->value)
289 tui_active_border_attrs = entry->value;
293 /* If one corner changes, all characters are changed.
294 Only check the first one. The ACS characters are determined at
295 run time by curses terminal management. */
296 entry = translate (tui_border_kind, tui_border_kind_translate_lrcorner);
297 if (tui_border_lrcorner != (chtype) entry->value)
299 tui_border_lrcorner = (entry->value < 0) ? ACS_LRCORNER : entry->value;
302 entry = translate (tui_border_kind, tui_border_kind_translate_llcorner);
303 tui_border_llcorner = (entry->value < 0) ? ACS_LLCORNER : entry->value;
305 entry = translate (tui_border_kind, tui_border_kind_translate_ulcorner);
306 tui_border_ulcorner = (entry->value < 0) ? ACS_ULCORNER : entry->value;
308 entry = translate (tui_border_kind, tui_border_kind_translate_urcorner);
309 tui_border_urcorner = (entry->value < 0) ? ACS_URCORNER : entry->value;
311 entry = translate (tui_border_kind, tui_border_kind_translate_hline);
312 tui_border_hline = (entry->value < 0) ? ACS_HLINE : entry->value;
314 entry = translate (tui_border_kind, tui_border_kind_translate_vline);
315 tui_border_vline = (entry->value < 0) ? ACS_VLINE : entry->value;
321 set_tui_cmd (char *args, int from_tty)
326 show_tui_cmd (char *args, int from_tty)
330 static struct cmd_list_element *tuilist;
333 tui_command (char *args, int from_tty)
335 printf_unfiltered (_("\"tui\" must be followed by the name of a "
337 help_list (tuilist, "tui ", -1, gdb_stdout);
340 struct cmd_list_element **
341 tui_get_cmd_list (void)
344 add_prefix_cmd ("tui", class_tui, tui_command,
345 _("Text User Interface commands."),
346 &tuilist, "tui ", 0, &cmdlist);
350 /* Function to initialize gdb commands, for tui window
353 /* Provide a prototype to silence -Wmissing-prototypes. */
354 extern initialize_file_ftype _initialize_tui_win;
357 _initialize_tui_win (void)
359 static struct cmd_list_element *tui_setlist;
360 static struct cmd_list_element *tui_showlist;
362 /* Define the classes of commands.
363 They will appear in the help list in the reverse of this order. */
364 add_prefix_cmd ("tui", class_tui, set_tui_cmd,
365 _("TUI configuration variables"),
366 &tui_setlist, "set tui ",
367 0 /* allow-unknown */, &setlist);
368 add_prefix_cmd ("tui", class_tui, show_tui_cmd,
369 _("TUI configuration variables"),
370 &tui_showlist, "show tui ",
371 0 /* allow-unknown */, &showlist);
373 add_com ("refresh", class_tui, tui_refresh_all_command,
374 _("Refresh the terminal display.\n"));
376 add_com_alias ("U", "refresh", class_tui, 0);
377 add_com ("tabset", class_tui, tui_set_tab_width_command, _("\
378 Set the width (in characters) of tab stops.\n\
379 Usage: tabset <n>\n"));
380 add_com ("winheight", class_tui, tui_set_win_height_command, _("\
381 Set the height of a specified window.\n\
382 Usage: winheight <win_name> [+ | -] <#lines>\n\
384 src : the source window\n\
385 cmd : the command window\n\
386 asm : the disassembly window\n\
387 regs : the register display\n"));
388 add_com_alias ("wh", "winheight", class_tui, 0);
389 add_info ("win", tui_all_windows_info,
390 _("List of all displayed windows.\n"));
391 add_com ("focus", class_tui, tui_set_focus_command, _("\
392 Set focus to named window or next/prev window.\n\
393 Usage: focus {<win> | next | prev}\n\
394 Valid Window names are:\n\
395 src : the source window\n\
396 asm : the disassembly window\n\
397 regs : the register display\n\
398 cmd : the command window\n"));
399 add_com_alias ("fs", "focus", class_tui, 0);
400 add_com ("+", class_tui, tui_scroll_forward_command, _("\
401 Scroll window forward.\n\
402 Usage: + [win] [n]\n"));
403 add_com ("-", class_tui, tui_scroll_backward_command, _("\
404 Scroll window backward.\n\
405 Usage: - [win] [n]\n"));
406 add_com ("<", class_tui, tui_scroll_left_command, _("\
407 Scroll window forward.\n\
408 Usage: < [win] [n]\n"));
409 add_com (">", class_tui, tui_scroll_right_command, _("\
410 Scroll window backward.\n\
411 Usage: > [win] [n]\n"));
413 add_com ("w", class_xdb, tui_xdb_set_win_height_command, _("\
414 XDB compatibility command for setting the height of a command window.\n\
415 Usage: w <#lines>\n"));
417 /* Define the tui control variables. */
418 add_setshow_enum_cmd ("border-kind", no_class, tui_border_kind_enums,
419 &tui_border_kind, _("\
420 Set the kind of border for TUI windows."), _("\
421 Show the kind of border for TUI windows."), _("\
422 This variable controls the border of TUI windows:\n\
423 space use a white space\n\
424 ascii use ascii characters + - | for the border\n\
425 acs use the Alternate Character Set"),
427 show_tui_border_kind,
428 &tui_setlist, &tui_showlist);
430 add_setshow_enum_cmd ("border-mode", no_class, tui_border_mode_enums,
431 &tui_border_mode, _("\
432 Set the attribute mode to use for the TUI window borders."), _("\
433 Show the attribute mode to use for the TUI window borders."), _("\
434 This variable controls the attributes to use for the window borders:\n\
435 normal normal display\n\
436 standout use highlight mode of terminal\n\
437 reverse use reverse video mode\n\
438 half use half bright\n\
439 half-standout use half bright and standout mode\n\
440 bold use extra bright or bold\n\
441 bold-standout use extra bright or bold with standout mode"),
443 show_tui_border_mode,
444 &tui_setlist, &tui_showlist);
446 add_setshow_enum_cmd ("active-border-mode", no_class, tui_border_mode_enums,
447 &tui_active_border_mode, _("\
448 Set the attribute mode to use for the active TUI window border."), _("\
449 Show the attribute mode to use for the active TUI window border."), _("\
450 This variable controls the attributes to use for the active window border:\n\
451 normal normal display\n\
452 standout use highlight mode of terminal\n\
453 reverse use reverse video mode\n\
454 half use half bright\n\
455 half-standout use half bright and standout mode\n\
456 bold use extra bright or bold\n\
457 bold-standout use extra bright or bold with standout mode"),
459 show_tui_active_border_mode,
460 &tui_setlist, &tui_showlist);
463 /* Update gdb's knowledge of the terminal size. */
465 tui_update_gdb_sizes (void)
469 /* Set to TUI command window dimension or use readline values. */
470 sprintf (cmd, "set width %d",
471 tui_active ? TUI_CMD_WIN->generic.width : tui_term_width());
472 execute_command (cmd, 0);
473 sprintf (cmd, "set height %d",
474 tui_active ? TUI_CMD_WIN->generic.height : tui_term_height());
475 execute_command (cmd, 0);
479 /* Set the logical focus to win_info. */
481 tui_set_win_focus_to (struct tui_win_info *win_info)
483 if (win_info != NULL)
485 struct tui_win_info *win_with_focus = tui_win_with_focus ();
487 if (win_with_focus != NULL
488 && win_with_focus->generic.type != CMD_WIN)
489 tui_unhighlight_win (win_with_focus);
490 tui_set_win_with_focus (win_info);
491 if (win_info->generic.type != CMD_WIN)
492 tui_highlight_win (win_info);
498 tui_scroll_forward (struct tui_win_info *win_to_scroll,
501 if (win_to_scroll != TUI_CMD_WIN)
503 int _num_to_scroll = num_to_scroll;
505 if (num_to_scroll == 0)
506 _num_to_scroll = win_to_scroll->generic.height - 3;
508 /* If we are scrolling the source or disassembly window, do a
509 "psuedo" scroll since not all of the source is in memory,
510 only what is in the viewport. If win_to_scroll is the
511 command window do nothing since the term should handle
513 if (win_to_scroll == TUI_SRC_WIN)
514 tui_vertical_source_scroll (FORWARD_SCROLL, _num_to_scroll);
515 else if (win_to_scroll == TUI_DISASM_WIN)
516 tui_vertical_disassem_scroll (FORWARD_SCROLL, _num_to_scroll);
517 else if (win_to_scroll == TUI_DATA_WIN)
518 tui_vertical_data_scroll (FORWARD_SCROLL, _num_to_scroll);
523 tui_scroll_backward (struct tui_win_info *win_to_scroll,
526 if (win_to_scroll != TUI_CMD_WIN)
528 int _num_to_scroll = num_to_scroll;
530 if (num_to_scroll == 0)
531 _num_to_scroll = win_to_scroll->generic.height - 3;
533 /* If we are scrolling the source or disassembly window, do a
534 "psuedo" scroll since not all of the source is in memory,
535 only what is in the viewport. If win_to_scroll is the
536 command window do nothing since the term should handle
538 if (win_to_scroll == TUI_SRC_WIN)
539 tui_vertical_source_scroll (BACKWARD_SCROLL, _num_to_scroll);
540 else if (win_to_scroll == TUI_DISASM_WIN)
541 tui_vertical_disassem_scroll (BACKWARD_SCROLL, _num_to_scroll);
542 else if (win_to_scroll == TUI_DATA_WIN)
543 tui_vertical_data_scroll (BACKWARD_SCROLL, _num_to_scroll);
549 tui_scroll_left (struct tui_win_info *win_to_scroll,
552 if (win_to_scroll != TUI_CMD_WIN)
554 int _num_to_scroll = num_to_scroll;
556 if (_num_to_scroll == 0)
559 /* If we are scrolling the source or disassembly window, do a
560 "psuedo" scroll since not all of the source is in memory,
561 only what is in the viewport. If win_to_scroll is the command
562 window do nothing since the term should handle it. */
563 if (win_to_scroll == TUI_SRC_WIN
564 || win_to_scroll == TUI_DISASM_WIN)
565 tui_horizontal_source_scroll (win_to_scroll, LEFT_SCROLL, _num_to_scroll);
571 tui_scroll_right (struct tui_win_info *win_to_scroll,
574 if (win_to_scroll != TUI_CMD_WIN)
576 int _num_to_scroll = num_to_scroll;
578 if (_num_to_scroll == 0)
581 /* If we are scrolling the source or disassembly window, do a
582 "psuedo" scroll since not all of the source is in memory,
583 only what is in the viewport. If win_to_scroll is the command
584 window do nothing since the term should handle it. */
585 if (win_to_scroll == TUI_SRC_WIN
586 || win_to_scroll == TUI_DISASM_WIN)
587 tui_horizontal_source_scroll (win_to_scroll, RIGHT_SCROLL, _num_to_scroll);
592 /* Scroll a window. Arguments are passed through a va_list. */
594 tui_scroll (enum tui_scroll_direction direction,
595 struct tui_win_info *win_to_scroll,
601 tui_scroll_forward (win_to_scroll, num_to_scroll);
603 case BACKWARD_SCROLL:
604 tui_scroll_backward (win_to_scroll, num_to_scroll);
607 tui_scroll_left (win_to_scroll, num_to_scroll);
610 tui_scroll_right (win_to_scroll, num_to_scroll);
619 tui_refresh_all_win (void)
621 enum tui_win_type type;
623 clearok (curscr, TRUE);
624 tui_refresh_all (tui_win_list);
625 for (type = SRC_WIN; type < MAX_MAJOR_WINDOWS; type++)
627 if (tui_win_list[type]
628 && tui_win_list[type]->generic.is_visible)
634 tui_show_source_content (tui_win_list[type]);
635 tui_check_and_display_highlight_if_needed (tui_win_list[type]);
636 tui_erase_exec_info_content (tui_win_list[type]);
637 tui_update_exec_info (tui_win_list[type]);
640 tui_refresh_data_win ();
647 tui_show_locator_content ();
651 /* Resize all the windows based on the the terminal size. This
652 function gets called from within the readline sinwinch handler. */
654 tui_resize_all (void)
656 int height_diff, width_diff;
657 int screenheight, screenwidth;
659 rl_get_screen_size (&screenheight, &screenwidth);
660 width_diff = screenwidth - tui_term_width ();
661 height_diff = screenheight - tui_term_height ();
662 if (height_diff || width_diff)
664 enum tui_layout_type cur_layout = tui_current_layout ();
665 struct tui_win_info *win_with_focus = tui_win_with_focus ();
666 struct tui_win_info *first_win;
667 struct tui_win_info *second_win;
668 struct tui_gen_win_info *locator = tui_locator_win_info_ptr ();
669 enum tui_win_type win_type;
670 int new_height, split_diff, cmd_split_diff, num_wins_displayed = 2;
672 #ifdef HAVE_RESIZE_TERM
673 resize_term (screenheight, screenwidth);
675 /* Turn keypad off while we resize. */
676 if (win_with_focus != TUI_CMD_WIN)
677 keypad (TUI_CMD_WIN->generic.handle, FALSE);
678 tui_update_gdb_sizes ();
679 tui_set_term_height_to (screenheight);
680 tui_set_term_width_to (screenwidth);
681 if (cur_layout == SRC_DISASSEM_COMMAND
682 || cur_layout == SRC_DATA_COMMAND
683 || cur_layout == DISASSEM_DATA_COMMAND)
684 num_wins_displayed++;
685 split_diff = height_diff / num_wins_displayed;
686 cmd_split_diff = split_diff;
687 if (height_diff % num_wins_displayed)
694 /* Now adjust each window. */
700 case DISASSEM_COMMAND:
701 first_win = (struct tui_win_info *) (tui_source_windows ())->list[0];
702 first_win->generic.width += width_diff;
703 locator->width += width_diff;
704 /* Check for invalid heights. */
705 if (height_diff == 0)
706 new_height = first_win->generic.height;
707 else if ((first_win->generic.height + split_diff) >=
708 (screenheight - MIN_CMD_WIN_HEIGHT - 1))
709 new_height = screenheight - MIN_CMD_WIN_HEIGHT - 1;
710 else if ((first_win->generic.height + split_diff) <= 0)
711 new_height = MIN_WIN_HEIGHT;
713 new_height = first_win->generic.height + split_diff;
715 make_invisible_and_set_new_height (first_win, new_height);
716 TUI_CMD_WIN->generic.origin.y = locator->origin.y + 1;
717 TUI_CMD_WIN->generic.width += width_diff;
718 new_height = screenheight - TUI_CMD_WIN->generic.origin.y;
719 make_invisible_and_set_new_height (TUI_CMD_WIN, new_height);
720 make_visible_with_new_height (first_win);
721 make_visible_with_new_height (TUI_CMD_WIN);
722 if (first_win->generic.content_size <= 0)
723 tui_erase_source_content (first_win, EMPTY_SOURCE_PROMPT);
726 if (cur_layout == SRC_DISASSEM_COMMAND)
728 first_win = TUI_SRC_WIN;
729 first_win->generic.width += width_diff;
730 second_win = TUI_DISASM_WIN;
731 second_win->generic.width += width_diff;
735 first_win = TUI_DATA_WIN;
736 first_win->generic.width += width_diff;
737 second_win = (struct tui_win_info *) (tui_source_windows ())->list[0];
738 second_win->generic.width += width_diff;
740 /* Change the first window's height/width. */
741 /* Check for invalid heights. */
742 if (height_diff == 0)
743 new_height = first_win->generic.height;
744 else if ((first_win->generic.height +
745 second_win->generic.height + (split_diff * 2)) >=
746 (screenheight - MIN_CMD_WIN_HEIGHT - 1))
747 new_height = (screenheight - MIN_CMD_WIN_HEIGHT - 1) / 2;
748 else if ((first_win->generic.height + split_diff) <= 0)
749 new_height = MIN_WIN_HEIGHT;
751 new_height = first_win->generic.height + split_diff;
752 make_invisible_and_set_new_height (first_win, new_height);
754 locator->width += width_diff;
756 /* Change the second window's height/width. */
757 /* Check for invalid heights. */
758 if (height_diff == 0)
759 new_height = second_win->generic.height;
760 else if ((first_win->generic.height +
761 second_win->generic.height + (split_diff * 2)) >=
762 (screenheight - MIN_CMD_WIN_HEIGHT - 1))
764 new_height = screenheight - MIN_CMD_WIN_HEIGHT - 1;
766 new_height = (new_height / 2) + 1;
770 else if ((second_win->generic.height + split_diff) <= 0)
771 new_height = MIN_WIN_HEIGHT;
773 new_height = second_win->generic.height + split_diff;
774 second_win->generic.origin.y = first_win->generic.height - 1;
775 make_invisible_and_set_new_height (second_win, new_height);
777 /* Change the command window's height/width. */
778 TUI_CMD_WIN->generic.origin.y = locator->origin.y + 1;
779 make_invisible_and_set_new_height (
780 TUI_CMD_WIN, TUI_CMD_WIN->generic.height + cmd_split_diff);
781 make_visible_with_new_height (first_win);
782 make_visible_with_new_height (second_win);
783 make_visible_with_new_height (TUI_CMD_WIN);
784 if (first_win->generic.content_size <= 0)
785 tui_erase_source_content (first_win, EMPTY_SOURCE_PROMPT);
786 if (second_win->generic.content_size <= 0)
787 tui_erase_source_content (second_win, EMPTY_SOURCE_PROMPT);
790 /* Now remove all invisible windows, and their content so that
791 they get created again when called for with the new size. */
792 for (win_type = SRC_WIN; (win_type < MAX_MAJOR_WINDOWS); win_type++)
794 if (win_type != CMD_WIN
795 && (tui_win_list[win_type] != NULL)
796 && !tui_win_list[win_type]->generic.is_visible)
798 tui_free_window (tui_win_list[win_type]);
799 tui_win_list[win_type] = (struct tui_win_info *) NULL;
802 tui_set_win_resized_to (TRUE);
803 /* Turn keypad back on, unless focus is in the command
805 if (win_with_focus != TUI_CMD_WIN)
806 keypad (TUI_CMD_WIN->generic.handle, TRUE);
811 /* SIGWINCH signal handler for the tui. This signal handler is always
812 called, even when the readline package clears signals because it is
813 set as the old_sigwinch() (TUI only). */
815 tui_sigwinch_handler (int signal)
817 /* Say that a resize was done so that the readline can do it later
819 tui_set_win_resized_to (TRUE);
823 /* Initializes SIGWINCH signal handler for the tui. */
825 tui_initialize_win (void)
828 #ifdef HAVE_SIGACTION
829 struct sigaction old_winch;
831 memset (&old_winch, 0, sizeof (old_winch));
832 old_winch.sa_handler = &tui_sigwinch_handler;
833 sigaction (SIGWINCH, &old_winch, NULL);
835 signal (SIGWINCH, &tui_sigwinch_handler);
841 /*************************
842 ** STATIC LOCAL FUNCTIONS
843 **************************/
847 tui_scroll_forward_command (char *arg, int from_tty)
849 int num_to_scroll = 1;
850 struct tui_win_info *win_to_scroll;
852 /* Make sure the curses mode is enabled. */
854 if (arg == (char *) NULL)
855 parse_scrolling_args (arg, &win_to_scroll, (int *) NULL);
857 parse_scrolling_args (arg, &win_to_scroll, &num_to_scroll);
858 tui_scroll (FORWARD_SCROLL, win_to_scroll, num_to_scroll);
863 tui_scroll_backward_command (char *arg, int from_tty)
865 int num_to_scroll = 1;
866 struct tui_win_info *win_to_scroll;
868 /* Make sure the curses mode is enabled. */
870 if (arg == (char *) NULL)
871 parse_scrolling_args (arg, &win_to_scroll, (int *) NULL);
873 parse_scrolling_args (arg, &win_to_scroll, &num_to_scroll);
874 tui_scroll (BACKWARD_SCROLL, win_to_scroll, num_to_scroll);
879 tui_scroll_left_command (char *arg, int from_tty)
882 struct tui_win_info *win_to_scroll;
884 /* Make sure the curses mode is enabled. */
886 parse_scrolling_args (arg, &win_to_scroll, &num_to_scroll);
887 tui_scroll (LEFT_SCROLL, win_to_scroll, num_to_scroll);
892 tui_scroll_right_command (char *arg, int from_tty)
895 struct tui_win_info *win_to_scroll;
897 /* Make sure the curses mode is enabled. */
899 parse_scrolling_args (arg, &win_to_scroll, &num_to_scroll);
900 tui_scroll (RIGHT_SCROLL, win_to_scroll, num_to_scroll);
904 /* Set focus to the window named by 'arg'. */
906 tui_set_focus (char *arg, int from_tty)
908 if (arg != (char *) NULL)
910 char *buf_ptr = (char *) xstrdup (arg);
912 struct tui_win_info *win_info = (struct tui_win_info *) NULL;
914 for (i = 0; (i < strlen (buf_ptr)); i++)
915 buf_ptr[i] = toupper (arg[i]);
917 if (subset_compare (buf_ptr, "NEXT"))
918 win_info = tui_next_win (tui_win_with_focus ());
919 else if (subset_compare (buf_ptr, "PREV"))
920 win_info = tui_prev_win (tui_win_with_focus ());
922 win_info = tui_partial_win_by_name (buf_ptr);
924 if (win_info == (struct tui_win_info *) NULL
925 || !win_info->generic.is_visible)
926 warning (_("Invalid window specified. \n\
927 The window name specified must be valid and visible.\n"));
930 tui_set_win_focus_to (win_info);
931 keypad (TUI_CMD_WIN->generic.handle, (win_info != TUI_CMD_WIN));
934 if (TUI_DATA_WIN && TUI_DATA_WIN->generic.is_visible)
935 tui_refresh_data_win ();
937 printf_filtered (_("Focus set to %s window.\n"),
938 tui_win_name ((struct tui_gen_win_info *) tui_win_with_focus ()));
941 warning (_("Incorrect Number of Arguments.\n%s"), FOCUS_USAGE);
945 tui_set_focus_command (char *arg, int from_tty)
947 /* Make sure the curses mode is enabled. */
949 tui_set_focus (arg, from_tty);
954 tui_all_windows_info (char *arg, int from_tty)
956 enum tui_win_type type;
957 struct tui_win_info *win_with_focus = tui_win_with_focus ();
959 for (type = SRC_WIN; (type < MAX_MAJOR_WINDOWS); type++)
960 if (tui_win_list[type]
961 && tui_win_list[type]->generic.is_visible)
963 if (win_with_focus == tui_win_list[type])
964 printf_filtered (" %s\t(%d lines) <has focus>\n",
965 tui_win_name (&tui_win_list[type]->generic),
966 tui_win_list[type]->generic.height);
968 printf_filtered (" %s\t(%d lines)\n",
969 tui_win_name (&tui_win_list[type]->generic),
970 tui_win_list[type]->generic.height);
976 tui_refresh_all_command (char *arg, int from_tty)
978 /* Make sure the curses mode is enabled. */
981 tui_refresh_all_win ();
985 /* Set the height of the specified window. */
987 tui_set_tab_width_command (char *arg, int from_tty)
989 /* Make sure the curses mode is enabled. */
991 if (arg != (char *) NULL)
997 tui_set_default_tab_len (ts);
999 warning (_("Tab widths greater than 0 must be specified."));
1004 /* Set the height of the specified window. */
1006 tui_set_win_height (char *arg, int from_tty)
1008 /* Make sure the curses mode is enabled. */
1010 if (arg != (char *) NULL)
1012 char *buf = xstrdup (arg);
1013 char *buf_ptr = buf;
1014 char *wname = (char *) NULL;
1016 struct tui_win_info *win_info;
1019 buf_ptr = strchr (buf_ptr, ' ');
1020 if (buf_ptr != (char *) NULL)
1022 *buf_ptr = (char) 0;
1024 /* Validate the window name. */
1025 for (i = 0; i < strlen (wname); i++)
1026 wname[i] = toupper (wname[i]);
1027 win_info = tui_partial_win_by_name (wname);
1029 if (win_info == (struct tui_win_info *) NULL
1030 || !win_info->generic.is_visible)
1031 warning (_("Invalid window specified. \n\
1032 The window name specified must be valid and visible.\n"));
1035 /* Process the size. */
1036 while (*(++buf_ptr) == ' ')
1039 if (*buf_ptr != (char) 0)
1042 int fixed_size = TRUE;
1045 if (*buf_ptr == '+' || *buf_ptr == '-')
1047 if (*buf_ptr == '-')
1052 input_no = atoi (buf_ptr);
1058 new_height = input_no;
1060 new_height = win_info->generic.height + input_no;
1062 /* Now change the window's height, and adjust
1063 all other windows around it. */
1064 if (tui_adjust_win_heights (win_info,
1065 new_height) == TUI_FAILURE)
1066 warning (_("Invalid window height specified.\n%s"),
1069 tui_update_gdb_sizes ();
1072 warning (_("Invalid window height specified.\n%s"),
1078 printf_filtered (WIN_HEIGHT_USAGE);
1080 if (buf != (char *) NULL)
1084 printf_filtered (WIN_HEIGHT_USAGE);
1087 /* Set the height of the specified window, with va_list. */
1089 tui_set_win_height_command (char *arg, int from_tty)
1091 /* Make sure the curses mode is enabled. */
1093 tui_set_win_height (arg, from_tty);
1097 /* XDB Compatibility command for setting the window height. This will
1098 increase or decrease the command window by the specified
1101 tui_xdb_set_win_height (char *arg, int from_tty)
1103 /* Make sure the curses mode is enabled. */
1105 if (arg != (char *) NULL)
1107 int input_no = atoi (arg);
1110 { /* Add 1 for the locator. */
1111 int new_height = tui_term_height () - (input_no + 1);
1113 if (!new_height_ok (tui_win_list[CMD_WIN], new_height)
1114 || tui_adjust_win_heights (tui_win_list[CMD_WIN],
1115 new_height) == TUI_FAILURE)
1116 warning (_("Invalid window height specified.\n%s"),
1117 XDBWIN_HEIGHT_USAGE);
1120 warning (_("Invalid window height specified.\n%s"),
1121 XDBWIN_HEIGHT_USAGE);
1124 warning (_("Invalid window height specified.\n%s"), XDBWIN_HEIGHT_USAGE);
1127 /* Set the height of the specified window, with va_list. */
1129 tui_xdb_set_win_height_command (char *arg, int from_tty)
1131 tui_xdb_set_win_height (arg, from_tty);
1135 /* Function to adjust all window heights around the primary. */
1136 static enum tui_status
1137 tui_adjust_win_heights (struct tui_win_info *primary_win_info,
1140 enum tui_status status = TUI_FAILURE;
1142 if (new_height_ok (primary_win_info, new_height))
1144 status = TUI_SUCCESS;
1145 if (new_height != primary_win_info->generic.height)
1148 struct tui_win_info *win_info;
1149 struct tui_gen_win_info *locator = tui_locator_win_info_ptr ();
1150 enum tui_layout_type cur_layout = tui_current_layout ();
1152 diff = (new_height - primary_win_info->generic.height) * (-1);
1153 if (cur_layout == SRC_COMMAND
1154 || cur_layout == DISASSEM_COMMAND)
1156 struct tui_win_info *src_win_info;
1158 make_invisible_and_set_new_height (primary_win_info, new_height);
1159 if (primary_win_info->generic.type == CMD_WIN)
1161 win_info = (tui_source_windows ())->list[0];
1162 src_win_info = win_info;
1166 win_info = tui_win_list[CMD_WIN];
1167 src_win_info = primary_win_info;
1169 make_invisible_and_set_new_height (win_info,
1170 win_info->generic.height + diff);
1171 TUI_CMD_WIN->generic.origin.y = locator->origin.y + 1;
1172 make_visible_with_new_height (win_info);
1173 make_visible_with_new_height (primary_win_info);
1174 if (src_win_info->generic.content_size <= 0)
1175 tui_erase_source_content (src_win_info, EMPTY_SOURCE_PROMPT);
1179 struct tui_win_info *first_win;
1180 struct tui_win_info *second_win;
1182 if (cur_layout == SRC_DISASSEM_COMMAND)
1184 first_win = TUI_SRC_WIN;
1185 second_win = TUI_DISASM_WIN;
1189 first_win = TUI_DATA_WIN;
1190 second_win = (tui_source_windows ())->list[0];
1192 if (primary_win_info == TUI_CMD_WIN)
1193 { /* Split the change in height accross the 1st & 2nd
1194 windows, adjusting them as well. */
1195 /* Subtract the locator. */
1196 int first_split_diff = diff / 2;
1197 int second_split_diff = first_split_diff;
1201 if (first_win->generic.height >
1202 second_win->generic.height)
1210 second_split_diff--;
1212 second_split_diff++;
1215 /* Make sure that the minimum hieghts are
1217 while ((first_win->generic.height + first_split_diff) < 3)
1220 second_split_diff--;
1222 while ((second_win->generic.height + second_split_diff) < 3)
1224 second_split_diff++;
1227 make_invisible_and_set_new_height (
1229 first_win->generic.height + first_split_diff);
1230 second_win->generic.origin.y = first_win->generic.height - 1;
1231 make_invisible_and_set_new_height (
1232 second_win, second_win->generic.height + second_split_diff);
1233 TUI_CMD_WIN->generic.origin.y = locator->origin.y + 1;
1234 make_invisible_and_set_new_height (TUI_CMD_WIN, new_height);
1238 if ((TUI_CMD_WIN->generic.height + diff) < 1)
1239 { /* If there is no way to increase the command
1240 window take real estate from the 1st or 2nd
1242 if ((TUI_CMD_WIN->generic.height + diff) < 1)
1246 for (i = TUI_CMD_WIN->generic.height + diff;
1248 if (primary_win_info == first_win)
1249 second_win->generic.height--;
1251 first_win->generic.height--;
1254 if (primary_win_info == first_win)
1255 make_invisible_and_set_new_height (first_win, new_height);
1257 make_invisible_and_set_new_height (
1259 first_win->generic.height);
1260 second_win->generic.origin.y = first_win->generic.height - 1;
1261 if (primary_win_info == second_win)
1262 make_invisible_and_set_new_height (second_win, new_height);
1264 make_invisible_and_set_new_height (
1265 second_win, second_win->generic.height);
1266 TUI_CMD_WIN->generic.origin.y = locator->origin.y + 1;
1267 if ((TUI_CMD_WIN->generic.height + diff) < 1)
1268 make_invisible_and_set_new_height (TUI_CMD_WIN, 1);
1270 make_invisible_and_set_new_height (
1271 TUI_CMD_WIN, TUI_CMD_WIN->generic.height + diff);
1273 make_visible_with_new_height (TUI_CMD_WIN);
1274 make_visible_with_new_height (second_win);
1275 make_visible_with_new_height (first_win);
1276 if (first_win->generic.content_size <= 0)
1277 tui_erase_source_content (first_win, EMPTY_SOURCE_PROMPT);
1278 if (second_win->generic.content_size <= 0)
1279 tui_erase_source_content (second_win, EMPTY_SOURCE_PROMPT);
1288 /* Function make the target window (and auxillary windows associated
1289 with the targer) invisible, and set the new height and
1292 make_invisible_and_set_new_height (struct tui_win_info *win_info,
1296 struct tui_gen_win_info *gen_win_info;
1298 tui_make_invisible (&win_info->generic);
1299 win_info->generic.height = height;
1301 win_info->generic.viewport_height = height - 1;
1303 win_info->generic.viewport_height = height;
1304 if (win_info != TUI_CMD_WIN)
1305 win_info->generic.viewport_height--;
1307 /* Now deal with the auxillary windows associated with win_info. */
1308 switch (win_info->generic.type)
1312 gen_win_info = win_info->detail.source_info.execution_info;
1313 tui_make_invisible (gen_win_info);
1314 gen_win_info->height = height;
1315 gen_win_info->origin.y = win_info->generic.origin.y;
1317 gen_win_info->viewport_height = height - 1;
1319 gen_win_info->viewport_height = height;
1320 if (win_info != TUI_CMD_WIN)
1321 gen_win_info->viewport_height--;
1323 if (tui_win_has_locator (win_info))
1325 gen_win_info = tui_locator_win_info_ptr ();
1326 tui_make_invisible (gen_win_info);
1327 gen_win_info->origin.y = win_info->generic.origin.y + height;
1331 /* Delete all data item windows. */
1332 for (i = 0; i < win_info->generic.content_size; i++)
1334 gen_win_info = (struct tui_gen_win_info *) & ((struct tui_win_element *)
1335 win_info->generic.content[i])->which_element.data_window;
1336 tui_delete_win (gen_win_info->handle);
1337 gen_win_info->handle = (WINDOW *) NULL;
1346 /* Function to make the windows with new heights visible. This means
1347 re-creating the windows' content since the window had to be
1348 destroyed to be made invisible. */
1350 make_visible_with_new_height (struct tui_win_info *win_info)
1354 tui_make_visible (&win_info->generic);
1355 tui_check_and_display_highlight_if_needed (win_info);
1356 switch (win_info->generic.type)
1360 tui_free_win_content (win_info->detail.source_info.execution_info);
1361 tui_make_visible (win_info->detail.source_info.execution_info);
1362 if (win_info->generic.content != NULL)
1364 struct gdbarch *gdbarch = win_info->detail.source_info.gdbarch;
1365 struct tui_line_or_address line_or_addr;
1366 struct symtab_and_line cursal
1367 = get_current_source_symtab_and_line ();
1369 line_or_addr = win_info->detail.source_info.start_line_or_addr;
1370 tui_free_win_content (&win_info->generic);
1371 tui_update_source_window (win_info, gdbarch,
1372 cursal.symtab, line_or_addr, TRUE);
1374 else if (deprecated_safe_get_selected_frame () != NULL)
1376 struct tui_line_or_address line;
1377 struct symtab_and_line cursal = get_current_source_symtab_and_line ();
1378 struct frame_info *frame = deprecated_safe_get_selected_frame ();
1379 struct gdbarch *gdbarch = get_frame_arch (frame);
1381 s = find_pc_symtab (get_frame_pc (frame));
1382 if (win_info->generic.type == SRC_WIN)
1384 line.loa = LOA_LINE;
1385 line.u.line_no = cursal.line;
1389 line.loa = LOA_ADDRESS;
1390 find_line_pc (s, cursal.line, &line.u.addr);
1392 tui_update_source_window (win_info, gdbarch, s, line, TRUE);
1394 if (tui_win_has_locator (win_info))
1396 tui_make_visible (tui_locator_win_info_ptr ());
1397 tui_show_locator_content ();
1401 tui_display_all_data ();
1404 win_info->detail.command_info.cur_line = 0;
1405 win_info->detail.command_info.curch = 0;
1406 wmove (win_info->generic.handle,
1407 win_info->detail.command_info.cur_line,
1408 win_info->detail.command_info.curch);
1417 new_height_ok (struct tui_win_info *primary_win_info,
1420 int ok = (new_height < tui_term_height ());
1425 enum tui_layout_type cur_layout = tui_current_layout ();
1427 diff = (new_height - primary_win_info->generic.height) * (-1);
1428 if (cur_layout == SRC_COMMAND || cur_layout == DISASSEM_COMMAND)
1430 ok = ((primary_win_info->generic.type == CMD_WIN
1431 && new_height <= (tui_term_height () - 4)
1432 && new_height >= MIN_CMD_WIN_HEIGHT)
1433 || (primary_win_info->generic.type != CMD_WIN
1434 && new_height <= (tui_term_height () - 2)
1435 && new_height >= MIN_WIN_HEIGHT));
1437 { /* Check the total height. */
1438 struct tui_win_info *win_info;
1440 if (primary_win_info == TUI_CMD_WIN)
1441 win_info = (tui_source_windows ())->list[0];
1443 win_info = TUI_CMD_WIN;
1445 (win_info->generic.height + diff)) <= tui_term_height ());
1450 int cur_total_height, total_height, min_height = 0;
1451 struct tui_win_info *first_win;
1452 struct tui_win_info *second_win;
1454 if (cur_layout == SRC_DISASSEM_COMMAND)
1456 first_win = TUI_SRC_WIN;
1457 second_win = TUI_DISASM_WIN;
1461 first_win = TUI_DATA_WIN;
1462 second_win = (tui_source_windows ())->list[0];
1464 /* We could simply add all the heights to obtain the same
1465 result but below is more explicit since we subtract 1 for
1466 the line that the first and second windows share, and add
1467 one for the locator. */
1468 total_height = cur_total_height =
1469 (first_win->generic.height + second_win->generic.height - 1)
1470 + TUI_CMD_WIN->generic.height + 1; /* Locator. */
1471 if (primary_win_info == TUI_CMD_WIN)
1473 /* Locator included since first & second win share a line. */
1474 ok = ((first_win->generic.height +
1475 second_win->generic.height + diff) >=
1476 (MIN_WIN_HEIGHT * 2)
1477 && new_height >= MIN_CMD_WIN_HEIGHT);
1480 total_height = new_height +
1481 (first_win->generic.height +
1482 second_win->generic.height + diff);
1483 min_height = MIN_CMD_WIN_HEIGHT;
1488 min_height = MIN_WIN_HEIGHT;
1490 /* First see if we can increase/decrease the command
1491 window. And make sure that the command window is at
1493 ok = ((TUI_CMD_WIN->generic.height + diff) > 0);
1495 { /* Looks like we have to increase/decrease one of
1496 the other windows. */
1497 if (primary_win_info == first_win)
1498 ok = (second_win->generic.height + diff) >= min_height;
1500 ok = (first_win->generic.height + diff) >= min_height;
1504 if (primary_win_info == first_win)
1505 total_height = new_height +
1506 second_win->generic.height +
1507 TUI_CMD_WIN->generic.height + diff;
1509 total_height = new_height +
1510 first_win->generic.height +
1511 TUI_CMD_WIN->generic.height + diff;
1514 /* Now make sure that the proposed total height doesn't
1515 exceed the old total height. */
1517 ok = (new_height >= min_height
1518 && total_height <= cur_total_height);
1527 parse_scrolling_args (char *arg,
1528 struct tui_win_info **win_to_scroll,
1533 *win_to_scroll = tui_win_with_focus ();
1535 /* First set up the default window to scroll, in case there is no
1537 if (arg != (char *) NULL)
1539 char *buf, *buf_ptr;
1541 /* Process the number of lines to scroll. */
1542 buf = buf_ptr = xstrdup (arg);
1543 if (isdigit (*buf_ptr))
1548 buf_ptr = strchr (buf_ptr, ' ');
1549 if (buf_ptr != (char *) NULL)
1551 *buf_ptr = (char) 0;
1553 *num_to_scroll = atoi (num_str);
1556 else if (num_to_scroll)
1557 *num_to_scroll = atoi (num_str);
1560 /* Process the window name if one is specified. */
1561 if (buf_ptr != (char *) NULL)
1566 if (*buf_ptr == ' ')
1567 while (*(++buf_ptr) == ' ')
1570 if (*buf_ptr != (char) 0)
1575 /* Validate the window name. */
1576 for (i = 0; i < strlen (wname); i++)
1577 wname[i] = toupper (wname[i]);
1578 *win_to_scroll = tui_partial_win_by_name (wname);
1580 if (*win_to_scroll == (struct tui_win_info *) NULL
1581 || !(*win_to_scroll)->generic.is_visible)
1582 error (_("Invalid window specified. \n\
1583 The window name specified must be valid and visible.\n"));
1584 else if (*win_to_scroll == TUI_CMD_WIN)
1585 *win_to_scroll = (tui_source_windows ())->list[0];