int FULLSCREEN_ToggleFromWimp(_THIS)
{
int width = this->screen->w;
int height = this->screen->h;
int bpp = this->screen->format->BitsPerPixel;
RISCOS_StoreWimpMode();
if (FULLSCREEN_SetMode(width, height, bpp))
{
char *buffer = this->hidden->alloc_bank;
if (riscos_backbuffer == 0) riscos_backbuffer = 1;
FULLSCREEN_SetupBanks(this);
this->hidden->bank[0] = buffer + 60;
if (bpp == 8) this->hidden->bank[0] += 2048;
this->hidden->current_bank = 0;
this->screen->pixels = this->hidden->bank[0];
SDL_memcpy(this->hidden->bank[1], this->hidden->bank[0], width * height * this->screen->format->BytesPerPixel);
FULLSCREEN_SetDeviceMode(this);
return 1;
} else
RISCOS_RestoreWimpMode();
return 0;
}
int FULLSCREEN_ToggleFromWimp(_THIS)
{
int width = this->screen->w;
int height = this->screen->h;
int bpp = this->screen->format->BitsPerPixel;
RISCOS_StoreWimpMode();
if (FULLSCREEN_SetMode(width, height, bpp))
{
char *buffer = this->hidden->alloc_bank; /* This is start of sprite data */
/* Support back buffer mode only */
riscos_backbuffer = 1;
FULLSCREEN_SetupBanks(this);
this->hidden->bank[0] = buffer + 60; /* Start of sprite data */
if (bpp == 8) this->hidden->bank[0] += 2048; /* 8bpp sprite have palette first */
this->hidden->current_bank = 0;
this->screen->pixels = this->hidden->bank[0];
/* Copy back buffer to screen memory */
memcpy(this->hidden->bank[1], this->hidden->bank[0], width * height * this->screen->format->BytesPerPixel);
FULLSCREEN_SetDeviceMode(this);
return 1;
} else
RISCOS_RestoreWimpMode();
return 0;
}
static SDL_VideoDevice *RISCOS_CreateDevice(int devindex)
{
SDL_VideoDevice *device;
/* Initialize all variables that we clean on shutdown */
device = (SDL_VideoDevice *)malloc(sizeof(SDL_VideoDevice));
if ( device ) {
memset(device, 0, (sizeof *device));
device->hidden = (struct SDL_PrivateVideoData *)
malloc((sizeof *device->hidden));
}
if ( (device == NULL) || (device->hidden == NULL) ) {
SDL_OutOfMemory();
if ( device ) {
free(device);
}
return(0);
}
memset(device->hidden, 0, (sizeof *device->hidden));
/* Set the function pointers */
device->VideoInit = RISCOS_VideoInit;
device->VideoQuit = RISCOS_VideoQuit;
device->ListModes = RISCOS_ListModes;
device->SetVideoMode = RISCOS_SetVideoMode;
device->CreateYUVOverlay = NULL;
device->AllocHWSurface = RISCOS_AllocHWSurface;
device->CheckHWBlit = NULL;
device->FillHWRect = NULL;
device->SetHWColorKey = NULL;
device->SetHWAlpha = NULL;
device->LockHWSurface = RISCOS_LockHWSurface;
device->UnlockHWSurface = RISCOS_UnlockHWSurface;
device->FreeHWSurface = RISCOS_FreeHWSurface;
device->FreeWMCursor = RISCOS_FreeWMCursor;
device->CreateWMCursor = RISCOS_CreateWMCursor;
device->CheckMouseMode = RISCOS_CheckMouseMode;
device->GrabInput = RISCOS_GrabInput;
device->InitOSKeymap = RISCOS_InitOSKeymap;
device->GetWMInfo = RISCOS_GetWmInfo;
device->free = RISCOS_DeleteDevice;
/* Can't get Toggle screen to work if program starts up in Full screen mode so
disable it here and re-enable it when a wimp screen is chosen */
device->ToggleFullScreen = NULL; /*RISCOS_ToggleFullScreen;*/
/* Set other entries for fullscreen mode */
FULLSCREEN_SetDeviceMode(device);
return device;
}
SDL_Surface *FULLSCREEN_SetVideoMode(_THIS, SDL_Surface *current,
int width, int height, int bpp, Uint32 flags)
{
_kernel_swi_regs regs;
Uint32 Rmask = 0;
Uint32 Gmask = 0;
Uint32 Bmask = 0;
int create_back_buffer = riscos_backbuffer;
switch(bpp)
{
case 8:
flags |= SDL_HWPALETTE;
break;
case 15:
case 16:
Bmask = 0x00007c00;
Gmask = 0x000003e0;
Rmask = 0x0000001f;
break;
case 32:
Bmask = 0x00ff0000;
Gmask = 0x0000ff00;
Rmask = 0x000000ff;
break;
default:
SDL_SetError("Pixel depth not supported");
return NULL;
break;
}
if (FULLSCREEN_SetMode(width, height, bpp) == 0)
{
SDL_SetError("Couldn't set requested mode");
return (NULL);
}
if ( ! SDL_ReallocFormat(current, bpp, Rmask, Gmask, Bmask, 0) ) {
RISCOS_RestoreWimpMode();
SDL_SetError("Couldn't allocate new pixel format for requested mode");
return(NULL);
}
current->w = width;
this->hidden->height = current->h = height;
regs.r[0] = -1;
regs.r[1] = 6;
_kernel_swi(OS_ReadModeVariable, ®s, ®s);
current->pitch = regs.r[2];
if (flags & SDL_DOUBLEBUF)
{
regs.r[0] = 2;
_kernel_swi(OS_ReadDynamicArea, ®s, ®s);
regs.r[0] = 2;
regs.r[1] = (current->pitch * height * 2) - regs.r[1];
if (_kernel_swi(OS_ChangeDynamicArea, ®s, ®s) != NULL)
{
flags &= ~SDL_DOUBLEBUF;
}
}
current->flags = flags | SDL_FULLSCREEN | SDL_HWSURFACE | SDL_PREALLOC;
if (flags & SDL_DOUBLEBUF)
{
FULLSCREEN_SetWriteBank(0);
FULLSCREEN_SetDisplayBank(1);
create_back_buffer = 0;
}
FULLSCREEN_SetupBanks(this);
if (create_back_buffer)
{
if (riscos_backbuffer == 3)
this->hidden->bank[0] = WIMP_CreateBuffer(width, height, bpp);
else
this->hidden->bank[0] = SDL_malloc(height * current->pitch);
if (this->hidden->bank[0] == 0)
{
RISCOS_RestoreWimpMode();
SDL_SetError("Couldnt allocate memory for back buffer");
return (NULL);
}
current->flags &= ~SDL_HWSURFACE;
}
if (this->hidden->alloc_bank) SDL_free(this->hidden->alloc_bank);
if (create_back_buffer)
{
this->hidden->alloc_bank = this->hidden->bank[0];
if (riscos_backbuffer == 3)
{
this->hidden->bank[0] += 60;
if (bpp == 8) this->hidden->bank[0] += 2048;
}
} else
this->hidden->alloc_bank = 0;
SDL_memset(this->hidden->bank[0], 0, height * current->pitch);
SDL_memset(this->hidden->bank[1], 0, height * current->pitch);
this->hidden->current_bank = 0;
current->pixels = this->hidden->bank[0];
this->screen = current;
FULLSCREEN_SetDeviceMode(this);
return(current);
}
SDL_Surface *FULLSCREEN_SetVideoMode(_THIS, SDL_Surface *current,
int width, int height, int bpp, Uint32 flags)
{
_kernel_swi_regs regs;
Uint32 Rmask = 0;
Uint32 Gmask = 0;
Uint32 Bmask = 0;
int create_back_buffer = riscos_backbuffer;
switch(bpp)
{
case 8:
flags |= SDL_HWPALETTE;
break;
case 15:
case 16:
Bmask = 0x00007c00;
Gmask = 0x000003e0;
Rmask = 0x0000001f;
break;
case 32:
Bmask = 0x00ff0000;
Gmask = 0x0000ff00;
Rmask = 0x000000ff;
break;
default:
SDL_SetError("Pixel depth not supported");
return NULL;
break;
}
if (FULLSCREEN_SetMode(width, height, bpp) == 0)
{
SDL_SetError("Couldn't set requested mode");
return (NULL);
}
/* printf("Setting mode %dx%d\n", width, height); */
/* Allocate the new pixel format for the screen */
if ( ! SDL_ReallocFormat(current, bpp, Rmask, Gmask, Bmask, 0) ) {
RISCOS_RestoreWimpMode();
SDL_SetError("Couldn't allocate new pixel format for requested mode");
return(NULL);
}
/* Set up the new mode framebuffer */
current->w = width;
this->hidden->height = current->h = height;
regs.r[0] = -1; /* -1 for current screen mode */
/* Get screen width in bytes */
regs.r[1] = 6; // Screen Width in bytes
_kernel_swi(OS_ReadModeVariable, ®s, ®s);
current->pitch = regs.r[2];
if (flags & SDL_DOUBLEBUF)
{
regs.r[0] = 2; /* Screen area */
_kernel_swi(OS_ReadDynamicArea, ®s, ®s);
/* Reg 1 has amount of memory currently used for display */
regs.r[0] = 2; /* Screen area */
regs.r[1] = (current->pitch * height * 2) - regs.r[1];
if (_kernel_swi(OS_ChangeDynamicArea, ®s, ®s) != NULL)
{
/* Can't allocate enough screen memory for double buffer */
flags &= ~SDL_DOUBLEBUF;
}
}
current->flags = flags | SDL_FULLSCREEN | SDL_HWSURFACE | SDL_PREALLOC;
/* Need to set display banks here for double buffering */
if (flags & SDL_DOUBLEBUF)
{
FULLSCREEN_SetWriteBank(0);
FULLSCREEN_SetDisplayBank(1);
create_back_buffer = 0; /* Don't need a back buffer for a double buffered display */
}
FULLSCREEN_SetupBanks(this);
if (create_back_buffer)
{
/* If not double buffered we may need to create a memory
** back buffer to simulate processing on other OS's.
** This is turned on by setting the enviromental variable
** SDL$<name>$BackBuffer to 1
*/
this->hidden->bank[0] = malloc(height * current->pitch);
if (this->hidden->bank[0] == 0)
{
RISCOS_RestoreWimpMode();
SDL_SetError("Couldnt allocate memory for back buffer");
return (NULL);
}
/* Surface updated in programs is now a software surface */
current->flags &= ~SDL_HWSURFACE;
}
/* Store address of allocated screen bank to be freed later */
if (this->hidden->alloc_bank) free(this->hidden->alloc_bank);
if (create_back_buffer)
{
this->hidden->alloc_bank = this->hidden->bank[0];
} else
this->hidden->alloc_bank = 0;
// Clear both banks to black
memset(this->hidden->bank[0], 0, height * current->pitch);
memset(this->hidden->bank[1], 0, height * current->pitch);
this->hidden->current_bank = 0;
current->pixels = this->hidden->bank[0];
/* Reset device functions for the wimp */
FULLSCREEN_SetDeviceMode(this);
/* FULLSCREEN_DisableEscape(); */
/* We're done */
return(current);
}
