quakeforge/libs/video/targets/in_x11.c

577 lines
10 KiB
C

/*
in_x11.c
general x11 input driver
Copyright (C) 1996-1997 Id Software, Inc.
Copyright (C) 2000 Marcus Sundberg [mackan@stacken.kth.se]
Copyright (C) 1999,2000 contributors of the QuakeForge project
Please see the file "AUTHORS" for a list of contributors
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:
Free Software Foundation, Inc.
59 Temple Place - Suite 330
Boston, MA 02111-1307, USA
$Id$
*/
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#ifdef HAVE_STRING_H
# include <string.h>
#endif
#ifdef HAVE_STRINGS_H
# include <strings.h>
#endif
#ifdef HAVE_UNISTD_H
# include <unistd.h>
#endif
#define _BSD
#include <ctype.h>
#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <X11/Xlib.h>
#include <X11/keysym.h>
#ifdef HAVE_DGA
# include <X11/extensions/XShm.h>
# include <X11/extensions/xf86dga.h>
#endif
#include "QF/cdaudio.h"
#include "QF/console.h"
#include "QF/cmd.h"
#include "QF/cvar.h"
#include "QF/input.h"
#include "QF/joystick.h"
#include "QF/keys.h"
#include "QF/mathlib.h"
#include "QF/qargs.h"
#include "QF/sound.h"
#include "QF/sys.h"
#include "QF/vid.h"
#include "compat.h"
#include "context_x11.h"
#include "dga_check.h"
cvar_t *in_snd_block;
cvar_t *in_dga;
static qboolean dga_avail;
static qboolean dga_active;
static keydest_t old_key_dest = key_none;
static int p_mouse_x, p_mouse_y;
#define KEY_MASK (KeyPressMask | KeyReleaseMask)
#define MOUSE_MASK (ButtonPressMask | ButtonReleaseMask | PointerMotionMask)
#define FOCUS_MASK (FocusChangeMask)
#define INPUT_MASK (KEY_MASK | MOUSE_MASK | FOCUS_MASK)
static void
dga_on (void)
{
#ifdef HAVE_DGA
if (dga_avail && !dga_active) {
XF86DGADirectVideo (x_disp, DefaultScreen (x_disp),
XF86DGADirectMouse);
dga_active = true;
}
#endif
}
static void
dga_off (void)
{
#ifdef HAVE_DGA
if (dga_avail && dga_active) {
XF86DGADirectVideo (x_disp, DefaultScreen (x_disp), 0);
dga_active = false;
}
#endif
}
static void
in_dga_f (cvar_t *var)
{
if (in_grab && in_grab->int_val) {
if (var->int_val) {
dga_on ();
} else {
dga_off ();
}
}
}
static void
XLateKey (XKeyEvent * ev, int *k, int *u)
{
int key = 0;
KeySym keysym, shifted_keysym;
XComposeStatus compose;
unsigned char buffer[4];
int bytes;
int unicode;
keysym = XLookupKeysym (ev, 0);
bytes = XLookupString (ev, buffer, sizeof(buffer), &shifted_keysym,
&compose);
unicode = buffer[0];
switch (keysym) {
case XK_KP_Page_Up:
key = K_KP9;
break;
case XK_Page_Up:
key = K_PAGEUP;
break;
case XK_KP_Page_Down:
key = K_KP3;
break;
case XK_Page_Down:
key = K_PAGEDOWN;
break;
case XK_KP_Home:
key = K_KP7;
break;
case XK_Home:
key = K_HOME;
break;
case XK_KP_End:
key = K_KP1;
break;
case XK_End:
key = K_END;
break;
case XK_KP_Left:
key = K_KP4;
break;
case XK_Left:
key = K_LEFT;
break;
case XK_KP_Right:
key = K_KP6;
break;
case XK_Right:
key = K_RIGHT;
break;
case XK_KP_Down:
key = K_KP2;
break;
case XK_Down:
key = K_DOWN;
break;
case XK_KP_Up:
key = K_KP8;
break;
case XK_Up:
key = K_UP;
break;
case XK_Escape:
key = K_ESCAPE;
break;
case XK_KP_Enter:
key = K_KP_ENTER;
break;
case XK_Return:
key = K_RETURN;
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_PERIOD;
break;
case XK_Delete:
key = K_DELETE;
break;
case XK_Pause:
key = K_PAUSE;
break;
case XK_Shift_L:
key = K_LSHIFT;
break;
case XK_Shift_R:
key = K_RSHIFT;
break;
case XK_Execute:
case XK_Control_L:
key = K_LCTRL;
break;
case XK_Control_R:
key = K_LCTRL;
break;
case XK_Mode_switch:
case XK_Alt_L:
key = K_LALT;
break;
case XK_Meta_L:
key = K_LMETA;
break;
case XK_Alt_R:
key = K_RALT;
break;
case XK_Meta_R:
key = K_RMETA;
break;
case XK_Caps_Lock:
key = K_CAPSLOCK;
break;
case XK_KP_Begin:
key = K_KP5;
break;
case XK_Scroll_Lock:
key = K_SCROLLOCK;
break;
case XK_Num_Lock:
key = K_NUMLOCK;
break;
case XK_Insert:
key = K_INSERT;
break;
case XK_KP_Insert:
key = K_KP0;
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_DIVIDE;
break;
/* For Sun keyboards */
case XK_F27:
key = K_HOME;
break;
case XK_F29:
key = K_PAGEUP;
break;
case XK_F33:
key = K_END;
break;
case XK_F35:
key = K_PAGEDOWN;
break;
/* Some high ASCII symbols, for azerty keymaps */
case XK_twosuperior:
key = K_WORLD_18;
break;
case XK_eacute:
key = K_WORLD_63;
break;
case XK_section:
key = K_WORLD_7;
break;
case XK_egrave:
key = K_WORLD_72;
break;
case XK_ccedilla:
key = K_WORLD_71;
break;
case XK_agrave:
key = K_WORLD_64;
break;
default:
if (keysym < 128) {
/* ASCII keys */
key = keysym;
if ((key >= 'A') && (key <= 'Z')) {
key = key + ('a' - 'A');
}
}
break;
}
*k = key;
*u = unicode;
}
static void
event_key (XEvent * event)
{
int key, unicode;
if (old_key_dest != key_dest) {
old_key_dest = key_dest;
if (key_dest == key_game) {
XAutoRepeatOff (x_disp);
} else {
XAutoRepeatOn (x_disp);
}
}
XLateKey (&event->xkey, &key, &unicode);
Key_Event (key, unicode, event->type == KeyPress);
}
static void
event_button (XEvent * event)
{
int but;
but = event->xbutton.button;
if (but == 2)
but = 3;
else if (but == 3)
but = 2;
switch (but) {
case 1:
case 2:
case 3:
Key_Event (M_BUTTON1 + but - 1, 0, event->type == ButtonPress);
break;
case 4:
Key_Event (M_WHEEL_UP, 0, event->type == ButtonPress);
break;
case 5:
Key_Event (M_WHEEL_DOWN, 0, event->type == ButtonPress);
break;
}
}
static void
event_focusout (XEvent * event)
{
XAutoRepeatOn (x_disp);
if (in_snd_block->int_val) {
S_BlockSound ();
CDAudio_Pause ();
}
}
static void
event_focusin (XEvent * event)
{
if (key_dest == key_game)
XAutoRepeatOff (x_disp);
S_UnblockSound ();
CDAudio_Resume ();
}
static void
center_pointer (void)
{
XEvent event;
event.type = MotionNotify;
event.xmotion.display = x_disp;
event.xmotion.window = x_win;
event.xmotion.x = vid.width / 2;
event.xmotion.y = vid.height / 2;
XSendEvent (x_disp, x_win, False, PointerMotionMask, &event);
XWarpPointer (x_disp, None, x_win, 0, 0, 0, 0,
vid.width / 2, vid.height / 2);
}
static void
event_motion (XEvent * event)
{
if (dga_active) {
in_mouse_x += event->xmotion.x_root;
in_mouse_y += event->xmotion.y_root;
} else {
if (vid_fullscreen->int_val || in_grab->int_val) {
if (!event->xmotion.send_event) {
in_mouse_x += (event->xmotion.x - p_mouse_x);
in_mouse_y += (event->xmotion.y - p_mouse_y);
if (abs (vid.width / 2 - event->xmotion.x) > vid.width / 4 ||
abs (vid.height / 2 - event->xmotion.y) > vid.height / 4) {
center_pointer ();
}
}
} else {
in_mouse_x += (event->xmotion.x - p_mouse_x);
in_mouse_y += (event->xmotion.y - p_mouse_y);
}
p_mouse_x = event->xmotion.x;
p_mouse_y = event->xmotion.y;
}
}
void
IN_LL_Grab_Input (void)
{
if (!x_disp || !x_win)
return;
XGrabPointer (x_disp, x_win, True, MOUSE_MASK, GrabModeAsync,
GrabModeAsync, x_win, None, CurrentTime);
if (in_dga->int_val)
dga_on ();
X11_GrabKeyboard ();
}
void
IN_LL_Ungrab_Input (void)
{
if (!x_disp || !x_win)
return;
if (in_dga->int_val)
dga_off ();
XUngrabPointer (x_disp, CurrentTime);
X11_UngrabKeyboard ();
}
void
IN_LL_SendKeyEvents (void)
{
/* Get events from X server. */
X11_ProcessEvents ();
}
/* Called at shutdown */
void
IN_LL_Shutdown (void)
{
Con_Printf ("IN_LL_Shutdown\n");
in_mouse_avail = 0;
if (x_disp) {
XAutoRepeatOn (x_disp);
dga_off ();
}
X11_CloseDisplay ();
}
void
IN_LL_Init (void)
{
// open the display
if (!x_disp)
Sys_Error ("IN: No display!!\n");
if (!x_win)
Sys_Error ("IN: No window!!\n");
X11_OpenDisplay (); // call to increment the reference counter
{
int attribmask = CWEventMask;
XWindowAttributes attribs_1;
XSetWindowAttributes attribs_2;
XGetWindowAttributes (x_disp, x_win, &attribs_1);
attribs_2.event_mask = attribs_1.your_event_mask | INPUT_MASK;
XChangeWindowAttributes (x_disp, x_win, attribmask, &attribs_2);
}
X11_AddEvent (KeyPress, &event_key);
X11_AddEvent (KeyRelease, &event_key);
X11_AddEvent (FocusIn, &event_focusin);
X11_AddEvent (FocusOut, &event_focusout);
if (!COM_CheckParm ("-nomouse")) {
dga_avail = VID_CheckDGA (x_disp, NULL, NULL, NULL);
if (vid_fullscreen->int_val) {
Cvar_Set (in_grab, "1");
in_grab->flags |= CVAR_ROM;
IN_LL_Grab_Input ();
}
X11_AddEvent (ButtonPress, &event_button);
X11_AddEvent (ButtonRelease, &event_button);
X11_AddEvent (MotionNotify, &event_motion);
in_mouse_avail = 1;
}
}
void
IN_LL_Init_Cvars (void)
{
in_snd_block= Cvar_Get ("in_snd_block", "0", CVAR_ARCHIVE, NULL,
"block sound output on window focus loss");
in_dga = Cvar_Get ("in_dga", "1", CVAR_ARCHIVE, in_dga_f,
"DGA Input support");
}
void
IN_LL_ClearStates (void)
{
}