1 /* Specific command window processing.
2 
3    Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free Software
4    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 2 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, write to the Free Software
22    Foundation, Inc., 59 Temple Place - Suite 330,
23    Boston, MA 02111-1307, USA.  */
24 
25 #include "defs.h"
26 #include <ctype.h>
27 #include "tui/tui.h"
28 #include "tui/tui-data.h"
29 #include "tui/tui-win.h"
30 #include "tui/tui-io.h"
31 
32 #include "gdb_curses.h"
33 #include "gdb_string.h"
34 
35 
36 /*****************************************
37 ** STATIC LOCAL FUNCTIONS FORWARD DECLS    **
38 ******************************************/
39 
40 
41 
42 /*****************************************
43 ** PUBLIC FUNCTIONS                        **
44 ******************************************/
45 
46 /* Dispatch the correct tui function based upon the control character.   */
47 unsigned int
tui_dispatch_ctrl_char(unsigned int ch)48 tui_dispatch_ctrl_char (unsigned int ch)
49 {
50   struct tui_win_info *win_info = tui_win_with_focus ();
51   WINDOW *w = TUI_CMD_WIN->generic.handle;
52 
53   /*
54      ** If the command window has the logical focus, or no-one does
55      ** assume it is the command window; in this case, pass the
56      ** character on through and do nothing here.
57    */
58   if (win_info == NULL || win_info == TUI_CMD_WIN)
59     return ch;
60   else
61     {
62       unsigned int c = 0, ch_copy = ch;
63       int i;
64       char *term;
65 
66       /* If this is an xterm, page next/prev keys aren't returned
67          ** by keypad as a single char, so we must handle them here.
68          ** Seems like a bug in the curses library?
69        */
70       term = (char *) getenv ("TERM");
71       for (i = 0; (term && term[i]); i++)
72 	term[i] = toupper (term[i]);
73       if ((strcmp (term, "XTERM") == 0) && key_is_start_sequence (ch))
74 	{
75 	  unsigned int page_ch = 0;
76 	  unsigned int tmp_char;
77 
78 	  tmp_char = 0;
79 	  while (!key_is_end_sequence (tmp_char))
80 	    {
81 	      tmp_char = (int) wgetch (w);
82 	      if (tmp_char == ERR)
83 		{
84 		  return ch;
85 		}
86 	      if (!tmp_char)
87 		break;
88 	      if (tmp_char == 53)
89 		page_ch = KEY_PPAGE;
90 	      else if (tmp_char == 54)
91 		page_ch = KEY_NPAGE;
92 	      else
93 		{
94 		  return 0;
95 		}
96 	    }
97 	  ch_copy = page_ch;
98 	}
99 
100       switch (ch_copy)
101 	{
102 	case KEY_NPAGE:
103 	  tui_scroll_forward (win_info, 0);
104 	  break;
105 	case KEY_PPAGE:
106 	  tui_scroll_backward (win_info, 0);
107 	  break;
108 	case KEY_DOWN:
109 	case KEY_SF:
110 	  tui_scroll_forward (win_info, 1);
111 	  break;
112 	case KEY_UP:
113 	case KEY_SR:
114 	  tui_scroll_backward (win_info, 1);
115 	  break;
116 	case KEY_RIGHT:
117 	  tui_scroll_left (win_info, 1);
118 	  break;
119 	case KEY_LEFT:
120 	  tui_scroll_right (win_info, 1);
121 	  break;
122 	case '\f':
123 	  tui_refresh_all_win ();
124 	  break;
125 	default:
126 	  c = ch_copy;
127 	  break;
128 	}
129       return c;
130     }
131 }
132