]> icculus.org git repositories - divverent/darkplaces.git/blob - vid_wgl.c
99235ff2a63aa44fe5ff60e50d9e68f942778113
[divverent/darkplaces.git] / vid_wgl.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 // gl_vidnt.c -- NT GL vid component
21
22 #include "quakedef.h"
23 #include <windows.h>
24 #include <dsound.h>
25 #include "resource.h"
26 #include <commctrl.h>
27
28 extern void S_BlockSound (void);
29 extern void S_UnblockSound (void);
30 extern HINSTANCE global_hInstance;
31
32
33 #ifndef WM_MOUSEWHEEL
34 #define WM_MOUSEWHEEL                   0x020A
35 #endif
36
37 // Tell startup code that we have a client
38 int cl_available = true;
39
40 int (WINAPI *qwglChoosePixelFormat)(HDC, CONST PIXELFORMATDESCRIPTOR *);
41 int (WINAPI *qwglDescribePixelFormat)(HDC, int, UINT, LPPIXELFORMATDESCRIPTOR);
42 //int (WINAPI *qwglGetPixelFormat)(HDC);
43 BOOL (WINAPI *qwglSetPixelFormat)(HDC, int, CONST PIXELFORMATDESCRIPTOR *);
44 BOOL (WINAPI *qwglSwapBuffers)(HDC);
45 HGLRC (WINAPI *qwglCreateContext)(HDC);
46 BOOL (WINAPI *qwglDeleteContext)(HGLRC);
47 HGLRC (WINAPI *qwglGetCurrentContext)(VOID);
48 HDC (WINAPI *qwglGetCurrentDC)(VOID);
49 PROC (WINAPI *qwglGetProcAddress)(LPCSTR);
50 BOOL (WINAPI *qwglMakeCurrent)(HDC, HGLRC);
51 BOOL (WINAPI *qwglSwapIntervalEXT)(int interval);
52 const char *(WINAPI *qwglGetExtensionsStringARB)(HDC hdc);
53
54 static dllfunction_t wglfuncs[] =
55 {
56         {"wglChoosePixelFormat", (void **) &qwglChoosePixelFormat},
57         {"wglDescribePixelFormat", (void **) &qwglDescribePixelFormat},
58 //      {"wglGetPixelFormat", (void **) &qwglGetPixelFormat},
59         {"wglSetPixelFormat", (void **) &qwglSetPixelFormat},
60         {"wglSwapBuffers", (void **) &qwglSwapBuffers},
61         {"wglCreateContext", (void **) &qwglCreateContext},
62         {"wglDeleteContext", (void **) &qwglDeleteContext},
63         {"wglGetProcAddress", (void **) &qwglGetProcAddress},
64         {"wglMakeCurrent", (void **) &qwglMakeCurrent},
65         {"wglGetCurrentContext", (void **) &qwglGetCurrentContext},
66         {"wglGetCurrentDC", (void **) &qwglGetCurrentDC},
67         {NULL, NULL}
68 };
69
70 static dllfunction_t wglswapintervalfuncs[] =
71 {
72         {"wglSwapIntervalEXT", (void **) &qwglSwapIntervalEXT},
73         {NULL, NULL}
74 };
75
76 qboolean scr_skipupdate;
77
78 static DEVMODE gdevmode;
79 static qboolean vid_initialized = false;
80 static qboolean vid_wassuspended = false;
81 static int vid_usingmouse;
82 extern qboolean mouseactive;  // from in_win.c
83 static HICON hIcon;
84
85 HWND mainwindow;
86
87 //HWND WINAPI InitializeWindow (HINSTANCE hInstance, int nCmdShow);
88
89 static int vid_isfullscreen;
90
91 //void VID_MenuDraw (void);
92 //void VID_MenuKey (int key);
93
94 //LONG WINAPI MainWndProc (HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
95 //void AppActivate(BOOL fActive, BOOL minimize);
96 //void ClearAllStates (void);
97 //void VID_UpdateWindowStatus (void);
98
99 //====================================
100
101 int window_x, window_y, window_width, window_height;
102 int window_center_x, window_center_y;
103
104 void IN_ShowMouse (void);
105 void IN_DeactivateMouse (void);
106 void IN_HideMouse (void);
107 void IN_ActivateMouse (void);
108 void IN_MouseEvent (int mstate);
109 void IN_UpdateClipCursor (void);
110
111 qboolean mouseinitialized;
112 static qboolean dinput;
113
114 // input code
115
116 #include <dinput.h>
117
118 #define DINPUT_BUFFERSIZE           16
119 #define iDirectInputCreate(a,b,c,d)     pDirectInputCreate(a,b,c,d)
120
121 HRESULT (WINAPI *pDirectInputCreate)(HINSTANCE hinst, DWORD dwVersion,
122         LPDIRECTINPUT * lplpDirectInput, LPUNKNOWN punkOuter);
123
124 // LordHavoc: thanks to backslash for this support for mouse buttons 4 and 5
125 /* backslash :: imouse explorer buttons */
126 /* These are #ifdefed out for non-Win2K in the February 2001 version of
127    MS's platform SDK, but we need them for compilation. . . */
128 #ifndef WM_XBUTTONDOWN
129    #define WM_XBUTTONDOWN      0x020B
130    #define WM_XBUTTONUP      0x020C
131 #endif
132 #ifndef MK_XBUTTON1
133    #define MK_XBUTTON1         0x0020
134    #define MK_XBUTTON2         0x0040
135 // LordHavoc: lets hope this allows more buttons in the future...
136    #define MK_XBUTTON3         0x0080
137    #define MK_XBUTTON4         0x0100
138    #define MK_XBUTTON5         0x0200
139    #define MK_XBUTTON6         0x0400
140    #define MK_XBUTTON7         0x0800
141 #endif
142 /* :: backslash */
143
144 // mouse variables
145 int                     mouse_buttons;
146 int                     mouse_oldbuttonstate;
147 POINT           current_pos;
148 int                     mouse_x, mouse_y, old_mouse_x, old_mouse_y, mx_accum, my_accum;
149
150 static qboolean restore_spi;
151 static int              originalmouseparms[3], newmouseparms[3] = {0, 0, 1};
152
153 unsigned int uiWheelMessage;
154 qboolean        mouseactive;
155 //qboolean              mouseinitialized;
156 static qboolean mouseparmsvalid, mouseactivatetoggle;
157 static qboolean mouseshowtoggle = 1;
158 static qboolean dinput_acquired;
159
160 static unsigned int             mstate_di;
161
162 // joystick defines and variables
163 // where should defines be moved?
164 #define JOY_ABSOLUTE_AXIS       0x00000000              // control like a joystick
165 #define JOY_RELATIVE_AXIS       0x00000010              // control like a mouse, spinner, trackball
166 #define JOY_MAX_AXES            6                               // X, Y, Z, R, U, V
167 #define JOY_AXIS_X                      0
168 #define JOY_AXIS_Y                      1
169 #define JOY_AXIS_Z                      2
170 #define JOY_AXIS_R                      3
171 #define JOY_AXIS_U                      4
172 #define JOY_AXIS_V                      5
173
174 enum _ControlList
175 {
176         AxisNada = 0, AxisForward, AxisLook, AxisSide, AxisTurn
177 };
178
179 DWORD   dwAxisFlags[JOY_MAX_AXES] =
180 {
181         JOY_RETURNX, JOY_RETURNY, JOY_RETURNZ, JOY_RETURNR, JOY_RETURNU, JOY_RETURNV
182 };
183
184 DWORD   dwAxisMap[JOY_MAX_AXES];
185 DWORD   dwControlMap[JOY_MAX_AXES];
186 PDWORD  pdwRawValue[JOY_MAX_AXES];
187
188 // none of these cvars are saved over a session
189 // this means that advanced controller configuration needs to be executed
190 // each time.  this avoids any problems with getting back to a default usage
191 // or when changing from one controller to another.  this way at least something
192 // works.
193 cvar_t  in_joystick = {CVAR_SAVE, "joystick","0"};
194 cvar_t  joy_name = {0, "joyname", "joystick"};
195 cvar_t  joy_advanced = {0, "joyadvanced", "0"};
196 cvar_t  joy_advaxisx = {0, "joyadvaxisx", "0"};
197 cvar_t  joy_advaxisy = {0, "joyadvaxisy", "0"};
198 cvar_t  joy_advaxisz = {0, "joyadvaxisz", "0"};
199 cvar_t  joy_advaxisr = {0, "joyadvaxisr", "0"};
200 cvar_t  joy_advaxisu = {0, "joyadvaxisu", "0"};
201 cvar_t  joy_advaxisv = {0, "joyadvaxisv", "0"};
202 cvar_t  joy_forwardthreshold = {0, "joyforwardthreshold", "0.15"};
203 cvar_t  joy_sidethreshold = {0, "joysidethreshold", "0.15"};
204 cvar_t  joy_pitchthreshold = {0, "joypitchthreshold", "0.15"};
205 cvar_t  joy_yawthreshold = {0, "joyyawthreshold", "0.15"};
206 cvar_t  joy_forwardsensitivity = {0, "joyforwardsensitivity", "-1.0"};
207 cvar_t  joy_sidesensitivity = {0, "joysidesensitivity", "-1.0"};
208 cvar_t  joy_pitchsensitivity = {0, "joypitchsensitivity", "1.0"};
209 cvar_t  joy_yawsensitivity = {0, "joyyawsensitivity", "-1.0"};
210 cvar_t  joy_wwhack1 = {0, "joywwhack1", "0.0"};
211 cvar_t  joy_wwhack2 = {0, "joywwhack2", "0.0"};
212
213 qboolean        joy_avail, joy_advancedinit, joy_haspov;
214 DWORD           joy_oldbuttonstate, joy_oldpovstate;
215
216 int                     joy_id;
217 DWORD           joy_flags;
218 DWORD           joy_numbuttons;
219
220 static LPDIRECTINPUT            g_pdi;
221 static LPDIRECTINPUTDEVICE      g_pMouse;
222
223 static JOYINFOEX        ji;
224
225 static HINSTANCE hInstDI;
226
227 //static qboolean       dinput;
228
229 typedef struct MYDATA {
230         LONG  lX;                   // X axis goes here
231         LONG  lY;                   // Y axis goes here
232         LONG  lZ;                   // Z axis goes here
233         BYTE  bButtonA;             // One button goes here
234         BYTE  bButtonB;             // Another button goes here
235         BYTE  bButtonC;             // Another button goes here
236         BYTE  bButtonD;             // Another button goes here
237 } MYDATA;
238
239 static DIOBJECTDATAFORMAT rgodf[] = {
240   { &GUID_XAxis,    FIELD_OFFSET(MYDATA, lX),       DIDFT_AXIS | DIDFT_ANYINSTANCE,   0,},
241   { &GUID_YAxis,    FIELD_OFFSET(MYDATA, lY),       DIDFT_AXIS | DIDFT_ANYINSTANCE,   0,},
242   { &GUID_ZAxis,    FIELD_OFFSET(MYDATA, lZ),       0x80000000 | DIDFT_AXIS | DIDFT_ANYINSTANCE,   0,},
243   { 0,              FIELD_OFFSET(MYDATA, bButtonA), DIDFT_BUTTON | DIDFT_ANYINSTANCE, 0,},
244   { 0,              FIELD_OFFSET(MYDATA, bButtonB), DIDFT_BUTTON | DIDFT_ANYINSTANCE, 0,},
245   { 0,              FIELD_OFFSET(MYDATA, bButtonC), 0x80000000 | DIDFT_BUTTON | DIDFT_ANYINSTANCE, 0,},
246   { 0,              FIELD_OFFSET(MYDATA, bButtonD), 0x80000000 | DIDFT_BUTTON | DIDFT_ANYINSTANCE, 0,},
247 };
248
249 #define NUM_OBJECTS (sizeof(rgodf) / sizeof(rgodf[0]))
250
251 static DIDATAFORMAT     df = {
252         sizeof(DIDATAFORMAT),       // this structure
253         sizeof(DIOBJECTDATAFORMAT), // size of object data format
254         DIDF_RELAXIS,               // absolute axis coordinates
255         sizeof(MYDATA),             // device data size
256         NUM_OBJECTS,                // number of objects
257         rgodf,                      // and here they are
258 };
259
260 // forward-referenced functions
261 void IN_StartupJoystick (void);
262 void Joy_AdvancedUpdate_f (void);
263 void IN_JoyMove (usercmd_t *cmd);
264 void IN_StartupMouse (void);
265
266 /*
267 ================
268 VID_UpdateWindowStatus
269 ================
270 */
271 void VID_UpdateWindowStatus (void)
272 {
273         window_center_x = window_x + window_width / 2;
274         window_center_y = window_y + window_height / 2;
275
276         if (mouseinitialized && mouseactive && !dinput)
277         {
278                 RECT window_rect;
279                 window_rect.left = window_x;
280                 window_rect.top = window_y;
281                 window_rect.right = window_x + window_width;
282                 window_rect.bottom = window_y + window_height;
283                 ClipCursor (&window_rect);
284         }
285 }
286
287
288 //====================================
289
290 /*
291 =================
292 VID_GetWindowSize
293 =================
294 */
295 void VID_GetWindowSize (int *x, int *y, int *width, int *height)
296 {
297         *x = 0;
298         *y = 0;
299         *width = window_width;
300         *height = window_height;
301 }
302
303
304 void VID_Finish (void)
305 {
306         HDC hdc;
307         int vid_usemouse;
308         static int      old_vsync       = -1;
309
310         if (old_vsync != vid_vsync.integer)
311         {
312                 old_vsync = bound(0, vid_vsync.integer, 1);
313                 Cvar_SetValueQuick(&vid_vsync, old_vsync);
314                 qwglSwapIntervalEXT (old_vsync);
315         }
316
317         if (r_render.integer && !scr_skipupdate)
318         {
319                 if (r_speeds.integer || gl_finish.integer)
320                         qglFinish();
321                 hdc = GetDC(mainwindow);
322                 SwapBuffers(hdc);
323                 ReleaseDC(mainwindow, hdc);
324         }
325
326 // handle the mouse state when windowed if that's changed
327         vid_usemouse = false;
328         if (vid_mouse.integer && !key_consoleactive)
329                 vid_usemouse = true;
330         if (vid_isfullscreen)
331                 vid_usemouse = true;
332         if (!vid_activewindow)
333                 vid_usemouse = false;
334         if (vid_usemouse)
335         {
336                 if (!vid_usingmouse)
337                 {
338                         vid_usingmouse = true;
339                         IN_ActivateMouse ();
340                         IN_HideMouse();
341                 }
342         }
343         else
344         {
345                 if (vid_usingmouse)
346                 {
347                         vid_usingmouse = false;
348                         IN_DeactivateMouse ();
349                         IN_ShowMouse();
350                 }
351         }
352 }
353
354 //==========================================================================
355
356
357
358
359 qbyte scantokey[128] =
360 {
361 //  0           1       2    3     4     5       6       7      8         9      A          B           C       D           E           F
362         0          ,27    ,'1'  ,'2'  ,'3'  ,'4'    ,'5'    ,'6'   ,'7'      ,'8'   ,'9'       ,'0'        ,'-'   ,'='         ,K_BACKSPACE,9    ,//0
363         'q'        ,'w'   ,'e'  ,'r'  ,'t'  ,'y'    ,'u'    ,'i'   ,'o'      ,'p'   ,'['       ,']'        ,13    ,K_CTRL      ,'a'        ,'s'  ,//1
364         'd'        ,'f'   ,'g'  ,'h'  ,'j'  ,'k'    ,'l'    ,';'   ,'\''     ,'`'   ,K_SHIFT   ,'\\'       ,'z'   ,'x'         ,'c'        ,'v'  ,//2
365         'b'        ,'n'   ,'m'  ,','  ,'.'  ,'/'    ,K_SHIFT,'*'   ,K_ALT    ,' '   ,0         ,K_F1       ,K_F2  ,K_F3        ,K_F4       ,K_F5 ,//3
366         K_F6       ,K_F7  ,K_F8 ,K_F9 ,K_F10,K_PAUSE,0      ,K_HOME,K_UPARROW,K_PGUP,K_KP_MINUS,K_LEFTARROW,K_KP_5,K_RIGHTARROW,K_KP_PLUS  ,K_END,//4
367         K_DOWNARROW,K_PGDN,K_INS,K_DEL,0    ,0      ,0      ,K_F11 ,K_F12    ,0     ,0         ,0          ,0     ,0           ,0          ,0    ,//5
368         0          ,0     ,0    ,0    ,0    ,0      ,0      ,0     ,0        ,0     ,0         ,0          ,0     ,0           ,0          ,0    ,//6
369         0          ,0     ,0    ,0    ,0    ,0      ,0      ,0     ,0        ,0     ,0         ,0          ,0     ,0           ,0          ,0     //7
370 };
371
372
373 /*
374 =======
375 MapKey
376
377 Map from windows to quake keynums
378 =======
379 */
380 int MapKey (int key, int virtualkey)
381 {
382         int result;
383         int modified = (key >> 16) & 255;
384         qboolean is_extended = false;
385
386         if (modified < 128 && scantokey[modified])
387                 result = scantokey[modified];
388         else
389         {
390                 result = 0;
391                 Con_DPrintf("key 0x%02x (0x%8x, 0x%8x) has no translation\n", modified, key, virtualkey);
392         }
393
394         if (key & (1 << 24))
395                 is_extended = true;
396
397         if ( !is_extended )
398         {
399                 switch ( result )
400                 {
401                 case K_HOME:
402                         return K_KP_HOME;
403                 case K_UPARROW:
404                         return K_KP_UPARROW;
405                 case K_PGUP:
406                         return K_KP_PGUP;
407                 case K_LEFTARROW:
408                         return K_KP_LEFTARROW;
409                 case K_RIGHTARROW:
410                         return K_KP_RIGHTARROW;
411                 case K_END:
412                         return K_KP_END;
413                 case K_DOWNARROW:
414                         return K_KP_DOWNARROW;
415                 case K_PGDN:
416                         return K_KP_PGDN;
417                 case K_INS:
418                         return K_KP_INS;
419                 case K_DEL:
420                         return K_KP_DEL;
421                 default:
422                         return result;
423                 }
424         }
425         else
426         {
427                 switch ( result )
428                 {
429                 case 0x0D:
430                         return K_KP_ENTER;
431                 case 0x2F:
432                         return K_KP_SLASH;
433                 case 0xAF:
434                         return K_KP_PLUS;
435                 }
436                 return result;
437         }
438 }
439
440 /*
441 ===================================================================
442
443 MAIN WINDOW
444
445 ===================================================================
446 */
447
448 /*
449 ================
450 ClearAllStates
451 ================
452 */
453 void ClearAllStates (void)
454 {
455         Key_ClearStates ();
456         IN_ClearStates ();
457 }
458
459 extern qboolean host_loopactive;
460
461 void AppActivate(BOOL fActive, BOOL minimize)
462 /****************************************************************************
463 *
464 * Function:     AppActivate
465 * Parameters:   fActive - True if app is activating
466 *
467 * Description:  If the application is activating, then swap the system
468 *               into SYSPAL_NOSTATIC mode so that our palettes will display
469 *               correctly.
470 *
471 ****************************************************************************/
472 {
473         static BOOL     sound_active;
474
475         vid_activewindow = fActive;
476         vid_hidden = minimize;
477
478 // enable/disable sound on focus gain/loss
479         if (!vid_activewindow && sound_active)
480         {
481                 S_BlockSound ();
482                 sound_active = false;
483         }
484         else if (vid_activewindow && !sound_active)
485         {
486                 S_UnblockSound ();
487                 sound_active = true;
488         }
489
490         if (fActive)
491         {
492                 if (vid_isfullscreen)
493                 {
494                         if (vid_wassuspended)
495                         {
496                                 vid_wassuspended = false;
497                                 ChangeDisplaySettings (&gdevmode, CDS_FULLSCREEN);
498                                 ShowWindow(mainwindow, SW_SHOWNORMAL);
499                         }
500
501                         // LordHavoc: from dabb, fix for alt-tab bug in NVidia drivers
502                         MoveWindow(mainwindow,0,0,gdevmode.dmPelsWidth,gdevmode.dmPelsHeight,false);
503                 }
504         }
505
506         if (!fActive)
507         {
508                 vid_usingmouse = false;
509                 IN_DeactivateMouse ();
510                 IN_ShowMouse ();
511                 if (vid_isfullscreen)
512                 {
513                         ChangeDisplaySettings (NULL, 0);
514                         vid_wassuspended = true;
515                 }
516                 VID_RestoreSystemGamma();
517         }
518 }
519
520 //TODO: move it around in vid_wgl.c since I dont think this is the right position
521 void Sys_SendKeyEvents (void)
522 {
523         MSG msg;
524
525         while (PeekMessage (&msg, NULL, 0, 0, PM_NOREMOVE))
526         {
527         // we always update if there are any event, even if we're paused
528                 scr_skipupdate = 0;
529
530                 if (!GetMessage (&msg, NULL, 0, 0))
531                         Sys_Quit ();
532
533                 TranslateMessage (&msg);
534                 DispatchMessage (&msg);
535         }
536 }
537
538 LONG CDAudio_MessageHandler(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
539
540 /* main window procedure */
541 LONG WINAPI MainWndProc (HWND hWnd, UINT uMsg, WPARAM  wParam, LPARAM lParam)
542 {
543         LONG    lRet = 1;
544         int             fActive, fMinimized, temp;
545         char    state[256];
546         char    asciichar[4];
547         int             vkey;
548         qboolean down = false;
549
550         extern unsigned int uiWheelMessage;
551
552         if ( uMsg == uiWheelMessage )
553                 uMsg = WM_MOUSEWHEEL;
554
555         switch (uMsg)
556         {
557                 case WM_KILLFOCUS:
558                         if (vid_isfullscreen)
559                                 ShowWindow(mainwindow, SW_SHOWMINNOACTIVE);
560                         break;
561
562                 case WM_CREATE:
563                         break;
564
565                 case WM_MOVE:
566                         window_x = (int) LOWORD(lParam);
567                         window_y = (int) HIWORD(lParam);
568                         VID_UpdateWindowStatus ();
569                         break;
570         
571                 case WM_KEYDOWN:
572                 case WM_SYSKEYDOWN:
573                         down = true;
574                 case WM_KEYUP:
575                 case WM_SYSKEYUP:
576                         vkey = MapKey(lParam, wParam);
577                         GetKeyboardState (state);
578                         // alt/ctrl/shift tend to produce funky ToAscii values,
579                         // and if it's not a single character we don't know care about it
580                         if (vkey == K_ALT || vkey == K_CTRL || vkey == K_SHIFT || ToAscii (wParam, lParam >> 16, state, (unsigned short *)asciichar, 0) != 1)
581                                 asciichar[0] = 0;
582                         Key_Event (vkey, asciichar[0], down);
583                         break;
584
585                 case WM_SYSCHAR:
586                 // keep Alt-Space from happening
587                         break;
588
589         // this is complicated because Win32 seems to pack multiple mouse events into
590         // one update sometimes, so we always check all states and look for events
591                 case WM_LBUTTONDOWN:
592                 case WM_LBUTTONUP:
593                 case WM_RBUTTONDOWN:
594                 case WM_RBUTTONUP:
595                 case WM_MBUTTONDOWN:
596                 case WM_MBUTTONUP:
597                 case WM_XBUTTONDOWN:   // backslash :: imouse explorer buttons
598                 case WM_XBUTTONUP:      // backslash :: imouse explorer buttons
599                 case WM_MOUSEMOVE:
600                         temp = 0;
601
602                         if (wParam & MK_LBUTTON)
603                                 temp |= 1;
604
605                         if (wParam & MK_RBUTTON)
606                                 temp |= 2;
607
608                         if (wParam & MK_MBUTTON)
609                                 temp |= 4;
610
611                         /* backslash :: imouse explorer buttons */
612                         if (wParam & MK_XBUTTON1)
613                                 temp |= 8;
614
615                         if (wParam & MK_XBUTTON2)
616                                 temp |= 16;
617                         /* :: backslash */
618
619                         // LordHavoc: lets hope this allows more buttons in the future...
620                         if (wParam & MK_XBUTTON3)
621                                 temp |= 32;
622                         if (wParam & MK_XBUTTON4)
623                                 temp |= 64;
624                         if (wParam & MK_XBUTTON5)
625                                 temp |= 128;
626                         if (wParam & MK_XBUTTON6)
627                                 temp |= 256;
628                         if (wParam & MK_XBUTTON7)
629                                 temp |= 512;
630
631                         IN_MouseEvent (temp);
632
633                         break;
634
635                 // JACK: This is the mouse wheel with the Intellimouse
636                 // Its delta is either positive or neg, and we generate the proper
637                 // Event.
638                 case WM_MOUSEWHEEL:
639                         if ((short) HIWORD(wParam) > 0) {
640                                 Key_Event(K_MWHEELUP, 0, true);
641                                 Key_Event(K_MWHEELUP, 0, false);
642                         } else {
643                                 Key_Event(K_MWHEELDOWN, 0, true);
644                                 Key_Event(K_MWHEELDOWN, 0, false);
645                         }
646                         break;
647
648                 case WM_SIZE:
649                         break;
650
651                 case WM_CLOSE:
652                         if (MessageBox (mainwindow, "Are you sure you want to quit?", "Confirm Exit", MB_YESNO | MB_SETFOREGROUND | MB_ICONQUESTION) == IDYES)
653                                 Sys_Quit ();
654
655                         break;
656
657                 case WM_ACTIVATE:
658                         fActive = LOWORD(wParam);
659                         fMinimized = (BOOL) HIWORD(wParam);
660                         AppActivate(!(fActive == WA_INACTIVE), fMinimized);
661
662                 // fix the leftover Alt from any Alt-Tab or the like that switched us away
663                         ClearAllStates ();
664
665                         break;
666
667                 //case WM_DESTROY:
668                 //      PostQuitMessage (0);
669                 //      break;
670
671                 case MM_MCINOTIFY:
672                         lRet = CDAudio_MessageHandler (hWnd, uMsg, wParam, lParam);
673                         break;
674
675                 default:
676                         /* pass all unhandled messages to DefWindowProc */
677                         lRet = DefWindowProc (hWnd, uMsg, wParam, lParam);
678                 break;
679         }
680
681         /* return 1 if handled message, 0 if not */
682         return lRet;
683 }
684
685 int VID_SetGamma(unsigned short *ramps)
686 {
687         HDC hdc = GetDC (NULL);
688         int i = SetDeviceGammaRamp(hdc, ramps);
689         ReleaseDC (NULL, hdc);
690         return i; // return success or failure
691 }
692
693 int VID_GetGamma(unsigned short *ramps)
694 {
695         HDC hdc = GetDC (NULL);
696         int i = GetDeviceGammaRamp(hdc, ramps);
697         ReleaseDC (NULL, hdc);
698         return i; // return success or failure
699 }
700
701 static HINSTANCE gldll;
702
703 int GL_OpenLibrary(const char *name)
704 {
705         Con_Printf("Loading OpenGL driver %s\n", name);
706         GL_CloseLibrary();
707         if (!(gldll = LoadLibrary(name)))
708         {
709                 Con_Printf("Unable to LoadLibrary %s\n", name);
710                 return false;
711         }
712         strcpy(gl_driver, name);
713         return true;
714 }
715
716 void GL_CloseLibrary(void)
717 {
718         FreeLibrary(gldll);
719         gldll = 0;
720         gl_driver[0] = 0;
721         qwglGetProcAddress = NULL;
722         gl_extensions = "";
723         gl_platform = "";
724         gl_platformextensions = "";
725 }
726
727 void *GL_GetProcAddress(const char *name)
728 {
729         void *p = NULL;
730         if (qwglGetProcAddress != NULL)
731                 p = (void *) qwglGetProcAddress(name);
732         if (p == NULL)
733                 p = (void *) GetProcAddress(gldll, name);
734         return p;
735 }
736
737 static void IN_Init(void);
738 void VID_Init(void)
739 {
740         WNDCLASS wc;
741
742         InitCommonControls();
743         hIcon = LoadIcon (global_hInstance, MAKEINTRESOURCE (IDI_ICON1));
744
745         // Register the frame class
746         wc.style         = 0;
747         wc.lpfnWndProc   = (WNDPROC)MainWndProc;
748         wc.cbClsExtra    = 0;
749         wc.cbWndExtra    = 0;
750         wc.hInstance     = global_hInstance;
751         wc.hIcon         = hIcon;
752         wc.hCursor       = LoadCursor (NULL,IDC_ARROW);
753         wc.hbrBackground = NULL;
754         wc.lpszMenuName  = 0;
755         wc.lpszClassName = "DarkPlacesWindowClass";
756
757         if (!RegisterClass (&wc))
758                 Sys_Error("Couldn't register window class\n");
759
760         IN_Init();
761 }
762
763 int VID_InitMode (int fullscreen, int width, int height, int bpp)
764 {
765         int i;
766         HDC hdc;
767         RECT rect;
768         MSG msg;
769         PIXELFORMATDESCRIPTOR pfd =
770         {
771                 sizeof(PIXELFORMATDESCRIPTOR),  // size of this pfd
772                 1,                              // version number
773                 PFD_DRAW_TO_WINDOW              // support window
774                 |  PFD_SUPPORT_OPENGL   // support OpenGL
775                 |  PFD_DOUBLEBUFFER ,   // double buffered
776                 PFD_TYPE_RGBA,                  // RGBA type
777                 24,                             // 24-bit color depth
778                 0, 0, 0, 0, 0, 0,               // color bits ignored
779                 0,                              // no alpha buffer
780                 0,                              // shift bit ignored
781                 0,                              // no accumulation buffer
782                 0, 0, 0, 0,                     // accum bits ignored
783                 32,                             // 32-bit z-buffer
784                 0,                              // no stencil buffer
785                 0,                              // no auxiliary buffer
786                 PFD_MAIN_PLANE,                 // main layer
787                 0,                              // reserved
788                 0, 0, 0                         // layer masks ignored
789         };
790         int pixelformat;
791         DWORD WindowStyle, ExWindowStyle;
792         HGLRC baseRC;
793         int CenterX, CenterY;
794         const char *gldrivername;
795         int depth;
796
797         if (vid_initialized)
798                 Sys_Error("VID_InitMode called when video is already initialised\n");
799
800         // if stencil is enabled, ask for alpha too
801         if (bpp >= 32)
802         {
803                 pfd.cStencilBits = 8;
804                 pfd.cAlphaBits = 8;
805         }
806         else
807         {
808                 pfd.cStencilBits = 0;
809                 pfd.cAlphaBits = 0;
810         }
811
812         gldrivername = "opengl32.dll";
813         i = COM_CheckParm("-gl_driver");
814         if (i && i < com_argc - 1)
815                 gldrivername = com_argv[i + 1];
816         if (!GL_OpenLibrary(gldrivername))
817         {
818                 Con_Printf("Unable to load GL driver %s\n", gldrivername);
819                 return false;
820         }
821
822         memset(&gdevmode, 0, sizeof(gdevmode));
823
824         vid_isfullscreen = false;
825         if (fullscreen)
826         {
827                 gdevmode.dmFields = DM_BITSPERPEL | DM_PELSWIDTH | DM_PELSHEIGHT;
828                 gdevmode.dmBitsPerPel = bpp;
829                 gdevmode.dmPelsWidth = width;
830                 gdevmode.dmPelsHeight = height;
831                 gdevmode.dmSize = sizeof (gdevmode);
832                 if (ChangeDisplaySettings (&gdevmode, CDS_FULLSCREEN) != DISP_CHANGE_SUCCESSFUL)
833                 {
834                         VID_Shutdown();
835                         Con_Printf("Unable to change to requested mode %dx%dx%dbpp\n", width, height, bpp);
836                         return false;
837                 }
838
839                 vid_isfullscreen = true;
840                 WindowStyle = WS_POPUP;
841                 ExWindowStyle = WS_EX_TOPMOST;
842         }
843         else
844         {
845                 hdc = GetDC (NULL);
846                 i = GetDeviceCaps(hdc, RASTERCAPS);
847                 depth = GetDeviceCaps(hdc, PLANES) * GetDeviceCaps(hdc, BITSPIXEL);
848                 ReleaseDC (NULL, hdc);
849                 if (i & RC_PALETTE)
850                 {
851                         VID_Shutdown();
852                         Con_Print("Can't run in non-RGB mode\n");
853                         return false;
854                 }
855                 if (bpp > depth)
856                 {
857                         VID_Shutdown();
858                         Con_Print("A higher desktop depth is required to run this video mode\n");
859                         return false;
860                 }
861
862                 WindowStyle = WS_OVERLAPPED | WS_BORDER | WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX;
863                 ExWindowStyle = 0;
864         }
865
866         rect.top = 0;
867         rect.left = 0;
868         rect.right = width;
869         rect.bottom = height;
870         AdjustWindowRectEx(&rect, WindowStyle, false, 0);
871
872         if (fullscreen)
873         {
874                 CenterX = 0;
875                 CenterY = 0;
876         }
877         else
878         {
879                 CenterX = (GetSystemMetrics(SM_CXSCREEN) - (rect.right - rect.left)) / 2;
880                 CenterY = (GetSystemMetrics(SM_CYSCREEN) - (rect.bottom - rect.top)) / 2;
881         }
882         CenterX = max(0, CenterX);
883         CenterY = max(0, CenterY);
884
885         // x and y may be changed by WM_MOVE messages
886         window_x = CenterX;
887         window_y = CenterY;
888         window_width = width;
889         window_height = height;
890         rect.left += CenterX;
891         rect.right += CenterX;
892         rect.top += CenterY;
893         rect.bottom += CenterY;
894
895         mainwindow = CreateWindowEx (ExWindowStyle, "DarkPlacesWindowClass", gamename, WindowStyle, rect.left, rect.top, rect.right - rect.left, rect.bottom - rect.top, NULL, NULL, global_hInstance, NULL);
896         if (!mainwindow)
897         {
898                 Con_Printf("CreateWindowEx(%d, %s, %s, %d, %d, %d, %d, %d, %p, %p, %d, %p) failed\n", ExWindowStyle, "DarkPlacesWindowClass", gamename, WindowStyle, rect.left, rect.top, rect.right - rect.left, rect.bottom - rect.top, NULL, NULL, global_hInstance, NULL);
899                 VID_Shutdown();
900                 return false;
901         }
902
903         /*
904         if (!fullscreen)
905                 SetWindowPos (mainwindow, NULL, CenterX, CenterY, 0, 0,SWP_NOSIZE | SWP_NOZORDER | SWP_SHOWWINDOW | SWP_DRAWFRAME);
906         */
907
908         ShowWindow (mainwindow, SW_SHOWDEFAULT);
909         UpdateWindow (mainwindow);
910
911         VID_UpdateWindowStatus ();
912
913         // now we try to make sure we get the focus on the mode switch, because
914         // sometimes in some systems we don't.  We grab the foreground, then
915         // finish setting up, pump all our messages, and sleep for a little while
916         // to let messages finish bouncing around the system, then we put
917         // ourselves at the top of the z order, then grab the foreground again,
918         // Who knows if it helps, but it probably doesn't hurt
919         SetForegroundWindow (mainwindow);
920
921         while (PeekMessage (&msg, NULL, 0, 0, PM_REMOVE))
922         {
923                 TranslateMessage (&msg);
924                 DispatchMessage (&msg);
925         }
926
927         Sleep (100);
928
929         SetWindowPos (mainwindow, HWND_TOP, 0, 0, 0, 0, SWP_DRAWFRAME | SWP_NOMOVE | SWP_NOSIZE | SWP_SHOWWINDOW | SWP_NOCOPYBITS);
930
931         SetForegroundWindow (mainwindow);
932
933         // fix the leftover Alt from any Alt-Tab or the like that switched us away
934         ClearAllStates ();
935
936         hdc = GetDC(mainwindow);
937
938         if ((pixelformat = ChoosePixelFormat(hdc, &pfd)) == 0)
939         {
940                 VID_Shutdown();
941                 Con_Printf("ChoosePixelFormat(%d, %p) failed\n", hdc, &pfd);
942                 return false;
943         }
944
945         if (SetPixelFormat(hdc, pixelformat, &pfd) == false)
946         {
947                 VID_Shutdown();
948                 Con_Printf("SetPixelFormat(%d, %d, %p) failed\n", hdc, pixelformat, &pfd);
949                 return false;
950         }
951
952         if (!GL_CheckExtension("wgl", wglfuncs, NULL, false))
953         {
954                 VID_Shutdown();
955                 Con_Print("wgl functions not found\n");
956                 return false;
957         }
958
959         baseRC = qwglCreateContext(hdc);
960         if (!baseRC)
961         {
962                 VID_Shutdown();
963                 Con_Print("Could not initialize GL (wglCreateContext failed).\n\nMake sure you are in 65536 color mode, and try running -window.\n");
964                 return false;
965         }
966         if (!qwglMakeCurrent(hdc, baseRC))
967         {
968                 VID_Shutdown();
969                 Con_Printf("wglMakeCurrent(%d, %d) failed\n", hdc, baseRC);
970                 return false;
971         }
972
973         qglGetString = GL_GetProcAddress("glGetString");
974         qwglGetExtensionsStringARB = GL_GetProcAddress("wglGetExtensionsStringARB");
975         if (qglGetString == NULL)
976         {
977                 VID_Shutdown();
978                 Con_Print("glGetString not found\n");
979                 return false;
980         }
981         gl_renderer = qglGetString(GL_RENDERER);
982         gl_vendor = qglGetString(GL_VENDOR);
983         gl_version = qglGetString(GL_VERSION);
984         gl_extensions = qglGetString(GL_EXTENSIONS);
985         gl_platform = "WGL";
986         gl_platformextensions = "";
987
988         if (qwglGetExtensionsStringARB)
989                 gl_platformextensions = qwglGetExtensionsStringARB(hdc);
990
991         gl_videosyncavailable = GL_CheckExtension("WGL_EXT_swap_control", wglswapintervalfuncs, NULL, false);
992         ReleaseDC(mainwindow, hdc);
993
994         GL_Init ();
995
996         // LordHavoc: special differences for ATI (broken 8bit color when also using 32bit? weird!)
997         if (strncasecmp(gl_vendor,"ATI",3)==0)
998         {
999                 if (strncasecmp(gl_renderer,"Rage Pro",8)==0)
1000                         isRagePro = true;
1001         }
1002         if (strncasecmp(gl_renderer,"Matrox G200 Direct3D",20)==0) // a D3D driver for GL? sigh...
1003                 isG200 = true;
1004
1005         //vid_menudrawfn = VID_MenuDraw;
1006         //vid_menukeyfn = VID_MenuKey;
1007         vid_hidden = false;
1008         vid_initialized = true;
1009
1010         IN_StartupMouse ();
1011         IN_StartupJoystick ();
1012
1013         return true;
1014 }
1015
1016 static void IN_Shutdown(void);
1017 void VID_Shutdown (void)
1018 {
1019         HGLRC hRC = 0;
1020         HDC hDC = 0;
1021
1022         if(vid_initialized == false)
1023                 return;
1024
1025         VID_RestoreSystemGamma();
1026
1027         vid_initialized = false;
1028         IN_Shutdown();
1029         if (qwglGetCurrentContext)
1030                 hRC = qwglGetCurrentContext();
1031         if (qwglGetCurrentDC)
1032                 hDC = qwglGetCurrentDC();
1033         if (qwglMakeCurrent)
1034                 qwglMakeCurrent(NULL, NULL);
1035         if (hRC && qwglDeleteContext)
1036                 qwglDeleteContext(hRC);
1037         // close the library before we get rid of the window
1038         GL_CloseLibrary();
1039         if (hDC && mainwindow)
1040                 ReleaseDC(mainwindow, hDC);
1041         AppActivate(false, false);
1042         if (mainwindow)
1043                 DestroyWindow(mainwindow);
1044         mainwindow = 0;
1045         if (vid_isfullscreen)
1046                 ChangeDisplaySettings (NULL, 0);
1047         vid_isfullscreen = false;
1048 }
1049
1050
1051 /*
1052 ===========
1053 IN_ShowMouse
1054 ===========
1055 */
1056 void IN_ShowMouse (void)
1057 {
1058         if (!mouseshowtoggle)
1059         {
1060                 ShowCursor (true);
1061                 mouseshowtoggle = 1;
1062         }
1063 }
1064
1065
1066 /*
1067 ===========
1068 IN_HideMouse
1069 ===========
1070 */
1071 void IN_HideMouse (void)
1072 {
1073         if (mouseshowtoggle)
1074         {
1075                 ShowCursor (false);
1076                 mouseshowtoggle = 0;
1077         }
1078 }
1079
1080
1081 /*
1082 ===========
1083 IN_ActivateMouse
1084 ===========
1085 */
1086 void IN_ActivateMouse (void)
1087 {
1088
1089         mouseactivatetoggle = true;
1090
1091         if (mouseinitialized)
1092         {
1093                 if (dinput)
1094                 {
1095                         if (g_pMouse)
1096                         {
1097                                 if (!dinput_acquired)
1098                                 {
1099                                         IDirectInputDevice_Acquire(g_pMouse);
1100                                         dinput_acquired = true;
1101                                 }
1102                         }
1103                         else
1104                         {
1105                                 return;
1106                         }
1107                 }
1108                 else
1109                 {
1110                         RECT window_rect;
1111                         window_rect.left = window_x;
1112                         window_rect.top = window_y;
1113                         window_rect.right = window_x + window_width;
1114                         window_rect.bottom = window_y + window_height;
1115
1116                         if (mouseparmsvalid)
1117                                 restore_spi = SystemParametersInfo (SPI_SETMOUSE, 0, newmouseparms, 0);
1118
1119                         SetCursorPos (window_center_x, window_center_y);
1120                         SetCapture (mainwindow);
1121                         ClipCursor (&window_rect);
1122                 }
1123
1124                 mouseactive = true;
1125         }
1126 }
1127
1128
1129 /*
1130 ===========
1131 IN_DeactivateMouse
1132 ===========
1133 */
1134 void IN_DeactivateMouse (void)
1135 {
1136
1137         mouseactivatetoggle = false;
1138
1139         if (mouseinitialized)
1140         {
1141                 if (dinput)
1142                 {
1143                         if (g_pMouse)
1144                         {
1145                                 if (dinput_acquired)
1146                                 {
1147                                         IDirectInputDevice_Unacquire(g_pMouse);
1148                                         dinput_acquired = false;
1149                                 }
1150                         }
1151                 }
1152                 else
1153                 {
1154                         if (restore_spi)
1155                                 SystemParametersInfo (SPI_SETMOUSE, 0, originalmouseparms, 0);
1156
1157                         ClipCursor (NULL);
1158                         ReleaseCapture ();
1159                 }
1160
1161                 mouseactive = false;
1162         }
1163 }
1164
1165
1166 /*
1167 ===========
1168 IN_InitDInput
1169 ===========
1170 */
1171 qboolean IN_InitDInput (void)
1172 {
1173     HRESULT             hr;
1174         DIPROPDWORD     dipdw = {
1175                 {
1176                         sizeof(DIPROPDWORD),        // diph.dwSize
1177                         sizeof(DIPROPHEADER),       // diph.dwHeaderSize
1178                         0,                          // diph.dwObj
1179                         DIPH_DEVICE,                // diph.dwHow
1180                 },
1181                 DINPUT_BUFFERSIZE,              // dwData
1182         };
1183
1184         if (!hInstDI)
1185         {
1186                 hInstDI = LoadLibrary("dinput.dll");
1187
1188                 if (hInstDI == NULL)
1189                 {
1190                         Con_SafePrint("Couldn't load dinput.dll\n");
1191                         return false;
1192                 }
1193         }
1194
1195         if (!pDirectInputCreate)
1196         {
1197                 pDirectInputCreate = (void *)GetProcAddress(hInstDI,"DirectInputCreateA");
1198
1199                 if (!pDirectInputCreate)
1200                 {
1201                         Con_SafePrint("Couldn't get DI proc addr\n");
1202                         return false;
1203                 }
1204         }
1205
1206 // register with DirectInput and get an IDirectInput to play with.
1207         hr = iDirectInputCreate(global_hInstance, DIRECTINPUT_VERSION, &g_pdi, NULL);
1208
1209         if (FAILED(hr))
1210         {
1211                 return false;
1212         }
1213
1214 // obtain an interface to the system mouse device.
1215         hr = IDirectInput_CreateDevice(g_pdi, &GUID_SysMouse, &g_pMouse, NULL);
1216
1217         if (FAILED(hr))
1218         {
1219                 Con_SafePrint("Couldn't open DI mouse device\n");
1220                 return false;
1221         }
1222
1223 // set the data format to "mouse format".
1224         hr = IDirectInputDevice_SetDataFormat(g_pMouse, &df);
1225
1226         if (FAILED(hr))
1227         {
1228                 Con_SafePrint("Couldn't set DI mouse format\n");
1229                 return false;
1230         }
1231
1232 // set the cooperativity level.
1233         hr = IDirectInputDevice_SetCooperativeLevel(g_pMouse, mainwindow,
1234                         DISCL_EXCLUSIVE | DISCL_FOREGROUND);
1235
1236         if (FAILED(hr))
1237         {
1238                 Con_SafePrint("Couldn't set DI coop level\n");
1239                 return false;
1240         }
1241
1242
1243 // set the buffer size to DINPUT_BUFFERSIZE elements.
1244 // the buffer size is a DWORD property associated with the device
1245         hr = IDirectInputDevice_SetProperty(g_pMouse, DIPROP_BUFFERSIZE, &dipdw.diph);
1246
1247         if (FAILED(hr))
1248         {
1249                 Con_SafePrint("Couldn't set DI buffersize\n");
1250                 return false;
1251         }
1252
1253         return true;
1254 }
1255
1256
1257 /*
1258 ===========
1259 IN_StartupMouse
1260 ===========
1261 */
1262 void IN_StartupMouse (void)
1263 {
1264         if (COM_CheckParm ("-nomouse") || COM_CheckParm("-safe"))
1265                 return;
1266
1267         mouseinitialized = true;
1268
1269         if (COM_CheckParm ("-dinput"))
1270         {
1271                 dinput = IN_InitDInput ();
1272
1273                 if (dinput)
1274                 {
1275                         Con_SafePrint("DirectInput initialized\n");
1276                 }
1277                 else
1278                 {
1279                         Con_SafePrint("DirectInput not initialized\n");
1280                 }
1281         }
1282
1283         if (!dinput)
1284         {
1285                 mouseparmsvalid = SystemParametersInfo (SPI_GETMOUSE, 0, originalmouseparms, 0);
1286
1287                 if (mouseparmsvalid)
1288                 {
1289                         if ( COM_CheckParm ("-noforcemspd") )
1290                                 newmouseparms[2] = originalmouseparms[2];
1291
1292                         if ( COM_CheckParm ("-noforcemaccel") )
1293                         {
1294                                 newmouseparms[0] = originalmouseparms[0];
1295                                 newmouseparms[1] = originalmouseparms[1];
1296                         }
1297
1298                         if ( COM_CheckParm ("-noforcemparms") )
1299                         {
1300                                 newmouseparms[0] = originalmouseparms[0];
1301                                 newmouseparms[1] = originalmouseparms[1];
1302                                 newmouseparms[2] = originalmouseparms[2];
1303                         }
1304                 }
1305         }
1306
1307         mouse_buttons = 10;
1308
1309 // if a fullscreen video mode was set before the mouse was initialized,
1310 // set the mouse state appropriately
1311         if (mouseactivatetoggle)
1312                 IN_ActivateMouse ();
1313 }
1314
1315
1316 /*
1317 ===========
1318 IN_MouseEvent
1319 ===========
1320 */
1321 void IN_MouseEvent (int mstate)
1322 {
1323         int     i;
1324
1325         if (mouseactive && !dinput)
1326         {
1327         // perform button actions
1328                 for (i=0 ; i<mouse_buttons ; i++)
1329                 {
1330                         if ( (mstate & (1<<i)) &&
1331                                 !(mouse_oldbuttonstate & (1<<i)) )
1332                         {
1333                                 Key_Event (K_MOUSE1 + i, 0, true);
1334                         }
1335
1336                         if ( !(mstate & (1<<i)) &&
1337                                 (mouse_oldbuttonstate & (1<<i)) )
1338                         {
1339                                 Key_Event (K_MOUSE1 + i, 0, false);
1340                         }
1341                 }
1342
1343                 mouse_oldbuttonstate = mstate;
1344         }
1345 }
1346
1347
1348 /*
1349 ===========
1350 IN_MouseMove
1351 ===========
1352 */
1353 void IN_MouseMove (usercmd_t *cmd)
1354 {
1355         int                                     i, mx, my;
1356         DIDEVICEOBJECTDATA      od;
1357         DWORD                           dwElements;
1358         HRESULT                         hr;
1359
1360         if (!mouseactive)
1361         {
1362                 GetCursorPos (&current_pos);
1363                 //ui_mouseupdate(current_pos.x - window_x, current_pos.y - window_y);
1364                 IN_Mouse( cmd, 0, 0 );
1365                 return;
1366         }
1367
1368         if (dinput)
1369         {
1370                 mx = 0;
1371                 my = 0;
1372
1373                 for (;;)
1374                 {
1375                         dwElements = 1;
1376
1377                         hr = IDirectInputDevice_GetDeviceData(g_pMouse,
1378                                         sizeof(DIDEVICEOBJECTDATA), &od, &dwElements, 0);
1379
1380                         if ((hr == DIERR_INPUTLOST) || (hr == DIERR_NOTACQUIRED))
1381                         {
1382                                 dinput_acquired = true;
1383                                 IDirectInputDevice_Acquire(g_pMouse);
1384                                 break;
1385                         }
1386
1387                         /* Unable to read data or no data available */
1388                         if (FAILED(hr) || dwElements == 0)
1389                                 break;
1390
1391                         /* Look at the element to see what happened */
1392
1393                         switch (od.dwOfs)
1394                         {
1395                                 case DIMOFS_X:
1396                                         mx += od.dwData;
1397                                         break;
1398
1399                                 case DIMOFS_Y:
1400                                         my += od.dwData;
1401                                         break;
1402
1403                                 case DIMOFS_BUTTON0:
1404                                         if (od.dwData & 0x80)
1405                                                 mstate_di |= 1;
1406                                         else
1407                                                 mstate_di &= ~1;
1408                                         break;
1409
1410                                 case DIMOFS_BUTTON1:
1411                                         if (od.dwData & 0x80)
1412                                                 mstate_di |= (1<<1);
1413                                         else
1414                                                 mstate_di &= ~(1<<1);
1415                                         break;
1416
1417                                 case DIMOFS_BUTTON2:
1418                                         if (od.dwData & 0x80)
1419                                                 mstate_di |= (1<<2);
1420                                         else
1421                                                 mstate_di &= ~(1<<2);
1422                                         break;
1423                         }
1424                 }
1425
1426         // perform button actions
1427                 for (i=0 ; i<mouse_buttons ; i++)
1428                 {
1429                         if ( (mstate_di & (1<<i)) &&
1430                                 !(mouse_oldbuttonstate & (1<<i)) )
1431                         {
1432                                 Key_Event (K_MOUSE1 + i, 0, true);
1433                         }
1434
1435                         if ( !(mstate_di & (1<<i)) &&
1436                                 (mouse_oldbuttonstate & (1<<i)) )
1437                         {
1438                                 Key_Event (K_MOUSE1 + i, 0, false);
1439                         }
1440                 }
1441
1442                 mouse_oldbuttonstate = mstate_di;
1443         }
1444         else
1445         {
1446                 GetCursorPos (&current_pos);
1447                 mx = current_pos.x - window_center_x + mx_accum;
1448                 my = current_pos.y - window_center_y + my_accum;
1449                 mx_accum = 0;
1450                 my_accum = 0;
1451         }
1452
1453         IN_Mouse(cmd, mx, my);
1454
1455         // if the mouse has moved, force it to the center, so there's room to move
1456         if (!dinput && (mx || my))
1457                 SetCursorPos (window_center_x, window_center_y);
1458 }
1459
1460
1461 /*
1462 ===========
1463 IN_Move
1464 ===========
1465 */
1466 void IN_Move (usercmd_t *cmd)
1467 {
1468         if (vid_activewindow && !vid_hidden)
1469         {
1470                 IN_MouseMove (cmd);
1471                 IN_JoyMove (cmd);
1472         }
1473 }
1474
1475
1476 /*
1477 ===========
1478 IN_Accumulate
1479 ===========
1480 */
1481 void IN_Accumulate (void)
1482 {
1483         if (mouseactive)
1484         {
1485                 if (!dinput)
1486                 {
1487                         GetCursorPos (&current_pos);
1488
1489                         mx_accum += current_pos.x - window_center_x;
1490                         my_accum += current_pos.y - window_center_y;
1491
1492                 // force the mouse to the center, so there's room to move
1493                         SetCursorPos (window_center_x, window_center_y);
1494                 }
1495         }
1496 }
1497
1498
1499 /*
1500 ===================
1501 IN_ClearStates
1502 ===================
1503 */
1504 void IN_ClearStates (void)
1505 {
1506         if (mouseactive)
1507         {
1508                 mx_accum = 0;
1509                 my_accum = 0;
1510                 mouse_oldbuttonstate = 0;
1511         }
1512 }
1513
1514
1515 /*
1516 ===============
1517 IN_StartupJoystick
1518 ===============
1519 */
1520 void IN_StartupJoystick (void)
1521 {
1522         int                     numdevs;
1523         JOYCAPS         jc;
1524         MMRESULT        mmr;
1525         mmr = 0;
1526
1527         // assume no joystick
1528         joy_avail = false;
1529
1530         // abort startup if user requests no joystick
1531         if (COM_CheckParm ("-nojoy") || COM_CheckParm("-safe"))
1532                 return;
1533
1534         // verify joystick driver is present
1535         if ((numdevs = joyGetNumDevs ()) == 0)
1536         {
1537                 Con_Print("\njoystick not found -- driver not present\n\n");
1538                 return;
1539         }
1540
1541         // cycle through the joystick ids for the first valid one
1542         for (joy_id=0 ; joy_id<numdevs ; joy_id++)
1543         {
1544                 memset (&ji, 0, sizeof(ji));
1545                 ji.dwSize = sizeof(ji);
1546                 ji.dwFlags = JOY_RETURNCENTERED;
1547
1548                 if ((mmr = joyGetPosEx (joy_id, &ji)) == JOYERR_NOERROR)
1549                         break;
1550         }
1551
1552         // abort startup if we didn't find a valid joystick
1553         if (mmr != JOYERR_NOERROR)
1554         {
1555                 Con_Printf("\njoystick not found -- no valid joysticks (%x)\n\n", mmr);
1556                 return;
1557         }
1558
1559         // get the capabilities of the selected joystick
1560         // abort startup if command fails
1561         memset (&jc, 0, sizeof(jc));
1562         if ((mmr = joyGetDevCaps (joy_id, &jc, sizeof(jc))) != JOYERR_NOERROR)
1563         {
1564                 Con_Printf("\njoystick not found -- invalid joystick capabilities (%x)\n\n", mmr);
1565                 return;
1566         }
1567
1568         // save the joystick's number of buttons and POV status
1569         joy_numbuttons = jc.wNumButtons;
1570         joy_haspov = jc.wCaps & JOYCAPS_HASPOV;
1571
1572         // old button and POV states default to no buttons pressed
1573         joy_oldbuttonstate = joy_oldpovstate = 0;
1574
1575         // mark the joystick as available and advanced initialization not completed
1576         // this is needed as cvars are not available during initialization
1577
1578         joy_avail = true;
1579         joy_advancedinit = false;
1580
1581         Con_Print("\njoystick detected\n\n");
1582 }
1583
1584
1585 /*
1586 ===========
1587 RawValuePointer
1588 ===========
1589 */
1590 PDWORD RawValuePointer (int axis)
1591 {
1592         switch (axis)
1593         {
1594         case JOY_AXIS_X:
1595                 return &ji.dwXpos;
1596         case JOY_AXIS_Y:
1597                 return &ji.dwYpos;
1598         case JOY_AXIS_Z:
1599                 return &ji.dwZpos;
1600         case JOY_AXIS_R:
1601                 return &ji.dwRpos;
1602         case JOY_AXIS_U:
1603                 return &ji.dwUpos;
1604         case JOY_AXIS_V:
1605                 return &ji.dwVpos;
1606         }
1607         return NULL; // LordHavoc: hush compiler warning
1608 }
1609
1610
1611 /*
1612 ===========
1613 Joy_AdvancedUpdate_f
1614 ===========
1615 */
1616 void Joy_AdvancedUpdate_f (void)
1617 {
1618
1619         // called once by IN_ReadJoystick and by user whenever an update is needed
1620         // cvars are now available
1621         int     i;
1622         DWORD dwTemp;
1623
1624         // initialize all the maps
1625         for (i = 0; i < JOY_MAX_AXES; i++)
1626         {
1627                 dwAxisMap[i] = AxisNada;
1628                 dwControlMap[i] = JOY_ABSOLUTE_AXIS;
1629                 pdwRawValue[i] = RawValuePointer(i);
1630         }
1631
1632         if( joy_advanced.integer == 0)
1633         {
1634                 // default joystick initialization
1635                 // 2 axes only with joystick control
1636                 dwAxisMap[JOY_AXIS_X] = AxisTurn;
1637                 // dwControlMap[JOY_AXIS_X] = JOY_ABSOLUTE_AXIS;
1638                 dwAxisMap[JOY_AXIS_Y] = AxisForward;
1639                 // dwControlMap[JOY_AXIS_Y] = JOY_ABSOLUTE_AXIS;
1640         }
1641         else
1642         {
1643                 if (strcmp (joy_name.string, "joystick") != 0)
1644                 {
1645                         // notify user of advanced controller
1646                         Con_Printf("\n%s configured\n\n", joy_name.string);
1647                 }
1648
1649                 // advanced initialization here
1650                 // data supplied by user via joy_axisn cvars
1651                 dwTemp = (DWORD) joy_advaxisx.value;
1652                 dwAxisMap[JOY_AXIS_X] = dwTemp & 0x0000000f;
1653                 dwControlMap[JOY_AXIS_X] = dwTemp & JOY_RELATIVE_AXIS;
1654                 dwTemp = (DWORD) joy_advaxisy.value;
1655                 dwAxisMap[JOY_AXIS_Y] = dwTemp & 0x0000000f;
1656                 dwControlMap[JOY_AXIS_Y] = dwTemp & JOY_RELATIVE_AXIS;
1657                 dwTemp = (DWORD) joy_advaxisz.value;
1658                 dwAxisMap[JOY_AXIS_Z] = dwTemp & 0x0000000f;
1659                 dwControlMap[JOY_AXIS_Z] = dwTemp & JOY_RELATIVE_AXIS;
1660                 dwTemp = (DWORD) joy_advaxisr.value;
1661                 dwAxisMap[JOY_AXIS_R] = dwTemp & 0x0000000f;
1662                 dwControlMap[JOY_AXIS_R] = dwTemp & JOY_RELATIVE_AXIS;
1663                 dwTemp = (DWORD) joy_advaxisu.value;
1664                 dwAxisMap[JOY_AXIS_U] = dwTemp & 0x0000000f;
1665                 dwControlMap[JOY_AXIS_U] = dwTemp & JOY_RELATIVE_AXIS;
1666                 dwTemp = (DWORD) joy_advaxisv.value;
1667                 dwAxisMap[JOY_AXIS_V] = dwTemp & 0x0000000f;
1668                 dwControlMap[JOY_AXIS_V] = dwTemp & JOY_RELATIVE_AXIS;
1669         }
1670
1671         // compute the axes to collect from DirectInput
1672         joy_flags = JOY_RETURNCENTERED | JOY_RETURNBUTTONS | JOY_RETURNPOV;
1673         for (i = 0; i < JOY_MAX_AXES; i++)
1674         {
1675                 if (dwAxisMap[i] != AxisNada)
1676                 {
1677                         joy_flags |= dwAxisFlags[i];
1678                 }
1679         }
1680 }
1681
1682 /*
1683 ===========
1684 IN_Commands
1685 ===========
1686 */
1687 void IN_Commands (void)
1688 {
1689         int             i, key_index;
1690         DWORD   buttonstate, povstate;
1691
1692         if (!joy_avail)
1693         {
1694                 return;
1695         }
1696
1697
1698         // loop through the joystick buttons
1699         // key a joystick event or auxillary event for higher number buttons for each state change
1700         buttonstate = ji.dwButtons;
1701         for (i=0 ; i < (int) joy_numbuttons ; i++)
1702         {
1703                 if ( (buttonstate & (1<<i)) && !(joy_oldbuttonstate & (1<<i)) )
1704                 {
1705                         key_index = (i < 16) ? K_JOY1 : K_AUX1;
1706                         Key_Event (key_index + i, 0, true);
1707                 }
1708
1709                 if ( !(buttonstate & (1<<i)) && (joy_oldbuttonstate & (1<<i)) )
1710                 {
1711                         key_index = (i < 16) ? K_JOY1 : K_AUX1;
1712                         Key_Event (key_index + i, 0, false);
1713                 }
1714         }
1715         joy_oldbuttonstate = buttonstate;
1716
1717         if (joy_haspov)
1718         {
1719                 // convert POV information into 4 bits of state information
1720                 // this avoids any potential problems related to moving from one
1721                 // direction to another without going through the center position
1722                 povstate = 0;
1723                 if(ji.dwPOV != JOY_POVCENTERED)
1724                 {
1725                         if (ji.dwPOV == JOY_POVFORWARD)
1726                                 povstate |= 0x01;
1727                         if (ji.dwPOV == JOY_POVRIGHT)
1728                                 povstate |= 0x02;
1729                         if (ji.dwPOV == JOY_POVBACKWARD)
1730                                 povstate |= 0x04;
1731                         if (ji.dwPOV == JOY_POVLEFT)
1732                                 povstate |= 0x08;
1733                 }
1734                 // determine which bits have changed and key an auxillary event for each change
1735                 for (i=0 ; i < 4 ; i++)
1736                 {
1737                         if ( (povstate & (1<<i)) && !(joy_oldpovstate & (1<<i)) )
1738                         {
1739                                 Key_Event (K_AUX29 + i, 0, true);
1740                         }
1741
1742                         if ( !(povstate & (1<<i)) && (joy_oldpovstate & (1<<i)) )
1743                         {
1744                                 Key_Event (K_AUX29 + i, 0, false);
1745                         }
1746                 }
1747                 joy_oldpovstate = povstate;
1748         }
1749 }
1750
1751
1752 /*
1753 ===============
1754 IN_ReadJoystick
1755 ===============
1756 */
1757 qboolean IN_ReadJoystick (void)
1758 {
1759
1760         memset (&ji, 0, sizeof(ji));
1761         ji.dwSize = sizeof(ji);
1762         ji.dwFlags = joy_flags;
1763
1764         if (joyGetPosEx (joy_id, &ji) == JOYERR_NOERROR)
1765         {
1766                 // this is a hack -- there is a bug in the Logitech WingMan Warrior DirectInput Driver
1767                 // rather than having 32768 be the zero point, they have the zero point at 32668
1768                 // go figure -- anyway, now we get the full resolution out of the device
1769                 if (joy_wwhack1.integer != 0.0)
1770                 {
1771                         ji.dwUpos += 100;
1772                 }
1773                 return true;
1774         }
1775         else
1776         {
1777                 // read error occurred
1778                 // turning off the joystick seems too harsh for 1 read error,
1779                 // but what should be done?
1780                 return false;
1781         }
1782 }
1783
1784
1785 /*
1786 ===========
1787 IN_JoyMove
1788 ===========
1789 */
1790 void IN_JoyMove (usercmd_t *cmd)
1791 {
1792         float   speed, aspeed;
1793         float   fAxisValue, fTemp;
1794         int             i, mouselook = (in_mlook.state & 1) || freelook.integer;
1795
1796         // complete initialization if first time in
1797         // this is needed as cvars are not available at initialization time
1798         if( joy_advancedinit != true )
1799         {
1800                 Joy_AdvancedUpdate_f();
1801                 joy_advancedinit = true;
1802         }
1803
1804         // verify joystick is available and that the user wants to use it
1805         if (!joy_avail || !in_joystick.integer)
1806         {
1807                 return;
1808         }
1809
1810         // collect the joystick data, if possible
1811         if (IN_ReadJoystick () != true)
1812         {
1813                 return;
1814         }
1815
1816         if (in_speed.state & 1)
1817                 speed = cl_movespeedkey.value;
1818         else
1819                 speed = 1;
1820         // LordHavoc: viewzoom affects sensitivity for sniping
1821         aspeed = speed * host_realframetime * cl.viewzoom;
1822
1823         // loop through the axes
1824         for (i = 0; i < JOY_MAX_AXES; i++)
1825         {
1826                 // get the floating point zero-centered, potentially-inverted data for the current axis
1827                 fAxisValue = (float) *pdwRawValue[i];
1828                 // move centerpoint to zero
1829                 fAxisValue -= 32768.0;
1830
1831                 if (joy_wwhack2.integer != 0.0)
1832                 {
1833                         if (dwAxisMap[i] == AxisTurn)
1834                         {
1835                                 // this is a special formula for the Logitech WingMan Warrior
1836                                 // y=ax^b; where a = 300 and b = 1.3
1837                                 // also x values are in increments of 800 (so this is factored out)
1838                                 // then bounds check result to level out excessively high spin rates
1839                                 fTemp = 300.0 * pow(abs(fAxisValue) / 800.0, 1.3);
1840                                 if (fTemp > 14000.0)
1841                                         fTemp = 14000.0;
1842                                 // restore direction information
1843                                 fAxisValue = (fAxisValue > 0.0) ? fTemp : -fTemp;
1844                         }
1845                 }
1846
1847                 // convert range from -32768..32767 to -1..1
1848                 fAxisValue /= 32768.0;
1849
1850                 switch (dwAxisMap[i])
1851                 {
1852                 case AxisForward:
1853                         if ((joy_advanced.integer == 0) && mouselook)
1854                         {
1855                                 // user wants forward control to become look control
1856                                 if (fabs(fAxisValue) > joy_pitchthreshold.value)
1857                                 {
1858                                         // if mouse invert is on, invert the joystick pitch value
1859                                         // only absolute control support here (joy_advanced is false)
1860                                         if (m_pitch.value < 0.0)
1861                                         {
1862                                                 cl.viewangles[PITCH] -= (fAxisValue * joy_pitchsensitivity.value) * aspeed * cl_pitchspeed.value;
1863                                         }
1864                                         else
1865                                         {
1866                                                 cl.viewangles[PITCH] += (fAxisValue * joy_pitchsensitivity.value) * aspeed * cl_pitchspeed.value;
1867                                         }
1868                                         V_StopPitchDrift();
1869                                 }
1870                                 else
1871                                 {
1872                                         // no pitch movement
1873                                         // disable pitch return-to-center unless requested by user
1874                                         // *** this code can be removed when the lookspring bug is fixed
1875                                         // *** the bug always has the lookspring feature on
1876                                         if(lookspring.value == 0.0)
1877                                                 V_StopPitchDrift();
1878                                 }
1879                         }
1880                         else
1881                         {
1882                                 // user wants forward control to be forward control
1883                                 if (fabs(fAxisValue) > joy_forwardthreshold.value)
1884                                 {
1885                                         cmd->forwardmove += (fAxisValue * joy_forwardsensitivity.value) * speed * cl_forwardspeed.value;
1886                                 }
1887                         }
1888                         break;
1889
1890                 case AxisSide:
1891                         if (fabs(fAxisValue) > joy_sidethreshold.value)
1892                         {
1893                                 cmd->sidemove += (fAxisValue * joy_sidesensitivity.value) * speed * cl_sidespeed.value;
1894                         }
1895                         break;
1896
1897                 case AxisTurn:
1898                         if ((in_strafe.state & 1) || (lookstrafe.integer && mouselook))
1899                         {
1900                                 // user wants turn control to become side control
1901                                 if (fabs(fAxisValue) > joy_sidethreshold.value)
1902                                 {
1903                                         cmd->sidemove -= (fAxisValue * joy_sidesensitivity.value) * speed * cl_sidespeed.value;
1904                                 }
1905                         }
1906                         else
1907                         {
1908                                 // user wants turn control to be turn control
1909                                 if (fabs(fAxisValue) > joy_yawthreshold.value)
1910                                 {
1911                                         if(dwControlMap[i] == JOY_ABSOLUTE_AXIS)
1912                                         {
1913                                                 cl.viewangles[YAW] += (fAxisValue * joy_yawsensitivity.value) * aspeed * cl_yawspeed.value;
1914                                         }
1915                                         else
1916                                         {
1917                                                 cl.viewangles[YAW] += (fAxisValue * joy_yawsensitivity.value) * speed * 180.0;
1918                                         }
1919
1920                                 }
1921                         }
1922                         break;
1923
1924                 case AxisLook:
1925                         if (mouselook)
1926                         {
1927                                 if (fabs(fAxisValue) > joy_pitchthreshold.value)
1928                                 {
1929                                         // pitch movement detected and pitch movement desired by user
1930                                         if(dwControlMap[i] == JOY_ABSOLUTE_AXIS)
1931                                         {
1932                                                 cl.viewangles[PITCH] += (fAxisValue * joy_pitchsensitivity.value) * aspeed * cl_pitchspeed.value;
1933                                         }
1934                                         else
1935                                         {
1936                                                 cl.viewangles[PITCH] += (fAxisValue * joy_pitchsensitivity.value) * speed * 180.0;
1937                                         }
1938                                         V_StopPitchDrift();
1939                                 }
1940                                 else
1941                                 {
1942                                         // no pitch movement
1943                                         // disable pitch return-to-center unless requested by user
1944                                         // *** this code can be removed when the lookspring bug is fixed
1945                                         // *** the bug always has the lookspring feature on
1946                                         if(lookspring.integer == 0)
1947                                                 V_StopPitchDrift();
1948                                 }
1949                         }
1950                         break;
1951
1952                 default:
1953                         break;
1954                 }
1955         }
1956 }
1957
1958 static void IN_Init(void)
1959 {
1960         uiWheelMessage = RegisterWindowMessage ( "MSWHEEL_ROLLMSG" );
1961
1962         // joystick variables
1963         Cvar_RegisterVariable (&in_joystick);
1964         Cvar_RegisterVariable (&joy_name);
1965         Cvar_RegisterVariable (&joy_advanced);
1966         Cvar_RegisterVariable (&joy_advaxisx);
1967         Cvar_RegisterVariable (&joy_advaxisy);
1968         Cvar_RegisterVariable (&joy_advaxisz);
1969         Cvar_RegisterVariable (&joy_advaxisr);
1970         Cvar_RegisterVariable (&joy_advaxisu);
1971         Cvar_RegisterVariable (&joy_advaxisv);
1972         Cvar_RegisterVariable (&joy_forwardthreshold);
1973         Cvar_RegisterVariable (&joy_sidethreshold);
1974         Cvar_RegisterVariable (&joy_pitchthreshold);
1975         Cvar_RegisterVariable (&joy_yawthreshold);
1976         Cvar_RegisterVariable (&joy_forwardsensitivity);
1977         Cvar_RegisterVariable (&joy_sidesensitivity);
1978         Cvar_RegisterVariable (&joy_pitchsensitivity);
1979         Cvar_RegisterVariable (&joy_yawsensitivity);
1980         Cvar_RegisterVariable (&joy_wwhack1);
1981         Cvar_RegisterVariable (&joy_wwhack2);
1982         Cmd_AddCommand ("joyadvancedupdate", Joy_AdvancedUpdate_f);
1983 }
1984
1985 static void IN_Shutdown(void)
1986 {
1987         IN_DeactivateMouse ();
1988         IN_ShowMouse ();
1989
1990         if (g_pMouse)
1991                 IDirectInputDevice_Release(g_pMouse);
1992         g_pMouse = NULL;
1993
1994         if (g_pdi)
1995                 IDirectInput_Release(g_pdi);
1996         g_pdi = NULL;
1997 }