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 gl_extensionfunctionlist_t getprocaddressfuncs[] =
58 {"glXGetProcAddressARB", (void **) &qglXGetProcAddressARB},
63 GLint (GLAPIENTRY *qglXGetVideoSyncSGI)(GLuint *count);
64 GLint (GLAPIENTRY *qglXWaitVideoSyncSGI)(int divisor, int remainder, unsigned int *count);
66 static gl_extensionfunctionlist_t videosyncfuncs[] =
68 {"glXGetVideoSyncSGI", (void **) &qglXGetVideoSyncSGI},
69 {"glXWaitVideoSyncSGI", (void **) &qglXWaitVideoSyncSGI},
73 static Display *vidx11_display = NULL;
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 | StructureNotifyMask )
86 viddef_t vid; // global video state
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 /*-----------------------------------------------------------------------*/
112 XLateKey(XKeyEvent *ev)
117 keysym = XLookupKeysym(ev, 0);
121 case XK_KP_Page_Up: key = KP_PGUP; break;
122 case XK_Page_Up: key = K_PGUP; break;
124 case XK_KP_Page_Down: key = KP_PGDN; break;
125 case XK_Page_Down: key = K_PGDN; break;
127 case XK_KP_Home: key = KP_HOME; break;
128 case XK_Home: key = K_HOME; break;
130 case XK_KP_End: key = KP_END; break;
131 case XK_End: key = K_END; break;
133 case XK_KP_Left: key = KP_LEFTARROW; break;
134 case XK_Left: key = K_LEFTARROW; break;
136 case XK_KP_Right: key = KP_RIGHTARROW; break;
137 case XK_Right: key = K_RIGHTARROW; break;
139 case XK_KP_Down: key = KP_DOWNARROW; break;
140 case XK_Down: key = K_DOWNARROW; break;
142 case XK_KP_Up: key = KP_UPARROW; break;
143 case XK_Up: key = K_UPARROW; break;
145 case XK_Escape: key = K_ESCAPE; break;
147 case XK_KP_Enter: key = KP_ENTER; break;
148 case XK_Return: key = K_ENTER; break;
150 case XK_Tab: key = K_TAB; break;
152 case XK_F1: key = K_F1; break;
153 case XK_F2: key = K_F2; break;
154 case XK_F3: key = K_F3; break;
155 case XK_F4: key = K_F4; break;
156 case XK_F5: key = K_F5; break;
157 case XK_F6: key = K_F6; break;
158 case XK_F7: key = K_F7; break;
159 case XK_F8: key = K_F8; break;
160 case XK_F9: key = K_F9; break;
161 case XK_F10: key = K_F10; break;
162 case XK_F11: key = K_F11; break;
163 case XK_F12: key = K_F12; break;
165 case XK_BackSpace: key = K_BACKSPACE; break;
167 case XK_KP_Delete: key = KP_DEL; break;
168 case XK_Delete: key = K_DEL; break;
170 case XK_Pause: key = K_PAUSE; break;
173 case XK_Shift_R: key = K_SHIFT; break;
177 case XK_Control_R: key = K_CTRL; break;
183 case XK_Meta_R: key = K_ALT; break;
185 case XK_Caps_Lock: key = K_CAPSLOCK; break;
186 case XK_KP_Begin: key = KP_5; break;
188 case XK_Insert: key = K_INS; break;
189 case XK_KP_Insert: key = KP_INS; break;
191 case XK_KP_Multiply: key = KP_MULTIPLY; break;
192 case XK_KP_Add: key = KP_PLUS; break;
193 case XK_KP_Subtract: key = KP_MINUS; break;
194 case XK_KP_Divide: key = KP_DIVIDE; break;
196 /* For Sun keyboards */
197 case XK_F27: key = K_HOME; break;
198 case XK_F29: key = K_PGUP; break;
199 case XK_F33: key = K_END; break;
200 case XK_F35: key = K_PGDN; break;
207 if ((key >= 'A') && (key <= 'Z'))
208 key = key + ('a' - 'A');
216 static Cursor CreateNullCursor(Display *display, Window root)
224 cursormask = XCreatePixmap(display, root, 1, 1, 1);
225 xgc.function = GXclear;
226 gc = XCreateGC(display, cursormask, GCFunction, &xgc);
227 XFillRectangle(display, cursormask, gc, 0, 0, 1, 1);
228 dummycolour.pixel = 0;
230 dummycolour.flags = 04;
231 cursor = XCreatePixmapCursor(display, cursormask, cursormask, &dummycolour,&dummycolour, 0,0);
232 XFreePixmap(display,cursormask);
237 static void install_grabs(void)
239 XWindowAttributes attribs_1;
240 XSetWindowAttributes attribs_2;
242 XGetWindowAttributes(vidx11_display, win, &attribs_1);
243 attribs_2.event_mask = attribs_1.your_event_mask | KEY_MASK | MOUSE_MASK;
244 XChangeWindowAttributes(vidx11_display, win, CWEventMask, &attribs_2);
247 XDefineCursor(vidx11_display, win, CreateNullCursor(vidx11_display, win));
249 XGrabPointer(vidx11_display, win, True, 0, GrabModeAsync, GrabModeAsync, win, None, CurrentTime);
253 int MajorVersion, MinorVersion;
255 if (!XF86DGAQueryVersion(vidx11_display, &MajorVersion, &MinorVersion))
257 // unable to query, probalby not supported
258 Con_Printf( "Failed to detect XF86DGA Mouse\n" );
264 XF86DGADirectVideo(vidx11_display, DefaultScreen(vidx11_display), XF86DGADirectMouse);
265 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, 0, 0);
269 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, scr_width / 2, scr_height / 2);
271 XGrabKeyboard(vidx11_display, win, False, GrabModeAsync, GrabModeAsync, CurrentTime);
274 mouse_x = mouse_y = 0;
277 static void uninstall_grabs(void)
279 if (!vidx11_display || !win)
282 if (vid_dga.integer == 1)
283 XF86DGADirectVideo(vidx11_display, DefaultScreen(vidx11_display), 0);
285 XUngrabPointer(vidx11_display, CurrentTime);
286 XUngrabKeyboard(vidx11_display, CurrentTime);
289 XUndefineCursor(vidx11_display, win);
291 mouse_active = false;
294 static void HandleEvents(void)
297 qboolean dowarp = false;
302 while (XPending(vidx11_display))
304 XNextEvent(vidx11_display, &event);
310 Key_Event(XLateKey(&event.xkey), true);
315 Key_Event(XLateKey(&event.xkey), false);
322 if (vid_dga.integer == 1)
324 mouse_x += event.xmotion.x_root * vid_dga_mouseaccel.value;
325 mouse_y += event.xmotion.y_root * vid_dga_mouseaccel.value;
330 if (!event.xmotion.send_event)
332 mouse_x += event.xmotion.x - p_mouse_x;
333 mouse_y += event.xmotion.y - p_mouse_y;
334 if (abs(scr_width/2 - event.xmotion.x) > scr_width / 4 || abs(scr_height/2 - event.xmotion.y) > scr_height / 4)
337 p_mouse_x = event.xmotion.x;
338 p_mouse_y = event.xmotion.y;
342 ui_mouseupdate(event.xmotion.x, event.xmotion.y);
346 // mouse button pressed
347 switch(event.xbutton.button)
350 Key_Event(K_MOUSE1, true);
353 Key_Event(K_MOUSE3, true);
356 Key_Event(K_MOUSE2, true);
359 Key_Event(K_MWHEELUP, true);
362 Key_Event(K_MWHEELDOWN, true);
365 Con_Printf("HandleEvents: ButtonPress gave value %d, 1-5 expected\n", event.xbutton.button);
371 // mouse button released
372 switch(event.xbutton.button)
375 Key_Event(K_MOUSE1, false);
378 Key_Event(K_MOUSE3, false);
381 Key_Event(K_MOUSE2, false);
384 Key_Event(K_MWHEELUP, false);
387 Key_Event(K_MWHEELDOWN, false);
390 Con_Printf("HandleEvents: ButtonRelease gave value %d, 1-5 expected\n", event.xbutton.button);
397 win_x = event.xcreatewindow.x;
398 win_y = event.xcreatewindow.y;
401 case ConfigureNotify:
402 // window changed size/location
403 win_x = event.xconfigure.x;
404 win_y = event.xconfigure.y;
407 // window has been destroyed
411 // window manager messages
412 if ((event.xclient.format == 32) && (event.xclient.data.l[0] == wm_delete_window_atom))
420 // window iconified/rolledup/whatever
424 // window is now the input focus
427 // window is no longer the input focus
430 // mouse entered window
440 /* move the mouse to the window center again */
441 p_mouse_x = scr_width / 2;
442 p_mouse_y = scr_height / 2;
443 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, p_mouse_x, p_mouse_y);
448 static void IN_DeactivateMouse( void )
450 if (!mouse_avail || !vidx11_display || !win)
456 mouse_active = false;
460 static void IN_ActivateMouse( void )
462 if (!mouse_avail || !vidx11_display || !win)
467 mouse_x = mouse_y = 0; // don't spazz
474 void VID_Shutdown(void)
476 if (!ctx || !vidx11_display)
484 XF86VidModeSwitchToMode(vidx11_display, scrnum, vidmodes[0]);
486 XDestroyWindow(vidx11_display, win);
487 XCloseDisplay(vidx11_display);
489 vidmode_active = false;
490 vidx11_display = NULL;
497 void signal_handler(int sig)
499 printf("Received signal %d, exiting...\n", sig);
506 signal(SIGHUP, signal_handler);
507 signal(SIGINT, signal_handler);
508 signal(SIGQUIT, signal_handler);
509 signal(SIGILL, signal_handler);
510 signal(SIGTRAP, signal_handler);
511 signal(SIGIOT, signal_handler);
512 signal(SIGBUS, signal_handler);
513 signal(SIGFPE, signal_handler);
514 signal(SIGSEGV, signal_handler);
515 signal(SIGTERM, signal_handler);
523 void VID_GetWindowSize (int *x, int *y, int *width, int *height)
527 *height = scr_height;
530 void VID_Finish (void)
533 if (r_render.integer)
536 qglXSwapBuffers(vidx11_display, win);
539 // handle the mouse state when windowed if that's changed
541 if (vid_mouse.integer && !key_consoleactive)
558 IN_DeactivateMouse ();
563 // LordHavoc: ported from SDL 1.2.2, this was far more difficult to port from
564 // SDL than to simply use the XFree gamma ramp extension, but that affects the
565 // whole screen even when the game window is inactive, this only affects the
566 // screen while the window is active, very desirable behavior :)
567 int VID_SetGamma(float prescale, float gamma, float scale, float base)
569 // LordHavoc: FIXME: finish this code, we need to allocate colors before we can store them
574 unsigned int Rmask, Gmask, Bmask, Rloss, Gloss, Bloss, Rshift, Gshift, Bshift, mask;
576 unsigned short ramp[256];
578 if (COM_CheckParm("-nogamma"))
581 if (vidx11_visual->class != DirectColor)
583 Con_Printf("X11 Visual class is %d, can only do gamma on %d\n", vidx11_visual->class, DirectColor);
587 Rmask = vidx11_visual->red_mask;
588 Gmask = vidx11_visual->green_mask;
589 Bmask = vidx11_visual->blue_mask;
595 for (;!(mask & 1);mask >>= 1)
597 for (;(mask & 1);mask >>= 1)
604 for (;!(mask & 1);mask >>= 1)
606 for (;(mask & 1);mask >>= 1)
613 for (;!(mask & 1);mask >>= 1)
615 for (;(mask & 1);mask >>= 1)
619 BuildGammaTable16(prescale, gamma, scale, base, ramp);
621 // convert gamma ramp to palette (yes this seems odd)
622 ncolors = vidx11_visual->map_entries;
623 for (i = 0;i < ncolors;i++)
625 c = (256 * i / ncolors);
626 xcmap[i].pixel = ((c >> Rloss) << Rshift) | ((c >> Gloss) << Gshift) | ((c >> Bloss) << Bshift);
627 xcmap[i].red = ramp[c];
628 xcmap[i].green = ramp[c];
629 xcmap[i].blue = ramp[c];
630 xcmap[i].flags = (DoRed|DoGreen|DoBlue);
632 XStoreColors(vidx11_display, vidx11_colormap, xcmap, ncolors);
633 XSync(vidx11_display, false);
634 // FIXME: should this check for BadAccess/BadColor/BadValue errors produced by XStoreColors before setting this true?
639 void VID_Init(int fullscreen, int width, int height)
642 // LordHavoc: FIXME: finish this code, we need to allocate colors before we can store them
652 GLX_X_VISUAL_TYPE, GLX_DIRECT_COLOR,
656 int nogammaattrib[] =
666 XSetWindowAttributes attr;
669 XVisualInfo *visinfo;
670 int MajorVersion, MinorVersion;
672 if (!GL_OpenLibrary("libGL.so.1"))
673 Sys_Error("Unable to load GL driver\n");
675 Cvar_RegisterVariable (&vid_dga);
676 Cvar_RegisterVariable (&vid_dga_mouseaccel);
678 if (!(vidx11_display = XOpenDisplay(NULL)))
680 fprintf(stderr, "Error couldn't open the X display\n");
684 scrnum = DefaultScreen(vidx11_display);
685 root = RootWindow(vidx11_display, scrnum);
687 // Get video mode list
688 MajorVersion = MinorVersion = 0;
689 if (!XF86VidModeQueryVersion(vidx11_display, &MajorVersion, &MinorVersion))
693 Con_Printf("Using XFree86-VidModeExtension Version %d.%d\n", MajorVersion, MinorVersion);
697 if ((qglXChooseVisual = GL_GetProcAddress("glXChooseVisual")) == NULL
698 || (qglXCreateContext = GL_GetProcAddress("glXCreateContext")) == NULL
699 || (qglXMakeCurrent = GL_GetProcAddress("glXMakeCurrent")) == NULL
700 || (qglXSwapBuffers = GL_GetProcAddress("glXSwapBuffers")) == NULL
701 || (qglXQueryExtensionsString = GL_GetProcAddress("glXQueryExtensionsString")) == NULL)
702 Sys_Error("glX functions not found in %s\n", gl_driver);
705 // LordHavoc: FIXME: finish this code, we need to allocate colors before we can store them
707 if (!COM_CheckParm("-nogamma"))
708 visinfo = qglXChooseVisual(vidx11_display, scrnum, gammaattrib);
712 visinfo = qglXChooseVisual(vidx11_display, scrnum, nogammaattrib);
715 Sys_Error("couldn't get an RGB, Double-buffered, Depth visual\n");
722 int best_fit, best_dist, dist, x, y;
724 XF86VidModeGetAllModeLines(vidx11_display, scrnum, &num_vidmodes, &vidmodes);
726 // Are we going fullscreen? If so, let's change video mode
732 for (i = 0; i < num_vidmodes; i++)
734 if (width > vidmodes[i]->hdisplay || height > vidmodes[i]->vdisplay)
737 x = width - vidmodes[i]->hdisplay;
738 y = height - vidmodes[i]->vdisplay;
739 dist = (x * x) + (y * y);
740 if (dist < best_dist)
749 // LordHavoc: changed from ActualWidth/ActualHeight =,
750 // to width/height =, so the window will take the full area of
752 width = vidmodes[best_fit]->hdisplay;
753 height = vidmodes[best_fit]->vdisplay;
755 // change to the mode
756 XF86VidModeSwitchToMode(vidx11_display, scrnum, vidmodes[best_fit]);
757 vidmode_active = true;
759 // Move the viewport to top left
760 XF86VidModeSetViewPort(vidx11_display, scrnum, 0, 0);
767 // LordHavoc: save the visual for use in gamma ramp settings later
768 vidx11_visual = visinfo->visual;
770 /* window attributes */
771 attr.background_pixel = 0;
772 attr.border_pixel = 0;
773 // LordHavoc: save the colormap for later, too
774 vidx11_colormap = attr.colormap = XCreateColormap(vidx11_display, root, visinfo->visual, AllocNone);
775 attr.event_mask = X_MASK;
778 mask = CWBackPixel | CWColormap | CWSaveUnder | CWBackingStore | CWEventMask | CWOverrideRedirect;
779 attr.override_redirect = True;
780 attr.backing_store = NotUseful;
781 attr.save_under = False;
784 mask = CWBackPixel | CWBorderPixel | CWColormap | CWEventMask;
786 win = XCreateWindow(vidx11_display, root, 0, 0, width, height, 0, visinfo->depth, InputOutput, visinfo->visual, mask, &attr);
787 XStoreName(vidx11_display, win, gamename);
788 XMapWindow(vidx11_display, win);
790 // LordHavoc: making the close button on a window do the right thing
791 // seems to involve this mess, sigh...
792 wm_delete_window_atom = XInternAtom(vidx11_display, "WM_DELETE_WINDOW", false);
793 XSetWMProtocols(vidx11_display, win, &wm_delete_window_atom, 1);
797 XMoveWindow(vidx11_display, win, 0, 0);
798 XRaiseWindow(vidx11_display, win);
799 XWarpPointer(vidx11_display, None, win, 0, 0, 0, 0, 0, 0);
800 XFlush(vidx11_display);
801 // Move the viewport to top left
802 XF86VidModeSetViewPort(vidx11_display, scrnum, 0, 0);
805 XFlush(vidx11_display);
807 ctx = qglXCreateContext(vidx11_display, visinfo, NULL, True);
809 qglXMakeCurrent(vidx11_display, win, ctx);
814 if ((qglGetString = GL_GetProcAddress("glGetString")) == NULL)
815 Sys_Error("glGetString not found in %s", gl_driver);
817 gl_renderer = qglGetString(GL_RENDERER);
818 gl_vendor = qglGetString(GL_VENDOR);
819 gl_version = qglGetString(GL_VERSION);
820 gl_extensions = qglGetString(GL_EXTENSIONS);
822 gl_platformextensions = qglXQueryExtensionsString(vidx11_display, scrnum);
824 GL_CheckExtension("GLX_ARB_get_proc_address", getprocaddressfuncs, "-nogetprocaddress", false);
825 gl_videosyncavailable = GL_CheckExtension("GLX_SGI_video_sync", videosyncfuncs, "-novideosync", false);
827 InitSig(); // trap evil signals
833 Con_SafePrintf ("Video mode %dx%d initialized.\n", width, height);
836 void Sys_SendKeyEvents(void)
843 if (COM_CheckParm ("-nomouse") || COM_CheckParm("-safe"))
847 void IN_Shutdown(void)
856 void IN_Commands (void)
860 void IN_Move (usercmd_t *cmd)
863 IN_Mouse(cmd, mouse_x, mouse_y);
868 static void *prjobj = NULL;
870 int GL_OpenLibrary(const char *name)
872 Con_Printf("Loading GL driver %s\n", name);
874 if (!(prjobj = dlopen(name, RTLD_LAZY)))
876 Con_Printf("Unable to open symbol list for %s\n", name);
879 strcpy(gl_driver, name);
883 void GL_CloseLibrary(void)
889 qglXGetProcAddressARB = NULL;
892 gl_platformextensions = "";
895 void *GL_GetProcAddress(const char *name)
898 if (qglXGetProcAddressARB != NULL)
899 p = (void *) qglXGetProcAddressARB(name);
901 p = (void *) dlsym(prjobj, name);