/*

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_GetAttribute(_THIS, SDL_GLattr attrib, int* value);

#endif /* HAVE_OPENGL */

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 = NULL;

device->GL_GetProcAddress = NULL;

device->GL_MakeCurrent = NULL;

#else

device->GL_SwapBuffers = NULL;

device->free = ph_DeleteDevice;

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);

if (widget == NULL)

{

SDL_SetError("Couldn't create video window");

}

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_MAX);

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

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

}

else

{

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

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

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

}

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

{

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

}

else

{

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

Ph_WM_RENDER_CLOSE | Ph_WM_RENDER_MENU | Ph_WM_RENDER_MIN);

}

if (flags & SDL_FULLSCREEN)

{

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 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)

{

}

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

{

}

/* 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);

currently_fullscreen = 0;

this->info.wm_available = 1;

return 0;

}

static SDL_Surface *ph_SetVideoMode(_THIS, SDL_Surface *current,

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

{

PgDisplaySettings_t settings;

int rtnval;

int i;

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

SDL_Lock_EventThread();

current->flags = flags;

/* 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 the window */

{

/* Get the video mode and set it */

{

if ((mode = get_mode_any_format(width, height, bpp)) == 0)

{

exit(1);

}

}

else

{

if ((mode = get_mode(width, height, bpp)) == 0)

{

exit(1);

}

}

if (bpp==8)

{

desktoppal=SDLPH_PAL_SYSTEM;

}

/* save old video mode caps */

PgGetVideoMode(&settings);

old_video_mode=settings.mode;

old_refresh_rate=settings.refresh;

/* setup new video mode */

settings.mode = mode;

settings.refresh = 0;

current->flags &= ~SDL_RESIZABLE; /* no resize for Direct Context */

current->flags |= SDL_HWSURFACE;

/* Begin direct mode */

ph_EnterFullScreen(this);

} /* end fullscreen flag */

else

{

/* using palette emulation code in window mode */

if (bpp==8)

{

if (desktopbpp>=15)

{

desktoppal=SDLPH_PAL_EMULATE;

}

else

{

desktoppal=SDLPH_PAL_SYSTEM;

}

/* fill the palette */

PgGetPalette(savedpal);

PgGetPalette(syspalph);

current->format->palette = calloc(1, sizeof(SDL_Palette));

current->format->palette->ncolors = _Pg_MAX_PALETTE;

current->format->palette->colors = (SDL_Color *)calloc(_Pg_MAX_PALETTE, sizeof(SDL_Color));

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

{

colors[i].r = PgRedValue(syspalph[i]);

colors[i].g = PgGreenValue(syspalph[i]);

colors[i].b = PgBlueValue(syspalph[i]);

}

}

else

}

current->w = width;

current->h = height;

/* These values can be overridden in ph_SetupUpdateFunction() */

current->format->BitsPerPixel = bpp;

current->format->BytesPerPixel = (bpp+7)/8;

current->pitch = SDL_CalculatePitch(current);

if (rtnval==-1)

{

return NULL;

}

/* finish window drawing */

PtFlush();

SDL_Unlock_EventThread();

/* We're done! */

}

static void ph_VideoQuit(_THIS)

{

if (currently_fullscreen)

{

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 */

/* restore palette */

if (desktoppal!=SDLPH_PAL_NONE)

{

PgSetPalette(savedpal, 1, 0, _Pg_MAX_PALETTE, Pg_PALSET_HARD | Pg_PALSET_FORCE_EXPOSE, 0);

/* pass -1, to force release palette */

PgSetPalette(savedpal, 1, 0, -1, Pg_PALSET_HARD | Pg_PALSET_FORCE_EXPOSE, 0);

}

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)

{

/* window mode must use soft palette */

PgSetPalette(&syspalph[firstcolor], 1, firstcolor, ncolors, Pg_PALSET_SOFT, 0);

/* 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)

{

}

switch (attrib)

{

case SDL_GL_DOUBLEBUFFER:

*value=this->gl_config.double_buffer;

break;

case SDL_GL_STENCIL_SIZE:

*value=this->gl_config.stencil_size;

break;

case SDL_GL_DEPTH_SIZE:

*value=this->gl_config.depth_size;

break;

default:

*value=0;

return(-1);

}

return 0;