This commit was manufactured by cvs2svn to create tag 'd2x-0_1_2'.
[btb/d2x.git] / arch / svgalib / key.c
1 /*
2  * $Source: /cvs/cvsroot/d2x/arch/svgalib/key.c,v $
3  * $Revision: 1.1 $
4  * $Author: bradleyb $
5  * $Date: 2001-10-24 09:25:05 $
6  *
7  * SVGALib keyboard input support
8  *
9  * $Log: not supported by cvs2svn $
10  * Revision 1.2  2001/01/29 14:03:57  bradleyb
11  * Fixed build, minor fixes
12  *
13  */
14
15 #ifdef HAVE_CONFIG_H
16 #include <conf.h>
17 #endif
18
19 #include <stdio.h>
20 #include <stdlib.h>
21
22 #include <vgakeyboard.h> 
23
24 #include "event.h"
25 #include "error.h"
26 #include "key.h"
27 #include "timer.h"
28
29 //added on 9/3/98 by Matt Mueller to free some cpu instead of hogging during menus and such
30 #include "d_delay.h"
31 //end this section addition - Matt Mueller
32
33 #define KEY_BUFFER_SIZE 16
34
35 static unsigned char Installed = 0;
36
37 //-------- Variable accessed by outside functions ---------
38 unsigned char           keyd_buffer_type;               // 0=No buffer, 1=buffer ASCII, 2=buffer scans
39 unsigned char           keyd_repeat;
40 unsigned char           keyd_editor_mode;
41 volatile unsigned char  keyd_last_pressed;
42 volatile unsigned char  keyd_last_released;
43 volatile unsigned char  keyd_pressed[256];
44 volatile int            keyd_time_when_last_pressed;
45
46 typedef struct Key_info {
47         ubyte           state;                  // state of key 1 == down, 0 == up
48         ubyte           last_state;             // previous state of key
49         int             counter;                // incremented each time key is down in handler
50         fix             timewentdown;   // simple counter incremented each time in interrupt and key is down
51         fix             timehelddown;   // counter to tell how long key is down -- gets reset to 0 by key routines
52         ubyte           downcount;              // number of key counts key was down
53         ubyte           upcount;                // number of times key was released
54 } Key_info;
55
56 typedef struct keyboard {
57         unsigned short          keybuffer[KEY_BUFFER_SIZE];
58         Key_info                keys[256];
59         fix                     time_pressed[KEY_BUFFER_SIZE];
60         unsigned int            keyhead, keytail;
61 } keyboard;
62
63 static /*volatile*/ keyboard key_data;
64
65 char *key_text[256];
66
67 unsigned char ascii_table[128] = 
68 { 255, 255, '1', '2', '3', '4', '5', '6', '7', '8', '9', '0', '-', '=',255,255,
69   'q', 'w', 'e', 'r', 't', 'y', 'u', 'i', 'o', 'p', '[', ']', 255, 255,
70   'a', 's', 'd', 'f', 'g', 'h', 'j', 'k', 'l', ';', 39, '`',
71   255, '\\', 'z', 'x', 'c', 'v', 'b', 'n', 'm', ',', '.', '/', 255,'*',
72   255, ' ', 255, 255, 255, 255, 255, 255, 255, 255, 255, 255, 255, 255,255,255,
73   255, 255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
74   255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
75   255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
76   255,255,255,255,255,255,255,255 };
77
78 unsigned char shifted_ascii_table[128] = 
79 { 255, 255, '!', '@', '#', '$', '%', '^', '&', '*', '(', ')', '_', '+',255,255,
80   'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I', 'O', 'P', '{', '}', 255, 255,
81   'A', 'S', 'D', 'F', 'G', 'H', 'J', 'K', 'L', ':', '"', '~', 
82   255, '|', 'Z', 'X', 'C', 'V', 'B', 'N', 'M', '<', '>', '?', 255,255,
83   255, ' ', 255, 255, 255, 255, 255, 255, 255, 255, 255, 255, 255, 255,255,255,
84   255, 255, 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
85   255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
86   255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
87   255,255,255,255,255,255,255,255 };
88
89 //killed on 10/03/98 by Matt Mueller
90 //unsigned char key_to_ascii(int a)
91 //{
92 // if (!isprint(a)) return 255;
93 // if (a & KEY_SHIFTED) {
94 //  return (toupper((unsigned char) a));
95 // } else {
96 //  return ((unsigned char) a);
97 // }
98 //}
99 //end kill -MM
100
101 //added on 10/03/98 by Matt Mueller to fix shifted keys (copied from dos/key.c)
102 unsigned char key_to_ascii(int keycode)
103 {
104         int shifted;
105
106         shifted = keycode & KEY_SHIFTED;
107         keycode &= 0xFF;
108
109         if ( keycode>=127 )
110                 return 255;
111
112         if (shifted)
113                 return shifted_ascii_table[keycode];
114         else
115                 return ascii_table[keycode];
116 }
117 //end addition -MM
118
119 void key_handler(int scancode, int press)
120 {
121         ubyte state, key_state;
122         int i, keycode, event_key;
123         Key_info *key;
124         unsigned char temp;
125
126         if (press == KEY_EVENTPRESS)
127                 key_state = 1;
128         else if (press == KEY_EVENTRELEASE)
129                 key_state = 0;
130         else
131                 return;
132
133         event_key = scancode;
134
135         //=====================================================
136         //Here a translation from win keycodes to mac keycodes!
137         //=====================================================
138
139         for (i = 255; i >= 0; i--) {
140
141                 keycode = i;
142                 key = &(key_data.keys[keycode]);
143                 if (i == event_key)
144                         state = key_state;
145                 else
146                         state = key->last_state;
147                         
148                 if ( key->last_state == state ) {
149                         if (state) {
150                                 key->counter++;
151                                 keyd_last_pressed = keycode;
152                                 keyd_time_when_last_pressed = timer_get_fixed_seconds();
153                         }
154                 } else {
155                         if (state)      {
156                                 keyd_last_pressed = keycode;
157                                 keyd_pressed[keycode] = 1;
158                                 key->downcount += state;
159                                 key->state = 1;
160                                 key->timewentdown = keyd_time_when_last_pressed = timer_get_fixed_seconds();
161                                 key->counter++;
162                         } else {        
163                                 keyd_pressed[keycode] = 0;
164                                 keyd_last_released = keycode;
165                                 key->upcount += key->state;
166                                 key->state = 0;
167                                 key->counter = 0;
168                                 key->timehelddown += timer_get_fixed_seconds() - key->timewentdown;
169                         }
170                 }
171                 if ( (state && !key->last_state) || (state && key->last_state && (key->counter > 30) && (key->counter & 0x01)) ) {
172                         if ( keyd_pressed[KEY_LSHIFT] || keyd_pressed[KEY_RSHIFT])
173                                 keycode |= KEY_SHIFTED;
174                         if ( keyd_pressed[KEY_LALT] || keyd_pressed[KEY_RALT])
175                                 keycode |= KEY_ALTED;
176                         if ( keyd_pressed[KEY_LCTRL] || keyd_pressed[KEY_RCTRL])
177                                 keycode |= KEY_CTRLED;
178                         if ( keyd_pressed[KEY_DELETE] )
179                                 keycode |= KEY_DEBUGGED;
180                         temp = key_data.keytail+1;
181                         if ( temp >= KEY_BUFFER_SIZE ) temp=0;
182                         if (temp!=key_data.keyhead)     {
183                                 key_data.keybuffer[key_data.keytail] = keycode;
184                                 key_data.time_pressed[key_data.keytail] = keyd_time_when_last_pressed;
185                                 key_data.keytail = temp;
186                         }
187                 }
188                 key->last_state = state;
189         }
190 }
191
192 void key_close()
193 {
194         Installed = 0;
195         keyboard_close();
196 }
197
198 void key_init()
199 {
200         if (keyboard_init())
201                 Error ("SVGAlib Keyboard Init Failed");
202         Installed=1;
203
204         keyboard_seteventhandler (key_handler);
205         keyd_time_when_last_pressed = timer_get_fixed_seconds();
206         keyd_buffer_type = 1;
207         keyd_repeat = 1;
208
209 // Clear the keyboard array
210         key_flush();
211         atexit(key_close);
212 }
213
214 void key_flush()
215 {
216         int i;
217         fix curtime;
218
219         if (!Installed)
220                 key_init();
221
222         key_data.keyhead = key_data.keytail = 0;
223
224         //Clear the keyboard buffer
225         for (i=0; i<KEY_BUFFER_SIZE; i++ )      {
226                 key_data.keybuffer[i] = 0;
227                 key_data.time_pressed[i] = 0;
228         }
229
230 //use gettimeofday here:
231         curtime = timer_get_fixed_seconds();
232
233         for (i=0; i<256; i++ )  {
234                 keyd_pressed[i] = 0;
235                 key_data.keys[i].state = 1;
236                 key_data.keys[i].last_state = 0;
237                 key_data.keys[i].timewentdown = curtime;
238                 key_data.keys[i].downcount=0;
239                 key_data.keys[i].upcount=0;
240                 key_data.keys[i].timehelddown = 0;
241                 key_data.keys[i].counter = 0;
242         }
243 }
244
245 int add_one(int n)
246 {
247  n++;
248  if ( n >= KEY_BUFFER_SIZE ) n=0;
249  return n;
250 }
251
252 int key_checkch()
253 {
254         int is_one_waiting = 0;
255         event_poll();
256         if (key_data.keytail!=key_data.keyhead)
257                 is_one_waiting = 1;
258         return is_one_waiting;
259 }
260
261 int key_inkey()
262 {
263         int key = 0;
264         if (!Installed)
265                 key_init();
266         event_poll();
267         if (key_data.keytail!=key_data.keyhead) {
268                 key = key_data.keybuffer[key_data.keyhead];
269                 key_data.keyhead = add_one(key_data.keyhead);
270         }
271 //added 9/3/98 by Matt Mueller to free cpu time instead of hogging during menus and such
272 //      else d_delay(1);
273 //end addition - Matt Mueller
274         return key;
275 }
276
277 int key_inkey_time(fix * time)
278 {
279         int key = 0;
280
281         if (!Installed)
282                 key_init();
283         event_poll();
284         if (key_data.keytail!=key_data.keyhead) {
285                 key = key_data.keybuffer[key_data.keyhead];
286                 *time = key_data.time_pressed[key_data.keyhead];
287                 key_data.keyhead = add_one(key_data.keyhead);
288         }
289         return key;
290 }
291
292 int key_peekkey()
293 {
294         int key = 0;
295         event_poll();
296         if (key_data.keytail!=key_data.keyhead)
297                 key = key_data.keybuffer[key_data.keyhead];
298
299         return key;
300 }
301
302 int key_getch()
303 {
304         int dummy=0;
305
306         if (!Installed)
307                 return 0;
308 //              return getch();
309
310         while (!key_checkch())
311                 dummy++;
312         return key_inkey();
313 }
314
315 unsigned int key_get_shift_status()
316 {
317         unsigned int shift_status = 0;
318
319         if ( keyd_pressed[KEY_LSHIFT] || keyd_pressed[KEY_RSHIFT] )
320                 shift_status |= KEY_SHIFTED;
321
322         if ( keyd_pressed[KEY_LALT] || keyd_pressed[KEY_RALT] )
323                 shift_status |= KEY_ALTED;
324
325         if ( keyd_pressed[KEY_LCTRL] || keyd_pressed[KEY_RCTRL] )
326                 shift_status |= KEY_CTRLED;
327
328 #ifndef NDEBUG
329         if (keyd_pressed[KEY_DELETE])
330                 shift_status |=KEY_DEBUGGED;
331 #endif
332
333         return shift_status;
334 }
335
336 // Returns the number of seconds this key has been down since last call.
337 fix key_down_time(int scancode)
338 {
339         fix time_down, time;
340
341         event_poll();
342         if ((scancode<0)|| (scancode>255)) return 0;
343
344         if (!keyd_pressed[scancode]) {
345                 time_down = key_data.keys[scancode].timehelddown;
346                 key_data.keys[scancode].timehelddown = 0;
347         } else {
348                 time = timer_get_fixed_seconds();
349                 time_down = time - key_data.keys[scancode].timewentdown;
350                 key_data.keys[scancode].timewentdown = time;
351         }
352
353         return time_down;
354 }
355
356 unsigned int key_down_count(int scancode)
357 {
358         int n;
359         event_poll();
360         if ((scancode<0)|| (scancode>255)) return 0;
361
362         n = key_data.keys[scancode].downcount;
363         key_data.keys[scancode].downcount = 0;
364
365         return n;
366 }
367
368 unsigned int key_up_count(int scancode)
369 {
370         int n;
371         event_poll();
372         if ((scancode<0)|| (scancode>255)) return 0;
373
374         n = key_data.keys[scancode].upcount;
375         key_data.keys[scancode].upcount = 0;
376
377         return n;
378 }