src/video/SDL_cursor.c
author Sam Lantinga <slouken@lokigames.com>
Tue, 19 Jun 2001 21:07:12 +0000
changeset 77 1e7e61b9b0f9
parent 1 cf2af46e9e2a
child 113 e21ac1dd30f1
permissions -rw-r--r--
Don't crash if freeing a cursor after quit...
slouken@0
     1
/*
slouken@0
     2
    SDL - Simple DirectMedia Layer
slouken@0
     3
    Copyright (C) 1997, 1998, 1999, 2000, 2001  Sam Lantinga
slouken@0
     4
slouken@0
     5
    This library is free software; you can redistribute it and/or
slouken@0
     6
    modify it under the terms of the GNU Library General Public
slouken@0
     7
    License as published by the Free Software Foundation; either
slouken@0
     8
    version 2 of the License, or (at your option) any later version.
slouken@0
     9
slouken@0
    10
    This library is distributed in the hope that it will be useful,
slouken@0
    11
    but WITHOUT ANY WARRANTY; without even the implied warranty of
slouken@0
    12
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
slouken@0
    13
    Library General Public License for more details.
slouken@0
    14
slouken@0
    15
    You should have received a copy of the GNU Library General Public
slouken@0
    16
    License along with this library; if not, write to the Free
slouken@0
    17
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
slouken@0
    18
slouken@0
    19
    Sam Lantinga
slouken@0
    20
    slouken@devolution.com
slouken@0
    21
*/
slouken@0
    22
slouken@0
    23
#ifdef SAVE_RCSID
slouken@0
    24
static char rcsid =
slouken@0
    25
 "@(#) $Id$";
slouken@0
    26
#endif
slouken@0
    27
slouken@0
    28
/* General cursor handling code for SDL */
slouken@0
    29
slouken@0
    30
#include <stdio.h>
slouken@0
    31
#include <stdlib.h>
slouken@0
    32
#include <string.h>
slouken@0
    33
slouken@0
    34
#include "SDL_mutex.h"
slouken@0
    35
#include "SDL_error.h"
slouken@0
    36
#include "SDL_video.h"
slouken@0
    37
#include "SDL_mouse.h"
slouken@0
    38
#include "SDL_blit.h"
slouken@0
    39
#include "SDL_events_c.h"
slouken@0
    40
#include "SDL_sysvideo.h"
slouken@0
    41
#include "SDL_sysevents.h"
slouken@0
    42
#include "SDL_cursor_c.h"
slouken@0
    43
#include "SDL_pixels_c.h"
slouken@0
    44
#include "default_cursor.h"
slouken@0
    45
slouken@0
    46
/* These are static for our cursor handling code */
slouken@0
    47
volatile int SDL_cursorstate = CURSOR_VISIBLE;
slouken@0
    48
SDL_Cursor *SDL_cursor = NULL;
slouken@0
    49
static SDL_Cursor *SDL_defcursor = NULL;
slouken@0
    50
SDL_mutex *SDL_cursorlock = NULL;
slouken@0
    51
slouken@0
    52
/* Public functions */
slouken@0
    53
void SDL_CursorQuit(void)
slouken@0
    54
{
slouken@0
    55
	if ( SDL_cursor != NULL ) {
slouken@0
    56
		SDL_Cursor *cursor;
slouken@0
    57
slouken@0
    58
		SDL_cursorstate &= ~CURSOR_VISIBLE;
slouken@0
    59
		if ( SDL_cursor != SDL_defcursor ) {
slouken@0
    60
			SDL_FreeCursor(SDL_cursor);
slouken@0
    61
		}
slouken@0
    62
		SDL_cursor = NULL;
slouken@0
    63
		if ( SDL_defcursor != NULL ) {
slouken@0
    64
			cursor = SDL_defcursor;
slouken@0
    65
			SDL_defcursor = NULL;
slouken@0
    66
			SDL_FreeCursor(cursor);
slouken@0
    67
		}
slouken@0
    68
	}
slouken@0
    69
	if ( SDL_cursorlock != NULL ) {
slouken@0
    70
		SDL_DestroyMutex(SDL_cursorlock);
slouken@0
    71
		SDL_cursorlock = NULL;
slouken@0
    72
	}
slouken@0
    73
}
slouken@0
    74
int SDL_CursorInit(Uint32 multithreaded)
slouken@0
    75
{
slouken@0
    76
	/* We don't have mouse focus, and the cursor isn't drawn yet */
slouken@0
    77
	SDL_cursorstate = CURSOR_VISIBLE;
slouken@0
    78
slouken@0
    79
	/* Create the default cursor */
slouken@0
    80
	if ( SDL_defcursor == NULL ) {
slouken@0
    81
		SDL_defcursor = SDL_CreateCursor(default_cdata, default_cmask,
slouken@0
    82
					DEFAULT_CWIDTH, DEFAULT_CHEIGHT,
slouken@0
    83
						DEFAULT_CHOTX, DEFAULT_CHOTY);
slouken@0
    84
		SDL_SetCursor(SDL_defcursor);
slouken@0
    85
	}
slouken@0
    86
slouken@0
    87
	/* Create a lock if necessary */
slouken@0
    88
	if ( multithreaded ) {
slouken@0
    89
		SDL_cursorlock = SDL_CreateMutex();
slouken@0
    90
	}
slouken@0
    91
slouken@0
    92
	/* That's it! */
slouken@0
    93
	return(0);
slouken@0
    94
}
slouken@0
    95
slouken@0
    96
/* Multi-thread support for cursors */
slouken@0
    97
#ifndef SDL_LockCursor
slouken@0
    98
void SDL_LockCursor(void)
slouken@0
    99
{
slouken@0
   100
	if ( SDL_cursorlock ) {
slouken@0
   101
		SDL_mutexP(SDL_cursorlock);
slouken@0
   102
	}
slouken@0
   103
}
slouken@0
   104
#endif
slouken@0
   105
#ifndef SDL_UnlockCursor
slouken@0
   106
void SDL_UnlockCursor(void)
slouken@0
   107
{
slouken@0
   108
	if ( SDL_cursorlock ) {
slouken@0
   109
		SDL_mutexV(SDL_cursorlock);
slouken@0
   110
	}
slouken@0
   111
}
slouken@0
   112
#endif
slouken@0
   113
slouken@0
   114
/* Software cursor drawing support */
slouken@0
   115
SDL_Cursor * SDL_CreateCursor (Uint8 *data, Uint8 *mask, 
slouken@0
   116
					int w, int h, int hot_x, int hot_y)
slouken@0
   117
{
slouken@0
   118
	SDL_VideoDevice *video = current_video;
slouken@0
   119
	int savelen;
slouken@0
   120
	int i;
slouken@0
   121
	SDL_Cursor *cursor;
slouken@0
   122
slouken@0
   123
	/* Make sure the width is a multiple of 8 */
slouken@0
   124
	w = ((w+7)&~7);
slouken@0
   125
slouken@0
   126
	/* Sanity check the hot spot */
slouken@0
   127
	if ( (hot_x < 0) || (hot_y < 0) || (hot_x >= w) || (hot_y >= h) ) {
slouken@0
   128
		SDL_SetError("Cursor hot spot doesn't lie within cursor");
slouken@0
   129
		return(NULL);
slouken@0
   130
	}
slouken@0
   131
slouken@0
   132
	/* Allocate memory for the cursor */
slouken@0
   133
	cursor = (SDL_Cursor *)malloc(sizeof *cursor);
slouken@0
   134
	if ( cursor == NULL ) {
slouken@0
   135
		SDL_OutOfMemory();
slouken@0
   136
		return(NULL);
slouken@0
   137
	}
slouken@0
   138
	savelen = (w*4)*h;
slouken@0
   139
	cursor->area.x = 0;
slouken@0
   140
	cursor->area.y = 0;
slouken@0
   141
	cursor->area.w = w;
slouken@0
   142
	cursor->area.h = h;
slouken@0
   143
	cursor->hot_x = hot_x;
slouken@0
   144
	cursor->hot_y = hot_y;
slouken@0
   145
	cursor->data = (Uint8 *)malloc((w/8)*h*2);
slouken@0
   146
	cursor->mask = cursor->data+((w/8)*h);
slouken@0
   147
	cursor->save[0] = (Uint8 *)malloc(savelen*2);
slouken@0
   148
	cursor->save[1] = cursor->save[0] + savelen;
slouken@0
   149
	cursor->wm_cursor = NULL;
slouken@0
   150
	if ( ! cursor->data || ! cursor->save[0] ) {
slouken@0
   151
		SDL_FreeCursor(cursor);
slouken@0
   152
		SDL_OutOfMemory();
slouken@0
   153
		return(NULL);
slouken@0
   154
	}
slouken@0
   155
	for ( i=((w/8)*h)-1; i>=0; --i ) {
slouken@0
   156
		cursor->data[i] = data[i];
slouken@0
   157
		cursor->mask[i] = mask[i] | data[i];
slouken@0
   158
	}
slouken@0
   159
	memset(cursor->save[0], 0, savelen*2);
slouken@0
   160
slouken@0
   161
	/* If the window manager gives us a good cursor, we're done! */
slouken@0
   162
	if ( video->CreateWMCursor ) {
slouken@0
   163
		cursor->wm_cursor = video->CreateWMCursor(video, data, mask,
slouken@0
   164
							w, h, hot_x, hot_y);
slouken@0
   165
	} else {
slouken@0
   166
		cursor->wm_cursor = NULL;
slouken@0
   167
	}
slouken@0
   168
	return(cursor);
slouken@0
   169
}
slouken@0
   170
slouken@0
   171
/* SDL_SetCursor(NULL) can be used to force the cursor redraw,
slouken@0
   172
   if this is desired for any reason.  This is used when setting
slouken@0
   173
   the video mode and when the SDL window gains the mouse focus.
slouken@0
   174
 */
slouken@0
   175
void SDL_SetCursor (SDL_Cursor *cursor)
slouken@0
   176
{
slouken@0
   177
	SDL_VideoDevice *video = current_video;
slouken@0
   178
	SDL_VideoDevice *this  = current_video;
slouken@0
   179
slouken@0
   180
	/* Make sure that the video subsystem has been initialized */
slouken@0
   181
	if ( ! video ) {
slouken@0
   182
		return;
slouken@0
   183
	}
slouken@0
   184
slouken@0
   185
	/* Prevent the event thread from moving the mouse */
slouken@0
   186
	SDL_LockCursor();
slouken@0
   187
slouken@0
   188
	/* Set the new cursor */
slouken@0
   189
	if ( cursor && (cursor != SDL_cursor) ) {
slouken@0
   190
		/* Erase the current mouse position */
slouken@0
   191
		if ( SHOULD_DRAWCURSOR(SDL_cursorstate) ) {
slouken@0
   192
			SDL_EraseCursor(SDL_VideoSurface);
slouken@0
   193
		} else if ( video->MoveWMCursor ) {
slouken@0
   194
			/* If the video driver is moving the cursor directly,
slouken@0
   195
			   it needs to hide the old cursor before (possibly)
slouken@0
   196
			   showing the new one.  (But don't erase NULL cursor)
slouken@0
   197
			 */
slouken@0
   198
			if ( SDL_cursor ) {
slouken@0
   199
				video->ShowWMCursor(this, NULL);
slouken@0
   200
			}
slouken@0
   201
		}
slouken@0
   202
		SDL_cursor = cursor;
slouken@0
   203
	}
slouken@0
   204
slouken@0
   205
	/* Draw the new mouse cursor */
slouken@0
   206
	if ( SDL_cursor && (SDL_cursorstate&CURSOR_VISIBLE) ) {
slouken@0
   207
		/* Use window manager cursor if possible */
slouken@0
   208
		if ( SDL_cursor->wm_cursor && 
slouken@0
   209
	             video->ShowWMCursor(this, SDL_cursor->wm_cursor) )
slouken@0
   210
			SDL_cursorstate &= ~CURSOR_USINGSW;
slouken@0
   211
		else {
slouken@0
   212
			SDL_cursorstate |= CURSOR_USINGSW;
slouken@0
   213
			if ( video->ShowWMCursor ) {
slouken@0
   214
				video->ShowWMCursor(this, NULL);
slouken@0
   215
			}
slouken@0
   216
			{ int x, y;
slouken@0
   217
				SDL_GetMouseState(&x, &y);
slouken@0
   218
				SDL_cursor->area.x = (x - SDL_cursor->hot_x);
slouken@0
   219
				SDL_cursor->area.y = (y - SDL_cursor->hot_y);
slouken@0
   220
			}
slouken@0
   221
			SDL_DrawCursor(SDL_VideoSurface);
slouken@0
   222
		}
slouken@0
   223
	} else {
slouken@0
   224
		/* Erase window manager mouse (cursor not visible) */
slouken@0
   225
		if ( SDL_cursor && (SDL_cursorstate & CURSOR_USINGSW) ) {
slouken@0
   226
			SDL_EraseCursor(SDL_VideoSurface);
slouken@0
   227
		} else {
slouken@0
   228
			if ( video ) {
slouken@0
   229
				video->ShowWMCursor(this, NULL);
slouken@0
   230
			}
slouken@0
   231
		}
slouken@0
   232
	}
slouken@0
   233
	SDL_UnlockCursor();
slouken@0
   234
}
slouken@0
   235
slouken@0
   236
SDL_Cursor * SDL_GetCursor (void)
slouken@0
   237
{
slouken@0
   238
	return(SDL_cursor);
slouken@0
   239
}
slouken@0
   240
slouken@0
   241
void SDL_FreeCursor (SDL_Cursor *cursor)
slouken@0
   242
{
slouken@0
   243
	if ( cursor ) {
slouken@0
   244
		if ( cursor == SDL_cursor ) {
slouken@0
   245
			SDL_SetCursor(SDL_defcursor);
slouken@0
   246
		}
slouken@0
   247
		if ( cursor != SDL_defcursor ) {
slouken@77
   248
			SDL_VideoDevice *video = current_video;
slouken@77
   249
			SDL_VideoDevice *this  = current_video;
slouken@77
   250
slouken@0
   251
			if ( cursor->data ) {
slouken@0
   252
				free(cursor->data);
slouken@0
   253
			}
slouken@0
   254
			if ( cursor->save[0] ) {
slouken@0
   255
				free(cursor->save[0]);
slouken@0
   256
			}
slouken@77
   257
			if ( video && cursor->wm_cursor ) {
slouken@0
   258
				video->FreeWMCursor(this, cursor->wm_cursor);
slouken@0
   259
			}
slouken@0
   260
			free(cursor);
slouken@0
   261
		}
slouken@0
   262
	}
slouken@0
   263
}
slouken@0
   264
slouken@0
   265
int SDL_ShowCursor (int toggle)
slouken@0
   266
{
slouken@0
   267
	int showing;
slouken@0
   268
slouken@0
   269
	showing = (SDL_cursorstate & CURSOR_VISIBLE);
slouken@0
   270
	if ( toggle >= 0 ) {
slouken@0
   271
		SDL_LockCursor();
slouken@0
   272
		if ( toggle ) {
slouken@0
   273
			SDL_cursorstate |= CURSOR_VISIBLE;
slouken@0
   274
		} else {
slouken@0
   275
			SDL_cursorstate &= ~CURSOR_VISIBLE;
slouken@0
   276
		}
slouken@0
   277
		SDL_UnlockCursor();
slouken@0
   278
		if ( (SDL_cursorstate & CURSOR_VISIBLE) != showing ) {
slouken@0
   279
			SDL_VideoDevice *video = current_video;
slouken@0
   280
			SDL_VideoDevice *this  = current_video;
slouken@0
   281
slouken@0
   282
			SDL_SetCursor(NULL);
slouken@0
   283
			if ( video && video->CheckMouseMode ) {
slouken@0
   284
				video->CheckMouseMode(this);
slouken@0
   285
			}
slouken@0
   286
		}
slouken@0
   287
	} else {
slouken@0
   288
		/* Query current state */ ;
slouken@0
   289
	}
slouken@0
   290
	return(showing ? 1 : 0);
slouken@0
   291
}
slouken@0
   292
slouken@0
   293
void SDL_WarpMouse (Uint16 x, Uint16 y)
slouken@0
   294
{
slouken@0
   295
	SDL_VideoDevice *video = current_video;
slouken@0
   296
	SDL_VideoDevice *this  = current_video;
slouken@0
   297
slouken@0
   298
	/* This generates a mouse motion event */
slouken@0
   299
	if ( video->WarpWMCursor ) {
slouken@0
   300
		video->WarpWMCursor(this, x, y);
slouken@0
   301
	} else {
slouken@0
   302
		x += (this->screen->offset % this->screen->pitch) /
slouken@0
   303
		      this->screen->format->BytesPerPixel;
slouken@0
   304
		y += (this->screen->offset / this->screen->pitch);
slouken@0
   305
		SDL_PrivateMouseMotion(0, 0, x, y);
slouken@0
   306
	}
slouken@0
   307
}
slouken@0
   308
slouken@0
   309
void SDL_MoveCursor(int x, int y)
slouken@0
   310
{
slouken@0
   311
	SDL_VideoDevice *video = current_video;
slouken@0
   312
slouken@0
   313
	/* Erase and update the current mouse position */
slouken@0
   314
	if ( SHOULD_DRAWCURSOR(SDL_cursorstate) ) {
slouken@0
   315
		/* Erase and redraw mouse cursor in new position */
slouken@0
   316
		SDL_LockCursor();
slouken@0
   317
		SDL_EraseCursor(SDL_VideoSurface);
slouken@0
   318
		SDL_cursor->area.x = (x - SDL_cursor->hot_x);
slouken@0
   319
		SDL_cursor->area.y = (y - SDL_cursor->hot_y);
slouken@0
   320
		SDL_DrawCursor(SDL_VideoSurface);
slouken@0
   321
		SDL_UnlockCursor();
slouken@0
   322
	} else if ( video->MoveWMCursor ) {
slouken@0
   323
		video->MoveWMCursor(video, x, y);
slouken@0
   324
	}
slouken@0
   325
}
slouken@0
   326
slouken@0
   327
/* Keep track of the current cursor colors */
slouken@0
   328
static int palette_changed = 1;
slouken@0
   329
static Uint32 pixels8[2];
slouken@0
   330
slouken@0
   331
void SDL_CursorPaletteChanged(void)
slouken@0
   332
{
slouken@0
   333
	palette_changed = 1;
slouken@0
   334
}
slouken@0
   335
slouken@0
   336
void SDL_MouseRect(SDL_Rect *area)
slouken@0
   337
{
slouken@0
   338
	int clip_diff;
slouken@0
   339
slouken@0
   340
	*area = SDL_cursor->area;
slouken@0
   341
	if ( area->x < 0 ) {
slouken@0
   342
		area->w += area->x;
slouken@0
   343
		area->x = 0;
slouken@0
   344
	}
slouken@0
   345
	if ( area->y < 0 ) {
slouken@0
   346
		area->h += area->y;
slouken@0
   347
		area->y = 0;
slouken@0
   348
	}
slouken@0
   349
	clip_diff = (area->x+area->w)-SDL_VideoSurface->w;
slouken@0
   350
	if ( clip_diff > 0 ) {
slouken@0
   351
		area->w -= clip_diff;
slouken@0
   352
	}
slouken@0
   353
	clip_diff = (area->y+area->h)-SDL_VideoSurface->h;
slouken@0
   354
	if ( clip_diff > 0 ) {
slouken@0
   355
		area->h -= clip_diff;
slouken@0
   356
	}
slouken@0
   357
}
slouken@0
   358
slouken@0
   359
static void SDL_DrawCursorFast(SDL_Surface *screen, SDL_Rect *area)
slouken@0
   360
{
slouken@0
   361
	const Uint32 pixels[2] = { 0xFFFFFFFF, 0x00000000 };
slouken@0
   362
	int i, w, h;
slouken@0
   363
	Uint8 *data, datab;
slouken@0
   364
	Uint8 *mask, maskb;
slouken@0
   365
slouken@0
   366
	data = SDL_cursor->data + area->y * SDL_cursor->area.w/8;
slouken@0
   367
	mask = SDL_cursor->mask + area->y * SDL_cursor->area.w/8;
slouken@0
   368
	switch (screen->format->BytesPerPixel) {
slouken@0
   369
slouken@0
   370
	    case 1: {
slouken@0
   371
		Uint8 *dst;
slouken@0
   372
		int dstskip;
slouken@0
   373
slouken@0
   374
		if ( palette_changed ) {
slouken@0
   375
			pixels8[0] = SDL_MapRGB(screen->format, 255, 255, 255);
slouken@0
   376
			pixels8[1] = SDL_MapRGB(screen->format, 0, 0, 0);
slouken@0
   377
			palette_changed = 0;
slouken@0
   378
		}
slouken@0
   379
		dst = (Uint8 *)screen->pixels +
slouken@0
   380
                       (SDL_cursor->area.y+area->y)*screen->pitch +
slouken@0
   381
                       SDL_cursor->area.x;
slouken@0
   382
		dstskip = screen->pitch-area->w;
slouken@0
   383
slouken@0
   384
		for ( h=area->h; h; h-- ) {
slouken@0
   385
			for ( w=area->w/8; w; w-- ) {
slouken@0
   386
				maskb = *mask++;
slouken@0
   387
				datab = *data++;
slouken@0
   388
				for ( i=0; i<8; ++i ) {
slouken@0
   389
					if ( maskb & 0x80 ) {
slouken@0
   390
						*dst = pixels8[datab>>7];
slouken@0
   391
					}
slouken@0
   392
					maskb <<= 1;
slouken@0
   393
					datab <<= 1;
slouken@0
   394
					dst++;
slouken@0
   395
				}
slouken@0
   396
			}
slouken@0
   397
			dst += dstskip;
slouken@0
   398
		}
slouken@0
   399
	    }
slouken@0
   400
	    break;
slouken@0
   401
slouken@0
   402
	    case 2: {
slouken@0
   403
		Uint16 *dst;
slouken@0
   404
		int dstskip;
slouken@0
   405
slouken@0
   406
		dst = (Uint16 *)screen->pixels +
slouken@0
   407
                       (SDL_cursor->area.y+area->y)*screen->pitch/2 +
slouken@0
   408
                       SDL_cursor->area.x;
slouken@0
   409
		dstskip = (screen->pitch/2)-area->w;
slouken@0
   410
slouken@0
   411
		for ( h=area->h; h; h-- ) {
slouken@0
   412
			for ( w=area->w/8; w; w-- ) {
slouken@0
   413
				maskb = *mask++;
slouken@0
   414
				datab = *data++;
slouken@0
   415
				for ( i=0; i<8; ++i ) {
slouken@0
   416
					if ( maskb & 0x80 ) {
slouken@0
   417
						*dst = pixels[datab>>7];
slouken@0
   418
					}
slouken@0
   419
					maskb <<= 1;
slouken@0
   420
					datab <<= 1;
slouken@0
   421
					dst++;
slouken@0
   422
				}
slouken@0
   423
			}
slouken@0
   424
			dst += dstskip;
slouken@0
   425
		}
slouken@0
   426
	    }
slouken@0
   427
	    break;
slouken@0
   428
slouken@0
   429
	    case 3: {
slouken@0
   430
		Uint8 *dst;
slouken@0
   431
		int dstskip;
slouken@0
   432
slouken@0
   433
		dst = (Uint8 *)screen->pixels +
slouken@0
   434
                       (SDL_cursor->area.y+area->y)*screen->pitch +
slouken@0
   435
                       SDL_cursor->area.x*3;
slouken@0
   436
		dstskip = screen->pitch-area->w*3;
slouken@0
   437
slouken@0
   438
		for ( h=area->h; h; h-- ) {
slouken@0
   439
			for ( w=area->w/8; w; w-- ) {
slouken@0
   440
				maskb = *mask++;
slouken@0
   441
				datab = *data++;
slouken@0
   442
				for ( i=0; i<8; ++i ) {
slouken@0
   443
					if ( maskb & 0x80 ) {
slouken@0
   444
						memset(dst,pixels[datab>>7],3);
slouken@0
   445
					}
slouken@0
   446
					maskb <<= 1;
slouken@0
   447
					datab <<= 1;
slouken@0
   448
					dst += 3;
slouken@0
   449
				}
slouken@0
   450
			}
slouken@0
   451
			dst += dstskip;
slouken@0
   452
		}
slouken@0
   453
	    }
slouken@0
   454
	    break;
slouken@0
   455
slouken@0
   456
	    case 4: {
slouken@0
   457
		Uint32 *dst;
slouken@0
   458
		int dstskip;
slouken@0
   459
slouken@0
   460
		dst = (Uint32 *)screen->pixels +
slouken@0
   461
                       (SDL_cursor->area.y+area->y)*screen->pitch/4 +
slouken@0
   462
                       SDL_cursor->area.x;
slouken@0
   463
		dstskip = (screen->pitch/4)-area->w;
slouken@0
   464
slouken@0
   465
		for ( h=area->h; h; h-- ) {
slouken@0
   466
			for ( w=area->w/8; w; w-- ) {
slouken@0
   467
				maskb = *mask++;
slouken@0
   468
				datab = *data++;
slouken@0
   469
				for ( i=0; i<8; ++i ) {
slouken@0
   470
					if ( maskb & 0x80 ) {
slouken@0
   471
						*dst = pixels[datab>>7];
slouken@0
   472
					}
slouken@0
   473
					maskb <<= 1;
slouken@0
   474
					datab <<= 1;
slouken@0
   475
					dst++;
slouken@0
   476
				}
slouken@0
   477
			}
slouken@0
   478
			dst += dstskip;
slouken@0
   479
		}
slouken@0
   480
	    }
slouken@0
   481
	    break;
slouken@0
   482
	}
slouken@0
   483
}
slouken@0
   484
slouken@0
   485
static void SDL_DrawCursorSlow(SDL_Surface *screen, SDL_Rect *area)
slouken@0
   486
{
slouken@0
   487
	const Uint32 pixels[2] = { 0xFFFFFF, 0x000000 };
slouken@0
   488
	int h;
slouken@0
   489
	int x, minx, maxx;
slouken@0
   490
	Uint8 *data, datab = 0;
slouken@0
   491
	Uint8 *mask, maskb = 0;
slouken@0
   492
	Uint8 *dst;
slouken@0
   493
	int dstbpp, dstskip;
slouken@0
   494
slouken@0
   495
	data = SDL_cursor->data + area->y * SDL_cursor->area.w/8;
slouken@0
   496
	mask = SDL_cursor->mask + area->y * SDL_cursor->area.w/8;
slouken@0
   497
	dstbpp = screen->format->BytesPerPixel;
slouken@0
   498
	dst = (Uint8 *)screen->pixels +
slouken@0
   499
                       (SDL_cursor->area.y+area->y)*screen->pitch +
slouken@0
   500
                       SDL_cursor->area.x*dstbpp;
slouken@0
   501
	dstskip = screen->pitch-SDL_cursor->area.w*dstbpp;
slouken@0
   502
slouken@0
   503
	minx = area->x;
slouken@0
   504
	maxx = area->x+area->w;
slouken@0
   505
	if ( screen->format->BytesPerPixel == 1 ) {
slouken@0
   506
		if ( palette_changed ) {
slouken@0
   507
			pixels8[0] = SDL_MapRGB(screen->format, 255, 255, 255);
slouken@0
   508
			pixels8[1] = SDL_MapRGB(screen->format, 0, 0, 0);
slouken@0
   509
			palette_changed = 0;
slouken@0
   510
		}
slouken@0
   511
		for ( h=area->h; h; h-- ) {
slouken@0
   512
			for ( x=0; x<SDL_cursor->area.w; ++x ) {
slouken@0
   513
				if ( (x%8) == 0 ) {
slouken@0
   514
					maskb = *mask++;
slouken@0
   515
					datab = *data++;
slouken@0
   516
				}
slouken@0
   517
				if ( (x >= minx) && (x < maxx) ) {
slouken@0
   518
					if ( maskb & 0x80 ) {
slouken@0
   519
						memset(dst, pixels8[datab>>7], dstbpp);
slouken@0
   520
					}
slouken@0
   521
				}
slouken@0
   522
				maskb <<= 1;
slouken@0
   523
				datab <<= 1;
slouken@0
   524
				dst += dstbpp;
slouken@0
   525
			}
slouken@0
   526
			dst += dstskip;
slouken@0
   527
		}
slouken@0
   528
	} else {
slouken@0
   529
		for ( h=area->h; h; h-- ) {
slouken@0
   530
			for ( x=0; x<SDL_cursor->area.w; ++x ) {
slouken@0
   531
				if ( (x%8) == 0 ) {
slouken@0
   532
					maskb = *mask++;
slouken@0
   533
					datab = *data++;
slouken@0
   534
				}
slouken@0
   535
				if ( (x >= minx) && (x < maxx) ) {
slouken@0
   536
					if ( maskb & 0x80 ) {
slouken@0
   537
						memset(dst, pixels[datab>>7], dstbpp);
slouken@0
   538
					}
slouken@0
   539
				}
slouken@0
   540
				maskb <<= 1;
slouken@0
   541
				datab <<= 1;
slouken@0
   542
				dst += dstbpp;
slouken@0
   543
			}
slouken@0
   544
			dst += dstskip;
slouken@0
   545
		}
slouken@0
   546
	}
slouken@0
   547
}
slouken@0
   548
slouken@0
   549
/* This handles the ugly work of converting the saved cursor background from
slouken@0
   550
   the pixel format of the shadow surface to that of the video surface.
slouken@0
   551
   This is only necessary when blitting from a shadow surface of a different
slouken@0
   552
   pixel format than the video surface, and using a software rendered cursor.
slouken@0
   553
*/
slouken@0
   554
static void SDL_ConvertCursorSave(SDL_Surface *screen, int w, int h)
slouken@0
   555
{
slouken@0
   556
	SDL_BlitInfo info;
slouken@0
   557
	SDL_loblit RunBlit;
slouken@0
   558
slouken@0
   559
	/* Make sure we can steal the blit mapping */
slouken@0
   560
	if ( screen->map->dst != SDL_VideoSurface ) {
slouken@0
   561
		return;
slouken@0
   562
	}
slouken@0
   563
slouken@0
   564
	/* Set up the blit information */
slouken@0
   565
	info.s_pixels = SDL_cursor->save[1];
slouken@0
   566
	info.s_width = w;
slouken@0
   567
	info.s_height = h;
slouken@0
   568
	info.s_skip = 0;
slouken@0
   569
	info.d_pixels = SDL_cursor->save[0];
slouken@0
   570
	info.d_width = w;
slouken@0
   571
	info.d_height = h;
slouken@0
   572
	info.d_skip = 0;
slouken@0
   573
	info.aux_data = screen->map->sw_data->aux_data;
slouken@0
   574
	info.src = screen->format;
slouken@0
   575
	info.table = screen->map->table;
slouken@0
   576
	info.dst = SDL_VideoSurface->format;
slouken@0
   577
	RunBlit = screen->map->sw_data->blit;
slouken@0
   578
slouken@0
   579
	/* Run the actual software blit */
slouken@0
   580
	RunBlit(&info);
slouken@0
   581
}
slouken@0
   582
slouken@0
   583
void SDL_DrawCursorNoLock(SDL_Surface *screen)
slouken@0
   584
{
slouken@0
   585
	SDL_Rect area;
slouken@0
   586
slouken@0
   587
	/* Get the mouse rectangle, clipped to the screen */
slouken@0
   588
	SDL_MouseRect(&area);
slouken@0
   589
	if ( (area.w == 0) || (area.h == 0) ) {
slouken@0
   590
		return;
slouken@0
   591
	}
slouken@0
   592
slouken@0
   593
	/* Copy mouse background */
slouken@0
   594
	{ int w, h, screenbpp;
slouken@0
   595
	  Uint8 *src, *dst;
slouken@0
   596
slouken@0
   597
	  /* Set up the copy pointers */
slouken@0
   598
	  screenbpp = screen->format->BytesPerPixel;
slouken@0
   599
	  if ( (screen == SDL_VideoSurface) ||
slouken@0
   600
	          FORMAT_EQUAL(screen->format, SDL_VideoSurface->format) ) {
slouken@0
   601
		dst = SDL_cursor->save[0];
slouken@0
   602
	  } else {
slouken@0
   603
		dst = SDL_cursor->save[1];
slouken@0
   604
	  }
slouken@0
   605
	  src = (Uint8 *)screen->pixels + area.y * screen->pitch +
slouken@0
   606
                                          area.x * screenbpp;
slouken@0
   607
slouken@0
   608
	  /* Perform the copy */
slouken@0
   609
	  w = area.w*screenbpp;
slouken@0
   610
	  h = area.h;
slouken@0
   611
	  while ( h-- ) {
slouken@0
   612
		  memcpy(dst, src, w);
slouken@0
   613
		  dst += w;
slouken@0
   614
		  src += screen->pitch;
slouken@0
   615
	  }
slouken@0
   616
	}
slouken@0
   617
slouken@0
   618
	/* Draw the mouse cursor */
slouken@0
   619
	area.x -= SDL_cursor->area.x;
slouken@0
   620
	area.y -= SDL_cursor->area.y;
slouken@0
   621
	if ( (area.x == 0) && (area.w == SDL_cursor->area.w) ) {
slouken@0
   622
		SDL_DrawCursorFast(screen, &area);
slouken@0
   623
	} else {
slouken@0
   624
		SDL_DrawCursorSlow(screen, &area);
slouken@0
   625
	}
slouken@0
   626
}
slouken@0
   627
slouken@0
   628
void SDL_DrawCursor(SDL_Surface *screen)
slouken@0
   629
{
slouken@0
   630
	/* Lock the screen if necessary */
slouken@0
   631
	if ( screen == NULL ) {
slouken@0
   632
		return;
slouken@0
   633
	}
slouken@0
   634
	if ( SDL_MUSTLOCK(screen) ) {
slouken@0
   635
		if ( SDL_LockSurface(screen) < 0 ) {
slouken@0
   636
			return;
slouken@0
   637
		}
slouken@0
   638
	}
slouken@0
   639
slouken@0
   640
	SDL_DrawCursorNoLock(screen);
slouken@0
   641
slouken@0
   642
	/* Unlock the screen and update if necessary */
slouken@0
   643
	if ( SDL_MUSTLOCK(screen) ) {
slouken@0
   644
		SDL_UnlockSurface(screen);
slouken@0
   645
	}
slouken@0
   646
	if ( (screen == SDL_VideoSurface) &&
slouken@0
   647
	     ((screen->flags & SDL_HWSURFACE) != SDL_HWSURFACE) ) {
slouken@0
   648
		SDL_VideoDevice *video = current_video;
slouken@0
   649
		SDL_VideoDevice *this  = current_video;
slouken@0
   650
		SDL_Rect area;
slouken@0
   651
slouken@0
   652
		SDL_MouseRect(&area);
slouken@0
   653
slouken@0
   654
		/* This can be called before a video mode is set */
slouken@0
   655
		if ( video->UpdateRects ) {
slouken@0
   656
			video->UpdateRects(this, 1, &area);
slouken@0
   657
		}
slouken@0
   658
	}
slouken@0
   659
}
slouken@0
   660
slouken@0
   661
void SDL_EraseCursorNoLock(SDL_Surface *screen)
slouken@0
   662
{
slouken@0
   663
	SDL_Rect area;
slouken@0
   664
slouken@0
   665
	/* Get the mouse rectangle, clipped to the screen */
slouken@0
   666
	SDL_MouseRect(&area);
slouken@0
   667
	if ( (area.w == 0) || (area.h == 0) ) {
slouken@0
   668
		return;
slouken@0
   669
	}
slouken@0
   670
slouken@0
   671
	/* Copy mouse background */
slouken@0
   672
	{ int w, h, screenbpp;
slouken@0
   673
	  Uint8 *src, *dst;
slouken@0
   674
slouken@0
   675
	  /* Set up the copy pointers */
slouken@0
   676
	  screenbpp = screen->format->BytesPerPixel;
slouken@0
   677
	  if ( (screen == SDL_VideoSurface) ||
slouken@0
   678
	          FORMAT_EQUAL(screen->format, SDL_VideoSurface->format) ) {
slouken@0
   679
		src = SDL_cursor->save[0];
slouken@0
   680
	  } else {
slouken@0
   681
		src = SDL_cursor->save[1];
slouken@0
   682
	  }
slouken@0
   683
	  dst = (Uint8 *)screen->pixels + area.y * screen->pitch +
slouken@0
   684
                                          area.x * screenbpp;
slouken@0
   685
slouken@0
   686
	  /* Perform the copy */
slouken@0
   687
	  w = area.w*screenbpp;
slouken@0
   688
	  h = area.h;
slouken@0
   689
	  while ( h-- ) {
slouken@0
   690
		  memcpy(dst, src, w);
slouken@0
   691
		  src += w;
slouken@0
   692
		  dst += screen->pitch;
slouken@0
   693
	  }
slouken@0
   694
slouken@0
   695
	  /* Perform pixel conversion on cursor background */
slouken@0
   696
	  if ( src > SDL_cursor->save[1] ) {
slouken@0
   697
		SDL_ConvertCursorSave(screen, area.w, area.h);
slouken@0
   698
	  }
slouken@0
   699
	}
slouken@0
   700
}
slouken@0
   701
slouken@0
   702
void SDL_EraseCursor(SDL_Surface *screen)
slouken@0
   703
{
slouken@0
   704
	/* Lock the screen if necessary */
slouken@0
   705
	if ( screen == NULL ) {
slouken@0
   706
		return;
slouken@0
   707
	}
slouken@0
   708
	if ( SDL_MUSTLOCK(screen) ) {
slouken@0
   709
		if ( SDL_LockSurface(screen) < 0 ) {
slouken@0
   710
			return;
slouken@0
   711
		}
slouken@0
   712
	}
slouken@0
   713
slouken@0
   714
	SDL_EraseCursorNoLock(screen);
slouken@0
   715
slouken@0
   716
	/* Unlock the screen and update if necessary */
slouken@0
   717
	if ( SDL_MUSTLOCK(screen) ) {
slouken@0
   718
		SDL_UnlockSurface(screen);
slouken@0
   719
	}
slouken@0
   720
	if ( (screen == SDL_VideoSurface) &&
slouken@0
   721
	     ((screen->flags & SDL_HWSURFACE) != SDL_HWSURFACE) ) {
slouken@0
   722
		SDL_VideoDevice *video = current_video;
slouken@0
   723
		SDL_VideoDevice *this  = current_video;
slouken@0
   724
		SDL_Rect area;
slouken@0
   725
slouken@0
   726
		SDL_MouseRect(&area);
slouken@1
   727
		if ( video->UpdateRects ) {
slouken@1
   728
			video->UpdateRects(this, 1, &area);
slouken@1
   729
		}
slouken@0
   730
	}
slouken@0
   731
}
slouken@0
   732
slouken@0
   733
/* Reset the cursor on video mode change
slouken@0
   734
   FIXME:  Keep track of all cursors, and reset them all.
slouken@0
   735
 */
slouken@0
   736
void SDL_ResetCursor(void)
slouken@0
   737
{
slouken@0
   738
	int savelen;
slouken@0
   739
slouken@0
   740
	if ( SDL_cursor ) {
slouken@0
   741
		savelen = SDL_cursor->area.w*4*SDL_cursor->area.h;
slouken@0
   742
		SDL_cursor->area.x = 0;
slouken@0
   743
		SDL_cursor->area.y = 0;
slouken@0
   744
		memset(SDL_cursor->save[0], 0, savelen);
slouken@0
   745
	}
slouken@0
   746
}