/*

    SDL - Simple DirectMedia Layer

    Copyright (C) 1997-2006 Sam Lantinga

    This library is free software; you can redistribute it and/or

    modify it under the terms of the GNU Lesser General Public

    License as published by the Free Software Foundation; either

    version 2.1 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

    Lesser General Public License for more details.

    You should have received a copy of the GNU Lesser General Public

    License along with this library; if not, write to the Free Software

    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

    Sam Lantinga

    slouken@libsdl.org

*/

#include "SDL_config.h"

/* 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 <unistd.h>

#include <sys/ioctl.h>

#ifdef MTRR_SUPPORT

#include <asm/mtrr.h>

#include <sys/fcntl.h>

#endif

#include "SDL_endian.h"

#include "SDL_timer.h"

#include "SDL_thread.h"

#include "SDL_video.h"

#include "SDL_mouse.h"

#include "../SDL_sysvideo.h"

#include "../SDL_pixels_c.h"

#include "../../events/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)

{

	Display *display = NULL;

	if ( SDL_X11_LoadSymbols() ) {

		if ( display != NULL ) {

		}

		SDL_X11_UnloadSymbols();

	}

	return(display != NULL);

}

static void X11_DeleteDevice(SDL_VideoDevice *device)

{

	if ( device ) {

		if ( device->hidden ) {

			SDL_free(device->hidden);

		}

		if ( device->gl_data ) {

			SDL_free(device->gl_data);

		}

		SDL_free(device);

		SDL_X11_UnloadSymbols();

	}

}

static SDL_VideoDevice *X11_CreateDevice(int devindex)

{

	SDL_VideoDevice *device = NULL;

	if ( SDL_X11_LoadSymbols() ) {

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

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

		if ( device ) {

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

			device->hidden = (struct SDL_PrivateVideoData *)

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

			device->gl_data = (struct SDL_PrivateGLData *)

					SDL_malloc((sizeof *device->gl_data));

		}

		if ( (device == NULL) || (device->hidden == NULL) ||

		                         (device->gl_data == NULL) ) {

			SDL_OutOfMemory();

			X11_DeleteDevice(device); /* calls SDL_X11_UnloadSymbols(). */

			return(0);

		}

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

		SDL_memset(device->gl_data, 0, (sizeof *device->gl_data));

		/* Set the driver flags */

		device->handles_any_size = 1;

		/* Set the function pointers */

		device->VideoInit = X11_VideoInit;

		device->ListModes = X11_ListModes;

		device->SetVideoMode = X11_SetVideoMode;

		device->ToggleFullScreen = X11_ToggleFullScreen;

		device->UpdateMouse = X11_UpdateMouse;

#if SDL_VIDEO_DRIVER_X11_XV

		device->CreateYUVOverlay = X11_CreateYUVOverlay;

#endif

		device->SetColors = X11_SetColors;

		device->UpdateRects = NULL;

		device->VideoQuit = X11_VideoQuit;

		device->AllocHWSurface = X11_AllocHWSurface;

		device->CheckHWBlit = NULL;

		device->FillHWRect = NULL;

		device->SetHWColorKey = NULL;

		device->SetHWAlpha = NULL;

		device->LockHWSurface = X11_LockHWSurface;

		device->UnlockHWSurface = X11_UnlockHWSurface;

		device->FlipHWSurface = X11_FlipHWSurface;

		device->FreeHWSurface = X11_FreeHWSurface;

		device->SetGamma = X11_SetVidModeGamma;

		device->GetGamma = X11_GetVidModeGamma;

		device->SetGammaRamp = X11_SetGammaRamp;

		device->GetGammaRamp = NULL;

#if SDL_VIDEO_OPENGL_GLX

		device->GL_LoadLibrary = X11_GL_LoadLibrary;

		device->GL_GetProcAddress = X11_GL_GetProcAddress;

		device->GL_GetAttribute = X11_GL_GetAttribute;

		device->GL_MakeCurrent = X11_GL_MakeCurrent;

		device->GL_SwapBuffers = X11_GL_SwapBuffers;

#endif

		device->SetCaption = X11_SetCaption;

		device->SetIcon = X11_SetIcon;

		device->IconifyWindow = X11_IconifyWindow;

		device->GrabInput = X11_GrabInput;

		device->GetWMInfo = X11_GetWMInfo;

		device->FreeWMCursor = X11_FreeWMCursor;

		device->CreateWMCursor = X11_CreateWMCursor;

		device->ShowWMCursor = X11_ShowWMCursor;

		device->WarpWMCursor = X11_WarpWMCursor;

		device->CheckMouseMode = X11_CheckMouseMode;

		device->InitOSKeymap = X11_InitOSKeymap;

		device->PumpEvents = X11_PumpEvents;

		device->free = X11_DeleteDevice;

	}

	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)

{

#if SDL_VIDEO_DRIVER_X11_VIDMODE

	extern int vm_error;

#endif

#if SDL_VIDEO_DRIVER_X11_DGAMOUSE

	extern int dga_error;

#endif

#if SDL_VIDEO_DRIVER_X11_VIDMODE

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

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

}

#endif

        	return(0);

        }

#endif /* SDL_VIDEO_DRIVER_X11_VIDMODE */

#if SDL_VIDEO_DRIVER_X11_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];

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

}

#endif

        	return(0);

        }

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

}

static int (*Xext_handler)(Display *,char *,char *) = NULL;

static int xext_errhandler(Display *d, char *ext_name, char *reason)

{

#ifdef XFREE86_DEBUG

	printf("Xext error inside SDL (may be harmless):\n");

	printf("  Extension \"%s\" %s on display \"%s\".\n",

#endif

	if (SDL_strcmp(reason, "missing") == 0) {

		/*

		 * Since the query itself, elsewhere, can handle a missing extension

		 *  and the default behaviour in Xlib is to write to stderr, which

		 *  generates unnecessary bug reports, we just ignore these.

		 */

		return 0;

	}

	/* Everything else goes to the default handler... */

	return Xext_handler(d, ext_name, reason);

}

/* Find out what class name we should use */

static char *get_classname(char *classname, int maxlen)

{

	char *spot;

#if defined(__LINUX__) || defined(__FREEBSD__)

	char procfile[1024];

	char linkfile[1024];

	int linksize;

#endif

	/* First allow environment variable override */

	spot = SDL_getenv("SDL_VIDEO_X11_WMCLASS");

	if ( spot ) {

		SDL_strlcpy(classname, spot, maxlen);

		return classname;

	}

	/* Next look at the application's executable name */

#if defined(__LINUX__) || defined(__FREEBSD__)

#if defined(__LINUX__)

	SDL_snprintf(procfile, SDL_arraysize(procfile), "/proc/%d/exe", getpid());

#elif defined(__FREEBSD__)

	SDL_snprintf(procfile, SDL_arraysize(procfile), "/proc/%d/file", getpid());

#else

#error Where can we find the executable name?

#endif

	linksize = readlink(procfile, linkfile, sizeof(linkfile)-1);

	if ( linksize > 0 ) {

		linkfile[linksize] = '\0';

		spot = SDL_strrchr(linkfile, '/');

		if ( spot ) {

			SDL_strlcpy(classname, spot+1, maxlen);

		} else {

			SDL_strlcpy(classname, linkfile, maxlen);

		}

		return classname;

	}

#endif /* __LINUX__ */

	/* Finally use the default we've used forever */

	SDL_strlcpy(classname, "SDL_App", maxlen);

	return classname;

}

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

static void create_aux_windows(_THIS)

{

    Atom _NET_WM_NAME;

    Atom _NET_WM_ICON_NAME;

    char classname[1024];

    XSetWindowAttributes xattr;

    XWMHints *hints;

    XTextProperty titleprop, titlepropUTF8, iconprop, iconpropUTF8;

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

    /* Look up some useful Atoms */

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

    if ( SDL_windowid ) {

	FSwindow = 0;

	WMwindow = SDL_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;

	SDL_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 = titlepropUTF8.value = NULL;

    iconprop.value = iconpropUTF8.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(titlepropUTF8.value) {

    }

    if(iconprop.value) {

    }

    if(iconpropUTF8.value) {

    }

		 FocusChangeMask | KeyPressMask | KeyReleaseMask

		 | PropertyChangeMask | StructureNotifyMask | KeymapStateMask);

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

    get_classname(classname, sizeof(classname));

    {

	XClassHint *classhints;

	if(classhints != NULL) {

	    classhints->res_name = classname;

	    classhints->res_class = classname;

	}

    }

    /* Setup the communication with the IM server */

	}

}

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 defined(__osf__) && defined(SDL_VIDEO_DRIVER_X11_DYNAMIC)

	/* On Tru64 if linking without -lX11, it fails and you get following message.

	 * Xlib: connection to ":0.0" refused by server

	 * Xlib: XDM authorization key matches an existing client!

	 *

	 * It succeeds if retrying 1 second later

	 * or if running xhost +localhost on shell.

	 *

	 */

	if ( SDL_Display == NULL ) {

		SDL_Delay(1000);

	}

#endif

	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.