/*
Copyright (C) 1996-1997 Id Software, Inc.

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
*/

#if !defined(__APPLE__) && !defined(__MACH__) && !defined(SUNOS)
//#define USEDGA
#endif

#include <signal.h>

#include <dlfcn.h>

#include <X11/Xlib.h>
#include <X11/Xutil.h>
#include <X11/Xatom.h>
#include <X11/XKBlib.h> // TODO possibly ifdef this out on non-supporting systems... Solaris (as always)?
#include <GL/glx.h>

#include "quakedef.h"
#include "dpsoftrast.h"

#include <X11/keysym.h>
#include <X11/cursorfont.h>
#include <X11/xpm.h>

#include <X11/extensions/XShm.h>
#ifdef USEDGA
#include <X11/extensions/xf86dga.h>
#endif
#include <X11/extensions/xf86vmode.h>

#include <sys/ipc.h>
#include <sys/shm.h>
#include <X11/extensions/XShm.h>

// get the Uchar type
#include "utf8lib.h"
#include "image.h"

#include "nexuiz.xpm"
#include "darkplaces.xpm"

// Tell startup code that we have a client
int cl_available = true;

// note: if we used the XRandR extension we could support refresh rates
qboolean vid_supportrefreshrate = false;

//GLX prototypes
XVisualInfo *(GLAPIENTRY *qglXChooseVisual)(Display *dpy, int screen, int *attribList);
GLXContext (GLAPIENTRY *qglXCreateContext)(Display *dpy, XVisualInfo *vis, GLXContext shareList, Bool direct);
void (GLAPIENTRY *qglXDestroyContext)(Display *dpy, GLXContext ctx);
Bool (GLAPIENTRY *qglXMakeCurrent)(Display *dpy, GLXDrawable drawable, GLXContext ctx);
void (GLAPIENTRY *qglXSwapBuffers)(Display *dpy, GLXDrawable drawable);
const char *(GLAPIENTRY *qglXQueryExtensionsString)(Display *dpy, int screen);

//GLX_ARB_get_proc_address
void *(GLAPIENTRY *qglXGetProcAddressARB)(const GLubyte *procName);

static dllfunction_t getprocaddressfuncs[] =
{
	{"glXGetProcAddressARB", (void **) &qglXGetProcAddressARB},
	{NULL, NULL}
};

//GLX_SGI_swap_control
GLint (GLAPIENTRY *qglXSwapIntervalSGI)(GLint interval);

static dllfunction_t swapcontrolfuncs[] =
{
	{"glXSwapIntervalSGI", (void **) &qglXSwapIntervalSGI},
	{NULL, NULL}
};

static Display *vidx11_display = NULL;
static int vidx11_screen;
static Window win, root;
static GLXContext ctx = NULL;
static GC vidx11_gc = NULL;
static XImage *vidx11_ximage[2] = { NULL, NULL };
static int vidx11_ximage_pos = 0;
static XShmSegmentInfo vidx11_shminfo[2];
static int vidx11_shmevent = -1;
static int vidx11_shmwait = 0; // number of frames outstanding

Atom wm_delete_window_atom;
Atom net_wm_state_atom;
Atom net_wm_state_hidden_atom;
Atom net_wm_state_fullscreen_atom;
Atom net_wm_icon;
Atom cardinal;

#define KEY_MASK (KeyPressMask | KeyReleaseMask)
#define MOUSE_MASK (ButtonPressMask | ButtonReleaseMask | \
		    PointerMotionMask | ButtonMotionMask)
#define X_MASK (KEY_MASK | MOUSE_MASK | VisibilityChangeMask | \
		StructureNotifyMask | FocusChangeMask | EnterWindowMask | \
		LeaveWindowMask)


static qboolean mouse_avail = true;
static qboolean vid_usingmousegrab = false;
static qboolean vid_usingmouse = false;
static qboolean vid_usinghidecursor = false;
static qboolean vid_usingvsync = false;
static qboolean vid_usevsync = false;
#ifdef USEDGA
static qboolean vid_x11_dgasupported = false;
#endif

#ifdef USEDGA
cvar_t vid_dgamouse = {CVAR_SAVE, "vid_dgamouse", "0", "make use of DGA mouse input"};
static qboolean vid_usingdgamouse = false;
#endif

qboolean vidmode_ext = false;

static int win_x, win_y;

static XF86VidModeModeInfo init_vidmode, game_vidmode;
static qboolean vid_isfullscreen = false;
static qboolean vid_isvidmodefullscreen = false;
static qboolean vid_isdesktopfullscreen = false;
static qboolean vid_isoverrideredirect = false;

static vid_mode_t desktop_mode;
static Visual *vidx11_visual;
static Colormap vidx11_colormap;

/*-----------------------------------------------------------------------*/
//

extern long keysym2ucs(KeySym keysym); // LordHavoc: suppress warning just in this case, it's not worth having a header file for this...
static void DP_Xutf8LookupString(XKeyEvent * ev,
			 Uchar *uch,
			 KeySym * keysym_return,
			 Status * status_return)
{
	int rc;
	KeySym keysym;
	int codepoint;
	char buffer[64];
	int nbytes = sizeof(buffer);

	rc = XLookupString(ev, buffer, nbytes, &keysym, NULL);

	if (rc > 0) {
		codepoint = buffer[0] & 0xFF;
	} else {
		codepoint = keysym2ucs(keysym);
	}

	if (codepoint < 0) {
		if (keysym == None) {
			*status_return = XLookupNone;
		} else {
			*status_return = XLookupKeySym;
			*keysym_return = keysym;
		}
		*uch = 0;
		return;
	}

	*uch = codepoint;

	if (keysym != None) {
		*keysym_return = keysym;
		*status_return = XLookupBoth;
	} else {
		*status_return = XLookupChars;
	}
}
static int XLateKey(XKeyEvent *ev, Uchar *ascii)
{
	int key = 0;
	//char buf[64];
	KeySym keysym, shifted;
	Status status;

	keysym = XLookupKeysym (ev, 0);
	DP_Xutf8LookupString(ev, ascii, &shifted, &status);

	switch(keysym)
	{
		case XK_KP_Page_Up:	 key = K_KP_PGUP; break;
		case XK_Page_Up:	 key = K_PGUP; break;

		case XK_KP_Page_Down: key = K_KP_PGDN; break;
		case XK_Page_Down:	 key = K_PGDN; break;

		case XK_KP_Home: key = K_KP_HOME; break;
		case XK_Home:	 key = K_HOME; break;

		case XK_KP_End:  key = K_KP_END; break;
		case XK_End:	 key = K_END; break;

		case XK_KP_Left: key = K_KP_LEFTARROW; break;
		case XK_Left:	 key = K_LEFTARROW; break;

		case XK_KP_Right: key = K_KP_RIGHTARROW; break;
		case XK_Right:	key = K_RIGHTARROW;		break;

		case XK_KP_Down: key = K_KP_DOWNARROW; break;
		case XK_Down:	 key = K_DOWNARROW; break;

		case XK_KP_Up:   key = K_KP_UPARROW; break;
		case XK_Up:		 key = K_UPARROW;	 break;

		case XK_Escape: key = K_ESCAPE;		break;

		case XK_KP_Enter: key = K_KP_ENTER;	break;
		case XK_Return: key = K_ENTER;		 break;

		case XK_Tab:		key = K_TAB;			 break;

		case XK_F1:		 key = K_F1;				break;

		case XK_F2:		 key = K_F2;				break;

		case XK_F3:		 key = K_F3;				break;

		case XK_F4:		 key = K_F4;				break;

		case XK_F5:		 key = K_F5;				break;

		case XK_F6:		 key = K_F6;				break;

		case XK_F7:		 key = K_F7;				break;

		case XK_F8:		 key = K_F8;				break;

		case XK_F9:		 key = K_F9;				break;

		case XK_F10:		key = K_F10;			 break;

		case XK_F11:		key = K_F11;			 break;

		case XK_F12:		key = K_F12;			 break;

		case XK_BackSpace: key = K_BACKSPACE; break;

		case XK_KP_Delete: key = K_KP_DEL; break;
		case XK_Delete: key = K_DEL; break;

		case XK_Pause:	key = K_PAUSE;		 break;

		case XK_Shift_L:
		case XK_Shift_R:	key = K_SHIFT;		break;

		case XK_Execute:
		case XK_Control_L:
		case XK_Control_R:	key = K_CTRL;		 break;

		case XK_Alt_L:
		case XK_Meta_L:
		case XK_ISO_Level3_Shift:
		case XK_Alt_R:
		case XK_Meta_R: key = K_ALT;			break;

		case XK_KP_Begin: key = K_KP_5;	break;

		case XK_Insert:key = K_INS; break;
		case XK_KP_Insert: key = K_KP_INS; break;

		case XK_KP_Multiply: key = K_KP_MULTIPLY; break;
		case XK_KP_Add:  key = K_KP_PLUS; break;
		case XK_KP_Subtract: key = K_KP_MINUS; break;
		case XK_KP_Divide: key = K_KP_SLASH; break;

		case XK_Num_Lock: key = K_NUMLOCK; break;
		case XK_Caps_Lock: key = K_CAPSLOCK; break;
		case XK_Scroll_Lock: key = K_SCROLLOCK; break;

		case XK_asciicircum:	*ascii = key = '^'; break; // for some reason, XLookupString returns "" on this one for Grunt|2

		case XK_section:	*ascii = key = '~'; break;

		default:
			if (keysym < 32)
				break;

			if (keysym >= 'A' && keysym <= 'Z')
				key = keysym - 'A' + 'a';
			else
				key = keysym;

			break;
	}

	return key;
}

static Cursor CreateNullCursor(Display *display, Window root)
{
	Pixmap cursormask;
	XGCValues xgc;
	GC gc;
	XColor dummycolour;
	Cursor cursor;

	cursormask = XCreatePixmap(display, root, 1, 1, 1);
	xgc.function = GXclear;
	gc =  XCreateGC(display, cursormask, GCFunction, &xgc);
	XFillRectangle(display, cursormask, gc, 0, 0, 1, 1);
	dummycolour.pixel = 0;
	dummycolour.red = 0;
	dummycolour.flags = 04;
	cursor = XCreatePixmapCursor(display, cursormask, cursormask, &dummycolour,&dummycolour, 0,0);
	XFreePixmap(display,cursormask);
	XFreeGC(display,gc);
	return cursor;
}

void VID_SetMouse(qboolean fullscreengrab, qboolean relative, qboolean hidecursor)
{
	static int originalmouseparms_num;
	static int originalmouseparms_denom;
	static int originalmouseparms_threshold;
	static qboolean restore_spi;

#ifdef USEDGA
	qboolean usedgamouse;
#endif

	if (!vidx11_display || !win)
		return;

	if (relative)
		fullscreengrab = true;

	if (!mouse_avail)
		fullscreengrab = relative = hidecursor = false;

#ifdef USEDGA
	usedgamouse = relative && vid_dgamouse.integer;
	if (!vid_x11_dgasupported)
		usedgamouse = false;
	if (fullscreengrab && vid_usingmouse && (vid_usingdgamouse != usedgamouse))
		VID_SetMouse(false, false, false); // ungrab first!
#endif

	if (vid_usingmousegrab != fullscreengrab)
	{
		vid_usingmousegrab = fullscreengrab;
		cl_ignoremousemoves = 2;
		if (fullscreengrab)
		{
			XGrabPointer(vidx11_display, win,  True, 0, GrabModeAsync, GrabModeAsync, win, None, CurrentTime);
			if (vid_grabkeyboard.integer || vid_isoverrideredirect)
				XGrabKeyboard(vidx11_display, win, False, GrabModeAsync, GrabModeAsync, CurrentTime);
		}
		else
		{
			XUngrabPointer(vidx11_display, CurrentTime);
			XUngrabKeyboard(vidx11_display, CurrentTime);
		}
	}

	if (relative)
	{
		if (!vid_usingmouse)
		{
			XWindowAttributes attribs_1;
			XSetWindowAttributes attribs_2;

			XGetWindowAttributes(vidx11_display, win, &attribs_1);
			attribs_2.event_mask = attribs_1.your_event_mask | KEY_MASK | MOUSE_MASK;
			XChangeWindowAttributes(vidx11_display, win, CWEventMask, &attribs_2);

#ifdef USEDGA
			vid_usingdgamouse = usedgamouse;
			if (usedgamouse)
			{
				XF86DGADirectVideo(vidx11_display, DefaultScreen(vidx11_display), XF86DGADirectMouse);
				XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, 0, 0);
			}
			else
#endif
				XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, vid.width / 2, vid.height / 2);

// COMMANDLINEOPTION: X11 Input: -noforcemparms disables setting of mouse parameters (not used with DGA, windows only)
#ifdef USEDGA
			if (!COM_CheckParm ("-noforcemparms") && !usedgamouse)
#else
			if (!COM_CheckParm ("-noforcemparms"))
#endif
			{
				XGetPointerControl(vidx11_display, &originalmouseparms_num, &originalmouseparms_denom, &originalmouseparms_threshold);
				XChangePointerControl (vidx11_display, true, false, 1, 1, -1); // TODO maybe change threshold here, or remove this comment
				restore_spi = true;
			}
			else
				restore_spi = false;

			cl_ignoremousemoves = 2;
			vid_usingmouse = true;
		}
	}
	else
	{
		if (vid_usingmouse)
		{
#ifdef USEDGA
			if (vid_usingdgamouse)
				XF86DGADirectVideo(vidx11_display, DefaultScreen(vidx11_display), 0);
			vid_usingdgamouse = false;
#endif
			cl_ignoremousemoves = 2;

			if (restore_spi)
				XChangePointerControl (vidx11_display, true, true, originalmouseparms_num, originalmouseparms_denom, originalmouseparms_threshold);
			restore_spi = false;

			vid_usingmouse = false;
		}
	}

	if (vid_usinghidecursor != hidecursor)
	{
		vid_usinghidecursor = hidecursor;
		if (hidecursor)
			XDefineCursor(vidx11_display, win, CreateNullCursor(vidx11_display, win));
		else
			XUndefineCursor(vidx11_display, win);
	}
}

static keynum_t buttonremap[18] =
{
	K_MOUSE1,
	K_MOUSE3,
	K_MOUSE2,
	K_MWHEELUP,
	K_MWHEELDOWN,
	K_MOUSE4,
	K_MOUSE5,
	K_MOUSE6,
	K_MOUSE7,
	K_MOUSE8,
	K_MOUSE9,
	K_MOUSE10,
	K_MOUSE11,
	K_MOUSE12,
	K_MOUSE13,
	K_MOUSE14,
	K_MOUSE15,
	K_MOUSE16,
};

static qboolean BuildXImages(int w, int h)
{
	int i;
	if(DefaultDepth(vidx11_display, vidx11_screen) != 32 && DefaultDepth(vidx11_display, vidx11_screen) != 24)
	{
		Con_Printf("Sorry, we only support 24bpp and 32bpp modes\n");
		VID_Shutdown();
		return false;
	}
	// match to dpsoftrast's specs
	if(vidx11_visual->red_mask != 0x00FF0000)
	{
		Con_Printf("Sorry, we only support BGR visuals\n");
		VID_Shutdown();
		return false;
	}
	if(vidx11_visual->green_mask != 0x0000FF00)
	{
		Con_Printf("Sorry, we only support BGR visuals\n");
		VID_Shutdown();
		return false;
	}
	if(vidx11_visual->blue_mask != 0x000000FF)
	{
		Con_Printf("Sorry, we only support BGR visuals\n");
		VID_Shutdown();
		return false;
	}
	if(vidx11_shmevent >= 0)
	{
		for(i = 0; i < 2; ++i)
		{
			vidx11_shminfo[i].shmid = -1;
			vidx11_ximage[i] = XShmCreateImage(vidx11_display, vidx11_visual, DefaultDepth(vidx11_display, vidx11_screen), ZPixmap, NULL, &vidx11_shminfo[i], w, h);
			if(!vidx11_ximage[i])
			{
				Con_Printf("Failed to get an XImage segment\n");
				VID_Shutdown();
				return false;
			}
			if(vidx11_ximage[i]->bytes_per_line != w * 4)
			{
				Con_Printf("Sorry, we only support linear pixel layout\n");
				VID_Shutdown();
				return false;
			}
			vidx11_shminfo[i].shmid = shmget(IPC_PRIVATE, vidx11_ximage[i]->bytes_per_line * vidx11_ximage[i]->height, IPC_CREAT|0777);
			if(vidx11_shminfo[i].shmid < 0)
			{
				Con_Printf("Failed to get a shm segment\n");
				VID_Shutdown();
				return false;
			}
			vidx11_shminfo[i].shmaddr = vidx11_ximage[i]->data = shmat(vidx11_shminfo[i].shmid, NULL, 0);
			if(!vidx11_shminfo[i].shmaddr)
			{
				Con_Printf("Failed to get a shm segment addresst\n");
				VID_Shutdown();
				return false;
			}
			vidx11_shminfo[i].readOnly = True;
			XShmAttach(vidx11_display, &vidx11_shminfo[i]);
		}
	}
	else
	{
		for(i = 0; i < 1; ++i) // we only need one buffer if we don't use Xshm
		{
			char *p = calloc(4, w * h);
			vidx11_shminfo[i].shmid = -1;
			vidx11_ximage[i] = XCreateImage(vidx11_display, vidx11_visual, DefaultDepth(vidx11_display, vidx11_screen), ZPixmap, 0, (char*)p, w, h, 8, 0);
			if(!vidx11_ximage[i])
			{
				Con_Printf("Failed to get an XImage segment\n");
				VID_Shutdown();
				return false;
			}
			if(vidx11_ximage[i]->bytes_per_line != w * 4)
			{
				Con_Printf("Sorry, we only support linear pixel layout\n");
				VID_Shutdown();
				return false;
			}
		}
	}
	return true;
}
static void DestroyXImages(void)
{
	int i;
	for(i = 0; i < 2; ++i)
	{
		if(vidx11_shminfo[i].shmid >= 0)
		{
			XShmDetach(vidx11_display, &vidx11_shminfo[i]);
			XDestroyImage(vidx11_ximage[i]);
			vidx11_ximage[i] = NULL;
			shmdt(vidx11_shminfo[i].shmaddr);
			shmctl(vidx11_shminfo[i].shmid, IPC_RMID, 0);
			vidx11_shminfo[i].shmid = -1;
		}
		if(vidx11_ximage[i])
			XDestroyImage(vidx11_ximage[i]);
		vidx11_ximage[i] = 0;
	}
}

static int in_mouse_x_save = 0, in_mouse_y_save = 0;
static void HandleEvents(void)
{
	XEvent event;
	int key;
	Uchar unicode;
	qboolean dowarp = false;

	if (!vidx11_display)
		return;

	in_mouse_x += in_mouse_x_save;
	in_mouse_y += in_mouse_y_save;
	in_mouse_x_save = 0;
	in_mouse_y_save = 0;

	while (XPending(vidx11_display))
	{
		XNextEvent(vidx11_display, &event);

		switch (event.type)
		{
		case KeyPress:
			// key pressed
			key = XLateKey (&event.xkey, &unicode);
			Key_Event(key, unicode, true);
			break;

		case KeyRelease:
			// key released
			key = XLateKey (&event.xkey, &unicode);
			Key_Event(key, unicode, false);
			break;

		case MotionNotify:
			// mouse moved
			if (vid_usingmouse)
			{
#ifdef USEDGA
				if (vid_usingdgamouse)
				{
					in_mouse_x += event.xmotion.x_root;
					in_mouse_y += event.xmotion.y_root;
				}
				else
#endif
				{
					if (!event.xmotion.send_event)
					{
						in_mouse_x += event.xmotion.x - in_windowmouse_x;
						in_mouse_y += event.xmotion.y - in_windowmouse_y;
						//if (abs(vid.width/2 - event.xmotion.x) + abs(vid.height/2 - event.xmotion.y))
						if (vid_stick_mouse.integer || abs(vid.width/2 - event.xmotion.x) > vid.width / 4 || abs(vid.height/2 - event.xmotion.y) > vid.height / 4)
							dowarp = true;
					}
				}
			}
			in_windowmouse_x = event.xmotion.x;
			in_windowmouse_y = event.xmotion.y;
			break;

		case ButtonPress:
			// mouse button pressed
			if (event.xbutton.button <= 18)
				Key_Event(buttonremap[event.xbutton.button - 1], 0, true);
			else
				Con_Printf("HandleEvents: ButtonPress gave value %d, 1-18 expected\n", event.xbutton.button);
			break;

		case ButtonRelease:
			// mouse button released
			if (event.xbutton.button <= 18)
				Key_Event(buttonremap[event.xbutton.button - 1], 0, false);
			else
				Con_Printf("HandleEvents: ButtonRelease gave value %d, 1-18 expected\n", event.xbutton.button);
			break;

		case CreateNotify:
			// window created
			win_x = event.xcreatewindow.x;
			win_y = event.xcreatewindow.y;
			break;

		case ConfigureNotify:
			// window changed size/location
			win_x = event.xconfigure.x;
			win_y = event.xconfigure.y;
			// HACK on X11, we just request fullscreen mode, but
			// cannot guess what the window manager will do for us
			// exactly. That is why we read back the resolution we
			// actually got here.
			if(vid_isdesktopfullscreen)
			{
				desktop_mode.width = event.xconfigure.width;
				desktop_mode.height = event.xconfigure.height;
			}
			if((vid_resizable.integer < 2 || vid_isdesktopfullscreen) && (vid.width != event.xconfigure.width || vid.height != event.xconfigure.height))
			{
				vid.width = event.xconfigure.width;
				vid.height = event.xconfigure.height;
				if(vid_isdesktopfullscreen)
					Con_Printf("NetWM fullscreen: actually using resolution %dx%d\n", vid.width, vid.height);
				else
					Con_DPrintf("Updating to ConfigureNotify resolution %dx%d\n", vid.width, vid.height);

				if(vid.renderpath == RENDERPATH_SOFT)
				{
					DPSOFTRAST_Flush();
					if(vid.softdepthpixels)
						free(vid.softdepthpixels);
					DestroyXImages();
					XSync(vidx11_display, False);
					if(!BuildXImages(vid.width, vid.height))
						return;
					XSync(vidx11_display, False);
					vid.softpixels = (unsigned int *) vidx11_ximage[vidx11_ximage_pos]->data;
					vid.softdepthpixels = (unsigned int *)calloc(4, vid.width * vid.height);
				}
			}
			break;
		case DestroyNotify:
			// window has been destroyed
			Sys_Quit(0);
			break;
		case ClientMessage:
			// window manager messages
			if ((event.xclient.format == 32) && ((unsigned int)event.xclient.data.l[0] == wm_delete_window_atom))
				Sys_Quit(0);
			break;
		case MapNotify:
			if (vid_isoverrideredirect)
				break;
			// window restored
			vid_hidden = false;

			if(vid_isvidmodefullscreen)
			{
				// set our video mode
				XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, &game_vidmode);

				// Move the viewport to top left
				XF86VidModeSetViewPort(vidx11_display, vidx11_screen, 0, 0);
			}

			if(vid_isdesktopfullscreen)
			{
				// make sure it's fullscreen
				XEvent event;
				event.type = ClientMessage;
				event.xclient.serial = 0;
				event.xclient.send_event = True;
				event.xclient.message_type = net_wm_state_atom;
				event.xclient.window = win;
				event.xclient.format = 32;
				event.xclient.data.l[0] = 1;
				event.xclient.data.l[1] = net_wm_state_fullscreen_atom;
				event.xclient.data.l[2] = 0;
				event.xclient.data.l[3] = 1;
				event.xclient.data.l[4] = 0;
				XSendEvent(vidx11_display, root, False, SubstructureRedirectMask | SubstructureNotifyMask, &event);
			}

			dowarp = true;

			break;
		case UnmapNotify:
			if (vid_isoverrideredirect)
				break;
			// window iconified/rolledup/whatever
			vid_hidden = true;

			if(vid_isvidmodefullscreen)
				XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, &init_vidmode);

			break;
		case FocusIn:
			if (vid_isoverrideredirect)
				break;
			// window is now the input focus
			vid_activewindow = true;
			break;
		case FocusOut:
			if (vid_isoverrideredirect)
				break;

			if(vid_isdesktopfullscreen && event.xfocus.mode == NotifyNormal)
			{
				// iconify netwm fullscreen window when it loses focus
				// when the user selects it in the taskbar, the window manager will map it again and send MapNotify
				XEvent event;
				event.type = ClientMessage;
				event.xclient.serial = 0;
				event.xclient.send_event = True;
				event.xclient.message_type = net_wm_state_atom;
				event.xclient.window = win;
				event.xclient.format = 32;
				event.xclient.data.l[0] = 1;
				event.xclient.data.l[1] = net_wm_state_hidden_atom;
				event.xclient.data.l[2] = 0;
				event.xclient.data.l[3] = 1;
				event.xclient.data.l[4] = 0;
				XSendEvent(vidx11_display, root, False, SubstructureRedirectMask | SubstructureNotifyMask, &event);
			}

			// window is no longer the input focus
			vid_activewindow = false;

			break;
		case EnterNotify:
			// mouse entered window
			break;
		case LeaveNotify:
			// mouse left window
			break;
		default:
			if(vidx11_shmevent >= 0 && event.type == vidx11_shmevent)
				--vidx11_shmwait;
			break;
		}
	}

	if (dowarp)
	{
		/* move the mouse to the window center again */
		// we'll catch the warp motion by its send_event flag, updating the
		// stored mouse position without adding any delta motion
		XEvent event;
		event.type = MotionNotify;
		event.xmotion.display = vidx11_display;
		event.xmotion.window = win;
		event.xmotion.x = vid.width / 2;
		event.xmotion.y = vid.height / 2;
		XSendEvent(vidx11_display, win, False, PointerMotionMask, &event);
		XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, vid.width / 2, vid.height / 2);
	}
}

static void *prjobj = NULL;

static void GL_CloseLibrary(void)
{
	if (prjobj)
		dlclose(prjobj);
	prjobj = NULL;
	gl_driver[0] = 0;
	qglXGetProcAddressARB = NULL;
	gl_extensions = "";
	gl_platform = "";
	gl_platformextensions = "";
}

static int GL_OpenLibrary(const char *name)
{
	Con_Printf("Loading OpenGL driver %s\n", name);
	GL_CloseLibrary();
	if (!(prjobj = dlopen(name, RTLD_LAZY | RTLD_GLOBAL)))
	{
		Con_Printf("Unable to open symbol list for %s\n", name);
		return false;
	}
	strlcpy(gl_driver, name, sizeof(gl_driver));
	return true;
}

void *GL_GetProcAddress(const char *name)
{
	void *p = NULL;
	if (qglXGetProcAddressARB != NULL)
		p = (void *) qglXGetProcAddressARB((GLubyte *)name);
	if (p == NULL)
		p = (void *) dlsym(prjobj, name);
	return p;
}

void VID_Shutdown(void)
{
	if (!vidx11_display)
		return;

	VID_EnableJoystick(false);
	VID_SetMouse(false, false, false);

	// FIXME: glXDestroyContext here?
	if (vid_isvidmodefullscreen)
		XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, &init_vidmode);

	if(vidx11_gc)
		XFreeGC(vidx11_display, vidx11_gc);
	vidx11_gc = NULL;

	DestroyXImages();
	vidx11_shmevent = -1;
	vid.softpixels = NULL;

	if (vid.softdepthpixels)
		free(vid.softdepthpixels);
	vid.softdepthpixels = NULL;

	if (win)
		XDestroyWindow(vidx11_display, win);
	XCloseDisplay(vidx11_display);

	vid_hidden = true;
	vid_isfullscreen = false;
	vid_isdesktopfullscreen = false;
	vid_isvidmodefullscreen = false;
	vid_isoverrideredirect = false;
	vidx11_display = NULL;
	win = 0;
	ctx = NULL;

	GL_CloseLibrary();
}

static void signal_handler(int sig)
{
	Con_Printf("Received signal %d, exiting...\n", sig);
	Sys_Quit(1);
}

static void InitSig(void)
{
	signal(SIGHUP, signal_handler);
	signal(SIGINT, signal_handler);
	signal(SIGQUIT, signal_handler);
	signal(SIGILL, signal_handler);
	signal(SIGTRAP, signal_handler);
	signal(SIGIOT, signal_handler);
	signal(SIGBUS, signal_handler);
	signal(SIGFPE, signal_handler);
	signal(SIGSEGV, signal_handler);
	signal(SIGTERM, signal_handler);
}

void VID_Finish (void)
{
	vid_usevsync = vid_vsync.integer && !cls.timedemo && qglXSwapIntervalSGI;
	switch(vid.renderpath)
	{
		case RENDERPATH_SOFT:
			if(vidx11_shmevent >= 0) {
				vidx11_ximage_pos = !vidx11_ximage_pos;
				vid.softpixels = (unsigned int *) vidx11_ximage[vidx11_ximage_pos]->data;
				DPSOFTRAST_SetRenderTargets(vid.width, vid.height, vid.softdepthpixels, vid.softpixels, NULL, NULL, NULL);

				++vidx11_shmwait;
				XShmPutImage(vidx11_display, win, vidx11_gc, vidx11_ximage[!vidx11_ximage_pos], 0, 0, 0, 0, vid.width, vid.height, True);

				// save mouse motion so we can deal with it later
				in_mouse_x = 0;
				in_mouse_y = 0;
				while(vidx11_shmwait > 1)
					HandleEvents();
				in_mouse_x_save += in_mouse_x;
				in_mouse_y_save += in_mouse_y;
				in_mouse_x = 0;
				in_mouse_y = 0;
			} else {
				// no buffer switching here, we just flush the renderer
				DPSOFTRAST_Finish();
				XPutImage(vidx11_display, win, vidx11_gc, vidx11_ximage[vidx11_ximage_pos], 0, 0, 0, 0, vid.width, vid.height);
			}
			break;

		case RENDERPATH_GL11:
		case RENDERPATH_GL13:
		case RENDERPATH_GL20:
		case RENDERPATH_GLES1:
		case RENDERPATH_GLES2:
			if (vid_usingvsync != vid_usevsync)
			{
				vid_usingvsync = vid_usevsync;
				if (qglXSwapIntervalSGI && qglXSwapIntervalSGI (vid_usevsync))
					Con_Print("glXSwapIntervalSGI didn't accept the vid_vsync change, it will take effect on next vid_restart (GLX_SGI_swap_control does not allow turning off vsync)\n");
			}

			if (!vid_hidden)
			{
				CHECKGLERROR
				if (r_speeds.integer == 2 || gl_finish.integer)
					GL_Finish();
				qglXSwapBuffers(vidx11_display, win);CHECKGLERROR
			}
			break;

		case RENDERPATH_D3D9:
		case RENDERPATH_D3D10:
		case RENDERPATH_D3D11:
			break;
	}

	VID_UpdateGamma();
}

void VID_Init(void)
{
#ifdef USEDGA
	Cvar_RegisterVariable (&vid_dgamouse);
#endif
	Cvar_RegisterVariable (&vid_desktopfullscreen);
	InitSig(); // trap evil signals
// COMMANDLINEOPTION: Input: -nomouse disables mouse support (see also vid_mouse cvar)
	if (COM_CheckParm ("-nomouse"))
		mouse_avail = false;
	vidx11_shminfo[0].shmid = -1;
	vidx11_shminfo[1].shmid = -1;
}

static void VID_BuildGLXAttrib(int *attrib, qboolean stencil, qboolean stereobuffer, int samples)
{
	*attrib++ = GLX_RGBA;
	*attrib++ = GLX_RED_SIZE;*attrib++ = stencil ? 8 : 5;
	*attrib++ = GLX_GREEN_SIZE;*attrib++ = stencil ? 8 : 5;
	*attrib++ = GLX_BLUE_SIZE;*attrib++ = stencil ? 8 : 5;
	*attrib++ = GLX_DOUBLEBUFFER;
	*attrib++ = GLX_DEPTH_SIZE;*attrib++ = stencil ? 24 : 16;
	// if stencil is enabled, ask for alpha too
	if (stencil)
	{
		*attrib++ = GLX_STENCIL_SIZE;*attrib++ = 8;
		*attrib++ = GLX_ALPHA_SIZE;*attrib++ = 8;
	}
	if (stereobuffer)
		*attrib++ = GLX_STEREO;
	if (samples > 1)
	{
		*attrib++ = GLX_SAMPLE_BUFFERS_ARB;
		*attrib++ = 1;
		*attrib++ = GLX_SAMPLES_ARB;
		*attrib++ = samples;
	}
	*attrib++ = None;
}

static qboolean VID_InitModeSoft(viddef_mode_t *mode)
{
	int i, j;
	XSetWindowAttributes attr;
	XClassHint *clshints;
	XWMHints *wmhints;
	XSizeHints *szhints;
	unsigned long mask;
	int MajorVersion, MinorVersion;
	char *xpm;
	char **idata;
	unsigned char *data;
	XGCValues gcval;
	const char *dpyname;
	char vabuf[1024];

	vid_isfullscreen = false;
	vid_isdesktopfullscreen = false;
	vid_isvidmodefullscreen = false;
	vid_isoverrideredirect = false;

	if (!(vidx11_display = XOpenDisplay(NULL)))
	{
		Con_Print("Couldn't open the X display\n");
		return false;
	}
	dpyname = XDisplayName(NULL);

	// LordHavoc: making the close button on a window do the right thing
	// seems to involve this mess, sigh...
	wm_delete_window_atom = XInternAtom(vidx11_display, "WM_DELETE_WINDOW", false);
	net_wm_state_atom = XInternAtom(vidx11_display, "_NET_WM_STATE", false);
	net_wm_state_fullscreen_atom = XInternAtom(vidx11_display, "_NET_WM_STATE_FULLSCREEN", false);
	net_wm_state_hidden_atom = XInternAtom(vidx11_display, "_NET_WM_STATE_HIDDEN", false);
	net_wm_icon = XInternAtom(vidx11_display, "_NET_WM_ICON", false);
	cardinal = XInternAtom(vidx11_display, "CARDINAL", false);

	// make autorepeat send keypress/keypress/.../keyrelease instead of intervening keyrelease
	XkbSetDetectableAutoRepeat(vidx11_display, true, NULL);

	vidx11_screen = DefaultScreen(vidx11_display);
	root = RootWindow(vidx11_display, vidx11_screen);

	desktop_mode.width = DisplayWidth(vidx11_display, vidx11_screen);
	desktop_mode.height = DisplayHeight(vidx11_display, vidx11_screen);
	desktop_mode.bpp = DefaultDepth(vidx11_display, vidx11_screen);
	desktop_mode.refreshrate = 60; // FIXME
	desktop_mode.pixelheight_num = 1; // FIXME
	desktop_mode.pixelheight_denom = 1; // FIXME

	// Get video mode list
	MajorVersion = MinorVersion = 0;
	if (!XF86VidModeQueryVersion(vidx11_display, &MajorVersion, &MinorVersion))
		vidmode_ext = false;
	else
	{
		Con_DPrintf("Using XFree86-VidModeExtension Version %d.%d\n", MajorVersion, MinorVersion);
		vidmode_ext = true;
	}

	if (mode->fullscreen)
	{
		if(vid_desktopfullscreen.integer)
		{
			// TODO detect WM support
			vid_isdesktopfullscreen = true;
			vid_isfullscreen = true;
			// width and height will be filled in later
			Con_DPrintf("Using NetWM fullscreen mode\n");
		}

		if(!vid_isfullscreen && vidmode_ext)
		{
			int best_fit, best_dist, dist, x, y;

			// Are we going fullscreen?  If so, let's change video mode
			XF86VidModeModeLine *current_vidmode;
			XF86VidModeModeInfo **vidmodes;
			int num_vidmodes;

			// This nice hack comes from the SDL source code
			current_vidmode = (XF86VidModeModeLine*)((char*)&init_vidmode + sizeof(init_vidmode.dotclock));
			XF86VidModeGetModeLine(vidx11_display, vidx11_screen, (int*)&init_vidmode.dotclock, current_vidmode);

			XF86VidModeGetAllModeLines(vidx11_display, vidx11_screen, &num_vidmodes, &vidmodes);
			best_dist = 0;
			best_fit = -1;

			for (i = 0; i < num_vidmodes; i++)
			{
				if (mode->width > vidmodes[i]->hdisplay || mode->height > vidmodes[i]->vdisplay)
					continue;

				x = mode->width - vidmodes[i]->hdisplay;
				y = mode->height - vidmodes[i]->vdisplay;
				dist = (x * x) + (y * y);
				if (best_fit == -1 || dist < best_dist)
				{
					best_dist = dist;
					best_fit = i;
				}
			}

			if (best_fit != -1)
			{
				// LordHavoc: changed from ActualWidth/ActualHeight =,
				// to width/height =, so the window will take the full area of
				// the mode chosen
				mode->width = vidmodes[best_fit]->hdisplay;
				mode->height = vidmodes[best_fit]->vdisplay;

				// change to the mode
				XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, vidmodes[best_fit]);
				memcpy(&game_vidmode, vidmodes[best_fit], sizeof(game_vidmode));
				vid_isvidmodefullscreen = true;
				vid_isfullscreen = true;

				// Move the viewport to top left
				XF86VidModeSetViewPort(vidx11_display, vidx11_screen, 0, 0);
				Con_DPrintf("Using XVidMode fullscreen mode at %dx%d\n", mode->width, mode->height);
			}

			free(vidmodes);
		}

		if(!vid_isfullscreen)
		{
			// sorry, no FS available
			// use the full desktop resolution
			vid_isfullscreen = true;
			// width and height will be filled in later
			mode->width = DisplayWidth(vidx11_display, vidx11_screen);
			mode->height = DisplayHeight(vidx11_display, vidx11_screen);
			Con_DPrintf("Using X11 fullscreen mode at %dx%d\n", mode->width, mode->height);
		}
	}

	// LordHavoc: save the visual for use in gamma ramp settings later
	vidx11_visual = DefaultVisual(vidx11_display, vidx11_screen);

	/* window attributes */
	attr.background_pixel = 0;
	attr.border_pixel = 0;
	// LordHavoc: save the colormap for later, too
	vidx11_colormap = attr.colormap = XCreateColormap(vidx11_display, root, vidx11_visual, AllocNone);
	attr.event_mask = X_MASK;

	if (mode->fullscreen)
	{
		if(vid_isdesktopfullscreen)
		{
			mask = CWBackPixel | CWColormap | CWSaveUnder | CWBackingStore | CWEventMask;
			attr.backing_store = NotUseful;
			attr.save_under = False;
		}
		else
		{
			mask = CWBackPixel | CWColormap | CWSaveUnder | CWBackingStore | CWEventMask | CWOverrideRedirect;
			attr.override_redirect = True;
			attr.backing_store = NotUseful;
			attr.save_under = False;
			vid_isoverrideredirect = true; // so it knows to grab
		}
	}
	else
	{
		mask = CWBackPixel | CWBorderPixel | CWColormap | CWEventMask;
	}

	win = XCreateWindow(vidx11_display, root, 0, 0, mode->width, mode->height, 0, CopyFromParent, InputOutput, vidx11_visual, mask, &attr);

	data = loadimagepixelsbgra("darkplaces-icon", false, false, false, NULL);
	if(data)
	{
		// use _NET_WM_ICON too
		static long netwm_icon[MAX_NETWM_ICON];
		int pos = 0;
		int i = 1;

		while(data)
		{
			if(pos + 2 * image_width * image_height < MAX_NETWM_ICON)
			{
				netwm_icon[pos++] = image_width;
				netwm_icon[pos++] = image_height;
				for(i = 0; i < image_height; ++i)
					for(j = 0; j < image_width; ++j)
						netwm_icon[pos++] = BuffLittleLong(&data[(i*image_width+j)*4]);
			}
			else
			{
				Con_Printf("Skipping NETWM icon #%d because there is no space left\n", i);
			}
			++i;
			Mem_Free(data);
			data = loadimagepixelsbgra(va(vabuf, sizeof(vabuf), "darkplaces-icon%d", i), false, false, false, NULL);
		}
		XChangeProperty(vidx11_display, win, net_wm_icon, cardinal, 32, PropModeReplace, (const unsigned char *) netwm_icon, pos);
	}

	// fallthrough for old window managers
	xpm = (char *) FS_LoadFile("darkplaces-icon.xpm", tempmempool, false, NULL);
	idata = NULL;
	if(xpm)
		idata = XPM_DecodeString(xpm);
	if(!idata)
		idata = ENGINE_ICON;

	wmhints = XAllocWMHints();
	if(XpmCreatePixmapFromData(vidx11_display, win,
		idata,
		&wmhints->icon_pixmap, &wmhints->icon_mask, NULL) == XpmSuccess)
		wmhints->flags |= IconPixmapHint | IconMaskHint;

	if(xpm)
		Mem_Free(xpm);

	clshints = XAllocClassHint();
	clshints->res_name = strdup(gamename);
	clshints->res_class = strdup("DarkPlaces");

	szhints = XAllocSizeHints();
	if(vid_resizable.integer == 0 && !vid_isdesktopfullscreen)
	{
		szhints->min_width = szhints->max_width = mode->width;
		szhints->min_height = szhints->max_height = mode->height;
		szhints->flags |= PMinSize | PMaxSize;
	}

	XmbSetWMProperties(vidx11_display, win, gamename, gamename, (char **) com_argv, com_argc, szhints, wmhints, clshints);
	// strdup() allocates using malloc(), should be freed with free()
	free(clshints->res_name);
	free(clshints->res_class);
	XFree(clshints);
	XFree(wmhints);
	XFree(szhints);

	//XStoreName(vidx11_display, win, gamename);
	XMapWindow(vidx11_display, win);

	XSetWMProtocols(vidx11_display, win, &wm_delete_window_atom, 1);

	if (vid_isoverrideredirect)
	{
		XMoveWindow(vidx11_display, win, 0, 0);
		XRaiseWindow(vidx11_display, win);
		XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, 0, 0);
		XFlush(vidx11_display);
	}

	if(vid_isvidmodefullscreen)
	{
		// Move the viewport to top left
		XF86VidModeSetViewPort(vidx11_display, vidx11_screen, 0, 0);
	}

	//XSync(vidx11_display, False);

	// COMMANDLINEOPTION: Unix GLX: -noshm disables XShm extensioon
	if(dpyname && dpyname[0] == ':' && dpyname[1] && (dpyname[2] < '0' || dpyname[2] > '9') && !COM_CheckParm("-noshm") && XShmQueryExtension(vidx11_display))
	{
		Con_Printf("Using XShm\n");
		vidx11_shmevent = XShmGetEventBase(vidx11_display) + ShmCompletion;
	}
	else
	{
		Con_Printf("Not using XShm\n");
		vidx11_shmevent = -1;
	}
	BuildXImages(mode->width, mode->height);

	vidx11_ximage_pos = 0;
	vid.softpixels = (unsigned int *) vidx11_ximage[vidx11_ximage_pos]->data;
	vidx11_shmwait = 0;
	vid.softdepthpixels = (unsigned int *)calloc(1, mode->width * mode->height * 4);

	memset(&gcval, 0, sizeof(gcval));
	vidx11_gc = XCreateGC(vidx11_display, win, 0, &gcval);

	if (DPSOFTRAST_Init(mode->width, mode->height, vid_soft_threads.integer, vid_soft_interlace.integer, (unsigned int *)vid.softpixels, (unsigned int *)vid.softdepthpixels) < 0)
	{
		Con_Printf("Failed to initialize software rasterizer\n");
		VID_Shutdown();
		return false;
	}

	XSync(vidx11_display, False);

	vid_usingmousegrab = false;
	vid_usingmouse = false;
	vid_usinghidecursor = false;
	vid_usingvsync = false;
	vid_hidden = false;
	vid_activewindow = true;
#ifdef USEDGA
	vid_x11_dgasupported = XF86DGAQueryVersion(vidx11_display, &MajorVersion, &MinorVersion);
	if (!vid_x11_dgasupported)
		Con_Print( "Failed to detect XF86DGA Mouse extension\n" );
#endif

	VID_Soft_SharedSetup();

	return true;
}

static qboolean VID_InitModeGL(viddef_mode_t *mode)
{
	int i, j;
	int attrib[32];
	XSetWindowAttributes attr;
	XClassHint *clshints;
	XWMHints *wmhints;
	XSizeHints *szhints;
	unsigned long mask;
	XVisualInfo *visinfo;
	int MajorVersion, MinorVersion;
	const char *drivername;
	char *xpm;
	char **idata;
	unsigned char *data;
	char vabuf[1024];

	vid_isfullscreen = false;
	vid_isdesktopfullscreen = false;
	vid_isvidmodefullscreen = false;
	vid_isoverrideredirect = false;

#if defined(__APPLE__) && defined(__MACH__)
	drivername = "/usr/X11R6/lib/libGL.1.dylib";
#else
	drivername = "libGL.so.1";
#endif
// COMMANDLINEOPTION: Linux GLX: -gl_driver <drivername> selects a GL driver library, default is libGL.so.1, useful only for using fxmesa or similar, if you don't know what this is for, you don't need it
// COMMANDLINEOPTION: BSD GLX: -gl_driver <drivername> selects a GL driver library, default is libGL.so.1, useful only for using fxmesa or similar, if you don't know what this is for, you don't need it
// LordHavoc: although this works on MacOSX, it's useless there (as there is only one system libGL)
	i = COM_CheckParm("-gl_driver");
	if (i && i < com_argc - 1)
		drivername = com_argv[i + 1];
	if (!GL_OpenLibrary(drivername))
	{
		Con_Printf("Unable to load GL driver \"%s\"\n", drivername);
		return false;
	}

	if (!(vidx11_display = XOpenDisplay(NULL)))
	{
		Con_Print("Couldn't open the X display\n");
		return false;
	}

	// LordHavoc: making the close button on a window do the right thing
	// seems to involve this mess, sigh...
	wm_delete_window_atom = XInternAtom(vidx11_display, "WM_DELETE_WINDOW", false);
	net_wm_state_atom = XInternAtom(vidx11_display, "_NET_WM_STATE", false);
	net_wm_state_fullscreen_atom = XInternAtom(vidx11_display, "_NET_WM_STATE_FULLSCREEN", false);
	net_wm_state_hidden_atom = XInternAtom(vidx11_display, "_NET_WM_STATE_HIDDEN", false);
	net_wm_icon = XInternAtom(vidx11_display, "_NET_WM_ICON", false);
	cardinal = XInternAtom(vidx11_display, "CARDINAL", false);

	// make autorepeat send keypress/keypress/.../keyrelease instead of intervening keyrelease
	XkbSetDetectableAutoRepeat(vidx11_display, true, NULL);

	vidx11_screen = DefaultScreen(vidx11_display);
	root = RootWindow(vidx11_display, vidx11_screen);

	desktop_mode.width = DisplayWidth(vidx11_display, vidx11_screen);
	desktop_mode.height = DisplayHeight(vidx11_display, vidx11_screen);
	desktop_mode.bpp = DefaultDepth(vidx11_display, vidx11_screen);
	desktop_mode.refreshrate = 60; // FIXME
	desktop_mode.pixelheight_num = 1; // FIXME
	desktop_mode.pixelheight_denom = 1; // FIXME

	// Get video mode list
	MajorVersion = MinorVersion = 0;
	if (!XF86VidModeQueryVersion(vidx11_display, &MajorVersion, &MinorVersion))
		vidmode_ext = false;
	else
	{
		Con_DPrintf("Using XFree86-VidModeExtension Version %d.%d\n", MajorVersion, MinorVersion);
		vidmode_ext = true;
	}

	if ((qglXChooseVisual = (XVisualInfo *(GLAPIENTRY *)(Display *dpy, int screen, int *attribList))GL_GetProcAddress("glXChooseVisual")) == NULL
	 || (qglXCreateContext = (GLXContext (GLAPIENTRY *)(Display *dpy, XVisualInfo *vis, GLXContext shareList, Bool direct))GL_GetProcAddress("glXCreateContext")) == NULL
	 || (qglXDestroyContext = (void (GLAPIENTRY *)(Display *dpy, GLXContext ctx))GL_GetProcAddress("glXDestroyContext")) == NULL
	 || (qglXMakeCurrent = (Bool (GLAPIENTRY *)(Display *dpy, GLXDrawable drawable, GLXContext ctx))GL_GetProcAddress("glXMakeCurrent")) == NULL
	 || (qglXSwapBuffers = (void (GLAPIENTRY *)(Display *dpy, GLXDrawable drawable))GL_GetProcAddress("glXSwapBuffers")) == NULL
	 || (qglXQueryExtensionsString = (const char *(GLAPIENTRY *)(Display *dpy, int screen))GL_GetProcAddress("glXQueryExtensionsString")) == NULL)
	{
		Con_Printf("glX functions not found in %s\n", gl_driver);
		return false;
	}

	VID_BuildGLXAttrib(attrib, mode->bitsperpixel == 32, mode->stereobuffer, mode->samples);
	visinfo = qglXChooseVisual(vidx11_display, vidx11_screen, attrib);
	if (!visinfo)
	{
		Con_Print("Couldn't get an RGB, Double-buffered, Depth visual\n");
		return false;
	}

	if (mode->fullscreen)
	{
		if(vid_desktopfullscreen.integer)
		{
			// TODO detect WM support
			vid_isdesktopfullscreen = true;
			vid_isfullscreen = true;
			// width and height will be filled in later
			Con_DPrintf("Using NetWM fullscreen mode\n");
		}

		if(!vid_isfullscreen && vidmode_ext)
		{
			int best_fit, best_dist, dist, x, y;

			// Are we going fullscreen?  If so, let's change video mode
			XF86VidModeModeLine *current_vidmode;
			XF86VidModeModeInfo **vidmodes;
			int num_vidmodes;

			// This nice hack comes from the SDL source code
			current_vidmode = (XF86VidModeModeLine*)((char*)&init_vidmode + sizeof(init_vidmode.dotclock));
			XF86VidModeGetModeLine(vidx11_display, vidx11_screen, (int*)&init_vidmode.dotclock, current_vidmode);

			XF86VidModeGetAllModeLines(vidx11_display, vidx11_screen, &num_vidmodes, &vidmodes);
			best_dist = 0;
			best_fit = -1;

			for (i = 0; i < num_vidmodes; i++)
			{
				if (mode->width > vidmodes[i]->hdisplay || mode->height > vidmodes[i]->vdisplay)
					continue;

				x = mode->width - vidmodes[i]->hdisplay;
				y = mode->height - vidmodes[i]->vdisplay;
				dist = (x * x) + (y * y);
				if (best_fit == -1 || dist < best_dist)
				{
					best_dist = dist;
					best_fit = i;
				}
			}

			if (best_fit != -1)
			{
				// LordHavoc: changed from ActualWidth/ActualHeight =,
				// to width/height =, so the window will take the full area of
				// the mode chosen
				mode->width = vidmodes[best_fit]->hdisplay;
				mode->height = vidmodes[best_fit]->vdisplay;

				// change to the mode
				XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, vidmodes[best_fit]);
				memcpy(&game_vidmode, vidmodes[best_fit], sizeof(game_vidmode));
				vid_isvidmodefullscreen = true;
				vid_isfullscreen = true;

				// Move the viewport to top left
				XF86VidModeSetViewPort(vidx11_display, vidx11_screen, 0, 0);
				Con_DPrintf("Using XVidMode fullscreen mode at %dx%d\n", mode->width, mode->height);
			}

			free(vidmodes);
		}

		if(!vid_isfullscreen)
		{
			// sorry, no FS available
			// use the full desktop resolution
			vid_isfullscreen = true;
			// width and height will be filled in later
			mode->width = DisplayWidth(vidx11_display, vidx11_screen);
			mode->height = DisplayHeight(vidx11_display, vidx11_screen);
			Con_DPrintf("Using X11 fullscreen mode at %dx%d\n", mode->width, mode->height);
		}
	}

	// LordHavoc: save the visual for use in gamma ramp settings later
	vidx11_visual = visinfo->visual;

	/* window attributes */
	attr.background_pixel = 0;
	attr.border_pixel = 0;
	// LordHavoc: save the colormap for later, too
	vidx11_colormap = attr.colormap = XCreateColormap(vidx11_display, root, visinfo->visual, AllocNone);
	attr.event_mask = X_MASK;

	if (mode->fullscreen)
	{
		if(vid_isdesktopfullscreen)
		{
			mask = CWBackPixel | CWColormap | CWSaveUnder | CWBackingStore | CWEventMask;
			attr.backing_store = NotUseful;
			attr.save_under = False;
		}
		else
		{
			mask = CWBackPixel | CWColormap | CWSaveUnder | CWBackingStore | CWEventMask | CWOverrideRedirect;
			attr.override_redirect = True;
			attr.backing_store = NotUseful;
			attr.save_under = False;
			vid_isoverrideredirect = true; // so it knows to grab
		}
	}
	else
	{
		mask = CWBackPixel | CWBorderPixel | CWColormap | CWEventMask;
	}

	win = XCreateWindow(vidx11_display, root, 0, 0, mode->width, mode->height, 0, visinfo->depth, InputOutput, visinfo->visual, mask, &attr);

	data = loadimagepixelsbgra("darkplaces-icon", false, false, false, NULL);
	if(data)
	{
		// use _NET_WM_ICON too
		static long netwm_icon[MAX_NETWM_ICON];
		int pos = 0;
		int i = 1;

		while(data)
		{
			if(pos + 2 * image_width * image_height < MAX_NETWM_ICON)
			{
				netwm_icon[pos++] = image_width;
				netwm_icon[pos++] = image_height;
				for(i = 0; i < image_height; ++i)
					for(j = 0; j < image_width; ++j)
						netwm_icon[pos++] = BuffLittleLong(&data[(i*image_width+j)*4]);
			}
			else
			{
				Con_Printf("Skipping NETWM icon #%d because there is no space left\n", i);
			}
			++i;
			Mem_Free(data);
			data = loadimagepixelsbgra(va(vabuf, sizeof(vabuf), "darkplaces-icon%d", i), false, false, false, NULL);
		}
		XChangeProperty(vidx11_display, win, net_wm_icon, cardinal, 32, PropModeReplace, (const unsigned char *) netwm_icon, pos);
	}

	// fallthrough for old window managers
	xpm = (char *) FS_LoadFile("darkplaces-icon.xpm", tempmempool, false, NULL);
	idata = NULL;
	if(xpm)
		idata = XPM_DecodeString(xpm);
	if(!idata)
		idata = ENGINE_ICON;

	wmhints = XAllocWMHints();
	if(XpmCreatePixmapFromData(vidx11_display, win,
		idata,
		&wmhints->icon_pixmap, &wmhints->icon_mask, NULL) == XpmSuccess)
		wmhints->flags |= IconPixmapHint | IconMaskHint;

	if(xpm)
		Mem_Free(xpm);

	clshints = XAllocClassHint();
	clshints->res_name = strdup(gamename);
	clshints->res_class = strdup("DarkPlaces");

	szhints = XAllocSizeHints();
	if(vid_resizable.integer == 0 && !vid_isdesktopfullscreen)
	{
		szhints->min_width = szhints->max_width = mode->width;
		szhints->min_height = szhints->max_height = mode->height;
		szhints->flags |= PMinSize | PMaxSize;
	}

	XmbSetWMProperties(vidx11_display, win, gamename, gamename, (char **) com_argv, com_argc, szhints, wmhints, clshints);
	// strdup() allocates using malloc(), should be freed with free()
	free(clshints->res_name);
	free(clshints->res_class);
	XFree(clshints);
	XFree(wmhints);
	XFree(szhints);

	//XStoreName(vidx11_display, win, gamename);
	XMapWindow(vidx11_display, win);

	XSetWMProtocols(vidx11_display, win, &wm_delete_window_atom, 1);

	if (vid_isoverrideredirect)
	{
		XMoveWindow(vidx11_display, win, 0, 0);
		XRaiseWindow(vidx11_display, win);
		XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, 0, 0);
		XFlush(vidx11_display);
	}

	if(vid_isvidmodefullscreen)
	{
		// Move the viewport to top left
		XF86VidModeSetViewPort(vidx11_display, vidx11_screen, 0, 0);
	}

	//XSync(vidx11_display, False);

	ctx = qglXCreateContext(vidx11_display, visinfo, NULL, True);
	XFree(visinfo); // glXChooseVisual man page says to use XFree to free visinfo
	if (!ctx)
	{
		Con_Printf ("glXCreateContext failed\n");
		return false;
	}

	if (!qglXMakeCurrent(vidx11_display, win, ctx))
	{
		Con_Printf ("glXMakeCurrent failed\n");
		return false;
	}

	XSync(vidx11_display, False);

	if ((qglGetString = (const GLubyte* (GLAPIENTRY *)(GLenum name))GL_GetProcAddress("glGetString")) == NULL)
	{
		Con_Printf ("glGetString not found in %s\n", gl_driver);
		return false;
	}

	gl_extensions = (const char *)qglGetString(GL_EXTENSIONS);
	gl_platform = "GLX";
	gl_platformextensions = qglXQueryExtensionsString(vidx11_display, vidx11_screen);

// COMMANDLINEOPTION: Linux GLX: -nogetprocaddress disables GLX_ARB_get_proc_address (not required, more formal method of getting extension functions)
// COMMANDLINEOPTION: BSD GLX: -nogetprocaddress disables GLX_ARB_get_proc_address (not required, more formal method of getting extension functions)
// COMMANDLINEOPTION: MacOSX GLX: -nogetprocaddress disables GLX_ARB_get_proc_address (not required, more formal method of getting extension functions)
	GL_CheckExtension("GLX_ARB_get_proc_address", getprocaddressfuncs, "-nogetprocaddress", false);
// COMMANDLINEOPTION: Linux GLX: -novideosync disables GLX_SGI_swap_control
// COMMANDLINEOPTION: BSD GLX: -novideosync disables GLX_SGI_swap_control
// COMMANDLINEOPTION: MacOSX GLX: -novideosync disables GLX_SGI_swap_control
	GL_CheckExtension("GLX_SGI_swap_control", swapcontrolfuncs, "-novideosync", false);

	vid_usingmousegrab = false;
	vid_usingmouse = false;
	vid_usinghidecursor = false;
	vid_usingvsync = false;
	vid_hidden = false;
	vid_activewindow = true;
#ifdef USEDGA
	vid_x11_dgasupported = XF86DGAQueryVersion(vidx11_display, &MajorVersion, &MinorVersion);
	if (!vid_x11_dgasupported)
		Con_Print( "Failed to detect XF86DGA Mouse extension\n" );
#endif

	GL_Init();
	return true;
}

qboolean VID_InitMode(viddef_mode_t *mode)
{
#ifdef SSE_POSSIBLE
	if (vid_soft.integer)
		return VID_InitModeSoft(mode);
	else
#endif
		return VID_InitModeGL(mode);
}

void Sys_SendKeyEvents(void)
{
	static qboolean sound_active = true;

	// enable/disable sound on focus gain/loss
	if ((!vid_hidden && vid_activewindow) || !snd_mutewhenidle.integer)
	{
		if (!sound_active)
		{
			S_UnblockSound ();
			sound_active = true;
		}
	}
	else
	{
		if (sound_active)
		{
			S_BlockSound ();
			sound_active = false;
		}
	}

	HandleEvents();
}

void VID_BuildJoyState(vid_joystate_t *joystate)
{
	VID_Shared_BuildJoyState_Begin(joystate);
	VID_Shared_BuildJoyState_Finish(joystate);
}

void VID_EnableJoystick(qboolean enable)
{
	int index = joy_enable.integer > 0 ? joy_index.integer : -1;
	qboolean success = false;
	int sharedcount = 0;
	sharedcount = VID_Shared_SetJoystick(index);
	if (index >= 0 && index < sharedcount)
		success = true;

	// update cvar containing count of XInput joysticks
	if (joy_detected.integer != sharedcount)
		Cvar_SetValueQuick(&joy_detected, sharedcount);

	Cvar_SetValueQuick(&joy_active, success ? 1 : 0);
}

void IN_Move (void)
{
	vid_joystate_t joystate;
	VID_EnableJoystick(true);
	VID_BuildJoyState(&joystate);
	VID_ApplyJoyState(&joystate);
}

vid_mode_t *VID_GetDesktopMode(void)
{
	return &desktop_mode;
}

size_t VID_ListModes(vid_mode_t *modes, size_t maxcount)
{
	if(vidmode_ext)
	{
		int i, bpp;
		size_t k;
		XF86VidModeModeInfo **vidmodes;
		int num_vidmodes;

		XF86VidModeGetAllModeLines(vidx11_display, vidx11_screen, &num_vidmodes, &vidmodes);
		k = 0;
		for (i = 0; i < num_vidmodes; i++)
		{
			if(k >= maxcount)
				break;
			// we don't get bpp info, so let's just assume all of 8, 15, 16, 24, 32 work
			for(bpp = 8; bpp <= 32; bpp = ((bpp == 8) ? 15 : (bpp & 0xF8) + 8))
			{
				if(k >= maxcount)
					break;
				modes[k].width = vidmodes[i]->hdisplay;
				modes[k].height = vidmodes[i]->vdisplay;
				modes[k].bpp = 8;
				if(vidmodes[i]->dotclock && vidmodes[i]->htotal && vidmodes[i]->vtotal)
					modes[k].refreshrate = vidmodes[i]->dotclock / vidmodes[i]->htotal / vidmodes[i]->vtotal;
				else
					modes[k].refreshrate = 60;
				modes[k].pixelheight_num = 1;
				modes[k].pixelheight_denom = 1; // xvidmode does not provide this
				++k;
			}
		}
		// manpage of XF86VidModeGetAllModeLines says it should be freed by the caller
		XFree(vidmodes);
		return k;
	}
	return 0; // FIXME implement this
}
