Home | History | Annotate | Download | only in wincommon
      1 /*
      2     SDL - Simple DirectMedia Layer
      3     Copyright (C) 1997-2012 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 (at) libsdl.org
     21 */
     22 #include "SDL_config.h"
     23 
     24 #define WIN32_LEAN_AND_MEAN
     25 #include <windows.h>
     26 
     27 #include "SDL_mouse.h"
     28 #include "../../events/SDL_events_c.h"
     29 #include "../SDL_cursor_c.h"
     30 #include "SDL_sysmouse_c.h"
     31 #include "SDL_lowvideo.h"
     32 
     33 #ifdef _WIN32_WCE
     34 #define USE_STATIC_CURSOR
     35 #endif
     36 
     37 HCURSOR	SDL_hcursor = NULL;		/* Exported for SDL_eventloop.c */
     38 
     39 /* The implementation dependent data for the window manager cursor */
     40 /* For some reason when creating a windows cursor, the ands and xors memory
     41    is not copied, so we need to keep track of it and free it when we are done
     42    with the cursor.  If we free the memory prematurely, the app crashes. :-}
     43 */
     44 struct WMcursor {
     45 	HCURSOR curs;
     46 #ifndef USE_STATIC_CURSOR
     47 	Uint8 *ands;
     48 	Uint8 *xors;
     49 #endif
     50 };
     51 
     52 /* Convert bits to padded bytes */
     53 #define PAD_BITS(bits)	((bits+7)/8)
     54 
     55 #ifdef CURSOR_DEBUG
     56 static void PrintBITMAP(FILE *out, char *bits, int w, int h)
     57 {
     58 	int i;
     59 	unsigned char ch;
     60 
     61 	while ( h-- > 0 ) {
     62 		for ( i=0; i<w; ++i ) {
     63 			if ( (i%8) == 0 )
     64 				ch = *bits++;
     65 			if ( ch&0x80 )
     66 				fprintf(out, "X");
     67 			else
     68 				fprintf(out, " ");
     69 			ch <<= 1;
     70 		}
     71 		fprintf(out, "\n");
     72 	}
     73 }
     74 #endif
     75 
     76 #ifndef USE_STATIC_CURSOR
     77 /* Local functions to convert the SDL cursor mask into Windows format */
     78 static void memnot(Uint8 *dst, Uint8 *src, int len)
     79 {
     80 	while ( len-- > 0 )
     81 		*dst++ = ~*src++;
     82 }
     83 static void memxor(Uint8 *dst, Uint8 *src1, Uint8 *src2, int len)
     84 {
     85 	while ( len-- > 0 )
     86 		*dst++ = (*src1++)^(*src2++);
     87 }
     88 #endif /* !USE_STATIC_CURSOR */
     89 
     90 void WIN_FreeWMCursor(_THIS, WMcursor *cursor)
     91 {
     92 #ifndef USE_STATIC_CURSOR
     93 	if ( cursor->curs == GetCursor() )
     94 		SetCursor(NULL);
     95 	if ( cursor->curs != NULL )
     96 		DestroyCursor(cursor->curs);
     97 	if ( cursor->ands != NULL )
     98 		SDL_free(cursor->ands);
     99 	if ( cursor->xors != NULL )
    100 		SDL_free(cursor->xors);
    101 #endif /* !USE_STATIC_CURSOR */
    102 	SDL_free(cursor);
    103 }
    104 
    105 WMcursor *WIN_CreateWMCursor(_THIS,
    106 		Uint8 *data, Uint8 *mask, int w, int h, int hot_x, int hot_y)
    107 {
    108 #ifdef USE_STATIC_CURSOR
    109 	WMcursor *cursor;
    110 
    111 	/* Allocate the cursor */
    112 	cursor = (WMcursor *)SDL_malloc(sizeof(*cursor));
    113 	if ( cursor ) {
    114 		cursor->curs = LoadCursor(NULL, IDC_ARROW);
    115 	}
    116 	return(cursor);
    117 #else
    118 	WMcursor *cursor;
    119 	int allowed_x;
    120 	int allowed_y;
    121 	int run, pad, i;
    122 	Uint8 *aptr, *xptr;
    123 
    124 	/* Check to make sure the cursor size is okay */
    125 	allowed_x = GetSystemMetrics(SM_CXCURSOR);
    126 	allowed_y = GetSystemMetrics(SM_CYCURSOR);
    127 	if ( (w > allowed_x) || (h > allowed_y) ) {
    128 		SDL_SetError("Only cursors of dimension (%dx%d) are allowed",
    129 							allowed_x, allowed_y);
    130 		return(NULL);
    131 	}
    132 
    133 	/* Allocate the cursor */
    134 	cursor = (WMcursor *)SDL_malloc(sizeof(*cursor));
    135 	if ( cursor == NULL ) {
    136 		SDL_SetError("Out of memory");
    137 		return(NULL);
    138 	}
    139 	cursor->curs = NULL;
    140 	cursor->ands = NULL;
    141 	cursor->xors = NULL;
    142 
    143 	/* Pad out to the normal cursor size */
    144 	run = PAD_BITS(w);
    145 	pad = PAD_BITS(allowed_x)-run;
    146 	aptr = cursor->ands = (Uint8 *)SDL_malloc((run+pad)*allowed_y);
    147 	xptr = cursor->xors = (Uint8 *)SDL_malloc((run+pad)*allowed_y);
    148 	if ( (aptr == NULL) || (xptr == NULL) ) {
    149 		WIN_FreeWMCursor(NULL, cursor);
    150 		SDL_OutOfMemory();
    151 		return(NULL);
    152 	}
    153 	for ( i=0; i<h; ++i ) {
    154 		memxor(xptr, data, mask, run);
    155 		xptr += run;
    156 		data += run;
    157 		memnot(aptr, mask, run);
    158 		mask += run;
    159 		aptr += run;
    160 		SDL_memset(xptr,  0, pad);
    161 		xptr += pad;
    162 		SDL_memset(aptr, ~0, pad);
    163 		aptr += pad;
    164 	}
    165 	pad += run;
    166 	for ( ; i<allowed_y; ++i ) {
    167 		SDL_memset(xptr,  0, pad);
    168 		xptr += pad;
    169 		SDL_memset(aptr, ~0, pad);
    170 		aptr += pad;
    171 	}
    172 
    173 	/* Create the cursor */
    174 	cursor->curs = CreateCursor(
    175 			(HINSTANCE)GetWindowLongPtr(SDL_Window, GWLP_HINSTANCE),
    176 					hot_x, hot_y, allowed_x, allowed_y,
    177 						cursor->ands, cursor->xors);
    178 	if ( cursor->curs == NULL ) {
    179 		WIN_FreeWMCursor(NULL, cursor);
    180 		SDL_SetError("Windows couldn't create the requested cursor");
    181 		return(NULL);
    182 	}
    183 	return(cursor);
    184 #endif /* USE_STATIC_CURSOR */
    185 }
    186 
    187 int WIN_ShowWMCursor(_THIS, WMcursor *cursor)
    188 {
    189 	POINT mouse_pos;
    190 
    191 	if ( !this->screen ) {
    192 		return(0);
    193 	}
    194 
    195 	/* Set the window cursor to our cursor, if applicable */
    196 	if ( cursor != NULL ) {
    197 		SDL_hcursor = cursor->curs;
    198 	} else {
    199 		SDL_hcursor = NULL;
    200 	}
    201 	GetCursorPos(&mouse_pos);
    202 	if ( PtInRect(&SDL_bounds, mouse_pos) ) {
    203 		SetCursor(SDL_hcursor);
    204 	}
    205 	return(1);
    206 }
    207 
    208 void WIN_WarpWMCursor(_THIS, Uint16 x, Uint16 y)
    209 {
    210 	if ( mouse_relative) {
    211 		/*	RJR: March 28, 2000
    212 			leave physical cursor at center of screen if
    213 			mouse hidden and grabbed */
    214 		SDL_PrivateMouseMotion(0, 0, x, y);
    215 	} else {
    216 		POINT pt;
    217 
    218 		/* With DirectInput the position doesn't follow
    219 		 * the cursor, so it is set manually */
    220 		if ( DINPUT() ) {
    221 			SDL_PrivateMouseMotion(0, 0, x, y);
    222 		}
    223 
    224 		pt.x = x;
    225 		pt.y = y;
    226 		ClientToScreen(SDL_Window, &pt);
    227 		SetCursorPos(pt.x, pt.y);
    228 	}
    229 }
    230 
    231 /* Update the current mouse state and position */
    232 void WIN_UpdateMouse(_THIS)
    233 {
    234 	POINT pt;
    235 
    236 	/* Always unset SDL_APPMOUSEFOCUS to give the WM_MOUSEMOVE event
    237 	 * handler a chance to install a TRACKMOUSEEVENT */
    238 	SDL_PrivateAppActive(0, SDL_APPMOUSEFOCUS);
    239 
    240 	GetCursorPos(&pt);
    241 	ScreenToClient(SDL_Window, &pt);
    242 	SDL_PrivateMouseMotion(0,0, (Sint16)pt.x, (Sint16)pt.y);
    243 }
    244 
    245 /* Check to see if we need to enter or leave mouse relative mode */
    246 void WIN_CheckMouseMode(_THIS)
    247 {
    248 #ifndef _WIN32_WCE
    249         /* If the mouse is hidden and input is grabbed, we use relative mode */
    250         if ( !(SDL_cursorstate & CURSOR_VISIBLE) &&
    251              (this->input_grab != SDL_GRAB_OFF) ) {
    252                 mouse_relative = 1;
    253         } else {
    254                 mouse_relative = 0;
    255         }
    256 #else
    257 		mouse_relative =  0;
    258 #endif
    259 }
    260