xref: /dragonfly/contrib/gdb-7/gdb/tui/tui-win.c (revision ef5ccd6c)
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
show_tui_active_border_mode(struct ui_file * file,int from_tty,struct cmd_list_element * c,const char * value)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
show_tui_border_mode(struct ui_file * file,int from_tty,struct cmd_list_element * c,const char * value)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
show_tui_border_kind(struct ui_file * file,int from_tty,struct cmd_list_element * c,const char * value)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 *
translate(const char * name,struct tui_translate * table)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
tui_update_variables(void)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
set_tui_cmd(char * args,int from_tty)320 set_tui_cmd (char *args, int from_tty)
321 {
322 }
323 
324 static void
show_tui_cmd(char * args,int from_tty)325 show_tui_cmd (char *args, int from_tty)
326 {
327 }
328 
329 static struct cmd_list_element *tuilist;
330 
331 static void
tui_command(char * args,int from_tty)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 **
tui_get_cmd_list(void)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
_initialize_tui_win(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
tui_update_gdb_sizes(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
tui_set_win_focus_to(struct tui_win_info * win_info)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
tui_scroll_forward(struct tui_win_info * win_to_scroll,int num_to_scroll)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
tui_scroll_backward(struct tui_win_info * win_to_scroll,int num_to_scroll)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
tui_scroll_left(struct tui_win_info * win_to_scroll,int num_to_scroll)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
tui_scroll_right(struct tui_win_info * win_to_scroll,int num_to_scroll)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
tui_scroll(enum tui_scroll_direction direction,struct tui_win_info * win_to_scroll,int num_to_scroll)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
tui_refresh_all_win(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
tui_resize_all(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
tui_sigwinch_handler(int signal)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
tui_initialize_win(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
tui_scroll_forward_command(char * arg,int from_tty)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
tui_scroll_backward_command(char * arg,int from_tty)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
tui_scroll_left_command(char * arg,int from_tty)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
tui_scroll_right_command(char * arg,int from_tty)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
tui_set_focus(char * arg,int from_tty)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
tui_set_focus_command(char * arg,int from_tty)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
tui_all_windows_info(char * arg,int from_tty)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
tui_refresh_all_command(char * arg,int from_tty)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
tui_set_tab_width_command(char * arg,int from_tty)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
tui_set_win_height(char * arg,int from_tty)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
tui_set_win_height_command(char * arg,int from_tty)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
tui_xdb_set_win_height(char * arg,int from_tty)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
tui_xdb_set_win_height_command(char * arg,int from_tty)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
tui_adjust_win_heights(struct tui_win_info * primary_win_info,int new_height)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
make_invisible_and_set_new_height(struct tui_win_info * win_info,int height)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
make_visible_with_new_height(struct tui_win_info * win_info)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
new_height_ok(struct tui_win_info * primary_win_info,int new_height)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
parse_scrolling_args(char * arg,struct tui_win_info ** win_to_scroll,int * num_to_scroll)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