src/video/macrom/SDL_romvideo.c
author Sam Lantinga <slouken@libsdl.org>
Mon, 05 Jan 2004 01:34:34 +0000
changeset 774 0c3e00cc9580
parent 769 b8d311d90021
child 916 46916168361d
permissions -rw-r--r--
Date: Mon, 5 Jan 2004 00:09:36 +0100
From: Anders_F_Bj?rklund
Subject: [SDL] Dynamic OpenGL lib support for Mac

Here's a patch that adds LoadLibrary and GetProcAddress
to the Carbon macintosh driver (for Mac OS 9 and Mac OS X):
http://www.algonet.se/~afb/SDL-1.2.6-macdynamicgl.patch
It just calls the corresponding function from SDL_loadso.

It also fixes one Mac bug in SDL_loadso.c, that made it fail
always when loading a library, and fixes the screen update
after receiving an update event - which caused the OpenGL
context to be overwritten by a blank window by UpdateRect...
slouken@0
     1
/*
slouken@0
     2
    SDL - Simple DirectMedia Layer
slouken@769
     3
    Copyright (C) 1997-2004 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@252
    20
    slouken@libsdl.org
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
#include <stdio.h>
slouken@0
    29
#include <stdlib.h>
slouken@0
    30
slouken@0
    31
#if TARGET_API_MAC_CARBON
slouken@0
    32
#include <Carbon.h>
slouken@0
    33
/* The fullscreen code requires the QuickTime framework, and the window
slouken@0
    34
   is still at the back on MacOS X, which is where this code is needed.
slouken@0
    35
 */
slouken@0
    36
#if USE_QUICKTIME
slouken@47
    37
#include <QuickTime/Movies.h>
slouken@0
    38
#endif
slouken@0
    39
#else
slouken@0
    40
#include <LowMem.h>
slouken@0
    41
#include <Gestalt.h>
slouken@0
    42
#include <Devices.h>
slouken@0
    43
#include <DiskInit.h>
slouken@0
    44
#include <QDOffscreen.h>
slouken@0
    45
#endif
slouken@0
    46
slouken@0
    47
#include "SDL_video.h"
slouken@0
    48
#include "SDL_error.h"
slouken@0
    49
#include "SDL_syswm.h"
slouken@0
    50
#include "SDL_sysvideo.h"
slouken@0
    51
#include "SDL_romvideo.h"
slouken@0
    52
#include "SDL_macgl_c.h"
slouken@0
    53
#include "SDL_macwm_c.h"
slouken@0
    54
#include "SDL_macmouse_c.h"
slouken@0
    55
#include "SDL_macevents_c.h"
slouken@0
    56
slouken@0
    57
/* Initialization/Query functions */
slouken@0
    58
static int ROM_VideoInit(_THIS, SDL_PixelFormat *vformat);
slouken@0
    59
static SDL_Rect **ROM_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags);
slouken@0
    60
static SDL_Surface *ROM_SetVideoMode(_THIS, SDL_Surface *current, int width, int height, int bpp, Uint32 flags);
slouken@0
    61
static int ROM_SetColors(_THIS, int firstcolor, int ncolors,
slouken@0
    62
			 SDL_Color *colors);
slouken@0
    63
static void ROM_VideoQuit(_THIS);
slouken@0
    64
slouken@0
    65
/* Hardware surface functions */
slouken@0
    66
static int ROM_AllocHWSurface(_THIS, SDL_Surface *surface);
slouken@0
    67
static int ROM_LockHWSurface(_THIS, SDL_Surface *surface);
slouken@0
    68
static void ROM_UnlockHWSurface(_THIS, SDL_Surface *surface);
slouken@0
    69
static void ROM_FreeHWSurface(_THIS, SDL_Surface *surface);
slouken@0
    70
slouken@0
    71
#if !TARGET_API_MAC_CARBON /* This seems not to be available? -sts Aug 2000 */
slouken@0
    72
/* Saved state for the menu bar */
slouken@0
    73
static RgnHandle	gSaveGrayRgn = nil;
slouken@0
    74
static short		gSaveMenuBar = 0;
slouken@0
    75
static Boolean		gSaveCSVis = true;
slouken@0
    76
slouken@0
    77
#if powerc
slouken@0
    78
/* Mixed mode glue to activate the 68K emulator and twiddle a register */
slouken@0
    79
#define ONEWORDSTUB(p1) \
slouken@0
    80
		{ 0x41FA, 0x0010, 0x209F, (p1), 0x41FA, \
slouken@0
    81
		  0x0008, 0x2F10, 0x4E75, 0x0000, 0x0000, 0x0000 }
slouken@0
    82
slouken@0
    83
#define TWOWORDSTUB(p1,p2) \
slouken@0
    84
		{ 0x41FA, 0x0012, 0x209F, (p1), (p2), 0x41FA, \
slouken@0
    85
		  0x0008, 0x2F10, 0x4E75, 0x0000, 0x0000, 0x0000 }
slouken@0
    86
slouken@0
    87
#define THREEWORDSTUB(p1,p2,p3) \
slouken@0
    88
		{ 0x41FA, 0x0014, 0x209F, (p1), (p2), (p3), 0x41FA, \
slouken@0
    89
		  0x0008, 0x2F10, 0x4E75, 0x0000, 0x0000, 0x0000 }
slouken@0
    90
slouken@0
    91
/* ControlStrip inline glue for PowerPC */
slouken@0
    92
static pascal Boolean SBIsControlStripVisible(void)
slouken@0
    93
{
slouken@0
    94
	static short procData[] = TWOWORDSTUB(0x7000, 0xAAF2);
slouken@0
    95
	ProcInfoType procInfo = kD0DispatchedPascalStackBased
slouken@0
    96
				| RESULT_SIZE(SIZE_CODE(sizeof(Boolean)))
slouken@0
    97
            	| DISPATCHED_STACK_ROUTINE_SELECTOR_SIZE(kFourByteCode);
slouken@0
    98
            				
slouken@0
    99
	return((Boolean) CallUniversalProc((UniversalProcPtr) procData, procInfo, 0x00));
slouken@0
   100
}
slouken@0
   101
slouken@0
   102
static pascal void SBShowHideControlStrip(Boolean showIt)
slouken@0
   103
{
slouken@0
   104
	static short procData[] = THREEWORDSTUB(0x303C, 0x0101, 0xAAF2);
slouken@0
   105
	ProcInfoType procInfo = kD0DispatchedPascalStackBased
slouken@0
   106
				| DISPATCHED_STACK_ROUTINE_SELECTOR_SIZE(kFourByteCode)
slouken@0
   107
				| DISPATCHED_STACK_ROUTINE_PARAMETER(1, SIZE_CODE(sizeof(Boolean)));
slouken@0
   108
slouken@0
   109
	CallUniversalProc((UniversalProcPtr) procData, procInfo, 0x01, showIt);
slouken@0
   110
}
slouken@0
   111
#endif /* powerc */
slouken@0
   112
#endif /* !TARGET_API_MAC_CARBON */
slouken@0
   113
slouken@0
   114
/* Macintosh toolbox driver bootstrap functions */
slouken@0
   115
slouken@0
   116
static int ROM_Available(void)
slouken@0
   117
{
slouken@0
   118
	return(1);
slouken@0
   119
}
slouken@0
   120
slouken@0
   121
static void ROM_DeleteDevice(SDL_VideoDevice *device)
slouken@0
   122
{
slouken@0
   123
	free(device->hidden);
slouken@0
   124
	free(device);
slouken@0
   125
}
slouken@0
   126
slouken@0
   127
static SDL_VideoDevice *ROM_CreateDevice(int devindex)
slouken@0
   128
{
slouken@0
   129
	SDL_VideoDevice *device;
slouken@0
   130
slouken@0
   131
	/* Initialize all variables that we clean on shutdown */
slouken@0
   132
	device = (SDL_VideoDevice *)malloc(sizeof(SDL_VideoDevice));
slouken@0
   133
	if ( device ) {
slouken@0
   134
		memset(device, 0, (sizeof *device));
slouken@0
   135
		device->hidden = (struct SDL_PrivateVideoData *)
slouken@0
   136
				malloc((sizeof *device->hidden));
slouken@0
   137
	}
slouken@0
   138
	if ( (device == NULL) || (device->hidden == NULL) ) {
slouken@0
   139
		SDL_OutOfMemory();
slouken@0
   140
		if ( device ) {
slouken@0
   141
			free(device);
slouken@0
   142
		}
slouken@0
   143
		return(0);
slouken@0
   144
	}
slouken@0
   145
	memset(device->hidden, 0, (sizeof *device->hidden));
slouken@0
   146
slouken@0
   147
	/* Set the function pointers */
slouken@0
   148
	device->VideoInit = ROM_VideoInit;
slouken@0
   149
	device->ListModes = ROM_ListModes;
slouken@0
   150
	device->SetVideoMode = ROM_SetVideoMode;
slouken@0
   151
	device->SetColors = ROM_SetColors;
slouken@0
   152
	device->UpdateRects = NULL;
slouken@0
   153
	device->VideoQuit = ROM_VideoQuit;
slouken@0
   154
	device->AllocHWSurface = ROM_AllocHWSurface;
slouken@0
   155
	device->CheckHWBlit = NULL;
slouken@0
   156
	device->FillHWRect = NULL;
slouken@0
   157
	device->SetHWColorKey = NULL;
slouken@0
   158
	device->SetHWAlpha = NULL;
slouken@0
   159
	device->LockHWSurface = ROM_LockHWSurface;
slouken@0
   160
	device->UnlockHWSurface = ROM_UnlockHWSurface;
slouken@0
   161
	device->FlipHWSurface = NULL;
slouken@0
   162
	device->FreeHWSurface = ROM_FreeHWSurface;
slouken@0
   163
#ifdef HAVE_OPENGL
slouken@0
   164
	device->GL_MakeCurrent = Mac_GL_MakeCurrent;
slouken@0
   165
	device->GL_SwapBuffers = Mac_GL_SwapBuffers;
slouken@774
   166
	device->GL_LoadLibrary = Mac_GL_LoadLibrary;
slouken@774
   167
	device->GL_GetProcAddress = Mac_GL_GetProcAddress;
slouken@0
   168
#endif
slouken@0
   169
	device->SetCaption = Mac_SetCaption;
slouken@0
   170
	device->SetIcon = NULL;
slouken@0
   171
	device->IconifyWindow = NULL;
slouken@0
   172
	device->GrabInput = NULL;
slouken@0
   173
	device->GetWMInfo = NULL;
slouken@0
   174
	device->FreeWMCursor = Mac_FreeWMCursor;
slouken@0
   175
	device->CreateWMCursor = Mac_CreateWMCursor;
slouken@0
   176
	device->ShowWMCursor = Mac_ShowWMCursor;
slouken@0
   177
	device->WarpWMCursor = Mac_WarpWMCursor;
slouken@0
   178
	device->InitOSKeymap = Mac_InitOSKeymap;
slouken@0
   179
	device->PumpEvents = Mac_PumpEvents;
slouken@0
   180
slouken@0
   181
	device->free = ROM_DeleteDevice;
slouken@0
   182
slouken@0
   183
	return device;
slouken@0
   184
}
slouken@0
   185
slouken@0
   186
VideoBootStrap TOOLBOX_bootstrap = {
slouken@0
   187
	"toolbox", "MacOS ROM Toolbox",
slouken@0
   188
	ROM_Available, ROM_CreateDevice
slouken@0
   189
};
slouken@0
   190
slouken@0
   191
slouken@0
   192
static int ROM_VideoInit(_THIS, SDL_PixelFormat *vformat)
slouken@0
   193
{
slouken@0
   194
	long info;
slouken@0
   195
	
slouken@0
   196
	/* Check out some things about the system */
slouken@0
   197
	Gestalt(gestaltQuickdrawVersion, &info);
slouken@0
   198
	if ( info == gestaltOriginalQD ) {
slouken@0
   199
		SDL_SetError("Color Quickdraw not available");
slouken@0
   200
		return(-1);
slouken@0
   201
	}
slouken@0
   202
slouken@0
   203
	/* Start ROMintosh events */
slouken@0
   204
	Mac_InitEvents(this);
slouken@0
   205
slouken@0
   206
	/* Get a handle to the main monitor */
slouken@0
   207
	SDL_Display = GetMainDevice();
slouken@0
   208
slouken@0
   209
	/* Determine pixel format */
slouken@0
   210
	vformat->BitsPerPixel = (**(**SDL_Display).gdPMap).pixelSize;
slouken@0
   211
	switch (vformat->BitsPerPixel) {
slouken@0
   212
		case 16:	/* 5-5-5 RGB */
slouken@0
   213
			vformat->Rmask = 0x00007c00;
slouken@0
   214
			vformat->Gmask = 0x000003e0;
slouken@0
   215
			vformat->Bmask = 0x0000001f;
slouken@0
   216
			break;
slouken@0
   217
		default:
slouken@0
   218
			break;
slouken@0
   219
	}
slouken@0
   220
slouken@0
   221
	/* Create our palette */
slouken@0
   222
	SDL_CTab = (CTabHandle)NewHandle(sizeof(ColorSpec)*256 + 8);
slouken@0
   223
	if ( SDL_CTab == nil ) {
slouken@0
   224
		SDL_OutOfMemory();
slouken@0
   225
		return(-1);
slouken@0
   226
	}
slouken@0
   227
	(**SDL_CTab).ctSeed = GetCTSeed();
slouken@0
   228
	(**SDL_CTab).ctFlags = 0;
slouken@0
   229
	(**SDL_CTab).ctSize = 255;
slouken@0
   230
	CTabChanged(SDL_CTab);
slouken@0
   231
	SDL_CPal = NewPalette(256, SDL_CTab, pmExplicit+pmTolerant, 0);
slouken@0
   232
slouken@0
   233
	/* Get a list of available fullscreen modes */
slouken@0
   234
	SDL_modelist = (SDL_Rect **)malloc((1+1)*sizeof(SDL_Rect *));
slouken@0
   235
	if ( SDL_modelist ) {
slouken@0
   236
		SDL_modelist[0] = (SDL_Rect *)malloc(sizeof(SDL_Rect));
slouken@0
   237
		if ( SDL_modelist[0] ) {
slouken@0
   238
			SDL_modelist[0]->x = 0;
slouken@0
   239
			SDL_modelist[0]->y = 0;
slouken@0
   240
			SDL_modelist[0]->w = (**SDL_Display).gdRect.right;
slouken@0
   241
			SDL_modelist[0]->h = (**SDL_Display).gdRect.bottom;
slouken@0
   242
		}
slouken@0
   243
		SDL_modelist[1] = NULL;
slouken@0
   244
	}
slouken@0
   245
slouken@0
   246
	/* Fill in some window manager capabilities */
slouken@0
   247
	this->info.wm_available = 1;
slouken@0
   248
slouken@0
   249
	/* We're done! */
slouken@0
   250
	return(0);
slouken@0
   251
}
slouken@0
   252
slouken@0
   253
static SDL_Rect **ROM_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags)
slouken@0
   254
{
slouken@0
   255
	if ( this->screen->format->BitsPerPixel == format->BitsPerPixel ) {
slouken@0
   256
		if ( (flags & SDL_FULLSCREEN) == SDL_FULLSCREEN ) {
slouken@0
   257
			return(SDL_modelist);
slouken@0
   258
		} else {
slouken@0
   259
			return((SDL_Rect **)-1);
slouken@0
   260
		}
slouken@0
   261
	} else {
slouken@0
   262
		return((SDL_Rect **)0);
slouken@0
   263
	}
slouken@0
   264
}
slouken@0
   265
slouken@0
   266
static void ROM_HideMenuBar(_THIS)
slouken@0
   267
{
slouken@0
   268
#if !TARGET_API_MAC_CARBON /* This seems not to be available? -sts Aug 2000 */
slouken@0
   269
	RgnHandle		drawRgn = nil;
slouken@0
   270
	RgnHandle		tempRgn = nil;
slouken@0
   271
	RgnHandle		grayRgn = nil;
slouken@0
   272
	WindowPtr		window = nil;
slouken@0
   273
	GDHandle		gd = nil;
slouken@0
   274
	GrafPtr			savePort;
slouken@0
   275
	long			response;
slouken@0
   276
	short			height;
slouken@0
   277
	EventRecord		theEvent;
slouken@0
   278
slouken@0
   279
	height = GetMBarHeight();
slouken@0
   280
	
slouken@0
   281
	if ( height > 0 ) {
slouken@0
   282
		tempRgn = NewRgn();
slouken@0
   283
		drawRgn = NewRgn();
slouken@0
   284
		gSaveGrayRgn = NewRgn();
slouken@0
   285
		if ( ! tempRgn || ! drawRgn || ! gSaveGrayRgn ) {
slouken@0
   286
			goto CLEANUP;
slouken@0
   287
		}
slouken@0
   288
		grayRgn = GetGrayRgn(); /* No need to check for this */
slouken@0
   289
	
slouken@0
   290
		GetPort(&savePort);
slouken@0
   291
slouken@0
   292
		/* Hide the control strip if it's present, and record its 
slouken@0
   293
		   previous position into the dirty region for redrawing. 
slouken@0
   294
		   This isn't necessary, but may help catch stray bits. */
slouken@0
   295
		CopyRgn(grayRgn, tempRgn);
slouken@0
   296
		if (!Gestalt(gestaltControlStripAttr, &response) && 
slouken@0
   297
			(response & (1L << gestaltControlStripExists))) {
slouken@0
   298
			gSaveCSVis = SBIsControlStripVisible();
slouken@0
   299
			if (gSaveCSVis)
slouken@0
   300
				SBShowHideControlStrip(false);
slouken@0
   301
		}
slouken@0
   302
		DiffRgn(grayRgn, tempRgn, drawRgn);
slouken@0
   303
slouken@0
   304
		/* Save the gray region once the control strip is hidden*/
slouken@0
   305
		CopyRgn(grayRgn, gSaveGrayRgn);
slouken@0
   306
slouken@0
   307
		/* Change the menu height in lowmem */
slouken@0
   308
		gSaveMenuBar = height;
slouken@0
   309
		LMSetMBarHeight(0);
slouken@0
   310
		
slouken@0
   311
		/* Walk the monitor rectangles, and combine any pieces that
slouken@0
   312
		   aren't in GrayRgn: menubar, round corners, fake floaters. */
slouken@0
   313
		for(gd = GetDeviceList(); gd; gd = GetNextDevice(gd)) 
slouken@0
   314
			{
slouken@0
   315
			if (!TestDeviceAttribute(gd, screenDevice)) continue;
slouken@0
   316
			if (!TestDeviceAttribute(gd, screenActive)) continue;
slouken@0
   317
slouken@0
   318
			RectRgn(tempRgn, &(*gd)->gdRect);	/* Get the whole screen */
slouken@0
   319
			DiffRgn(tempRgn, grayRgn, tempRgn); /* Subtract out GrayRgn */
slouken@0
   320
			UnionRgn(tempRgn, drawRgn, drawRgn);/* Combine all the bits */
slouken@0
   321
			}
slouken@0
   322
			
slouken@0
   323
		/* Add the bits into the GrayRgn */
slouken@0
   324
		UnionRgn(drawRgn, grayRgn, grayRgn);
slouken@0
   325
slouken@0
   326
		/* Modify the vis regions of exposed windows */
slouken@0
   327
		window = (FrontWindow()) ? FrontWindow() : (WindowPtr) -1L;
slouken@0
   328
		PaintBehind(window, drawRgn);
slouken@0
   329
		CalcVisBehind(window, drawRgn);
slouken@0
   330
slouken@0
   331
		SetPort(savePort);
slouken@0
   332
		
slouken@0
   333
		/* Yield time so that floaters can catch up */
slouken@0
   334
		EventAvail(0, &theEvent);
slouken@0
   335
		EventAvail(0, &theEvent);
slouken@0
   336
		EventAvail(0, &theEvent);
slouken@0
   337
		EventAvail(0, &theEvent);
slouken@0
   338
		}
slouken@0
   339
slouken@0
   340
CLEANUP:
slouken@0
   341
slouken@0
   342
	if (tempRgn) DisposeRgn(tempRgn);
slouken@0
   343
	if (drawRgn) DisposeRgn(drawRgn);
slouken@0
   344
#endif /* !TARGET_API_MAC_CARBON */
slouken@0
   345
}
slouken@0
   346
	
slouken@0
   347
static void ROM_ShowMenuBar(_THIS)
slouken@0
   348
{
slouken@0
   349
#if !TARGET_API_MAC_CARBON /* This seems not to be available? -sts Aug 2000 */
slouken@0
   350
	RgnHandle		drawRgn = nil;
slouken@0
   351
	RgnHandle		menuRgn = nil;
slouken@0
   352
	RgnHandle		tempRgn = nil;
slouken@0
   353
	RgnHandle		grayRgn = nil;
slouken@0
   354
	WindowPtr		window = nil;
slouken@0
   355
	GrafPtr			wMgrPort;
slouken@0
   356
	GrafPtr			savePort;
slouken@0
   357
	Rect			menuRect;
slouken@0
   358
	long			response;
slouken@0
   359
	short			height;
slouken@0
   360
	EventRecord		theEvent;
slouken@0
   361
	RGBColor		saveRGB;
slouken@0
   362
	RGBColor		blackRGB = { 0, 0, 0 };
slouken@0
   363
slouken@0
   364
	height = GetMBarHeight();
slouken@0
   365
	
slouken@0
   366
	if ((height <= 0) && (gSaveMenuBar > 0)) {
slouken@0
   367
		drawRgn = NewRgn();
slouken@0
   368
		menuRgn = NewRgn();
slouken@0
   369
		tempRgn = NewRgn();
slouken@0
   370
		if ( ! tempRgn || ! drawRgn || ! gSaveGrayRgn ) {
slouken@0
   371
			goto CLEANUP;
slouken@0
   372
		}
slouken@0
   373
		grayRgn = GetGrayRgn(); /* No need to check for this */
slouken@0
   374
	
slouken@0
   375
		GetPort(&savePort);
slouken@0
   376
		GetWMgrPort(&wMgrPort);
slouken@0
   377
slouken@0
   378
		/* Set the height properly */
slouken@0
   379
		LMSetMBarHeight(gSaveMenuBar);
slouken@0
   380
slouken@0
   381
		/* Restore the old GrayRgn: rounded corners, etc, but not
slouken@0
   382
		   the menubar -- subtract that out first! */
slouken@0
   383
		if (gSaveGrayRgn)
slouken@0
   384
			{
slouken@0
   385
			menuRect = (*GetMainDevice())->gdRect;
slouken@0
   386
			menuRect.bottom = menuRect.top + gSaveMenuBar;
slouken@0
   387
			RectRgn(menuRgn, &menuRect);
slouken@0
   388
slouken@0
   389
			DiffRgn(grayRgn, gSaveGrayRgn, drawRgn); 	/* What do we inval? */
slouken@0
   390
			DiffRgn(drawRgn, menuRgn, drawRgn);			/* Clip out the menu */
slouken@0
   391
			
slouken@0
   392
			/* Now redraw the corners and other bits black */
slouken@0
   393
			SetPort(wMgrPort);
slouken@0
   394
			GetClip(tempRgn);
slouken@0
   395
			SetClip(drawRgn);
slouken@0
   396
			GetForeColor(&saveRGB);
slouken@0
   397
			RGBForeColor(&blackRGB);
slouken@0
   398
			PaintRgn(drawRgn);
slouken@0
   399
			RGBForeColor(&saveRGB);
slouken@0
   400
			SetClip(tempRgn);
slouken@0
   401
			SetPort(savePort);
slouken@0
   402
			
slouken@0
   403
			UnionRgn(drawRgn, menuRgn, drawRgn);		/* Put back the menu */
slouken@0
   404
slouken@0
   405
			/* Now actually restore the GrayRgn */
slouken@0
   406
			CopyRgn(gSaveGrayRgn, grayRgn);
slouken@0
   407
			DisposeRgn(gSaveGrayRgn);
slouken@0
   408
			gSaveGrayRgn = nil;
slouken@0
   409
			}
slouken@0
   410
slouken@0
   411
		/* Modify the vis regions of exposed windows and draw menubar */
slouken@0
   412
		window = (FrontWindow()) ? FrontWindow() : (WindowPtr) -1L;
slouken@0
   413
		PaintBehind(window, drawRgn);
slouken@0
   414
		CalcVisBehind(window, drawRgn);
slouken@0
   415
		DrawMenuBar();
slouken@0
   416
slouken@0
   417
		SetPort(savePort);
slouken@0
   418
		gSaveMenuBar = 0;
slouken@0
   419
slouken@0
   420
		/* Now show the control strip if it's present */
slouken@0
   421
		if (!Gestalt(gestaltControlStripAttr, &response) && 
slouken@0
   422
				(response & (1L << gestaltControlStripExists)))
slouken@0
   423
			{
slouken@0
   424
			if (gSaveCSVis && !SBIsControlStripVisible())
slouken@0
   425
				SBShowHideControlStrip(true);
slouken@0
   426
			gSaveCSVis = true;
slouken@0
   427
			}
slouken@0
   428
slouken@0
   429
		/* Yield time so that floaters can catch up */
slouken@0
   430
		EventAvail(0, &theEvent);
slouken@0
   431
		EventAvail(0, &theEvent);
slouken@0
   432
		EventAvail(0, &theEvent);
slouken@0
   433
		EventAvail(0, &theEvent);
slouken@0
   434
		}
slouken@0
   435
slouken@0
   436
CLEANUP:
slouken@0
   437
slouken@0
   438
	if (drawRgn) DisposeRgn(drawRgn);
slouken@0
   439
	if (menuRgn) DisposeRgn(menuRgn);
slouken@0
   440
	if (tempRgn) DisposeRgn(tempRgn);
slouken@0
   441
#endif /* !TARGET_API_MAC_CARBON */
slouken@0
   442
}
slouken@0
   443
slouken@0
   444
/* Various screen update functions available */
slouken@0
   445
static void ROM_DirectUpdate(_THIS, int numrects, SDL_Rect *rects);
slouken@0
   446
static void ROM_WindowUpdate(_THIS, int numrects, SDL_Rect *rects);
slouken@0
   447
slouken@0
   448
static void ROM_UnsetVideoMode(_THIS, SDL_Surface *current)
slouken@0
   449
{
slouken@0
   450
	/* Free the current window, if any */
slouken@0
   451
	if ( SDL_Window != nil ) {
slouken@0
   452
		GWorldPtr memworld;
slouken@0
   453
		
slouken@0
   454
		/* Handle OpenGL support */
slouken@0
   455
		Mac_GL_Quit(this);
slouken@0
   456
slouken@0
   457
		memworld = (GWorldPtr)GetWRefCon(SDL_Window);
slouken@0
   458
		if ( memworld != nil ) {
slouken@0
   459
			UnlockPixels(GetGWorldPixMap(memworld));
slouken@0
   460
			DisposeGWorld(memworld);
slouken@0
   461
		}
slouken@0
   462
		if ( (current->flags & SDL_FULLSCREEN) == SDL_FULLSCREEN ) {
slouken@0
   463
#if USE_QUICKTIME
slouken@0
   464
			EndFullScreen(fullscreen_ctx, nil);
slouken@0
   465
			SDL_Window = nil;
slouken@0
   466
#else
slouken@0
   467
			ROM_ShowMenuBar(this);
slouken@0
   468
#endif
slouken@0
   469
		}
slouken@0
   470
	}
slouken@0
   471
	current->pixels = NULL;
slouken@0
   472
	current->flags &= ~(SDL_HWSURFACE|SDL_FULLSCREEN);
slouken@0
   473
}
slouken@0
   474
slouken@0
   475
static SDL_Surface *ROM_SetVideoMode(_THIS, SDL_Surface *current,
slouken@0
   476
				int width, int height, int bpp, Uint32 flags)
slouken@0
   477
{
slouken@0
   478
	Rect wrect, orect;
slouken@0
   479
#if TARGET_API_MAC_CARBON
slouken@0
   480
	Rect tmprect;
slouken@0
   481
#endif
slouken@0
   482
slouken@0
   483
	/* Free any previous video mode */
slouken@0
   484
	ROM_UnsetVideoMode(this, current);
slouken@0
   485
slouken@0
   486
	/* Create the ROM window and SDL video surface */
slouken@0
   487
	current->flags = 0;		/* Clear flags */
slouken@0
   488
	current->w = width;
slouken@0
   489
	current->h = height;
slouken@0
   490
	SetRect(&wrect, 0, 0, width, height);
slouken@0
   491
	if ( SDL_Window ) {
slouken@0
   492
		/* If we recreate the window, don't move it around */
slouken@0
   493
#if TARGET_API_MAC_CARBON
slouken@0
   494
		orect = *GetWindowPortBounds(SDL_Window, &tmprect);
slouken@0
   495
#else
slouken@0
   496
		orect = SDL_Window->portRect;
slouken@0
   497
#endif
slouken@0
   498
		OffsetRect(&wrect, orect.left, orect.top);
slouken@0
   499
	} else {
slouken@0
   500
		/* Center the window the first time we show it */
slouken@0
   501
		OffsetRect(&wrect,
slouken@0
   502
		(SDL_modelist[0]->w-width)/2, (SDL_modelist[0]->h-height)/2);
slouken@0
   503
	}
slouken@0
   504
slouken@0
   505
#if MACOSX && !USE_QUICKTIME
slouken@0
   506
	/* Hum.. fullscreen mode is broken */
slouken@0
   507
	flags &= ~SDL_FULLSCREEN;
slouken@0
   508
#endif
slouken@0
   509
	if ( (flags & SDL_FULLSCREEN) == SDL_FULLSCREEN ) {
slouken@0
   510
		/* Create the fullscreen window and use screen bits */
slouken@0
   511
		current->flags |= SDL_HWSURFACE|SDL_FULLSCREEN;
slouken@0
   512
		if ( SDL_Window ) {
slouken@0
   513
			DisposeWindow(SDL_Window);
slouken@0
   514
		}
slouken@0
   515
#if USE_QUICKTIME
slouken@0
   516
		BeginFullScreen(&fullscreen_ctx, nil, 0,0, &SDL_Window, nil, 0);
slouken@0
   517
#else
slouken@0
   518
		SDL_Window = NewCWindow(nil, &wrect, "\p", true, plainDBox,
slouken@0
   519
						(WindowPtr)-1, false, 0);
slouken@0
   520
		ROM_HideMenuBar(this);
slouken@0
   521
#endif
slouken@0
   522
		current->pitch = (**(**SDL_Display).gdPMap).rowBytes & 0x3FFF;
slouken@0
   523
		current->pixels = (**(**SDL_Display).gdPMap).baseAddr;
slouken@0
   524
		this->UpdateRects = ROM_DirectUpdate;
slouken@0
   525
	} else {
slouken@0
   526
		GWorldPtr memworld;
slouken@0
   527
		PixMapHandle pixmap;
slouken@0
   528
		int style;
slouken@0
   529
slouken@0
   530
		style = noGrowDocProc;
slouken@0
   531
		if ( flags & SDL_NOFRAME ) {
slouken@0
   532
			style = plainDBox;
slouken@0
   533
			current->flags |= SDL_NOFRAME;
slouken@0
   534
		} else
slouken@0
   535
		if ( flags & SDL_RESIZABLE ) {
slouken@0
   536
			style = zoomDocProc;
slouken@0
   537
			current->flags |= SDL_RESIZABLE;
slouken@0
   538
		}
slouken@0
   539
		if ( SDL_Window && (style == current_style) ) {
slouken@0
   540
			/* Resize existing window, if necessary */
slouken@0
   541
			if ( ((orect.right-orect.left) != width) ||
slouken@0
   542
			     ((orect.bottom-orect.top) != height) ) {
slouken@0
   543
				SizeWindow(SDL_Window, width, height, false);
slouken@0
   544
			}
slouken@0
   545
		} else {
slouken@0
   546
			/* Recreate the window in the new style */
slouken@0
   547
			if ( SDL_Window ) {
slouken@0
   548
				DisposeWindow(SDL_Window);
slouken@0
   549
			}
slouken@0
   550
			SDL_Window = NewCWindow(nil, &wrect, "\p", true,
slouken@0
   551
			                        style, (WindowPtr)-1, true, 0);
slouken@0
   552
slouken@0
   553
			/* Set the window title, if any */
slouken@0
   554
			{ char *title;
slouken@0
   555
				SDL_WM_GetCaption(&title, NULL);
slouken@0
   556
				if ( title ) {
slouken@0
   557
					Mac_SetCaption(this, title, NULL);
slouken@0
   558
				}
slouken@0
   559
			}
slouken@0
   560
		}
slouken@0
   561
		current_style = style;
slouken@0
   562
		SetPalette(SDL_Window, SDL_CPal, false);
slouken@0
   563
		ActivatePalette(SDL_Window);
slouken@0
   564
		if ( NewGWorld(&memworld, 0,
slouken@0
   565
#if TARGET_API_MAC_CARBON
slouken@0
   566
			       GetWindowPortBounds(SDL_Window, &tmprect),
slouken@0
   567
#else
slouken@0
   568
			       &SDL_Window->portRect,
slouken@0
   569
#endif
slouken@0
   570
			       SDL_CTab, nil, 0) != noErr ) {
slouken@0
   571
			SDL_SetError("NewGWorld() failed");
slouken@0
   572
			return(NULL);
slouken@0
   573
		}
slouken@0
   574
		SetWRefCon(SDL_Window, (long)memworld);
slouken@0
   575
		pixmap = GetGWorldPixMap(memworld);
slouken@0
   576
		LockPixels(pixmap);
slouken@0
   577
		current->pitch = (**pixmap).rowBytes & 0x3FFF;
slouken@0
   578
		current->pixels = GetPixBaseAddr(pixmap);
slouken@0
   579
		this->UpdateRects = ROM_WindowUpdate;
slouken@0
   580
	}
slouken@0
   581
	SetPortWindowPort(SDL_Window);
slouken@0
   582
	SelectWindow(SDL_Window);
slouken@0
   583
slouken@0
   584
	/* Handle OpenGL support */
slouken@0
   585
	if ( flags & SDL_OPENGL ) {
slouken@0
   586
		if ( Mac_GL_Init(this) == 0 ) {
slouken@0
   587
			current->flags |= SDL_OPENGL;
slouken@0
   588
		} else {
slouken@0
   589
			current = NULL;
slouken@0
   590
		}
slouken@0
   591
	}
slouken@0
   592
	
slouken@0
   593
	if ( (flags & SDL_HWPALETTE) && (flags & SDL_FULLSCREEN) )
slouken@0
   594
	   current->flags |= SDL_HWPALETTE;
slouken@0
   595
	   
slouken@0
   596
	/* We're live! */
slouken@0
   597
	return(current);
slouken@0
   598
}
slouken@0
   599
slouken@0
   600
/* We don't actually allow hardware surfaces other than the main one */
slouken@0
   601
static int ROM_AllocHWSurface(_THIS, SDL_Surface *surface)
slouken@0
   602
{
slouken@0
   603
	return(-1);
slouken@0
   604
}
slouken@0
   605
static void ROM_FreeHWSurface(_THIS, SDL_Surface *surface)
slouken@0
   606
{
slouken@0
   607
	return;
slouken@0
   608
}
slouken@0
   609
static int ROM_LockHWSurface(_THIS, SDL_Surface *surface)
slouken@0
   610
{
slouken@0
   611
	return(0);
slouken@0
   612
}
slouken@0
   613
static void ROM_UnlockHWSurface(_THIS, SDL_Surface *surface)
slouken@0
   614
{
slouken@0
   615
	return;
slouken@0
   616
}
slouken@0
   617
slouken@0
   618
static void ROM_DirectUpdate(_THIS, int numrects, SDL_Rect *rects)
slouken@0
   619
{
slouken@0
   620
	/* The application is already updating the visible video memory */
slouken@0
   621
	return;
slouken@0
   622
}
slouken@0
   623
slouken@0
   624
static void ROM_WindowUpdate(_THIS, int numrects, SDL_Rect *rects)
slouken@0
   625
{
slouken@0
   626
	GWorldPtr memworld;
slouken@0
   627
	GrafPtr saveport;
slouken@0
   628
	CGrafPtr thePort;
slouken@0
   629
	const BitMap *memBits;
slouken@0
   630
	const BitMap *winBits;
slouken@0
   631
	int i;
slouken@0
   632
	Rect update;
slouken@0
   633
	
slouken@0
   634
	/* Copy from the offscreen GWorld to the window port */
slouken@0
   635
	GetPort(&saveport);
slouken@0
   636
	SetPortWindowPort(SDL_Window);
slouken@0
   637
	thePort = GetWindowPort(SDL_Window);
slouken@0
   638
	memworld = (GWorldPtr)GetWRefCon(SDL_Window);
slouken@0
   639
#if TARGET_API_MAC_CARBON
slouken@0
   640
	memBits = GetPortBitMapForCopyBits((CGrafPtr) memworld);
slouken@0
   641
#else
slouken@0
   642
	memBits = &((GrafPtr)memworld)->portBits;
slouken@0
   643
#endif
slouken@0
   644
#if TARGET_API_MAC_CARBON
slouken@0
   645
	winBits = GetPortBitMapForCopyBits(thePort);
slouken@0
   646
#else
slouken@0
   647
	winBits = &SDL_Window->portBits;
slouken@0
   648
#endif
slouken@0
   649
	for ( i=0; i<numrects; ++i ) {
slouken@0
   650
		update.left = rects[i].x;
slouken@0
   651
		update.right = rects[i].x+rects[i].w;
slouken@0
   652
		update.top = rects[i].y;
slouken@0
   653
		update.bottom = rects[i].y+rects[i].h;
slouken@0
   654
		CopyBits(memBits, winBits,
slouken@0
   655
			 &update, &update, srcCopy, nil);
slouken@0
   656
	}
slouken@0
   657
#if TARGET_API_MAC_CARBON
slouken@0
   658
	if ( QDIsPortBuffered(thePort) ) {
slouken@0
   659
		QDFlushPortBuffer(thePort, NULL);
slouken@0
   660
	}
slouken@0
   661
#endif
slouken@0
   662
	SetPort(saveport);
slouken@0
   663
}
slouken@0
   664
slouken@0
   665
static int ROM_SetColors(_THIS, int firstcolor, int ncolors, SDL_Color *colors)
slouken@0
   666
{
slouken@0
   667
	CTabHandle cTab;
slouken@0
   668
	int i;
slouken@0
   669
slouken@0
   670
	/* Get the colortable from the either the display or window */
slouken@0
   671
	if ( (this->screen->flags & SDL_FULLSCREEN) == SDL_FULLSCREEN ) {
slouken@0
   672
		cTab = (**(**SDL_Display).gdPMap).pmTable;
slouken@0
   673
	} else {
slouken@0
   674
		cTab = SDL_CTab;
slouken@0
   675
	}
slouken@0
   676
slouken@0
   677
	/* Verify the range of colors */
slouken@0
   678
	if ( (firstcolor+ncolors) > ((**cTab).ctSize+1) ) {
slouken@0
   679
		return(0);
slouken@0
   680
	}
slouken@0
   681
	
slouken@0
   682
	/* Set the screen palette and update the display */
slouken@0
   683
	for ( i=0; i< ncolors; ++i ) {
slouken@0
   684
	        int j = firstcolor + i;
slouken@0
   685
		(**cTab).ctTable[j].value = j;
slouken@0
   686
		(**cTab).ctTable[j].rgb.red = colors[i].r << 8 | colors[i].r;
slouken@0
   687
		(**cTab).ctTable[j].rgb.green = colors[i].g << 8 | colors[i].g;
slouken@0
   688
		(**cTab).ctTable[j].rgb.blue = colors[i].b << 8 | colors[i].b;
slouken@0
   689
	}
slouken@0
   690
//	if ( (this->screen->flags & SDL_FULLSCREEN) == SDL_FULLSCREEN ) 
slouken@0
   691
{
slouken@0
   692
		GDevice **odisplay;
slouken@0
   693
		odisplay = GetGDevice();
slouken@0
   694
		SetGDevice(SDL_Display);
slouken@0
   695
		SetEntries(0, (**cTab).ctSize, (ColorSpec *)&(**cTab).ctTable);
slouken@0
   696
		SetGDevice(odisplay);
slouken@0
   697
	}
slouken@0
   698
	return(1);
slouken@0
   699
}
slouken@0
   700
slouken@0
   701
void ROM_VideoQuit(_THIS)
slouken@0
   702
{
slouken@0
   703
	int i;
slouken@0
   704
slouken@0
   705
	/* Free current video mode */
slouken@0
   706
	ROM_UnsetVideoMode(this, this->screen);
slouken@0
   707
	if ( SDL_Window ) {
slouken@0
   708
		DisposeWindow(SDL_Window);
slouken@0
   709
		SDL_Window = nil;
slouken@0
   710
	}
slouken@0
   711
slouken@0
   712
	/* Free palette and restore original one */
slouken@0
   713
	if ( SDL_CTab != nil ) {
slouken@0
   714
		DisposeHandle((Handle)SDL_CTab);
slouken@0
   715
		SDL_CTab = nil;
slouken@0
   716
	}
slouken@0
   717
	if ( SDL_CPal != nil ) {
slouken@0
   718
		DisposePalette(SDL_CPal);
slouken@0
   719
		SDL_CPal = nil;
slouken@0
   720
	}
slouken@0
   721
	RestoreDeviceClut(GetMainDevice());
slouken@0
   722
slouken@0
   723
	/* Free list of video modes */
slouken@0
   724
	if ( SDL_modelist != NULL ) {
slouken@0
   725
		for ( i=0; SDL_modelist[i]; ++i ) {
slouken@0
   726
			free(SDL_modelist[i]);
slouken@0
   727
		}
slouken@0
   728
		free(SDL_modelist);
slouken@0
   729
		SDL_modelist = NULL;
slouken@0
   730
	}
slouken@0
   731
}
slouken@0
   732