fix a couple of defines
[btb/d2x.git] / arch / win32 / mouse.c
1 /* $Id: mouse.c,v 1.3 2004-05-20 19:02:58 btb Exp $ */
2 /*
3 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
4 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
5 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
6 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
7 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
8 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
9 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
10 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
11 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
12 COPYRIGHT 1993-1998 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
13 */
14 /*
15  *
16  * Functions to access Mouse and Cyberman...
17  *
18  * Old Log:
19  * Revision 1.8  1996/02/21  13:57:36  allender
20  * cursor device manager stuff added here so as not to
21  * rely on InterfaceLib anymore
22  *
23  * Revision 1.7  1995/10/17  15:42:21  allender
24  * new mouse function to determine single button press
25  *
26  * Revision 1.6  1995/10/03  11:27:31  allender
27  * fixed up hotspot problems with the mouse on multiple monitors
28  *
29  * Revision 1.5  1995/07/13  11:27:08  allender
30  * trap button checks at MAX_MOUSE_BUTTONS
31  *
32  * Revision 1.4  1995/06/25  21:56:53  allender
33  * added events include
34  *
35  * Revision 1.3  1995/05/11  17:06:38  allender
36  * fixed up mouse routines
37  *
38  * Revision 1.2  1995/05/11  13:05:53  allender
39  * of mouse handler code
40  *
41  * Revision 1.1  1995/05/05  09:54:45  allender
42  * Initial revision
43  *
44  * Revision 1.9  1995/01/14  19:19:52  john
45  * Fixed signed short error cmp with -1 that caused mouse
46  * to break under Watcom 10.0
47  *
48  * Revision 1.8  1994/12/27  12:38:23  john
49  * Made mouse use temporary dos buffer instead of
50  *
51  * allocating its own.
52  *
53  * Revision 1.7  1994/12/05  23:54:53  john
54  * Fixed bug with mouse_get_delta only returning positive numbers..
55  *
56  * Revision 1.6  1994/11/18  23:18:18  john
57  * Changed some shorts to ints.
58  *
59  * Revision 1.5  1994/09/13  12:34:02  john
60  * Added functions to get down count and state.
61  *
62  * Revision 1.4  1994/08/29  20:52:19  john
63  * Added better cyberman support; also, joystick calibration
64  * value return funcctiionn,
65  *
66  * Revision 1.3  1994/08/24  18:54:32  john
67  * *** empty log message ***
68  *
69  * Revision 1.2  1994/08/24  18:53:46  john
70  * Made Cyberman read like normal mouse; added dpmi module; moved
71  * mouse from assembly to c. Made mouse buttons return time_down.
72  *
73  * Revision 1.1  1994/08/24  13:56:37  john
74  * Initial revision
75  *
76  *
77  */
78
79 #define WIN32_LEAN_AND_MEAN
80 #include <dinput.h>
81
82
83 #include <stdlib.h>
84 #include <stdio.h>
85 #include <string.h>
86
87 #include "error.h"
88 #include "fix.h"
89 #include "mouse.h"
90 #include "mono.h"
91 #include "timer.h"
92 #include "args.h"
93
94 // These are to kludge up a bit my slightly broken GCC directx port.
95 #ifndef E_FAIL
96 #define E_FAIL (HRESULT)0x80004005L
97 #endif
98 #ifndef SUCCEEDED
99 #define SUCCEEDED(a) ((HRESULT)(a) >= 0)
100 #endif
101 #ifndef S_OK
102 #define S_OK 0
103 #define S_FALSE 1
104 #endif
105 #ifndef SEVERITY_SUCCESS
106 #define SEVERITY_SUCCESS    0
107 #define SEVERITY_ERROR      1
108 #endif
109 #ifndef FACILITY_WIN32
110 #define FACILITY_WIN32                   7
111 #endif
112 #ifndef FIELD_OFFSET
113 #define FIELD_OFFSET(type, field)    ((LONG)&(((type *)0)->field))
114 #endif
115
116 #define ME_CURSOR_MOVED (1<<0)
117 #define ME_LB_P                 (1<<1)
118 #define ME_LB_R                 (1<<2)
119 #define ME_RB_P                 (1<<3)
120 #define ME_RB_R                 (1<<4)
121 #define ME_MB_P                 (1<<5)
122 #define ME_MB_R                 (1<<6)
123 #define ME_OB_P                 (1<<7)
124 #define ME_OB_R                 (1<<8)
125 #define ME_X_C                  (1<<9)
126 #define ME_Y_C                  (1<<10)
127 #define ME_Z_C                  (1<<11)
128 #define ME_P_C                  (1<<12)
129 #define ME_B_C                  (1<<13)
130 #define ME_H_C                  (1<<14)
131 #define ME_O_C                  (1<<15)
132
133 typedef struct event_info {
134         short x;
135         short y;
136         short z;
137         short pitch;
138         short bank;
139         short heading;
140         ushort button_status;
141         ushort device_dependant;
142 } event_info;
143
144 typedef struct mouse_info {
145         fix             ctime;
146         ubyte   cyberman;
147         int             num_buttons;
148         ubyte   pressed[MOUSE_MAX_BUTTONS];
149         fix             time_went_down[MOUSE_MAX_BUTTONS];
150         fix             time_held_down[MOUSE_MAX_BUTTONS];
151         uint    num_downs[MOUSE_MAX_BUTTONS];
152         uint    num_ups[MOUSE_MAX_BUTTONS];
153         //      ubyte   went_down; /* Not in PC version, not needed with 'num_downs' etc */
154         event_info *x_info;
155         ushort  button_status;
156 } mouse_info;
157
158 typedef struct cyberman_info {
159         ubyte device_type;
160         ubyte major_version;
161         ubyte minor_version;
162         ubyte x_descriptor;
163         ubyte y_descriptor;
164         ubyte z_descriptor;
165         ubyte pitch_descriptor;
166         ubyte roll_descriptor;
167         ubyte yaw_descriptor;
168         ubyte reserved;
169 } cyberman_info;
170
171 static mouse_info Mouse;
172
173 static int Mouse_installed = 0;
174
175 int WMMouse_Handler_Ready = 0;
176 int mouse_wparam, mouse_lparam, mouse_msg;
177
178
179 //GGI data:
180 //extern  ggi_visual_t          visual;
181 //extern  ggi_directbuffer_t            dbuf;   // GGI direct acces to screen memory
182 //extern  ggi_pixellinearbuffer *plb;
183
184 //Mouse globals
185 static double mouse_x, mouse_y;
186 static double mouse_saved_x, mouse_saved_y; //used when hiding/unhiding to reset the real (displayed) postion
187 double mouse_accel=1.0;
188
189 void DrawMouse(void);
190 void EraseMouse(void);
191 void MoveMouse(/*int button,*/ int x, int y);
192
193 #define WIN_WIDTH 640
194 #define WIN_HEIGHT 480
195 #define SCR_WIDTH 640
196 #define SCR_HEIGHT 480
197
198 LPDIRECTINPUT g_lpdi = NULL;
199 LPDIRECTINPUTDEVICE g_lpdidMouse = NULL;
200 extern HWND g_hWnd;
201
202
203 HRESULT ReadMouse (DIDEVICEOBJECTDATA *pdidod)
204 {
205         DWORD cElements = 1;
206         HRESULT hr;
207
208         if (g_lpdidMouse == NULL)
209                 return E_FAIL;
210
211         hr = IDirectInputDevice_GetDeviceData (
212                 g_lpdidMouse,
213                 sizeof (*pdidod),
214                 pdidod,
215                 &cElements,
216                 0);
217
218         if (hr == DIERR_INPUTLOST)
219         {
220                 hr = IDirectInputDevice_Acquire (g_lpdidMouse);
221                 if (SUCCEEDED (hr))
222                 {
223                         hr = IDirectInputDevice_GetDeviceData (
224                                 g_lpdidMouse,
225                                 sizeof (*pdidod),
226                                 pdidod,
227                                 &cElements,
228                                 0);
229                 }
230         }
231
232         if (SUCCEEDED (hr) && cElements != 1)
233                 hr = E_FAIL;
234
235         return hr;
236 }
237
238
239 void UpdateMouseState (DIDEVICEOBJECTDATA *pdidod)
240 {
241 //        fix timeNow = timer_get_fixed_seconds ();
242
243         ULONG iEvt = pdidod->dwOfs;
244         switch (iEvt)
245         {
246                 case DIMOFS_BUTTON0:
247                 case DIMOFS_BUTTON1:
248                 case DIMOFS_BUTTON2:
249                 case DIMOFS_BUTTON3:
250                 {
251                         BOOL bPressed = pdidod->dwData & 0x80;
252                         ULONG iButton = (iEvt - DIMOFS_BUTTON0) + MB_LEFT;
253                         if (bPressed)
254                         {
255                                 if (!Mouse.pressed [iButton])
256                                 {
257                                         Mouse.pressed [iButton] = 1;
258                                         Mouse.time_went_down [iButton] = Mouse.ctime;
259                                         Mouse.num_downs [iButton]++;
260                                         //                      Mouse.went_down = 1;
261                                 }
262                                 Mouse.num_downs [iButton] ++;
263                         }
264                         else
265                         {
266                                 if (Mouse.pressed [iButton])
267                                 {
268                                         Mouse.pressed [iButton] = 0;
269                                         Mouse.time_held_down [iButton] += Mouse.ctime - Mouse.time_went_down [iButton];
270                                         Mouse.num_ups [iButton]++;
271                                         //                      Mouse.went_down = 0;
272                                 }
273                         }
274                         break;
275                 }
276                 case DIMOFS_X:
277                         mouse_x += (double) ((LONG) pdidod->dwData);
278                         break;
279
280                 case DIMOFS_Y:
281                         mouse_y += (double) ((LONG) pdidod->dwData);
282                         break;
283                 case DIMOFS_Z:
284                         break;//hm, handle this?
285                 default:
286                         mprintf((0,"unknown mouse event %i\n",iEvt));
287 //                      exit (iEvt);//not happy.
288                         break;
289         }
290 }
291
292 void mouse_handler()
293 {
294         DIDEVICEOBJECTDATA didod;
295
296         Mouse.ctime = timer_get_fixed_seconds();
297
298         while (SUCCEEDED (ReadMouse (&didod)))
299         {
300                 UpdateMouseState (&didod);
301         }
302 }
303
304 void mouse_flush()
305 {
306         int i;
307         fix CurTime;
308         
309         if (!Mouse_installed)
310                 return;
311
312         mouse_handler();
313         //      _disable();
314         CurTime = timer_get_fixed_seconds();
315         for (i = 0; i < MOUSE_MAX_BUTTONS; i++) {
316                 Mouse.pressed[i] = 0;
317                 Mouse.time_went_down[i] = CurTime;
318                 Mouse.time_held_down[i] = 0;
319                 Mouse.num_downs[i] = 0;
320                 Mouse.num_ups[i] = 0;
321         }
322         //      Mouse.went_down = 0; /* mac only */
323         //      _enable();
324
325         {
326                 DWORD cElements = INFINITE;
327 //                HRESULT hr =
328                 IDirectInputDevice_GetDeviceData (
329                         g_lpdidMouse,
330                         sizeof (DIDEVICEOBJECTDATA),
331                         NULL,
332                         &cElements,
333                         0);
334         }
335 }
336
337
338 void mouse_close(void)
339 {
340         //      if (Mouse_installed)   // DPH: Unnecessary...
341         WMMouse_Handler_Ready=Mouse_installed = 0;
342
343         if (g_lpdidMouse != NULL)
344         {
345                 IDirectInputDevice_Unacquire (g_lpdidMouse);
346                 IDirectInputDevice_Release (g_lpdidMouse);
347                 g_lpdidMouse = NULL;
348         }
349         if (g_lpdi != NULL)
350         {
351                 IDirectInput_Release (g_lpdi);
352                 g_lpdi = NULL;
353         }
354 }
355
356
357
358 int mouse_init(int unused)
359 {
360         if (FindArg("-nomouse"))
361                 return 0;
362         if (Mouse_installed)
363                 return Mouse.num_buttons;
364         
365         {
366                 HRESULT hr;
367
368                 if (SUCCEEDED (hr = DirectInputCreate (GetModuleHandle (NULL), DIRECTINPUT_VERSION, &g_lpdi, NULL)))
369                 {
370                         if (SUCCEEDED (hr = IDirectInput_CreateDevice (g_lpdi,(void *) &GUID_SysMouse, &g_lpdidMouse, NULL)))
371                         {
372                                 DIPROPDWORD dipdw;
373                                 dipdw.diph.dwSize = sizeof (DIPROPDWORD);
374                                 dipdw.diph.dwHeaderSize = sizeof (DIPROPHEADER);
375                                 dipdw.diph.dwObj = 0;
376                                 dipdw.diph.dwHow = DIPH_DEVICE;
377                                 dipdw.dwData = 40;
378
379                                 if (SUCCEEDED (hr = IDirectInputDevice_SetDataFormat (g_lpdidMouse, &c_dfDIMouse)) &&
380                                         //changed on 9/4/99 by Victor Rachels NONEX -> Exclusive
381                                         SUCCEEDED (hr = IDirectInputDevice_SetCooperativeLevel (g_lpdidMouse, g_hWnd, DISCL_EXCLUSIVE | DISCL_FOREGROUND)) &&
382                                         //end this section edit -VR
383                                         SUCCEEDED (hr = IDirectInputDevice_SetProperty (g_lpdidMouse, DIPROP_BUFFERSIZE, &dipdw.diph)) &&
384                                         SUCCEEDED (hr = IDirectInputDevice_Acquire (g_lpdidMouse)))
385                                 {
386                                 }
387                                 else
388                                 {
389                                         IDirectInputDevice_Release (g_lpdidMouse);
390                                         g_lpdidMouse = NULL;
391                                         return 0;
392                                 }
393                         }
394                 }
395         }
396         Mouse.num_buttons = 3;
397         
398         WMMouse_Handler_Ready=Mouse_installed = 1;
399         atexit(mouse_close);
400         mouse_flush();
401         //      mouse_set_center();
402         
403         return Mouse.num_buttons;
404 }
405
406 //WHS: added this
407 void mouse_center() {
408         mouse_x=mouse_saved_x=WIN_WIDTH/2;
409         mouse_y=mouse_saved_y=WIN_HEIGHT/2;
410 }
411
412 void mouse_get_pos( int *x, int *y)
413 {
414         mouse_handler(); //temp
415         
416         *x=(int) mouse_x;
417         *y=(int) mouse_y;
418 }
419
420 void mouse_get_delta( int *dx, int *dy )
421 {
422         if (!Mouse_installed) {
423                 *dx = *dy = 0;
424                 return;
425         }
426         mouse_handler(); //temp
427         
428         *dx = (int) mouse_x - WIN_WIDTH/2;
429         *dy = (int) mouse_y - WIN_HEIGHT/2;
430         
431         //Now reset the mouse position to the center of the screen
432         mouse_x = (double) WIN_WIDTH/2;
433         mouse_y = (double) WIN_HEIGHT/2;
434 }
435
436 void mouse_get_delta_no_reset( int *dx, int *dy )
437 {
438         if (!Mouse_installed) {
439                 *dx = *dy = 0;
440                 return;
441         }
442         mouse_handler(); //temp
443         
444         *dx = (int) mouse_x - WIN_WIDTH/2;
445         *dy = (int) mouse_y - WIN_HEIGHT/2;
446 }
447
448 int mouse_get_btns()
449 {
450         int  i;
451         uint flag=1;
452         int  status = 0;
453         
454         if (!Mouse_installed)
455                 return 0;
456
457         mouse_handler(); //temp
458         
459         for (i = 0; i < MOUSE_MAX_BUTTONS; i++) {
460                 if (Mouse.pressed[i])
461                         status |= flag;
462                 flag <<= 1;
463         }
464         return status;
465 }
466
467 /* This should be replaced with mouse_button_down_count(int button)     */
468 int mouse_went_down(int button)
469 {
470         int count;
471         
472         if (!Mouse_installed)
473                 return 0;
474
475         mouse_handler(); //temp
476         
477         if ((button < 0) || (button >= MOUSE_MAX_BUTTONS))
478                 return 0;
479         
480         //      _disable();             
481         count = Mouse.num_downs[button];
482         Mouse.num_downs[button] = 0;
483         
484         //      _enable();
485         return count;
486 }
487
488 // Returns how many times this button has went down since last call.
489 int mouse_button_down_count(int button) 
490 {
491         int count;
492         
493         if (!Mouse_installed)
494                 return 0;
495         
496         mouse_handler(); //temp
497         
498         if ((button < 0) || (button >= MOUSE_MAX_BUTTONS))
499                 return 0;
500         
501         //      _disable();
502         count = Mouse.num_downs[button];
503         Mouse.num_downs[button] = 0;
504         //      _enable();
505         return count;
506 }
507
508 // Returns 1 if this button is currently down
509 int mouse_button_state(int button)
510 {
511         int state;
512         
513         if (!Mouse_installed)
514                 return 0;
515         
516         mouse_handler(); //temp
517         
518         if ((button < 0) || (button >= MOUSE_MAX_BUTTONS))
519                 return 0;
520         
521         //      _disable();
522         state = Mouse.pressed[button];
523         //      _enable();
524         return state;
525 }
526
527 // Returns how long this button has been down since last call.
528 fix mouse_button_down_time(int button)  
529 {
530         fix time_down, time;
531         
532         if (!Mouse_installed)
533                 return 0;
534
535         mouse_handler(); //temp
536         
537         if ((button < 0) || (button >= MOUSE_MAX_BUTTONS))
538                 return 0;
539         
540         //      _disable();
541         if (!Mouse.pressed[button]) {
542                 time_down = Mouse.time_held_down[button];
543                 Mouse.time_held_down[button] = 0;
544         } else {
545                 time = timer_get_fixed_seconds();
546                 time_down = time - Mouse.time_held_down[button];
547                 Mouse.time_held_down[button] = 0;
548         }
549         //      _enable();
550         
551         return time_down;
552 }
553
554 void mouse_get_cyberman_pos( int *x, int *y )
555 {
556 }
557
558
559
560 //WHS: I made this :)
561 void hide_cursor()
562 {
563         ShowCursor(FALSE);
564 }
565
566 void show_cursor()
567 {
568         ShowCursor(TRUE);
569 }
570
571
572 /* New mouse pointer stuff for GGI/DGA */
573 //#include "cursor.h" /* cursor and mask */
574
575 typedef struct Sprite {
576         ushort width;
577         ushort height;
578         byte *pixels;
579         byte *mask;
580 } Sprite;
581
582 //Sprite mouse_sprite = { cursor_width, cursor_height, cursor_bits, cursor_mask_bits};
583
584 //byte *behind_mouse;
585 //byte behind_mouse[cursor_width*cursor_height];
586
587
588 void DrawMouse(void)
589 {
590 }
591
592
593 void EraseMouse(void)
594 {
595 }
596
597 //Should add a mode, relative, absolute
598 #define MOVE_REL 0
599 #define MOVE_ABS 1
600 //void MoveMouse(int mode, int x, int y) {
601
602 void MoveMouse(int x, int y)
603 {
604 }