src/video/ataricommon/SDL_gemdosevents.c
author Sam Lantinga
Sun, 04 Jan 2004 16:49:27 +0000
changeset 769 b8d311d90021
parent 305 9c6613983e85
child 1209 a55ac374271c
permissions -rw-r--r--
Updated copyright information for 2004 (Happy New Year!)
     1 /*
     2     SDL - Simple DirectMedia Layer
     3     Copyright (C) 1997-2004 Sam Lantinga
     4 
     5     This library is free software; you can redistribute it and/or
     6     modify it under the terms of the GNU Library General Public
     7     License as published by the Free Software Foundation; either
     8     version 2 of the License, or (at your option) any later version.
     9 
    10     This library is distributed in the hope that it will be useful,
    11     but WITHOUT ANY WARRANTY; without even the implied warranty of
    12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    13     Library General Public License for more details.
    14 
    15     You should have received a copy of the GNU Library General Public
    16     License along with this library; if not, write to the Free
    17     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
    18 
    19     Sam Lantinga
    20     slouken@libsdl.org
    21 */
    22 
    23 #ifdef SAVE_RCSID
    24 static char rcsid =
    25  "@(#) $Id$";
    26 #endif
    27 
    28 /*
    29  *	Atari keyboard events manager, using Gemdos
    30  *
    31  *	Patrice Mandin
    32  */
    33 
    34 #include <string.h>
    35 
    36 /* Mint includes */
    37 #include <mint/osbind.h>
    38 
    39 #include "SDL.h"
    40 #include "SDL_sysevents.h"
    41 #include "SDL_events_c.h"
    42 
    43 #include "SDL_atarikeys.h"
    44 #include "SDL_xbiosevents_c.h"
    45 
    46 /* To save state of keyboard */
    47 #define ATARIBIOS_MAXKEYS 128
    48 
    49 static unsigned char gemdos_currentkeyboard[ATARIBIOS_MAXKEYS];
    50 static unsigned char gemdos_previouskeyboard[ATARIBIOS_MAXKEYS];
    51 static unsigned char gemdos_currentascii[ATARIBIOS_MAXKEYS];
    52 
    53 /* Special keys state */
    54 enum {
    55 	K_RSHIFT=0,
    56 	K_LSHIFT,
    57 	K_CTRL,
    58 	K_ALT,
    59 	K_CAPSLOCK,
    60 	K_CLRHOME,
    61 	K_INSERT
    62 };
    63 
    64 enum {
    65 	DEV_BUSY=0,
    66 	DEV_READY
    67 };
    68 
    69 /* The translation tables from a console scancode to a SDL keysym */
    70 static SDLKey keymap[ATARIBIOS_MAXKEYS];
    71 
    72 static SDL_keysym *TranslateKey(int scancode, int asciicode, SDL_keysym *keysym);
    73 static void UpdateSpecialKeys(int special_keys_state);
    74 
    75 void AtariGemdos_InitOSKeymap(_THIS)
    76 {
    77 	int i;
    78 
    79 	memset(gemdos_currentkeyboard, 0, sizeof(gemdos_currentkeyboard));
    80 	memset(gemdos_previouskeyboard, 0, sizeof(gemdos_previouskeyboard));
    81 
    82 	/* Initialize keymap */
    83 	for ( i=0; i<sizeof(keymap); i++ )
    84 		keymap[i] = SDLK_UNKNOWN;
    85 
    86 	/* Functions keys */
    87 	for ( i = 0; i<10; i++ )
    88 		keymap[SCANCODE_F1 + i] = SDLK_F1+i;
    89 
    90 	/* Cursor keypad */
    91 	keymap[SCANCODE_HELP] = SDLK_HELP;
    92 	keymap[SCANCODE_UNDO] = SDLK_UNDO;
    93 	keymap[SCANCODE_INSERT] = SDLK_INSERT;
    94 	keymap[SCANCODE_CLRHOME] = SDLK_HOME;
    95 	keymap[SCANCODE_UP] = SDLK_UP;
    96 	keymap[SCANCODE_DOWN] = SDLK_DOWN;
    97 	keymap[SCANCODE_RIGHT] = SDLK_RIGHT;
    98 	keymap[SCANCODE_LEFT] = SDLK_LEFT;
    99 
   100 	/* Special keys */
   101 	keymap[SCANCODE_ESCAPE] = SDLK_ESCAPE;
   102 	keymap[SCANCODE_BACKSPACE] = SDLK_BACKSPACE;
   103 	keymap[SCANCODE_TAB] = SDLK_TAB;
   104 	keymap[SCANCODE_ENTER] = SDLK_RETURN;
   105 	keymap[SCANCODE_DELETE] = SDLK_DELETE;
   106 	keymap[SCANCODE_LEFTCONTROL] = SDLK_LCTRL;
   107 	keymap[SCANCODE_LEFTSHIFT] = SDLK_LSHIFT;
   108 	keymap[SCANCODE_RIGHTSHIFT] = SDLK_RSHIFT;
   109 	keymap[SCANCODE_LEFTALT] = SDLK_LALT;
   110 	keymap[SCANCODE_CAPSLOCK] = SDLK_CAPSLOCK;
   111 
   112 	SDL_AtariXbios_InstallVectors(ATARI_XBIOS_MOUSEEVENTS|ATARI_XBIOS_JOYSTICKEVENTS);
   113 }
   114 
   115 void AtariGemdos_PumpEvents(_THIS)
   116 {
   117 	int i;
   118 	SDL_keysym keysym;
   119 
   120 	/* Update pressed keys */
   121 	memset(gemdos_currentkeyboard, 0, ATARIBIOS_MAXKEYS);
   122 
   123 	while (Cconis()!=DEV_BUSY) {
   124 		unsigned long key_pressed;
   125 		unsigned char scancode, asciicode;
   126 
   127 		key_pressed=Cnecin();
   128 
   129 		asciicode = key_pressed;
   130 		scancode = key_pressed >> 16;
   131 
   132 		gemdos_currentkeyboard[scancode]=0xFF;
   133 		gemdos_currentascii[scancode]=asciicode;
   134 	}
   135 
   136 	/* Read special keys */
   137 	UpdateSpecialKeys(Kbshift(-1));
   138 
   139 	/* Now generate events */
   140 	for (i=0; i<ATARIBIOS_MAXKEYS; i++) {
   141 		/* Key pressed ? */
   142 		if (gemdos_currentkeyboard[i] && !gemdos_previouskeyboard[i])
   143 			SDL_PrivateKeyboard(SDL_PRESSED, TranslateKey(i, gemdos_currentascii[i], &keysym));
   144 			
   145 		/* Key unpressed ? */
   146 		if (gemdos_previouskeyboard[i] && !gemdos_currentkeyboard[i])
   147 			SDL_PrivateKeyboard(SDL_RELEASED, TranslateKey(i, gemdos_currentascii[i], &keysym));
   148 	}
   149 
   150 	SDL_AtariXbios_PostMouseEvents(this);
   151 
   152 	/* Will be previous table */
   153 	memcpy(gemdos_previouskeyboard, gemdos_currentkeyboard, ATARIBIOS_MAXKEYS);
   154 }
   155 
   156 static void UpdateSpecialKeys(int special_keys_state)
   157 {
   158 #define UPDATE_SPECIAL_KEYS(numbit,scancode) \
   159 	{	\
   160 		if (special_keys_state & (1<<(numbit))) { \
   161 			gemdos_currentkeyboard[scancode]=0xFF; \
   162 			gemdos_currentascii[scancode]=0; \
   163 		}	\
   164 	}
   165 
   166 	UPDATE_SPECIAL_KEYS(K_RSHIFT, SCANCODE_RIGHTSHIFT);
   167 	UPDATE_SPECIAL_KEYS(K_LSHIFT, SCANCODE_LEFTSHIFT);
   168 	UPDATE_SPECIAL_KEYS(K_CTRL, SCANCODE_LEFTCONTROL);
   169 	UPDATE_SPECIAL_KEYS(K_ALT, SCANCODE_LEFTALT);
   170 	UPDATE_SPECIAL_KEYS(K_CAPSLOCK, SCANCODE_CAPSLOCK);
   171 }
   172 
   173 static SDL_keysym *TranslateKey(int scancode, int asciicode, SDL_keysym *keysym)
   174 {
   175 	/* Set the keysym information */
   176 	keysym->scancode = scancode;
   177 
   178 	if (asciicode)
   179 		keysym->sym = asciicode;		
   180 	else
   181 		keysym->sym = keymap[scancode];
   182 
   183 	keysym->mod = KMOD_NONE;
   184 	keysym->unicode = 0;
   185 
   186 	return(keysym);
   187 }
   188 
   189 void AtariGemdos_ShutdownEvents(void)
   190 {
   191 	SDL_AtariXbios_RestoreVectors();
   192 }