/*	SDL - Simple DirectMedia Layer	Copyright (C) 1997, 1998, 1999, 2000  Sam Lantinga	This library is free software; you can redistribute it and/or	modify it under the terms of the GNU Library General Public	License as published by the Free Software Foundation; either	version 2 of the License, or (at your option) any later version.	This library is distributed in the hope that it will be useful,	but WITHOUT ANY WARRANTY; without even the implied warranty of	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU	Library General Public License for more details.	You should have received a copy of the GNU Library General Public	License along with this library; if not, write to the Free	Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA	Sam Lantinga	slouken@libsdl.org*/#ifdef SAVE_RCSIDstatic char rcsid = "@(#) $Id: SDL_gsvideo.c,v 1.5 2002/03/06 11:23:06 slouken Exp $";#endif/* Framebuffer console based SDL video driver implementation.*/#include <stdlib.h>#include <stdio.h>#include <fcntl.h>#include <unistd.h>#include <sys/ioctl.h>#include <sys/mman.h>#include "SDL.h"#include "SDL_error.h"#include "SDL_video.h"#include "SDL_mouse.h"#include "SDL_sysvideo.h"#include "SDL_pixels_c.h"#include "SDL_events_c.h"#include "SDL_cursor_c.h"#include "SDL_gsvideo.h"#include "SDL_gsmouse_c.h"#include "SDL_gsevents_c.h"#include "SDL_gsyuv_c.h"/* Initialization/Query functions */static int GS_VideoInit(_THIS, SDL_PixelFormat *vformat);static SDL_Rect **GS_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags);static SDL_Surface *GS_SetVideoMode(_THIS, SDL_Surface *current, int width, int height, int bpp, Uint32 flags);static int GS_SetColors(_THIS, int firstcolor, int ncolors, SDL_Color *colors);static void GS_VideoQuit(_THIS);/* Hardware surface functions */static int GS_AllocHWSurface(_THIS, SDL_Surface *surface);static int GS_LockHWSurface(_THIS, SDL_Surface *surface);static void GS_UnlockHWSurface(_THIS, SDL_Surface *surface);static void GS_FreeHWSurface(_THIS, SDL_Surface *surface);/* GS driver bootstrap functions */static int GS_Available(void){	int console, memory;	console = open(PS2_DEV_GS, O_RDWR, 0);	if ( console >= 0 ) {		close(console);	}	memory = open(PS2_DEV_MEM, O_RDWR, 0);	if ( memory >= 0 ) {		close(memory);	}	return((console >= 0) && (memory >= 0));}static void GS_DeleteDevice(SDL_VideoDevice *device){	free(device->hidden);	free(device);}static SDL_VideoDevice *GS_CreateDevice(int devindex){	SDL_VideoDevice *this;	/* Initialize all variables that we clean on shutdown */	this = (SDL_VideoDevice *)malloc(sizeof(SDL_VideoDevice));	if ( this ) {		memset(this, 0, (sizeof *this));		this->hidden = (struct SDL_PrivateVideoData *)				malloc((sizeof *this->hidden));	}	if ( (this == NULL) || (this->hidden == NULL) ) {		SDL_OutOfMemory();		if ( this ) {			free(this);		}		return(0);	}	memset(this->hidden, 0, (sizeof *this->hidden));	mouse_fd = -1;	keyboard_fd = -1;	/* Set the function pointers */	this->VideoInit = GS_VideoInit;	this->ListModes = GS_ListModes;	this->SetVideoMode = GS_SetVideoMode;	this->CreateYUVOverlay = GS_CreateYUVOverlay;	this->SetColors = GS_SetColors;	this->UpdateRects = NULL;	this->VideoQuit = GS_VideoQuit;	this->AllocHWSurface = GS_AllocHWSurface;	this->CheckHWBlit = NULL;	this->FillHWRect = NULL;	this->SetHWColorKey = NULL;	this->SetHWAlpha = NULL;	this->LockHWSurface = GS_LockHWSurface;	this->UnlockHWSurface = GS_UnlockHWSurface;	this->FlipHWSurface = NULL;	this->FreeHWSurface = GS_FreeHWSurface;	this->SetIcon = NULL;	this->SetCaption = NULL;	this->GetWMInfo = NULL;	this->FreeWMCursor = GS_FreeWMCursor;	this->CreateWMCursor = GS_CreateWMCursor;	this->ShowWMCursor = GS_ShowWMCursor;	this->MoveWMCursor = GS_MoveWMCursor;	this->InitOSKeymap = GS_InitOSKeymap;	this->PumpEvents = GS_PumpEvents;	this->free = GS_DeleteDevice;	return this;}VideoBootStrap PS2GS_bootstrap = {	"ps2gs", "PlayStation 2 Graphics Synthesizer",	GS_Available, GS_CreateDevice};/* These are the pixel formats for the 32, 24, and 16 bit video modes */static struct {	int bpp;	Uint32 r;	Uint32 g;	Uint32 b;} GS_pixelmasks[] = {	{ 32, 0x000000FF,	/* RGB little-endian */	      0x0000FF00,	      0x00FF0000 },	{ 24, 0x000000FF,	/* RGB little-endian */	      0x0000FF00,	      0x00FF0000 },	{ 16, 0x0000001f,	/* RGB little-endian */	      0x000003e0,	      0x00007c00 },};/* This is a mapping from SDL bytes-per-pixel to GS pixel format */static int GS_formatmap[] = {	-1,		/* 0 bpp, not a legal value */	-1,		/* 8 bpp, not supported (yet?) */	PS2_GS_PSMCT16,	/* 16 bpp */	PS2_GS_PSMCT24,	/* 24 bpp */	PS2_GS_PSMCT32	/* 32 bpp */};static unsigned long long head_tags[] __attribute__((aligned(16))) = {	4 | (1LL << 60),	/* GIFtag */	0x0e,			/* A+D */	0,			/* 2 */	PS2_GS_BITBLTBUF,	0,			/* 4 */	PS2_GS_TRXPOS,	0,			/* 6 */	PS2_GS_TRXREG,	0,			/* 8 */	PS2_GS_TRXDIR};#define MAXIMG		(32767 * 16)#define MAXTAGS		8static inline int loadimage_nonblock(int fd, struct ps2_image *image, int size,                                     unsigned long long *hm,                                     unsigned long long *im){	struct ps2_plist plist;	struct ps2_packet packet[1 + MAXTAGS * 2];	int isize;	int pnum, it, eop;	char *data;	/* initialize the variables */	data = (char *)image->ptr;	pnum = it = eop = 0;	plist.packet = packet;	/* make BITBLT packet */	packet[pnum].ptr = hm;	packet[pnum].len = sizeof(head_tags);	pnum++;	hm[2] = ((unsigned long long)image->fbp << 32) |	        ((unsigned long long)image->fbw << 48) |	        ((unsigned long long)image->psm << 56);	hm[4] = ((unsigned long long)image->x << 32) |	        ((unsigned long long)image->y << 48);	hm[6] = (unsigned long long)image->w |	        ((unsigned long long)image->h << 32);	/* make image mode tags */	while (!eop) {		isize = size > MAXIMG ? MAXIMG : size;		size -= isize;		eop = (size == 0);		packet[pnum].ptr = &im[it];		packet[pnum].len = sizeof(unsigned long long) * 2;		pnum++;		im[it++] = (isize >> 4) | (eop ? (1 << 15) : 0) | (2LL << 58);		im[it++] = 0;		packet[pnum].ptr = (void *)data;		packet[pnum].len = isize;		pnum++;		data += isize;	}	plist.num = pnum;	return ioctl(fd, PS2IOC_SENDL, &plist);}static unsigned long long tex_tags[] __attribute__((aligned(16))) = {	3 | (1LL << 60),	/* GIFtag */	0x0e,			/* A+D */	0,			/* 2 */	PS2_GS_TEX0_1,	(1 << 5) + (1 << 6),	PS2_GS_TEX1_1,	0,	PS2_GS_TEXFLUSH};static unsigned long long scale_tags[] __attribute__((aligned(16))) = {	5 | (1LL << 60),	/* GIFtag */	0x0e,			/* A+D */	6 + (1 << 4) + (1 << 8),	PS2_GS_PRIM,	((unsigned long long)0 * 16) + (((unsigned long long)0 * 16) << 16),	PS2_GS_UV,	((unsigned long long)0 * 16) + (((unsigned long long)0 * 16) << 16),	PS2_GS_XYZ2,	0,			/* 8 */	PS2_GS_UV,	0,			/* 10 */	PS2_GS_XYZ2};int scaleimage_nonblock(int fd, unsigned long long *tm, unsigned long long *sm){	struct ps2_plist plist;	struct ps2_packet packet[2];	/* initialize the variables */	plist.num = 2;	plist.packet = packet;	packet[0].ptr = tm;	packet[0].len = sizeof(tex_tags);	packet[1].ptr = sm;	packet[1].len = sizeof(scale_tags);	return ioctl(fd, PS2IOC_SENDL, &plist);}static int power_of_2(int value){	int shift;	for ( shift = 0; (1<<shift) < value; ++shift ) {		/* Keep looking */ ;	}	return(shift);}static int GS_VideoInit(_THIS, SDL_PixelFormat *vformat){	struct ps2_screeninfo vinfo;	/* Initialize the library */	console_fd = open(PS2_DEV_GS, O_RDWR, 0);	if ( console_fd < 0 ) {		SDL_SetError("Unable to open %s", PS2_DEV_GS);		return(-1);	}	memory_fd = open(PS2_DEV_MEM, O_RDWR, 0);	if ( memory_fd < 0 ) {		close(console_fd);		console_fd = -1;		SDL_SetError("Unable to open %s", PS2_DEV_MEM);		return(-1);	}	/* Determine the current screen depth */	if ( ioctl(console_fd, PS2IOC_GSCREENINFO, &vinfo) < 0 ) {		close(memory_fd);		close(console_fd);		console_fd = -1;		SDL_SetError("Couldn't get console pixel format");		return(-1);	}	switch (vinfo.psm) {	    /* Supported pixel formats */	    case PS2_GS_PSMCT32:	    case PS2_GS_PSMCT24:	    case PS2_GS_PSMCT16:		break;	    default:		GS_VideoQuit(this);		SDL_SetError("Unknown console pixel format: %d", vinfo.psm);		return(-1);	}	vformat->BitsPerPixel = GS_pixelmasks[vinfo.psm].bpp;	vformat->Rmask = GS_pixelmasks[vinfo.psm].r;	vformat->Gmask = GS_pixelmasks[vinfo.psm].g;	vformat->Bmask = GS_pixelmasks[vinfo.psm].b;	saved_vinfo = vinfo;	/* Enable mouse and keyboard support */	if ( GS_OpenKeyboard(this) < 0 ) {		GS_VideoQuit(this);		SDL_SetError("Unable to open keyboard");		return(-1);	}	if ( GS_OpenMouse(this) < 0 ) {		const char *sdl_nomouse;		sdl_nomouse = getenv("SDL_NOMOUSE");		if ( ! sdl_nomouse ) {			GS_VideoQuit(this);			SDL_SetError("Unable to open mouse");			return(-1);