SDL/Win32: queue a vid_restart if resized; this should fix vid_resizable issue on...
[divverent/darkplaces.git] / vid_glx.c
1 /*
2 Copyright (C) 1996-1997 Id Software, Inc.
3
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
8
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
12
13 See the GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18 */
19
20 #include <signal.h>
21
22 #include <dlfcn.h>
23
24 #include <X11/Xlib.h>
25 #include <X11/Xutil.h>
26 #include <X11/Xatom.h>
27 #include <X11/XKBlib.h> // TODO possibly ifdef this out on non-supporting systems... Solaris (as always)?
28 #include <GL/glx.h>
29
30 #include "quakedef.h"
31
32 #include <X11/keysym.h>
33 #include <X11/cursorfont.h>
34 #include <X11/xpm.h>
35
36 #include <X11/extensions/XShm.h>
37 #if !defined(__APPLE__) && !defined(__MACH__) && !defined(SUNOS)
38 #include <X11/extensions/xf86dga.h>
39 #endif
40 #include <X11/extensions/xf86vmode.h>
41
42 #include "nexuiz.xpm"
43 #include "darkplaces.xpm"
44
45 // Tell startup code that we have a client
46 int cl_available = true;
47
48 // note: if we used the XRandR extension we could support refresh rates
49 qboolean vid_supportrefreshrate = false;
50
51 //GLX prototypes
52 XVisualInfo *(GLAPIENTRY *qglXChooseVisual)(Display *dpy, int screen, int *attribList);
53 GLXContext (GLAPIENTRY *qglXCreateContext)(Display *dpy, XVisualInfo *vis, GLXContext shareList, Bool direct);
54 void (GLAPIENTRY *qglXDestroyContext)(Display *dpy, GLXContext ctx);
55 Bool (GLAPIENTRY *qglXMakeCurrent)(Display *dpy, GLXDrawable drawable, GLXContext ctx);
56 void (GLAPIENTRY *qglXSwapBuffers)(Display *dpy, GLXDrawable drawable);
57 const char *(GLAPIENTRY *qglXQueryExtensionsString)(Display *dpy, int screen);
58
59 //GLX_ARB_get_proc_address
60 void *(GLAPIENTRY *qglXGetProcAddressARB)(const GLubyte *procName);
61
62 static dllfunction_t getprocaddressfuncs[] =
63 {
64         {"glXGetProcAddressARB", (void **) &qglXGetProcAddressARB},
65         {NULL, NULL}
66 };
67
68 //GLX_SGI_swap_control
69 GLint (GLAPIENTRY *qglXSwapIntervalSGI)(GLint interval);
70
71 static dllfunction_t swapcontrolfuncs[] =
72 {
73         {"glXSwapIntervalSGI", (void **) &qglXSwapIntervalSGI},
74         {NULL, NULL}
75 };
76
77 static Display *vidx11_display = NULL;
78 static int vidx11_screen;
79 static Window win, root;
80 static GLXContext ctx = NULL;
81
82 Atom wm_delete_window_atom;
83 Atom net_wm_state_atom;
84 Atom net_wm_state_hidden_atom;
85 Atom net_wm_state_fullscreen_atom;
86
87 #define KEY_MASK (KeyPressMask | KeyReleaseMask)
88 #define MOUSE_MASK (ButtonPressMask | ButtonReleaseMask | \
89                     PointerMotionMask | ButtonMotionMask)
90 #define X_MASK (KEY_MASK | MOUSE_MASK | VisibilityChangeMask | \
91                 StructureNotifyMask | FocusChangeMask | EnterWindowMask | \
92                 LeaveWindowMask)
93
94
95 static qboolean mouse_avail = true;
96 static qboolean vid_usingmousegrab = false;
97 static qboolean vid_usingmouse = false;
98 static qboolean vid_usinghidecursor = false;
99 static qboolean vid_usingvsync = false;
100 static qboolean vid_usevsync = false;
101 static qboolean vid_x11_hardwaregammasupported = false;
102 static qboolean vid_x11_dgasupported = false;
103 static int vid_x11_gammarampsize = 0;
104
105 #if !defined(__APPLE__) && !defined(SUNOS)
106 cvar_t vid_dgamouse = {CVAR_SAVE, "vid_dgamouse", "0", "make use of DGA mouse input"};
107 static qboolean vid_usingdgamouse = false;
108 #endif
109 cvar_t vid_netwmfullscreen = {CVAR_SAVE, "vid_netwmfullscreen", "0", "make use _NET_WM_STATE_FULLSCREEN; turn this off if fullscreen does not work for you"};
110
111 qboolean vidmode_ext = false;
112
113 static int win_x, win_y;
114
115 static XF86VidModeModeInfo init_vidmode, game_vidmode;
116 static qboolean vid_isfullscreen = false;
117 static qboolean vid_isvidmodefullscreen = false;
118 static qboolean vid_isnetwmfullscreen = false;
119 static qboolean vid_isoverrideredirect = false;
120
121 static Visual *vidx11_visual;
122 static Colormap vidx11_colormap;
123
124 /*-----------------------------------------------------------------------*/
125
126 static int XLateKey(XKeyEvent *ev, char *ascii)
127 {
128         int key = 0;
129         char buf[64];
130         KeySym keysym, shifted;
131
132         keysym = XLookupKeysym (ev, 0);
133         XLookupString(ev, buf, sizeof buf, &shifted, 0);
134         *ascii = buf[0];
135
136         switch(keysym)
137         {
138                 case XK_KP_Page_Up:      key = K_KP_PGUP; break;
139                 case XK_Page_Up:         key = K_PGUP; break;
140
141                 case XK_KP_Page_Down: key = K_KP_PGDN; break;
142                 case XK_Page_Down:       key = K_PGDN; break;
143
144                 case XK_KP_Home: key = K_KP_HOME; break;
145                 case XK_Home:    key = K_HOME; break;
146
147                 case XK_KP_End:  key = K_KP_END; break;
148                 case XK_End:     key = K_END; break;
149
150                 case XK_KP_Left: key = K_KP_LEFTARROW; break;
151                 case XK_Left:    key = K_LEFTARROW; break;
152
153                 case XK_KP_Right: key = K_KP_RIGHTARROW; break;
154                 case XK_Right:  key = K_RIGHTARROW;             break;
155
156                 case XK_KP_Down: key = K_KP_DOWNARROW; break;
157                 case XK_Down:    key = K_DOWNARROW; break;
158
159                 case XK_KP_Up:   key = K_KP_UPARROW; break;
160                 case XK_Up:              key = K_UPARROW;        break;
161
162                 case XK_Escape: key = K_ESCAPE;         break;
163
164                 case XK_KP_Enter: key = K_KP_ENTER;     break;
165                 case XK_Return: key = K_ENTER;           break;
166
167                 case XK_Tab:            key = K_TAB;                     break;
168
169                 case XK_F1:              key = K_F1;                            break;
170
171                 case XK_F2:              key = K_F2;                            break;
172
173                 case XK_F3:              key = K_F3;                            break;
174
175                 case XK_F4:              key = K_F4;                            break;
176
177                 case XK_F5:              key = K_F5;                            break;
178
179                 case XK_F6:              key = K_F6;                            break;
180
181                 case XK_F7:              key = K_F7;                            break;
182
183                 case XK_F8:              key = K_F8;                            break;
184
185                 case XK_F9:              key = K_F9;                            break;
186
187                 case XK_F10:            key = K_F10;                     break;
188
189                 case XK_F11:            key = K_F11;                     break;
190
191                 case XK_F12:            key = K_F12;                     break;
192
193                 case XK_BackSpace: key = K_BACKSPACE; break;
194
195                 case XK_KP_Delete: key = K_KP_DEL; break;
196                 case XK_Delete: key = K_DEL; break;
197
198                 case XK_Pause:  key = K_PAUSE;           break;
199
200                 case XK_Shift_L:
201                 case XK_Shift_R:        key = K_SHIFT;          break;
202
203                 case XK_Execute:
204                 case XK_Control_L:
205                 case XK_Control_R:      key = K_CTRL;            break;
206
207                 case XK_Alt_L:
208                 case XK_Meta_L:
209                 case XK_ISO_Level3_Shift:
210                 case XK_Alt_R:
211                 case XK_Meta_R: key = K_ALT;                    break;
212
213                 case XK_KP_Begin: key = K_KP_5; break;
214
215                 case XK_Insert:key = K_INS; break;
216                 case XK_KP_Insert: key = K_KP_INS; break;
217
218                 case XK_KP_Multiply: key = K_KP_MULTIPLY; break;
219                 case XK_KP_Add:  key = K_KP_PLUS; break;
220                 case XK_KP_Subtract: key = K_KP_MINUS; break;
221                 case XK_KP_Divide: key = K_KP_SLASH; break;
222
223                 case XK_section:        key = '~'; break;
224
225                 default:
226                         if (keysym < 32)
227                                 break;
228
229                         if (keysym >= 'A' && keysym <= 'Z')
230                                 key = keysym - 'A' + 'a';
231                         else
232                                 key = keysym;
233
234                         break;
235         }
236
237         return key;
238 }
239
240 static Cursor CreateNullCursor(Display *display, Window root)
241 {
242         Pixmap cursormask;
243         XGCValues xgc;
244         GC gc;
245         XColor dummycolour;
246         Cursor cursor;
247
248         cursormask = XCreatePixmap(display, root, 1, 1, 1);
249         xgc.function = GXclear;
250         gc =  XCreateGC(display, cursormask, GCFunction, &xgc);
251         XFillRectangle(display, cursormask, gc, 0, 0, 1, 1);
252         dummycolour.pixel = 0;
253         dummycolour.red = 0;
254         dummycolour.flags = 04;
255         cursor = XCreatePixmapCursor(display, cursormask, cursormask, &dummycolour,&dummycolour, 0,0);
256         XFreePixmap(display,cursormask);
257         XFreeGC(display,gc);
258         return cursor;
259 }
260
261 void VID_SetMouse(qboolean fullscreengrab, qboolean relative, qboolean hidecursor)
262 {
263         static int originalmouseparms_num;
264         static int originalmouseparms_denom;
265         static int originalmouseparms_threshold;
266         static qboolean restore_spi;
267
268 #if !defined(__APPLE__) && !defined(SUNOS)
269         qboolean usedgamouse;
270 #endif
271
272         if (!vidx11_display || !win)
273                 return;
274
275         if (relative)
276                 fullscreengrab = true;
277
278         if (!mouse_avail)
279                 fullscreengrab = relative = hidecursor = false;
280
281 #if !defined(__APPLE__) && !defined(SUNOS)
282         usedgamouse = relative && vid_dgamouse.integer;
283         if (!vid_x11_dgasupported)
284                 usedgamouse = false;
285         if (fullscreengrab && vid_usingmouse && (vid_usingdgamouse != usedgamouse))
286                 VID_SetMouse(false, false, false); // ungrab first!
287 #endif
288
289         if (vid_usingmousegrab != fullscreengrab)
290         {
291                 vid_usingmousegrab = fullscreengrab;
292                 cl_ignoremousemoves = 2;
293                 if (fullscreengrab)
294                 {
295                         XGrabPointer(vidx11_display, win,  True, 0, GrabModeAsync, GrabModeAsync, win, None, CurrentTime);
296                         if (vid_grabkeyboard.integer || vid_isoverrideredirect)
297                                 XGrabKeyboard(vidx11_display, win, False, GrabModeAsync, GrabModeAsync, CurrentTime);
298                 }
299                 else
300                 {
301                         XUngrabPointer(vidx11_display, CurrentTime);
302                         XUngrabKeyboard(vidx11_display, CurrentTime);
303                 }
304         }
305
306         if (relative)
307         {
308                 if (!vid_usingmouse)
309                 {
310                         XWindowAttributes attribs_1;
311                         XSetWindowAttributes attribs_2;
312
313                         XGetWindowAttributes(vidx11_display, win, &attribs_1);
314                         attribs_2.event_mask = attribs_1.your_event_mask | KEY_MASK | MOUSE_MASK;
315                         XChangeWindowAttributes(vidx11_display, win, CWEventMask, &attribs_2);
316
317 #if !defined(__APPLE__) && !defined(SUNOS)
318                         vid_usingdgamouse = usedgamouse;
319                         if (usedgamouse)
320                         {
321                                 XF86DGADirectVideo(vidx11_display, DefaultScreen(vidx11_display), XF86DGADirectMouse);
322                                 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, 0, 0);
323                         }
324                         else
325 #endif
326                                 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, vid.width / 2, vid.height / 2);
327
328 // COMMANDLINEOPTION: X11 Input: -noforcemparms disables setting of mouse parameters (not used with DGA, windows only)
329 #if !defined(__APPLE__) && !defined(SUNOS)
330                         if (!COM_CheckParm ("-noforcemparms") && !usedgamouse)
331 #else
332                         if (!COM_CheckParm ("-noforcemparms"))
333 #endif
334                         {
335                                 XGetPointerControl(vidx11_display, &originalmouseparms_num, &originalmouseparms_denom, &originalmouseparms_threshold);
336                                 XChangePointerControl (vidx11_display, true, false, 1, 1, -1); // TODO maybe change threshold here, or remove this comment
337                                 restore_spi = true;
338                         }
339                         else
340                                 restore_spi = false;
341
342                         cl_ignoremousemoves = 2;
343                         vid_usingmouse = true;
344                 }
345         }
346         else
347         {
348                 if (vid_usingmouse)
349                 {
350 #if !defined(__APPLE__) && !defined(SUNOS)
351                         if (vid_usingdgamouse)
352                                 XF86DGADirectVideo(vidx11_display, DefaultScreen(vidx11_display), 0);
353                         vid_usingdgamouse = false;
354 #endif
355                         cl_ignoremousemoves = 2;
356
357                         if (restore_spi)
358                                 XChangePointerControl (vidx11_display, true, true, originalmouseparms_num, originalmouseparms_denom, originalmouseparms_threshold);
359                         restore_spi = false;
360
361                         vid_usingmouse = false;
362                 }
363         }
364
365         if (vid_usinghidecursor != hidecursor)
366         {
367                 vid_usinghidecursor = hidecursor;
368                 if (hidecursor)
369                         XDefineCursor(vidx11_display, win, CreateNullCursor(vidx11_display, win));
370                 else
371                         XUndefineCursor(vidx11_display, win);
372         }
373 }
374
375 static keynum_t buttonremap[18] =
376 {
377         K_MOUSE1,
378         K_MOUSE3,
379         K_MOUSE2,
380         K_MWHEELUP,
381         K_MWHEELDOWN,
382         K_MOUSE4,
383         K_MOUSE5,
384         K_MOUSE6,
385         K_MOUSE7,
386         K_MOUSE8,
387         K_MOUSE9,
388         K_MOUSE10,
389         K_MOUSE11,
390         K_MOUSE12,
391         K_MOUSE13,
392         K_MOUSE14,
393         K_MOUSE15,
394         K_MOUSE16,
395 };
396
397 static void HandleEvents(void)
398 {
399         XEvent event;
400         int key;
401         char ascii;
402         qboolean dowarp = false;
403
404         if (!vidx11_display)
405                 return;
406
407         while (XPending(vidx11_display))
408         {
409                 XNextEvent(vidx11_display, &event);
410
411                 switch (event.type)
412                 {
413                 case KeyPress:
414                         // key pressed
415                         key = XLateKey (&event.xkey, &ascii);
416                         Key_Event(key, ascii, true);
417                         break;
418
419                 case KeyRelease:
420                         // key released
421                         key = XLateKey (&event.xkey, &ascii);
422                         Key_Event(key, ascii, false);
423                         break;
424
425                 case MotionNotify:
426                         // mouse moved
427                         if (vid_usingmouse)
428                         {
429 #if !defined(__APPLE__) && !defined(SUNOS)
430                                 if (vid_usingdgamouse)
431                                 {
432                                         in_mouse_x += event.xmotion.x_root;
433                                         in_mouse_y += event.xmotion.y_root;
434                                 }
435                                 else
436 #endif
437                                 {
438                                         if (!event.xmotion.send_event)
439                                         {
440                                                 in_mouse_x += event.xmotion.x - in_windowmouse_x;
441                                                 in_mouse_y += event.xmotion.y - in_windowmouse_y;
442                                                 //if (abs(vid.width/2 - event.xmotion.x) + abs(vid.height/2 - event.xmotion.y))
443                                                 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)
444                                                         dowarp = true;
445                                         }
446                                 }
447                         }
448                         in_windowmouse_x = event.xmotion.x;
449                         in_windowmouse_y = event.xmotion.y;
450                         break;
451
452                 case ButtonPress:
453                         // mouse button pressed
454                         if (event.xbutton.button <= 18)
455                                 Key_Event(buttonremap[event.xbutton.button - 1], 0, true);
456                         else
457                                 Con_Printf("HandleEvents: ButtonPress gave value %d, 1-18 expected\n", event.xbutton.button);
458                         break;
459
460                 case ButtonRelease:
461                         // mouse button released
462                         if (event.xbutton.button <= 18)
463                                 Key_Event(buttonremap[event.xbutton.button - 1], 0, false);
464                         else
465                                 Con_Printf("HandleEvents: ButtonRelease gave value %d, 1-18 expected\n", event.xbutton.button);
466                         break;
467
468                 case CreateNotify:
469                         // window created
470                         win_x = event.xcreatewindow.x;
471                         win_y = event.xcreatewindow.y;
472                         break;
473
474                 case ConfigureNotify:
475                         // window changed size/location
476                         win_x = event.xconfigure.x;
477                         win_y = event.xconfigure.y;
478                         if(vid_resizable.integer < 2 || vid_isnetwmfullscreen)
479                         {
480                                 vid.width = event.xconfigure.width;
481                                 vid.height = event.xconfigure.height;
482                                 if(vid_isnetwmfullscreen)
483                                         Con_Printf("NetWM fullscreen: actually using resolution %dx%d\n", vid.width, vid.height);
484                                 else
485                                         Con_DPrintf("Updating to ConfigureNotify resolution %dx%d\n", vid.width, vid.height);
486                         }
487                         break;
488                 case DestroyNotify:
489                         // window has been destroyed
490                         Sys_Quit(0);
491                         break;
492                 case ClientMessage:
493                         // window manager messages
494                         if ((event.xclient.format == 32) && ((unsigned int)event.xclient.data.l[0] == wm_delete_window_atom))
495                                 Sys_Quit(0);
496                         break;
497                 case MapNotify:
498                         if (vid_isoverrideredirect)
499                                 break;
500                         // window restored
501                         vid_hidden = false;
502                         VID_RestoreSystemGamma();
503
504                         if(vid_isvidmodefullscreen)
505                         {
506                                 // set our video mode
507                                 XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, &game_vidmode);
508
509                                 // Move the viewport to top left
510                                 XF86VidModeSetViewPort(vidx11_display, vidx11_screen, 0, 0);
511                         }
512
513                         if(vid_isnetwmfullscreen)
514                         {
515                                 // make sure it's fullscreen
516                                 XEvent event;
517                                 event.type = ClientMessage;
518                                 event.xclient.serial = 0;
519                                 event.xclient.send_event = True;
520                                 event.xclient.message_type = net_wm_state_atom;
521                                 event.xclient.window = win;
522                                 event.xclient.format = 32;
523                                 event.xclient.data.l[0] = 1;
524                                 event.xclient.data.l[1] = net_wm_state_fullscreen_atom;
525                                 event.xclient.data.l[2] = 0;
526                                 event.xclient.data.l[3] = 1;
527                                 event.xclient.data.l[4] = 0;
528                                 XSendEvent(vidx11_display, root, False, SubstructureRedirectMask | SubstructureNotifyMask, &event);
529                         }
530
531                         dowarp = true;
532
533                         break;
534                 case UnmapNotify:
535                         if (vid_isoverrideredirect)
536                                 break;
537                         // window iconified/rolledup/whatever
538                         vid_hidden = true;
539                         VID_RestoreSystemGamma();
540
541                         if(vid_isvidmodefullscreen)
542                                 XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, &init_vidmode);
543
544                         break;
545                 case FocusIn:
546                         if (vid_isoverrideredirect)
547                                 break;
548                         // window is now the input focus
549                         vid_activewindow = true;
550                         break;
551                 case FocusOut:
552                         if (vid_isoverrideredirect)
553                                 break;
554
555                         if(vid_isnetwmfullscreen && event.xfocus.mode == NotifyNormal)
556                         {
557                                 // iconify netwm fullscreen window when it loses focus
558                                 // when the user selects it in the taskbar, the window manager will map it again and send MapNotify
559                                 XEvent event;
560                                 event.type = ClientMessage;
561                                 event.xclient.serial = 0;
562                                 event.xclient.send_event = True;
563                                 event.xclient.message_type = net_wm_state_atom;
564                                 event.xclient.window = win;
565                                 event.xclient.format = 32;
566                                 event.xclient.data.l[0] = 1;
567                                 event.xclient.data.l[1] = net_wm_state_hidden_atom;
568                                 event.xclient.data.l[2] = 0;
569                                 event.xclient.data.l[3] = 1;
570                                 event.xclient.data.l[4] = 0;
571                                 XSendEvent(vidx11_display, root, False, SubstructureRedirectMask | SubstructureNotifyMask, &event);
572                         }
573
574                         // window is no longer the input focus
575                         vid_activewindow = false;
576                         VID_RestoreSystemGamma();
577
578                         break;
579                 case EnterNotify:
580                         // mouse entered window
581                         break;
582                 case LeaveNotify:
583                         // mouse left window
584                         break;
585                 }
586         }
587
588         if (dowarp)
589         {
590                 /* move the mouse to the window center again */
591                 // we'll catch the warp motion by its send_event flag, updating the
592                 // stored mouse position without adding any delta motion
593                 XEvent event;
594                 event.type = MotionNotify;
595                 event.xmotion.display = vidx11_display;
596                 event.xmotion.window = win;
597                 event.xmotion.x = vid.width / 2;
598                 event.xmotion.y = vid.height / 2;
599                 XSendEvent(vidx11_display, win, False, PointerMotionMask, &event);
600                 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, vid.width / 2, vid.height / 2);
601         }
602 }
603
604 static void *prjobj = NULL;
605
606 static void GL_CloseLibrary(void)
607 {
608         if (prjobj)
609                 dlclose(prjobj);
610         prjobj = NULL;
611         gl_driver[0] = 0;
612         qglXGetProcAddressARB = NULL;
613         gl_extensions = "";
614         gl_platform = "";
615         gl_platformextensions = "";
616 }
617
618 static int GL_OpenLibrary(const char *name)
619 {
620         Con_Printf("Loading OpenGL driver %s\n", name);
621         GL_CloseLibrary();
622         if (!(prjobj = dlopen(name, RTLD_LAZY | RTLD_GLOBAL)))
623         {
624                 Con_Printf("Unable to open symbol list for %s\n", name);
625                 return false;
626         }
627         strlcpy(gl_driver, name, sizeof(gl_driver));
628         return true;
629 }
630
631 void *GL_GetProcAddress(const char *name)
632 {
633         void *p = NULL;
634         if (qglXGetProcAddressARB != NULL)
635                 p = (void *) qglXGetProcAddressARB((GLubyte *)name);
636         if (p == NULL)
637                 p = (void *) dlsym(prjobj, name);
638         return p;
639 }
640
641 void VID_Shutdown(void)
642 {
643         if (!ctx || !vidx11_display)
644                 return;
645
646         VID_SetMouse(false, false, false);
647         VID_RestoreSystemGamma();
648
649         // FIXME: glXDestroyContext here?
650         if (vid_isvidmodefullscreen)
651                 XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, &init_vidmode);
652         if (win)
653                 XDestroyWindow(vidx11_display, win);
654         XCloseDisplay(vidx11_display);
655
656         vid_hidden = true;
657         vid_isfullscreen = false;
658         vid_isnetwmfullscreen = false;
659         vid_isvidmodefullscreen = false;
660         vid_isoverrideredirect = false;
661         vidx11_display = NULL;
662         win = 0;
663         ctx = NULL;
664
665         GL_CloseLibrary();
666         Key_ClearStates ();
667 }
668
669 void signal_handler(int sig)
670 {
671         Con_Printf("Received signal %d, exiting...\n", sig);
672         VID_RestoreSystemGamma();
673         Sys_Quit(1);
674 }
675
676 void InitSig(void)
677 {
678         signal(SIGHUP, signal_handler);
679         signal(SIGINT, signal_handler);
680         signal(SIGQUIT, signal_handler);
681         signal(SIGILL, signal_handler);
682         signal(SIGTRAP, signal_handler);
683         signal(SIGIOT, signal_handler);
684         signal(SIGBUS, signal_handler);
685         signal(SIGFPE, signal_handler);
686         signal(SIGSEGV, signal_handler);
687         signal(SIGTERM, signal_handler);
688 }
689
690 void VID_Finish (void)
691 {
692         vid_usevsync = vid_vsync.integer && !cls.timedemo && gl_videosyncavailable;
693         if (vid_usingvsync != vid_usevsync && gl_videosyncavailable)
694         {
695                 vid_usingvsync = vid_usevsync;
696                 if (qglXSwapIntervalSGI (vid_usevsync))
697                         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");
698         }
699
700         if (r_render.integer)
701         {
702                 CHECKGLERROR
703                 if (r_speeds.integer == 2 || gl_finish.integer)
704                 {
705                         qglFinish();CHECKGLERROR
706                 }
707                 qglXSwapBuffers(vidx11_display, win);CHECKGLERROR
708         }
709
710         if (vid_x11_hardwaregammasupported)
711                 VID_UpdateGamma(false, vid_x11_gammarampsize);
712 }
713
714 int VID_SetGamma(unsigned short *ramps, int rampsize)
715 {
716         return XF86VidModeSetGammaRamp(vidx11_display, vidx11_screen, rampsize, ramps, ramps + rampsize, ramps + rampsize*2);
717 }
718
719 int VID_GetGamma(unsigned short *ramps, int rampsize)
720 {
721         return XF86VidModeGetGammaRamp(vidx11_display, vidx11_screen, rampsize, ramps, ramps + rampsize, ramps + rampsize*2);
722 }
723
724 void VID_Init(void)
725 {
726 #if !defined(__APPLE__) && !defined(SUNOS)
727         Cvar_RegisterVariable (&vid_dgamouse);
728 #endif
729         Cvar_RegisterVariable (&vid_netwmfullscreen);
730         InitSig(); // trap evil signals
731 // COMMANDLINEOPTION: Input: -nomouse disables mouse support (see also vid_mouse cvar)
732         if (COM_CheckParm ("-nomouse"))
733                 mouse_avail = false;
734 }
735
736 void VID_BuildGLXAttrib(int *attrib, qboolean stencil, qboolean stereobuffer, int samples)
737 {
738         *attrib++ = GLX_RGBA;
739         *attrib++ = GLX_RED_SIZE;*attrib++ = stencil ? 8 : 5;
740         *attrib++ = GLX_GREEN_SIZE;*attrib++ = stencil ? 8 : 5;
741         *attrib++ = GLX_BLUE_SIZE;*attrib++ = stencil ? 8 : 5;
742         *attrib++ = GLX_DOUBLEBUFFER;
743         *attrib++ = GLX_DEPTH_SIZE;*attrib++ = stencil ? 24 : 16;
744         // if stencil is enabled, ask for alpha too
745         if (stencil)
746         {
747                 *attrib++ = GLX_STENCIL_SIZE;*attrib++ = 8;
748                 *attrib++ = GLX_ALPHA_SIZE;*attrib++ = 8;
749         }
750         if (stereobuffer)
751                 *attrib++ = GLX_STEREO;
752         if (samples > 1)
753         {
754                 *attrib++ = GLX_SAMPLE_BUFFERS_ARB;
755                 *attrib++ = 1;
756                 *attrib++ = GLX_SAMPLES_ARB;
757                 *attrib++ = samples;
758         }
759         *attrib++ = None;
760 }
761
762 int VID_InitMode(int fullscreen, int *width, int *height, int bpp, int refreshrate, int stereobuffer, int samples)
763 {
764         int i;
765         int attrib[32];
766         XSetWindowAttributes attr;
767         XClassHint *clshints;
768         XWMHints *wmhints;
769         XSizeHints *szhints;
770         unsigned long mask;
771         XVisualInfo *visinfo;
772         int MajorVersion, MinorVersion;
773         const char *drivername;
774
775         vid_isfullscreen = false;
776         vid_isnetwmfullscreen = false;
777         vid_isvidmodefullscreen = false;
778         vid_isoverrideredirect = false;
779
780 #if defined(__APPLE__) && defined(__MACH__)
781         drivername = "/usr/X11R6/lib/libGL.1.dylib";
782 #else
783         drivername = "libGL.so.1";
784 #endif
785 // 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
786 // 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
787 // LordHavoc: although this works on MacOSX, it's useless there (as there is only one system libGL)
788         i = COM_CheckParm("-gl_driver");
789         if (i && i < com_argc - 1)
790                 drivername = com_argv[i + 1];
791         if (!GL_OpenLibrary(drivername))
792         {
793                 Con_Printf("Unable to load GL driver \"%s\"\n", drivername);
794                 return false;
795         }
796
797         if (!(vidx11_display = XOpenDisplay(NULL)))
798         {
799                 Con_Print("Couldn't open the X display\n");
800                 return false;
801         }
802
803         // LordHavoc: making the close button on a window do the right thing
804         // seems to involve this mess, sigh...
805         wm_delete_window_atom = XInternAtom(vidx11_display, "WM_DELETE_WINDOW", false);
806         net_wm_state_atom = XInternAtom(vidx11_display, "_NET_WM_STATE", false);
807         net_wm_state_fullscreen_atom = XInternAtom(vidx11_display, "_NET_WM_STATE_FULLSCREEN", false);
808         net_wm_state_hidden_atom = XInternAtom(vidx11_display, "_NET_WM_STATE_HIDDEN", false);
809
810         // make autorepeat send keypress/keypress/.../keyrelease instead of intervening keyrelease
811         XkbSetDetectableAutoRepeat(vidx11_display, true, NULL);
812
813         vidx11_screen = DefaultScreen(vidx11_display);
814         root = RootWindow(vidx11_display, vidx11_screen);
815
816         // Get video mode list
817         MajorVersion = MinorVersion = 0;
818         if (!XF86VidModeQueryVersion(vidx11_display, &MajorVersion, &MinorVersion))
819                 vidmode_ext = false;
820         else
821         {
822                 Con_DPrintf("Using XFree86-VidModeExtension Version %d.%d\n", MajorVersion, MinorVersion);
823                 vidmode_ext = true;
824         }
825
826         if ((qglXChooseVisual = (XVisualInfo *(GLAPIENTRY *)(Display *dpy, int screen, int *attribList))GL_GetProcAddress("glXChooseVisual")) == NULL
827          || (qglXCreateContext = (GLXContext (GLAPIENTRY *)(Display *dpy, XVisualInfo *vis, GLXContext shareList, Bool direct))GL_GetProcAddress("glXCreateContext")) == NULL
828          || (qglXDestroyContext = (void (GLAPIENTRY *)(Display *dpy, GLXContext ctx))GL_GetProcAddress("glXDestroyContext")) == NULL
829          || (qglXMakeCurrent = (Bool (GLAPIENTRY *)(Display *dpy, GLXDrawable drawable, GLXContext ctx))GL_GetProcAddress("glXMakeCurrent")) == NULL
830          || (qglXSwapBuffers = (void (GLAPIENTRY *)(Display *dpy, GLXDrawable drawable))GL_GetProcAddress("glXSwapBuffers")) == NULL
831          || (qglXQueryExtensionsString = (const char *(GLAPIENTRY *)(Display *dpy, int screen))GL_GetProcAddress("glXQueryExtensionsString")) == NULL)
832         {
833                 Con_Printf("glX functions not found in %s\n", gl_driver);
834                 return false;
835         }
836
837         VID_BuildGLXAttrib(attrib, bpp == 32, stereobuffer, samples);
838         visinfo = qglXChooseVisual(vidx11_display, vidx11_screen, attrib);
839         if (!visinfo)
840         {
841                 Con_Print("Couldn't get an RGB, Double-buffered, Depth visual\n");
842                 return false;
843         }
844
845         if (fullscreen)
846         {
847                 if(vid_netwmfullscreen.integer)
848                 {
849                         // TODO detect WM support
850                         vid_isnetwmfullscreen = true;
851                         vid_isfullscreen = true;
852                         // width and height will be filled in later
853                         Con_DPrintf("Using NetWM fullscreen mode\n");
854                 }
855
856                 if(!vid_isfullscreen && vidmode_ext)
857                 {
858                         int best_fit, best_dist, dist, x, y;
859
860                         // Are we going fullscreen?  If so, let's change video mode
861                         XF86VidModeModeLine *current_vidmode;
862                         XF86VidModeModeInfo **vidmodes;
863                         int num_vidmodes;
864
865                         // This nice hack comes from the SDL source code
866                         current_vidmode = (XF86VidModeModeLine*)((char*)&init_vidmode + sizeof(init_vidmode.dotclock));
867                         XF86VidModeGetModeLine(vidx11_display, vidx11_screen, (int*)&init_vidmode.dotclock, current_vidmode);
868
869                         XF86VidModeGetAllModeLines(vidx11_display, vidx11_screen, &num_vidmodes, &vidmodes);
870                         best_dist = 0;
871                         best_fit = -1;
872
873                         for (i = 0; i < num_vidmodes; i++)
874                         {
875                                 if (*width > vidmodes[i]->hdisplay || *height > vidmodes[i]->vdisplay)
876                                         continue;
877
878                                 x = *width - vidmodes[i]->hdisplay;
879                                 y = *height - vidmodes[i]->vdisplay;
880                                 dist = (x * x) + (y * y);
881                                 if (best_fit == -1 || dist < best_dist)
882                                 {
883                                         best_dist = dist;
884                                         best_fit = i;
885                                 }
886                         }
887
888                         if (best_fit != -1)
889                         {
890                                 // LordHavoc: changed from ActualWidth/ActualHeight =,
891                                 // to width/height =, so the window will take the full area of
892                                 // the mode chosen
893                                 *width = vidmodes[best_fit]->hdisplay;
894                                 *height = vidmodes[best_fit]->vdisplay;
895
896                                 // change to the mode
897                                 XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, vidmodes[best_fit]);
898                                 memcpy(&game_vidmode, vidmodes[best_fit], sizeof(game_vidmode));
899                                 vid_isvidmodefullscreen = true;
900                                 vid_isfullscreen = true;
901
902                                 // Move the viewport to top left
903                                 XF86VidModeSetViewPort(vidx11_display, vidx11_screen, 0, 0);
904                                 Con_DPrintf("Using XVidMode fullscreen mode at %dx%d\n", *width, *height);
905                         }
906
907                         free(vidmodes);
908                 }
909
910                 if(!vid_isfullscreen)
911                 {
912                         // sorry, no FS available
913                         // use the full desktop resolution
914                         vid_isfullscreen = true;
915                         // width and height will be filled in later
916                         *width = DisplayWidth(vidx11_display, vidx11_screen);
917                         *height = DisplayHeight(vidx11_display, vidx11_screen);
918                         Con_DPrintf("Using X11 fullscreen mode at %dx%d\n", *width, *height);
919                 }
920         }
921
922         // LordHavoc: save the visual for use in gamma ramp settings later
923         vidx11_visual = visinfo->visual;
924
925         /* window attributes */
926         attr.background_pixel = 0;
927         attr.border_pixel = 0;
928         // LordHavoc: save the colormap for later, too
929         vidx11_colormap = attr.colormap = XCreateColormap(vidx11_display, root, visinfo->visual, AllocNone);
930         attr.event_mask = X_MASK;
931
932         if (fullscreen)
933         {
934                 if(vid_isnetwmfullscreen)
935                 {
936                         mask = CWBackPixel | CWColormap | CWSaveUnder | CWBackingStore | CWEventMask;
937                         attr.backing_store = NotUseful;
938                         attr.save_under = False;
939                 }
940                 else
941                 {
942                         mask = CWBackPixel | CWColormap | CWSaveUnder | CWBackingStore | CWEventMask | CWOverrideRedirect;
943                         attr.override_redirect = True;
944                         attr.backing_store = NotUseful;
945                         attr.save_under = False;
946                         vid_isoverrideredirect = true; // so it knows to grab
947                 }
948         }
949         else
950         {
951                 mask = CWBackPixel | CWBorderPixel | CWColormap | CWEventMask;
952         }
953
954         win = XCreateWindow(vidx11_display, root, 0, 0, *width, *height, 0, visinfo->depth, InputOutput, visinfo->visual, mask, &attr);
955
956         wmhints = XAllocWMHints();
957         if(XpmCreatePixmapFromData(vidx11_display, win,
958                 (gamemode == GAME_NEXUIZ) ? nexuiz_xpm : darkplaces_xpm,
959                 &wmhints->icon_pixmap, &wmhints->icon_mask, NULL) == XpmSuccess)
960                 wmhints->flags |= IconPixmapHint | IconMaskHint;
961
962         clshints = XAllocClassHint();
963         clshints->res_name = strdup(gamename);
964         clshints->res_class = strdup("DarkPlaces");
965
966         szhints = XAllocSizeHints();
967         if(vid_resizable.integer == 0 && !vid_isnetwmfullscreen)
968         {
969                 szhints->min_width = szhints->max_width = *width;
970                 szhints->min_height = szhints->max_height = *height;
971                 szhints->flags |= PMinSize | PMaxSize;
972         }
973
974         XmbSetWMProperties(vidx11_display, win, gamename, gamename, (char **) com_argv, com_argc, szhints, wmhints, clshints);
975         XFree(clshints);
976         XFree(wmhints);
977         XFree(szhints);
978
979         //XStoreName(vidx11_display, win, gamename);
980         XMapWindow(vidx11_display, win);
981
982         XSetWMProtocols(vidx11_display, win, &wm_delete_window_atom, 1);
983
984         if (vid_isoverrideredirect)
985         {
986                 XMoveWindow(vidx11_display, win, 0, 0);
987                 XRaiseWindow(vidx11_display, win);
988                 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, 0, 0);
989                 XFlush(vidx11_display);
990         }
991
992         if(vid_isvidmodefullscreen)
993         {
994                 // Move the viewport to top left
995                 XF86VidModeSetViewPort(vidx11_display, vidx11_screen, 0, 0);
996         }
997
998         //XSync(vidx11_display, False);
999
1000         ctx = qglXCreateContext(vidx11_display, visinfo, NULL, True);
1001         if (!ctx)
1002         {
1003                 Con_Printf ("glXCreateContext failed\n");
1004                 return false;
1005         }
1006
1007         if (!qglXMakeCurrent(vidx11_display, win, ctx))
1008         {
1009                 Con_Printf ("glXMakeCurrent failed\n");
1010                 return false;
1011         }
1012
1013         XSync(vidx11_display, False);
1014
1015         if ((qglGetString = (const GLubyte* (GLAPIENTRY *)(GLenum name))GL_GetProcAddress("glGetString")) == NULL)
1016         {
1017                 Con_Printf ("glGetString not found in %s\n", gl_driver);
1018                 return false;
1019         }
1020
1021         gl_extensions = (const char *)qglGetString(GL_EXTENSIONS);
1022         gl_platform = "GLX";
1023         gl_platformextensions = qglXQueryExtensionsString(vidx11_display, vidx11_screen);
1024
1025         gl_videosyncavailable = false;
1026
1027 // COMMANDLINEOPTION: Linux GLX: -nogetprocaddress disables GLX_ARB_get_proc_address (not required, more formal method of getting extension functions)
1028 // COMMANDLINEOPTION: BSD GLX: -nogetprocaddress disables GLX_ARB_get_proc_address (not required, more formal method of getting extension functions)
1029 // COMMANDLINEOPTION: MacOSX GLX: -nogetprocaddress disables GLX_ARB_get_proc_address (not required, more formal method of getting extension functions)
1030         GL_CheckExtension("GLX_ARB_get_proc_address", getprocaddressfuncs, "-nogetprocaddress", false);
1031 // COMMANDLINEOPTION: Linux GLX: -novideosync disables GLX_SGI_swap_control
1032 // COMMANDLINEOPTION: BSD GLX: -novideosync disables GLX_SGI_swap_control
1033 // COMMANDLINEOPTION: MacOSX GLX: -novideosync disables GLX_SGI_swap_control
1034         gl_videosyncavailable = GL_CheckExtension("GLX_SGI_swap_control", swapcontrolfuncs, "-novideosync", false);
1035
1036         vid_usingmousegrab = false;
1037         vid_usingmouse = false;
1038         vid_usinghidecursor = false;
1039         vid_usingvsync = false;
1040         vid_hidden = false;
1041         vid_activewindow = true;
1042         vid_x11_hardwaregammasupported = XF86VidModeGetGammaRampSize(vidx11_display, vidx11_screen, &vid_x11_gammarampsize) != 0;
1043 #if !defined(__APPLE__) && !defined(SUNOS)
1044         vid_x11_dgasupported = XF86DGAQueryVersion(vidx11_display, &MajorVersion, &MinorVersion);
1045         if (!vid_x11_dgasupported)
1046                 Con_Print( "Failed to detect XF86DGA Mouse extension\n" );
1047 #endif
1048
1049         GL_Init();
1050         return true;
1051 }
1052
1053 void Sys_SendKeyEvents(void)
1054 {
1055         static qboolean sound_active = true;
1056
1057         // enable/disable sound on focus gain/loss
1058         if (!vid_hidden && (vid_activewindow || !snd_mutewhenidle.integer))
1059         {
1060                 if (!sound_active)
1061                 {
1062                         S_UnblockSound ();
1063                         sound_active = true;
1064                 }
1065         }
1066         else
1067         {
1068                 if (sound_active)
1069                 {
1070                         S_BlockSound ();
1071                         sound_active = false;
1072                 }
1073         }
1074
1075         HandleEvents();
1076 }
1077
1078 void IN_Move (void)
1079 {
1080 }
1081
1082 size_t VID_ListModes(vid_mode_t *modes, size_t maxcount)
1083 {
1084         if(vidmode_ext)
1085         {
1086                 int i, bpp;
1087                 size_t k;
1088                 XF86VidModeModeInfo **vidmodes;
1089                 int num_vidmodes;
1090
1091                 XF86VidModeGetAllModeLines(vidx11_display, vidx11_screen, &num_vidmodes, &vidmodes);
1092                 k = 0;
1093                 for (i = 0; i < num_vidmodes; i++)
1094                 {
1095                         if(k >= maxcount)
1096                                 break;
1097                         // we don't get bpp info, so let's just assume all of 8, 15, 16, 24, 32 work
1098                         for(bpp = 8; bpp <= 32; bpp = ((bpp == 8) ? 15 : (bpp & 0xF8) + 8))
1099                         {
1100                                 if(k >= maxcount)
1101                                         break;
1102                                 modes[k].width = vidmodes[i]->hdisplay;
1103                                 modes[k].height = vidmodes[i]->vdisplay;
1104                                 modes[k].bpp = 8;
1105                                 modes[k].refreshrate = vidmodes[i]->dotclock / vidmodes[i]->htotal / vidmodes[i]->vtotal;
1106                                 modes[k].pixelheight_num = 1;
1107                                 modes[k].pixelheight_denom = 1; // xvidmode does not provide this
1108                                 ++k;
1109                         }
1110                 }
1111                 return k;
1112         }
1113         return 0; // FIXME implement this
1114 }