src/video/windib/SDL_dibevents.c
author Sam Lantinga <slouken@libsdl.org>
Wed, 01 Mar 2006 09:43:47 +0000
changeset 1456 84de7511f79f
parent 1433 bb6839704ed6
child 1472 4aac8563c296
permissions -rw-r--r--
Fixed a bunch of 64-bit compatibility problems
     1 /*
     2     SDL - Simple DirectMedia Layer
     3     Copyright (C) 1997-2006 Sam Lantinga
     4 
     5     This library is free software; you can redistribute it and/or
     6     modify it under the terms of the GNU Lesser General Public
     7     License as published by the Free Software Foundation; either
     8     version 2.1 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     Lesser General Public License for more details.
    14 
    15     You should have received a copy of the GNU Lesser General Public
    16     License along with this library; if not, write to the Free Software
    17     Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
    18 
    19     Sam Lantinga
    20     slouken@libsdl.org
    21 */
    22 #include "SDL_config.h"
    23 
    24 #define WIN32_LEAN_AND_MEAN
    25 #include <windows.h>
    26 
    27 #include "SDL_main.h"
    28 #include "SDL_events.h"
    29 #include "SDL_syswm.h"
    30 #include "../../events/SDL_sysevents.h"
    31 #include "../../events/SDL_events_c.h"
    32 #include "../wincommon/SDL_lowvideo.h"
    33 #include "SDL_dibvideo.h"
    34 #include "SDL_vkeys.h"
    35 
    36 #ifndef WM_APP
    37 #define WM_APP	0x8000
    38 #endif
    39 
    40 #ifdef _WIN32_WCE
    41 #define NO_GETKEYBOARDSTATE
    42 #endif
    43 
    44 /* The translation table from a Microsoft VK keysym to a SDL keysym */
    45 static SDLKey VK_keymap[SDLK_LAST];
    46 static SDL_keysym *TranslateKey(UINT vkey, UINT scancode, SDL_keysym *keysym, int pressed);
    47 
    48 /* Masks for processing the windows KEYDOWN and KEYUP messages */
    49 #define REPEATED_KEYMASK	(1<<30)
    50 #define EXTENDED_KEYMASK	(1<<24)
    51 
    52 /* DJM: If the user setup the window for us, we want to save his window proc,
    53    and give him a chance to handle some messages. */
    54 #ifdef STRICT
    55 #define WNDPROCTYPE	WNDPROC
    56 #else
    57 #define WNDPROCTYPE	FARPROC
    58 #endif
    59 static WNDPROCTYPE userWindowProc = NULL;
    60 
    61 
    62 #ifdef _WIN32_WCE
    63 
    64 WPARAM rotateKey(WPARAM key,SDL_ScreenOrientation direction) 
    65 {
    66 	if (direction != SDL_ORIENTATION_LEFT)
    67 		return key;
    68 
    69 	switch (key) {
    70 		case 0x26: /* up */
    71 			return 0x27;
    72 		case 0x27: /* right */
    73 			return 0x28;
    74 		case 0x28: /* down */
    75 			return 0x25;
    76 		case 0x25: /* left */
    77 			return 0x26;
    78 	}
    79 
    80 	return key;
    81 }
    82 
    83 #endif 
    84 
    85 
    86 /* The main Win32 event handler */
    87 LRESULT DIB_HandleMessage(_THIS, HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
    88 {
    89 	extern int posted;
    90 
    91 	switch (msg) {
    92 		case WM_SYSKEYDOWN:
    93 		case WM_KEYDOWN: {
    94 			SDL_keysym keysym;
    95 
    96 #ifdef _WIN32_WCE
    97 			// Drop GAPI artefacts
    98 			if (wParam == 0x84 || wParam == 0x5B)
    99 				return 0;
   100 
   101 			// Rotate key if necessary
   102 			if (this->hidden->orientation != SDL_ORIENTATION_UP)
   103 				wParam = rotateKey(wParam, this->hidden->orientation);	
   104 #endif 
   105 			/* Ignore repeated keys */
   106 			if ( lParam&REPEATED_KEYMASK ) {
   107 				return(0);
   108 			}
   109 			switch (wParam) {
   110 				case VK_CONTROL:
   111 					if ( lParam&EXTENDED_KEYMASK )
   112 						wParam = VK_RCONTROL;
   113 					else
   114 						wParam = VK_LCONTROL;
   115 					break;
   116 				case VK_SHIFT:
   117 					/* EXTENDED trick doesn't work here */
   118 					{
   119 					Uint8 *state = SDL_GetKeyState(NULL);
   120 					if (state[SDLK_LSHIFT] == SDL_RELEASED && (GetKeyState(VK_LSHIFT) & 0x8000)) {
   121 						wParam = VK_LSHIFT;
   122 					} else if (state[SDLK_RSHIFT] == SDL_RELEASED && (GetKeyState(VK_RSHIFT) & 0x8000)) {
   123 						wParam = VK_RSHIFT;
   124 					} else {
   125 						/* Probably a key repeat */
   126 						return(0);
   127 					}
   128 					}
   129 					break;
   130 				case VK_MENU:
   131 					if ( lParam&EXTENDED_KEYMASK )
   132 						wParam = VK_RMENU;
   133 					else
   134 						wParam = VK_LMENU;
   135 					break;
   136 			}
   137 #ifdef NO_GETKEYBOARDSTATE
   138 			/* this is the workaround for the missing ToAscii() and ToUnicode() in CE (not necessary at KEYUP!) */
   139 			if ( SDL_TranslateUNICODE ) {
   140 				MSG m;
   141 
   142 				m.hwnd = hwnd;
   143 				m.message = msg;
   144 				m.wParam = wParam;
   145 				m.lParam = lParam;
   146 				m.time = 0;
   147 				if ( TranslateMessage(&m) && PeekMessage(&m, hwnd, 0, WM_USER, PM_NOREMOVE) && (m.message == WM_CHAR) ) {
   148 					GetMessage(&m, hwnd, 0, WM_USER);
   149 			    		wParam = m.wParam;
   150 				}
   151 			}
   152 #endif /* NO_GETKEYBOARDSTATE */
   153 			posted = SDL_PrivateKeyboard(SDL_PRESSED,
   154 				TranslateKey(wParam,HIWORD(lParam),&keysym,1));
   155 		}
   156 		return(0);
   157 
   158 		case WM_SYSKEYUP:
   159 		case WM_KEYUP: {
   160 			SDL_keysym keysym;
   161 
   162 #ifdef _WIN32_WCE
   163 			// Drop GAPI artefacts
   164 			if (wParam == 0x84 || wParam == 0x5B)
   165 				return 0;
   166 
   167 			// Rotate key if necessary
   168 			if (this->hidden->orientation != SDL_ORIENTATION_UP)
   169 				wParam = rotateKey(wParam, this->hidden->orientation);	
   170 #endif
   171 
   172 			switch (wParam) {
   173 				case VK_CONTROL:
   174 					if ( lParam&EXTENDED_KEYMASK )
   175 						wParam = VK_RCONTROL;
   176 					else
   177 						wParam = VK_LCONTROL;
   178 					break;
   179 				case VK_SHIFT:
   180 					/* EXTENDED trick doesn't work here */
   181 					{
   182 					Uint8 *state = SDL_GetKeyState(NULL);
   183 					if (state[SDLK_LSHIFT] == SDL_PRESSED && !(GetKeyState(VK_LSHIFT) & 0x8000)) {
   184 						wParam = VK_LSHIFT;
   185 					} else if (state[SDLK_RSHIFT] == SDL_PRESSED && !(GetKeyState(VK_RSHIFT) & 0x8000)) {
   186 						wParam = VK_RSHIFT;
   187 					} else {
   188 						/* Probably a key repeat */
   189 						return(0);
   190 					}
   191 					}
   192 					break;
   193 				case VK_MENU:
   194 					if ( lParam&EXTENDED_KEYMASK )
   195 						wParam = VK_RMENU;
   196 					else
   197 						wParam = VK_LMENU;
   198 					break;
   199 			}
   200 			posted = SDL_PrivateKeyboard(SDL_RELEASED,
   201 				TranslateKey(wParam,HIWORD(lParam),&keysym,0));
   202 		}
   203 		return(0);
   204 
   205 #if defined(SC_SCREENSAVE) && defined(SC_MONITORPOWER)
   206 		case WM_SYSCOMMAND: {
   207 			if ((wParam&0xFFF0)==SC_SCREENSAVE ||
   208 				(wParam&0xFFF0)==SC_MONITORPOWER)
   209 					return(0);
   210 		}
   211 		/* Fall through to default processing */
   212 #endif /* SC_SCREENSAVE && SC_MONITORPOWER */
   213 
   214 		default: {
   215 			/* Only post the event if we're watching for it */
   216 			if ( SDL_ProcessEvents[SDL_SYSWMEVENT] == SDL_ENABLE ) {
   217 			        SDL_SysWMmsg wmmsg;
   218 
   219 				SDL_VERSION(&wmmsg.version);
   220 				wmmsg.hwnd = hwnd;
   221 				wmmsg.msg = msg;
   222 				wmmsg.wParam = wParam;
   223 				wmmsg.lParam = lParam;
   224 				posted = SDL_PrivateSysWMEvent(&wmmsg);
   225 
   226 			/* DJM: If the user isn't watching for private
   227 				messages in her SDL event loop, then pass it
   228 				along to any win32 specific window proc.
   229 			 */
   230 			} else if (userWindowProc) {
   231 				return CallWindowProc(userWindowProc, hwnd, msg, wParam, lParam);
   232 			}
   233 		}
   234 		break;
   235 	}
   236 	return(DefWindowProc(hwnd, msg, wParam, lParam));
   237 }
   238 
   239 void DIB_PumpEvents(_THIS)
   240 {
   241 	MSG msg;
   242 
   243 	while ( PeekMessage(&msg, NULL, 0, 0, PM_NOREMOVE) ) {
   244 		if ( GetMessage(&msg, NULL, 0, 0) > 0 ) {
   245 			DispatchMessage(&msg);
   246 		}
   247 	}
   248 }
   249 
   250 void DIB_InitOSKeymap(_THIS)
   251 {
   252 	int i;
   253 
   254 	/* Map the VK keysyms */
   255 	for ( i=0; i<SDL_arraysize(VK_keymap); ++i )
   256 		VK_keymap[i] = SDLK_UNKNOWN;
   257 
   258 	VK_keymap[VK_BACK] = SDLK_BACKSPACE;
   259 	VK_keymap[VK_TAB] = SDLK_TAB;
   260 	VK_keymap[VK_CLEAR] = SDLK_CLEAR;
   261 	VK_keymap[VK_RETURN] = SDLK_RETURN;
   262 	VK_keymap[VK_PAUSE] = SDLK_PAUSE;
   263 	VK_keymap[VK_ESCAPE] = SDLK_ESCAPE;
   264 	VK_keymap[VK_SPACE] = SDLK_SPACE;
   265 	VK_keymap[VK_APOSTROPHE] = SDLK_QUOTE;
   266 	VK_keymap[VK_COMMA] = SDLK_COMMA;
   267 	VK_keymap[VK_MINUS] = SDLK_MINUS;
   268 	VK_keymap[VK_PERIOD] = SDLK_PERIOD;
   269 	VK_keymap[VK_SLASH] = SDLK_SLASH;
   270 	VK_keymap[VK_0] = SDLK_0;
   271 	VK_keymap[VK_1] = SDLK_1;
   272 	VK_keymap[VK_2] = SDLK_2;
   273 	VK_keymap[VK_3] = SDLK_3;
   274 	VK_keymap[VK_4] = SDLK_4;
   275 	VK_keymap[VK_5] = SDLK_5;
   276 	VK_keymap[VK_6] = SDLK_6;
   277 	VK_keymap[VK_7] = SDLK_7;
   278 	VK_keymap[VK_8] = SDLK_8;
   279 	VK_keymap[VK_9] = SDLK_9;
   280 	VK_keymap[VK_SEMICOLON] = SDLK_SEMICOLON;
   281 	VK_keymap[VK_EQUALS] = SDLK_EQUALS;
   282 	VK_keymap[VK_LBRACKET] = SDLK_LEFTBRACKET;
   283 	VK_keymap[VK_BACKSLASH] = SDLK_BACKSLASH;
   284 	VK_keymap[VK_OEM_102] = SDLK_LESS;
   285 	VK_keymap[VK_RBRACKET] = SDLK_RIGHTBRACKET;
   286 	VK_keymap[VK_GRAVE] = SDLK_BACKQUOTE;
   287 	VK_keymap[VK_BACKTICK] = SDLK_BACKQUOTE;
   288 	VK_keymap[VK_A] = SDLK_a;
   289 	VK_keymap[VK_B] = SDLK_b;
   290 	VK_keymap[VK_C] = SDLK_c;
   291 	VK_keymap[VK_D] = SDLK_d;
   292 	VK_keymap[VK_E] = SDLK_e;
   293 	VK_keymap[VK_F] = SDLK_f;
   294 	VK_keymap[VK_G] = SDLK_g;
   295 	VK_keymap[VK_H] = SDLK_h;
   296 	VK_keymap[VK_I] = SDLK_i;
   297 	VK_keymap[VK_J] = SDLK_j;
   298 	VK_keymap[VK_K] = SDLK_k;
   299 	VK_keymap[VK_L] = SDLK_l;
   300 	VK_keymap[VK_M] = SDLK_m;
   301 	VK_keymap[VK_N] = SDLK_n;
   302 	VK_keymap[VK_O] = SDLK_o;
   303 	VK_keymap[VK_P] = SDLK_p;
   304 	VK_keymap[VK_Q] = SDLK_q;
   305 	VK_keymap[VK_R] = SDLK_r;
   306 	VK_keymap[VK_S] = SDLK_s;
   307 	VK_keymap[VK_T] = SDLK_t;
   308 	VK_keymap[VK_U] = SDLK_u;
   309 	VK_keymap[VK_V] = SDLK_v;
   310 	VK_keymap[VK_W] = SDLK_w;
   311 	VK_keymap[VK_X] = SDLK_x;
   312 	VK_keymap[VK_Y] = SDLK_y;
   313 	VK_keymap[VK_Z] = SDLK_z;
   314 	VK_keymap[VK_DELETE] = SDLK_DELETE;
   315 
   316 	VK_keymap[VK_NUMPAD0] = SDLK_KP0;
   317 	VK_keymap[VK_NUMPAD1] = SDLK_KP1;
   318 	VK_keymap[VK_NUMPAD2] = SDLK_KP2;
   319 	VK_keymap[VK_NUMPAD3] = SDLK_KP3;
   320 	VK_keymap[VK_NUMPAD4] = SDLK_KP4;
   321 	VK_keymap[VK_NUMPAD5] = SDLK_KP5;
   322 	VK_keymap[VK_NUMPAD6] = SDLK_KP6;
   323 	VK_keymap[VK_NUMPAD7] = SDLK_KP7;
   324 	VK_keymap[VK_NUMPAD8] = SDLK_KP8;
   325 	VK_keymap[VK_NUMPAD9] = SDLK_KP9;
   326 	VK_keymap[VK_DECIMAL] = SDLK_KP_PERIOD;
   327 	VK_keymap[VK_DIVIDE] = SDLK_KP_DIVIDE;
   328 	VK_keymap[VK_MULTIPLY] = SDLK_KP_MULTIPLY;
   329 	VK_keymap[VK_SUBTRACT] = SDLK_KP_MINUS;
   330 	VK_keymap[VK_ADD] = SDLK_KP_PLUS;
   331 
   332 	VK_keymap[VK_UP] = SDLK_UP;
   333 	VK_keymap[VK_DOWN] = SDLK_DOWN;
   334 	VK_keymap[VK_RIGHT] = SDLK_RIGHT;
   335 	VK_keymap[VK_LEFT] = SDLK_LEFT;
   336 	VK_keymap[VK_INSERT] = SDLK_INSERT;
   337 	VK_keymap[VK_HOME] = SDLK_HOME;
   338 	VK_keymap[VK_END] = SDLK_END;
   339 	VK_keymap[VK_PRIOR] = SDLK_PAGEUP;
   340 	VK_keymap[VK_NEXT] = SDLK_PAGEDOWN;
   341 
   342 	VK_keymap[VK_F1] = SDLK_F1;
   343 	VK_keymap[VK_F2] = SDLK_F2;
   344 	VK_keymap[VK_F3] = SDLK_F3;
   345 	VK_keymap[VK_F4] = SDLK_F4;
   346 	VK_keymap[VK_F5] = SDLK_F5;
   347 	VK_keymap[VK_F6] = SDLK_F6;
   348 	VK_keymap[VK_F7] = SDLK_F7;
   349 	VK_keymap[VK_F8] = SDLK_F8;
   350 	VK_keymap[VK_F9] = SDLK_F9;
   351 	VK_keymap[VK_F10] = SDLK_F10;
   352 	VK_keymap[VK_F11] = SDLK_F11;
   353 	VK_keymap[VK_F12] = SDLK_F12;
   354 	VK_keymap[VK_F13] = SDLK_F13;
   355 	VK_keymap[VK_F14] = SDLK_F14;
   356 	VK_keymap[VK_F15] = SDLK_F15;
   357 
   358 	VK_keymap[VK_NUMLOCK] = SDLK_NUMLOCK;
   359 	VK_keymap[VK_CAPITAL] = SDLK_CAPSLOCK;
   360 	VK_keymap[VK_SCROLL] = SDLK_SCROLLOCK;
   361 	VK_keymap[VK_RSHIFT] = SDLK_RSHIFT;
   362 	VK_keymap[VK_LSHIFT] = SDLK_LSHIFT;
   363 	VK_keymap[VK_RCONTROL] = SDLK_RCTRL;
   364 	VK_keymap[VK_LCONTROL] = SDLK_LCTRL;
   365 	VK_keymap[VK_RMENU] = SDLK_RALT;
   366 	VK_keymap[VK_LMENU] = SDLK_LALT;
   367 	VK_keymap[VK_RWIN] = SDLK_RSUPER;
   368 	VK_keymap[VK_LWIN] = SDLK_LSUPER;
   369 
   370 	VK_keymap[VK_HELP] = SDLK_HELP;
   371 #ifdef VK_PRINT
   372 	VK_keymap[VK_PRINT] = SDLK_PRINT;
   373 #endif
   374 	VK_keymap[VK_SNAPSHOT] = SDLK_PRINT;
   375 	VK_keymap[VK_CANCEL] = SDLK_BREAK;
   376 	VK_keymap[VK_APPS] = SDLK_MENU;
   377 }
   378 
   379 static SDL_keysym *TranslateKey(UINT vkey, UINT scancode, SDL_keysym *keysym, int pressed)
   380 {
   381 	/* Set the keysym information */
   382 	keysym->scancode = (unsigned char) scancode;
   383 	keysym->sym = VK_keymap[vkey];
   384 	keysym->mod = KMOD_NONE;
   385 	keysym->unicode = 0;
   386 	if ( pressed && SDL_TranslateUNICODE ) {
   387 #ifdef NO_GETKEYBOARDSTATE
   388 		/* Uh oh, better hope the vkey is close enough.. */
   389 		keysym->unicode = vkey;
   390 #else
   391 		BYTE	keystate[256];
   392 		Uint16	wchars[2];
   393 
   394 		GetKeyboardState(keystate);
   395 		if (SDL_ToUnicode(vkey, scancode, keystate, wchars, sizeof(wchars)/sizeof(wchars[0]), 0) == 1)
   396 		{
   397 			keysym->unicode = wchars[0];
   398 		}
   399 #endif /* NO_GETKEYBOARDSTATE */
   400 	}
   401 	return(keysym);
   402 }
   403 
   404 int DIB_CreateWindow(_THIS)
   405 {
   406 	char *windowid = SDL_getenv("SDL_WINDOWID");
   407 
   408 	SDL_RegisterApp(NULL, 0, 0);
   409 
   410 	SDL_windowid = (windowid != NULL);
   411 	if ( SDL_windowid ) {
   412 #if defined(_WIN32_WCE) && (_WIN32_WCE < 300)
   413 		/* wince 2.1 does not have strtol */
   414 		wchar_t *windowid_t = SDL_malloc((SDL_strlen(windowid) + 1) * sizeof(wchar_t));
   415 		MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, windowid, -1, windowid_t, SDL_strlen(windowid) + 1);
   416 		SDL_Window = (HWND)wcstol(windowid_t, NULL, 0);
   417 		SDL_free(windowid_t);
   418 #else
   419 		SDL_Window = (HWND)SDL_strtoull(windowid, NULL, 0);
   420 #endif
   421 		if ( SDL_Window == NULL ) {
   422 			SDL_SetError("Couldn't get user specified window");
   423 			return(-1);
   424 		}
   425 
   426 		/* DJM: we want all event's for the user specified
   427 			window to be handled by SDL.
   428 		 */
   429 		userWindowProc = (WNDPROCTYPE)GetWindowLongPtr(SDL_Window, GWL_WNDPROC);
   430 		SetWindowLongPtr(SDL_Window, GWL_WNDPROC, (LONG_PTR)WinMessage);
   431 	} else {
   432 		SDL_Window = CreateWindow(SDL_Appname, SDL_Appname,
   433                         (WS_OVERLAPPED|WS_CAPTION|WS_SYSMENU|WS_MINIMIZEBOX),
   434                         CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, NULL, NULL, SDL_Instance, NULL);
   435 		if ( SDL_Window == NULL ) {
   436 			SDL_SetError("Couldn't create window");
   437 			return(-1);
   438 		}
   439 		ShowWindow(SDL_Window, SW_HIDE);
   440 	}
   441 	return(0);
   442 }
   443 
   444 void DIB_DestroyWindow(_THIS)
   445 {
   446 	if ( SDL_windowid ) {
   447 		SetWindowLongPtr(SDL_Window, GWL_WNDPROC, (LONG_PTR)userWindowProc);
   448 	} else {
   449 		DestroyWindow(SDL_Window);
   450 	}
   451 	SDL_UnregisterApp();
   452 }