1*b725ae77Skettenis /* Specific command window processing.
2*b725ae77Skettenis
3*b725ae77Skettenis Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free Software
4*b725ae77Skettenis Foundation, Inc.
5*b725ae77Skettenis
6*b725ae77Skettenis Contributed by Hewlett-Packard Company.
7*b725ae77Skettenis
8*b725ae77Skettenis This file is part of GDB.
9*b725ae77Skettenis
10*b725ae77Skettenis This program is free software; you can redistribute it and/or modify
11*b725ae77Skettenis it under the terms of the GNU General Public License as published by
12*b725ae77Skettenis the Free Software Foundation; either version 2 of the License, or
13*b725ae77Skettenis (at your option) any later version.
14*b725ae77Skettenis
15*b725ae77Skettenis This program is distributed in the hope that it will be useful,
16*b725ae77Skettenis but WITHOUT ANY WARRANTY; without even the implied warranty of
17*b725ae77Skettenis MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18*b725ae77Skettenis GNU General Public License for more details.
19*b725ae77Skettenis
20*b725ae77Skettenis You should have received a copy of the GNU General Public License
21*b725ae77Skettenis along with this program; if not, write to the Free Software
22*b725ae77Skettenis Foundation, Inc., 59 Temple Place - Suite 330,
23*b725ae77Skettenis Boston, MA 02111-1307, USA. */
24*b725ae77Skettenis
25*b725ae77Skettenis #include "defs.h"
26*b725ae77Skettenis #include <ctype.h>
27*b725ae77Skettenis #include "tui/tui.h"
28*b725ae77Skettenis #include "tui/tui-data.h"
29*b725ae77Skettenis #include "tui/tui-win.h"
30*b725ae77Skettenis #include "tui/tui-io.h"
31*b725ae77Skettenis
32*b725ae77Skettenis #include "gdb_curses.h"
33*b725ae77Skettenis #include "gdb_string.h"
34*b725ae77Skettenis
35*b725ae77Skettenis
36*b725ae77Skettenis /*****************************************
37*b725ae77Skettenis ** STATIC LOCAL FUNCTIONS FORWARD DECLS **
38*b725ae77Skettenis ******************************************/
39*b725ae77Skettenis
40*b725ae77Skettenis
41*b725ae77Skettenis
42*b725ae77Skettenis /*****************************************
43*b725ae77Skettenis ** PUBLIC FUNCTIONS **
44*b725ae77Skettenis ******************************************/
45*b725ae77Skettenis
46*b725ae77Skettenis /* Dispatch the correct tui function based upon the control character. */
47*b725ae77Skettenis unsigned int
tui_dispatch_ctrl_char(unsigned int ch)48*b725ae77Skettenis tui_dispatch_ctrl_char (unsigned int ch)
49*b725ae77Skettenis {
50*b725ae77Skettenis struct tui_win_info *win_info = tui_win_with_focus ();
51*b725ae77Skettenis WINDOW *w = TUI_CMD_WIN->generic.handle;
52*b725ae77Skettenis
53*b725ae77Skettenis /*
54*b725ae77Skettenis ** If the command window has the logical focus, or no-one does
55*b725ae77Skettenis ** assume it is the command window; in this case, pass the
56*b725ae77Skettenis ** character on through and do nothing here.
57*b725ae77Skettenis */
58*b725ae77Skettenis if (win_info == NULL || win_info == TUI_CMD_WIN)
59*b725ae77Skettenis return ch;
60*b725ae77Skettenis else
61*b725ae77Skettenis {
62*b725ae77Skettenis unsigned int c = 0, ch_copy = ch;
63*b725ae77Skettenis int i;
64*b725ae77Skettenis char *term;
65*b725ae77Skettenis
66*b725ae77Skettenis /* If this is an xterm, page next/prev keys aren't returned
67*b725ae77Skettenis ** by keypad as a single char, so we must handle them here.
68*b725ae77Skettenis ** Seems like a bug in the curses library?
69*b725ae77Skettenis */
70*b725ae77Skettenis term = (char *) getenv ("TERM");
71*b725ae77Skettenis for (i = 0; (term && term[i]); i++)
72*b725ae77Skettenis term[i] = toupper (term[i]);
73*b725ae77Skettenis if ((strcmp (term, "XTERM") == 0) && key_is_start_sequence (ch))
74*b725ae77Skettenis {
75*b725ae77Skettenis unsigned int page_ch = 0;
76*b725ae77Skettenis unsigned int tmp_char;
77*b725ae77Skettenis
78*b725ae77Skettenis tmp_char = 0;
79*b725ae77Skettenis while (!key_is_end_sequence (tmp_char))
80*b725ae77Skettenis {
81*b725ae77Skettenis tmp_char = (int) wgetch (w);
82*b725ae77Skettenis if (tmp_char == ERR)
83*b725ae77Skettenis {
84*b725ae77Skettenis return ch;
85*b725ae77Skettenis }
86*b725ae77Skettenis if (!tmp_char)
87*b725ae77Skettenis break;
88*b725ae77Skettenis if (tmp_char == 53)
89*b725ae77Skettenis page_ch = KEY_PPAGE;
90*b725ae77Skettenis else if (tmp_char == 54)
91*b725ae77Skettenis page_ch = KEY_NPAGE;
92*b725ae77Skettenis else
93*b725ae77Skettenis {
94*b725ae77Skettenis return 0;
95*b725ae77Skettenis }
96*b725ae77Skettenis }
97*b725ae77Skettenis ch_copy = page_ch;
98*b725ae77Skettenis }
99*b725ae77Skettenis
100*b725ae77Skettenis switch (ch_copy)
101*b725ae77Skettenis {
102*b725ae77Skettenis case KEY_NPAGE:
103*b725ae77Skettenis tui_scroll_forward (win_info, 0);
104*b725ae77Skettenis break;
105*b725ae77Skettenis case KEY_PPAGE:
106*b725ae77Skettenis tui_scroll_backward (win_info, 0);
107*b725ae77Skettenis break;
108*b725ae77Skettenis case KEY_DOWN:
109*b725ae77Skettenis case KEY_SF:
110*b725ae77Skettenis tui_scroll_forward (win_info, 1);
111*b725ae77Skettenis break;
112*b725ae77Skettenis case KEY_UP:
113*b725ae77Skettenis case KEY_SR:
114*b725ae77Skettenis tui_scroll_backward (win_info, 1);
115*b725ae77Skettenis break;
116*b725ae77Skettenis case KEY_RIGHT:
117*b725ae77Skettenis tui_scroll_left (win_info, 1);
118*b725ae77Skettenis break;
119*b725ae77Skettenis case KEY_LEFT:
120*b725ae77Skettenis tui_scroll_right (win_info, 1);
121*b725ae77Skettenis break;
122*b725ae77Skettenis case '\f':
123*b725ae77Skettenis tui_refresh_all_win ();
124*b725ae77Skettenis break;
125*b725ae77Skettenis default:
126*b725ae77Skettenis c = ch_copy;
127*b725ae77Skettenis break;
128*b725ae77Skettenis }
129*b725ae77Skettenis return c;
130*b725ae77Skettenis }
131*b725ae77Skettenis }
132