1 /* TUI window generic functions.
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/>. */
22 /* This module contains procedures for handling tui window functions
23 like resize, scrolling, scrolling, changing focus, etc.
25 Author: Susan B. Macchia */
30 #include "breakpoint.h"
32 #include "cli/cli-cmds.h"
35 #include "event-loop.h"
38 #include "tui/tui-io.h"
39 #include "tui/tui-data.h"
40 #include "tui/tui-wingeneral.h"
41 #include "tui/tui-stack.h"
42 #include "tui/tui-regs.h"
43 #include "tui/tui-disasm.h"
44 #include "tui/tui-source.h"
45 #include "tui/tui-winsource.h"
46 #include "tui/tui-windata.h"
47 #include "tui/tui-win.h"
49 #include "gdb_curses.h"
51 #include "readline/readline.h"
55 /*******************************
57 ********************************/
58 static void make_visible_with_new_height (struct tui_win_info
*);
59 static void make_invisible_and_set_new_height (struct tui_win_info
*,
61 static enum tui_status
tui_adjust_win_heights (struct tui_win_info
*,
63 static int new_height_ok (struct tui_win_info
*, int);
64 static void tui_set_tab_width_command (const char *, int);
65 static void tui_refresh_all_command (const char *, int);
66 static void tui_set_win_height_command (const char *, int);
67 static void tui_all_windows_info (const char *, int);
68 static void tui_set_focus_command (const char *, int);
69 static void tui_scroll_forward_command (const char *, int);
70 static void tui_scroll_backward_command (const char *, int);
71 static void tui_scroll_left_command (const char *, int);
72 static void tui_scroll_right_command (const char *, int);
73 static void parse_scrolling_args (const char *,
74 struct tui_win_info
**,
78 /***************************************
80 ***************************************/
81 #define WIN_HEIGHT_USAGE "Usage: winheight WINDOW-NAME [+ | -] NUM-LINES\n"
82 #define FOCUS_USAGE "Usage: focus [WINDOW-NAME | next | prev]\n"
84 /***************************************
86 ***************************************/
89 # define ACS_LRCORNER '+'
92 # define ACS_LLCORNER '+'
95 # define ACS_ULCORNER '+'
98 # define ACS_URCORNER '+'
101 # define ACS_HLINE '-'
104 # define ACS_VLINE '|'
107 /* Possible values for tui-border-kind variable. */
108 static const char *const tui_border_kind_enums
[] = {
115 /* Possible values for tui-border-mode and tui-active-border-mode. */
116 static const char *const tui_border_mode_enums
[] = {
133 /* Translation table for border-mode variables.
134 The list of values must be terminated by a NULL.
135 After the NULL value, an entry defines the default. */
136 struct tui_translate tui_border_mode_translate
[] = {
137 { "normal", A_NORMAL
},
138 { "standout", A_STANDOUT
},
139 { "reverse", A_REVERSE
},
141 { "half-standout", A_DIM
| A_STANDOUT
},
143 { "bold-standout", A_BOLD
| A_STANDOUT
},
145 { "normal", A_NORMAL
}
148 /* Translation tables for border-kind, one for each border
149 character (see wborder, border curses operations).
150 -1 is used to indicate the ACS because ACS characters
151 are determined at run time by curses (depends on terminal). */
152 struct tui_translate tui_border_kind_translate_vline
[] = {
160 struct tui_translate tui_border_kind_translate_hline
[] = {
168 struct tui_translate tui_border_kind_translate_ulcorner
[] = {
176 struct tui_translate tui_border_kind_translate_urcorner
[] = {
184 struct tui_translate tui_border_kind_translate_llcorner
[] = {
192 struct tui_translate tui_border_kind_translate_lrcorner
[] = {
201 /* Tui configuration variables controlled with set/show command. */
202 const char *tui_active_border_mode
= "bold-standout";
204 show_tui_active_border_mode (struct ui_file
*file
,
206 struct cmd_list_element
*c
,
209 fprintf_filtered (file
, _("\
210 The attribute mode to use for the active TUI window border is \"%s\".\n"),
214 const char *tui_border_mode
= "normal";
216 show_tui_border_mode (struct ui_file
*file
,
218 struct cmd_list_element
*c
,
221 fprintf_filtered (file
, _("\
222 The attribute mode to use for the TUI window borders is \"%s\".\n"),
226 const char *tui_border_kind
= "acs";
228 show_tui_border_kind (struct ui_file
*file
,
230 struct cmd_list_element
*c
,
233 fprintf_filtered (file
, _("The kind of border for TUI windows is \"%s\".\n"),
238 /* Tui internal configuration variables. These variables are updated
239 by tui_update_variables to reflect the tui configuration
241 chtype tui_border_vline
;
242 chtype tui_border_hline
;
243 chtype tui_border_ulcorner
;
244 chtype tui_border_urcorner
;
245 chtype tui_border_llcorner
;
246 chtype tui_border_lrcorner
;
248 int tui_border_attrs
;
249 int tui_active_border_attrs
;
251 /* Identify the item in the translation table.
252 When the item is not recognized, use the default entry. */
253 static struct tui_translate
*
254 translate (const char *name
, struct tui_translate
*table
)
258 if (name
&& strcmp (table
->name
, name
) == 0)
263 /* Not found, return default entry. */
268 /* Update the tui internal configuration according to gdb settings.
269 Returns 1 if the configuration has changed and the screen should
272 tui_update_variables (void)
275 struct tui_translate
*entry
;
277 entry
= translate (tui_border_mode
, tui_border_mode_translate
);
278 if (tui_border_attrs
!= entry
->value
)
280 tui_border_attrs
= entry
->value
;
283 entry
= translate (tui_active_border_mode
, tui_border_mode_translate
);
284 if (tui_active_border_attrs
!= entry
->value
)
286 tui_active_border_attrs
= entry
->value
;
290 /* If one corner changes, all characters are changed.
291 Only check the first one. The ACS characters are determined at
292 run time by curses terminal management. */
293 entry
= translate (tui_border_kind
, tui_border_kind_translate_lrcorner
);
294 if (tui_border_lrcorner
!= (chtype
) entry
->value
)
296 tui_border_lrcorner
= (entry
->value
< 0) ? ACS_LRCORNER
: entry
->value
;
299 entry
= translate (tui_border_kind
, tui_border_kind_translate_llcorner
);
300 tui_border_llcorner
= (entry
->value
< 0) ? ACS_LLCORNER
: entry
->value
;
302 entry
= translate (tui_border_kind
, tui_border_kind_translate_ulcorner
);
303 tui_border_ulcorner
= (entry
->value
< 0) ? ACS_ULCORNER
: entry
->value
;
305 entry
= translate (tui_border_kind
, tui_border_kind_translate_urcorner
);
306 tui_border_urcorner
= (entry
->value
< 0) ? ACS_URCORNER
: entry
->value
;
308 entry
= translate (tui_border_kind
, tui_border_kind_translate_hline
);
309 tui_border_hline
= (entry
->value
< 0) ? ACS_HLINE
: entry
->value
;
311 entry
= translate (tui_border_kind
, tui_border_kind_translate_vline
);
312 tui_border_vline
= (entry
->value
< 0) ? ACS_VLINE
: entry
->value
;
318 set_tui_cmd (const char *args
, int from_tty
)
323 show_tui_cmd (const char *args
, int from_tty
)
327 static struct cmd_list_element
*tuilist
;
330 tui_command (const char *args
, int from_tty
)
332 printf_unfiltered (_("\"tui\" must be followed by the name of a "
334 help_list (tuilist
, "tui ", all_commands
, gdb_stdout
);
337 struct cmd_list_element
**
338 tui_get_cmd_list (void)
341 add_prefix_cmd ("tui", class_tui
, tui_command
,
342 _("Text User Interface commands."),
343 &tuilist
, "tui ", 0, &cmdlist
);
347 /* The set_func hook of "set tui ..." commands that affect the window
348 borders on the TUI display. */
350 tui_set_var_cmd (const char *null_args
,
351 int from_tty
, struct cmd_list_element
*c
)
353 if (tui_update_variables () && tui_active
)
354 tui_rehighlight_all ();
357 /* Generic window name completion function. Complete window name pointed
358 to by TEXT and WORD. If INCLUDE_NEXT_PREV_P is true then the special
359 window names 'next' and 'prev' will also be considered as possible
360 completions of the window name. */
363 window_name_completer (completion_tracker
&tracker
,
364 int include_next_prev_p
,
365 const char *text
, const char *word
)
367 std::vector
<const char *> completion_name_vec
;
370 for (win_type
= SRC_WIN
; win_type
< MAX_MAJOR_WINDOWS
; win_type
++)
372 const char *completion_name
= NULL
;
374 /* We can't focus on an invisible window. */
375 if (tui_win_list
[win_type
] == NULL
376 || !tui_win_list
[win_type
]->is_visible
)
379 completion_name
= tui_win_list
[win_type
]->name ();
380 gdb_assert (completion_name
!= NULL
);
381 completion_name_vec
.push_back (completion_name
);
384 /* If no windows are considered visible then the TUI has not yet been
385 initialized. But still "focus src" and "focus cmd" will work because
386 invoking the focus command will entail initializing the TUI which sets the
387 default layout to SRC_COMMAND. */
388 if (completion_name_vec
.empty ())
390 completion_name_vec
.push_back (SRC_NAME
);
391 completion_name_vec
.push_back (CMD_NAME
);
394 if (include_next_prev_p
)
396 completion_name_vec
.push_back ("next");
397 completion_name_vec
.push_back ("prev");
401 completion_name_vec
.push_back (NULL
);
402 complete_on_enum (tracker
, completion_name_vec
.data (), text
, word
);
405 /* Complete possible window names to focus on. TEXT is the complete text
406 entered so far, WORD is the word currently being completed. */
409 focus_completer (struct cmd_list_element
*ignore
,
410 completion_tracker
&tracker
,
411 const char *text
, const char *word
)
413 window_name_completer (tracker
, 1, text
, word
);
416 /* Complete possible window names for winheight command. TEXT is the
417 complete text entered so far, WORD is the word currently being
421 winheight_completer (struct cmd_list_element
*ignore
,
422 completion_tracker
&tracker
,
423 const char *text
, const char *word
)
425 /* The first word is the window name. That we can complete. Subsequent
426 words can't be completed. */
430 window_name_completer (tracker
, 0, text
, word
);
433 /* Update gdb's knowledge of the terminal size. */
435 tui_update_gdb_sizes (void)
441 width
= TUI_CMD_WIN
->width
;
442 height
= TUI_CMD_WIN
->height
;
446 width
= tui_term_width ();
447 height
= tui_term_height ();
450 set_screen_width_and_height (width
, height
);
454 /* Set the logical focus to win_info. */
456 tui_set_win_focus_to (struct tui_win_info
*win_info
)
458 if (win_info
!= NULL
)
460 struct tui_win_info
*win_with_focus
= tui_win_with_focus ();
462 if (win_with_focus
!= NULL
463 && win_with_focus
->type
!= CMD_WIN
)
464 tui_unhighlight_win (win_with_focus
);
465 tui_set_win_with_focus (win_info
);
466 if (win_info
->type
!= CMD_WIN
)
467 tui_highlight_win (win_info
);
473 tui_win_info::forward_scroll (int num_to_scroll
)
475 if (num_to_scroll
== 0)
476 num_to_scroll
= height
- 3;
478 do_scroll_vertical (num_to_scroll
);
482 tui_win_info::backward_scroll (int num_to_scroll
)
484 if (num_to_scroll
== 0)
485 num_to_scroll
= height
- 3;
487 do_scroll_vertical (-num_to_scroll
);
492 tui_win_info::left_scroll (int num_to_scroll
)
494 if (num_to_scroll
== 0)
497 do_scroll_horizontal (num_to_scroll
);
502 tui_win_info::right_scroll (int num_to_scroll
)
504 if (num_to_scroll
== 0)
507 do_scroll_horizontal (-num_to_scroll
);
511 /* See tui-data.h. */
514 tui_source_window_base::refresh_all ()
516 tui_show_source_content (this);
517 tui_check_and_display_highlight_if_needed (this);
518 tui_erase_exec_info_content (this);
519 tui_update_exec_info (this);
523 tui_refresh_all_win (void)
527 clearok (curscr
, TRUE
);
528 tui_refresh_all (tui_win_list
);
529 for (type
= SRC_WIN
; type
< MAX_MAJOR_WINDOWS
; type
++)
531 if (tui_win_list
[type
] && tui_win_list
[type
]->is_visible
)
532 tui_win_list
[type
]->refresh_all ();
534 tui_show_locator_content ();
538 tui_rehighlight_all (void)
542 for (type
= SRC_WIN
; type
< MAX_MAJOR_WINDOWS
; type
++)
543 tui_check_and_display_highlight_if_needed (tui_win_list
[type
]);
546 /* Resize all the windows based on the terminal size. This function
547 gets called from within the readline sinwinch handler. */
549 tui_resize_all (void)
551 int height_diff
, width_diff
;
552 int screenheight
, screenwidth
;
554 rl_get_screen_size (&screenheight
, &screenwidth
);
555 width_diff
= screenwidth
- tui_term_width ();
556 height_diff
= screenheight
- tui_term_height ();
557 if (height_diff
|| width_diff
)
559 enum tui_layout_type cur_layout
= tui_current_layout ();
560 struct tui_win_info
*win_with_focus
= tui_win_with_focus ();
561 struct tui_win_info
*first_win
;
562 struct tui_win_info
*second_win
;
563 struct tui_gen_win_info
*locator
= tui_locator_win_info_ptr ();
565 int new_height
, split_diff
, cmd_split_diff
, num_wins_displayed
= 2;
567 #ifdef HAVE_RESIZE_TERM
568 resize_term (screenheight
, screenwidth
);
570 /* Turn keypad off while we resize. */
571 if (win_with_focus
!= TUI_CMD_WIN
)
572 keypad (TUI_CMD_WIN
->handle
, FALSE
);
573 tui_update_gdb_sizes ();
574 tui_set_term_height_to (screenheight
);
575 tui_set_term_width_to (screenwidth
);
576 if (cur_layout
== SRC_DISASSEM_COMMAND
577 || cur_layout
== SRC_DATA_COMMAND
578 || cur_layout
== DISASSEM_DATA_COMMAND
)
579 num_wins_displayed
++;
580 split_diff
= height_diff
/ num_wins_displayed
;
581 cmd_split_diff
= split_diff
;
582 if (height_diff
% num_wins_displayed
)
589 /* Now adjust each window. */
590 /* erase + clearok are used instead of a straightforward clear as
591 AIX 5.3 does not define clear. */
593 clearok (curscr
, TRUE
);
598 case DISASSEM_COMMAND
:
599 first_win
= tui_source_windows ()[0];
600 first_win
->width
+= width_diff
;
601 locator
->width
+= width_diff
;
602 /* Check for invalid heights. */
603 if (height_diff
== 0)
604 new_height
= first_win
->height
;
605 else if ((first_win
->height
+ split_diff
) >=
606 (screenheight
- MIN_CMD_WIN_HEIGHT
- 1))
607 new_height
= screenheight
- MIN_CMD_WIN_HEIGHT
- 1;
608 else if ((first_win
->height
+ split_diff
) <= 0)
609 new_height
= MIN_WIN_HEIGHT
;
611 new_height
= first_win
->height
+ split_diff
;
613 locator
->origin
.y
= new_height
+ 1;
614 make_invisible_and_set_new_height (first_win
, new_height
);
615 TUI_CMD_WIN
->origin
.y
= locator
->origin
.y
+ 1;
616 TUI_CMD_WIN
->width
+= width_diff
;
617 new_height
= screenheight
- TUI_CMD_WIN
->origin
.y
;
618 make_invisible_and_set_new_height (TUI_CMD_WIN
, new_height
);
619 make_visible_with_new_height (first_win
);
620 make_visible_with_new_height (TUI_CMD_WIN
);
621 if (first_win
->content_size
<= 0)
622 tui_erase_source_content (first_win
, EMPTY_SOURCE_PROMPT
);
625 if (cur_layout
== SRC_DISASSEM_COMMAND
)
627 first_win
= TUI_SRC_WIN
;
628 first_win
->width
+= width_diff
;
629 second_win
= TUI_DISASM_WIN
;
630 second_win
->width
+= width_diff
;
634 first_win
= TUI_DATA_WIN
;
635 first_win
->width
+= width_diff
;
636 second_win
= tui_source_windows ()[0];
637 second_win
->width
+= width_diff
;
639 /* Change the first window's height/width. */
640 /* Check for invalid heights. */
641 if (height_diff
== 0)
642 new_height
= first_win
->height
;
643 else if ((first_win
->height
+
644 second_win
->height
+ (split_diff
* 2)) >=
645 (screenheight
- MIN_CMD_WIN_HEIGHT
- 1))
646 new_height
= (screenheight
- MIN_CMD_WIN_HEIGHT
- 1) / 2;
647 else if ((first_win
->height
+ split_diff
) <= 0)
648 new_height
= MIN_WIN_HEIGHT
;
650 new_height
= first_win
->height
+ split_diff
;
651 make_invisible_and_set_new_height (first_win
, new_height
);
653 locator
->width
+= width_diff
;
655 /* Change the second window's height/width. */
656 /* Check for invalid heights. */
657 if (height_diff
== 0)
658 new_height
= second_win
->height
;
659 else if ((first_win
->height
+
660 second_win
->height
+ (split_diff
* 2)) >=
661 (screenheight
- MIN_CMD_WIN_HEIGHT
- 1))
663 new_height
= screenheight
- MIN_CMD_WIN_HEIGHT
- 1;
665 new_height
= (new_height
/ 2) + 1;
669 else if ((second_win
->height
+ split_diff
) <= 0)
670 new_height
= MIN_WIN_HEIGHT
;
672 new_height
= second_win
->height
+ split_diff
;
673 second_win
->origin
.y
= first_win
->height
- 1;
674 make_invisible_and_set_new_height (second_win
, new_height
);
676 /* Change the command window's height/width. */
677 TUI_CMD_WIN
->origin
.y
= locator
->origin
.y
+ 1;
678 make_invisible_and_set_new_height (TUI_CMD_WIN
,
681 make_visible_with_new_height (first_win
);
682 make_visible_with_new_height (second_win
);
683 make_visible_with_new_height (TUI_CMD_WIN
);
684 if (first_win
->content_size
<= 0)
685 tui_erase_source_content (first_win
, EMPTY_SOURCE_PROMPT
);
686 if (second_win
->content_size
<= 0)
687 tui_erase_source_content (second_win
, EMPTY_SOURCE_PROMPT
);
690 /* Now remove all invisible windows, and their content so that
691 they get created again when called for with the new size. */
692 for (win_type
= SRC_WIN
; (win_type
< MAX_MAJOR_WINDOWS
); win_type
++)
694 if (win_type
!= CMD_WIN
695 && (tui_win_list
[win_type
] != NULL
)
696 && !tui_win_list
[win_type
]->is_visible
)
698 delete tui_win_list
[win_type
];
699 tui_win_list
[win_type
] = NULL
;
702 /* Turn keypad back on, unless focus is in the command
704 if (win_with_focus
!= TUI_CMD_WIN
)
705 keypad (TUI_CMD_WIN
->handle
, TRUE
);
710 /* Token for use by TUI's asynchronous SIGWINCH handler. */
711 static struct async_signal_handler
*tui_sigwinch_token
;
713 /* TUI's SIGWINCH signal handler. */
715 tui_sigwinch_handler (int signal
)
717 mark_async_signal_handler (tui_sigwinch_token
);
718 tui_set_win_resized_to (TRUE
);
721 /* Callback for asynchronously resizing TUI following a SIGWINCH signal. */
723 tui_async_resize_screen (gdb_client_data arg
)
725 rl_resize_terminal ();
729 int screen_height
, screen_width
;
731 rl_get_screen_size (&screen_height
, &screen_width
);
732 set_screen_width_and_height (screen_width
, screen_height
);
734 /* win_resized is left set so that the next call to tui_enable()
735 resizes the TUI windows. */
739 tui_set_win_resized_to (FALSE
);
741 tui_refresh_all_win ();
742 tui_update_gdb_sizes ();
743 tui_redisplay_readline ();
748 /* Initialize TUI's SIGWINCH signal handler. Note that the handler is not
749 uninstalled when we exit TUI, so the handler should not assume that TUI is
752 tui_initialize_win (void)
756 = create_async_signal_handler (tui_async_resize_screen
, NULL
);
759 #ifdef HAVE_SIGACTION
760 struct sigaction old_winch
;
762 memset (&old_winch
, 0, sizeof (old_winch
));
763 old_winch
.sa_handler
= &tui_sigwinch_handler
;
765 old_winch
.sa_flags
= SA_RESTART
;
767 sigaction (SIGWINCH
, &old_winch
, NULL
);
769 signal (SIGWINCH
, &tui_sigwinch_handler
);
776 /*************************
777 ** STATIC LOCAL FUNCTIONS
778 **************************/
782 tui_scroll_forward_command (const char *arg
, int from_tty
)
784 int num_to_scroll
= 1;
785 struct tui_win_info
*win_to_scroll
;
787 /* Make sure the curses mode is enabled. */
790 parse_scrolling_args (arg
, &win_to_scroll
, NULL
);
792 parse_scrolling_args (arg
, &win_to_scroll
, &num_to_scroll
);
793 win_to_scroll
->forward_scroll (num_to_scroll
);
798 tui_scroll_backward_command (const char *arg
, int from_tty
)
800 int num_to_scroll
= 1;
801 struct tui_win_info
*win_to_scroll
;
803 /* Make sure the curses mode is enabled. */
806 parse_scrolling_args (arg
, &win_to_scroll
, NULL
);
808 parse_scrolling_args (arg
, &win_to_scroll
, &num_to_scroll
);
809 win_to_scroll
->backward_scroll (num_to_scroll
);
814 tui_scroll_left_command (const char *arg
, int from_tty
)
817 struct tui_win_info
*win_to_scroll
;
819 /* Make sure the curses mode is enabled. */
821 parse_scrolling_args (arg
, &win_to_scroll
, &num_to_scroll
);
822 win_to_scroll
->left_scroll (num_to_scroll
);
827 tui_scroll_right_command (const char *arg
, int from_tty
)
830 struct tui_win_info
*win_to_scroll
;
832 /* Make sure the curses mode is enabled. */
834 parse_scrolling_args (arg
, &win_to_scroll
, &num_to_scroll
);
835 win_to_scroll
->right_scroll (num_to_scroll
);
839 /* Set focus to the window named by 'arg'. */
841 tui_set_focus (const char *arg
, int from_tty
)
845 char *buf_ptr
= xstrdup (arg
);
847 struct tui_win_info
*win_info
= NULL
;
849 for (i
= 0; (i
< strlen (buf_ptr
)); i
++)
850 buf_ptr
[i
] = tolower (arg
[i
]);
852 if (subset_compare (buf_ptr
, "next"))
853 win_info
= tui_next_win (tui_win_with_focus ());
854 else if (subset_compare (buf_ptr
, "prev"))
855 win_info
= tui_prev_win (tui_win_with_focus ());
857 win_info
= tui_partial_win_by_name (buf_ptr
);
859 if (win_info
== NULL
|| !win_info
->is_visible
)
860 warning (_("Invalid window specified. \n\
861 The window name specified must be valid and visible.\n"));
864 tui_set_win_focus_to (win_info
);
865 keypad (TUI_CMD_WIN
->handle
, (win_info
!= TUI_CMD_WIN
));
868 if (TUI_DATA_WIN
&& TUI_DATA_WIN
->is_visible
)
869 TUI_DATA_WIN
->refresh_all ();
871 printf_filtered (_("Focus set to %s window.\n"),
872 tui_win_with_focus ()->name ());
875 warning (_("Incorrect Number of Arguments.\n%s"), FOCUS_USAGE
);
879 tui_set_focus_command (const char *arg
, int from_tty
)
881 /* Make sure the curses mode is enabled. */
883 tui_set_focus (arg
, from_tty
);
888 tui_all_windows_info (const char *arg
, int from_tty
)
891 struct tui_win_info
*win_with_focus
= tui_win_with_focus ();
893 for (type
= SRC_WIN
; (type
< MAX_MAJOR_WINDOWS
); type
++)
894 if (tui_win_list
[type
]
895 && tui_win_list
[type
]->is_visible
)
897 if (win_with_focus
== tui_win_list
[type
])
898 printf_filtered (" %s\t(%d lines) <has focus>\n",
899 tui_win_list
[type
]->name (),
900 tui_win_list
[type
]->height
);
902 printf_filtered (" %s\t(%d lines)\n",
903 tui_win_list
[type
]->name (),
904 tui_win_list
[type
]->height
);
910 tui_refresh_all_command (const char *arg
, int from_tty
)
912 /* Make sure the curses mode is enabled. */
915 tui_refresh_all_win ();
918 /* The tab width that should be used by the TUI. */
920 unsigned int tui_tab_width
= DEFAULT_TAB_LEN
;
922 /* The tab width as set by the user. */
924 static unsigned int internal_tab_width
= DEFAULT_TAB_LEN
;
926 /* See tui-data.h. */
929 tui_source_window_base::update_tab_width ()
931 /* We don't really change the height of any windows, but
932 calling these 2 functions causes a complete regeneration
933 and redisplay of the window's contents, which will take
934 the new tab width into account. */
935 make_invisible_and_set_new_height (this, height
);
936 make_visible_with_new_height (this);
939 /* After the tab width is set, call this to update the relevant
945 for (int win_type
= SRC_WIN
; win_type
< MAX_MAJOR_WINDOWS
; win_type
++)
947 if (tui_win_list
[win_type
] != NULL
948 && tui_win_list
[win_type
]->is_visible
)
949 tui_win_list
[win_type
]->update_tab_width ();
953 /* Callback for "set tui tab-width". */
956 tui_set_tab_width (const char *ignore
,
957 int from_tty
, struct cmd_list_element
*c
)
959 if (internal_tab_width
== 0)
961 internal_tab_width
= tui_tab_width
;
962 error (_("Tab width must not be 0"));
965 tui_tab_width
= internal_tab_width
;
969 /* Callback for "show tui tab-width". */
972 tui_show_tab_width (struct ui_file
*file
, int from_tty
,
973 struct cmd_list_element
*c
, const char *value
)
975 fprintf_filtered (gdb_stdout
, _("TUI tab width is %s spaces.\n"), value
);
979 /* Set the tab width of the specified window. */
981 tui_set_tab_width_command (const char *arg
, int from_tty
)
983 /* Make sure the curses mode is enabled. */
991 warning (_("Tab widths greater than 0 must be specified."));
994 internal_tab_width
= ts
;
1003 /* Set the height of the specified window. */
1005 tui_set_win_height (const char *arg
, int from_tty
)
1007 /* Make sure the curses mode is enabled. */
1011 std::string copy
= arg
;
1012 char *buf
= ©
[0];
1013 char *buf_ptr
= buf
;
1016 struct tui_win_info
*win_info
;
1019 buf_ptr
= strchr (buf_ptr
, ' ');
1020 if (buf_ptr
!= NULL
)
1022 *buf_ptr
= (char) 0;
1024 /* Validate the window name. */
1025 for (i
= 0; i
< strlen (wname
); i
++)
1026 wname
[i
] = tolower (wname
[i
]);
1027 win_info
= tui_partial_win_by_name (wname
);
1029 if (win_info
== NULL
|| !win_info
->is_visible
)
1030 warning (_("Invalid window specified. \n\
1031 The window name specified must be valid and visible.\n"));
1034 /* Process the size. */
1035 while (*(++buf_ptr
) == ' ')
1038 if (*buf_ptr
!= (char) 0)
1041 int fixed_size
= TRUE
;
1044 if (*buf_ptr
== '+' || *buf_ptr
== '-')
1046 if (*buf_ptr
== '-')
1051 input_no
= atoi (buf_ptr
);
1057 new_height
= input_no
;
1059 new_height
= win_info
->height
+ input_no
;
1061 /* Now change the window's height, and adjust
1062 all other windows around it. */
1063 if (tui_adjust_win_heights (win_info
,
1064 new_height
) == TUI_FAILURE
)
1065 warning (_("Invalid window height specified.\n%s"),
1068 tui_update_gdb_sizes ();
1071 warning (_("Invalid window height specified.\n%s"),
1077 printf_filtered (WIN_HEIGHT_USAGE
);
1080 printf_filtered (WIN_HEIGHT_USAGE
);
1083 /* Set the height of the specified window, with va_list. */
1085 tui_set_win_height_command (const char *arg
, int from_tty
)
1087 /* Make sure the curses mode is enabled. */
1089 tui_set_win_height (arg
, from_tty
);
1092 /* Function to adjust all window heights around the primary. */
1093 static enum tui_status
1094 tui_adjust_win_heights (struct tui_win_info
*primary_win_info
,
1097 enum tui_status status
= TUI_FAILURE
;
1099 if (new_height_ok (primary_win_info
, new_height
))
1101 status
= TUI_SUCCESS
;
1102 if (new_height
!= primary_win_info
->height
)
1105 struct tui_win_info
*win_info
;
1106 struct tui_gen_win_info
*locator
= tui_locator_win_info_ptr ();
1107 enum tui_layout_type cur_layout
= tui_current_layout ();
1109 diff
= (new_height
- primary_win_info
->height
) * (-1);
1110 if (cur_layout
== SRC_COMMAND
1111 || cur_layout
== DISASSEM_COMMAND
)
1113 struct tui_win_info
*src_win_info
;
1115 make_invisible_and_set_new_height (primary_win_info
, new_height
);
1116 if (primary_win_info
->type
== CMD_WIN
)
1118 win_info
= tui_source_windows ()[0];
1119 src_win_info
= win_info
;
1123 win_info
= tui_win_list
[CMD_WIN
];
1124 src_win_info
= primary_win_info
;
1126 make_invisible_and_set_new_height (win_info
,
1127 win_info
->height
+ diff
);
1128 TUI_CMD_WIN
->origin
.y
= locator
->origin
.y
+ 1;
1129 make_visible_with_new_height (win_info
);
1130 make_visible_with_new_height (primary_win_info
);
1131 if (src_win_info
->content_size
<= 0)
1132 tui_erase_source_content (src_win_info
, EMPTY_SOURCE_PROMPT
);
1136 struct tui_win_info
*first_win
;
1137 struct tui_win_info
*second_win
;
1139 if (cur_layout
== SRC_DISASSEM_COMMAND
)
1141 first_win
= TUI_SRC_WIN
;
1142 second_win
= TUI_DISASM_WIN
;
1146 first_win
= TUI_DATA_WIN
;
1147 second_win
= tui_source_windows ()[0];
1149 if (primary_win_info
== TUI_CMD_WIN
)
1150 { /* Split the change in height accross the 1st & 2nd
1151 windows, adjusting them as well. */
1152 /* Subtract the locator. */
1153 int first_split_diff
= diff
/ 2;
1154 int second_split_diff
= first_split_diff
;
1158 if (first_win
->height
>
1167 second_split_diff
--;
1169 second_split_diff
++;
1172 /* Make sure that the minimum hieghts are
1174 while ((first_win
->height
+ first_split_diff
) < 3)
1177 second_split_diff
--;
1179 while ((second_win
->height
+ second_split_diff
) < 3)
1181 second_split_diff
++;
1184 make_invisible_and_set_new_height (
1186 first_win
->height
+ first_split_diff
);
1187 second_win
->origin
.y
= first_win
->height
- 1;
1188 make_invisible_and_set_new_height (second_win
,
1190 + second_split_diff
);
1191 TUI_CMD_WIN
->origin
.y
= locator
->origin
.y
+ 1;
1192 make_invisible_and_set_new_height (TUI_CMD_WIN
, new_height
);
1196 if ((TUI_CMD_WIN
->height
+ diff
) < 1)
1197 { /* If there is no way to increase the command
1198 window take real estate from the 1st or 2nd
1200 if ((TUI_CMD_WIN
->height
+ diff
) < 1)
1204 for (i
= TUI_CMD_WIN
->height
+ diff
;
1206 if (primary_win_info
== first_win
)
1207 second_win
->height
--;
1209 first_win
->height
--;
1212 if (primary_win_info
== first_win
)
1213 make_invisible_and_set_new_height (first_win
, new_height
);
1215 make_invisible_and_set_new_height (
1218 second_win
->origin
.y
= first_win
->height
- 1;
1219 if (primary_win_info
== second_win
)
1220 make_invisible_and_set_new_height (second_win
, new_height
);
1222 make_invisible_and_set_new_height (
1223 second_win
, second_win
->height
);
1224 TUI_CMD_WIN
->origin
.y
= locator
->origin
.y
+ 1;
1225 if ((TUI_CMD_WIN
->height
+ diff
) < 1)
1226 make_invisible_and_set_new_height (TUI_CMD_WIN
, 1);
1228 make_invisible_and_set_new_height (TUI_CMD_WIN
,
1229 TUI_CMD_WIN
->height
+ diff
);
1231 make_visible_with_new_height (TUI_CMD_WIN
);
1232 make_visible_with_new_height (second_win
);
1233 make_visible_with_new_height (first_win
);
1234 if (first_win
->content_size
<= 0)
1235 tui_erase_source_content (first_win
, EMPTY_SOURCE_PROMPT
);
1236 if (second_win
->content_size
<= 0)
1237 tui_erase_source_content (second_win
, EMPTY_SOURCE_PROMPT
);
1246 /* See tui-data.h. */
1249 tui_source_window_base::set_new_height (int height
)
1251 tui_make_invisible (execution_info
);
1252 execution_info
->height
= height
;
1253 execution_info
->origin
.y
= origin
.y
;
1255 execution_info
->viewport_height
= height
- 1;
1257 execution_info
->viewport_height
= height
;
1258 execution_info
->viewport_height
--;
1262 tui_gen_win_info
*gen_win_info
= tui_locator_win_info_ptr ();
1263 tui_make_invisible (gen_win_info
);
1264 gen_win_info
->origin
.y
= origin
.y
+ height
;
1268 /* See tui-data.h. */
1271 tui_data_window::set_new_height (int height
)
1273 /* Delete all data item windows. */
1274 for (int i
= 0; i
< content_size
; i
++)
1276 struct tui_gen_win_info
*gen_win_info
1277 = content
[i
]->which_element
.data_window
;
1278 tui_delete_win (gen_win_info
->handle
);
1279 gen_win_info
->handle
= NULL
;
1283 /* Function make the target window (and auxillary windows associated
1284 with the targer) invisible, and set the new height and
1287 make_invisible_and_set_new_height (struct tui_win_info
*win_info
,
1290 tui_make_invisible (win_info
);
1291 win_info
->height
= height
;
1293 win_info
->viewport_height
= height
- 1;
1295 win_info
->viewport_height
= height
;
1296 if (win_info
!= TUI_CMD_WIN
)
1297 win_info
->viewport_height
--;
1299 /* Now deal with the auxillary windows associated with win_info. */
1300 win_info
->set_new_height (height
);
1304 /* Function to make the windows with new heights visible. This means
1305 re-creating the windows' content since the window had to be
1306 destroyed to be made invisible. */
1308 make_visible_with_new_height (struct tui_win_info
*win_info
)
1312 tui_make_visible (win_info
);
1313 tui_check_and_display_highlight_if_needed (win_info
);
1314 tui_source_window_base
*base
;
1315 switch (win_info
->type
)
1319 base
= (tui_source_window_base
*) win_info
;
1320 tui_free_win_content (base
->execution_info
);
1321 tui_make_visible (base
->execution_info
);
1322 if (win_info
->content
!= NULL
)
1324 struct gdbarch
*gdbarch
= base
->gdbarch
;
1325 struct tui_line_or_address line_or_addr
;
1326 struct symtab_and_line cursal
1327 = get_current_source_symtab_and_line ();
1329 line_or_addr
= base
->start_line_or_addr
;
1330 tui_free_win_content (win_info
);
1331 tui_update_source_window (base
, gdbarch
,
1332 cursal
.symtab
, line_or_addr
, TRUE
);
1334 else if (deprecated_safe_get_selected_frame () != NULL
)
1336 struct tui_line_or_address line
;
1337 struct symtab_and_line cursal
1338 = get_current_source_symtab_and_line ();
1339 struct frame_info
*frame
= deprecated_safe_get_selected_frame ();
1340 struct gdbarch
*gdbarch
= get_frame_arch (frame
);
1342 s
= find_pc_line_symtab (get_frame_pc (frame
));
1343 if (win_info
->type
== SRC_WIN
)
1345 line
.loa
= LOA_LINE
;
1346 line
.u
.line_no
= cursal
.line
;
1350 line
.loa
= LOA_ADDRESS
;
1351 find_line_pc (s
, cursal
.line
, &line
.u
.addr
);
1353 tui_update_source_window (base
, gdbarch
, s
, line
, TRUE
);
1355 if (win_info
->has_locator ())
1357 tui_make_visible (tui_locator_win_info_ptr ());
1358 tui_show_locator_content ();
1362 tui_display_all_data ();
1366 wresize (TUI_CMD_WIN
->handle
,
1367 TUI_CMD_WIN
->height
,
1368 TUI_CMD_WIN
->width
);
1370 mvwin (TUI_CMD_WIN
->handle
,
1371 TUI_CMD_WIN
->origin
.y
,
1372 TUI_CMD_WIN
->origin
.x
);
1373 wmove (win_info
->handle
, 0, 0);
1381 /* See tui-data.h. */
1384 tui_win_info::max_height () const
1386 return tui_term_height () - 2;
1389 /* See tui-data.h. */
1392 tui_cmd_window::max_height () const
1394 return tui_term_height () - 4;
1398 new_height_ok (struct tui_win_info
*primary_win_info
,
1401 int ok
= (new_height
< tui_term_height ());
1406 enum tui_layout_type cur_layout
= tui_current_layout ();
1408 diff
= (new_height
- primary_win_info
->height
) * (-1);
1409 if (cur_layout
== SRC_COMMAND
|| cur_layout
== DISASSEM_COMMAND
)
1411 ok
= (new_height
<= primary_win_info
->max_height ()
1412 && new_height
>= MIN_CMD_WIN_HEIGHT
);
1414 { /* Check the total height. */
1415 struct tui_win_info
*win_info
;
1417 if (primary_win_info
== TUI_CMD_WIN
)
1418 win_info
= tui_source_windows ()[0];
1420 win_info
= TUI_CMD_WIN
;
1422 (win_info
->height
+ diff
)) <= tui_term_height ());
1427 int cur_total_height
, total_height
, min_height
= 0;
1428 struct tui_win_info
*first_win
;
1429 struct tui_win_info
*second_win
;
1431 if (cur_layout
== SRC_DISASSEM_COMMAND
)
1433 first_win
= TUI_SRC_WIN
;
1434 second_win
= TUI_DISASM_WIN
;
1438 first_win
= TUI_DATA_WIN
;
1439 second_win
= tui_source_windows ()[0];
1441 /* We could simply add all the heights to obtain the same
1442 result but below is more explicit since we subtract 1 for
1443 the line that the first and second windows share, and add
1444 one for the locator. */
1445 total_height
= cur_total_height
=
1446 (first_win
->height
+ second_win
->height
- 1)
1447 + TUI_CMD_WIN
->height
+ 1; /* Locator. */
1448 if (primary_win_info
== TUI_CMD_WIN
)
1450 /* Locator included since first & second win share a line. */
1451 ok
= ((first_win
->height
+
1452 second_win
->height
+ diff
) >=
1453 (MIN_WIN_HEIGHT
* 2)
1454 && new_height
>= MIN_CMD_WIN_HEIGHT
);
1457 total_height
= new_height
+
1458 (first_win
->height
+
1459 second_win
->height
+ diff
);
1460 min_height
= MIN_CMD_WIN_HEIGHT
;
1465 min_height
= MIN_WIN_HEIGHT
;
1467 /* First see if we can increase/decrease the command
1468 window. And make sure that the command window is at
1470 ok
= ((TUI_CMD_WIN
->height
+ diff
) > 0);
1472 { /* Looks like we have to increase/decrease one of
1473 the other windows. */
1474 if (primary_win_info
== first_win
)
1475 ok
= (second_win
->height
+ diff
) >= min_height
;
1477 ok
= (first_win
->height
+ diff
) >= min_height
;
1481 if (primary_win_info
== first_win
)
1482 total_height
= new_height
+
1483 second_win
->height
+
1484 TUI_CMD_WIN
->height
+ diff
;
1486 total_height
= new_height
+
1488 TUI_CMD_WIN
->height
+ diff
;
1491 /* Now make sure that the proposed total height doesn't
1492 exceed the old total height. */
1494 ok
= (new_height
>= min_height
1495 && total_height
<= cur_total_height
);
1504 parse_scrolling_args (const char *arg
,
1505 struct tui_win_info
**win_to_scroll
,
1510 *win_to_scroll
= tui_win_with_focus ();
1512 /* First set up the default window to scroll, in case there is no
1518 /* Process the number of lines to scroll. */
1519 std::string copy
= arg
;
1521 if (isdigit (*buf_ptr
))
1526 buf_ptr
= strchr (buf_ptr
, ' ');
1527 if (buf_ptr
!= NULL
)
1529 *buf_ptr
= (char) 0;
1531 *num_to_scroll
= atoi (num_str
);
1534 else if (num_to_scroll
)
1535 *num_to_scroll
= atoi (num_str
);
1538 /* Process the window name if one is specified. */
1539 if (buf_ptr
!= NULL
)
1543 if (*buf_ptr
== ' ')
1544 while (*(++buf_ptr
) == ' ')
1547 if (*buf_ptr
!= (char) 0)
1549 /* Validate the window name. */
1550 for (char *p
= buf_ptr
; *p
!= '\0'; p
++)
1558 *win_to_scroll
= tui_partial_win_by_name (wname
);
1560 if (*win_to_scroll
== NULL
1561 || !(*win_to_scroll
)->is_visible
)
1562 error (_("Invalid window specified. \n\
1563 The window name specified must be valid and visible.\n"));
1564 else if (*win_to_scroll
== TUI_CMD_WIN
)
1565 *win_to_scroll
= tui_source_windows ()[0];
1570 /* Function to initialize gdb commands, for tui window
1574 _initialize_tui_win (void)
1576 static struct cmd_list_element
*tui_setlist
;
1577 static struct cmd_list_element
*tui_showlist
;
1578 struct cmd_list_element
*cmd
;
1580 /* Define the classes of commands.
1581 They will appear in the help list in the reverse of this order. */
1582 add_prefix_cmd ("tui", class_tui
, set_tui_cmd
,
1583 _("TUI configuration variables"),
1584 &tui_setlist
, "set tui ",
1585 0 /* allow-unknown */, &setlist
);
1586 add_prefix_cmd ("tui", class_tui
, show_tui_cmd
,
1587 _("TUI configuration variables"),
1588 &tui_showlist
, "show tui ",
1589 0 /* allow-unknown */, &showlist
);
1591 add_com ("refresh", class_tui
, tui_refresh_all_command
,
1592 _("Refresh the terminal display."));
1594 cmd
= add_com ("tabset", class_tui
, tui_set_tab_width_command
, _("\
1595 Set the width (in characters) of tab stops.\n\
1597 deprecate_cmd (cmd
, "set tui tab-width");
1599 cmd
= add_com ("winheight", class_tui
, tui_set_win_height_command
, _("\
1600 Set or modify the height of a specified window.\n"
1602 "Window names are:\n\
1603 src : the source window\n\
1604 cmd : the command window\n\
1605 asm : the disassembly window\n\
1606 regs : the register display"));
1607 add_com_alias ("wh", "winheight", class_tui
, 0);
1608 set_cmd_completer (cmd
, winheight_completer
);
1609 add_info ("win", tui_all_windows_info
,
1610 _("List of all displayed windows."));
1611 cmd
= add_com ("focus", class_tui
, tui_set_focus_command
, _("\
1612 Set focus to named window or next/prev window.\n"
1614 "Valid Window names are:\n\
1615 src : the source window\n\
1616 asm : the disassembly window\n\
1617 regs : the register display\n\
1618 cmd : the command window"));
1619 add_com_alias ("fs", "focus", class_tui
, 0);
1620 set_cmd_completer (cmd
, focus_completer
);
1621 add_com ("+", class_tui
, tui_scroll_forward_command
, _("\
1622 Scroll window forward.\n\
1623 Usage: + [WIN] [N]"));
1624 add_com ("-", class_tui
, tui_scroll_backward_command
, _("\
1625 Scroll window backward.\n\
1626 Usage: - [WIN] [N]"));
1627 add_com ("<", class_tui
, tui_scroll_left_command
, _("\
1628 Scroll window text to the left.\n\
1629 Usage: < [WIN] [N]"));
1630 add_com (">", class_tui
, tui_scroll_right_command
, _("\
1631 Scroll window text to the right.\n\
1632 Usage: > [WIN] [N]"));
1634 /* Define the tui control variables. */
1635 add_setshow_enum_cmd ("border-kind", no_class
, tui_border_kind_enums
,
1636 &tui_border_kind
, _("\
1637 Set the kind of border for TUI windows."), _("\
1638 Show the kind of border for TUI windows."), _("\
1639 This variable controls the border of TUI windows:\n\
1640 space use a white space\n\
1641 ascii use ascii characters + - | for the border\n\
1642 acs use the Alternate Character Set"),
1644 show_tui_border_kind
,
1645 &tui_setlist
, &tui_showlist
);
1647 add_setshow_enum_cmd ("border-mode", no_class
, tui_border_mode_enums
,
1648 &tui_border_mode
, _("\
1649 Set the attribute mode to use for the TUI window borders."), _("\
1650 Show the attribute mode to use for the TUI window borders."), _("\
1651 This variable controls the attributes to use for the window borders:\n\
1652 normal normal display\n\
1653 standout use highlight mode of terminal\n\
1654 reverse use reverse video mode\n\
1655 half use half bright\n\
1656 half-standout use half bright and standout mode\n\
1657 bold use extra bright or bold\n\
1658 bold-standout use extra bright or bold with standout mode"),
1660 show_tui_border_mode
,
1661 &tui_setlist
, &tui_showlist
);
1663 add_setshow_enum_cmd ("active-border-mode", no_class
, tui_border_mode_enums
,
1664 &tui_active_border_mode
, _("\
1665 Set the attribute mode to use for the active TUI window border."), _("\
1666 Show the attribute mode to use for the active TUI window border."), _("\
1667 This variable controls the attributes to use for the active window border:\n\
1668 normal normal display\n\
1669 standout use highlight mode of terminal\n\
1670 reverse use reverse video mode\n\
1671 half use half bright\n\
1672 half-standout use half bright and standout mode\n\
1673 bold use extra bright or bold\n\
1674 bold-standout use extra bright or bold with standout mode"),
1676 show_tui_active_border_mode
,
1677 &tui_setlist
, &tui_showlist
);
1679 add_setshow_zuinteger_cmd ("tab-width", no_class
,
1680 &internal_tab_width
, _("\
1681 Set the tab width, in characters, for the TUI."), _("\
1682 Show the tab witdh, in characters, for the TUI"), _("\
1683 This variable controls how many spaces are used to display a tab character."),
1684 tui_set_tab_width
, tui_show_tab_width
,
1685 &tui_setlist
, &tui_showlist
);