1 /* Public Domain Curses */
5 RCSID("$Id: pdckbd.c,v 1.20 2008/07/14 04:24:52 wmcbrine Exp $")
7 /*man-start**************************************************************
12 unsigned long PDC_get_input_fd(void);
15 PDC_get_input_fd() returns the file descriptor that PDCurses
16 reads its input from. It can be used for select().
18 Portability X/Open BSD SYS V
19 PDC_get_input_fd - - -
21 **man-end****************************************************************/
25 unsigned long pdc_key_modifiers = 0L;
27 static SDL_Event event;
29 static MOUSE_STATUS old_mouse_status;
35 unsigned short normal;
36 unsigned short shifted;
37 unsigned short control;
41 /* keycode keypad normal shifted control alt*/
42 {SDLK_LEFT, FALSE, KEY_LEFT, KEY_SLEFT, CTL_LEFT, ALT_LEFT},
43 {SDLK_RIGHT, FALSE, KEY_RIGHT, KEY_SRIGHT, CTL_RIGHT, ALT_RIGHT},
44 {SDLK_UP, FALSE, KEY_UP, KEY_SUP, CTL_UP, ALT_UP},
45 {SDLK_DOWN, FALSE, KEY_DOWN, KEY_SDOWN, CTL_DOWN, ALT_DOWN},
46 {SDLK_HOME, FALSE, KEY_HOME, KEY_SHOME, CTL_HOME, ALT_HOME},
47 {SDLK_END, FALSE, KEY_END, KEY_SEND, CTL_END, ALT_END},
48 {SDLK_PAGEUP, FALSE, KEY_PPAGE, KEY_SPREVIOUS,CTL_PGUP, ALT_PGUP},
49 {SDLK_PAGEDOWN,FALSE, KEY_NPAGE, KEY_SNEXT, CTL_PGDN, ALT_PGDN},
50 {SDLK_INSERT, FALSE, KEY_IC, KEY_SIC, CTL_INS, ALT_INS},
51 {SDLK_DELETE, FALSE, KEY_DC, KEY_SDC, CTL_DEL, ALT_DEL},
52 {SDLK_F1, FALSE, KEY_F(1), KEY_F(13), KEY_F(25), KEY_F(37)},
53 {SDLK_F2, FALSE, KEY_F(2), KEY_F(14), KEY_F(26), KEY_F(38)},
54 {SDLK_F3, FALSE, KEY_F(3), KEY_F(15), KEY_F(27), KEY_F(39)},
55 {SDLK_F4, FALSE, KEY_F(4), KEY_F(16), KEY_F(28), KEY_F(40)},
56 {SDLK_F5, FALSE, KEY_F(5), KEY_F(17), KEY_F(29), KEY_F(41)},
57 {SDLK_F6, FALSE, KEY_F(6), KEY_F(18), KEY_F(30), KEY_F(42)},
58 {SDLK_F7, FALSE, KEY_F(7), KEY_F(19), KEY_F(31), KEY_F(43)},
59 {SDLK_F8, FALSE, KEY_F(8), KEY_F(20), KEY_F(32), KEY_F(44)},
60 {SDLK_F9, FALSE, KEY_F(9), KEY_F(21), KEY_F(33), KEY_F(45)},
61 {SDLK_F10, FALSE, KEY_F(10), KEY_F(22), KEY_F(34), KEY_F(46)},
62 {SDLK_F11, FALSE, KEY_F(11), KEY_F(23), KEY_F(35), KEY_F(47)},
63 {SDLK_F12, FALSE, KEY_F(12), KEY_F(24), KEY_F(36), KEY_F(48)},
64 {SDLK_F13, FALSE, KEY_F(13), KEY_F(25), KEY_F(37), KEY_F(49)},
65 {SDLK_F14, FALSE, KEY_F(14), KEY_F(26), KEY_F(38), KEY_F(50)},
66 {SDLK_F15, FALSE, KEY_F(15), KEY_F(27), KEY_F(39), KEY_F(51)},
67 {SDLK_BACKSPACE,FALSE, 0x08, 0x08, CTL_BKSP, ALT_BKSP},
68 {SDLK_TAB, FALSE, 0x09, KEY_BTAB, CTL_TAB, ALT_TAB},
69 {SDLK_PRINT, FALSE, KEY_PRINT, KEY_SPRINT, KEY_PRINT, KEY_PRINT},
70 {SDLK_PAUSE, FALSE, KEY_SUSPEND, KEY_SSUSPEND, KEY_SUSPEND, KEY_SUSPEND},
71 {SDLK_CLEAR, FALSE, KEY_CLEAR, KEY_CLEAR, KEY_CLEAR, KEY_CLEAR},
72 {SDLK_BREAK, FALSE, KEY_BREAK, KEY_BREAK, KEY_BREAK, KEY_BREAK},
73 {SDLK_HELP, FALSE, KEY_HELP, KEY_SHELP, KEY_LHELP, KEY_HELP},
74 {SDLK_MENU, FALSE, KEY_OPTIONS, KEY_SOPTIONS, KEY_OPTIONS, KEY_OPTIONS},
75 {SDLK_ESCAPE, FALSE, 0x1B, 0x1B, 0x1B, ALT_ESC},
76 {SDLK_KP_ENTER,TRUE, PADENTER, PADENTER, CTL_PADENTER,ALT_PADENTER},
77 {SDLK_KP_PLUS, TRUE, PADPLUS, '+', CTL_PADPLUS, ALT_PADPLUS},
78 {SDLK_KP_MINUS,TRUE, PADMINUS, '-', CTL_PADMINUS,ALT_PADMINUS},
79 {SDLK_KP_MULTIPLY,TRUE,PADSTAR, '*', CTL_PADSTAR, ALT_PADSTAR},
80 {SDLK_KP_DIVIDE,TRUE, PADSLASH, '/', CTL_PADSLASH,ALT_PADSLASH},
81 {SDLK_KP_PERIOD,TRUE, PADSTOP, '.', CTL_PADSTOP, ALT_PADSTOP},
82 {SDLK_KP0, TRUE, PAD0, '0', CTL_PAD0, ALT_PAD0},
83 {SDLK_KP1, TRUE, KEY_C1, '1', CTL_PAD1, ALT_PAD1},
84 {SDLK_KP2, TRUE, KEY_C2, '2', CTL_PAD2, ALT_PAD2},
85 {SDLK_KP3, TRUE, KEY_C3, '3', CTL_PAD3, ALT_PAD3},
86 {SDLK_KP4, TRUE, KEY_B1, '4', CTL_PAD4, ALT_PAD4},
87 {SDLK_KP5, TRUE, KEY_B2, '5', CTL_PAD5, ALT_PAD5},
88 {SDLK_KP6, TRUE, KEY_B3, '6', CTL_PAD6, ALT_PAD6},
89 {SDLK_KP7, TRUE, KEY_A1, '7', CTL_PAD7, ALT_PAD7},
90 {SDLK_KP8, TRUE, KEY_A2, '8', CTL_PAD8, ALT_PAD8},
91 {SDLK_KP9, TRUE, KEY_A3, '9', CTL_PAD9, ALT_PAD9},
95 unsigned long PDC_get_input_fd(void)
97 PDC_LOG(("PDC_get_input_fd() - called\n"));
99 return 0L; /* test this */
102 void PDC_set_keyboard_binary(bool on)
104 PDC_LOG(("PDC_set_keyboard_binary() - called\n"));
107 /* check if a key or mouse event is waiting */
109 bool PDC_check_key(void)
111 Uint32 current = SDL_GetTicks();
112 int haveevent = SDL_PollEvent(&event);
114 /* if we have an event, or 30 ms have passed without a screen
115 update, or the timer has wrapped, update now */
118 current < pdc_lastupdate || ((current - pdc_lastupdate) > 30))
124 static int _process_key_event(void)
128 pdc_key_modifiers = 0L;
129 SP->key_code = FALSE;
131 if (event.type == SDL_KEYUP)
133 if (SP->return_key_modifiers && event.key.keysym.sym == oldkey)
142 return KEY_CONTROL_R;
144 return KEY_CONTROL_L;
157 oldkey = event.key.keysym.sym;
159 if (SP->save_key_modifiers)
161 if (event.key.keysym.mod & KMOD_NUM)
162 pdc_key_modifiers |= PDC_KEY_MODIFIER_NUMLOCK;
164 if (event.key.keysym.mod & KMOD_SHIFT)
165 pdc_key_modifiers |= PDC_KEY_MODIFIER_SHIFT;
167 if (event.key.keysym.mod & KMOD_CTRL)
168 pdc_key_modifiers |= PDC_KEY_MODIFIER_CONTROL;
170 if (event.key.keysym.mod & KMOD_ALT)
171 pdc_key_modifiers |= PDC_KEY_MODIFIER_ALT;
174 for (i = 0; key_table[i].keycode; i++)
176 if (key_table[i].keycode == event.key.keysym.sym)
178 if ((event.key.keysym.mod & KMOD_SHIFT) ||
179 (key_table[i].numkeypad && (event.key.keysym.mod & KMOD_NUM)))
181 key = key_table[i].shifted;
183 else if (event.key.keysym.mod & KMOD_CTRL)
185 key = key_table[i].control;
187 else if (event.key.keysym.mod & KMOD_ALT)
189 key = key_table[i].alt;
192 /* To get here, we ignore all other modifiers */
195 key = key_table[i].normal;
197 SP->key_code = (key > 0x100);
204 key = event.key.keysym.unicode;
210 /* Handle ALT letters and numbers */
212 if (event.key.keysym.mod & KMOD_ALT)
214 if (key >= 'A' && key <= 'Z')
220 if (key >= 'a' && key <= 'z')
226 if (key >= '0' && key <= '9')
233 return key ? key : -1;
236 static int _process_mouse_event(void)
239 short shift_flags = 0;
241 memset(&pdc_mouse_status, 0, sizeof(MOUSE_STATUS));
243 keymods = SDL_GetModState();
245 if (keymods & KMOD_SHIFT)
246 shift_flags |= BUTTON_SHIFT;
248 if (keymods & KMOD_CTRL)
249 shift_flags |= BUTTON_CONTROL;
251 if (keymods & KMOD_ALT)
252 shift_flags |= BUTTON_ALT;
254 if (event.type == SDL_MOUSEMOTION)
258 pdc_mouse_status.x = event.motion.x / pdc_fwidth;
259 pdc_mouse_status.y = event.motion.y / pdc_fheight;
261 if (!event.motion.state ||
262 (pdc_mouse_status.x == old_mouse_status.x &&
263 pdc_mouse_status.y == old_mouse_status.y))
266 pdc_mouse_status.changes = PDC_MOUSE_MOVED;
268 for (i = 0; i < 3; i++)
270 if (event.motion.state & SDL_BUTTON(i + 1))
272 pdc_mouse_status.button[i] = BUTTON_MOVED | shift_flags;
273 pdc_mouse_status.changes |= (1 << i);
279 short action = (event.button.state == SDL_PRESSED) ?
280 BUTTON_PRESSED : BUTTON_RELEASED;
281 Uint8 btn = event.button.button;
283 /* handle scroll wheel */
285 if ((btn == 4 || btn == 5) && action == BUTTON_RELEASED)
287 pdc_mouse_status.x = pdc_mouse_status.y = -1;
289 pdc_mouse_status.changes = (btn == 5) ?
290 PDC_MOUSE_WHEEL_DOWN : PDC_MOUSE_WHEEL_UP;
295 if (btn < 1 || btn > 3)
298 /* check for a click -- a press followed immediately by a release */
300 if (action == BUTTON_PRESSED && SP->mouse_wait)
304 napms(SP->mouse_wait);
306 if (SDL_PollEvent(&rel))
308 if (rel.type == SDL_MOUSEBUTTONUP && rel.button.button == btn)
309 action = BUTTON_CLICKED;
315 pdc_mouse_status.x = event.button.x / pdc_fwidth;
316 pdc_mouse_status.y = event.button.y / pdc_fheight;
320 pdc_mouse_status.button[btn] = action | shift_flags;
321 pdc_mouse_status.changes = (1 << btn);
324 old_mouse_status = pdc_mouse_status;
329 /* return the next available key or mouse event */
331 int PDC_get_key(void)
337 case SDL_VIDEORESIZE:
338 if (pdc_own_screen &&
339 (event.resize.h / pdc_fheight != LINES ||
340 event.resize.w / pdc_fwidth != COLS))
342 pdc_sheight = event.resize.h;
343 pdc_swidth = event.resize.w;
352 case SDL_MOUSEMOTION:
353 SDL_ShowCursor(SDL_ENABLE);
354 case SDL_MOUSEBUTTONUP:
355 case SDL_MOUSEBUTTONDOWN:
358 return _process_mouse_event();
363 return _process_key_event();
369 /* discard any pending keyboard or mouse input -- this is the core
370 routine for flushinp() */
372 void PDC_flushinp(void)
374 PDC_LOG(("PDC_flushinp() - called\n"));
376 while (PDC_check_key());
379 int PDC_mouse_set(void)
381 SDL_ShowCursor(SP->_trap_mbe ? SDL_ENABLE : SDL_DISABLE);
386 int PDC_modifiers_set(void)