xref: /dflybsd-src/contrib/gdb-7/gdb/tui/tui-layout.c (revision f41d807a0c7c535d8f66f0593fb6e95fa20f82d4)
1 /* TUI layout window management.
2 
3    Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2007, 2008, 2009,
4    2010 Free Software Foundation, Inc.
5 
6    Contributed by Hewlett-Packard Company.
7 
8    This file is part of GDB.
9 
10    This program is free software; you can redistribute it and/or modify
11    it under the terms of the GNU General Public License as published by
12    the Free Software Foundation; either version 3 of the License, or
13    (at your option) any later version.
14 
15    This program is distributed in the hope that it will be useful,
16    but WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18    GNU General Public License for more details.
19 
20    You should have received a copy of the GNU General Public License
21    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
22 
23 #include "defs.h"
24 #include "arch-utils.h"
25 #include "command.h"
26 #include "symtab.h"
27 #include "frame.h"
28 #include "source.h"
29 #include <ctype.h>
30 
31 #include "tui/tui.h"
32 #include "tui/tui-data.h"
33 #include "tui/tui-windata.h"
34 #include "tui/tui-wingeneral.h"
35 #include "tui/tui-stack.h"
36 #include "tui/tui-regs.h"
37 #include "tui/tui-win.h"
38 #include "tui/tui-winsource.h"
39 #include "tui/tui-disasm.h"
40 #include "tui/tui-layout.h"
41 
42 #include "gdb_string.h"
43 #include "gdb_curses.h"
44 
45 /*******************************
46 ** Static Local Decls
47 ********************************/
48 static void show_layout (enum tui_layout_type);
49 static void init_gen_win_info (struct tui_gen_win_info *,
50 			       enum tui_win_type,
51 			       int, int, int, int);
52 static void *init_and_make_win (void *, enum tui_win_type,
53 				int, int, int, int, int);
54 static void show_source_or_disasm_and_command (enum tui_layout_type);
55 static void make_source_or_disasm_window (struct tui_win_info **,
56 					  enum tui_win_type,
57 					  int, int);
58 static void make_command_window (struct tui_win_info **, int, int);
59 static void make_source_window (struct tui_win_info **, int, int);
60 static void make_disasm_window (struct tui_win_info **, int, int);
61 static void make_data_window (struct tui_win_info **, int, int);
62 static void show_source_command (void);
63 static void show_disasm_command (void);
64 static void show_source_disasm_command (void);
65 static void show_data (enum tui_layout_type);
66 static enum tui_layout_type next_layout (void);
67 static enum tui_layout_type prev_layout (void);
68 static void tui_layout_command (char *, int);
69 static void tui_toggle_layout_command (char *, int);
70 static void tui_toggle_split_layout_command (char *, int);
71 static void extract_display_start_addr (struct gdbarch **, CORE_ADDR *);
72 static void tui_handle_xdb_layout (struct tui_layout_def *);
73 
74 
75 /***************************************
76 ** DEFINITIONS
77 ***************************************/
78 
79 #define LAYOUT_USAGE     "Usage: layout prev | next | <layout_name> \n"
80 
81 /* Show the screen layout defined.  */
82 static void
83 show_layout (enum tui_layout_type layout)
84 {
85   enum tui_layout_type cur_layout = tui_current_layout ();
86 
87   if (layout != cur_layout)
88     {
89       /* Since the new layout may cause changes in window size, we
90          should free the content and reallocate on next display of
91          source/asm.  */
92       tui_free_all_source_wins_content ();
93       tui_clear_source_windows ();
94       if (layout == SRC_DATA_COMMAND
95 	  || layout == DISASSEM_DATA_COMMAND)
96 	{
97 	  show_data (layout);
98 	  tui_refresh_all (tui_win_list);
99 	}
100       else
101 	{
102 	  /* First make the current layout be invisible.  */
103 	  tui_make_all_invisible ();
104 	  tui_make_invisible (tui_locator_win_info_ptr ());
105 
106 	  switch (layout)
107 	    {
108 	      /* Now show the new layout.  */
109 	    case SRC_COMMAND:
110 	      show_source_command ();
111 	      tui_add_to_source_windows (TUI_SRC_WIN);
112 	      break;
113 	    case DISASSEM_COMMAND:
114 	      show_disasm_command ();
115 	      tui_add_to_source_windows (TUI_DISASM_WIN);
116 	      break;
117 	    case SRC_DISASSEM_COMMAND:
118 	      show_source_disasm_command ();
119 	      tui_add_to_source_windows (TUI_SRC_WIN);
120 	      tui_add_to_source_windows (TUI_DISASM_WIN);
121 	      break;
122 	    default:
123 	      break;
124 	    }
125 	}
126     }
127 }
128 
129 
130 /* Function to set the layout to SRC_COMMAND, DISASSEM_COMMAND,
131    SRC_DISASSEM_COMMAND, SRC_DATA_COMMAND, or DISASSEM_DATA_COMMAND.
132    If the layout is SRC_DATA_COMMAND, DISASSEM_DATA_COMMAND, or
133    UNDEFINED_LAYOUT, then the data window is populated according to
134    regs_display_type.  */
135 enum tui_status
136 tui_set_layout (enum tui_layout_type layout_type,
137 		enum tui_register_display_type regs_display_type)
138 {
139   enum tui_status status = TUI_SUCCESS;
140 
141   if (layout_type != UNDEFINED_LAYOUT
142       || regs_display_type != TUI_UNDEFINED_REGS)
143     {
144       enum tui_layout_type cur_layout = tui_current_layout (),
145 	new_layout = UNDEFINED_LAYOUT;
146       int regs_populate = FALSE;
147       struct gdbarch *gdbarch;
148       CORE_ADDR addr;
149       struct tui_win_info *win_with_focus = tui_win_with_focus ();
150       struct tui_layout_def *layout_def = tui_layout_def ();
151 
152       extract_display_start_addr (&gdbarch, &addr);
153 
154       if (layout_type == UNDEFINED_LAYOUT
155 	  && regs_display_type != TUI_UNDEFINED_REGS)
156 	{
157 	  if (cur_layout == SRC_DISASSEM_COMMAND)
158 	    new_layout = DISASSEM_DATA_COMMAND;
159 	  else if (cur_layout == SRC_COMMAND
160 		   || cur_layout == SRC_DATA_COMMAND)
161 	    new_layout = SRC_DATA_COMMAND;
162 	  else if (cur_layout == DISASSEM_COMMAND
163 		   || cur_layout == DISASSEM_DATA_COMMAND)
164 	    new_layout = DISASSEM_DATA_COMMAND;
165 	}
166       else
167 	new_layout = layout_type;
168 
169       regs_populate = (new_layout == SRC_DATA_COMMAND
170 		       || new_layout == DISASSEM_DATA_COMMAND
171 		       || regs_display_type != TUI_UNDEFINED_REGS);
172       if (new_layout != cur_layout
173 	  || regs_display_type != TUI_UNDEFINED_REGS)
174 	{
175 	  if (new_layout != cur_layout)
176 	    {
177 	      show_layout (new_layout);
178 
179 	      /* Now determine where focus should be.  */
180 	      if (win_with_focus != TUI_CMD_WIN)
181 		{
182 		  switch (new_layout)
183 		    {
184 		    case SRC_COMMAND:
185 		      tui_set_win_focus_to (TUI_SRC_WIN);
186 		      layout_def->display_mode = SRC_WIN;
187 		      layout_def->split = FALSE;
188 		      break;
189 		    case DISASSEM_COMMAND:
190 		      /* The previous layout was not showing code.
191 		         This can happen if there is no source
192 		         available:
193 
194 		         1. if the source file is in another dir OR
195 		         2. if target was compiled without -g
196 		         We still want to show the assembly though!  */
197 
198 		      tui_get_begin_asm_address (&gdbarch, &addr);
199 		      tui_set_win_focus_to (TUI_DISASM_WIN);
200 		      layout_def->display_mode = DISASSEM_WIN;
201 		      layout_def->split = FALSE;
202 		      break;
203 		    case SRC_DISASSEM_COMMAND:
204 		      /* The previous layout was not showing code.
205 		         This can happen if there is no source
206 		         available:
207 
208 		         1. if the source file is in another dir OR
209 		         2. if target was compiled without -g
210 		         We still want to show the assembly though!  */
211 
212 		      tui_get_begin_asm_address (&gdbarch, &addr);
213 		      if (win_with_focus == TUI_SRC_WIN)
214 			tui_set_win_focus_to (TUI_SRC_WIN);
215 		      else
216 			tui_set_win_focus_to (TUI_DISASM_WIN);
217 		      layout_def->split = TRUE;
218 		      break;
219 		    case SRC_DATA_COMMAND:
220 		      if (win_with_focus != TUI_DATA_WIN)
221 			tui_set_win_focus_to (TUI_SRC_WIN);
222 		      else
223 			tui_set_win_focus_to (TUI_DATA_WIN);
224 		      layout_def->display_mode = SRC_WIN;
225 		      layout_def->split = FALSE;
226 		      break;
227 		    case DISASSEM_DATA_COMMAND:
228 		      /* The previous layout was not showing code.
229 		         This can happen if there is no source
230 		         available:
231 
232 			 1. if the source file is in another dir OR
233 		         2. if target was compiled without -g
234 		         We still want to show the assembly though!  */
235 
236 		      tui_get_begin_asm_address (&gdbarch, &addr);
237 		      if (win_with_focus != TUI_DATA_WIN)
238 			tui_set_win_focus_to (TUI_DISASM_WIN);
239 		      else
240 			tui_set_win_focus_to (TUI_DATA_WIN);
241 		      layout_def->display_mode = DISASSEM_WIN;
242 		      layout_def->split = FALSE;
243 		      break;
244 		    default:
245 		      break;
246 		    }
247 		}
248 	      /*
249 	       * Now update the window content.
250 	       */
251 	      if (!regs_populate
252 		  && (new_layout == SRC_DATA_COMMAND
253 		      || new_layout == DISASSEM_DATA_COMMAND))
254 		tui_display_all_data ();
255 
256 	      tui_update_source_windows_with_addr (gdbarch, addr);
257 	    }
258 	  if (regs_populate)
259 	    {
260               tui_show_registers (TUI_DATA_WIN->detail.data_display_info.current_group);
261 	    }
262 	}
263     }
264   else
265     status = TUI_FAILURE;
266 
267   return status;
268 }
269 
270 /* Add the specified window to the layout in a logical way.  This
271    means setting up the most logical layout given the window to be
272    added.  */
273 void
274 tui_add_win_to_layout (enum tui_win_type type)
275 {
276   enum tui_layout_type cur_layout = tui_current_layout ();
277 
278   switch (type)
279     {
280     case SRC_WIN:
281       if (cur_layout != SRC_COMMAND
282 	  && cur_layout != SRC_DISASSEM_COMMAND
283 	  && cur_layout != SRC_DATA_COMMAND)
284 	{
285 	  tui_clear_source_windows_detail ();
286 	  if (cur_layout == DISASSEM_DATA_COMMAND)
287 	    show_layout (SRC_DATA_COMMAND);
288 	  else
289 	    show_layout (SRC_COMMAND);
290 	}
291       break;
292     case DISASSEM_WIN:
293       if (cur_layout != DISASSEM_COMMAND
294 	  && cur_layout != SRC_DISASSEM_COMMAND
295 	  && cur_layout != DISASSEM_DATA_COMMAND)
296 	{
297 	  tui_clear_source_windows_detail ();
298 	  if (cur_layout == SRC_DATA_COMMAND)
299 	    show_layout (DISASSEM_DATA_COMMAND);
300 	  else
301 	    show_layout (DISASSEM_COMMAND);
302 	}
303       break;
304     case DATA_WIN:
305       if (cur_layout != SRC_DATA_COMMAND
306 	  && cur_layout != DISASSEM_DATA_COMMAND)
307 	{
308 	  if (cur_layout == DISASSEM_COMMAND)
309 	    show_layout (DISASSEM_DATA_COMMAND);
310 	  else
311 	    show_layout (SRC_DATA_COMMAND);
312 	}
313       break;
314     default:
315       break;
316     }
317 }
318 
319 
320 /* Answer the height of a window.  If it hasn't been created yet,
321    answer what the height of a window would be based upon its type and
322    the layout.  */
323 int
324 tui_default_win_height (enum tui_win_type type,
325 			enum tui_layout_type layout)
326 {
327   int h;
328 
329   if (tui_win_list[type] != (struct tui_win_info *) NULL)
330     h = tui_win_list[type]->generic.height;
331   else
332     {
333       switch (layout)
334 	{
335 	case SRC_COMMAND:
336 	case DISASSEM_COMMAND:
337 	  if (TUI_CMD_WIN == NULL)
338 	    h = tui_term_height () / 2;
339 	  else
340 	    h = tui_term_height () - TUI_CMD_WIN->generic.height;
341 	  break;
342 	case SRC_DISASSEM_COMMAND:
343 	case SRC_DATA_COMMAND:
344 	case DISASSEM_DATA_COMMAND:
345 	  if (TUI_CMD_WIN == NULL)
346 	    h = tui_term_height () / 3;
347 	  else
348 	    h = (tui_term_height () - TUI_CMD_WIN->generic.height) / 2;
349 	  break;
350 	default:
351 	  h = 0;
352 	  break;
353 	}
354     }
355 
356   return h;
357 }
358 
359 
360 /* Answer the height of a window.  If it hasn't been created yet,
361    answer what the height of a window would be based upon its type and
362    the layout.  */
363 int
364 tui_default_win_viewport_height (enum tui_win_type type,
365 				 enum tui_layout_type layout)
366 {
367   int h;
368 
369   h = tui_default_win_height (type, layout);
370 
371   if (tui_win_list[type] == TUI_CMD_WIN)
372     h -= 1;
373   else
374     h -= 2;
375 
376   return h;
377 }
378 
379 
380 /* Function to initialize gdb commands, for tui window layout
381    manipulation.  */
382 
383 /* Provide a prototype to silence -Wmissing-prototypes.  */
384 extern initialize_file_ftype _initialize_tui_layout;
385 
386 void
387 _initialize_tui_layout (void)
388 {
389   add_com ("layout", class_tui, tui_layout_command, _("\
390 Change the layout of windows.\n\
391 Usage: layout prev | next | <layout_name> \n\
392 Layout names are:\n\
393    src   : Displays source and command windows.\n\
394    asm   : Displays disassembly and command windows.\n\
395    split : Displays source, disassembly and command windows.\n\
396    regs  : Displays register window. If existing layout\n\
397            is source/command or assembly/command, the \n\
398            register window is displayed. If the\n\
399            source/assembly/command (split) is displayed, \n\
400            the register window is displayed with \n\
401            the window that has current logical focus.\n"));
402   if (xdb_commands)
403     {
404       add_com ("td", class_tui, tui_toggle_layout_command, _("\
405 Toggle between Source/Command and Disassembly/Command layouts.\n"));
406       add_com ("ts", class_tui, tui_toggle_split_layout_command, _("\
407 Toggle between Source/Command or Disassembly/Command and \n\
408 Source/Disassembly/Command layouts.\n"));
409     }
410 }
411 
412 
413 /*************************
414 ** STATIC LOCAL FUNCTIONS
415 **************************/
416 
417 
418 /* Function to set the layout to SRC, ASM, SPLIT, NEXT, PREV, DATA,
419    REGS, $REGS, $GREGS, $FREGS, $SREGS.  */
420 enum tui_status
421 tui_set_layout_for_display_command (const char *layout_name)
422 {
423   enum tui_status status = TUI_SUCCESS;
424 
425   if (layout_name != (char *) NULL)
426     {
427       int i;
428       char *buf_ptr;
429       enum tui_layout_type new_layout = UNDEFINED_LAYOUT;
430       enum tui_register_display_type dpy_type = TUI_UNDEFINED_REGS;
431       enum tui_layout_type cur_layout = tui_current_layout ();
432 
433       buf_ptr = (char *) xstrdup (layout_name);
434       for (i = 0; (i < strlen (layout_name)); i++)
435 	buf_ptr[i] = toupper (buf_ptr[i]);
436 
437       /* First check for ambiguous input.  */
438       if (strlen (buf_ptr) <= 1
439 	  && (*buf_ptr == 'S' || *buf_ptr == '$'))
440 	{
441 	  warning (_("Ambiguous command input."));
442 	  status = TUI_FAILURE;
443 	}
444       else
445 	{
446 	  if (subset_compare (buf_ptr, "SRC"))
447 	    new_layout = SRC_COMMAND;
448 	  else if (subset_compare (buf_ptr, "ASM"))
449 	    new_layout = DISASSEM_COMMAND;
450 	  else if (subset_compare (buf_ptr, "SPLIT"))
451 	    new_layout = SRC_DISASSEM_COMMAND;
452 	  else if (subset_compare (buf_ptr, "REGS")
453 		   || subset_compare (buf_ptr, TUI_GENERAL_SPECIAL_REGS_NAME)
454 		   || subset_compare (buf_ptr, TUI_GENERAL_REGS_NAME)
455 		   || subset_compare (buf_ptr, TUI_FLOAT_REGS_NAME)
456 		   || subset_compare (buf_ptr, TUI_SPECIAL_REGS_NAME))
457 	    {
458 	      if (cur_layout == SRC_COMMAND
459 		  || cur_layout == SRC_DATA_COMMAND)
460 		new_layout = SRC_DATA_COMMAND;
461 	      else
462 		new_layout = DISASSEM_DATA_COMMAND;
463 
464 	      /* Could ifdef out the following code. when compile with
465 		 -z, there are null pointer references that cause a
466 		 core dump if 'layout regs' is the first layout
467 		 command issued by the user. HP has asked us to hook
468 		 up this code.  - edie epstein  */
469 	      if (subset_compare (buf_ptr, TUI_FLOAT_REGS_NAME))
470 		{
471 		  if (TUI_DATA_WIN->detail.data_display_info.regs_display_type != TUI_SFLOAT_REGS
472 		      && TUI_DATA_WIN->detail.data_display_info.regs_display_type != TUI_DFLOAT_REGS)
473 		    dpy_type = TUI_SFLOAT_REGS;
474 		  else
475 		    dpy_type =
476 		      TUI_DATA_WIN->detail.data_display_info.regs_display_type;
477 		}
478 	      else if (subset_compare (buf_ptr,
479 				      TUI_GENERAL_SPECIAL_REGS_NAME))
480 		dpy_type = TUI_GENERAL_AND_SPECIAL_REGS;
481 	      else if (subset_compare (buf_ptr, TUI_GENERAL_REGS_NAME))
482 		dpy_type = TUI_GENERAL_REGS;
483 	      else if (subset_compare (buf_ptr, TUI_SPECIAL_REGS_NAME))
484 		dpy_type = TUI_SPECIAL_REGS;
485 	      else if (TUI_DATA_WIN)
486 		{
487 		  if (TUI_DATA_WIN->detail.data_display_info.regs_display_type !=
488 		      TUI_UNDEFINED_REGS)
489 		    dpy_type =
490 		      TUI_DATA_WIN->detail.data_display_info.regs_display_type;
491 		  else
492 		    dpy_type = TUI_GENERAL_REGS;
493 		}
494 
495 	      /* End of potential ifdef.
496 	       */
497 
498 	      /* If ifdefed out code above, then assume that the user
499 		 wishes to display the general purpose registers .
500 	      */
501 
502 	      /* dpy_type = TUI_GENERAL_REGS; */
503 	    }
504 	  else if (subset_compare (buf_ptr, "NEXT"))
505 	    new_layout = next_layout ();
506 	  else if (subset_compare (buf_ptr, "PREV"))
507 	    new_layout = prev_layout ();
508 	  else
509 	    status = TUI_FAILURE;
510 
511 	  tui_set_layout (new_layout, dpy_type);
512 	}
513       xfree (buf_ptr);
514     }
515   else
516     status = TUI_FAILURE;
517 
518   return status;
519 }
520 
521 
522 static void
523 extract_display_start_addr (struct gdbarch **gdbarch_p, CORE_ADDR *addr_p)
524 {
525   enum tui_layout_type cur_layout = tui_current_layout ();
526   struct gdbarch *gdbarch = get_current_arch ();
527   CORE_ADDR addr;
528   CORE_ADDR pc;
529   struct symtab_and_line cursal = get_current_source_symtab_and_line ();
530 
531   switch (cur_layout)
532     {
533     case SRC_COMMAND:
534     case SRC_DATA_COMMAND:
535       gdbarch = TUI_SRC_WIN->detail.source_info.gdbarch;
536       find_line_pc (cursal.symtab,
537 		    TUI_SRC_WIN->detail.source_info.start_line_or_addr.u.line_no,
538 		    &pc);
539       addr = pc;
540       break;
541     case DISASSEM_COMMAND:
542     case SRC_DISASSEM_COMMAND:
543     case DISASSEM_DATA_COMMAND:
544       gdbarch = TUI_DISASM_WIN->detail.source_info.gdbarch;
545       addr = TUI_DISASM_WIN->detail.source_info.start_line_or_addr.u.addr;
546       break;
547     default:
548       addr = 0;
549       break;
550     }
551 
552   *gdbarch_p = gdbarch;
553   *addr_p = addr;
554 }
555 
556 
557 static void
558 tui_handle_xdb_layout (struct tui_layout_def *layout_def)
559 {
560   if (layout_def->split)
561     {
562       tui_set_layout (SRC_DISASSEM_COMMAND, TUI_UNDEFINED_REGS);
563       tui_set_win_focus_to (tui_win_list[layout_def->display_mode]);
564     }
565   else
566     {
567       if (layout_def->display_mode == SRC_WIN)
568 	tui_set_layout (SRC_COMMAND, TUI_UNDEFINED_REGS);
569       else
570 	tui_set_layout (DISASSEM_DATA_COMMAND, layout_def->regs_display_type);
571     }
572 }
573 
574 
575 static void
576 tui_toggle_layout_command (char *arg, int from_tty)
577 {
578   struct tui_layout_def *layout_def = tui_layout_def ();
579 
580   /* Make sure the curses mode is enabled.  */
581   tui_enable ();
582   if (layout_def->display_mode == SRC_WIN)
583     layout_def->display_mode = DISASSEM_WIN;
584   else
585     layout_def->display_mode = SRC_WIN;
586 
587   if (!layout_def->split)
588     tui_handle_xdb_layout (layout_def);
589 }
590 
591 
592 static void
593 tui_toggle_split_layout_command (char *arg, int from_tty)
594 {
595   struct tui_layout_def *layout_def = tui_layout_def ();
596 
597   /* Make sure the curses mode is enabled.  */
598   tui_enable ();
599   layout_def->split = (!layout_def->split);
600   tui_handle_xdb_layout (layout_def);
601 }
602 
603 
604 static void
605 tui_layout_command (char *arg, int from_tty)
606 {
607   /* Make sure the curses mode is enabled.  */
608   tui_enable ();
609 
610   /* Switch to the selected layout.  */
611   if (tui_set_layout_for_display_command (arg) != TUI_SUCCESS)
612     warning (_("Invalid layout specified.\n%s"), LAYOUT_USAGE);
613 
614 }
615 
616 /* Answer the previous layout to cycle to.  */
617 static enum tui_layout_type
618 next_layout (void)
619 {
620   enum tui_layout_type new_layout;
621 
622   new_layout = tui_current_layout ();
623   if (new_layout == UNDEFINED_LAYOUT)
624     new_layout = SRC_COMMAND;
625   else
626     {
627       new_layout++;
628       if (new_layout == UNDEFINED_LAYOUT)
629 	new_layout = SRC_COMMAND;
630     }
631 
632   return new_layout;
633 }
634 
635 
636 /* Answer the next layout to cycle to.  */
637 static enum tui_layout_type
638 prev_layout (void)
639 {
640   enum tui_layout_type new_layout;
641 
642   new_layout = tui_current_layout ();
643   if (new_layout == SRC_COMMAND)
644     new_layout = DISASSEM_DATA_COMMAND;
645   else
646     {
647       new_layout--;
648       if (new_layout == UNDEFINED_LAYOUT)
649 	new_layout = DISASSEM_DATA_COMMAND;
650     }
651 
652   return new_layout;
653 }
654 
655 
656 
657 static void
658 make_command_window (struct tui_win_info **win_info_ptr,
659 		     int height, int origin_y)
660 {
661   *win_info_ptr = init_and_make_win (*win_info_ptr,
662 				     CMD_WIN,
663 				     height,
664 				     tui_term_width (),
665 				     0,
666 				     origin_y,
667 				     DONT_BOX_WINDOW);
668 
669   (*win_info_ptr)->can_highlight = FALSE;
670 }
671 
672 
673 /* make_source_window().
674  */
675 static void
676 make_source_window (struct tui_win_info **win_info_ptr,
677 		    int height, int origin_y)
678 {
679   make_source_or_disasm_window (win_info_ptr, SRC_WIN, height, origin_y);
680 
681   return;
682 }				/* make_source_window */
683 
684 
685 /* make_disasm_window().
686  */
687 static void
688 make_disasm_window (struct tui_win_info **win_info_ptr,
689 		    int height, int origin_y)
690 {
691   make_source_or_disasm_window (win_info_ptr, DISASSEM_WIN, height, origin_y);
692 
693   return;
694 }				/* make_disasm_window */
695 
696 
697 static void
698 make_data_window (struct tui_win_info **win_info_ptr,
699 		  int height, int origin_y)
700 {
701   *win_info_ptr = init_and_make_win (*win_info_ptr,
702 				     DATA_WIN,
703 				     height,
704 				     tui_term_width (),
705 				     0,
706 				     origin_y,
707 				     BOX_WINDOW);
708 }
709 
710 
711 
712 /* Show the Source/Command layout.  */
713 static void
714 show_source_command (void)
715 {
716   show_source_or_disasm_and_command (SRC_COMMAND);
717 }
718 
719 
720 /* Show the Dissassem/Command layout.  */
721 static void
722 show_disasm_command (void)
723 {
724   show_source_or_disasm_and_command (DISASSEM_COMMAND);
725 }
726 
727 
728 /* Show the Source/Disassem/Command layout.  */
729 static void
730 show_source_disasm_command (void)
731 {
732   if (tui_current_layout () != SRC_DISASSEM_COMMAND)
733     {
734       int cmd_height, src_height, asm_height;
735 
736       if (TUI_CMD_WIN != NULL)
737 	cmd_height = TUI_CMD_WIN->generic.height;
738       else
739 	cmd_height = tui_term_height () / 3;
740 
741       src_height = (tui_term_height () - cmd_height) / 2;
742       asm_height = tui_term_height () - (src_height + cmd_height);
743 
744       if (TUI_SRC_WIN == NULL)
745 	make_source_window (&TUI_SRC_WIN, src_height, 0);
746       else
747 	{
748 	  init_gen_win_info (&TUI_SRC_WIN->generic,
749 			     TUI_SRC_WIN->generic.type,
750 			     src_height,
751 			     TUI_SRC_WIN->generic.width,
752 			     TUI_SRC_WIN->detail.source_info.execution_info->width,
753 			     0);
754 	  TUI_SRC_WIN->can_highlight = TRUE;
755 	  init_gen_win_info (TUI_SRC_WIN->detail.source_info.execution_info,
756 			     EXEC_INFO_WIN,
757 			     src_height,
758 			     3,
759 			     0,
760 			     0);
761 	  tui_make_visible (&TUI_SRC_WIN->generic);
762 	  tui_make_visible (TUI_SRC_WIN->detail.source_info.execution_info);
763 	  TUI_SRC_WIN->detail.source_info.has_locator = FALSE;;
764 	}
765       if (TUI_SRC_WIN != NULL)
766 	{
767 	  struct tui_gen_win_info *locator = tui_locator_win_info_ptr ();
768 
769 	  tui_show_source_content (TUI_SRC_WIN);
770 	  if (TUI_DISASM_WIN == NULL)
771 	    {
772 	      make_disasm_window (&TUI_DISASM_WIN, asm_height, src_height - 1);
773 	      locator = init_and_make_win (locator,
774 					   LOCATOR_WIN,
775 					   2 /* 1 */ ,
776 					   tui_term_width (),
777 					   0,
778 					   (src_height + asm_height) - 1,
779 					   DONT_BOX_WINDOW);
780 	    }
781 	  else
782 	    {
783 	      init_gen_win_info (locator,
784 				 LOCATOR_WIN,
785 				 2 /* 1 */ ,
786 				 tui_term_width (),
787 				 0,
788 				 (src_height + asm_height) - 1);
789 	      TUI_DISASM_WIN->detail.source_info.has_locator = TRUE;
790 	      init_gen_win_info (&TUI_DISASM_WIN->generic,
791 				 TUI_DISASM_WIN->generic.type,
792 				 asm_height,
793 				 TUI_DISASM_WIN->generic.width,
794 				 TUI_DISASM_WIN->detail.source_info.execution_info->width,
795 				 src_height - 1);
796 	      init_gen_win_info (TUI_DISASM_WIN->detail.source_info.execution_info,
797 				 EXEC_INFO_WIN,
798 				 asm_height,
799 				 3,
800 				 0,
801 				 src_height - 1);
802 	      TUI_DISASM_WIN->can_highlight = TRUE;
803 	      tui_make_visible (&TUI_DISASM_WIN->generic);
804 	      tui_make_visible (TUI_DISASM_WIN->detail.source_info.execution_info);
805 	    }
806 	  if (TUI_DISASM_WIN != NULL)
807 	    {
808 	      TUI_SRC_WIN->detail.source_info.has_locator = FALSE;
809 	      TUI_DISASM_WIN->detail.source_info.has_locator = TRUE;
810 	      tui_make_visible (locator);
811 	      tui_show_locator_content ();
812 	      tui_show_source_content (TUI_DISASM_WIN);
813 
814 	      if (TUI_CMD_WIN == NULL)
815 		make_command_window (&TUI_CMD_WIN,
816 				     cmd_height,
817 				     tui_term_height () - cmd_height);
818 	      else
819 		{
820 		  init_gen_win_info (&TUI_CMD_WIN->generic,
821 				     TUI_CMD_WIN->generic.type,
822 				     TUI_CMD_WIN->generic.height,
823 				     TUI_CMD_WIN->generic.width,
824 				     0,
825 				     TUI_CMD_WIN->generic.origin.y);
826 		  TUI_CMD_WIN->can_highlight = FALSE;
827 		  tui_make_visible (&TUI_CMD_WIN->generic);
828 		}
829 	      if (TUI_CMD_WIN != NULL)
830 		tui_refresh_win (&TUI_CMD_WIN->generic);
831 	    }
832 	}
833       tui_set_current_layout_to (SRC_DISASSEM_COMMAND);
834     }
835 }
836 
837 
838 /* Show the Source/Data/Command or the Dissassembly/Data/Command
839    layout.  */
840 static void
841 show_data (enum tui_layout_type new_layout)
842 {
843   int total_height = (tui_term_height () - TUI_CMD_WIN->generic.height);
844   int src_height, data_height;
845   enum tui_win_type win_type;
846   struct tui_gen_win_info *locator = tui_locator_win_info_ptr ();
847 
848 
849   data_height = total_height / 2;
850   src_height = total_height - data_height;
851   tui_make_all_invisible ();
852   tui_make_invisible (locator);
853   make_data_window (&TUI_DATA_WIN, data_height, 0);
854   TUI_DATA_WIN->can_highlight = TRUE;
855   if (new_layout == SRC_DATA_COMMAND)
856     win_type = SRC_WIN;
857   else
858     win_type = DISASSEM_WIN;
859   if (tui_win_list[win_type] == NULL)
860     {
861       if (win_type == SRC_WIN)
862 	make_source_window (&tui_win_list[win_type], src_height, data_height - 1);
863       else
864 	make_disasm_window (&tui_win_list[win_type], src_height, data_height - 1);
865       locator = init_and_make_win (locator,
866 				   LOCATOR_WIN,
867 				   2 /* 1 */ ,
868 				   tui_term_width (),
869 				   0,
870 				   total_height - 1,
871 				   DONT_BOX_WINDOW);
872     }
873   else
874     {
875       init_gen_win_info (&tui_win_list[win_type]->generic,
876 			 tui_win_list[win_type]->generic.type,
877 			 src_height,
878 			 tui_win_list[win_type]->generic.width,
879 			 tui_win_list[win_type]->detail.source_info.execution_info->width,
880 			 data_height - 1);
881       init_gen_win_info (tui_win_list[win_type]->detail.source_info.execution_info,
882 			 EXEC_INFO_WIN,
883 			 src_height,
884 			 3,
885 			 0,
886 			 data_height - 1);
887       tui_make_visible (&tui_win_list[win_type]->generic);
888       tui_make_visible (tui_win_list[win_type]->detail.source_info.execution_info);
889       init_gen_win_info (locator,
890 			 LOCATOR_WIN,
891 			 2 /* 1 */ ,
892 			 tui_term_width (),
893 			 0,
894 			 total_height - 1);
895     }
896   tui_win_list[win_type]->detail.source_info.has_locator = TRUE;
897   tui_make_visible (locator);
898   tui_show_locator_content ();
899   tui_add_to_source_windows (tui_win_list[win_type]);
900   tui_set_current_layout_to (new_layout);
901 }
902 
903 /* init_gen_win_info().
904  */
905 static void
906 init_gen_win_info (struct tui_gen_win_info *win_info,
907 		   enum tui_win_type type,
908 		   int height, int width,
909 		   int origin_x, int origin_y)
910 {
911   int h = height;
912 
913   win_info->type = type;
914   win_info->width = width;
915   win_info->height = h;
916   if (h > 1)
917     {
918       win_info->viewport_height = h - 1;
919       if (win_info->type != CMD_WIN)
920 	win_info->viewport_height--;
921     }
922   else
923     win_info->viewport_height = 1;
924   win_info->origin.x = origin_x;
925   win_info->origin.y = origin_y;
926 
927   return;
928 }				/* init_gen_win_info */
929 
930 /* init_and_make_win().
931  */
932 static void *
933 init_and_make_win (void *opaque_win_info,
934 		   enum tui_win_type win_type,
935 		   int height, int width,
936 		   int origin_x, int origin_y,
937 		   int box_it)
938 {
939   struct tui_gen_win_info *generic;
940 
941   if (opaque_win_info == NULL)
942     {
943       if (tui_win_is_auxillary (win_type))
944 	opaque_win_info = (void *) tui_alloc_generic_win_info ();
945       else
946 	opaque_win_info = (void *) tui_alloc_win_info (win_type);
947     }
948   if (tui_win_is_auxillary (win_type))
949     generic = (struct tui_gen_win_info *) opaque_win_info;
950   else
951     generic = &((struct tui_win_info *) opaque_win_info)->generic;
952 
953   if (opaque_win_info != NULL)
954     {
955       init_gen_win_info (generic, win_type, height, width, origin_x, origin_y);
956       if (!tui_win_is_auxillary (win_type))
957 	{
958 	  if (generic->type == CMD_WIN)
959 	    ((struct tui_win_info *) opaque_win_info)->can_highlight = FALSE;
960 	  else
961 	    ((struct tui_win_info *) opaque_win_info)->can_highlight = TRUE;
962 	}
963       tui_make_window (generic, box_it);
964     }
965   return opaque_win_info;
966 }
967 
968 
969 static void
970 make_source_or_disasm_window (struct tui_win_info **win_info_ptr,
971 			      enum tui_win_type type,
972 			      int height, int origin_y)
973 {
974   struct tui_gen_win_info *execution_info = (struct tui_gen_win_info *) NULL;
975 
976   /* Create the exeuction info window.  */
977   if (type == SRC_WIN)
978     execution_info = tui_source_exec_info_win_ptr ();
979   else
980     execution_info = tui_disassem_exec_info_win_ptr ();
981   execution_info = init_and_make_win (execution_info,
982 				      EXEC_INFO_WIN,
983 				      height,
984 				      3,
985 				      0,
986 				      origin_y,
987 				      DONT_BOX_WINDOW);
988 
989   /* Now create the source window.  */
990   *win_info_ptr = init_and_make_win (*win_info_ptr,
991 				     type,
992 				     height,
993 				     tui_term_width () - execution_info->width,
994 				     execution_info->width,
995 				     origin_y,
996 				     BOX_WINDOW);
997 
998   (*win_info_ptr)->detail.source_info.execution_info = execution_info;
999 }
1000 
1001 
1002 /* Show the Source/Command or the Disassem layout.  */
1003 static void
1004 show_source_or_disasm_and_command (enum tui_layout_type layout_type)
1005 {
1006   if (tui_current_layout () != layout_type)
1007     {
1008       struct tui_win_info **win_info_ptr;
1009       int src_height, cmd_height;
1010       struct tui_gen_win_info *locator = tui_locator_win_info_ptr ();
1011 
1012       if (TUI_CMD_WIN != NULL)
1013 	cmd_height = TUI_CMD_WIN->generic.height;
1014       else
1015 	cmd_height = tui_term_height () / 3;
1016       src_height = tui_term_height () - cmd_height;
1017 
1018       if (layout_type == SRC_COMMAND)
1019 	win_info_ptr = &TUI_SRC_WIN;
1020       else
1021 	win_info_ptr = &TUI_DISASM_WIN;
1022 
1023       if ((*win_info_ptr) == NULL)
1024 	{
1025 	  if (layout_type == SRC_COMMAND)
1026 	    make_source_window (win_info_ptr, src_height - 1, 0);
1027 	  else
1028 	    make_disasm_window (win_info_ptr, src_height - 1, 0);
1029 	  locator = init_and_make_win (locator,
1030 				       LOCATOR_WIN,
1031 				       2 /* 1 */ ,
1032 				       tui_term_width (),
1033 				       0,
1034 				       src_height - 1,
1035 				       DONT_BOX_WINDOW);
1036 	}
1037       else
1038 	{
1039 	  init_gen_win_info (locator,
1040 			     LOCATOR_WIN,
1041 			     2 /* 1 */ ,
1042 			     tui_term_width (),
1043 			     0,
1044 			     src_height - 1);
1045 	  (*win_info_ptr)->detail.source_info.has_locator = TRUE;
1046 	  init_gen_win_info (&(*win_info_ptr)->generic,
1047 			     (*win_info_ptr)->generic.type,
1048 			     src_height - 1,
1049 			     (*win_info_ptr)->generic.width,
1050 			     (*win_info_ptr)->detail.source_info.execution_info->width,
1051 			     0);
1052 	  init_gen_win_info ((*win_info_ptr)->detail.source_info.execution_info,
1053 			     EXEC_INFO_WIN,
1054 			     src_height - 1,
1055 			     3,
1056 			     0,
1057 			     0);
1058 	  (*win_info_ptr)->can_highlight = TRUE;
1059 	  tui_make_visible (&(*win_info_ptr)->generic);
1060 	  tui_make_visible ((*win_info_ptr)->detail.source_info.execution_info);
1061 	}
1062       if ((*win_info_ptr) != NULL)
1063 	{
1064 	  (*win_info_ptr)->detail.source_info.has_locator = TRUE;
1065 	  tui_make_visible (locator);
1066 	  tui_show_locator_content ();
1067 	  tui_show_source_content (*win_info_ptr);
1068 
1069 	  if (TUI_CMD_WIN == NULL)
1070 	    {
1071 	      make_command_window (&TUI_CMD_WIN, cmd_height, src_height);
1072 	      tui_refresh_win (&TUI_CMD_WIN->generic);
1073 	    }
1074 	  else
1075 	    {
1076 	      init_gen_win_info (&TUI_CMD_WIN->generic,
1077 				 TUI_CMD_WIN->generic.type,
1078 				 TUI_CMD_WIN->generic.height,
1079 				 TUI_CMD_WIN->generic.width,
1080 				 TUI_CMD_WIN->generic.origin.x,
1081 				 TUI_CMD_WIN->generic.origin.y);
1082 	      TUI_CMD_WIN->can_highlight = FALSE;
1083 	      tui_make_visible (&TUI_CMD_WIN->generic);
1084 	    }
1085 	}
1086       tui_set_current_layout_to (layout_type);
1087     }
1088 }
1089