mmdevapi/tests: Add tests for volume control interfaces.
[wine] / dlls / winex11.drv / mouse.c
1 /*
2  * X11 mouse driver
3  *
4  * Copyright 1998 Ulrich Weigand
5  * Copyright 2007 Henri Verbeet
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #include "config.h"
23 #include "wine/port.h"
24
25 #include <X11/Xlib.h>
26 #include <X11/cursorfont.h>
27 #include <stdarg.h>
28 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
29 #include <X11/extensions/XInput2.h>
30 #endif
31
32 #ifdef SONAME_LIBXCURSOR
33 # include <X11/Xcursor/Xcursor.h>
34 static void *xcursor_handle;
35 # define MAKE_FUNCPTR(f) static typeof(f) * p##f
36 MAKE_FUNCPTR(XcursorImageCreate);
37 MAKE_FUNCPTR(XcursorImageDestroy);
38 MAKE_FUNCPTR(XcursorImageLoadCursor);
39 MAKE_FUNCPTR(XcursorImagesCreate);
40 MAKE_FUNCPTR(XcursorImagesDestroy);
41 MAKE_FUNCPTR(XcursorImagesLoadCursor);
42 MAKE_FUNCPTR(XcursorLibraryLoadCursor);
43 # undef MAKE_FUNCPTR
44 #endif /* SONAME_LIBXCURSOR */
45
46 #define NONAMELESSUNION
47 #define NONAMELESSSTRUCT
48 #define OEMRESOURCE
49 #include "windef.h"
50 #include "winbase.h"
51 #include "winreg.h"
52
53 #include "x11drv.h"
54 #include "wine/server.h"
55 #include "wine/library.h"
56 #include "wine/unicode.h"
57 #include "wine/debug.h"
58
59 WINE_DEFAULT_DEBUG_CHANNEL(cursor);
60
61 /**********************************************************************/
62
63 #ifndef Button6Mask
64 #define Button6Mask (1<<13)
65 #endif
66 #ifndef Button7Mask
67 #define Button7Mask (1<<14)
68 #endif
69
70 #define NB_BUTTONS   9     /* Windows can handle 5 buttons and the wheel too */
71
72 static const UINT button_down_flags[NB_BUTTONS] =
73 {
74     MOUSEEVENTF_LEFTDOWN,
75     MOUSEEVENTF_MIDDLEDOWN,
76     MOUSEEVENTF_RIGHTDOWN,
77     MOUSEEVENTF_WHEEL,
78     MOUSEEVENTF_WHEEL,
79     MOUSEEVENTF_XDOWN,  /* FIXME: horizontal wheel */
80     MOUSEEVENTF_XDOWN,
81     MOUSEEVENTF_XDOWN,
82     MOUSEEVENTF_XDOWN
83 };
84
85 static const UINT button_up_flags[NB_BUTTONS] =
86 {
87     MOUSEEVENTF_LEFTUP,
88     MOUSEEVENTF_MIDDLEUP,
89     MOUSEEVENTF_RIGHTUP,
90     0,
91     0,
92     MOUSEEVENTF_XUP,
93     MOUSEEVENTF_XUP,
94     MOUSEEVENTF_XUP,
95     MOUSEEVENTF_XUP
96 };
97
98 static const UINT button_down_data[NB_BUTTONS] =
99 {
100     0,
101     0,
102     0,
103     WHEEL_DELTA,
104     -WHEEL_DELTA,
105     XBUTTON1,
106     XBUTTON2,
107     XBUTTON1,
108     XBUTTON2
109 };
110
111 static const UINT button_up_data[NB_BUTTONS] =
112 {
113     0,
114     0,
115     0,
116     0,
117     0,
118     XBUTTON1,
119     XBUTTON2,
120     XBUTTON1,
121     XBUTTON2
122 };
123
124 static HWND cursor_window;
125 static HCURSOR last_cursor;
126 static DWORD last_cursor_change;
127 static XContext cursor_context;
128 static RECT clip_rect;
129 static Cursor create_cursor( HANDLE handle );
130
131 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
132 static BOOL xinput2_available;
133 static int xinput2_core_pointer;
134 #define MAKE_FUNCPTR(f) static typeof(f) * p##f
135 MAKE_FUNCPTR(XIFreeDeviceInfo);
136 MAKE_FUNCPTR(XIQueryDevice);
137 MAKE_FUNCPTR(XIQueryVersion);
138 MAKE_FUNCPTR(XISelectEvents);
139 #undef MAKE_FUNCPTR
140 #endif
141
142 /***********************************************************************
143  *              X11DRV_Xcursor_Init
144  *
145  * Load the Xcursor library for use.
146  */
147 void X11DRV_Xcursor_Init(void)
148 {
149 #ifdef SONAME_LIBXCURSOR
150     xcursor_handle = wine_dlopen(SONAME_LIBXCURSOR, RTLD_NOW, NULL, 0);
151     if (!xcursor_handle)  /* wine_dlopen failed. */
152     {
153         WARN("Xcursor failed to load.  Using fallback code.\n");
154         return;
155     }
156 #define LOAD_FUNCPTR(f) \
157         p##f = wine_dlsym(xcursor_handle, #f, NULL, 0)
158
159     LOAD_FUNCPTR(XcursorImageCreate);
160     LOAD_FUNCPTR(XcursorImageDestroy);
161     LOAD_FUNCPTR(XcursorImageLoadCursor);
162     LOAD_FUNCPTR(XcursorImagesCreate);
163     LOAD_FUNCPTR(XcursorImagesDestroy);
164     LOAD_FUNCPTR(XcursorImagesLoadCursor);
165     LOAD_FUNCPTR(XcursorLibraryLoadCursor);
166 #undef LOAD_FUNCPTR
167 #endif /* SONAME_LIBXCURSOR */
168 }
169
170
171 /***********************************************************************
172  *              get_empty_cursor
173  */
174 static Cursor get_empty_cursor(void)
175 {
176     static Cursor cursor;
177     static const char data[] = { 0 };
178
179     wine_tsx11_lock();
180     if (!cursor)
181     {
182         XColor bg;
183         Pixmap pixmap;
184
185         bg.red = bg.green = bg.blue = 0x0000;
186         pixmap = XCreateBitmapFromData( gdi_display, root_window, data, 1, 1 );
187         if (pixmap)
188         {
189             cursor = XCreatePixmapCursor( gdi_display, pixmap, pixmap, &bg, &bg, 0, 0 );
190             XFreePixmap( gdi_display, pixmap );
191         }
192     }
193     wine_tsx11_unlock();
194     return cursor;
195 }
196
197 /***********************************************************************
198  *              set_window_cursor
199  */
200 void set_window_cursor( Window window, HCURSOR handle )
201 {
202     Cursor cursor, prev;
203
204     wine_tsx11_lock();
205     if (!handle) cursor = get_empty_cursor();
206     else if (!cursor_context || XFindContext( gdi_display, (XID)handle, cursor_context, (char **)&cursor ))
207     {
208         /* try to create it */
209         wine_tsx11_unlock();
210         if (!(cursor = create_cursor( handle ))) return;
211
212         wine_tsx11_lock();
213         if (!cursor_context) cursor_context = XUniqueContext();
214         if (!XFindContext( gdi_display, (XID)handle, cursor_context, (char **)&prev ))
215         {
216             /* someone else was here first */
217             XFreeCursor( gdi_display, cursor );
218             cursor = prev;
219         }
220         else
221         {
222             XSaveContext( gdi_display, (XID)handle, cursor_context, (char *)cursor );
223             TRACE( "cursor %p created %lx\n", handle, cursor );
224         }
225     }
226
227     XDefineCursor( gdi_display, window, cursor );
228     /* make the change take effect immediately */
229     XFlush( gdi_display );
230     wine_tsx11_unlock();
231 }
232
233 /***********************************************************************
234  *              sync_window_cursor
235  */
236 void sync_window_cursor( Window window )
237 {
238     HCURSOR cursor;
239
240     SERVER_START_REQ( set_cursor )
241     {
242         req->flags = 0;
243         wine_server_call( req );
244         cursor = reply->prev_count >= 0 ? wine_server_ptr_handle( reply->prev_handle ) : 0;
245     }
246     SERVER_END_REQ;
247
248     set_window_cursor( window, cursor );
249 }
250
251 /***********************************************************************
252  *              enable_xinput2
253  */
254 static void enable_xinput2(void)
255 {
256 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
257     struct x11drv_thread_data *data = x11drv_thread_data();
258     XIDeviceInfo *devices;
259     XIEventMask mask;
260     unsigned char mask_bits[XIMaskLen(XI_LASTEVENT)];
261     int i, count;
262
263     if (!xinput2_available) return;
264
265     if (data->xi2_state == xi_unknown)
266     {
267         int major = 2, minor = 0;
268         wine_tsx11_lock();
269         if (!pXIQueryVersion( data->display, &major, &minor )) data->xi2_state = xi_disabled;
270         else
271         {
272             data->xi2_state = xi_unavailable;
273             WARN( "X Input 2 not available\n" );
274         }
275         wine_tsx11_unlock();
276     }
277     if (data->xi2_state == xi_unavailable) return;
278
279     wine_tsx11_lock();
280     devices = pXIQueryDevice( data->display, XIAllDevices, &count );
281     for (i = 0; i < count; ++i)
282     {
283         if (devices[i].use != XIMasterPointer) continue;
284         TRACE( "Using %u (%s) as core pointer\n",
285                devices[i].deviceid, debugstr_a(devices[i].name) );
286         xinput2_core_pointer = devices[i].deviceid;
287         break;
288     }
289
290     mask.mask     = mask_bits;
291     mask.mask_len = sizeof(mask_bits);
292     memset( mask_bits, 0, sizeof(mask_bits) );
293
294     XISetMask( mask_bits, XI_RawButtonPress );
295     XISetMask( mask_bits, XI_RawButtonRelease );
296     XISetMask( mask_bits, XI_RawMotion );
297
298     for (i = 0; i < count; ++i)
299     {
300         if (devices[i].use == XISlavePointer && devices[i].attachment == xinput2_core_pointer)
301         {
302             TRACE( "Device %u (%s) is attached to the core pointer\n",
303                    devices[i].deviceid, debugstr_a(devices[i].name) );
304             mask.deviceid = devices[i].deviceid;
305             pXISelectEvents( data->display, DefaultRootWindow( data->display ), &mask, 1 );
306             data->xi2_state = xi_enabled;
307         }
308     }
309
310     pXIFreeDeviceInfo( devices );
311     wine_tsx11_unlock();
312 #endif
313 }
314
315 /***********************************************************************
316  *              disable_xinput2
317  */
318 static void disable_xinput2(void)
319 {
320 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
321     struct x11drv_thread_data *data = x11drv_thread_data();
322     XIEventMask mask;
323     XIDeviceInfo *devices;
324     int i, count;
325
326     if (data->xi2_state != xi_enabled) return;
327
328     TRACE( "disabling\n" );
329     data->xi2_state = xi_disabled;
330
331     mask.mask = NULL;
332     mask.mask_len = 0;
333
334     wine_tsx11_lock();
335     devices = pXIQueryDevice( data->display, XIAllDevices, &count );
336     for (i = 0; i < count; ++i)
337     {
338         if (devices[i].use == XISlavePointer && devices[i].attachment == xinput2_core_pointer)
339         {
340             mask.deviceid = devices[i].deviceid;
341             pXISelectEvents( data->display, DefaultRootWindow( data->display ), &mask, 1 );
342         }
343     }
344     pXIFreeDeviceInfo( devices );
345     wine_tsx11_unlock();
346 #endif
347 }
348
349 /***********************************************************************
350  *             create_clipping_msg_window
351  */
352 static HWND create_clipping_msg_window(void)
353 {
354     static const WCHAR class_name[] = {'_','_','x','1','1','d','r','v','_','c','l','i','p','_','c','l','a','s','s',0};
355     static ATOM clip_class;
356
357     if (!clip_class)
358     {
359         WNDCLASSW class;
360         ATOM atom;
361
362         memset( &class, 0, sizeof(class) );
363         class.lpfnWndProc   = DefWindowProcW;
364         class.hInstance     = GetModuleHandleW(0);
365         class.lpszClassName = class_name;
366         if ((atom = RegisterClassW( &class ))) clip_class = atom;
367     }
368     return CreateWindowW( class_name, NULL, 0, 0, 0, 0, 0, HWND_MESSAGE, 0, GetModuleHandleW(0), NULL );
369 }
370
371 /***********************************************************************
372  *              grab_clipping_window
373  *
374  * Start a pointer grab on the clip window.
375  */
376 static BOOL grab_clipping_window( const RECT *clip )
377 {
378     struct x11drv_thread_data *data = x11drv_thread_data();
379     Window clip_window;
380     HWND msg_hwnd = 0;
381
382     if (!data) return FALSE;
383     if (!(clip_window = init_clip_window())) return TRUE;
384
385     /* create a clip message window unless we are already clipping */
386     if (!data->clip_hwnd)
387     {
388         if (!(msg_hwnd = create_clipping_msg_window())) return TRUE;
389         enable_xinput2();
390     }
391
392     /* don't clip to 1x1 rectangle if we don't have XInput */
393     if (data->xi2_state != xi_enabled && clip->right - clip->left == 1 && clip->bottom - clip->top == 1)
394     {
395         WARN( "XInput2 not supported, refusing to clip to %s\n", wine_dbgstr_rect(clip) );
396         if (msg_hwnd) DestroyWindow( msg_hwnd );
397         ClipCursor( NULL );
398         return TRUE;
399     }
400
401     TRACE( "clipping to %s\n", wine_dbgstr_rect(clip) );
402
403     wine_tsx11_lock();
404     if (msg_hwnd) XUnmapWindow( data->display, clip_window );
405     XMoveResizeWindow( data->display, clip_window,
406                        clip->left - virtual_screen_rect.left, clip->top - virtual_screen_rect.top,
407                        clip->right - clip->left, clip->bottom - clip->top );
408     if (msg_hwnd) XMapWindow( data->display, clip_window );
409     if (!XGrabPointer( data->display, clip_window, False,
410                        PointerMotionMask | ButtonPressMask | ButtonReleaseMask,
411                        GrabModeAsync, GrabModeAsync, clip_window, None, CurrentTime ))
412         clipping_cursor = 1;
413     wine_tsx11_unlock();
414
415     if (!clipping_cursor)
416     {
417         disable_xinput2();
418         if (msg_hwnd) DestroyWindow( msg_hwnd );
419         return FALSE;
420     }
421     if (msg_hwnd)
422     {
423         data->clip_hwnd = msg_hwnd;
424         sync_window_cursor( clip_window );
425         clip_rect = *clip;
426         SendMessageW( GetDesktopWindow(), WM_X11DRV_CLIP_CURSOR, 0, (LPARAM)msg_hwnd );
427     }
428     return TRUE;
429 }
430
431 /***********************************************************************
432  *              ungrab_clipping_window
433  *
434  * Release the pointer grab on the clip window.
435  */
436 void ungrab_clipping_window(void)
437 {
438     Display *display = thread_init_display();
439     Window clip_window = init_clip_window();
440
441     if (!clip_window) return;
442
443     TRACE( "no longer clipping\n" );
444     wine_tsx11_lock();
445     XUnmapWindow( display, clip_window );
446     wine_tsx11_unlock();
447     clipping_cursor = 0;
448     SendMessageW( GetDesktopWindow(), WM_X11DRV_CLIP_CURSOR, 0, 0 );
449 }
450
451 /***********************************************************************
452  *             clip_cursor_notify
453  *
454  * Notification function called upon receiving a WM_X11DRV_CLIP_CURSOR.
455  */
456 LRESULT clip_cursor_notify( HWND hwnd, HWND new_clip_hwnd )
457 {
458     struct x11drv_thread_data *data = x11drv_thread_data();
459
460     if (hwnd == GetDesktopWindow())  /* change the clip window stored in the desktop process */
461     {
462         static HWND clip_hwnd;
463
464         HWND prev = clip_hwnd;
465         clip_hwnd = new_clip_hwnd;
466         if (prev || new_clip_hwnd) TRACE( "clip hwnd changed from %p to %p\n", prev, new_clip_hwnd );
467         if (prev) SendNotifyMessageW( prev, WM_X11DRV_CLIP_CURSOR, 0, 0 );
468     }
469     else if (hwnd == data->clip_hwnd)  /* this is a notification that clipping has been reset */
470     {
471         data->clip_hwnd = 0;
472         disable_xinput2();
473         DestroyWindow( hwnd );
474     }
475     else if (hwnd == GetForegroundWindow())  /* request to clip */
476     {
477         RECT clip;
478
479         GetClipCursor( &clip );
480         if (clip.left > virtual_screen_rect.left || clip.right < virtual_screen_rect.right ||
481             clip.top > virtual_screen_rect.top   || clip.bottom < virtual_screen_rect.bottom)
482             return grab_clipping_window( &clip );
483     }
484     return 0;
485 }
486
487 /***********************************************************************
488  *              send_mouse_input
489  *
490  * Update the various window states on a mouse event.
491  */
492 static void send_mouse_input( HWND hwnd, Window window, unsigned int state, INPUT *input )
493 {
494     struct x11drv_win_data *data;
495     POINT pt;
496
497     input->type = INPUT_MOUSE;
498
499     if (!hwnd && window == x11drv_thread_data()->clip_window)
500     {
501         input->u.mi.dx += clip_rect.left;
502         input->u.mi.dy += clip_rect.top;
503         if (x11drv_thread_data()->xi2_state != xi_enabled) __wine_send_input( hwnd, input );
504         return;
505     }
506
507     if (!(data = X11DRV_get_win_data( hwnd ))) return;
508
509     if (window == data->whole_window)
510     {
511         input->u.mi.dx += data->whole_rect.left - data->client_rect.left;
512         input->u.mi.dy += data->whole_rect.top - data->client_rect.top;
513     }
514     if (window == root_window)
515     {
516         input->u.mi.dx += virtual_screen_rect.left;
517         input->u.mi.dy += virtual_screen_rect.top;
518     }
519     pt.x = input->u.mi.dx;
520     pt.y = input->u.mi.dy;
521     if (GetWindowLongW( data->hwnd, GWL_EXSTYLE ) & WS_EX_LAYOUTRTL)
522         pt.x = data->client_rect.right - data->client_rect.left - 1 - pt.x;
523     MapWindowPoints( hwnd, 0, &pt, 1 );
524
525     if (InterlockedExchangePointer( (void **)&cursor_window, hwnd ) != hwnd ||
526         GetTickCount() - last_cursor_change > 100)
527     {
528         sync_window_cursor( data->whole_window );
529         last_cursor_change = GetTickCount();
530     }
531
532     if (hwnd != GetDesktopWindow()) hwnd = GetAncestor( hwnd, GA_ROOT );
533
534     /* update the wine server Z-order */
535
536     if (window != x11drv_thread_data()->grab_window &&
537         /* ignore event if a button is pressed, since the mouse is then grabbed too */
538         !(state & (Button1Mask|Button2Mask|Button3Mask|Button4Mask|Button5Mask|Button6Mask|Button7Mask)))
539     {
540         RECT rect;
541         SetRect( &rect, pt.x, pt.y, pt.x + 1, pt.y + 1 );
542         MapWindowPoints( 0, hwnd, (POINT *)&rect, 2 );
543
544         SERVER_START_REQ( update_window_zorder )
545         {
546             req->window      = wine_server_user_handle( hwnd );
547             req->rect.left   = rect.left;
548             req->rect.top    = rect.top;
549             req->rect.right  = rect.right;
550             req->rect.bottom = rect.bottom;
551             wine_server_call( req );
552         }
553         SERVER_END_REQ;
554     }
555
556     input->u.mi.dx = pt.x;
557     input->u.mi.dy = pt.y;
558     __wine_send_input( hwnd, input );
559 }
560
561 #ifdef SONAME_LIBXCURSOR
562
563 /***********************************************************************
564  *              create_xcursor_frame
565  *
566  * Use Xcursor to create a frame of an X cursor from a Windows one.
567  */
568 static XcursorImage *create_xcursor_frame( HDC hdc, const ICONINFOEXW *iinfo, HANDLE icon,
569                                            HBITMAP hbmColor, unsigned char *color_bits, int color_size,
570                                            HBITMAP hbmMask, unsigned char *mask_bits, int mask_size,
571                                            int width, int height, int istep )
572 {
573     XcursorImage *image, *ret = NULL;
574     DWORD delay_jiffies, num_steps;
575     int x, y, i, has_alpha = FALSE;
576     XcursorPixel *ptr;
577
578     wine_tsx11_lock();
579     image = pXcursorImageCreate( width, height );
580     wine_tsx11_unlock();
581     if (!image)
582     {
583         ERR("X11 failed to produce a cursor frame!\n");
584         goto cleanup;
585     }
586
587     image->xhot = iinfo->xHotspot;
588     image->yhot = iinfo->yHotspot;
589
590     image->delay = 100; /* fallback delay, 100 ms */
591     if (GetCursorFrameInfo(icon, 0x0 /* unknown parameter */, istep, &delay_jiffies, &num_steps) != 0)
592         image->delay = (100 * delay_jiffies) / 6; /* convert jiffies (1/60s) to milliseconds */
593     else
594         WARN("Failed to retrieve animated cursor frame-rate for frame %d.\n", istep);
595
596     /* draw the cursor frame to a temporary buffer then copy it into the XcursorImage */
597     memset( color_bits, 0x00, color_size );
598     SelectObject( hdc, hbmColor );
599     if (!DrawIconEx( hdc, 0, 0, icon, width, height, istep, NULL, DI_NORMAL ))
600     {
601         TRACE("Could not draw frame %d (walk past end of frames).\n", istep);
602         goto cleanup;
603     }
604     memcpy( image->pixels, color_bits, color_size );
605
606     /* check if the cursor frame was drawn with an alpha channel */
607     for (i = 0, ptr = image->pixels; i < width * height; i++, ptr++)
608         if ((has_alpha = (*ptr & 0xff000000) != 0)) break;
609
610     /* if no alpha channel was drawn then generate it from the mask */
611     if (!has_alpha)
612     {
613         unsigned int width_bytes = (width + 31) / 32 * 4;
614
615         /* draw the cursor mask to a temporary buffer */
616         memset( mask_bits, 0xFF, mask_size );
617         SelectObject( hdc, hbmMask );
618         if (!DrawIconEx( hdc, 0, 0, icon, width, height, istep, NULL, DI_MASK ))
619         {
620             ERR("Failed to draw frame mask %d.\n", istep);
621             goto cleanup;
622         }
623         /* use the buffer to directly modify the XcursorImage alpha channel */
624         for (y = 0, ptr = image->pixels; y < height; y++)
625             for (x = 0; x < width; x++, ptr++)
626                 if (!((mask_bits[y * width_bytes + x / 8] << (x % 8)) & 0x80))
627                     *ptr |= 0xff000000;
628     }
629     ret = image;
630
631 cleanup:
632     if (ret == NULL) pXcursorImageDestroy( image );
633     return ret;
634 }
635
636 /***********************************************************************
637  *              create_xcursor_cursor
638  *
639  * Use Xcursor to create an X cursor from a Windows one.
640  */
641 static Cursor create_xcursor_cursor( HDC hdc, const ICONINFOEXW *iinfo, HANDLE icon, int width, int height )
642 {
643     unsigned char *color_bits, *mask_bits;
644     HBITMAP hbmColor = 0, hbmMask = 0;
645     DWORD nFrames, delay_jiffies, i;
646     int color_size, mask_size;
647     BITMAPINFO *info = NULL;
648     XcursorImages *images;
649     XcursorImage **imgs;
650     Cursor cursor = 0;
651
652     /* Retrieve the number of frames to render */
653     if (!GetCursorFrameInfo(icon, 0x0 /* unknown parameter */, 0, &delay_jiffies, &nFrames)) return 0;
654     if (!(imgs = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(XcursorImage*)*nFrames ))) return 0;
655
656     /* Allocate all of the resources necessary to obtain a cursor frame */
657     if (!(info = HeapAlloc( GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO, bmiColors[256] )))) goto cleanup;
658     info->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
659     info->bmiHeader.biWidth = width;
660     info->bmiHeader.biHeight = -height;
661     info->bmiHeader.biPlanes = 1;
662     info->bmiHeader.biCompression = BI_RGB;
663     info->bmiHeader.biXPelsPerMeter = 0;
664     info->bmiHeader.biYPelsPerMeter = 0;
665     info->bmiHeader.biClrUsed = 0;
666     info->bmiHeader.biClrImportant = 0;
667     info->bmiHeader.biBitCount = 32;
668     color_size = width * height * 4;
669     info->bmiHeader.biSizeImage = color_size;
670     hbmColor = CreateDIBSection( hdc, info, DIB_RGB_COLORS, (VOID **) &color_bits, NULL, 0);
671     if (!hbmColor)
672     {
673         ERR("Failed to create DIB section for cursor color data!\n");
674         goto cleanup;
675     }
676     info->bmiHeader.biBitCount = 1;
677     mask_size = ((width + 31) / 32 * 4) * height; /* width_bytes * height */
678     info->bmiHeader.biSizeImage = mask_size;
679     hbmMask = CreateDIBSection( hdc, info, DIB_RGB_COLORS, (VOID **) &mask_bits, NULL, 0);
680     if (!hbmMask)
681     {
682         ERR("Failed to create DIB section for cursor mask data!\n");
683         goto cleanup;
684     }
685
686     /* Create an XcursorImage for each frame of the cursor */
687     for (i=0; i<nFrames; i++)
688     {
689         imgs[i] = create_xcursor_frame( hdc, iinfo, icon,
690                                         hbmColor, color_bits, color_size,
691                                         hbmMask, mask_bits, mask_size,
692                                         width, height, i );
693         if (!imgs[i]) goto cleanup;
694     }
695
696     /* Build an X cursor out of all of the frames */
697     if (!(images = pXcursorImagesCreate( nFrames ))) goto cleanup;
698     for (images->nimage = 0; images->nimage < nFrames; images->nimage++)
699         images->images[images->nimage] = imgs[images->nimage];
700     wine_tsx11_lock();
701     cursor = pXcursorImagesLoadCursor( gdi_display, images );
702     wine_tsx11_unlock();
703     pXcursorImagesDestroy( images ); /* Note: this frees each individual frame (calls XcursorImageDestroy) */
704     HeapFree( GetProcessHeap(), 0, imgs );
705     imgs = NULL;
706
707 cleanup:
708     if (imgs)
709     {
710         /* Failed to produce a cursor, free previously allocated frames */
711         for (i=0; i<nFrames && imgs[i]; i++)
712             pXcursorImageDestroy( imgs[i] );
713         HeapFree( GetProcessHeap(), 0, imgs );
714     }
715     /* Cleanup all of the resources used to obtain the frame data */
716     if (hbmColor) DeleteObject( hbmColor );
717     if (hbmMask) DeleteObject( hbmMask );
718     HeapFree( GetProcessHeap(), 0, info );
719     return cursor;
720 }
721
722
723 struct system_cursors
724 {
725     WORD id;
726     const char *name;
727 };
728
729 static const struct system_cursors user32_cursors[] =
730 {
731     { OCR_NORMAL,      "left_ptr" },
732     { OCR_IBEAM,       "xterm" },
733     { OCR_WAIT,        "watch" },
734     { OCR_CROSS,       "cross" },
735     { OCR_UP,          "center_ptr" },
736     { OCR_SIZE,        "fleur" },
737     { OCR_SIZEALL,     "fleur" },
738     { OCR_ICON,        "icon" },
739     { OCR_SIZENWSE,    "nwse-resize" },
740     { OCR_SIZENESW,    "nesw-resize" },
741     { OCR_SIZEWE,      "ew-resize" },
742     { OCR_SIZENS,      "ns-resize" },
743     { OCR_NO,          "not-allowed" },
744     { OCR_HAND,        "hand2" },
745     { OCR_APPSTARTING, "left_ptr_watch" },
746     { OCR_HELP,        "question_arrow" },
747     { 0 }
748 };
749
750 static const struct system_cursors comctl32_cursors[] =
751 {
752     { 102, "move" },
753     { 104, "copy" },
754     { 105, "left_ptr" },
755     { 106, "row-resize" },
756     { 107, "row-resize" },
757     { 108, "hand2" },
758     { 135, "col-resize" },
759     { 0 }
760 };
761
762 static const struct system_cursors ole32_cursors[] =
763 {
764     { 1, "no-drop" },
765     { 2, "move" },
766     { 3, "copy" },
767     { 4, "alias" },
768     { 0 }
769 };
770
771 static const struct system_cursors riched20_cursors[] =
772 {
773     { 105, "hand2" },
774     { 107, "right_ptr" },
775     { 109, "copy" },
776     { 110, "move" },
777     { 111, "no-drop" },
778     { 0 }
779 };
780
781 static const struct
782 {
783     const struct system_cursors *cursors;
784     WCHAR name[16];
785 } module_cursors[] =
786 {
787     { user32_cursors, {'u','s','e','r','3','2','.','d','l','l',0} },
788     { comctl32_cursors, {'c','o','m','c','t','l','3','2','.','d','l','l',0} },
789     { ole32_cursors, {'o','l','e','3','2','.','d','l','l',0} },
790     { riched20_cursors, {'r','i','c','h','e','d','2','0','.','d','l','l',0} }
791 };
792
793 /***********************************************************************
794  *              create_xcursor_system_cursor
795  *
796  * Create an X cursor for a system cursor.
797  */
798 static Cursor create_xcursor_system_cursor( const ICONINFOEXW *info )
799 {
800     static const WCHAR idW[] = {'%','h','u',0};
801     const struct system_cursors *cursors;
802     unsigned int i;
803     Cursor cursor = 0;
804     HMODULE module;
805     HKEY key;
806     WCHAR *p, name[MAX_PATH * 2], valueW[64];
807     char valueA[64];
808     DWORD size, ret;
809
810     if (!pXcursorLibraryLoadCursor) return 0;
811     if (!info->szModName[0]) return 0;
812
813     p = strrchrW( info->szModName, '\\' );
814     strcpyW( name, p ? p + 1 : info->szModName );
815     p = name + strlenW( name );
816     *p++ = ',';
817     if (info->szResName[0]) strcpyW( p, info->szResName );
818     else sprintfW( p, idW, info->wResID );
819     valueA[0] = 0;
820
821     /* @@ Wine registry key: HKCU\Software\Wine\X11 Driver\Cursors */
822     if (!RegOpenKeyA( HKEY_CURRENT_USER, "Software\\Wine\\X11 Driver\\Cursors", &key ))
823     {
824         size = sizeof(valueW) / sizeof(WCHAR);
825         ret = RegQueryValueExW( key, name, NULL, NULL, (BYTE *)valueW, &size );
826         RegCloseKey( key );
827         if (!ret)
828         {
829             if (!valueW[0]) return 0; /* force standard cursor */
830             if (!WideCharToMultiByte( CP_UNIXCP, 0, valueW, -1, valueA, sizeof(valueA), NULL, NULL ))
831                 valueA[0] = 0;
832             goto done;
833         }
834     }
835
836     if (info->szResName[0]) goto done;  /* only integer resources are supported here */
837     if (!(module = GetModuleHandleW( info->szModName ))) goto done;
838
839     for (i = 0; i < sizeof(module_cursors)/sizeof(module_cursors[0]); i++)
840         if (GetModuleHandleW( module_cursors[i].name ) == module) break;
841     if (i == sizeof(module_cursors)/sizeof(module_cursors[0])) goto done;
842
843     cursors = module_cursors[i].cursors;
844     for (i = 0; cursors[i].id; i++)
845         if (cursors[i].id == info->wResID)
846         {
847             strcpy( valueA, cursors[i].name );
848             break;
849         }
850
851 done:
852     if (valueA[0])
853     {
854         wine_tsx11_lock();
855         cursor = pXcursorLibraryLoadCursor( gdi_display, valueA );
856         wine_tsx11_unlock();
857         if (!cursor) WARN( "no system cursor found for %s mapped to %s\n",
858                            debugstr_w(name), debugstr_a(valueA) );
859     }
860     else WARN( "no system cursor found for %s\n", debugstr_w(name) );
861     return cursor;
862 }
863
864 #endif /* SONAME_LIBXCURSOR */
865
866
867 /***********************************************************************
868  *              create_cursor_from_bitmaps
869  *
870  * Create an X11 cursor from source bitmaps.
871  */
872 static Cursor create_cursor_from_bitmaps( HBITMAP src_xor, HBITMAP src_and, int width, int height,
873                                           int xor_y, int and_y, XColor *fg, XColor *bg,
874                                           int hotspot_x, int hotspot_y )
875 {
876     HDC src = 0, dst = 0;
877     HBITMAP bits = 0, mask = 0, mask_inv = 0;
878     Cursor cursor = 0;
879
880     if (!(src = CreateCompatibleDC( 0 ))) goto done;
881     if (!(dst = CreateCompatibleDC( 0 ))) goto done;
882
883     if (!(bits = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
884     if (!(mask = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
885     if (!(mask_inv = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
886
887     /* We have to do some magic here, as cursors are not fully
888      * compatible between Windows and X11. Under X11, there are
889      * only 3 possible color cursor: black, white and masked. So
890      * we map the 4th Windows color (invert the bits on the screen)
891      * to black and an additional white bit on an other place
892      * (+1,+1). This require some boolean arithmetic:
893      *
894      *         Windows          |          X11
895      * And    Xor      Result   |   Bits     Mask     Result
896      *  0      0     black      |    0        1     background
897      *  0      1     white      |    1        1     foreground
898      *  1      0     no change  |    X        0     no change
899      *  1      1     inverted   |    0        1     background
900      *
901      * which gives:
902      *  Bits = not 'And' and 'Xor' or 'And2' and 'Xor2'
903      *  Mask = not 'And' or 'Xor' or 'And2' and 'Xor2'
904      */
905     SelectObject( src, src_and );
906     SelectObject( dst, bits );
907     BitBlt( dst, 0, 0, width, height, src, 0, and_y, SRCCOPY );
908     SelectObject( dst, mask );
909     BitBlt( dst, 0, 0, width, height, src, 0, and_y, SRCCOPY );
910     SelectObject( dst, mask_inv );
911     BitBlt( dst, 0, 0, width, height, src, 0, and_y, SRCCOPY );
912     SelectObject( src, src_xor );
913     BitBlt( dst, 0, 0, width, height, src, 0, xor_y, SRCAND /* src & dst */ );
914     SelectObject( dst, bits );
915     BitBlt( dst, 0, 0, width, height, src, 0, xor_y, SRCERASE /* src & ~dst */ );
916     SelectObject( dst, mask );
917     BitBlt( dst, 0, 0, width, height, src, 0, xor_y, 0xdd0228 /* src | ~dst */ );
918     /* additional white */
919     SelectObject( src, mask_inv );
920     BitBlt( dst, 1, 1, width, height, src, 0, 0, SRCPAINT /* src | dst */);
921     SelectObject( dst, bits );
922     BitBlt( dst, 1, 1, width, height, src, 0, 0, SRCPAINT /* src | dst */ );
923
924     wine_tsx11_lock();
925     cursor = XCreatePixmapCursor( gdi_display, X11DRV_get_pixmap(bits), X11DRV_get_pixmap(mask),
926                                   fg, bg, hotspot_x, hotspot_y );
927     wine_tsx11_unlock();
928
929 done:
930     DeleteDC( src );
931     DeleteDC( dst );
932     DeleteObject( bits );
933     DeleteObject( mask );
934     DeleteObject( mask_inv );
935     return cursor;
936 }
937
938 /***********************************************************************
939  *              create_xlib_cursor
940  *
941  * Create an X cursor from a Windows one.
942  */
943 static Cursor create_xlib_cursor( HDC hdc, const ICONINFOEXW *icon, int width, int height )
944 {
945     XColor fg, bg;
946     Cursor cursor = None;
947     HBITMAP xor_bitmap = 0;
948     BITMAPINFO *info;
949     unsigned int *color_bits = NULL, *ptr;
950     unsigned char *mask_bits = NULL, *xor_bits = NULL;
951     int i, x, y, has_alpha = 0;
952     int rfg, gfg, bfg, rbg, gbg, bbg, fgBits, bgBits;
953     unsigned int width_bytes = (width + 31) / 32 * 4;
954
955     if (!(info = HeapAlloc( GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO, bmiColors[256] ))))
956         return FALSE;
957     info->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
958     info->bmiHeader.biWidth = width;
959     info->bmiHeader.biHeight = -height;
960     info->bmiHeader.biPlanes = 1;
961     info->bmiHeader.biBitCount = 1;
962     info->bmiHeader.biCompression = BI_RGB;
963     info->bmiHeader.biSizeImage = width_bytes * height;
964     info->bmiHeader.biXPelsPerMeter = 0;
965     info->bmiHeader.biYPelsPerMeter = 0;
966     info->bmiHeader.biClrUsed = 0;
967     info->bmiHeader.biClrImportant = 0;
968
969     if (!(mask_bits = HeapAlloc( GetProcessHeap(), 0, info->bmiHeader.biSizeImage ))) goto done;
970     if (!GetDIBits( hdc, icon->hbmMask, 0, height, mask_bits, info, DIB_RGB_COLORS )) goto done;
971
972     info->bmiHeader.biBitCount = 32;
973     info->bmiHeader.biSizeImage = width * height * 4;
974     if (!(color_bits = HeapAlloc( GetProcessHeap(), 0, info->bmiHeader.biSizeImage ))) goto done;
975     if (!(xor_bits = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, width_bytes * height ))) goto done;
976     GetDIBits( hdc, icon->hbmColor, 0, height, color_bits, info, DIB_RGB_COLORS );
977
978     /* compute fg/bg color and xor bitmap based on average of the color values */
979
980     if (!(xor_bitmap = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
981     rfg = gfg = bfg = rbg = gbg = bbg = fgBits = 0;
982     for (y = 0, ptr = color_bits; y < height; y++)
983     {
984         for (x = 0; x < width; x++, ptr++)
985         {
986             int red   = (*ptr >> 16) & 0xff;
987             int green = (*ptr >> 8) & 0xff;
988             int blue  = (*ptr >> 0) & 0xff;
989             if (red + green + blue > 0x40)
990             {
991                 rfg += red;
992                 gfg += green;
993                 bfg += blue;
994                 fgBits++;
995                 xor_bits[y * width_bytes + x / 8] |= 0x80 >> (x % 8);
996             }
997             else
998             {
999                 rbg += red;
1000                 gbg += green;
1001                 bbg += blue;
1002             }
1003         }
1004     }
1005     if (fgBits)
1006     {
1007         fg.red   = rfg * 257 / fgBits;
1008         fg.green = gfg * 257 / fgBits;
1009         fg.blue  = bfg * 257 / fgBits;
1010     }
1011     else fg.red = fg.green = fg.blue = 0;
1012     bgBits = width * height - fgBits;
1013     if (bgBits)
1014     {
1015         bg.red   = rbg * 257 / bgBits;
1016         bg.green = gbg * 257 / bgBits;
1017         bg.blue  = bbg * 257 / bgBits;
1018     }
1019     else bg.red = bg.green = bg.blue = 0;
1020
1021     info->bmiHeader.biBitCount = 1;
1022     info->bmiHeader.biSizeImage = width_bytes * height;
1023     SetDIBits( hdc, xor_bitmap, 0, height, xor_bits, info, DIB_RGB_COLORS );
1024
1025     /* generate mask from the alpha channel if we have one */
1026
1027     for (i = 0, ptr = color_bits; i < width * height; i++, ptr++)
1028         if ((has_alpha = (*ptr & 0xff000000) != 0)) break;
1029
1030     if (has_alpha)
1031     {
1032         memset( mask_bits, 0, width_bytes * height );
1033         for (y = 0, ptr = color_bits; y < height; y++)
1034             for (x = 0; x < width; x++, ptr++)
1035                 if ((*ptr >> 24) > 25) /* more than 10% alpha */
1036                     mask_bits[y * width_bytes + x / 8] |= 0x80 >> (x % 8);
1037
1038         info->bmiHeader.biBitCount = 1;
1039         info->bmiHeader.biSizeImage = width_bytes * height;
1040         SetDIBits( hdc, icon->hbmMask, 0, height, mask_bits, info, DIB_RGB_COLORS );
1041
1042         wine_tsx11_lock();
1043         cursor = XCreatePixmapCursor( gdi_display,
1044                                       X11DRV_get_pixmap(xor_bitmap),
1045                                       X11DRV_get_pixmap(icon->hbmMask),
1046                                       &fg, &bg, icon->xHotspot, icon->yHotspot );
1047         wine_tsx11_unlock();
1048     }
1049     else
1050     {
1051         cursor = create_cursor_from_bitmaps( xor_bitmap, icon->hbmMask, width, height, 0, 0,
1052                                              &fg, &bg, icon->xHotspot, icon->yHotspot );
1053     }
1054
1055 done:
1056     DeleteObject( xor_bitmap );
1057     HeapFree( GetProcessHeap(), 0, info );
1058     HeapFree( GetProcessHeap(), 0, color_bits );
1059     HeapFree( GetProcessHeap(), 0, xor_bits );
1060     HeapFree( GetProcessHeap(), 0, mask_bits );
1061     return cursor;
1062 }
1063
1064 /***********************************************************************
1065  *              create_cursor
1066  *
1067  * Create an X cursor from a Windows one.
1068  */
1069 static Cursor create_cursor( HANDLE handle )
1070 {
1071     Cursor cursor = 0;
1072     ICONINFOEXW info;
1073     BITMAP bm;
1074
1075     if (!handle) return get_empty_cursor();
1076
1077     info.cbSize = sizeof(info);
1078     if (!GetIconInfoExW( handle, &info )) return 0;
1079
1080 #ifdef SONAME_LIBXCURSOR
1081     if (use_system_cursors && (cursor = create_xcursor_system_cursor( &info )))
1082     {
1083         DeleteObject( info.hbmColor );
1084         DeleteObject( info.hbmMask );
1085         return cursor;
1086     }
1087 #endif
1088
1089     GetObjectW( info.hbmMask, sizeof(bm), &bm );
1090     if (!info.hbmColor) bm.bmHeight /= 2;
1091
1092     /* make sure hotspot is valid */
1093     if (info.xHotspot >= bm.bmWidth || info.yHotspot >= bm.bmHeight)
1094     {
1095         info.xHotspot = bm.bmWidth / 2;
1096         info.yHotspot = bm.bmHeight / 2;
1097     }
1098
1099     if (info.hbmColor)
1100     {
1101         HDC hdc = CreateCompatibleDC( 0 );
1102         if (hdc)
1103         {
1104 #ifdef SONAME_LIBXCURSOR
1105             if (pXcursorImagesLoadCursor)
1106                 cursor = create_xcursor_cursor( hdc, &info, handle, bm.bmWidth, bm.bmHeight );
1107 #endif
1108             if (!cursor) cursor = create_xlib_cursor( hdc, &info, bm.bmWidth, bm.bmHeight );
1109         }
1110         DeleteObject( info.hbmColor );
1111         DeleteDC( hdc );
1112     }
1113     else
1114     {
1115         XColor fg, bg;
1116         fg.red = fg.green = fg.blue = 0xffff;
1117         bg.red = bg.green = bg.blue = 0;
1118         cursor = create_cursor_from_bitmaps( info.hbmMask, info.hbmMask, bm.bmWidth, bm.bmHeight,
1119                                              bm.bmHeight, 0, &fg, &bg, info.xHotspot, info.yHotspot );
1120     }
1121
1122     DeleteObject( info.hbmMask );
1123     return cursor;
1124 }
1125
1126 /***********************************************************************
1127  *              DestroyCursorIcon (X11DRV.@)
1128  */
1129 void CDECL X11DRV_DestroyCursorIcon( HCURSOR handle )
1130 {
1131     Cursor cursor;
1132
1133     wine_tsx11_lock();
1134     if (cursor_context && !XFindContext( gdi_display, (XID)handle, cursor_context, (char **)&cursor ))
1135     {
1136         TRACE( "%p xid %lx\n", handle, cursor );
1137         XFreeCursor( gdi_display, cursor );
1138         XDeleteContext( gdi_display, (XID)handle, cursor_context );
1139     }
1140     wine_tsx11_unlock();
1141 }
1142
1143 /***********************************************************************
1144  *              SetCursor (X11DRV.@)
1145  */
1146 void CDECL X11DRV_SetCursor( HCURSOR handle )
1147 {
1148     if (InterlockedExchangePointer( (void **)&last_cursor, handle ) != handle ||
1149         GetTickCount() - last_cursor_change > 100)
1150     {
1151         last_cursor_change = GetTickCount();
1152         if (clipping_cursor) set_window_cursor( init_clip_window(), handle );
1153         else if (cursor_window) SendNotifyMessageW( cursor_window, WM_X11DRV_SET_CURSOR, 0, (LPARAM)handle );
1154     }
1155 }
1156
1157 /***********************************************************************
1158  *              SetCursorPos (X11DRV.@)
1159  */
1160 BOOL CDECL X11DRV_SetCursorPos( INT x, INT y )
1161 {
1162     struct x11drv_thread_data *data = x11drv_init_thread_data();
1163
1164     if (data->xi2_state == xi_enabled) return TRUE;
1165
1166     TRACE( "warping to (%d,%d)\n", x, y );
1167
1168     wine_tsx11_lock();
1169     XWarpPointer( data->display, root_window, root_window, 0, 0, 0, 0,
1170                   x - virtual_screen_rect.left, y - virtual_screen_rect.top );
1171     XFlush( data->display ); /* avoids bad mouse lag in games that do their own mouse warping */
1172     wine_tsx11_unlock();
1173     return TRUE;
1174 }
1175
1176 /***********************************************************************
1177  *              GetCursorPos (X11DRV.@)
1178  */
1179 BOOL CDECL X11DRV_GetCursorPos(LPPOINT pos)
1180 {
1181     Display *display = thread_init_display();
1182     Window root, child;
1183     int rootX, rootY, winX, winY;
1184     unsigned int xstate;
1185     BOOL ret;
1186
1187     wine_tsx11_lock();
1188     ret = XQueryPointer( display, root_window, &root, &child, &rootX, &rootY, &winX, &winY, &xstate );
1189     if (ret)
1190     {
1191         pos->x = winX + virtual_screen_rect.left;
1192         pos->y = winY + virtual_screen_rect.top;
1193         TRACE("pointer at (%d,%d)\n", pos->x, pos->y );
1194     }
1195     wine_tsx11_unlock();
1196     return ret;
1197 }
1198
1199 /***********************************************************************
1200  *              ClipCursor (X11DRV.@)
1201  */
1202 BOOL CDECL X11DRV_ClipCursor( LPCRECT clip )
1203 {
1204     if (!clip)
1205     {
1206         ungrab_clipping_window();
1207         return TRUE;
1208     }
1209
1210     if (GetWindowThreadProcessId( GetDesktopWindow(), NULL ) == GetCurrentThreadId())
1211         return TRUE;  /* don't clip in the desktop process */
1212
1213     /* we are clipping if the clip rectangle is smaller than the screen */
1214     if (grab_pointer && (clip->left > virtual_screen_rect.left ||
1215                          clip->right < virtual_screen_rect.right ||
1216                          clip->top > virtual_screen_rect.top ||
1217                          clip->bottom < virtual_screen_rect.bottom))
1218     {
1219         DWORD tid, pid;
1220         HWND foreground = GetForegroundWindow();
1221
1222         /* forward request to the foreground window if it's in a different thread */
1223         tid = GetWindowThreadProcessId( foreground, &pid );
1224         if (tid && tid != GetCurrentThreadId() && pid == GetCurrentProcessId())
1225         {
1226             TRACE( "forwarding clip request to %p\n", foreground );
1227             if (SendMessageW( foreground, WM_X11DRV_CLIP_CURSOR, 0, 0 )) return TRUE;
1228         }
1229         else if (grab_clipping_window( clip )) return TRUE;
1230     }
1231
1232     ungrab_clipping_window();
1233     return TRUE;
1234 }
1235
1236 /***********************************************************************
1237  *           X11DRV_ButtonPress
1238  */
1239 void X11DRV_ButtonPress( HWND hwnd, XEvent *xev )
1240 {
1241     XButtonEvent *event = &xev->xbutton;
1242     int buttonNum = event->button - 1;
1243     INPUT input;
1244
1245     if (buttonNum >= NB_BUTTONS) return;
1246
1247     TRACE( "hwnd %p/%lx button %u pos %d,%d\n", hwnd, event->window, buttonNum, event->x, event->y );
1248
1249     input.u.mi.dx          = event->x;
1250     input.u.mi.dy          = event->y;
1251     input.u.mi.mouseData   = button_down_data[buttonNum];
1252     input.u.mi.dwFlags     = button_down_flags[buttonNum] | MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE;
1253     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1254     input.u.mi.dwExtraInfo = 0;
1255
1256     update_user_time( event->time );
1257     send_mouse_input( hwnd, event->window, event->state, &input );
1258 }
1259
1260
1261 /***********************************************************************
1262  *           X11DRV_ButtonRelease
1263  */
1264 void X11DRV_ButtonRelease( HWND hwnd, XEvent *xev )
1265 {
1266     XButtonEvent *event = &xev->xbutton;
1267     int buttonNum = event->button - 1;
1268     INPUT input;
1269
1270     if (buttonNum >= NB_BUTTONS || !button_up_flags[buttonNum]) return;
1271
1272     TRACE( "hwnd %p/%lx button %u pos %d,%d\n", hwnd, event->window, buttonNum, event->x, event->y );
1273
1274     input.u.mi.dx          = event->x;
1275     input.u.mi.dy          = event->y;
1276     input.u.mi.mouseData   = button_up_data[buttonNum];
1277     input.u.mi.dwFlags     = button_up_flags[buttonNum] | MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE;
1278     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1279     input.u.mi.dwExtraInfo = 0;
1280
1281     send_mouse_input( hwnd, event->window, event->state, &input );
1282 }
1283
1284
1285 /***********************************************************************
1286  *           X11DRV_MotionNotify
1287  */
1288 void X11DRV_MotionNotify( HWND hwnd, XEvent *xev )
1289 {
1290     XMotionEvent *event = &xev->xmotion;
1291     INPUT input;
1292
1293     TRACE( "hwnd %p/%lx pos %d,%d is_hint %d\n", hwnd, event->window, event->x, event->y, event->is_hint );
1294
1295     input.u.mi.dx          = event->x;
1296     input.u.mi.dy          = event->y;
1297     input.u.mi.mouseData   = 0;
1298     input.u.mi.dwFlags     = MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE;
1299     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1300     input.u.mi.dwExtraInfo = 0;
1301
1302     send_mouse_input( hwnd, event->window, event->state, &input );
1303 }
1304
1305
1306 /***********************************************************************
1307  *           X11DRV_EnterNotify
1308  */
1309 void X11DRV_EnterNotify( HWND hwnd, XEvent *xev )
1310 {
1311     XCrossingEvent *event = &xev->xcrossing;
1312     INPUT input;
1313
1314     TRACE( "hwnd %p/%lx pos %d,%d detail %d\n", hwnd, event->window, event->x, event->y, event->detail );
1315
1316     if (event->detail == NotifyVirtual || event->detail == NotifyNonlinearVirtual) return;
1317     if (event->window == x11drv_thread_data()->grab_window) return;
1318
1319     /* simulate a mouse motion event */
1320     input.u.mi.dx          = event->x;
1321     input.u.mi.dy          = event->y;
1322     input.u.mi.mouseData   = 0;
1323     input.u.mi.dwFlags     = MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE;
1324     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1325     input.u.mi.dwExtraInfo = 0;
1326
1327     send_mouse_input( hwnd, event->window, event->state, &input );
1328 }
1329
1330 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
1331
1332 /***********************************************************************
1333  *           X11DRV_RawButtonPress
1334  */
1335 static void X11DRV_RawButtonPress( XIRawEvent *event )
1336 {
1337     int button = event->detail - 1;
1338     INPUT input;
1339
1340     if (button >= NB_BUTTONS) return;
1341
1342     TRACE( "button %u\n", button );
1343
1344     input.type             = INPUT_MOUSE;
1345     input.u.mi.dx          = 0;
1346     input.u.mi.dy          = 0;
1347     input.u.mi.mouseData   = button_down_data[button];
1348     input.u.mi.dwFlags     = button_down_flags[button];
1349     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1350     input.u.mi.dwExtraInfo = 0;
1351
1352     update_user_time( event->time );
1353     input.type = INPUT_MOUSE;
1354     __wine_send_input( 0, &input );
1355 }
1356
1357
1358 /***********************************************************************
1359  *           X11DRV_RawButtonRelease
1360  */
1361 static void X11DRV_RawButtonRelease( XIRawEvent *event )
1362 {
1363     int button = event->detail - 1;
1364     INPUT input;
1365
1366     if (button >= NB_BUTTONS) return;
1367
1368     TRACE( "button %u\n", button );
1369
1370     input.u.mi.dx          = 0;
1371     input.u.mi.dy          = 0;
1372     input.u.mi.mouseData   = button_up_data[button];
1373     input.u.mi.dwFlags     = button_up_flags[button];
1374     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1375     input.u.mi.dwExtraInfo = 0;
1376
1377     input.type = INPUT_MOUSE;
1378     __wine_send_input( 0, &input );
1379 }
1380
1381
1382 /***********************************************************************
1383  *           X11DRV_RawMotion
1384  */
1385 static void X11DRV_RawMotion( XIRawEvent *event )
1386 {
1387     const double *values = event->valuators.values;
1388     INPUT input;
1389
1390     if (!event->valuators.mask_len) return;
1391
1392     input.u.mi.dx          = 0;
1393     input.u.mi.dy          = 0;
1394     input.u.mi.mouseData   = 0;
1395     input.u.mi.dwFlags     = MOUSEEVENTF_MOVE;
1396     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1397     input.u.mi.dwExtraInfo = 0;
1398
1399     if (XIMaskIsSet( event->valuators.mask, 0 )) input.u.mi.dx = *values++;
1400     if (XIMaskIsSet( event->valuators.mask, 1 )) input.u.mi.dy = *values++;
1401
1402     TRACE( "pos %d,%d\n", input.u.mi.dx, input.u.mi.dy );
1403
1404     input.type = INPUT_MOUSE;
1405     __wine_send_input( 0, &input );
1406 }
1407
1408 #endif /* HAVE_X11_EXTENSIONS_XINPUT2_H */
1409
1410
1411 /***********************************************************************
1412  *              X11DRV_XInput2_Init
1413  */
1414 void X11DRV_XInput2_Init(void)
1415 {
1416 #if defined(SONAME_LIBXI) && defined(HAVE_X11_EXTENSIONS_XINPUT2_H)
1417     int event, error;
1418     void *libxi_handle = wine_dlopen( SONAME_LIBXI, RTLD_NOW, NULL, 0 );
1419
1420     if (!libxi_handle)
1421     {
1422         WARN( "couldn't load %s\n", SONAME_LIBXI );
1423         return;
1424     }
1425 #define LOAD_FUNCPTR(f) \
1426     if (!(p##f = wine_dlsym( libxi_handle, #f, NULL, 0))) \
1427     { \
1428         WARN("Failed to load %s.\n", #f); \
1429         return; \
1430     }
1431
1432     LOAD_FUNCPTR(XIFreeDeviceInfo);
1433     LOAD_FUNCPTR(XIQueryDevice);
1434     LOAD_FUNCPTR(XIQueryVersion);
1435     LOAD_FUNCPTR(XISelectEvents);
1436 #undef LOAD_FUNCPTR
1437
1438     wine_tsx11_lock();
1439     xinput2_available = XQueryExtension( gdi_display, "XInputExtension", &xinput2_opcode, &event, &error );
1440     wine_tsx11_unlock();
1441 #else
1442     TRACE( "X Input 2 support not compiled in.\n" );
1443 #endif
1444 }
1445
1446
1447 /***********************************************************************
1448  *           X11DRV_GenericEvent
1449  */
1450 void X11DRV_GenericEvent( HWND hwnd, XEvent *xev )
1451 {
1452 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
1453     XGenericEventCookie *event = &xev->xcookie;
1454
1455     if (!event->data) return;
1456     if (event->extension != xinput2_opcode) return;
1457
1458     switch (event->evtype)
1459     {
1460     case XI_RawButtonPress:
1461         X11DRV_RawButtonPress( event->data );
1462         break;
1463
1464     case XI_RawButtonRelease:
1465         X11DRV_RawButtonRelease( event->data );
1466         break;
1467
1468     case XI_RawMotion:
1469         X11DRV_RawMotion( event->data );
1470         break;
1471
1472     default:
1473         TRACE( "Unhandled event %#x\n", event->evtype );
1474         break;
1475     }
1476 #endif
1477 }