/*

    SDL - Simple DirectMedia Layer

    Copyright (C) 1997-2004 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_RCSID

static char rcsid =

 "@(#) $Id$";

#endif

/* X11 based SDL video driver implementation.

   Note:  This implementation does not currently need X11 thread locking,

          since the event thread uses a separate X connection and any

          additional locking necessary is handled internally.  However,

          if full locking is neccessary, take a look at XInitThreads().

*/

#include <stdlib.h>

#include <stdio.h>

#include <unistd.h>

#include <string.h>

#include <sys/ioctl.h>

#ifdef MTRR_SUPPORT

#include <asm/mtrr.h>

#include <sys/fcntl.h>

#endif

#ifdef HAVE_ALLOCA_H

#include <alloca.h>

#endif

#ifdef HAVE_ALLOCA

#define ALLOCA(n) ((void*)alloca(n))

#define FREEA(p)

#else

#define ALLOCA(n) malloc(n)

#define FREEA(p) free(p)

#endif

#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_x11video.h"

#include "SDL_x11wm_c.h"

#include "SDL_x11mouse_c.h"

#include "SDL_x11events_c.h"

#include "SDL_x11modes_c.h"

#include "SDL_x11image_c.h"

#include "SDL_x11yuv_c.h"

#include "SDL_x11gl_c.h"

#include "SDL_x11gamma_c.h"

#include "blank_cursor.h"

/* Initialization/Query functions */

static int X11_VideoInit(_THIS, SDL_PixelFormat *vformat);

static SDL_Surface *X11_SetVideoMode(_THIS, SDL_Surface *current, int width, int height, int bpp, Uint32 flags);

static int X11_ToggleFullScreen(_THIS, int on);

static void X11_UpdateMouse(_THIS);

static int X11_SetColors(_THIS, int firstcolor, int ncolors,

			 SDL_Color *colors);

static int X11_SetGammaRamp(_THIS, Uint16 *ramp);

static void X11_VideoQuit(_THIS);

/* X11 driver bootstrap functions */

static int X11_Available(void)

{

	}

	return(display != NULL);

}

static void X11_DeleteDevice(SDL_VideoDevice *device)

{

	if ( device ) {

		if ( device->hidden ) {

			free(device->hidden);

		}

		if ( device->gl_data ) {

			free(device->gl_data);

		}

		free(device);

	}

}

static SDL_VideoDevice *X11_CreateDevice(int devindex)

{

#ifdef XFREE86_XV

#endif

#ifdef HAVE_OPENGL

#endif

	return device;

}

VideoBootStrap X11_bootstrap = {

	"x11", "X Window System",

	X11_Available, X11_CreateDevice

};

/* Normal X11 error handler routine */

static int (*X_handler)(Display *, XErrorEvent *) = NULL;

static int x_errhandler(Display *d, XErrorEvent *e)

{

#ifdef XFREE86_VM

	extern int vm_error;

#endif

#ifdef XFREE86_DGAMOUSE

	extern int dga_error;

#endif

#ifdef XFREE86_VM

	/* VidMode errors are non-fatal. :) */

	/* Are the errors offset by one from the error base?

	   e.g. the error base is 143, the code is 148, and the

	        actual error is XF86VidModeExtensionDisabled (4) ?

	 */

        if ( (vm_error >= 0) &&

	     (((e->error_code == BadRequest)&&(e->request_code == vm_error)) ||

	      ((e->error_code > vm_error) &&

	       (e->error_code <= (vm_error+XF86VidModeNumberErrors)))) ) {

#ifdef XFREE86_DEBUG

{ char errmsg[1024];

  XGetErrorText(d, e->error_code, errmsg, sizeof(errmsg));

printf("VidMode error: %s\n", errmsg);

}

#endif

        	return(0);

        }

#endif /* XFREE86_VM */

#ifdef XFREE86_DGAMOUSE

	/* DGA errors can be non-fatal. :) */

        if ( (dga_error >= 0) &&

	     ((e->error_code > dga_error) &&

	      (e->error_code <= (dga_error+XF86DGANumberErrors))) ) {

#ifdef XFREE86_DEBUG

{ char errmsg[1024];

  XGetErrorText(d, e->error_code, errmsg, sizeof(errmsg));

printf("DGA error: %s\n", errmsg);

}

#endif

        	return(0);

        }

#endif /* XFREE86_DGAMOUSE */

	return(X_handler(d,e));

}

/* X11 I/O error handler routine */

static int (*XIO_handler)(Display *) = NULL;

static int xio_errhandler(Display *d)

{

	/* Ack!  Lost X11 connection! */

	/* We will crash if we try to clean up our display */

	if ( current_video->hidden->Ximage ) {

		SDL_VideoSurface->pixels = NULL;

	}

	current_video->hidden->X11_Display = NULL;

	/* Continue with the standard X11 error handler */

	return(XIO_handler(d));

}

/* Create auxiliary (toplevel) windows with the current visual */

static void create_aux_windows(_THIS)

{

    XSetWindowAttributes xattr;

    XWMHints *hints;

    XTextProperty titleprop, iconprop;

    int def_vis = (SDL_Visual == DefaultVisual(SDL_Display, SDL_Screen));

    /* Don't create any extra windows if we are being managed */

    if ( SDL_windowid ) {

	FSwindow = 0;

	WMwindow = strtol(SDL_windowid, NULL, 0);

        return;

    }

    if(FSwindow)

    xattr.override_redirect = True;

    xattr.background_pixel = def_vis ? BlackPixel(SDL_Display, SDL_Screen) : 0;

    xattr.border_pixel = 0;

    xattr.colormap = SDL_XColorMap;

                             xinerama_x, xinerama_y, 32, 32, 0,

			     this->hidden->depth, InputOutput, SDL_Visual,

			     CWOverrideRedirect | CWBackPixel | CWBorderPixel

			     | CWColormap,

			     &xattr);

    /* Tell KDE to keep the fullscreen window on top */

    {

	XEvent ev;

	long mask;

	memset(&ev, 0, sizeof(ev));

	ev.xclient.type = ClientMessage;

	ev.xclient.window = SDL_Root;

					      "KWM_KEEP_ON_TOP", False);

	ev.xclient.format = 32;

	ev.xclient.data.l[0] = FSwindow;

	ev.xclient.data.l[1] = CurrentTime;

	mask = SubstructureRedirectMask;

    }

    hints = NULL;

    titleprop.value = iconprop.value = NULL;

    if(WMwindow) {

	/* All window attributes must survive the recreation */

    }

    /* Create the window for windowed management */

    /* (reusing the xattr structure above) */

			     this->hidden->depth, InputOutput, SDL_Visual,

			     CWBackPixel | CWBorderPixel | CWColormap,

			     &xattr);

    /* Set the input hints so we get keyboard input */

    if(!hints) {

	hints->input = True;

	hints->flags = InputHint;

    }

    if(titleprop.value) {

    }

    if(iconprop.value) {

    }

		 FocusChangeMask | KeyPressMask | KeyReleaseMask

		 | PropertyChangeMask | StructureNotifyMask | KeymapStateMask);

    /* Set the class hints so we can get an icon (AfterStep) */

    {

	XClassHint *classhints;

	if(classhints != NULL) {

            char *classname = getenv("SDL_VIDEO_X11_WMCLASS");

            if ( ! classname ) {

                classname = "SDL_App";

            }

	    classhints->res_name = classname;

	    classhints->res_class = classname;

	}

    }

    /* Allow the window to be deleted by the window manager */

}

static int X11_VideoInit(_THIS, SDL_PixelFormat *vformat)

{

	char *display;

	int i;

	/* Open the X11 display */

	display = NULL;		/* Get it from DISPLAY environment variable */

		local_X11 = 1;

	} else {

		local_X11 = 0;

	}

	if ( SDL_Display == NULL ) {

		SDL_SetError("Couldn't open X11 display");

		return(-1);

	}

#ifdef X11_DEBUG

#endif

	/* Create an alternate X display for graphics updates -- allows us

	   to do graphics updates in a separate thread from event handling.

	   Thread-safe X11 doesn't seem to exist.

	 */

	if ( GFX_Display == NULL ) {

		SDL_SetError("Couldn't open X11 display");

		return(-1);

	}

	/* Set the normal X error handler */

	/* Set the error handler if we lose the X display */

	/* use default screen (from $DISPLAY) */

	SDL_Screen = DefaultScreen(SDL_Display);

#ifndef NO_SHARED_MEMORY

	/* Check for MIT shared memory extension */

	use_mitshm = 0;

	if ( local_X11 ) {

	}

#endif /* NO_SHARED_MEMORY */

	/* Get the available video modes */

	if(X11_GetVideoModes(this) < 0)

	    return -1;

	/* Determine the default screen depth:

	   Use the default visual (or at least one with the same depth) */

	SDL_DisplayColormap = DefaultColormap(SDL_Display, SDL_Screen);

	for(i = 0; i < this->hidden->nvisuals; i++)

	    if(this->hidden->visuals[i].depth == DefaultDepth(SDL_Display,

							      SDL_Screen))

		break;

	if(i == this->hidden->nvisuals) {

	    /* default visual was useless, take the deepest one instead */

	    i = 0;

	}

	SDL_Visual = this->hidden->visuals[i].visual;

	if ( SDL_Visual == DefaultVisual(SDL_Display, SDL_Screen) ) {

	    SDL_XColorMap = SDL_DisplayColormap;

	} else {

					    SDL_Visual, AllocNone);

	}

	this->hidden->depth = this->hidden->visuals[i].depth;

	vformat->BitsPerPixel = this->hidden->visuals[i].bpp;

	if ( vformat->BitsPerPixel > 8 ) {

		vformat->Rmask = SDL_Visual->red_mask;

	  	vformat->Gmask = SDL_Visual->green_mask;

	  	vformat->Bmask = SDL_Visual->blue_mask;

	}

	X11_SaveVidModeGamma(this);

	/* See if we have been passed a window to use */

	SDL_windowid = getenv("SDL_WINDOWID");

	/* Create the fullscreen and managed windows */

	create_aux_windows(this);

	/* Create the blank cursor */

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

					BLANK_CWIDTH, BLANK_CHEIGHT,

						BLANK_CHOTX, BLANK_CHOTY);

	/* Fill in some window manager capabilities */

	this->info.wm_available = 1;

	/* We're done! */

	return(0);

}

static void X11_DestroyWindow(_THIS, SDL_Surface *screen)

{

	/* Clean up OpenGL */

	if ( screen ) {

		screen->flags &= ~(SDL_OPENGL|SDL_OPENGLBLIT);

	}

	X11_GL_Shutdown(this);

	if ( ! SDL_windowid ) {

		/* Hide the managed window */

		if ( WMwindow ) {

		}

		if ( screen && (screen->flags & SDL_FULLSCREEN) ) {

			screen->flags &= ~SDL_FULLSCREEN;

			X11_LeaveFullScreen(this);

		}

		/* Destroy the output window */

		if ( SDL_Window ) {

		}

		/* Free the colormap entries */

		if ( SDL_XPixels ) {

			int numcolors;

			unsigned long pixel;

			numcolors = SDL_Visual->map_entries;

			for ( pixel=0; pixel<numcolors; ++pixel ) {

				while ( SDL_XPixels[pixel] > 0 ) {

						SDL_DisplayColormap,&pixel,1,0);

					--SDL_XPixels[pixel];

				}

			}

			free(SDL_XPixels);

			SDL_XPixels = NULL;

		} 

		/* Free the graphics context */

		if ( SDL_GC ) {

			SDL_GC = 0;