2 Copyright (C) 1996-1997 Id Software, Inc.
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.
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.
13 See the GNU General Public License for more details.
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.
20 //#include <termios.h>
21 //#include <sys/ioctl.h>
22 //#include <sys/stat.h>
31 #include <X11/Xutil.h>
34 #include <X11/keysym.h>
35 #include <X11/cursorfont.h>
37 #include <X11/extensions/XShm.h>
38 #include <X11/extensions/xf86dga.h>
39 #include <X11/extensions/xf86vmode.h>
43 int cl_available = true;
46 XVisualInfo *(GLAPIENTRY *qglXChooseVisual)(Display *dpy, int screen, int *attribList);
47 GLXContext (GLAPIENTRY *qglXCreateContext)(Display *dpy, XVisualInfo *vis, GLXContext shareList, Bool direct);
48 void (GLAPIENTRY *qglXDestroyContext)(Display *dpy, GLXContext ctx);
49 Bool (GLAPIENTRY *qglXMakeCurrent)(Display *dpy, GLXDrawable drawable, GLXContext ctx);
50 void (GLAPIENTRY *qglXSwapBuffers)(Display *dpy, GLXDrawable drawable);
51 const char *(GLAPIENTRY *qglXQueryExtensionsString)(Display *dpy, int screen);
53 //GLX_ARB_get_proc_address
54 void *(GLAPIENTRY *qglXGetProcAddressARB)(const GLubyte *procName);
56 static dllfunction_t getprocaddressfuncs[] =
58 {"glXGetProcAddressARB", (void **) &qglXGetProcAddressARB},
63 GLint (GLAPIENTRY *qglXGetVideoSyncSGI)(GLuint *count);
64 GLint (GLAPIENTRY *qglXWaitVideoSyncSGI)(GLint divisor, GLint remainder, GLuint *count);
66 static dllfunction_t videosyncfuncs[] =
68 {"glXGetVideoSyncSGI", (void **) &qglXGetVideoSyncSGI},
69 {"glXWaitVideoSyncSGI", (void **) &qglXWaitVideoSyncSGI},
73 static Display *vidx11_display = NULL;
74 static int vidx11_screen;
76 static GLXContext ctx = NULL;
78 Atom wm_delete_window_atom;
80 #define KEY_MASK (KeyPressMask | KeyReleaseMask)
81 #define MOUSE_MASK (ButtonPressMask | ButtonReleaseMask | \
82 PointerMotionMask | ButtonMotionMask)
83 #define X_MASK (KEY_MASK | MOUSE_MASK | VisibilityChangeMask | \
84 StructureNotifyMask | FocusChangeMask | EnterWindowMask | \
88 static qboolean mouse_avail = true;
89 static qboolean mouse_active = false, usingmouse = false;
90 static float mouse_x, mouse_y;
91 static int p_mouse_x, p_mouse_y;
93 cvar_t vid_dga = {CVAR_SAVE, "vid_dga", "1"};
94 cvar_t vid_dga_mouseaccel = {0, "vid_dga_mouseaccel", "1"};
96 qboolean vidmode_ext = false;
98 static int win_x, win_y;
100 static int scr_width, scr_height;
102 static XF86VidModeModeInfo **vidmodes;
103 static int num_vidmodes;
104 static qboolean vidmode_active = false;
106 static Visual *vidx11_visual;
107 static Colormap vidx11_colormap;
109 /*-----------------------------------------------------------------------*/
111 static int XLateKey(XKeyEvent *ev)
115 KeySym keysym, shifted;
117 keysym = XLookupKeysym (ev, 0);
118 XLookupString(ev, buf, sizeof buf, &shifted, 0);
122 case XK_KP_Page_Up: key = K_KP_PGUP; break;
123 case XK_Page_Up: key = K_PGUP; break;
125 case XK_KP_Page_Down: key = K_KP_PGDN; break;
126 case XK_Page_Down: key = K_PGDN; break;
128 case XK_KP_Home: key = K_KP_HOME; break;
129 case XK_Home: key = K_HOME; break;
131 case XK_KP_End: key = K_KP_END; break;
132 case XK_End: key = K_END; break;
134 case XK_KP_Left: key = K_KP_LEFTARROW; break;
135 case XK_Left: key = K_LEFTARROW; break;
137 case XK_KP_Right: key = K_KP_RIGHTARROW; break;
138 case XK_Right: key = K_RIGHTARROW; break;
140 case XK_KP_Down: key = K_KP_DOWNARROW; break;
141 case XK_Down: key = K_DOWNARROW; break;
143 case XK_KP_Up: key = K_KP_UPARROW; break;
144 case XK_Up: key = K_UPARROW; break;
146 case XK_Escape: key = K_ESCAPE; break;
148 case XK_KP_Enter: key = K_KP_ENTER; break;
149 case XK_Return: key = K_ENTER; break;
151 case XK_Tab: key = K_TAB; break;
153 case XK_F1: key = K_F1; break;
155 case XK_F2: key = K_F2; break;
157 case XK_F3: key = K_F3; break;
159 case XK_F4: key = K_F4; break;
161 case XK_F5: key = K_F5; break;
163 case XK_F6: key = K_F6; break;
165 case XK_F7: key = K_F7; break;
167 case XK_F8: key = K_F8; break;
169 case XK_F9: key = K_F9; break;
171 case XK_F10: key = K_F10; break;
173 case XK_F11: key = K_F11; break;
175 case XK_F12: key = K_F12; break;
177 case XK_BackSpace: key = K_BACKSPACE; break;
179 case XK_KP_Delete: key = K_KP_DEL; break;
180 case XK_Delete: key = K_DEL; break;
182 case XK_Pause: key = K_PAUSE; break;
185 case XK_Shift_R: key = K_SHIFT; break;
189 case XK_Control_R: key = K_CTRL; break;
194 case XK_Meta_R: key = K_ALT; break;
196 case XK_KP_Begin: key = K_KP_5; break;
198 case XK_Insert:key = K_INS; break;
199 case XK_KP_Insert: key = K_KP_INS; break;
201 case XK_KP_Multiply: key = '*'; break;
202 case XK_KP_Add: key = K_KP_PLUS; break;
203 case XK_KP_Subtract: key = K_KP_MINUS; break;
204 case XK_KP_Divide: key = K_KP_SLASH; break;
207 case 0x021: key = '1';break;/* [!] */
208 case 0x040: key = '2';break;/* [@] */
209 case 0x023: key = '3';break;/* [#] */
210 case 0x024: key = '4';break;/* [$] */
211 case 0x025: key = '5';break;/* [%] */
212 case 0x05e: key = '6';break;/* [^] */
213 case 0x026: key = '7';break;/* [&] */
214 case 0x02a: key = '8';break;/* [*] */
215 case 0x028: key = '9';;break;/* [(] */
216 case 0x029: key = '0';break;/* [)] */
217 case 0x05f: key = '-';break;/* [_] */
218 case 0x02b: key = '=';break;/* [+] */
219 case 0x07c: key = '\'';break;/* [|] */
220 case 0x07d: key = '[';break;/* [}] */
221 case 0x07b: key = ']';break;/* [{] */
222 case 0x022: key = '\'';break;/* ["] */
223 case 0x03a: key = ';';break;/* [:] */
224 case 0x03f: key = '/';break;/* [?] */
225 case 0x03e: key = '.';break;/* [>] */
226 case 0x03c: key = ',';break;/* [<] */
231 if (key >= 'A' && key <= 'Z')
232 key = key - 'A' + 'a';
239 static Cursor CreateNullCursor(Display *display, Window root)
247 cursormask = XCreatePixmap(display, root, 1, 1, 1);
248 xgc.function = GXclear;
249 gc = XCreateGC(display, cursormask, GCFunction, &xgc);
250 XFillRectangle(display, cursormask, gc, 0, 0, 1, 1);
251 dummycolour.pixel = 0;
253 dummycolour.flags = 04;
254 cursor = XCreatePixmapCursor(display, cursormask, cursormask, &dummycolour,&dummycolour, 0,0);
255 XFreePixmap(display,cursormask);
260 static void install_grabs(void)
262 XWindowAttributes attribs_1;
263 XSetWindowAttributes attribs_2;
265 XGetWindowAttributes(vidx11_display, win, &attribs_1);
266 attribs_2.event_mask = attribs_1.your_event_mask | KEY_MASK | MOUSE_MASK;
267 XChangeWindowAttributes(vidx11_display, win, CWEventMask, &attribs_2);
270 XDefineCursor(vidx11_display, win, CreateNullCursor(vidx11_display, win));
272 XGrabPointer(vidx11_display, win, True, 0, GrabModeAsync, GrabModeAsync, win, None, CurrentTime);
276 int MajorVersion, MinorVersion;
278 if (!XF86DGAQueryVersion(vidx11_display, &MajorVersion, &MinorVersion))
280 // unable to query, probalby not supported
281 Con_Printf( "Failed to detect XF86DGA Mouse\n" );
287 XF86DGADirectVideo(vidx11_display, DefaultScreen(vidx11_display), XF86DGADirectMouse);
288 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, 0, 0);
292 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, scr_width / 2, scr_height / 2);
294 XGrabKeyboard(vidx11_display, win, False, GrabModeAsync, GrabModeAsync, CurrentTime);
297 mouse_x = mouse_y = 0;
300 static void uninstall_grabs(void)
302 if (!vidx11_display || !win)
305 if (vid_dga.integer == 1)
306 XF86DGADirectVideo(vidx11_display, DefaultScreen(vidx11_display), 0);
308 XUngrabPointer(vidx11_display, CurrentTime);
309 XUngrabKeyboard(vidx11_display, CurrentTime);
312 XUndefineCursor(vidx11_display, win);
314 mouse_active = false;
317 static void HandleEvents(void)
320 qboolean dowarp = false;
325 while (XPending(vidx11_display))
327 XNextEvent(vidx11_display, &event);
333 Key_Event(XLateKey(&event.xkey), true);
338 Key_Event(XLateKey(&event.xkey), false);
345 if (vid_dga.integer == 1)
347 mouse_x += event.xmotion.x_root * vid_dga_mouseaccel.value;
348 mouse_y += event.xmotion.y_root * vid_dga_mouseaccel.value;
353 if (!event.xmotion.send_event)
355 mouse_x += event.xmotion.x - p_mouse_x;
356 mouse_y += event.xmotion.y - p_mouse_y;
357 if (abs(scr_width/2 - event.xmotion.x) > scr_width / 4 || abs(scr_height/2 - event.xmotion.y) > scr_height / 4)
360 p_mouse_x = event.xmotion.x;
361 p_mouse_y = event.xmotion.y;
365 ui_mouseupdate(event.xmotion.x, event.xmotion.y);
369 // mouse button pressed
370 switch(event.xbutton.button)
373 Key_Event(K_MOUSE1, true);
376 Key_Event(K_MOUSE3, true);
379 Key_Event(K_MOUSE2, true);
382 Key_Event(K_MWHEELUP, true);
385 Key_Event(K_MWHEELDOWN, true);
388 Key_Event(K_MOUSE4, true);
391 Key_Event(K_MOUSE5, true);
394 Key_Event(K_MOUSE6, true);
397 Key_Event(K_MOUSE7, true);
400 Key_Event(K_MOUSE8, true);
403 Key_Event(K_MOUSE9, true);
406 Key_Event(K_MOUSE10, true);
409 Con_Printf("HandleEvents: ButtonPress gave value %d, 1-12 expected\n", event.xbutton.button);
415 // mouse button released
416 switch(event.xbutton.button)
419 Key_Event(K_MOUSE1, false);
422 Key_Event(K_MOUSE3, false);
425 Key_Event(K_MOUSE2, false);
428 Key_Event(K_MWHEELUP, false);
431 Key_Event(K_MWHEELDOWN, false);
434 Key_Event(K_MOUSE4, false);
437 Key_Event(K_MOUSE5, false);
440 Key_Event(K_MOUSE6, false);
443 Key_Event(K_MOUSE7, false);
446 Key_Event(K_MOUSE8, false);
449 Key_Event(K_MOUSE9, false);
452 Key_Event(K_MOUSE10, false);
455 Con_Printf("HandleEvents: ButtonRelease gave value %d, 1-12 expected\n", event.xbutton.button);
462 win_x = event.xcreatewindow.x;
463 win_y = event.xcreatewindow.y;
466 case ConfigureNotify:
467 // window changed size/location
468 win_x = event.xconfigure.x;
469 win_y = event.xconfigure.y;
472 // window has been destroyed
476 // window manager messages
477 if ((event.xclient.format == 32) && ((unsigned int)event.xclient.data.l[0] == wm_delete_window_atom))
483 vid_allowhwgamma = true;
486 // window iconified/rolledup/whatever
488 vid_allowhwgamma = false;
489 VID_RestoreSystemGamma();
492 // window is now the input focus
493 vid_allowhwgamma = true;
496 // window is no longer the input focus
497 vid_allowhwgamma = false;
498 VID_RestoreSystemGamma();
501 // mouse entered window
502 vid_allowhwgamma = true;
506 vid_allowhwgamma = false;
507 VID_RestoreSystemGamma();
514 /* move the mouse to the window center again */
515 p_mouse_x = scr_width / 2;
516 p_mouse_y = scr_height / 2;
517 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, p_mouse_x, p_mouse_y);
522 static void IN_DeactivateMouse( void )
524 if (!mouse_avail || !vidx11_display || !win)
530 mouse_active = false;
534 static void IN_ActivateMouse( void )
536 if (!mouse_avail || !vidx11_display || !win)
541 mouse_x = mouse_y = 0; // don't spazz
547 void VID_Shutdown(void)
549 if (!ctx || !vidx11_display)
556 VID_RestoreSystemGamma();
559 // FIXME: glXDestroyContext here?
561 XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, vidmodes[0]);
563 XDestroyWindow(vidx11_display, win);
564 XCloseDisplay(vidx11_display);
566 vidmode_active = false;
567 vidx11_display = NULL;
574 void signal_handler(int sig)
576 printf("Received signal %d, exiting...\n", sig);
577 VID_RestoreSystemGamma();
584 signal(SIGHUP, signal_handler);
585 signal(SIGINT, signal_handler);
586 signal(SIGQUIT, signal_handler);
587 signal(SIGILL, signal_handler);
588 signal(SIGTRAP, signal_handler);
589 signal(SIGIOT, signal_handler);
590 signal(SIGBUS, signal_handler);
591 signal(SIGFPE, signal_handler);
592 signal(SIGSEGV, signal_handler);
593 signal(SIGTERM, signal_handler);
601 void VID_GetWindowSize (int *x, int *y, int *width, int *height)
605 *height = scr_height;
608 void VID_Finish (void)
611 if (r_render.integer)
614 qglXSwapBuffers(vidx11_display, win);
617 // handle the mouse state when windowed if that's changed
619 if (vid_mouse.integer && !key_consoleactive)
636 IN_DeactivateMouse ();
641 int VID_SetGamma(unsigned short *ramps)
643 return XF86VidModeSetGammaRamp(vidx11_display, vidx11_screen, 256, ramps, ramps + 256, ramps + 512);
646 int VID_GetGamma(unsigned short *ramps)
648 return XF86VidModeGetGammaRamp(vidx11_display, vidx11_screen, 256, ramps, ramps + 256, ramps + 512);
653 Cvar_RegisterVariable (&vid_dga);
654 Cvar_RegisterVariable (&vid_dga_mouseaccel);
655 InitSig(); // trap evil signals
656 if (COM_CheckParm ("-nomouse") || COM_CheckParm("-safe"))
660 void VID_BuildGLXAttrib(int *attrib, int stencil)
662 *attrib++ = GLX_RGBA;
663 *attrib++ = GLX_RED_SIZE;*attrib++ = 1;
664 *attrib++ = GLX_GREEN_SIZE;*attrib++ = 1;
665 *attrib++ = GLX_BLUE_SIZE;*attrib++ = 1;
666 *attrib++ = GLX_DOUBLEBUFFER;
667 *attrib++ = GLX_DEPTH_SIZE;*attrib++ = 1;
668 // if stencil is enabled, ask for alpha too
671 *attrib++ = GLX_STENCIL_SIZE;*attrib++ = 8;
672 *attrib++ = GLX_ALPHA_SIZE;*attrib++ = 1;
677 int VID_InitMode(int fullscreen, int width, int height, int bpp, int stencil)
681 XSetWindowAttributes attr;
684 XVisualInfo *visinfo;
685 int MajorVersion, MinorVersion;
686 const char *drivername;
688 drivername = "libGL.so.1";
689 i = COM_CheckParm("-gl_driver");
690 if (i && i < com_argc - 1)
691 drivername = com_argv[i + 1];
692 if (!GL_OpenLibrary(drivername))
694 Con_Printf("Unable to load GL driver \"%s\"\n", drivername);
698 if (!(vidx11_display = XOpenDisplay(NULL)))
700 Con_Printf("Couldn't open the X display\n");
704 vidx11_screen = DefaultScreen(vidx11_display);
705 root = RootWindow(vidx11_display, vidx11_screen);
707 // Get video mode list
708 MajorVersion = MinorVersion = 0;
709 if (!XF86VidModeQueryVersion(vidx11_display, &MajorVersion, &MinorVersion))
713 Con_DPrintf("Using XFree86-VidModeExtension Version %d.%d\n", MajorVersion, MinorVersion);
717 if ((qglXChooseVisual = GL_GetProcAddress("glXChooseVisual")) == NULL
718 || (qglXCreateContext = GL_GetProcAddress("glXCreateContext")) == NULL
719 || (qglXMakeCurrent = GL_GetProcAddress("glXMakeCurrent")) == NULL
720 || (qglXSwapBuffers = GL_GetProcAddress("glXSwapBuffers")) == NULL
721 || (qglXQueryExtensionsString = GL_GetProcAddress("glXQueryExtensionsString")) == NULL)
723 Con_Printf("glX functions not found in %s\n", gl_driver);
727 VID_BuildGLXAttrib(attrib, stencil);
728 visinfo = qglXChooseVisual(vidx11_display, vidx11_screen, attrib);
731 Con_Printf("Couldn't get an RGB, Double-buffered, Depth visual\n");
737 int best_fit, best_dist, dist, x, y;
739 // Are we going fullscreen? If so, let's change video mode
742 XF86VidModeGetAllModeLines(vidx11_display, vidx11_screen, &num_vidmodes, &vidmodes);
746 for (i = 0; i < num_vidmodes; i++)
748 if (width > vidmodes[i]->hdisplay || height > vidmodes[i]->vdisplay)
751 x = width - vidmodes[i]->hdisplay;
752 y = height - vidmodes[i]->vdisplay;
753 dist = (x * x) + (y * y);
754 if (dist < best_dist)
763 // LordHavoc: changed from ActualWidth/ActualHeight =,
764 // to width/height =, so the window will take the full area of
766 width = vidmodes[best_fit]->hdisplay;
767 height = vidmodes[best_fit]->vdisplay;
769 // change to the mode
770 XF86VidModeSwitchToMode(vidx11_display, vidx11_screen, vidmodes[best_fit]);
771 vidmode_active = true;
773 // Move the viewport to top left
774 XF86VidModeSetViewPort(vidx11_display, vidx11_screen, 0, 0);
781 // LordHavoc: save the visual for use in gamma ramp settings later
782 vidx11_visual = visinfo->visual;
784 /* window attributes */
785 attr.background_pixel = 0;
786 attr.border_pixel = 0;
787 // LordHavoc: save the colormap for later, too
788 vidx11_colormap = attr.colormap = XCreateColormap(vidx11_display, root, visinfo->visual, AllocNone);
789 attr.event_mask = X_MASK;
792 mask = CWBackPixel | CWColormap | CWSaveUnder | CWBackingStore | CWEventMask | CWOverrideRedirect;
793 attr.override_redirect = True;
794 attr.backing_store = NotUseful;
795 attr.save_under = False;
798 mask = CWBackPixel | CWBorderPixel | CWColormap | CWEventMask;
800 win = XCreateWindow(vidx11_display, root, 0, 0, width, height, 0, visinfo->depth, InputOutput, visinfo->visual, mask, &attr);
801 XStoreName(vidx11_display, win, gamename);
802 XMapWindow(vidx11_display, win);
804 // LordHavoc: making the close button on a window do the right thing
805 // seems to involve this mess, sigh...
806 wm_delete_window_atom = XInternAtom(vidx11_display, "WM_DELETE_WINDOW", false);
807 XSetWMProtocols(vidx11_display, win, &wm_delete_window_atom, 1);
811 XMoveWindow(vidx11_display, win, 0, 0);
812 XRaiseWindow(vidx11_display, win);
813 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, 0, 0);
814 XFlush(vidx11_display);
815 // Move the viewport to top left
816 XF86VidModeSetViewPort(vidx11_display, vidx11_screen, 0, 0);
819 //XSync(vidx11_display, False);
821 ctx = qglXCreateContext(vidx11_display, visinfo, NULL, True);
823 Sys_Error ("glXCreateContext failed\n");
825 if (!qglXMakeCurrent(vidx11_display, win, ctx))
826 Sys_Error ("glXMakeCurrent failed\n");
828 XSync(vidx11_display, False);
833 if ((qglGetString = GL_GetProcAddress("glGetString")) == NULL)
834 Sys_Error("glGetString not found in %s", gl_driver);
836 gl_renderer = qglGetString(GL_RENDERER);
837 gl_vendor = qglGetString(GL_VENDOR);
838 gl_version = qglGetString(GL_VERSION);
839 gl_extensions = qglGetString(GL_EXTENSIONS);
841 gl_platformextensions = qglXQueryExtensionsString(vidx11_display, vidx11_screen);
843 GL_CheckExtension("GLX_ARB_get_proc_address", getprocaddressfuncs, "-nogetprocaddress", false);
844 gl_videosyncavailable = GL_CheckExtension("GLX_SGI_video_sync", videosyncfuncs, "-novideosync", false);
848 vid_allowhwgamma = true;
853 void Sys_SendKeyEvents(void)
863 void IN_Commands (void)
867 void IN_Move (usercmd_t *cmd)
870 IN_Mouse(cmd, mouse_x, mouse_y);
875 static void *prjobj = NULL;
877 int GL_OpenLibrary(const char *name)
879 Con_Printf("Loading OpenGL driver %s\n", name);
881 if (!(prjobj = dlopen(name, RTLD_LAZY)))
883 Con_Printf("Unable to open symbol list for %s\n", name);
886 strcpy(gl_driver, name);
890 void GL_CloseLibrary(void)
896 qglXGetProcAddressARB = NULL;
899 gl_platformextensions = "";
902 void *GL_GetProcAddress(const char *name)
905 if (qglXGetProcAddressARB != NULL)
906 p = (void *) qglXGetProcAddressARB(name);
908 p = (void *) dlsym(prjobj, name);