--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/video/photon/SDL_ph_video.c	Thu Apr 26 16:45:43 2001 +0000
@@ -0,0 +1,496 @@
+/*
+    SDL - Simple DirectMedia Layer
+    Copyright (C) 1997, 1998, 1999, 2000, 2001  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@devolution.com
+*/
+
+#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);
+
+static int ph_Available(void)
+{
+
+        return 1;
+}
+
+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));
+    if ( device ) {
+        memset(device, 0, (sizeof *device));
+        device->hidden = (struct SDL_PrivateVideoData *)
+                malloc((sizeof *device->hidden));
+        device->gl_data = NULL;
+    }
+    if ( (device == NULL) || (device->hidden == NULL) ) {
+        SDL_OutOfMemory();
+        ph_DeleteDevice(device);
+        return(0);
+    }
+    memset(device->hidden, 0, (sizeof *device->hidden));
+
+    /* Set the driver flags */
+    device->handles_any_size = 1; //JB not true for fullscreen
+
+    /* Set the function pointers */
+	device->CreateYUVOverlay = ph_CreateYUVOverlay;
+    device->VideoInit = ph_VideoInit;
+    device->ListModes = ph_ListModes;
+    device->SetVideoMode = ph_SetVideoMode;
+    device->ToggleFullScreen =  ph_ToggleFullScreen;
+    device->UpdateMouse = NULL;	
+    device->SetColors = ph_SetColors;
+    device->UpdateRects =  NULL; //set in ph_ResizeImage
+    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->SetCaption = NULL;
+    device->SetIcon = NULL;
+    device->IconifyWindow = NULL;
+    device->GrabInput = NULL;
+    device->GetWMInfo = NULL;
+    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->free = ph_DeleteDevice;
+
+    return device;
+}
+
+VideoBootStrap X11_bootstrap = {
+        "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 int ph_VideoInit(_THIS, SDL_PixelFormat *vformat)
+{
+	PtArg_t arg[1];
+    PhDim_t dim;
+	PgColor_t ph_palette[_Pg_MAX_PALETTE];
+	int i;
+	unsigned long *tempptr;
+	int rtnval;
+	PgDisplaySettings_t mysettings;
+	PgVideoModeInfo_t my_mode_info;
+	
+     if( NULL == ( event = malloc( EVENT_SIZE ) ) )
+          exit( EXIT_FAILURE );
+
+	/* Create a widget 'window' to capture events */
+    dim.w=0; //JB test320;
+    dim.h=0; //JB test240;
+    //We need to return BytesPerPixel as it in used by CreateRGBsurface
+	
+    PtSetArg(&arg[0], Pt_ARG_DIM, &dim,0);
+    
+/*    
+    PtSetArg(&arg[1], Pt_ARG_RESIZE_FLAGS, Pt_TRUE, Pt_RESIZE_XY_AS_REQUIRED);
+    PtSetArg(&arg[2], Pt_ARG_WINDOW_STATE, Pt_TRUE, Ph_WM_STATE_ISFRONT |
+                        Ph_WM_STATE_ISMAX |
+                        Ph_WM_STATE_ISFOCUS);
+
+    PtSetArg(&arg[3], Pt_ARG_WINDOW_RENDER_FLAGS,Pt_FALSE,~0);
+    PtSetArg(&arg[4], Pt_ARG_WINDOW_MANAGED_FLAGS,Pt_TRUE,
+                        Ph_WM_FFRONT |
+                        Ph_WM_CLOSE |
+                        Ph_WM_TOFRONT |
+                        Ph_WM_CONSWITCH);
+*/    
+    
+    
+	window=PtAppInit(NULL, NULL, NULL, 1, arg);
+
+  	if(window == NULL)
+  	{
+  		printf("PtAppInit failed\n");
+        PtExit(EXIT_FAILURE);
+  	}
+
+    //PgSetDrawBufferSize(16 *1024);
+   	PgSetRegion(PtWidgetRid(window));
+    PgSetClipping(0,NULL);
+    PtRealizeWidget(window);
+
+
+    /* Get the available video modes */
+//    if(ph_GetVideoModes(this) < 0)
+//        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)
+	  printf("could not create blank cursor\n");
+     /* Get the video mode */
+         if (PgGetVideoMode( &mysettings ) < 0)
+            {
+                fprintf(stderr,"ph_VideoInit:  PgGetVideoMode failed\n");
+      			//QNX6/Patch A always fails return code even though call succeeds. fixed Patch B
+            }
+        
+         if (PgGetVideoModeInfo(mysettings.mode, &my_mode_info) < 0)
+            {
+                fprintf(stderr,"ph_VideoInit:  PgGetVideoModeInfo failed\n");
+            }
+       //We need to return BytesPerPixel as it in used by CreateRGBsurface
+       vformat->BitsPerPixel = my_mode_info.bits_per_pixel;
+       vformat->BytesPerPixel = vformat->BitsPerPixel/8;
+ 
+       //return a palette if we are in 256 color mode           
+		if(vformat->BitsPerPixel == 8)
+		{
+			vformat->palette = malloc(sizeof(SDL_Palette));
+			memset(vformat->palette, 0, sizeof(SDL_Palette));
+			vformat->palette->ncolors = 256;
+			vformat->palette->colors = (SDL_Color *)malloc(256 *sizeof(SDL_Color));
+			
+			//fill the palette
+			rtnval = PgGetPalette(ph_palette);
+			if(rtnval < 0)
+			   printf("ph_VideoInit:  PgGetPalette failed\n");
+			   
+       	tempptr = (unsigned long *)vformat->palette->colors;
+
+			for(i=0;i<256; i++)
+			{
+  				*tempptr = (((unsigned long)ph_palette[i]) << 8);
+  				tempptr++;
+
+			}		
+		
+		}
+
+
+	currently_fullscreen = 0;
+    return 0;
+}
+
+static SDL_Surface *ph_SetVideoMode(_THIS, SDL_Surface *current,
+                int width, int height, int bpp, Uint32 flags)
+{
+    PhRegion_t region_info;
+    PgDisplaySettings_t settings;
+	PgVideoModeInfo_t mode_info;
+    int mode, actual_width, actual_height;
+	PtArg_t arg[5];
+	PhDim_t dim;	
+		int rtnval;
+	SDL_Rect ** mymodelist;
+	SDL_PixelFormat myformat;
+	PgColor_t ph_palette[_Pg_MAX_PALETTE];
+	int i;
+	unsigned long *tempptr;
+
+	actual_width = width;
+	actual_height = height;
+
+
+    /* Lock the event thread, in multi-threading environments */
+    SDL_Lock_EventThread();
+
+
+     /* Initialize the window */
+    if (flags & SDL_FULLSCREEN) //Direct Context , assume SDL_HWSURFACE also set
+    {
+
+/*  
+	if (old_video_mode==-1)
+	{
+		PgGetGraphicsHWCaps(&graphics_card_caps);
+		old_video_mode=graphics_card_caps.current_video_mode;
+		old_refresh_rate=graphics_card_caps.current_rrate;
+	}
+*/    	
+    	  	
+    	  	  	
+    	  	  	  	  	
+        /* Get the video mode and set it */
+        if (bpp == 0)
+        {
+            if (PgGetVideoMode( &settings ) < 0)
+            {
+                fprintf(stderr,"error: PgGetVideoMode failed\n");
+            }
+            if (PgGetVideoModeInfo(settings.mode, &mode_info) < 0)
+            {
+                fprintf(stderr,"error: PgGetVideoModeInfo failed\n");
+            }
+            bpp = mode_info.bits_per_pixel;
+        }
+        if (flags & SDL_ANYFORMAT)
+        {
+            if ((mode = get_mode_any_format(width, height, bpp)) == 0)
+            {
+                fprintf(stderr,"error: get_mode_any_format failed\n");
+                exit(1);
+            }
+        }
+        else
+        {
+            if ((mode = get_mode(width, height, bpp)) == 0)
+            {
+                 	fprintf(stderr,"error: get_mode failed\n");
+                	exit(1);
+            }
+               
+           
+        }
+        settings.mode = mode;
+        settings.refresh = 0;
+        settings.flags  = 0;       
+             
+        
+        if (PgSetVideoMode( &settings ) < 0)
+        {
+            fprintf(stderr,"error: PgSetVideoMode failed\n");
+        }
+
+		/* Get the true height and width */
+		
+      current->flags = (flags|(~SDL_RESIZABLE)); //no resize for Direct Context
+
+		 /* Begin direct mode */
+		 ph_EnterFullScreen(this);
+
+       
+
+    } //end fullscreen flag
+    else if (flags & SDL_HWSURFACE)  /* Use offscreen memory iff SDL_HWSURFACE flag is set */
+    {
+      // Hardware surface is Offsceen Context.  ph_ResizeImage handles the switch
+      current->flags = (flags|(~SDL_RESIZABLE)); //no stretch blit in offscreen context
+    }
+    else // must be SDL_SWSURFACE
+    {
+     current->flags = (flags|SDL_RESIZABLE); //yes we can resize as this is a software surface
+     }
+
+
+	//If we are setting video to use the palette make sure we have allocated memory for it
+	if(bpp == 8)
+	{
+		current->format->palette = malloc(sizeof(SDL_Palette));
+		memset(current->format->palette, 0, sizeof(SDL_Palette));
+		current->format->palette->ncolors = 256;
+		current->format->palette->colors = (SDL_Color *)malloc(256 *sizeof(SDL_Color));
+		//fill the palette
+		rtnval = PgGetPalette(ph_palette);
+
+       tempptr = (unsigned long *)current->format->palette->colors;
+
+		for(i=0;i<256; i++)
+		{
+  			*tempptr = (((unsigned long)ph_palette[i]) << 8);
+  			tempptr++;
+
+		}
+	}
+
+
+	//Current window dimensions
+	PtGetResource( window, Pt_ARG_DIM, &dim, 0 );
+	
+	//If we need to resize the window
+	if((dim.w != width)||(dim.h != height))
+	{
+	    dim.w=width;
+    	dim.h=height; 
+    	PtSetArg(&arg[0], Pt_ARG_DIM, &dim,0);
+		PtSetResources( window, 1, arg ); 	
+       current->w = width;
+       current->h = height;
+       current->format->BitsPerPixel = bpp;
+		current->format->BytesPerPixel = bpp/8;
+       current->pitch = SDL_CalculatePitch(current);
+       //Must call at least once it setup image planes 
+       ph_ResizeImage(this, current, flags);
+    }
+
+
+    SDL_Unlock_EventThread();
+
+    /* We're done! */
+    return(current);
+}
+
+static void ph_VideoQuit(_THIS)
+{
+		
+	if(SDL_Image != NULL)
+	{
+	  	    ph_DestroyImage(this, SDL_VideoSurface); 
+	
+	}
+
+	if (currently_fullscreen)
+	{
+		PdDirectStop( directContext );
+		PdReleaseDirectContext( directContext );
+		directContext=0;	
+		currently_fullscreen = 0;
+	}
+	
+}
+
+
+static int ph_SetColors(_THIS, int firstcolor, int ncolors, SDL_Color *colors)
+{
+	PgColor_t *in, *out;
+	int i, j;
+	int alloct_all = 1;
+
+    	colors = this->screen->format->palette->colors;
+
+	in = alloca( ncolors*sizeof(PgColor_t)  );
+	if ( in == NULL  ) {
+		return 0;
+	}
+	memset(in,0,ncolors*sizeof(PgColor_t));
+
+    out = alloca( ncolors*sizeof(PgColor_t)  );
+    if ( out == NULL  ) {
+		return 0;
+    }
+	
+	for (i=0,j=firstcolor;i<ncolors;i++,j++)
+	{
+		in[i] |= colors[j].r<<16 ;
+		in[i] |= colors[j].g<<8 ;
+		in[i] |= colors[j].b ; 
+	}
+
+	if ( (this->screen->flags & SDL_HWPALETTE) == SDL_HWPALETTE ) 
+	{
+		if( PgSetPalette( in, 0, 0, ncolors, Pg_PALSET_HARD, 0) < 0 )
+		{
+			fprintf(stderr,"error: PgSetPalette(..,Pg_PALSET_HARD)  failed\n");
+			return 0;
+		}  
+	}
+	else 
+	{
+		if ( PgColorMatch(ncolors, in, out) < 0 )
+        {
+            fprintf(stderr,"error: PgColorMatch failed\n");
+            return 0;
+        }
+		for (i=0;i<ncolors;i++)
+		{
+			if (memcmp(&in[i],&out[i],sizeof(PgColor_t)))
+			{
+				alloct_all = 0;
+				break;
+			}
+		}
+        if( PgSetPalette( out, 0, 0, ncolors, Pg_PALSET_SOFT, 0) < 0 )
+        {
+            fprintf(stderr,"error: PgSetPalette(..,Pg_PALSET_SOFT) failed\n");
+            return 0;
+        }
+	}
+	return alloct_all;
+}
+
+static int ph_ResizeWindow(_THIS,
+            SDL_Surface *screen, int w, int h, Uint32 flags)
+{
+	PhWindowEvent_t winevent;
+
+	memset( &winevent, 0, sizeof(winevent) ); 
+	winevent.event_f = Ph_WM_RESIZE;
+	winevent.size.w = w;
+	winevent.size.h = h;
+	winevent.rid = PtWidgetRid( window );
+	if (PtForwardWindowEvent( &winevent ) < 0)
+	{
+		fprintf(stderr,"error: PtForwardWindowEvent failed.\n");
+	}
+	current_w = w;
+	current_h = h;
+    return(0);
+}
+
+