text: /*
      SDL - Simple DirectMedia Layer
      Copyright (C) 1997-2006 Sam Lantinga
  
      This library is free software; you can redistribute it and/or
      modify it under the terms of the GNU Lesser General Public
      License as published by the Free Software Foundation; either
      version 2.1 of the License, or (at your option) any later version.
  
      This library is distributed in the hope that it will be useful,
      but WITHOUT ANY WARRANTY; without even the implied warranty of
      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      Lesser General Public License for more details.
  
      You should have received a copy of the GNU Lesser General Public
      License along with this library; if not, write to the Free Software
      Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  
      Sam Lantinga
      slouken@libsdl.org
  */
  #include "SDL_config.h"
  
  /* Handle the event stream, converting AA events into SDL events */
  
  #include <stdio.h>
  
  #include <aalib.h>
  
  #include "SDL.h"
  #include "../../events/SDL_sysevents.h"
  #include "../../events/SDL_events_c.h"
  #include "SDL_aavideo.h"
  #include "SDL_aaevents_c.h"
  
  /* The translation tables from a console scancode to a SDL keysym */
  static SDLKey keymap[401];
  
  static SDL_keysym *TranslateKey(int scancode, SDL_keysym *keysym);
  
  
  void AA_PumpEvents(_THIS)
  {
  	int posted = 0;
  	int mouse_button, mouse_x, mouse_y;
  	int evt;
  	SDL_keysym keysym;
  
  	static int prev_button = -1, prev_x = -1, prev_y = -1;
  
  	if( ! this->screen ) /* Wait till we got the screen initialized */
  	  return;
  
  	do {
  		posted = 0;
  		/* Gather events */
  
  		/* Get mouse status */
  		SDL_mutexP(AA_mutex);
  		aa_getmouse (AA_context, &mouse_x, &mouse_y, &mouse_button);
  		SDL_mutexV(AA_mutex);
  		mouse_x = mouse_x * this->screen->w / aa_scrwidth (AA_context);
  		mouse_y = mouse_y * this->screen->h / aa_scrheight (AA_context);
  
  		/* Compare against previous state and generate events */
  		if( prev_button != mouse_button ) {
  			if( mouse_button & AA_BUTTON1 ) {
  				if ( ! (prev_button & AA_BUTTON1) ) {
  					posted += SDL_PrivateMouseButton(SDL_PRESSED, 1, 0, 0);
  				}
  			} else {
  				if ( prev_button & AA_BUTTON1 ) {
  					posted += SDL_PrivateMouseButton(SDL_RELEASED, 1, 0, 0);
  				}
  			}
  			if( mouse_button & AA_BUTTON2 ) {
  				if ( ! (prev_button & AA_BUTTON2) ) {
  					posted += SDL_PrivateMouseButton(SDL_PRESSED, 2, 0, 0);
  				}
  			} else {
  				if ( prev_button & AA_BUTTON2 ) {
  					posted += SDL_PrivateMouseButton(SDL_RELEASED, 2, 0, 0);
  				}
  			}
  			if( mouse_button & AA_BUTTON3 ) {
  				if ( ! (prev_button & AA_BUTTON3) ) {
  					posted += SDL_PrivateMouseButton(SDL_PRESSED, 3, 0, 0);
  				}
  			} else {
  				if ( prev_button & AA_BUTTON3 ) {
  					posted += SDL_PrivateMouseButton(SDL_RELEASED, 3, 0, 0);
  				}
  			}
  		}
  		if ( prev_x != mouse_x || prev_y != mouse_y ) {
  			posted += SDL_PrivateMouseMotion(0, 0, mouse_x, mouse_y);
  		}
  
  		prev_button = mouse_button;
  		prev_x = mouse_x; prev_y = mouse_y;
  
  		/* Get keyboard event */
  		SDL_mutexP(AA_mutex);
  		evt = aa_getevent(AA_context, 0);
  		SDL_mutexV(AA_mutex);
  		if ( (evt > AA_NONE) && (evt < AA_RELEASE) && (evt != AA_MOUSE) && (evt != AA_RESIZE) ) {
  			/* Key pressed */
  /*    			printf("Key pressed: %d (%c)\n", evt, evt); */
  			posted += SDL_PrivateKeyboard(SDL_PRESSED, TranslateKey(evt, &keysym));
  		} else if ( evt >= AA_RELEASE ) {
  			/* Key released */
  			evt &= ~AA_RELEASE;
  /*  			printf("Key released: %d (%c)\n", evt, evt); */
  			posted += SDL_PrivateKeyboard(SDL_RELEASED, TranslateKey(evt, &keysym));
  		}
  	} while ( posted );
  }
  
  void AA_InitOSKeymap(_THIS)
  {
  	int i;
  	static const char *std_keys = " 01234567890&#'()_-|$*+-=/\\:;.,!?<>{}[]@~%^\x9";
  	const char *std;
  
  	/* Initialize the AAlib key translation table */
  	for ( i=0; i<SDL_arraysize(keymap); ++i )
  		keymap[i] = SDLK_UNKNOWN;
  
  	/* Alphabet keys */
  	for ( i = 0; i<26; ++i ){
  		keymap['a' + i] = SDLK_a+i;
  		keymap['A' + i] = SDLK_a+i;
  	}
  	/* Function keys */
  	for ( i = 0; i<12; ++i ){
  		keymap[334 + i] = SDLK_F1+i;
  	}
  	/* Keys that have the same symbols and don't have to be translated */
  	for( std = std_keys; *std; std ++ ) {
  		keymap[*std] = *std;
  	}
  
  	keymap[13] = SDLK_RETURN;
  	keymap[AA_BACKSPACE] = SDLK_BACKSPACE;
  
  	keymap[369] = SDLK_LSHIFT;
  	keymap[370] = SDLK_RSHIFT;
  	keymap[371] = SDLK_LCTRL;
  	keymap[372] = SDLK_RCTRL;
  	keymap[377] = SDLK_LALT;
  	keymap[270] = SDLK_RALT;
  	keymap[271] = SDLK_NUMLOCK;
  	keymap[373] = SDLK_CAPSLOCK;
  	keymap[164] = SDLK_SCROLLOCK;
  
  	keymap[243] = SDLK_INSERT;
  	keymap[304] = SDLK_DELETE;
  	keymap[224] = SDLK_HOME;
  	keymap[231] = SDLK_END;
  	keymap[229] = SDLK_PAGEUP;
  	keymap[230] = SDLK_PAGEDOWN;
  
  	keymap[241] = SDLK_PRINT;
  	keymap[163] = SDLK_BREAK;
  
  	keymap[302] = SDLK_KP0;
  	keymap[300] = SDLK_KP1;
  	keymap[297] = SDLK_KP2;
  	keymap[299] = SDLK_KP3;
  	keymap[294] = SDLK_KP4;
  	keymap[301] = SDLK_KP5;
  	keymap[296] = SDLK_KP6;
  	keymap[293] = SDLK_KP7;
  	keymap[295] = SDLK_KP8;
  	keymap[298] = SDLK_KP9;
  
  	keymap[AA_ESC] = SDLK_ESCAPE;
  	keymap[AA_UP] = SDLK_UP;
  	keymap[AA_DOWN] = SDLK_DOWN;
  	keymap[AA_LEFT] = SDLK_LEFT;
  	keymap[AA_RIGHT] = SDLK_RIGHT;
  }
  
  static SDL_keysym *TranslateKey(int scancode, SDL_keysym *keysym)
  {
  	/* Sanity check */
  	if ( scancode >= SDL_arraysize(keymap) )
  		scancode = AA_UNKNOWN;
  
  	/* Set the keysym information */
  	keysym->scancode = scancode;
  	keysym->sym = keymap[scancode];
  	keysym->mod = KMOD_NONE;
  
  	/* If UNICODE is on, get the UNICODE value for the key */
  	keysym->unicode = 0;
  	if ( SDL_TranslateUNICODE ) {
  		/* Populate the unicode field with the ASCII value */
  		keysym->unicode = scancode;
  	}
  	return(keysym);
  }
  