/*

SDL - Simple DirectMedia Layer

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

*/

#ifdef SAVE_RCSID

static char rcsid =

"@(#) $Id$";

#endif

#include <stdlib.h>

#include <stdio.h>

#include <unistd.h>

#include <string.h>

#include <sys/ioctl.h>

#include "SDL.h"

#include "SDL_error.h"

#include "SDL_timer.h"

#include "SDL_thread.h"

#include "SDL_video.h"

#include "SDL_mouse.h"

#include "SDL_endian.h"

#include "SDL_sysvideo.h"

#include "SDL_pixels_c.h"

#include "SDL_events_c.h"

#include "SDL_ph_video.h"

#include "SDL_ph_modes_c.h"

#include "SDL_ph_image_c.h"

#include "SDL_ph_events_c.h"

#include "SDL_ph_mouse_c.h"

#include "SDL_phyuv_c.h"

#include "blank_cursor.h"

static int ph_VideoInit(_THIS, SDL_PixelFormat *vformat);

static SDL_Surface *ph_SetVideoMode(_THIS, SDL_Surface *current,

int width, int height, int bpp, Uint32 flags);

static int ph_SetColors(_THIS, int firstcolor, int ncolors, SDL_Color *colors);

static void ph_VideoQuit(_THIS);

static void ph_DeleteDevice(SDL_VideoDevice *device);

#ifdef HAVE_OPENGL

static int ph_GL_LoadLibrary(_THIS, const char* path);

static void* ph_GL_GetProcAddress(_THIS, const char* proc);

static int ph_Available(void)

{

int phstat=-1;

phstat=PtInit(0);

if (phstat==0)

{

return 1;

}

else

{

return 0;

}

}

static SDL_VideoDevice *ph_CreateDevice(int devindex)

{

SDL_VideoDevice *device;

/* Initialize all variables that we clean on shutdown */

device = (SDL_VideoDevice *)malloc(sizeof(SDL_VideoDevice));

memset(device, 0, (sizeof *device));

device->hidden = (struct SDL_PrivateVideoData *)

malloc((sizeof *device->hidden));

device->gl_data = NULL;

}

SDL_OutOfMemory();

ph_DeleteDevice(device);

return(0);

}

memset(device->hidden, 0, (sizeof *device->hidden));

/* Set the driver flags */

/* Set the function pointers */

device->VideoInit = ph_VideoInit;

device->ListModes = ph_ListModes;

device->SetVideoMode = ph_SetVideoMode;

device->VideoQuit = ph_VideoQuit;

device->AllocHWSurface = ph_AllocHWSurface;

device->CheckHWBlit = NULL;

device->FillHWRect = NULL;

device->SetHWColorKey = NULL;

device->SetHWAlpha = NULL;

device->LockHWSurface = ph_LockHWSurface;

device->UnlockHWSurface = ph_UnlockHWSurface;

device->FlipHWSurface = ph_FlipHWSurface;

device->FreeHWSurface = ph_FreeHWSurface;

device->FreeWMCursor = ph_FreeWMCursor;

device->CreateWMCursor = ph_CreateWMCursor;

device->ShowWMCursor = ph_ShowWMCursor;

device->WarpWMCursor = ph_WarpWMCursor;

device->CheckMouseMode = ph_CheckMouseMode;

device->InitOSKeymap = ph_InitOSKeymap;

device->PumpEvents = ph_PumpEvents;

device->GL_LoadLibrary = ph_GL_LoadLibrary;

device->GL_GetProcAddress = ph_GL_GetProcAddress;

#else

device->GL_SwapBuffers = NULL;

device->GL_LoadLibrary = NULL;

device->GL_GetProcAddress = NULL;

return device;

}

"photon", "QNX Photon video output",

ph_Available, ph_CreateDevice

};

static void ph_DeleteDevice(SDL_VideoDevice *device)

{

if (device)

{

if (device->hidden)

{

free(device->hidden);

device->hidden = NULL;

}

if (device->gl_data)

{

free(device->gl_data);

device->gl_data = NULL;

}

free(device);

device = NULL;

}

}

static PtWidget_t *ph_CreateWindow(_THIS)

{

PtWidget_t *widget;

widget = PtCreateWidget(PtWindow, NULL, 0, 0);

return widget;

}

static int ph_SetupWindow(_THIS, int w, int h, int flags)

{

PtArg_t args[32];

PhPoint_t pos = {0, 0};

PhDim_t dim = {w, h};

int nargs = 0;

PtSetArg(&args[nargs++], Pt_ARG_DIM, &dim, 0);

PtSetArg(&args[nargs++], Pt_ARG_FILL_COLOR, Pg_BLACK, 0);

if ((flags & SDL_RESIZABLE) == SDL_RESIZABLE)

{

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_MANAGED_FLAGS, Pt_FALSE, Ph_WM_RESIZE | Ph_WM_CLOSE);

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_MANAGED_FLAGS, Pt_TRUE, Ph_WM_MAX | Ph_WM_RESTORE);

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_NOTIFY_FLAGS, Pt_TRUE, Ph_WM_RESIZE | Ph_WM_MOVE | Ph_WM_MAX | Ph_WM_RESTORE | Ph_WM_CLOSE);

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_RENDER_FLAGS, Pt_TRUE, Ph_WM_RENDER_RESIZE | Ph_WM_RENDER_MAX | Ph_WM_RENDER_COLLAPSE | Ph_WM_RENDER_RETURN);

}

else

{

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_MANAGED_FLAGS, Pt_FALSE, Ph_WM_RESIZE | Ph_WM_MAX | Ph_WM_RESTORE | Ph_WM_CLOSE);

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_NOTIFY_FLAGS, Pt_FALSE, Ph_WM_RESIZE | Ph_WM_MAX | Ph_WM_RESTORE);

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_NOTIFY_FLAGS, Pt_TRUE, Ph_WM_MOVE | Ph_WM_CLOSE);

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_RENDER_FLAGS, Pt_FALSE, Ph_WM_RENDER_RESIZE | Ph_WM_RENDER_MAX | Ph_WM_RENDER_COLLAPSE | Ph_WM_RENDER_RETURN);

}

if (((flags & SDL_NOFRAME)==SDL_NOFRAME) || ((flags & SDL_FULLSCREEN)==SDL_FULLSCREEN))

{

if ((flags & SDL_RESIZABLE) != SDL_RESIZABLE)

{

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_RENDER_FLAGS, Pt_FALSE, Pt_TRUE);

}

else

{

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_RENDER_FLAGS, Pt_FALSE, Pt_TRUE);

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_RENDER_FLAGS, Pt_TRUE, Ph_WM_RENDER_RESIZE | Ph_WM_RENDER_BORDER);

}

}

else

{

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_RENDER_FLAGS, Pt_TRUE, Ph_WM_RENDER_BORDER | Ph_WM_RENDER_TITLE |

}

{

PtSetArg(&args[nargs++], Pt_ARG_POS, &pos, 0);

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_MANAGED_FLAGS, Pt_TRUE, Ph_WM_FFRONT | Ph_WM_MAX);

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_STATE, Pt_TRUE, Ph_WM_STATE_ISFRONT | Ph_WM_STATE_ISMAX |

Ph_WM_STATE_ISFOCUS | Ph_WM_STATE_ISALTKEY);

}

else

{

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_STATE, Pt_FALSE, Ph_WM_STATE_ISFRONT | Ph_WM_STATE_ISMAX | Ph_WM_STATE_ISALTKEY);

PtSetArg(&args[nargs++], Pt_ARG_WINDOW_MANAGED_FLAGS, Pt_TRUE, Ph_WM_HIDE);

PtSetArg(&args[nargs++], Pt_ARG_RESIZE_FLAGS, Pt_FALSE, Pt_RESIZE_XY_AS_REQUIRED);

}

PtSetResources(window, nargs, args);

PtRealizeWidget(window);

return 0;

}

static const struct ColourMasks* ph_GetColourMasks(int bpp)

{

/* The alpha mask doesn't appears to be needed */

static const struct ColourMasks phColorMasks[5] = {

/* 8 bit */ {0, 0, 0, 0, 8},

/* 15 bit ARGB */ {0x7C00, 0x03E0, 0x001F, 0x8000, 15},

/* 16 bit RGB */ {0xF800, 0x07E0, 0x001F, 0x0000, 16},

/* 24 bit RGB */ {0xFF0000, 0x00FF00, 0x0000FF, 0x000000, 24},

/* 32 bit ARGB */ {0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000, 32},

};

switch (bpp)

{

case 8:

return &phColorMasks[0];

case 15:

return &phColorMasks[1];

case 16:

return &phColorMasks[2];

case 24:

return &phColorMasks[3];

case 32:

return &phColorMasks[4];

}

return NULL;

}

static int ph_VideoInit(_THIS, SDL_PixelFormat *vformat)

{

PgVideoModeInfo_t my_mode_info;

PgHWCaps_t my_hwcaps;

#ifdef HAVE_OPENGL

oglctx=NULL;

#endif /* HAVE_OPENGL */

old_video_mode=-1;

old_refresh_rate=-1;

if (NULL == (event = malloc(EVENT_SIZE)))

{

SDL_OutOfMemory();

return -1;

window = ph_CreateWindow(this);

if (window == NULL)

{

return -1;

}

/* Create the blank cursor */

SDL_BlankCursor = this->CreateWMCursor(this, blank_cdata, blank_cmask,

(int)BLANK_CWIDTH, (int)BLANK_CHEIGHT,

(int)BLANK_CHOTX, (int)BLANK_CHOTY);

if (SDL_BlankCursor == NULL)

{

}

if (PgGetGraphicsHWCaps(&my_hwcaps) < 0)

{

SDL_SetError("ph_VideoInit(): GetGraphicsHWCaps function failed !\n");

this->FreeWMCursor(this, SDL_BlankCursor);

return -1;

}

if (PgGetVideoModeInfo(my_hwcaps.current_video_mode, &my_mode_info) < 0)

{

SDL_SetError("ph_VideoInit(): PgGetVideoModeInfo function failed !\n");

this->FreeWMCursor(this, SDL_BlankCursor);

return -1;

}

/* We need to return BytesPerPixel as it in used by CreateRGBsurface */

vformat->BitsPerPixel = my_mode_info.bits_per_pixel;

vformat->BytesPerPixel = my_mode_info.bytes_per_scanline/my_mode_info.width;

/* save current palette */

if (desktopbpp==8)

PgGetPalette(savedpal);

PgGetPalette(syspalph);

else

{

for(i=0; i<_Pg_MAX_PALETTE; i++)

{

savedpal[i]=PgRGB(0, 0, 0);

syspalph[i]=PgRGB(0, 0, 0);

}

}

currently_hided = 0;

current_overlay = NULL;

OCImage.direct_context = NULL;

OCImage.offscreen_context = NULL;

OCImage.offscreen_backcontext = NULL;

OCImage.oldDC = NULL;

OCImage.CurrentFrameData = NULL;

OCImage.FrameData0 = NULL;

OCImage.FrameData1 = NULL;

this->info.wm_available = 1;

return 0;

}

static SDL_Surface *ph_SetVideoMode(_THIS, SDL_Surface *current,

int width, int height, int bpp, Uint32 flags)

{

/* Lock the event thread, in multi-threading environments */

SDL_Lock_EventThread();

current->flags = flags;

/* if we do not have desired fullscreen mode, then fallback into window mode */

if (((current->flags & SDL_FULLSCREEN) == SDL_FULLSCREEN) && (ph_GetVideoMode(width, height, bpp)==0))

{

current->flags &= ~SDL_FULLSCREEN;

current->flags &= ~SDL_NOFRAME;

current->flags &= ~SDL_RESIZABLE;

}

ph_SetupWindow(this, width, height, current->flags);

mask = ph_GetColourMasks(bpp);

if (mask != NULL)

{

SDL_ReallocFormat(current, mask->bpp, mask->red, mask->green, mask->blue, 0);

}

else

{

SDL_SetError("ph_SetVideoMode(): desired bpp is not supported by photon !\n");

return NULL;

}

/* ph_SetupOpenGLContext creates also window as need */

if (ph_SetupOpenGLContext(this, width, height, bpp, flags)==0)

{

}

else

{

/* if context creation fail, report no OpenGL to high level */

else

{

/* Initialize internal variables */

if ((current->flags & SDL_FULLSCREEN) == SDL_FULLSCREEN)

if (bpp==8)

{

desktoppal=SDLPH_PAL_SYSTEM;

}

else

{

/* remove this if we'll support non-fullscreen sw/hw+doublebuf */

current->flags &= ~SDL_DOUBLEBUF;

/* Use offscreen memory if SDL_HWSURFACE flag is set */

if ((current->flags & SDL_HWSURFACE) == SDL_HWSURFACE)

if (desktopbpp!=bpp)

{

current->flags &= ~SDL_HWSURFACE;

}

/* using palette emulation code in window mode */

if (bpp==8)

{

if (desktopbpp>=15)

{

}

else

{

}

}

else

}

current->w = width;

current->h = height;

if (desktoppal==SDLPH_PAL_SYSTEM)

{

current->flags|=SDL_HWPALETTE;

}

/* Must call at least once for setup image planes */

if (ph_SetupUpdateFunction(this, current, current->flags)==-1)

{

return NULL;

}

/* finish window drawing, if we are not in fullscreen, of course */

if ((current->flags & SDL_FULLSCREEN) != SDL_FULLSCREEN)

{

PtFlush();

}

SDL_Unlock_EventThread();

/* We're done! */

}

static void ph_VideoQuit(_THIS)

{

/* restore palette */

if (desktopbpp==8)

PgSetPalette(syspalph, 0, -1, 0, 0, 0);

PgSetPalette(savedpal, 0, 0, _Pg_MAX_PALETTE, Pg_PALSET_GLOBAL | Pg_PALSET_FORCE_EXPOSE, 0);

PgFlush();

ph_DestroyImage(this, SDL_VideoSurface);

if (((this->screen->flags & SDL_FULLSCREEN)==SDL_FULLSCREEN) &&

((this->screen->flags & SDL_OPENGL)==SDL_OPENGL))

{

region_info.cursor_type=Ph_CURSOR_POINTER;

region_info.rid=PtWidgetRid(window);

PhRegionChange(Ph_REGION_CURSOR, 0, &region_info, NULL, NULL);

}

}

PtFlush();

#endif /* HAVE_OPENGL */

if (window)

{

PtUnrealizeWidget(window);

PtDestroyWidget(window);

window=NULL;

}

#ifdef HAVE_OPENGL

if (oglctx)

{

PhDCSetCurrent(NULL);

PhDCRelease(oglctx);

oglctx=NULL;

}

#endif /* HAVE_OPENGL */

if (event!=NULL)

{

free(event);

event=NULL;

}

static int ph_SetColors(_THIS, int firstcolor, int ncolors, SDL_Color *colors)

{

SDL_Rect updaterect;

updaterect.x = updaterect.y = 0;

updaterect.w = this->screen->w;

updaterect.h = this->screen->h;

/* palette emulation code, using palette of the PhImage_t struct */

if (desktoppal==SDLPH_PAL_EMULATE)

{

if ((SDL_Image) && (SDL_Image->palette))

{

for (i=firstcolor; i<firstcolor+ncolors; i++)

{

syspalph[i] = PgRGB(colors[i-firstcolor].r, colors[i-firstcolor].g, colors[i-firstcolor].b);

SDL_Image->palette[i] = syspalph[i];

/* image needs to be redrawn */

this->UpdateRects(this, 1, &updaterect);

else

{

if (desktoppal==SDLPH_PAL_SYSTEM)

for (i=firstcolor; i<firstcolor+ncolors; i++)

{

}

if ((this->screen->flags & SDL_FULLSCREEN) != SDL_FULLSCREEN)

{

/* image needs to be redrawn */

this->UpdateRects(this, 1, &updaterect);

}

else

{

/* fullscreen mode must use hardware palette */

}

return 1;

}

int ph_SetupOpenGLContext(_THIS, int width, int height, int bpp, Uint32 flags)

{

PhDim_t dim;

uint64_t OGLAttrib[PH_OGL_MAX_ATTRIBS];

int OGLargc;

dim.w=width;

dim.h=height;

if (oglctx!=NULL)

{

PhDCSetCurrent(NULL);

PhDCRelease(oglctx);

oglctx=NULL;

}

OGLargc=0;

if (this->gl_config.depth_size)

{

OGLAttrib[OGLargc++]=PHOGL_ATTRIB_DEPTH_BITS;

OGLAttrib[OGLargc++]=this->gl_config.depth_size;

}

if (this->gl_config.stencil_size)

{

OGLAttrib[OGLargc++]=PHOGL_ATTRIB_STENCIL_BITS;

OGLAttrib[OGLargc++]=this->gl_config.stencil_size;

}

OGLAttrib[OGLargc++]=PHOGL_ATTRIB_FORCE_SW;

if (flags & SDL_FULLSCREEN)

{

OGLAttrib[OGLargc++]=PHOGL_ATTRIB_FULLSCREEN;

OGLAttrib[OGLargc++]=PHOGL_ATTRIB_DIRECT;

OGLAttrib[OGLargc++]=PHOGL_ATTRIB_FULLSCREEN_BEST;

OGLAttrib[OGLargc++]=PHOGL_ATTRIB_FULLSCREEN_CENTER;

}

OGLAttrib[OGLargc++]=PHOGL_ATTRIB_NONE;

if (this->gl_config.double_buffer)

{

oglctx=PdCreateOpenGLContext(2, &dim, 0, OGLAttrib);

}

else

{

oglctx=PdCreateOpenGLContext(1, &dim, 0, OGLAttrib);

}

if (oglctx==NULL)

{

return (-1);

}

PhDCSetCurrent(oglctx);

/* disable mouse for fullscreen */

if (flags & SDL_FULLSCREEN)

{

PhRegion_t region_info;

region_info.cursor_type=Ph_CURSOR_NONE;

region_info.rid=PtWidgetRid(window);

PhRegionChange(Ph_REGION_CURSOR, 0, &region_info, NULL, NULL);

}

PtFlush();

return 0;

}

void ph_GL_SwapBuffers(_THIS)

{