gdb/tui/tui-win.c

   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 }