1 /* TUI window generic functions. 2 3 Copyright (C) 1998-2013 Free Software Foundation, Inc. 4 5 Contributed by Hewlett-Packard Company. 6 7 This file is part of GDB. 8 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. 13 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. 18 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/>. */ 21 22 /* This module contains procedures for handling tui window functions 23 like resize, scrolling, scrolling, changing focus, etc. 24 25 Author: Susan B. Macchia */ 26 27 #include "defs.h" 28 #include "command.h" 29 #include "symtab.h" 30 #include "breakpoint.h" 31 #include "frame.h" 32 #include "cli/cli-cmds.h" 33 #include "top.h" 34 #include "source.h" 35 36 #include "tui/tui.h" 37 #include "tui/tui-data.h" 38 #include "tui/tui-wingeneral.h" 39 #include "tui/tui-stack.h" 40 #include "tui/tui-regs.h" 41 #include "tui/tui-disasm.h" 42 #include "tui/tui-source.h" 43 #include "tui/tui-winsource.h" 44 #include "tui/tui-windata.h" 45 #include "tui/tui-win.h" 46 47 #include "gdb_curses.h" 48 49 #include "gdb_string.h" 50 #include <ctype.h> 51 #include "readline/readline.h" 52 53 #include <signal.h> 54 55 /******************************* 56 ** Static Local Decls 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 *, 60 int); 61 static enum tui_status tui_adjust_win_heights (struct tui_win_info *, 62 int); 63 static int new_height_ok (struct tui_win_info *, int); 64 static void tui_set_tab_width_command (char *, int); 65 static void tui_refresh_all_command (char *, int); 66 static void tui_set_win_height_command (char *, int); 67 static void tui_xdb_set_win_height_command (char *, int); 68 static void tui_all_windows_info (char *, int); 69 static void tui_set_focus_command (char *, int); 70 static void tui_scroll_forward_command (char *, int); 71 static void tui_scroll_backward_command (char *, int); 72 static void tui_scroll_left_command (char *, int); 73 static void tui_scroll_right_command (char *, int); 74 static void parse_scrolling_args (char *, 75 struct tui_win_info **, 76 int *); 77 78 79 /*************************************** 80 ** DEFINITIONS 81 ***************************************/ 82 #define WIN_HEIGHT_USAGE "Usage: winheight <win_name> [+ | -] <#lines>\n" 83 #define XDBWIN_HEIGHT_USAGE "Usage: w <#lines>\n" 84 #define FOCUS_USAGE "Usage: focus {<win> | next | prev}\n" 85 86 /*************************************** 87 ** PUBLIC FUNCTIONS 88 ***************************************/ 89 90 #ifndef ACS_LRCORNER 91 # define ACS_LRCORNER '+' 92 #endif 93 #ifndef ACS_LLCORNER 94 # define ACS_LLCORNER '+' 95 #endif 96 #ifndef ACS_ULCORNER 97 # define ACS_ULCORNER '+' 98 #endif 99 #ifndef ACS_URCORNER 100 # define ACS_URCORNER '+' 101 #endif 102 #ifndef ACS_HLINE 103 # define ACS_HLINE '-' 104 #endif 105 #ifndef ACS_VLINE 106 # define ACS_VLINE '|' 107 #endif 108 109 /* Possible values for tui-border-kind variable. */ 110 static const char *const tui_border_kind_enums[] = { 111 "space", 112 "ascii", 113 "acs", 114 NULL 115 }; 116 117 /* Possible values for tui-border-mode and tui-active-border-mode. */ 118 static const char *const tui_border_mode_enums[] = { 119 "normal", 120 "standout", 121 "reverse", 122 "half", 123 "half-standout", 124 "bold", 125 "bold-standout", 126 NULL 127 }; 128 129 struct tui_translate 130 { 131 const char *name; 132 int value; 133 }; 134 135 /* Translation table for border-mode variables. 136 The list of values must be terminated by a NULL. 137 After the NULL value, an entry defines the default. */ 138 struct tui_translate tui_border_mode_translate[] = { 139 { "normal", A_NORMAL }, 140 { "standout", A_STANDOUT }, 141 { "reverse", A_REVERSE }, 142 { "half", A_DIM }, 143 { "half-standout", A_DIM | A_STANDOUT }, 144 { "bold", A_BOLD }, 145 { "bold-standout", A_BOLD | A_STANDOUT }, 146 { 0, 0 }, 147 { "normal", A_NORMAL } 148 }; 149 150 /* Translation tables for border-kind, one for each border 151 character (see wborder, border curses operations). 152 -1 is used to indicate the ACS because ACS characters 153 are determined at run time by curses (depends on terminal). */ 154 struct tui_translate tui_border_kind_translate_vline[] = { 155 { "space", ' ' }, 156 { "ascii", '|' }, 157 { "acs", -1 }, 158 { 0, 0 }, 159 { "ascii", '|' } 160 }; 161 162 struct tui_translate tui_border_kind_translate_hline[] = { 163 { "space", ' ' }, 164 { "ascii", '-' }, 165 { "acs", -1 }, 166 { 0, 0 }, 167 { "ascii", '-' } 168 }; 169 170 struct tui_translate tui_border_kind_translate_ulcorner[] = { 171 { "space", ' ' }, 172 { "ascii", '+' }, 173 { "acs", -1 }, 174 { 0, 0 }, 175 { "ascii", '+' } 176 }; 177 178 struct tui_translate tui_border_kind_translate_urcorner[] = { 179 { "space", ' ' }, 180 { "ascii", '+' }, 181 { "acs", -1 }, 182 { 0, 0 }, 183 { "ascii", '+' } 184 }; 185 186 struct tui_translate tui_border_kind_translate_llcorner[] = { 187 { "space", ' ' }, 188 { "ascii", '+' }, 189 { "acs", -1 }, 190 { 0, 0 }, 191 { "ascii", '+' } 192 }; 193 194 struct tui_translate tui_border_kind_translate_lrcorner[] = { 195 { "space", ' ' }, 196 { "ascii", '+' }, 197 { "acs", -1 }, 198 { 0, 0 }, 199 { "ascii", '+' } 200 }; 201 202 203 /* Tui configuration variables controlled with set/show command. */ 204 const char *tui_active_border_mode = "bold-standout"; 205 static void 206 show_tui_active_border_mode (struct ui_file *file, 207 int from_tty, 208 struct cmd_list_element *c, 209 const char *value) 210 { 211 fprintf_filtered (file, _("\ 212 The attribute mode to use for the active TUI window border is \"%s\".\n"), 213 value); 214 } 215 216 const char *tui_border_mode = "normal"; 217 static void 218 show_tui_border_mode (struct ui_file *file, 219 int from_tty, 220 struct cmd_list_element *c, 221 const char *value) 222 { 223 fprintf_filtered (file, _("\ 224 The attribute mode to use for the TUI window borders is \"%s\".\n"), 225 value); 226 } 227 228 const char *tui_border_kind = "acs"; 229 static void 230 show_tui_border_kind (struct ui_file *file, 231 int from_tty, 232 struct cmd_list_element *c, 233 const char *value) 234 { 235 fprintf_filtered (file, _("The kind of border for TUI windows is \"%s\".\n"), 236 value); 237 } 238 239 240 /* Tui internal configuration variables. These variables are updated 241 by tui_update_variables to reflect the tui configuration 242 variables. */ 243 chtype tui_border_vline; 244 chtype tui_border_hline; 245 chtype tui_border_ulcorner; 246 chtype tui_border_urcorner; 247 chtype tui_border_llcorner; 248 chtype tui_border_lrcorner; 249 250 int tui_border_attrs; 251 int tui_active_border_attrs; 252 253 /* Identify the item in the translation table. 254 When the item is not recognized, use the default entry. */ 255 static struct tui_translate * 256 translate (const char *name, struct tui_translate *table) 257 { 258 while (table->name) 259 { 260 if (name && strcmp (table->name, name) == 0) 261 return table; 262 table++; 263 } 264 265 /* Not found, return default entry. */ 266 table++; 267 return table; 268 } 269 270 /* Update the tui internal configuration according to gdb settings. 271 Returns 1 if the configuration has changed and the screen should 272 be redrawn. */ 273 int 274 tui_update_variables (void) 275 { 276 int need_redraw = 0; 277 struct tui_translate *entry; 278 279 entry = translate (tui_border_mode, tui_border_mode_translate); 280 if (tui_border_attrs != entry->value) 281 { 282 tui_border_attrs = entry->value; 283 need_redraw = 1; 284 } 285 entry = translate (tui_active_border_mode, tui_border_mode_translate); 286 if (tui_active_border_attrs != entry->value) 287 { 288 tui_active_border_attrs = entry->value; 289 need_redraw = 1; 290 } 291 292 /* If one corner changes, all characters are changed. 293 Only check the first one. The ACS characters are determined at 294 run time by curses terminal management. */ 295 entry = translate (tui_border_kind, tui_border_kind_translate_lrcorner); 296 if (tui_border_lrcorner != (chtype) entry->value) 297 { 298 tui_border_lrcorner = (entry->value < 0) ? ACS_LRCORNER : entry->value; 299 need_redraw = 1; 300 } 301 entry = translate (tui_border_kind, tui_border_kind_translate_llcorner); 302 tui_border_llcorner = (entry->value < 0) ? ACS_LLCORNER : entry->value; 303 304 entry = translate (tui_border_kind, tui_border_kind_translate_ulcorner); 305 tui_border_ulcorner = (entry->value < 0) ? ACS_ULCORNER : entry->value; 306 307 entry = translate (tui_border_kind, tui_border_kind_translate_urcorner); 308 tui_border_urcorner = (entry->value < 0) ? ACS_URCORNER : entry->value; 309 310 entry = translate (tui_border_kind, tui_border_kind_translate_hline); 311 tui_border_hline = (entry->value < 0) ? ACS_HLINE : entry->value; 312 313 entry = translate (tui_border_kind, tui_border_kind_translate_vline); 314 tui_border_vline = (entry->value < 0) ? ACS_VLINE : entry->value; 315 316 return need_redraw; 317 } 318 319 static void 320 set_tui_cmd (char *args, int from_tty) 321 { 322 } 323 324 static void 325 show_tui_cmd (char *args, int from_tty) 326 { 327 } 328 329 static struct cmd_list_element *tuilist; 330 331 static void 332 tui_command (char *args, int from_tty) 333 { 334 printf_unfiltered (_("\"tui\" must be followed by the name of a " 335 "tui command.\n")); 336 help_list (tuilist, "tui ", -1, gdb_stdout); 337 } 338 339 struct cmd_list_element ** 340 tui_get_cmd_list (void) 341 { 342 if (tuilist == 0) 343 add_prefix_cmd ("tui", class_tui, tui_command, 344 _("Text User Interface commands."), 345 &tuilist, "tui ", 0, &cmdlist); 346 return &tuilist; 347 } 348 349 /* Function to initialize gdb commands, for tui window 350 manipulation. */ 351 352 /* Provide a prototype to silence -Wmissing-prototypes. */ 353 extern initialize_file_ftype _initialize_tui_win; 354 355 void 356 _initialize_tui_win (void) 357 { 358 static struct cmd_list_element *tui_setlist; 359 static struct cmd_list_element *tui_showlist; 360 361 /* Define the classes of commands. 362 They will appear in the help list in the reverse of this order. */ 363 add_prefix_cmd ("tui", class_tui, set_tui_cmd, 364 _("TUI configuration variables"), 365 &tui_setlist, "set tui ", 366 0 /* allow-unknown */, &setlist); 367 add_prefix_cmd ("tui", class_tui, show_tui_cmd, 368 _("TUI configuration variables"), 369 &tui_showlist, "show tui ", 370 0 /* allow-unknown */, &showlist); 371 372 add_com ("refresh", class_tui, tui_refresh_all_command, 373 _("Refresh the terminal display.\n")); 374 if (xdb_commands) 375 add_com_alias ("U", "refresh", class_tui, 0); 376 add_com ("tabset", class_tui, tui_set_tab_width_command, _("\ 377 Set the width (in characters) of tab stops.\n\ 378 Usage: tabset <n>\n")); 379 add_com ("winheight", class_tui, tui_set_win_height_command, _("\ 380 Set the height of a specified window.\n\ 381 Usage: winheight <win_name> [+ | -] <#lines>\n\ 382 Window names are:\n\ 383 src : the source window\n\ 384 cmd : the command window\n\ 385 asm : the disassembly window\n\ 386 regs : the register display\n")); 387 add_com_alias ("wh", "winheight", class_tui, 0); 388 add_info ("win", tui_all_windows_info, 389 _("List of all displayed windows.\n")); 390 add_com ("focus", class_tui, tui_set_focus_command, _("\ 391 Set focus to named window or next/prev window.\n\ 392 Usage: focus {<win> | next | prev}\n\ 393 Valid Window names are:\n\ 394 src : the source window\n\ 395 asm : the disassembly window\n\ 396 regs : the register display\n\ 397 cmd : the command window\n")); 398 add_com_alias ("fs", "focus", class_tui, 0); 399 add_com ("+", class_tui, tui_scroll_forward_command, _("\ 400 Scroll window forward.\n\ 401 Usage: + [win] [n]\n")); 402 add_com ("-", class_tui, tui_scroll_backward_command, _("\ 403 Scroll window backward.\n\ 404 Usage: - [win] [n]\n")); 405 add_com ("<", class_tui, tui_scroll_left_command, _("\ 406 Scroll window forward.\n\ 407 Usage: < [win] [n]\n")); 408 add_com (">", class_tui, tui_scroll_right_command, _("\ 409 Scroll window backward.\n\ 410 Usage: > [win] [n]\n")); 411 if (xdb_commands) 412 add_com ("w", class_xdb, tui_xdb_set_win_height_command, _("\ 413 XDB compatibility command for setting the height of a command window.\n\ 414 Usage: w <#lines>\n")); 415 416 /* Define the tui control variables. */ 417 add_setshow_enum_cmd ("border-kind", no_class, tui_border_kind_enums, 418 &tui_border_kind, _("\ 419 Set the kind of border for TUI windows."), _("\ 420 Show the kind of border for TUI windows."), _("\ 421 This variable controls the border of TUI windows:\n\ 422 space use a white space\n\ 423 ascii use ascii characters + - | for the border\n\ 424 acs use the Alternate Character Set"), 425 NULL, 426 show_tui_border_kind, 427 &tui_setlist, &tui_showlist); 428 429 add_setshow_enum_cmd ("border-mode", no_class, tui_border_mode_enums, 430 &tui_border_mode, _("\ 431 Set the attribute mode to use for the TUI window borders."), _("\ 432 Show the attribute mode to use for the TUI window borders."), _("\ 433 This variable controls the attributes to use for the window borders:\n\ 434 normal normal display\n\ 435 standout use highlight mode of terminal\n\ 436 reverse use reverse video mode\n\ 437 half use half bright\n\ 438 half-standout use half bright and standout mode\n\ 439 bold use extra bright or bold\n\ 440 bold-standout use extra bright or bold with standout mode"), 441 NULL, 442 show_tui_border_mode, 443 &tui_setlist, &tui_showlist); 444 445 add_setshow_enum_cmd ("active-border-mode", no_class, tui_border_mode_enums, 446 &tui_active_border_mode, _("\ 447 Set the attribute mode to use for the active TUI window border."), _("\ 448 Show the attribute mode to use for the active TUI window border."), _("\ 449 This variable controls the attributes to use for the active window border:\n\ 450 normal normal display\n\ 451 standout use highlight mode of terminal\n\ 452 reverse use reverse video mode\n\ 453 half use half bright\n\ 454 half-standout use half bright and standout mode\n\ 455 bold use extra bright or bold\n\ 456 bold-standout use extra bright or bold with standout mode"), 457 NULL, 458 show_tui_active_border_mode, 459 &tui_setlist, &tui_showlist); 460 } 461 462 /* Update gdb's knowledge of the terminal size. */ 463 void 464 tui_update_gdb_sizes (void) 465 { 466 char cmd[50]; 467 468 /* Set to TUI command window dimension or use readline values. */ 469 xsnprintf (cmd, sizeof (cmd), "set width %d", 470 tui_active ? TUI_CMD_WIN->generic.width : tui_term_width()); 471 execute_command (cmd, 0); 472 xsnprintf (cmd, sizeof (cmd), "set height %d", 473 tui_active ? TUI_CMD_WIN->generic.height : tui_term_height()); 474 execute_command (cmd, 0); 475 } 476 477 478 /* Set the logical focus to win_info. */ 479 void 480 tui_set_win_focus_to (struct tui_win_info *win_info) 481 { 482 if (win_info != NULL) 483 { 484 struct tui_win_info *win_with_focus = tui_win_with_focus (); 485 486 if (win_with_focus != NULL 487 && win_with_focus->generic.type != CMD_WIN) 488 tui_unhighlight_win (win_with_focus); 489 tui_set_win_with_focus (win_info); 490 if (win_info->generic.type != CMD_WIN) 491 tui_highlight_win (win_info); 492 } 493 } 494 495 496 void 497 tui_scroll_forward (struct tui_win_info *win_to_scroll, 498 int num_to_scroll) 499 { 500 if (win_to_scroll != TUI_CMD_WIN) 501 { 502 int _num_to_scroll = num_to_scroll; 503 504 if (num_to_scroll == 0) 505 _num_to_scroll = win_to_scroll->generic.height - 3; 506 507 /* If we are scrolling the source or disassembly window, do a 508 "psuedo" scroll since not all of the source is in memory, 509 only what is in the viewport. If win_to_scroll is the 510 command window do nothing since the term should handle 511 it. */ 512 if (win_to_scroll == TUI_SRC_WIN) 513 tui_vertical_source_scroll (FORWARD_SCROLL, _num_to_scroll); 514 else if (win_to_scroll == TUI_DISASM_WIN) 515 tui_vertical_disassem_scroll (FORWARD_SCROLL, _num_to_scroll); 516 else if (win_to_scroll == TUI_DATA_WIN) 517 tui_vertical_data_scroll (FORWARD_SCROLL, _num_to_scroll); 518 } 519 } 520 521 void 522 tui_scroll_backward (struct tui_win_info *win_to_scroll, 523 int num_to_scroll) 524 { 525 if (win_to_scroll != TUI_CMD_WIN) 526 { 527 int _num_to_scroll = num_to_scroll; 528 529 if (num_to_scroll == 0) 530 _num_to_scroll = win_to_scroll->generic.height - 3; 531 532 /* If we are scrolling the source or disassembly window, do a 533 "psuedo" scroll since not all of the source is in memory, 534 only what is in the viewport. If win_to_scroll is the 535 command window do nothing since the term should handle 536 it. */ 537 if (win_to_scroll == TUI_SRC_WIN) 538 tui_vertical_source_scroll (BACKWARD_SCROLL, _num_to_scroll); 539 else if (win_to_scroll == TUI_DISASM_WIN) 540 tui_vertical_disassem_scroll (BACKWARD_SCROLL, _num_to_scroll); 541 else if (win_to_scroll == TUI_DATA_WIN) 542 tui_vertical_data_scroll (BACKWARD_SCROLL, _num_to_scroll); 543 } 544 } 545 546 547 void 548 tui_scroll_left (struct tui_win_info *win_to_scroll, 549 int num_to_scroll) 550 { 551 if (win_to_scroll != TUI_CMD_WIN) 552 { 553 int _num_to_scroll = num_to_scroll; 554 555 if (_num_to_scroll == 0) 556 _num_to_scroll = 1; 557 558 /* If we are scrolling the source or disassembly window, do a 559 "psuedo" scroll since not all of the source is in memory, 560 only what is in the viewport. If win_to_scroll is the command 561 window do nothing since the term should handle it. */ 562 if (win_to_scroll == TUI_SRC_WIN 563 || win_to_scroll == TUI_DISASM_WIN) 564 tui_horizontal_source_scroll (win_to_scroll, LEFT_SCROLL, 565 _num_to_scroll); 566 } 567 } 568 569 570 void 571 tui_scroll_right (struct tui_win_info *win_to_scroll, 572 int num_to_scroll) 573 { 574 if (win_to_scroll != TUI_CMD_WIN) 575 { 576 int _num_to_scroll = num_to_scroll; 577 578 if (_num_to_scroll == 0) 579 _num_to_scroll = 1; 580 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, 588 _num_to_scroll); 589 } 590 } 591 592 593 /* Scroll a window. Arguments are passed through a va_list. */ 594 void 595 tui_scroll (enum tui_scroll_direction direction, 596 struct tui_win_info *win_to_scroll, 597 int num_to_scroll) 598 { 599 switch (direction) 600 { 601 case FORWARD_SCROLL: 602 tui_scroll_forward (win_to_scroll, num_to_scroll); 603 break; 604 case BACKWARD_SCROLL: 605 tui_scroll_backward (win_to_scroll, num_to_scroll); 606 break; 607 case LEFT_SCROLL: 608 tui_scroll_left (win_to_scroll, num_to_scroll); 609 break; 610 case RIGHT_SCROLL: 611 tui_scroll_right (win_to_scroll, num_to_scroll); 612 break; 613 default: 614 break; 615 } 616 } 617 618 619 void 620 tui_refresh_all_win (void) 621 { 622 enum tui_win_type type; 623 624 clearok (curscr, TRUE); 625 tui_refresh_all (tui_win_list); 626 for (type = SRC_WIN; type < MAX_MAJOR_WINDOWS; type++) 627 { 628 if (tui_win_list[type] 629 && tui_win_list[type]->generic.is_visible) 630 { 631 switch (type) 632 { 633 case SRC_WIN: 634 case DISASSEM_WIN: 635 tui_show_source_content (tui_win_list[type]); 636 tui_check_and_display_highlight_if_needed (tui_win_list[type]); 637 tui_erase_exec_info_content (tui_win_list[type]); 638 tui_update_exec_info (tui_win_list[type]); 639 break; 640 case DATA_WIN: 641 tui_refresh_data_win (); 642 break; 643 default: 644 break; 645 } 646 } 647 } 648 tui_show_locator_content (); 649 } 650 651 652 /* Resize all the windows based on the terminal size. This function 653 gets called from within the readline sinwinch handler. */ 654 void 655 tui_resize_all (void) 656 { 657 int height_diff, width_diff; 658 int screenheight, screenwidth; 659 660 rl_get_screen_size (&screenheight, &screenwidth); 661 width_diff = screenwidth - tui_term_width (); 662 height_diff = screenheight - tui_term_height (); 663 if (height_diff || width_diff) 664 { 665 enum tui_layout_type cur_layout = tui_current_layout (); 666 struct tui_win_info *win_with_focus = tui_win_with_focus (); 667 struct tui_win_info *first_win; 668 struct tui_win_info *second_win; 669 struct tui_gen_win_info *locator = tui_locator_win_info_ptr (); 670 enum tui_win_type win_type; 671 int new_height, split_diff, cmd_split_diff, num_wins_displayed = 2; 672 673 #ifdef HAVE_RESIZE_TERM 674 resize_term (screenheight, screenwidth); 675 #endif 676 /* Turn keypad off while we resize. */ 677 if (win_with_focus != TUI_CMD_WIN) 678 keypad (TUI_CMD_WIN->generic.handle, FALSE); 679 tui_update_gdb_sizes (); 680 tui_set_term_height_to (screenheight); 681 tui_set_term_width_to (screenwidth); 682 if (cur_layout == SRC_DISASSEM_COMMAND 683 || cur_layout == SRC_DATA_COMMAND 684 || cur_layout == DISASSEM_DATA_COMMAND) 685 num_wins_displayed++; 686 split_diff = height_diff / num_wins_displayed; 687 cmd_split_diff = split_diff; 688 if (height_diff % num_wins_displayed) 689 { 690 if (height_diff < 0) 691 cmd_split_diff--; 692 else 693 cmd_split_diff++; 694 } 695 /* Now adjust each window. */ 696 /* erase + clearok are used instead of a straightforward clear as 697 AIX 5.3 does not define clear. */ 698 erase (); 699 clearok (curscr, TRUE); 700 refresh (); 701 switch (cur_layout) 702 { 703 case SRC_COMMAND: 704 case DISASSEM_COMMAND: 705 first_win = (struct tui_win_info *) (tui_source_windows ())->list[0]; 706 first_win->generic.width += width_diff; 707 locator->width += width_diff; 708 /* Check for invalid heights. */ 709 if (height_diff == 0) 710 new_height = first_win->generic.height; 711 else if ((first_win->generic.height + split_diff) >= 712 (screenheight - MIN_CMD_WIN_HEIGHT - 1)) 713 new_height = screenheight - MIN_CMD_WIN_HEIGHT - 1; 714 else if ((first_win->generic.height + split_diff) <= 0) 715 new_height = MIN_WIN_HEIGHT; 716 else 717 new_height = first_win->generic.height + split_diff; 718 719 locator->origin.y = new_height + 1; 720 make_invisible_and_set_new_height (first_win, new_height); 721 TUI_CMD_WIN->generic.origin.y = locator->origin.y + 1; 722 TUI_CMD_WIN->generic.width += width_diff; 723 new_height = screenheight - TUI_CMD_WIN->generic.origin.y; 724 make_invisible_and_set_new_height (TUI_CMD_WIN, new_height); 725 make_visible_with_new_height (first_win); 726 make_visible_with_new_height (TUI_CMD_WIN); 727 if (first_win->generic.content_size <= 0) 728 tui_erase_source_content (first_win, EMPTY_SOURCE_PROMPT); 729 break; 730 default: 731 if (cur_layout == SRC_DISASSEM_COMMAND) 732 { 733 first_win = TUI_SRC_WIN; 734 first_win->generic.width += width_diff; 735 second_win = TUI_DISASM_WIN; 736 second_win->generic.width += width_diff; 737 } 738 else 739 { 740 first_win = TUI_DATA_WIN; 741 first_win->generic.width += width_diff; 742 second_win = (struct tui_win_info *) 743 (tui_source_windows ())->list[0]; 744 second_win->generic.width += width_diff; 745 } 746 /* Change the first window's height/width. */ 747 /* Check for invalid heights. */ 748 if (height_diff == 0) 749 new_height = first_win->generic.height; 750 else if ((first_win->generic.height + 751 second_win->generic.height + (split_diff * 2)) >= 752 (screenheight - MIN_CMD_WIN_HEIGHT - 1)) 753 new_height = (screenheight - MIN_CMD_WIN_HEIGHT - 1) / 2; 754 else if ((first_win->generic.height + split_diff) <= 0) 755 new_height = MIN_WIN_HEIGHT; 756 else 757 new_height = first_win->generic.height + split_diff; 758 make_invisible_and_set_new_height (first_win, new_height); 759 760 locator->width += width_diff; 761 762 /* Change the second window's height/width. */ 763 /* Check for invalid heights. */ 764 if (height_diff == 0) 765 new_height = second_win->generic.height; 766 else if ((first_win->generic.height + 767 second_win->generic.height + (split_diff * 2)) >= 768 (screenheight - MIN_CMD_WIN_HEIGHT - 1)) 769 { 770 new_height = screenheight - MIN_CMD_WIN_HEIGHT - 1; 771 if (new_height % 2) 772 new_height = (new_height / 2) + 1; 773 else 774 new_height /= 2; 775 } 776 else if ((second_win->generic.height + split_diff) <= 0) 777 new_height = MIN_WIN_HEIGHT; 778 else 779 new_height = second_win->generic.height + split_diff; 780 second_win->generic.origin.y = first_win->generic.height - 1; 781 make_invisible_and_set_new_height (second_win, new_height); 782 783 /* Change the command window's height/width. */ 784 TUI_CMD_WIN->generic.origin.y = locator->origin.y + 1; 785 make_invisible_and_set_new_height (TUI_CMD_WIN, 786 TUI_CMD_WIN->generic.height 787 + cmd_split_diff); 788 make_visible_with_new_height (first_win); 789 make_visible_with_new_height (second_win); 790 make_visible_with_new_height (TUI_CMD_WIN); 791 if (first_win->generic.content_size <= 0) 792 tui_erase_source_content (first_win, EMPTY_SOURCE_PROMPT); 793 if (second_win->generic.content_size <= 0) 794 tui_erase_source_content (second_win, EMPTY_SOURCE_PROMPT); 795 break; 796 } 797 /* Now remove all invisible windows, and their content so that 798 they get created again when called for with the new size. */ 799 for (win_type = SRC_WIN; (win_type < MAX_MAJOR_WINDOWS); win_type++) 800 { 801 if (win_type != CMD_WIN 802 && (tui_win_list[win_type] != NULL) 803 && !tui_win_list[win_type]->generic.is_visible) 804 { 805 tui_free_window (tui_win_list[win_type]); 806 tui_win_list[win_type] = (struct tui_win_info *) NULL; 807 } 808 } 809 /* Turn keypad back on, unless focus is in the command 810 window. */ 811 if (win_with_focus != TUI_CMD_WIN) 812 keypad (TUI_CMD_WIN->generic.handle, TRUE); 813 } 814 } 815 816 #ifdef SIGWINCH 817 /* SIGWINCH signal handler for the tui. This signal handler is always 818 called, even when the readline package clears signals because it is 819 set as the old_sigwinch() (TUI only). */ 820 static void 821 tui_sigwinch_handler (int signal) 822 { 823 /* Say that a resize was done so that the readline can do it later 824 when appropriate. */ 825 tui_set_win_resized_to (TRUE); 826 } 827 #endif 828 829 /* Initializes SIGWINCH signal handler for the tui. */ 830 void 831 tui_initialize_win (void) 832 { 833 #ifdef SIGWINCH 834 #ifdef HAVE_SIGACTION 835 struct sigaction old_winch; 836 837 memset (&old_winch, 0, sizeof (old_winch)); 838 old_winch.sa_handler = &tui_sigwinch_handler; 839 sigaction (SIGWINCH, &old_winch, NULL); 840 #else 841 signal (SIGWINCH, &tui_sigwinch_handler); 842 #endif 843 #endif 844 } 845 846 847 /************************* 848 ** STATIC LOCAL FUNCTIONS 849 **************************/ 850 851 852 static void 853 tui_scroll_forward_command (char *arg, int from_tty) 854 { 855 int num_to_scroll = 1; 856 struct tui_win_info *win_to_scroll; 857 858 /* Make sure the curses mode is enabled. */ 859 tui_enable (); 860 if (arg == (char *) NULL) 861 parse_scrolling_args (arg, &win_to_scroll, (int *) NULL); 862 else 863 parse_scrolling_args (arg, &win_to_scroll, &num_to_scroll); 864 tui_scroll (FORWARD_SCROLL, win_to_scroll, num_to_scroll); 865 } 866 867 868 static void 869 tui_scroll_backward_command (char *arg, int from_tty) 870 { 871 int num_to_scroll = 1; 872 struct tui_win_info *win_to_scroll; 873 874 /* Make sure the curses mode is enabled. */ 875 tui_enable (); 876 if (arg == (char *) NULL) 877 parse_scrolling_args (arg, &win_to_scroll, (int *) NULL); 878 else 879 parse_scrolling_args (arg, &win_to_scroll, &num_to_scroll); 880 tui_scroll (BACKWARD_SCROLL, win_to_scroll, num_to_scroll); 881 } 882 883 884 static void 885 tui_scroll_left_command (char *arg, int from_tty) 886 { 887 int num_to_scroll; 888 struct tui_win_info *win_to_scroll; 889 890 /* Make sure the curses mode is enabled. */ 891 tui_enable (); 892 parse_scrolling_args (arg, &win_to_scroll, &num_to_scroll); 893 tui_scroll (LEFT_SCROLL, win_to_scroll, num_to_scroll); 894 } 895 896 897 static void 898 tui_scroll_right_command (char *arg, int from_tty) 899 { 900 int num_to_scroll; 901 struct tui_win_info *win_to_scroll; 902 903 /* Make sure the curses mode is enabled. */ 904 tui_enable (); 905 parse_scrolling_args (arg, &win_to_scroll, &num_to_scroll); 906 tui_scroll (RIGHT_SCROLL, win_to_scroll, num_to_scroll); 907 } 908 909 910 /* Set focus to the window named by 'arg'. */ 911 static void 912 tui_set_focus (char *arg, int from_tty) 913 { 914 if (arg != (char *) NULL) 915 { 916 char *buf_ptr = (char *) xstrdup (arg); 917 int i; 918 struct tui_win_info *win_info = (struct tui_win_info *) NULL; 919 920 for (i = 0; (i < strlen (buf_ptr)); i++) 921 buf_ptr[i] = toupper (arg[i]); 922 923 if (subset_compare (buf_ptr, "NEXT")) 924 win_info = tui_next_win (tui_win_with_focus ()); 925 else if (subset_compare (buf_ptr, "PREV")) 926 win_info = tui_prev_win (tui_win_with_focus ()); 927 else 928 win_info = tui_partial_win_by_name (buf_ptr); 929 930 if (win_info == (struct tui_win_info *) NULL 931 || !win_info->generic.is_visible) 932 warning (_("Invalid window specified. \n\ 933 The window name specified must be valid and visible.\n")); 934 else 935 { 936 tui_set_win_focus_to (win_info); 937 keypad (TUI_CMD_WIN->generic.handle, (win_info != TUI_CMD_WIN)); 938 } 939 940 if (TUI_DATA_WIN && TUI_DATA_WIN->generic.is_visible) 941 tui_refresh_data_win (); 942 xfree (buf_ptr); 943 printf_filtered (_("Focus set to %s window.\n"), 944 tui_win_name ((struct tui_gen_win_info *) 945 tui_win_with_focus ())); 946 } 947 else 948 warning (_("Incorrect Number of Arguments.\n%s"), FOCUS_USAGE); 949 } 950 951 static void 952 tui_set_focus_command (char *arg, int from_tty) 953 { 954 /* Make sure the curses mode is enabled. */ 955 tui_enable (); 956 tui_set_focus (arg, from_tty); 957 } 958 959 960 static void 961 tui_all_windows_info (char *arg, int from_tty) 962 { 963 enum tui_win_type type; 964 struct tui_win_info *win_with_focus = tui_win_with_focus (); 965 966 for (type = SRC_WIN; (type < MAX_MAJOR_WINDOWS); type++) 967 if (tui_win_list[type] 968 && tui_win_list[type]->generic.is_visible) 969 { 970 if (win_with_focus == tui_win_list[type]) 971 printf_filtered (" %s\t(%d lines) <has focus>\n", 972 tui_win_name (&tui_win_list[type]->generic), 973 tui_win_list[type]->generic.height); 974 else 975 printf_filtered (" %s\t(%d lines)\n", 976 tui_win_name (&tui_win_list[type]->generic), 977 tui_win_list[type]->generic.height); 978 } 979 } 980 981 982 static void 983 tui_refresh_all_command (char *arg, int from_tty) 984 { 985 /* Make sure the curses mode is enabled. */ 986 tui_enable (); 987 988 tui_refresh_all_win (); 989 } 990 991 992 /* Set the height of the specified window. */ 993 static void 994 tui_set_tab_width_command (char *arg, int from_tty) 995 { 996 /* Make sure the curses mode is enabled. */ 997 tui_enable (); 998 if (arg != (char *) NULL) 999 { 1000 int ts; 1001 1002 ts = atoi (arg); 1003 if (ts > 0) 1004 tui_set_default_tab_len (ts); 1005 else 1006 warning (_("Tab widths greater than 0 must be specified.")); 1007 } 1008 } 1009 1010 1011 /* Set the height of the specified window. */ 1012 static void 1013 tui_set_win_height (char *arg, int from_tty) 1014 { 1015 /* Make sure the curses mode is enabled. */ 1016 tui_enable (); 1017 if (arg != (char *) NULL) 1018 { 1019 char *buf = xstrdup (arg); 1020 char *buf_ptr = buf; 1021 char *wname = (char *) NULL; 1022 int new_height, i; 1023 struct tui_win_info *win_info; 1024 1025 wname = buf_ptr; 1026 buf_ptr = strchr (buf_ptr, ' '); 1027 if (buf_ptr != (char *) NULL) 1028 { 1029 *buf_ptr = (char) 0; 1030 1031 /* Validate the window name. */ 1032 for (i = 0; i < strlen (wname); i++) 1033 wname[i] = toupper (wname[i]); 1034 win_info = tui_partial_win_by_name (wname); 1035 1036 if (win_info == (struct tui_win_info *) NULL 1037 || !win_info->generic.is_visible) 1038 warning (_("Invalid window specified. \n\ 1039 The window name specified must be valid and visible.\n")); 1040 else 1041 { 1042 /* Process the size. */ 1043 while (*(++buf_ptr) == ' ') 1044 ; 1045 1046 if (*buf_ptr != (char) 0) 1047 { 1048 int negate = FALSE; 1049 int fixed_size = TRUE; 1050 int input_no;; 1051 1052 if (*buf_ptr == '+' || *buf_ptr == '-') 1053 { 1054 if (*buf_ptr == '-') 1055 negate = TRUE; 1056 fixed_size = FALSE; 1057 buf_ptr++; 1058 } 1059 input_no = atoi (buf_ptr); 1060 if (input_no > 0) 1061 { 1062 if (negate) 1063 input_no *= (-1); 1064 if (fixed_size) 1065 new_height = input_no; 1066 else 1067 new_height = win_info->generic.height + input_no; 1068 1069 /* Now change the window's height, and adjust 1070 all other windows around it. */ 1071 if (tui_adjust_win_heights (win_info, 1072 new_height) == TUI_FAILURE) 1073 warning (_("Invalid window height specified.\n%s"), 1074 WIN_HEIGHT_USAGE); 1075 else 1076 tui_update_gdb_sizes (); 1077 } 1078 else 1079 warning (_("Invalid window height specified.\n%s"), 1080 WIN_HEIGHT_USAGE); 1081 } 1082 } 1083 } 1084 else 1085 printf_filtered (WIN_HEIGHT_USAGE); 1086 1087 if (buf != (char *) NULL) 1088 xfree (buf); 1089 } 1090 else 1091 printf_filtered (WIN_HEIGHT_USAGE); 1092 } 1093 1094 /* Set the height of the specified window, with va_list. */ 1095 static void 1096 tui_set_win_height_command (char *arg, int from_tty) 1097 { 1098 /* Make sure the curses mode is enabled. */ 1099 tui_enable (); 1100 tui_set_win_height (arg, from_tty); 1101 } 1102 1103 1104 /* XDB Compatibility command for setting the window height. This will 1105 increase or decrease the command window by the specified 1106 amount. */ 1107 static void 1108 tui_xdb_set_win_height (char *arg, int from_tty) 1109 { 1110 /* Make sure the curses mode is enabled. */ 1111 tui_enable (); 1112 if (arg != (char *) NULL) 1113 { 1114 int input_no = atoi (arg); 1115 1116 if (input_no > 0) 1117 { /* Add 1 for the locator. */ 1118 int new_height = tui_term_height () - (input_no + 1); 1119 1120 if (!new_height_ok (tui_win_list[CMD_WIN], new_height) 1121 || tui_adjust_win_heights (tui_win_list[CMD_WIN], 1122 new_height) == TUI_FAILURE) 1123 warning (_("Invalid window height specified.\n%s"), 1124 XDBWIN_HEIGHT_USAGE); 1125 } 1126 else 1127 warning (_("Invalid window height specified.\n%s"), 1128 XDBWIN_HEIGHT_USAGE); 1129 } 1130 else 1131 warning (_("Invalid window height specified.\n%s"), XDBWIN_HEIGHT_USAGE); 1132 } 1133 1134 /* Set the height of the specified window, with va_list. */ 1135 static void 1136 tui_xdb_set_win_height_command (char *arg, int from_tty) 1137 { 1138 tui_xdb_set_win_height (arg, from_tty); 1139 } 1140 1141 1142 /* Function to adjust all window heights around the primary. */ 1143 static enum tui_status 1144 tui_adjust_win_heights (struct tui_win_info *primary_win_info, 1145 int new_height) 1146 { 1147 enum tui_status status = TUI_FAILURE; 1148 1149 if (new_height_ok (primary_win_info, new_height)) 1150 { 1151 status = TUI_SUCCESS; 1152 if (new_height != primary_win_info->generic.height) 1153 { 1154 int diff; 1155 struct tui_win_info *win_info; 1156 struct tui_gen_win_info *locator = tui_locator_win_info_ptr (); 1157 enum tui_layout_type cur_layout = tui_current_layout (); 1158 1159 diff = (new_height - primary_win_info->generic.height) * (-1); 1160 if (cur_layout == SRC_COMMAND 1161 || cur_layout == DISASSEM_COMMAND) 1162 { 1163 struct tui_win_info *src_win_info; 1164 1165 make_invisible_and_set_new_height (primary_win_info, new_height); 1166 if (primary_win_info->generic.type == CMD_WIN) 1167 { 1168 win_info = (tui_source_windows ())->list[0]; 1169 src_win_info = win_info; 1170 } 1171 else 1172 { 1173 win_info = tui_win_list[CMD_WIN]; 1174 src_win_info = primary_win_info; 1175 } 1176 make_invisible_and_set_new_height (win_info, 1177 win_info->generic.height + diff); 1178 TUI_CMD_WIN->generic.origin.y = locator->origin.y + 1; 1179 make_visible_with_new_height (win_info); 1180 make_visible_with_new_height (primary_win_info); 1181 if (src_win_info->generic.content_size <= 0) 1182 tui_erase_source_content (src_win_info, EMPTY_SOURCE_PROMPT); 1183 } 1184 else 1185 { 1186 struct tui_win_info *first_win; 1187 struct tui_win_info *second_win; 1188 1189 if (cur_layout == SRC_DISASSEM_COMMAND) 1190 { 1191 first_win = TUI_SRC_WIN; 1192 second_win = TUI_DISASM_WIN; 1193 } 1194 else 1195 { 1196 first_win = TUI_DATA_WIN; 1197 second_win = (tui_source_windows ())->list[0]; 1198 } 1199 if (primary_win_info == TUI_CMD_WIN) 1200 { /* Split the change in height accross the 1st & 2nd 1201 windows, adjusting them as well. */ 1202 /* Subtract the locator. */ 1203 int first_split_diff = diff / 2; 1204 int second_split_diff = first_split_diff; 1205 1206 if (diff % 2) 1207 { 1208 if (first_win->generic.height > 1209 second_win->generic.height) 1210 if (diff < 0) 1211 first_split_diff--; 1212 else 1213 first_split_diff++; 1214 else 1215 { 1216 if (diff < 0) 1217 second_split_diff--; 1218 else 1219 second_split_diff++; 1220 } 1221 } 1222 /* Make sure that the minimum hieghts are 1223 honored. */ 1224 while ((first_win->generic.height + first_split_diff) < 3) 1225 { 1226 first_split_diff++; 1227 second_split_diff--; 1228 } 1229 while ((second_win->generic.height + second_split_diff) < 3) 1230 { 1231 second_split_diff++; 1232 first_split_diff--; 1233 } 1234 make_invisible_and_set_new_height ( 1235 first_win, 1236 first_win->generic.height + first_split_diff); 1237 second_win->generic.origin.y = first_win->generic.height - 1; 1238 make_invisible_and_set_new_height (second_win, 1239 second_win->generic.height 1240 + second_split_diff); 1241 TUI_CMD_WIN->generic.origin.y = locator->origin.y + 1; 1242 make_invisible_and_set_new_height (TUI_CMD_WIN, new_height); 1243 } 1244 else 1245 { 1246 if ((TUI_CMD_WIN->generic.height + diff) < 1) 1247 { /* If there is no way to increase the command 1248 window take real estate from the 1st or 2nd 1249 window. */ 1250 if ((TUI_CMD_WIN->generic.height + diff) < 1) 1251 { 1252 int i; 1253 1254 for (i = TUI_CMD_WIN->generic.height + diff; 1255 (i < 1); i++) 1256 if (primary_win_info == first_win) 1257 second_win->generic.height--; 1258 else 1259 first_win->generic.height--; 1260 } 1261 } 1262 if (primary_win_info == first_win) 1263 make_invisible_and_set_new_height (first_win, new_height); 1264 else 1265 make_invisible_and_set_new_height ( 1266 first_win, 1267 first_win->generic.height); 1268 second_win->generic.origin.y = first_win->generic.height - 1; 1269 if (primary_win_info == second_win) 1270 make_invisible_and_set_new_height (second_win, new_height); 1271 else 1272 make_invisible_and_set_new_height ( 1273 second_win, second_win->generic.height); 1274 TUI_CMD_WIN->generic.origin.y = locator->origin.y + 1; 1275 if ((TUI_CMD_WIN->generic.height + diff) < 1) 1276 make_invisible_and_set_new_height (TUI_CMD_WIN, 1); 1277 else 1278 make_invisible_and_set_new_height (TUI_CMD_WIN, 1279 TUI_CMD_WIN->generic.height + diff); 1280 } 1281 make_visible_with_new_height (TUI_CMD_WIN); 1282 make_visible_with_new_height (second_win); 1283 make_visible_with_new_height (first_win); 1284 if (first_win->generic.content_size <= 0) 1285 tui_erase_source_content (first_win, EMPTY_SOURCE_PROMPT); 1286 if (second_win->generic.content_size <= 0) 1287 tui_erase_source_content (second_win, EMPTY_SOURCE_PROMPT); 1288 } 1289 } 1290 } 1291 1292 return status; 1293 } 1294 1295 1296 /* Function make the target window (and auxillary windows associated 1297 with the targer) invisible, and set the new height and 1298 location. */ 1299 static void 1300 make_invisible_and_set_new_height (struct tui_win_info *win_info, 1301 int height) 1302 { 1303 int i; 1304 struct tui_gen_win_info *gen_win_info; 1305 1306 tui_make_invisible (&win_info->generic); 1307 win_info->generic.height = height; 1308 if (height > 1) 1309 win_info->generic.viewport_height = height - 1; 1310 else 1311 win_info->generic.viewport_height = height; 1312 if (win_info != TUI_CMD_WIN) 1313 win_info->generic.viewport_height--; 1314 1315 /* Now deal with the auxillary windows associated with win_info. */ 1316 switch (win_info->generic.type) 1317 { 1318 case SRC_WIN: 1319 case DISASSEM_WIN: 1320 gen_win_info = win_info->detail.source_info.execution_info; 1321 tui_make_invisible (gen_win_info); 1322 gen_win_info->height = height; 1323 gen_win_info->origin.y = win_info->generic.origin.y; 1324 if (height > 1) 1325 gen_win_info->viewport_height = height - 1; 1326 else 1327 gen_win_info->viewport_height = height; 1328 if (win_info != TUI_CMD_WIN) 1329 gen_win_info->viewport_height--; 1330 1331 if (tui_win_has_locator (win_info)) 1332 { 1333 gen_win_info = tui_locator_win_info_ptr (); 1334 tui_make_invisible (gen_win_info); 1335 gen_win_info->origin.y = win_info->generic.origin.y + height; 1336 } 1337 break; 1338 case DATA_WIN: 1339 /* Delete all data item windows. */ 1340 for (i = 0; i < win_info->generic.content_size; i++) 1341 { 1342 gen_win_info = (struct tui_gen_win_info *) 1343 &((struct tui_win_element *) 1344 win_info->generic.content[i])->which_element.data_window; 1345 tui_delete_win (gen_win_info->handle); 1346 gen_win_info->handle = (WINDOW *) NULL; 1347 } 1348 break; 1349 default: 1350 break; 1351 } 1352 } 1353 1354 1355 /* Function to make the windows with new heights visible. This means 1356 re-creating the windows' content since the window had to be 1357 destroyed to be made invisible. */ 1358 static void 1359 make_visible_with_new_height (struct tui_win_info *win_info) 1360 { 1361 struct symtab *s; 1362 1363 tui_make_visible (&win_info->generic); 1364 tui_check_and_display_highlight_if_needed (win_info); 1365 switch (win_info->generic.type) 1366 { 1367 case SRC_WIN: 1368 case DISASSEM_WIN: 1369 tui_free_win_content (win_info->detail.source_info.execution_info); 1370 tui_make_visible (win_info->detail.source_info.execution_info); 1371 if (win_info->generic.content != NULL) 1372 { 1373 struct gdbarch *gdbarch = win_info->detail.source_info.gdbarch; 1374 struct tui_line_or_address line_or_addr; 1375 struct symtab_and_line cursal 1376 = get_current_source_symtab_and_line (); 1377 1378 line_or_addr = win_info->detail.source_info.start_line_or_addr; 1379 tui_free_win_content (&win_info->generic); 1380 tui_update_source_window (win_info, gdbarch, 1381 cursal.symtab, line_or_addr, TRUE); 1382 } 1383 else if (deprecated_safe_get_selected_frame () != NULL) 1384 { 1385 struct tui_line_or_address line; 1386 struct symtab_and_line cursal 1387 = get_current_source_symtab_and_line (); 1388 struct frame_info *frame = deprecated_safe_get_selected_frame (); 1389 struct gdbarch *gdbarch = get_frame_arch (frame); 1390 1391 s = find_pc_symtab (get_frame_pc (frame)); 1392 if (win_info->generic.type == SRC_WIN) 1393 { 1394 line.loa = LOA_LINE; 1395 line.u.line_no = cursal.line; 1396 } 1397 else 1398 { 1399 line.loa = LOA_ADDRESS; 1400 find_line_pc (s, cursal.line, &line.u.addr); 1401 } 1402 tui_update_source_window (win_info, gdbarch, s, line, TRUE); 1403 } 1404 if (tui_win_has_locator (win_info)) 1405 { 1406 tui_make_visible (tui_locator_win_info_ptr ()); 1407 tui_show_locator_content (); 1408 } 1409 break; 1410 case DATA_WIN: 1411 tui_display_all_data (); 1412 break; 1413 case CMD_WIN: 1414 win_info->detail.command_info.cur_line = 0; 1415 win_info->detail.command_info.curch = 0; 1416 #ifdef HAVE_WRESIZE 1417 wresize (TUI_CMD_WIN->generic.handle, 1418 TUI_CMD_WIN->generic.height, 1419 TUI_CMD_WIN->generic.width); 1420 #endif 1421 mvwin (TUI_CMD_WIN->generic.handle, 1422 TUI_CMD_WIN->generic.origin.y, 1423 TUI_CMD_WIN->generic.origin.x); 1424 wmove (win_info->generic.handle, 1425 win_info->detail.command_info.cur_line, 1426 win_info->detail.command_info.curch); 1427 break; 1428 default: 1429 break; 1430 } 1431 } 1432 1433 1434 static int 1435 new_height_ok (struct tui_win_info *primary_win_info, 1436 int new_height) 1437 { 1438 int ok = (new_height < tui_term_height ()); 1439 1440 if (ok) 1441 { 1442 int diff; 1443 enum tui_layout_type cur_layout = tui_current_layout (); 1444 1445 diff = (new_height - primary_win_info->generic.height) * (-1); 1446 if (cur_layout == SRC_COMMAND || cur_layout == DISASSEM_COMMAND) 1447 { 1448 ok = ((primary_win_info->generic.type == CMD_WIN 1449 && new_height <= (tui_term_height () - 4) 1450 && new_height >= MIN_CMD_WIN_HEIGHT) 1451 || (primary_win_info->generic.type != CMD_WIN 1452 && new_height <= (tui_term_height () - 2) 1453 && new_height >= MIN_WIN_HEIGHT)); 1454 if (ok) 1455 { /* Check the total height. */ 1456 struct tui_win_info *win_info; 1457 1458 if (primary_win_info == TUI_CMD_WIN) 1459 win_info = (tui_source_windows ())->list[0]; 1460 else 1461 win_info = TUI_CMD_WIN; 1462 ok = ((new_height + 1463 (win_info->generic.height + diff)) <= tui_term_height ()); 1464 } 1465 } 1466 else 1467 { 1468 int cur_total_height, total_height, min_height = 0; 1469 struct tui_win_info *first_win; 1470 struct tui_win_info *second_win; 1471 1472 if (cur_layout == SRC_DISASSEM_COMMAND) 1473 { 1474 first_win = TUI_SRC_WIN; 1475 second_win = TUI_DISASM_WIN; 1476 } 1477 else 1478 { 1479 first_win = TUI_DATA_WIN; 1480 second_win = (tui_source_windows ())->list[0]; 1481 } 1482 /* We could simply add all the heights to obtain the same 1483 result but below is more explicit since we subtract 1 for 1484 the line that the first and second windows share, and add 1485 one for the locator. */ 1486 total_height = cur_total_height = 1487 (first_win->generic.height + second_win->generic.height - 1) 1488 + TUI_CMD_WIN->generic.height + 1; /* Locator. */ 1489 if (primary_win_info == TUI_CMD_WIN) 1490 { 1491 /* Locator included since first & second win share a line. */ 1492 ok = ((first_win->generic.height + 1493 second_win->generic.height + diff) >= 1494 (MIN_WIN_HEIGHT * 2) 1495 && new_height >= MIN_CMD_WIN_HEIGHT); 1496 if (ok) 1497 { 1498 total_height = new_height + 1499 (first_win->generic.height + 1500 second_win->generic.height + diff); 1501 min_height = MIN_CMD_WIN_HEIGHT; 1502 } 1503 } 1504 else 1505 { 1506 min_height = MIN_WIN_HEIGHT; 1507 1508 /* First see if we can increase/decrease the command 1509 window. And make sure that the command window is at 1510 least 1 line. */ 1511 ok = ((TUI_CMD_WIN->generic.height + diff) > 0); 1512 if (!ok) 1513 { /* Looks like we have to increase/decrease one of 1514 the other windows. */ 1515 if (primary_win_info == first_win) 1516 ok = (second_win->generic.height + diff) >= min_height; 1517 else 1518 ok = (first_win->generic.height + diff) >= min_height; 1519 } 1520 if (ok) 1521 { 1522 if (primary_win_info == first_win) 1523 total_height = new_height + 1524 second_win->generic.height + 1525 TUI_CMD_WIN->generic.height + diff; 1526 else 1527 total_height = new_height + 1528 first_win->generic.height + 1529 TUI_CMD_WIN->generic.height + diff; 1530 } 1531 } 1532 /* Now make sure that the proposed total height doesn't 1533 exceed the old total height. */ 1534 if (ok) 1535 ok = (new_height >= min_height 1536 && total_height <= cur_total_height); 1537 } 1538 } 1539 1540 return ok; 1541 } 1542 1543 1544 static void 1545 parse_scrolling_args (char *arg, 1546 struct tui_win_info **win_to_scroll, 1547 int *num_to_scroll) 1548 { 1549 if (num_to_scroll) 1550 *num_to_scroll = 0; 1551 *win_to_scroll = tui_win_with_focus (); 1552 1553 /* First set up the default window to scroll, in case there is no 1554 window name arg. */ 1555 if (arg != (char *) NULL) 1556 { 1557 char *buf, *buf_ptr; 1558 1559 /* Process the number of lines to scroll. */ 1560 buf = buf_ptr = xstrdup (arg); 1561 if (isdigit (*buf_ptr)) 1562 { 1563 char *num_str; 1564 1565 num_str = buf_ptr; 1566 buf_ptr = strchr (buf_ptr, ' '); 1567 if (buf_ptr != (char *) NULL) 1568 { 1569 *buf_ptr = (char) 0; 1570 if (num_to_scroll) 1571 *num_to_scroll = atoi (num_str); 1572 buf_ptr++; 1573 } 1574 else if (num_to_scroll) 1575 *num_to_scroll = atoi (num_str); 1576 } 1577 1578 /* Process the window name if one is specified. */ 1579 if (buf_ptr != (char *) NULL) 1580 { 1581 char *wname; 1582 int i; 1583 1584 if (*buf_ptr == ' ') 1585 while (*(++buf_ptr) == ' ') 1586 ; 1587 1588 if (*buf_ptr != (char) 0) 1589 { 1590 wname = buf_ptr; 1591 1592 /* Validate the window name. */ 1593 for (i = 0; i < strlen (wname); i++) 1594 wname[i] = toupper (wname[i]); 1595 } 1596 else 1597 wname = "?"; 1598 1599 *win_to_scroll = tui_partial_win_by_name (wname); 1600 1601 if (*win_to_scroll == (struct tui_win_info *) NULL 1602 || !(*win_to_scroll)->generic.is_visible) 1603 error (_("Invalid window specified. \n\ 1604 The window name specified must be valid and visible.\n")); 1605 else if (*win_to_scroll == TUI_CMD_WIN) 1606 *win_to_scroll = (tui_source_windows ())->list[0]; 1607 } 1608 xfree (buf); 1609 } 1610 } 1611