winex11: Use the create_pixmap_from_image helper to create monochrome cursors.
[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 static int xinput2_device_count;
135 static XIDeviceInfo *xinput2_devices;
136 #define MAKE_FUNCPTR(f) static typeof(f) * p##f
137 MAKE_FUNCPTR(XIFreeDeviceInfo);
138 MAKE_FUNCPTR(XIQueryDevice);
139 MAKE_FUNCPTR(XIQueryVersion);
140 MAKE_FUNCPTR(XISelectEvents);
141 #undef MAKE_FUNCPTR
142 #endif
143
144 /***********************************************************************
145  *              X11DRV_Xcursor_Init
146  *
147  * Load the Xcursor library for use.
148  */
149 void X11DRV_Xcursor_Init(void)
150 {
151 #ifdef SONAME_LIBXCURSOR
152     xcursor_handle = wine_dlopen(SONAME_LIBXCURSOR, RTLD_NOW, NULL, 0);
153     if (!xcursor_handle)  /* wine_dlopen failed. */
154     {
155         WARN("Xcursor failed to load.  Using fallback code.\n");
156         return;
157     }
158 #define LOAD_FUNCPTR(f) \
159         p##f = wine_dlsym(xcursor_handle, #f, NULL, 0)
160
161     LOAD_FUNCPTR(XcursorImageCreate);
162     LOAD_FUNCPTR(XcursorImageDestroy);
163     LOAD_FUNCPTR(XcursorImageLoadCursor);
164     LOAD_FUNCPTR(XcursorImagesCreate);
165     LOAD_FUNCPTR(XcursorImagesDestroy);
166     LOAD_FUNCPTR(XcursorImagesLoadCursor);
167     LOAD_FUNCPTR(XcursorLibraryLoadCursor);
168 #undef LOAD_FUNCPTR
169 #endif /* SONAME_LIBXCURSOR */
170 }
171
172
173 /***********************************************************************
174  *              get_empty_cursor
175  */
176 static Cursor get_empty_cursor(void)
177 {
178     static Cursor cursor;
179     static const char data[] = { 0 };
180
181     wine_tsx11_lock();
182     if (!cursor)
183     {
184         XColor bg;
185         Pixmap pixmap;
186
187         bg.red = bg.green = bg.blue = 0x0000;
188         pixmap = XCreateBitmapFromData( gdi_display, root_window, data, 1, 1 );
189         if (pixmap)
190         {
191             cursor = XCreatePixmapCursor( gdi_display, pixmap, pixmap, &bg, &bg, 0, 0 );
192             XFreePixmap( gdi_display, pixmap );
193         }
194     }
195     wine_tsx11_unlock();
196     return cursor;
197 }
198
199 /***********************************************************************
200  *              set_window_cursor
201  */
202 void set_window_cursor( Window window, HCURSOR handle )
203 {
204     Cursor cursor, prev;
205
206     wine_tsx11_lock();
207     if (!handle) cursor = get_empty_cursor();
208     else if (!cursor_context || XFindContext( gdi_display, (XID)handle, cursor_context, (char **)&cursor ))
209     {
210         /* try to create it */
211         wine_tsx11_unlock();
212         if (!(cursor = create_cursor( handle ))) return;
213
214         wine_tsx11_lock();
215         if (!cursor_context) cursor_context = XUniqueContext();
216         if (!XFindContext( gdi_display, (XID)handle, cursor_context, (char **)&prev ))
217         {
218             /* someone else was here first */
219             XFreeCursor( gdi_display, cursor );
220             cursor = prev;
221         }
222         else
223         {
224             XSaveContext( gdi_display, (XID)handle, cursor_context, (char *)cursor );
225             TRACE( "cursor %p created %lx\n", handle, cursor );
226         }
227     }
228
229     XDefineCursor( gdi_display, window, cursor );
230     /* make the change take effect immediately */
231     XFlush( gdi_display );
232     wine_tsx11_unlock();
233 }
234
235 /***********************************************************************
236  *              sync_window_cursor
237  */
238 void sync_window_cursor( Window window )
239 {
240     HCURSOR cursor;
241
242     SERVER_START_REQ( set_cursor )
243     {
244         req->flags = 0;
245         wine_server_call( req );
246         cursor = reply->prev_count >= 0 ? wine_server_ptr_handle( reply->prev_handle ) : 0;
247     }
248     SERVER_END_REQ;
249
250     set_window_cursor( window, cursor );
251 }
252
253 /***********************************************************************
254  *              enable_xinput2
255  */
256 static void enable_xinput2(void)
257 {
258 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
259     struct x11drv_thread_data *data = x11drv_thread_data();
260     XIEventMask mask;
261     unsigned char mask_bits[XIMaskLen(XI_LASTEVENT)];
262     int i, j;
263
264     if (!xinput2_available) return;
265
266     if (data->xi2_state == xi_unknown)
267     {
268         int major = 2, minor = 0;
269         wine_tsx11_lock();
270         if (!pXIQueryVersion( data->display, &major, &minor )) data->xi2_state = xi_disabled;
271         else
272         {
273             data->xi2_state = xi_unavailable;
274             WARN( "X Input 2 not available\n" );
275         }
276         wine_tsx11_unlock();
277     }
278     if (data->xi2_state == xi_unavailable) return;
279
280     wine_tsx11_lock();
281     if (xinput2_devices) pXIFreeDeviceInfo( xinput2_devices );
282     xinput2_devices = pXIQueryDevice( data->display, XIAllDevices, &xinput2_device_count );
283     for (i = 0; i < xinput2_device_count; ++i)
284     {
285         if (xinput2_devices[i].use != XIMasterPointer) continue;
286         for (j = 0; j < xinput2_devices[i].num_classes; j++)
287         {
288             XIValuatorClassInfo *class = (XIValuatorClassInfo *)xinput2_devices[i].classes[j];
289
290             if (xinput2_devices[i].classes[j]->type != XIValuatorClass) continue;
291             if (class->number != 0 && class->number != 1) continue;
292             TRACE( "Device %u (%s) class %u num %u %f,%f res %u mode %u\n",
293                    xinput2_devices[i].deviceid, debugstr_a(xinput2_devices[i].name),
294                    j, class->number, class->min, class->max, class->resolution, class->mode );
295             if (class->mode == XIModeAbsolute)
296             {
297                 TRACE( "Device is absolute, not enabling XInput2\n" );
298                 goto done;
299             }
300         }
301         TRACE( "Using %u (%s) as core pointer\n",
302                xinput2_devices[i].deviceid, debugstr_a(xinput2_devices[i].name) );
303         xinput2_core_pointer = xinput2_devices[i].deviceid;
304         break;
305     }
306
307     mask.mask     = mask_bits;
308     mask.mask_len = sizeof(mask_bits);
309     memset( mask_bits, 0, sizeof(mask_bits) );
310     XISetMask( mask_bits, XI_RawMotion );
311     XISetMask( mask_bits, XI_ButtonPress );
312
313     for (i = 0; i < xinput2_device_count; ++i)
314     {
315         if (xinput2_devices[i].use == XISlavePointer &&
316             xinput2_devices[i].attachment == xinput2_core_pointer)
317         {
318             TRACE( "Device %u (%s) is attached to the core pointer\n",
319                    xinput2_devices[i].deviceid, debugstr_a(xinput2_devices[i].name) );
320             mask.deviceid = xinput2_devices[i].deviceid;
321             pXISelectEvents( data->display, DefaultRootWindow( data->display ), &mask, 1 );
322             data->xi2_state = xi_enabled;
323         }
324     }
325
326 done:
327     wine_tsx11_unlock();
328 #endif
329 }
330
331 /***********************************************************************
332  *              disable_xinput2
333  */
334 static void disable_xinput2(void)
335 {
336 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
337     struct x11drv_thread_data *data = x11drv_thread_data();
338     XIEventMask mask;
339     int i;
340
341     if (data->xi2_state != xi_enabled) return;
342
343     TRACE( "disabling\n" );
344     data->xi2_state = xi_disabled;
345
346     mask.mask = NULL;
347     mask.mask_len = 0;
348
349     wine_tsx11_lock();
350     for (i = 0; i < xinput2_device_count; ++i)
351     {
352         if (xinput2_devices[i].use == XISlavePointer &&
353             xinput2_devices[i].attachment == xinput2_core_pointer)
354         {
355             mask.deviceid = xinput2_devices[i].deviceid;
356             pXISelectEvents( data->display, DefaultRootWindow( data->display ), &mask, 1 );
357         }
358     }
359     pXIFreeDeviceInfo( xinput2_devices );
360     xinput2_devices = NULL;
361     xinput2_device_count = 0;
362     wine_tsx11_unlock();
363 #endif
364 }
365
366
367 /***********************************************************************
368  *              grab_clipping_window
369  *
370  * Start a pointer grab on the clip window.
371  */
372 static BOOL grab_clipping_window( const RECT *clip )
373 {
374     static const WCHAR messageW[] = {'M','e','s','s','a','g','e',0};
375     struct x11drv_thread_data *data = x11drv_thread_data();
376     Window clip_window;
377     HWND msg_hwnd = 0;
378
379     if (!data) return FALSE;
380     if (!(clip_window = init_clip_window())) return TRUE;
381
382     if (!(msg_hwnd = CreateWindowW( messageW, NULL, 0, 0, 0, 0, 0, HWND_MESSAGE, 0,
383                                     GetModuleHandleW(0), NULL )))
384         return TRUE;
385
386     /* enable XInput2 unless we are already clipping */
387     if (!data->clip_hwnd) enable_xinput2();
388
389     if (data->xi2_state != xi_enabled)
390     {
391         WARN( "XInput2 not supported, refusing to clip to %s\n", wine_dbgstr_rect(clip) );
392         DestroyWindow( msg_hwnd );
393         ClipCursor( NULL );
394         return TRUE;
395     }
396
397     TRACE( "clipping to %s win %lx\n", wine_dbgstr_rect(clip), clip_window );
398
399     wine_tsx11_lock();
400     if (!data->clip_hwnd) XUnmapWindow( data->display, clip_window );
401     XMoveResizeWindow( data->display, clip_window,
402                        clip->left - virtual_screen_rect.left, clip->top - virtual_screen_rect.top,
403                        max( 1, clip->right - clip->left ), max( 1, clip->bottom - clip->top ) );
404     XMapWindow( data->display, clip_window );
405
406     /* if the rectangle is shrinking we may get a pointer warp */
407     if (!data->clip_hwnd || clip->left > clip_rect.left || clip->top > clip_rect.top ||
408         clip->right < clip_rect.right || clip->bottom < clip_rect.bottom)
409         data->warp_serial = NextRequest( data->display );
410
411     if (!XGrabPointer( data->display, clip_window, False,
412                        PointerMotionMask | ButtonPressMask | ButtonReleaseMask,
413                        GrabModeAsync, GrabModeAsync, clip_window, None, CurrentTime ))
414         clipping_cursor = 1;
415     wine_tsx11_unlock();
416
417     if (!clipping_cursor)
418     {
419         disable_xinput2();
420         DestroyWindow( msg_hwnd );
421         return FALSE;
422     }
423     clip_rect = *clip;
424     if (!data->clip_hwnd) sync_window_cursor( clip_window );
425     InterlockedExchangePointer( (void **)&cursor_window, msg_hwnd );
426     data->clip_hwnd = msg_hwnd;
427     SendMessageW( GetDesktopWindow(), WM_X11DRV_CLIP_CURSOR, 0, (LPARAM)msg_hwnd );
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  *              reset_clipping_window
453  *
454  * Forcibly reset the window clipping on external events.
455  */
456 void reset_clipping_window(void)
457 {
458     ungrab_clipping_window();
459     ClipCursor( NULL );  /* make sure the clip rectangle is reset too */
460 }
461
462 /***********************************************************************
463  *             clip_cursor_notify
464  *
465  * Notification function called upon receiving a WM_X11DRV_CLIP_CURSOR.
466  */
467 LRESULT clip_cursor_notify( HWND hwnd, HWND new_clip_hwnd )
468 {
469     struct x11drv_thread_data *data = x11drv_thread_data();
470
471     if (hwnd == GetDesktopWindow())  /* change the clip window stored in the desktop process */
472     {
473         static HWND clip_hwnd;
474
475         HWND prev = clip_hwnd;
476         clip_hwnd = new_clip_hwnd;
477         if (prev || new_clip_hwnd) TRACE( "clip hwnd changed from %p to %p\n", prev, new_clip_hwnd );
478         if (prev) SendNotifyMessageW( prev, WM_X11DRV_CLIP_CURSOR, 0, 0 );
479     }
480     else if (hwnd == data->clip_hwnd)  /* this is a notification that clipping has been reset */
481     {
482         TRACE( "clip hwnd reset from %p\n", hwnd );
483         data->clip_hwnd = 0;
484         data->clip_reset = GetTickCount();
485         disable_xinput2();
486         DestroyWindow( hwnd );
487     }
488     else if (hwnd == GetForegroundWindow())  /* request to clip */
489     {
490         RECT clip;
491
492         GetClipCursor( &clip );
493         if (clip.left > virtual_screen_rect.left || clip.right < virtual_screen_rect.right ||
494             clip.top > virtual_screen_rect.top   || clip.bottom < virtual_screen_rect.bottom)
495             return grab_clipping_window( &clip );
496     }
497     return 0;
498 }
499
500 /***********************************************************************
501  *              clip_fullscreen_window
502  *
503  * Turn on clipping if the active window is fullscreen.
504  */
505 BOOL clip_fullscreen_window( HWND hwnd, BOOL reset )
506 {
507     struct x11drv_win_data *data;
508     struct x11drv_thread_data *thread_data;
509     RECT rect;
510     DWORD style;
511
512     if (hwnd == GetDesktopWindow()) return FALSE;
513     if (!(data = X11DRV_get_win_data( hwnd ))) return FALSE;
514     style = GetWindowLongW( hwnd, GWL_STYLE );
515     if (!(style & WS_VISIBLE)) return FALSE;
516     if ((style & (WS_POPUP | WS_CHILD)) == WS_CHILD) return FALSE;
517     /* maximized windows don't count as full screen */
518     if ((style & WS_MAXIMIZE) && (style & WS_CAPTION) == WS_CAPTION) return FALSE;
519     if (!is_window_rect_fullscreen( &data->whole_rect )) return FALSE;
520     if (!(thread_data = x11drv_thread_data())) return FALSE;
521     if (GetTickCount() - thread_data->clip_reset < 1000) return FALSE;
522     if (!reset && clipping_cursor && thread_data->clip_hwnd) return FALSE;  /* already clipping */
523     SetRect( &rect, 0, 0, screen_width, screen_height );
524     if (!grab_fullscreen)
525     {
526         if (!EqualRect( &rect, &virtual_screen_rect )) return FALSE;
527         if (root_window != DefaultRootWindow( gdi_display )) return FALSE;
528     }
529     TRACE( "win %p clipping fullscreen\n", hwnd );
530     return grab_clipping_window( &rect );
531 }
532
533 /***********************************************************************
534  *              send_mouse_input
535  *
536  * Update the various window states on a mouse event.
537  */
538 static void send_mouse_input( HWND hwnd, Window window, unsigned int state, INPUT *input )
539 {
540     struct x11drv_win_data *data;
541     POINT pt;
542
543     input->type = INPUT_MOUSE;
544
545     if (!hwnd)
546     {
547         struct x11drv_thread_data *thread_data = x11drv_thread_data();
548         HWND clip_hwnd = thread_data->clip_hwnd;
549
550         if (!clip_hwnd) return;
551         if (thread_data->clip_window != window) return;
552         if (InterlockedExchangePointer( (void **)&cursor_window, clip_hwnd ) != clip_hwnd ||
553             input->u.mi.time - last_cursor_change > 100)
554         {
555             sync_window_cursor( window );
556             last_cursor_change = input->u.mi.time;
557         }
558         input->u.mi.dx += clip_rect.left;
559         input->u.mi.dy += clip_rect.top;
560         __wine_send_input( hwnd, input );
561         return;
562     }
563
564     if (!(data = X11DRV_get_win_data( hwnd ))) return;
565
566     if (window == data->whole_window)
567     {
568         input->u.mi.dx += data->whole_rect.left - data->client_rect.left;
569         input->u.mi.dy += data->whole_rect.top - data->client_rect.top;
570     }
571     if (window == root_window)
572     {
573         input->u.mi.dx += virtual_screen_rect.left;
574         input->u.mi.dy += virtual_screen_rect.top;
575     }
576     pt.x = input->u.mi.dx;
577     pt.y = input->u.mi.dy;
578     if (GetWindowLongW( data->hwnd, GWL_EXSTYLE ) & WS_EX_LAYOUTRTL)
579         pt.x = data->client_rect.right - data->client_rect.left - 1 - pt.x;
580     MapWindowPoints( hwnd, 0, &pt, 1 );
581
582     if (InterlockedExchangePointer( (void **)&cursor_window, hwnd ) != hwnd ||
583         input->u.mi.time - last_cursor_change > 100)
584     {
585         sync_window_cursor( data->whole_window );
586         last_cursor_change = input->u.mi.time;
587     }
588
589     if (hwnd != GetDesktopWindow())
590     {
591         hwnd = GetAncestor( hwnd, GA_ROOT );
592         if ((input->u.mi.dwFlags & (MOUSEEVENTF_LEFTDOWN|MOUSEEVENTF_RIGHTDOWN)) && hwnd == GetForegroundWindow())
593             clip_fullscreen_window( hwnd, FALSE );
594     }
595
596     /* update the wine server Z-order */
597
598     if (window != x11drv_thread_data()->grab_window &&
599         /* ignore event if a button is pressed, since the mouse is then grabbed too */
600         !(state & (Button1Mask|Button2Mask|Button3Mask|Button4Mask|Button5Mask|Button6Mask|Button7Mask)))
601     {
602         RECT rect;
603         SetRect( &rect, pt.x, pt.y, pt.x + 1, pt.y + 1 );
604         MapWindowPoints( 0, hwnd, (POINT *)&rect, 2 );
605
606         SERVER_START_REQ( update_window_zorder )
607         {
608             req->window      = wine_server_user_handle( hwnd );
609             req->rect.left   = rect.left;
610             req->rect.top    = rect.top;
611             req->rect.right  = rect.right;
612             req->rect.bottom = rect.bottom;
613             wine_server_call( req );
614         }
615         SERVER_END_REQ;
616     }
617
618     input->u.mi.dx = pt.x;
619     input->u.mi.dy = pt.y;
620     __wine_send_input( hwnd, input );
621 }
622
623 #ifdef SONAME_LIBXCURSOR
624
625 /***********************************************************************
626  *              create_xcursor_frame
627  *
628  * Use Xcursor to create a frame of an X cursor from a Windows one.
629  */
630 static XcursorImage *create_xcursor_frame( HDC hdc, const ICONINFOEXW *iinfo, HANDLE icon,
631                                            HBITMAP hbmColor, unsigned char *color_bits, int color_size,
632                                            HBITMAP hbmMask, unsigned char *mask_bits, int mask_size,
633                                            int width, int height, int istep )
634 {
635     XcursorImage *image, *ret = NULL;
636     DWORD delay_jiffies, num_steps;
637     int x, y, i, has_alpha = FALSE;
638     XcursorPixel *ptr;
639
640     wine_tsx11_lock();
641     image = pXcursorImageCreate( width, height );
642     wine_tsx11_unlock();
643     if (!image)
644     {
645         ERR("X11 failed to produce a cursor frame!\n");
646         goto cleanup;
647     }
648
649     image->xhot = iinfo->xHotspot;
650     image->yhot = iinfo->yHotspot;
651
652     image->delay = 100; /* fallback delay, 100 ms */
653     if (GetCursorFrameInfo(icon, 0x0 /* unknown parameter */, istep, &delay_jiffies, &num_steps) != 0)
654         image->delay = (100 * delay_jiffies) / 6; /* convert jiffies (1/60s) to milliseconds */
655     else
656         WARN("Failed to retrieve animated cursor frame-rate for frame %d.\n", istep);
657
658     /* draw the cursor frame to a temporary buffer then copy it into the XcursorImage */
659     memset( color_bits, 0x00, color_size );
660     SelectObject( hdc, hbmColor );
661     if (!DrawIconEx( hdc, 0, 0, icon, width, height, istep, NULL, DI_NORMAL ))
662     {
663         TRACE("Could not draw frame %d (walk past end of frames).\n", istep);
664         goto cleanup;
665     }
666     memcpy( image->pixels, color_bits, color_size );
667
668     /* check if the cursor frame was drawn with an alpha channel */
669     for (i = 0, ptr = image->pixels; i < width * height; i++, ptr++)
670         if ((has_alpha = (*ptr & 0xff000000) != 0)) break;
671
672     /* if no alpha channel was drawn then generate it from the mask */
673     if (!has_alpha)
674     {
675         unsigned int width_bytes = (width + 31) / 32 * 4;
676
677         /* draw the cursor mask to a temporary buffer */
678         memset( mask_bits, 0xFF, mask_size );
679         SelectObject( hdc, hbmMask );
680         if (!DrawIconEx( hdc, 0, 0, icon, width, height, istep, NULL, DI_MASK ))
681         {
682             ERR("Failed to draw frame mask %d.\n", istep);
683             goto cleanup;
684         }
685         /* use the buffer to directly modify the XcursorImage alpha channel */
686         for (y = 0, ptr = image->pixels; y < height; y++)
687             for (x = 0; x < width; x++, ptr++)
688                 if (!((mask_bits[y * width_bytes + x / 8] << (x % 8)) & 0x80))
689                     *ptr |= 0xff000000;
690     }
691     ret = image;
692
693 cleanup:
694     if (ret == NULL) pXcursorImageDestroy( image );
695     return ret;
696 }
697
698 /***********************************************************************
699  *              create_xcursor_cursor
700  *
701  * Use Xcursor to create an X cursor from a Windows one.
702  */
703 static Cursor create_xcursor_cursor( HDC hdc, const ICONINFOEXW *iinfo, HANDLE icon, int width, int height )
704 {
705     unsigned char *color_bits, *mask_bits;
706     HBITMAP hbmColor = 0, hbmMask = 0;
707     DWORD nFrames, delay_jiffies, i;
708     int color_size, mask_size;
709     BITMAPINFO *info = NULL;
710     XcursorImages *images;
711     XcursorImage **imgs;
712     Cursor cursor = 0;
713
714     /* Retrieve the number of frames to render */
715     if (!GetCursorFrameInfo(icon, 0x0 /* unknown parameter */, 0, &delay_jiffies, &nFrames)) return 0;
716     if (!(imgs = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(XcursorImage*)*nFrames ))) return 0;
717
718     /* Allocate all of the resources necessary to obtain a cursor frame */
719     if (!(info = HeapAlloc( GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO, bmiColors[256] )))) goto cleanup;
720     info->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
721     info->bmiHeader.biWidth = width;
722     info->bmiHeader.biHeight = -height;
723     info->bmiHeader.biPlanes = 1;
724     info->bmiHeader.biCompression = BI_RGB;
725     info->bmiHeader.biXPelsPerMeter = 0;
726     info->bmiHeader.biYPelsPerMeter = 0;
727     info->bmiHeader.biClrUsed = 0;
728     info->bmiHeader.biClrImportant = 0;
729     info->bmiHeader.biBitCount = 32;
730     color_size = width * height * 4;
731     info->bmiHeader.biSizeImage = color_size;
732     hbmColor = CreateDIBSection( hdc, info, DIB_RGB_COLORS, (VOID **) &color_bits, NULL, 0);
733     if (!hbmColor)
734     {
735         ERR("Failed to create DIB section for cursor color data!\n");
736         goto cleanup;
737     }
738     info->bmiHeader.biBitCount = 1;
739     info->bmiColors[0].rgbRed      = 0;
740     info->bmiColors[0].rgbGreen    = 0;
741     info->bmiColors[0].rgbBlue     = 0;
742     info->bmiColors[0].rgbReserved = 0;
743     info->bmiColors[1].rgbRed      = 0xff;
744     info->bmiColors[1].rgbGreen    = 0xff;
745     info->bmiColors[1].rgbBlue     = 0xff;
746     info->bmiColors[1].rgbReserved = 0;
747
748     mask_size = ((width + 31) / 32 * 4) * height; /* width_bytes * height */
749     info->bmiHeader.biSizeImage = mask_size;
750     hbmMask = CreateDIBSection( hdc, info, DIB_RGB_COLORS, (VOID **) &mask_bits, NULL, 0);
751     if (!hbmMask)
752     {
753         ERR("Failed to create DIB section for cursor mask data!\n");
754         goto cleanup;
755     }
756
757     /* Create an XcursorImage for each frame of the cursor */
758     for (i=0; i<nFrames; i++)
759     {
760         imgs[i] = create_xcursor_frame( hdc, iinfo, icon,
761                                         hbmColor, color_bits, color_size,
762                                         hbmMask, mask_bits, mask_size,
763                                         width, height, i );
764         if (!imgs[i]) goto cleanup;
765     }
766
767     /* Build an X cursor out of all of the frames */
768     if (!(images = pXcursorImagesCreate( nFrames ))) goto cleanup;
769     for (images->nimage = 0; images->nimage < nFrames; images->nimage++)
770         images->images[images->nimage] = imgs[images->nimage];
771     wine_tsx11_lock();
772     cursor = pXcursorImagesLoadCursor( gdi_display, images );
773     wine_tsx11_unlock();
774     pXcursorImagesDestroy( images ); /* Note: this frees each individual frame (calls XcursorImageDestroy) */
775     HeapFree( GetProcessHeap(), 0, imgs );
776     imgs = NULL;
777
778 cleanup:
779     if (imgs)
780     {
781         /* Failed to produce a cursor, free previously allocated frames */
782         for (i=0; i<nFrames && imgs[i]; i++)
783             pXcursorImageDestroy( imgs[i] );
784         HeapFree( GetProcessHeap(), 0, imgs );
785     }
786     /* Cleanup all of the resources used to obtain the frame data */
787     if (hbmColor) DeleteObject( hbmColor );
788     if (hbmMask) DeleteObject( hbmMask );
789     HeapFree( GetProcessHeap(), 0, info );
790     return cursor;
791 }
792
793
794 struct system_cursors
795 {
796     WORD id;
797     const char *name;
798 };
799
800 static const struct system_cursors user32_cursors[] =
801 {
802     { OCR_NORMAL,      "left_ptr" },
803     { OCR_IBEAM,       "xterm" },
804     { OCR_WAIT,        "watch" },
805     { OCR_CROSS,       "cross" },
806     { OCR_UP,          "center_ptr" },
807     { OCR_SIZE,        "fleur" },
808     { OCR_SIZEALL,     "fleur" },
809     { OCR_ICON,        "icon" },
810     { OCR_SIZENWSE,    "nwse-resize" },
811     { OCR_SIZENESW,    "nesw-resize" },
812     { OCR_SIZEWE,      "ew-resize" },
813     { OCR_SIZENS,      "ns-resize" },
814     { OCR_NO,          "not-allowed" },
815     { OCR_HAND,        "hand2" },
816     { OCR_APPSTARTING, "left_ptr_watch" },
817     { OCR_HELP,        "question_arrow" },
818     { 0 }
819 };
820
821 static const struct system_cursors comctl32_cursors[] =
822 {
823     { 102, "move" },
824     { 104, "copy" },
825     { 105, "left_ptr" },
826     { 106, "row-resize" },
827     { 107, "row-resize" },
828     { 108, "hand2" },
829     { 135, "col-resize" },
830     { 0 }
831 };
832
833 static const struct system_cursors ole32_cursors[] =
834 {
835     { 1, "no-drop" },
836     { 2, "move" },
837     { 3, "copy" },
838     { 4, "alias" },
839     { 0 }
840 };
841
842 static const struct system_cursors riched20_cursors[] =
843 {
844     { 105, "hand2" },
845     { 107, "right_ptr" },
846     { 109, "copy" },
847     { 110, "move" },
848     { 111, "no-drop" },
849     { 0 }
850 };
851
852 static const struct
853 {
854     const struct system_cursors *cursors;
855     WCHAR name[16];
856 } module_cursors[] =
857 {
858     { user32_cursors, {'u','s','e','r','3','2','.','d','l','l',0} },
859     { comctl32_cursors, {'c','o','m','c','t','l','3','2','.','d','l','l',0} },
860     { ole32_cursors, {'o','l','e','3','2','.','d','l','l',0} },
861     { riched20_cursors, {'r','i','c','h','e','d','2','0','.','d','l','l',0} }
862 };
863
864 /***********************************************************************
865  *              create_xcursor_system_cursor
866  *
867  * Create an X cursor for a system cursor.
868  */
869 static Cursor create_xcursor_system_cursor( const ICONINFOEXW *info )
870 {
871     static const WCHAR idW[] = {'%','h','u',0};
872     const struct system_cursors *cursors;
873     unsigned int i;
874     Cursor cursor = 0;
875     HMODULE module;
876     HKEY key;
877     WCHAR *p, name[MAX_PATH * 2], valueW[64];
878     char valueA[64];
879     DWORD size, ret;
880
881     if (!pXcursorLibraryLoadCursor) return 0;
882     if (!info->szModName[0]) return 0;
883
884     p = strrchrW( info->szModName, '\\' );
885     strcpyW( name, p ? p + 1 : info->szModName );
886     p = name + strlenW( name );
887     *p++ = ',';
888     if (info->szResName[0]) strcpyW( p, info->szResName );
889     else sprintfW( p, idW, info->wResID );
890     valueA[0] = 0;
891
892     /* @@ Wine registry key: HKCU\Software\Wine\X11 Driver\Cursors */
893     if (!RegOpenKeyA( HKEY_CURRENT_USER, "Software\\Wine\\X11 Driver\\Cursors", &key ))
894     {
895         size = sizeof(valueW) / sizeof(WCHAR);
896         ret = RegQueryValueExW( key, name, NULL, NULL, (BYTE *)valueW, &size );
897         RegCloseKey( key );
898         if (!ret)
899         {
900             if (!valueW[0]) return 0; /* force standard cursor */
901             if (!WideCharToMultiByte( CP_UNIXCP, 0, valueW, -1, valueA, sizeof(valueA), NULL, NULL ))
902                 valueA[0] = 0;
903             goto done;
904         }
905     }
906
907     if (info->szResName[0]) goto done;  /* only integer resources are supported here */
908     if (!(module = GetModuleHandleW( info->szModName ))) goto done;
909
910     for (i = 0; i < sizeof(module_cursors)/sizeof(module_cursors[0]); i++)
911         if (GetModuleHandleW( module_cursors[i].name ) == module) break;
912     if (i == sizeof(module_cursors)/sizeof(module_cursors[0])) goto done;
913
914     cursors = module_cursors[i].cursors;
915     for (i = 0; cursors[i].id; i++)
916         if (cursors[i].id == info->wResID)
917         {
918             strcpy( valueA, cursors[i].name );
919             break;
920         }
921
922 done:
923     if (valueA[0])
924     {
925         wine_tsx11_lock();
926         cursor = pXcursorLibraryLoadCursor( gdi_display, valueA );
927         wine_tsx11_unlock();
928         if (!cursor) WARN( "no system cursor found for %s mapped to %s\n",
929                            debugstr_w(name), debugstr_a(valueA) );
930     }
931     else WARN( "no system cursor found for %s\n", debugstr_w(name) );
932     return cursor;
933 }
934
935 #endif /* SONAME_LIBXCURSOR */
936
937
938 /***********************************************************************
939  *              create_xlib_monochrome_cursor
940  *
941  * Create a monochrome X cursor from a Windows one.
942  */
943 static Cursor create_xlib_monochrome_cursor( HDC hdc, const ICONINFOEXW *icon, int width, int height )
944 {
945     char buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
946     BITMAPINFO *info = (BITMAPINFO *)buffer;
947     const int and_y = 0;
948     const int xor_y = height;
949     unsigned int width_bytes = (width + 31) / 32 * 4;
950     unsigned char *mask_bits = NULL;
951     GC gc;
952     XColor fg, bg;
953     XVisualInfo vis;
954     Pixmap src_pixmap, bits_pixmap, mask_pixmap;
955     struct gdi_image_bits bits;
956     Cursor cursor = 0;
957
958     info->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
959     info->bmiHeader.biWidth = width;
960     info->bmiHeader.biHeight = -height * 2;
961     info->bmiHeader.biPlanes = 1;
962     info->bmiHeader.biBitCount = 1;
963     info->bmiHeader.biCompression = BI_RGB;
964     info->bmiHeader.biSizeImage = width_bytes * height * 2;
965     info->bmiHeader.biXPelsPerMeter = 0;
966     info->bmiHeader.biYPelsPerMeter = 0;
967     info->bmiHeader.biClrUsed = 0;
968     info->bmiHeader.biClrImportant = 0;
969
970     if (!(mask_bits = HeapAlloc( GetProcessHeap(), 0, info->bmiHeader.biSizeImage ))) goto done;
971     if (!GetDIBits( hdc, icon->hbmMask, 0, height * 2, mask_bits, info, DIB_RGB_COLORS )) goto done;
972
973     vis.depth = 1;
974     bits.ptr = mask_bits;
975     bits.free = NULL;
976     bits.is_copy = TRUE;
977     if (!(src_pixmap = create_pixmap_from_image( hdc, &vis, info, &bits, DIB_RGB_COLORS ))) goto done;
978
979     wine_tsx11_lock();
980     bits_pixmap = XCreatePixmap( gdi_display, root_window, width, height, 1 );
981     mask_pixmap = XCreatePixmap( gdi_display, root_window, width, height, 1 );
982     gc = XCreateGC( gdi_display, src_pixmap, 0, NULL );
983     XSetGraphicsExposures( gdi_display, gc, False );
984
985     /* We have to do some magic here, as cursors are not fully
986      * compatible between Windows and X11. Under X11, there are
987      * only 3 possible color cursor: black, white and masked. So
988      * we map the 4th Windows color (invert the bits on the screen)
989      * to black and an additional white bit on another place
990      * (+1,+1). This require some boolean arithmetic:
991      *
992      *         Windows          |          X11
993      * And    Xor      Result   |   Bits     Mask     Result
994      *  0      0     black      |    0        1     background
995      *  0      1     white      |    1        1     foreground
996      *  1      0     no change  |    X        0     no change
997      *  1      1     inverted   |    0        1     background
998      *
999      * which gives:
1000      *  Bits = not 'And' and 'Xor' or 'And2' and 'Xor2'
1001      *  Mask = not 'And' or 'Xor' or 'And2' and 'Xor2'
1002      */
1003     XSetFunction( gdi_display, gc, GXcopy );
1004     XCopyArea( gdi_display, src_pixmap, bits_pixmap, gc, 0, and_y, width, height, 0, 0 );
1005     XCopyArea( gdi_display, src_pixmap, mask_pixmap, gc, 0, and_y, width, height, 0, 0 );
1006     XSetFunction( gdi_display, gc, GXandReverse );
1007     XCopyArea( gdi_display, src_pixmap, bits_pixmap, gc, 0, xor_y, width, height, 0, 0 );
1008     XSetFunction( gdi_display, gc, GXorReverse );
1009     XCopyArea( gdi_display, src_pixmap, mask_pixmap, gc, 0, xor_y, width, height, 0, 0 );
1010     /* additional white */
1011     XSetFunction( gdi_display, gc, GXand );
1012     XCopyArea( gdi_display, src_pixmap, src_pixmap,  gc, 0, xor_y, width, height, 0, and_y );
1013     XSetFunction( gdi_display, gc, GXor );
1014     XCopyArea( gdi_display, src_pixmap, mask_pixmap, gc, 0, and_y, width, height, 1, 1 );
1015     XCopyArea( gdi_display, src_pixmap, bits_pixmap, gc, 0, and_y, width, height, 1, 1 );
1016     XFreeGC( gdi_display, gc );
1017
1018     fg.red = fg.green = fg.blue = 0xffff;
1019     bg.red = bg.green = bg.blue = 0;
1020     cursor = XCreatePixmapCursor( gdi_display, bits_pixmap, mask_pixmap,
1021                                   &fg, &bg, icon->xHotspot, icon->yHotspot );
1022     XFreePixmap( gdi_display, src_pixmap );
1023     XFreePixmap( gdi_display, bits_pixmap );
1024     XFreePixmap( gdi_display, mask_pixmap );
1025     wine_tsx11_unlock();
1026
1027 done:
1028     HeapFree( GetProcessHeap(), 0, mask_bits );
1029     return cursor;
1030 }
1031
1032 /***********************************************************************
1033  *              create_xlib_color_cursor
1034  *
1035  * Create a color X cursor from a Windows one.
1036  */
1037 static Cursor create_xlib_color_cursor( HDC hdc, const ICONINFOEXW *icon, int width, int height )
1038 {
1039     char buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
1040     BITMAPINFO *info = (BITMAPINFO *)buffer;
1041     XColor fg, bg;
1042     Cursor cursor = None;
1043     XVisualInfo vis;
1044     Pixmap xor_pixmap, mask_pixmap;
1045     struct gdi_image_bits bits;
1046     unsigned int *color_bits = NULL, *ptr;
1047     unsigned char *mask_bits = NULL, *xor_bits = NULL;
1048     int i, x, y, has_alpha = 0;
1049     int rfg, gfg, bfg, rbg, gbg, bbg, fgBits, bgBits;
1050     unsigned int width_bytes = (width + 31) / 32 * 4;
1051
1052     info->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
1053     info->bmiHeader.biWidth = width;
1054     info->bmiHeader.biHeight = -height;
1055     info->bmiHeader.biPlanes = 1;
1056     info->bmiHeader.biBitCount = 1;
1057     info->bmiHeader.biCompression = BI_RGB;
1058     info->bmiHeader.biSizeImage = width_bytes * height;
1059     info->bmiHeader.biXPelsPerMeter = 0;
1060     info->bmiHeader.biYPelsPerMeter = 0;
1061     info->bmiHeader.biClrUsed = 0;
1062     info->bmiHeader.biClrImportant = 0;
1063
1064     if (!(mask_bits = HeapAlloc( GetProcessHeap(), 0, info->bmiHeader.biSizeImage ))) goto done;
1065     if (!GetDIBits( hdc, icon->hbmMask, 0, height, mask_bits, info, DIB_RGB_COLORS )) goto done;
1066
1067     info->bmiHeader.biBitCount = 32;
1068     info->bmiHeader.biSizeImage = width * height * 4;
1069     if (!(color_bits = HeapAlloc( GetProcessHeap(), 0, info->bmiHeader.biSizeImage ))) goto done;
1070     if (!(xor_bits = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, width_bytes * height ))) goto done;
1071     GetDIBits( hdc, icon->hbmColor, 0, height, color_bits, info, DIB_RGB_COLORS );
1072
1073     /* compute fg/bg color and xor bitmap based on average of the color values */
1074
1075     rfg = gfg = bfg = rbg = gbg = bbg = fgBits = 0;
1076     for (y = 0, ptr = color_bits; y < height; y++)
1077     {
1078         for (x = 0; x < width; x++, ptr++)
1079         {
1080             int red   = (*ptr >> 16) & 0xff;
1081             int green = (*ptr >> 8) & 0xff;
1082             int blue  = (*ptr >> 0) & 0xff;
1083             if (red + green + blue > 0x40)
1084             {
1085                 rfg += red;
1086                 gfg += green;
1087                 bfg += blue;
1088                 fgBits++;
1089                 xor_bits[y * width_bytes + x / 8] |= 0x80 >> (x % 8);
1090             }
1091             else
1092             {
1093                 rbg += red;
1094                 gbg += green;
1095                 bbg += blue;
1096             }
1097         }
1098     }
1099     if (fgBits)
1100     {
1101         fg.red   = rfg * 257 / fgBits;
1102         fg.green = gfg * 257 / fgBits;
1103         fg.blue  = bfg * 257 / fgBits;
1104     }
1105     else fg.red = fg.green = fg.blue = 0;
1106     bgBits = width * height - fgBits;
1107     if (bgBits)
1108     {
1109         bg.red   = rbg * 257 / bgBits;
1110         bg.green = gbg * 257 / bgBits;
1111         bg.blue  = bbg * 257 / bgBits;
1112     }
1113     else bg.red = bg.green = bg.blue = 0;
1114
1115     info->bmiHeader.biBitCount = 1;
1116     info->bmiHeader.biClrUsed = 0;
1117     info->bmiHeader.biSizeImage = width_bytes * height;
1118
1119     /* generate mask from the alpha channel if we have one */
1120
1121     for (i = 0, ptr = color_bits; i < width * height; i++, ptr++)
1122         if ((has_alpha = (*ptr & 0xff000000) != 0)) break;
1123
1124     if (has_alpha)
1125     {
1126         memset( mask_bits, 0, width_bytes * height );
1127         for (y = 0, ptr = color_bits; y < height; y++)
1128             for (x = 0; x < width; x++, ptr++)
1129                 if ((*ptr >> 24) > 25) /* more than 10% alpha */
1130                     mask_bits[y * width_bytes + x / 8] |= 0x80 >> (x % 8);
1131     }
1132     else  /* invert the mask */
1133     {
1134         ptr = (unsigned int *)mask_bits;
1135         for (i = 0; i < info->bmiHeader.biSizeImage / sizeof(*ptr); i++, ptr++) *ptr ^= ~0u;
1136     }
1137
1138     vis.depth = 1;
1139     bits.ptr = xor_bits;
1140     bits.free = NULL;
1141     bits.is_copy = TRUE;
1142     if (!(xor_pixmap = create_pixmap_from_image( hdc, &vis, info, &bits, DIB_RGB_COLORS ))) goto done;
1143
1144     bits.ptr = mask_bits;
1145     mask_pixmap = create_pixmap_from_image( hdc, &vis, info, &bits, DIB_RGB_COLORS );
1146
1147     wine_tsx11_lock();
1148     if (mask_pixmap)
1149     {
1150         cursor = XCreatePixmapCursor( gdi_display, xor_pixmap, mask_pixmap,
1151                                       &fg, &bg, icon->xHotspot, icon->yHotspot );
1152         XFreePixmap( gdi_display, mask_pixmap );
1153     }
1154     XFreePixmap( gdi_display, xor_pixmap );
1155     wine_tsx11_unlock();
1156
1157 done:
1158     HeapFree( GetProcessHeap(), 0, color_bits );
1159     HeapFree( GetProcessHeap(), 0, xor_bits );
1160     HeapFree( GetProcessHeap(), 0, mask_bits );
1161     return cursor;
1162 }
1163
1164 /***********************************************************************
1165  *              create_cursor
1166  *
1167  * Create an X cursor from a Windows one.
1168  */
1169 static Cursor create_cursor( HANDLE handle )
1170 {
1171     Cursor cursor = 0;
1172     ICONINFOEXW info;
1173     BITMAP bm;
1174     HDC hdc;
1175
1176     if (!handle) return get_empty_cursor();
1177
1178     info.cbSize = sizeof(info);
1179     if (!GetIconInfoExW( handle, &info )) return 0;
1180
1181 #ifdef SONAME_LIBXCURSOR
1182     if (use_system_cursors && (cursor = create_xcursor_system_cursor( &info )))
1183     {
1184         DeleteObject( info.hbmColor );
1185         DeleteObject( info.hbmMask );
1186         return cursor;
1187     }
1188 #endif
1189
1190     GetObjectW( info.hbmMask, sizeof(bm), &bm );
1191     if (!info.hbmColor) bm.bmHeight = max( 1, bm.bmHeight / 2 );
1192
1193     /* make sure hotspot is valid */
1194     if (info.xHotspot >= bm.bmWidth || info.yHotspot >= bm.bmHeight)
1195     {
1196         info.xHotspot = bm.bmWidth / 2;
1197         info.yHotspot = bm.bmHeight / 2;
1198     }
1199
1200     hdc = CreateCompatibleDC( 0 );
1201
1202     if (info.hbmColor)
1203     {
1204 #ifdef SONAME_LIBXCURSOR
1205         if (pXcursorImagesLoadCursor)
1206             cursor = create_xcursor_cursor( hdc, &info, handle, bm.bmWidth, bm.bmHeight );
1207 #endif
1208         if (!cursor) cursor = create_xlib_color_cursor( hdc, &info, bm.bmWidth, bm.bmHeight );
1209         DeleteObject( info.hbmColor );
1210     }
1211     else
1212     {
1213         cursor = create_xlib_monochrome_cursor( hdc, &info, bm.bmWidth, bm.bmHeight );
1214     }
1215
1216     DeleteObject( info.hbmMask );
1217     DeleteDC( hdc );
1218     return cursor;
1219 }
1220
1221 /***********************************************************************
1222  *              DestroyCursorIcon (X11DRV.@)
1223  */
1224 void CDECL X11DRV_DestroyCursorIcon( HCURSOR handle )
1225 {
1226     Cursor cursor;
1227
1228     wine_tsx11_lock();
1229     if (cursor_context && !XFindContext( gdi_display, (XID)handle, cursor_context, (char **)&cursor ))
1230     {
1231         TRACE( "%p xid %lx\n", handle, cursor );
1232         XFreeCursor( gdi_display, cursor );
1233         XDeleteContext( gdi_display, (XID)handle, cursor_context );
1234     }
1235     wine_tsx11_unlock();
1236 }
1237
1238 /***********************************************************************
1239  *              SetCursor (X11DRV.@)
1240  */
1241 void CDECL X11DRV_SetCursor( HCURSOR handle )
1242 {
1243     if (InterlockedExchangePointer( (void **)&last_cursor, handle ) != handle ||
1244         GetTickCount() - last_cursor_change > 100)
1245     {
1246         last_cursor_change = GetTickCount();
1247         if (cursor_window) SendNotifyMessageW( cursor_window, WM_X11DRV_SET_CURSOR, 0, (LPARAM)handle );
1248     }
1249 }
1250
1251 /***********************************************************************
1252  *              SetCursorPos (X11DRV.@)
1253  */
1254 BOOL CDECL X11DRV_SetCursorPos( INT x, INT y )
1255 {
1256     struct x11drv_thread_data *data = x11drv_init_thread_data();
1257
1258     wine_tsx11_lock();
1259     XWarpPointer( data->display, root_window, root_window, 0, 0, 0, 0,
1260                   x - virtual_screen_rect.left, y - virtual_screen_rect.top );
1261     data->warp_serial = NextRequest( data->display );
1262     XNoOp( data->display );
1263     XFlush( data->display ); /* avoids bad mouse lag in games that do their own mouse warping */
1264     wine_tsx11_unlock();
1265     TRACE( "warped to %d,%d serial %lu\n", x, y, data->warp_serial );
1266     return TRUE;
1267 }
1268
1269 /***********************************************************************
1270  *              GetCursorPos (X11DRV.@)
1271  */
1272 BOOL CDECL X11DRV_GetCursorPos(LPPOINT pos)
1273 {
1274     Display *display = thread_init_display();
1275     Window root, child;
1276     int rootX, rootY, winX, winY;
1277     unsigned int xstate;
1278     BOOL ret;
1279
1280     wine_tsx11_lock();
1281     ret = XQueryPointer( display, root_window, &root, &child, &rootX, &rootY, &winX, &winY, &xstate );
1282     if (ret)
1283     {
1284         POINT old = *pos;
1285         pos->x = winX + virtual_screen_rect.left;
1286         pos->y = winY + virtual_screen_rect.top;
1287         TRACE( "pointer at (%d,%d) server pos %d,%d\n", pos->x, pos->y, old.x, old.y );
1288     }
1289     wine_tsx11_unlock();
1290     return ret;
1291 }
1292
1293 /***********************************************************************
1294  *              ClipCursor (X11DRV.@)
1295  */
1296 BOOL CDECL X11DRV_ClipCursor( LPCRECT clip )
1297 {
1298     if (!clip)
1299     {
1300         ungrab_clipping_window();
1301         return TRUE;
1302     }
1303
1304     if (GetWindowThreadProcessId( GetDesktopWindow(), NULL ) == GetCurrentThreadId())
1305         return TRUE;  /* don't clip in the desktop process */
1306
1307     if (grab_pointer)
1308     {
1309         HWND foreground = GetForegroundWindow();
1310
1311         /* we are clipping if the clip rectangle is smaller than the screen */
1312         if (clip->left > virtual_screen_rect.left || clip->right < virtual_screen_rect.right ||
1313             clip->top > virtual_screen_rect.top || clip->bottom < virtual_screen_rect.bottom)
1314         {
1315             DWORD tid, pid;
1316
1317             /* forward request to the foreground window if it's in a different thread */
1318             tid = GetWindowThreadProcessId( foreground, &pid );
1319             if (tid && tid != GetCurrentThreadId() && pid == GetCurrentProcessId())
1320             {
1321                 TRACE( "forwarding clip request to %p\n", foreground );
1322                 SendNotifyMessageW( foreground, WM_X11DRV_CLIP_CURSOR, 0, 0 );
1323                 return TRUE;
1324             }
1325             else if (grab_clipping_window( clip )) return TRUE;
1326         }
1327         else /* if currently clipping, check if we should switch to fullscreen clipping */
1328         {
1329             struct x11drv_thread_data *data = x11drv_thread_data();
1330             if (data && data->clip_hwnd)
1331             {
1332                 if (EqualRect( clip, &clip_rect ) || clip_fullscreen_window( foreground, TRUE ))
1333                     return TRUE;
1334             }
1335         }
1336     }
1337     ungrab_clipping_window();
1338     return TRUE;
1339 }
1340
1341 /***********************************************************************
1342  *           move_resize_window
1343  */
1344 void move_resize_window( Display *display, struct x11drv_win_data *data, int dir )
1345 {
1346     DWORD pt;
1347     int x, y, rootX, rootY, ret, button = 0;
1348     XEvent xev;
1349     Window root, child;
1350     unsigned int xstate;
1351
1352     pt = GetMessagePos();
1353     x = (short)LOWORD( pt );
1354     y = (short)HIWORD( pt );
1355
1356     if (GetKeyState( VK_LBUTTON ) & 0x8000) button = 1;
1357     else if (GetKeyState( VK_MBUTTON ) & 0x8000) button = 2;
1358     else if (GetKeyState( VK_RBUTTON ) & 0x8000) button = 3;
1359
1360     TRACE( "hwnd %p/%lx, x %d, y %d, dir %d, button %d\n",
1361            data->hwnd, data->whole_window, x, y, dir, button );
1362
1363     xev.xclient.type = ClientMessage;
1364     xev.xclient.window = data->whole_window;
1365     xev.xclient.message_type = x11drv_atom(_NET_WM_MOVERESIZE);
1366     xev.xclient.serial = 0;
1367     xev.xclient.display = display;
1368     xev.xclient.send_event = True;
1369     xev.xclient.format = 32;
1370     xev.xclient.data.l[0] = x - virtual_screen_rect.left; /* x coord */
1371     xev.xclient.data.l[1] = y - virtual_screen_rect.top;  /* y coord */
1372     xev.xclient.data.l[2] = dir; /* direction */
1373     xev.xclient.data.l[3] = button; /* button */
1374     xev.xclient.data.l[4] = 0; /* unused */
1375
1376     /* need to ungrab the pointer that may have been automatically grabbed
1377      * with a ButtonPress event */
1378     wine_tsx11_lock();
1379     XUngrabPointer( display, CurrentTime );
1380     XSendEvent(display, root_window, False, SubstructureNotifyMask | SubstructureRedirectMask, &xev);
1381     wine_tsx11_unlock();
1382
1383     /* try to detect the end of the size/move by polling for the mouse button to be released */
1384     /* (some apps don't like it if we return before the size/move is done) */
1385
1386     if (!button) return;
1387     for (;;)
1388     {
1389         MSG msg;
1390         INPUT input;
1391
1392         wine_tsx11_lock();
1393         ret = XQueryPointer( display, root_window, &root, &child, &rootX, &rootY, &x, &y, &xstate );
1394         wine_tsx11_unlock();
1395         if (!ret) break;
1396
1397         if (!(xstate & (Button1Mask << (button - 1))))
1398         {
1399             /* fake a button release event */
1400             input.type = INPUT_MOUSE;
1401             input.u.mi.dx          = x + virtual_screen_rect.left;
1402             input.u.mi.dy          = y + virtual_screen_rect.top;
1403             input.u.mi.mouseData   = button_up_data[button - 1];
1404             input.u.mi.dwFlags     = button_up_flags[button - 1] | MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE;
1405             input.u.mi.time        = GetTickCount();
1406             input.u.mi.dwExtraInfo = 0;
1407             __wine_send_input( data->hwnd, &input );
1408         }
1409
1410         while (PeekMessageW( &msg, 0, 0, 0, PM_REMOVE ))
1411         {
1412             if (!CallMsgFilterW( &msg, MSGF_SIZE ))
1413             {
1414                 TranslateMessage( &msg );
1415                 DispatchMessageW( &msg );
1416             }
1417         }
1418
1419         if (!(xstate & (Button1Mask << (button - 1)))) break;
1420         MsgWaitForMultipleObjects( 0, NULL, FALSE, 100, QS_ALLINPUT );
1421     }
1422
1423     TRACE( "hwnd %p/%lx done\n", data->hwnd, data->whole_window );
1424 }
1425
1426
1427 /***********************************************************************
1428  *           X11DRV_ButtonPress
1429  */
1430 void X11DRV_ButtonPress( HWND hwnd, XEvent *xev )
1431 {
1432     XButtonEvent *event = &xev->xbutton;
1433     int buttonNum = event->button - 1;
1434     INPUT input;
1435
1436     if (buttonNum >= NB_BUTTONS) return;
1437
1438     TRACE( "hwnd %p/%lx button %u pos %d,%d\n", hwnd, event->window, buttonNum, event->x, event->y );
1439
1440     input.u.mi.dx          = event->x;
1441     input.u.mi.dy          = event->y;
1442     input.u.mi.mouseData   = button_down_data[buttonNum];
1443     input.u.mi.dwFlags     = button_down_flags[buttonNum] | MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE;
1444     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1445     input.u.mi.dwExtraInfo = 0;
1446
1447     update_user_time( event->time );
1448     send_mouse_input( hwnd, event->window, event->state, &input );
1449 }
1450
1451
1452 /***********************************************************************
1453  *           X11DRV_ButtonRelease
1454  */
1455 void X11DRV_ButtonRelease( HWND hwnd, XEvent *xev )
1456 {
1457     XButtonEvent *event = &xev->xbutton;
1458     int buttonNum = event->button - 1;
1459     INPUT input;
1460
1461     if (buttonNum >= NB_BUTTONS || !button_up_flags[buttonNum]) return;
1462
1463     TRACE( "hwnd %p/%lx button %u pos %d,%d\n", hwnd, event->window, buttonNum, event->x, event->y );
1464
1465     input.u.mi.dx          = event->x;
1466     input.u.mi.dy          = event->y;
1467     input.u.mi.mouseData   = button_up_data[buttonNum];
1468     input.u.mi.dwFlags     = button_up_flags[buttonNum] | MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE;
1469     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1470     input.u.mi.dwExtraInfo = 0;
1471
1472     send_mouse_input( hwnd, event->window, event->state, &input );
1473 }
1474
1475
1476 /***********************************************************************
1477  *           X11DRV_MotionNotify
1478  */
1479 void X11DRV_MotionNotify( HWND hwnd, XEvent *xev )
1480 {
1481     XMotionEvent *event = &xev->xmotion;
1482     INPUT input;
1483
1484     TRACE( "hwnd %p/%lx pos %d,%d is_hint %d serial %lu\n",
1485            hwnd, event->window, event->x, event->y, event->is_hint, event->serial );
1486
1487     input.u.mi.dx          = event->x;
1488     input.u.mi.dy          = event->y;
1489     input.u.mi.mouseData   = 0;
1490     input.u.mi.dwFlags     = MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE;
1491     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1492     input.u.mi.dwExtraInfo = 0;
1493
1494     if (!hwnd)
1495     {
1496         struct x11drv_thread_data *thread_data = x11drv_thread_data();
1497         if (thread_data->warp_serial && (long)(event->serial - thread_data->warp_serial) < 0) return;
1498     }
1499
1500     send_mouse_input( hwnd, event->window, event->state, &input );
1501 }
1502
1503
1504 /***********************************************************************
1505  *           X11DRV_EnterNotify
1506  */
1507 void X11DRV_EnterNotify( HWND hwnd, XEvent *xev )
1508 {
1509     XCrossingEvent *event = &xev->xcrossing;
1510     INPUT input;
1511
1512     TRACE( "hwnd %p/%lx pos %d,%d detail %d\n", hwnd, event->window, event->x, event->y, event->detail );
1513
1514     if (event->detail == NotifyVirtual || event->detail == NotifyNonlinearVirtual) return;
1515     if (event->window == x11drv_thread_data()->grab_window) return;
1516
1517     /* simulate a mouse motion event */
1518     input.u.mi.dx          = event->x;
1519     input.u.mi.dy          = event->y;
1520     input.u.mi.mouseData   = 0;
1521     input.u.mi.dwFlags     = MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE;
1522     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1523     input.u.mi.dwExtraInfo = 0;
1524
1525     send_mouse_input( hwnd, event->window, event->state, &input );
1526 }
1527
1528 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
1529
1530 /***********************************************************************
1531  *           X11DRV_RawMotion
1532  */
1533 static void X11DRV_RawMotion( XGenericEventCookie *xev )
1534 {
1535     XIRawEvent *event = xev->data;
1536     const double *values = event->valuators.values;
1537     INPUT input;
1538     int i, j;
1539     double dx = 0, dy = 0;
1540     struct x11drv_thread_data *thread_data = x11drv_thread_data();
1541
1542     if (!event->valuators.mask_len) return;
1543     if (thread_data->xi2_state != xi_enabled) return;
1544
1545     input.u.mi.mouseData   = 0;
1546     input.u.mi.dwFlags     = MOUSEEVENTF_MOVE;
1547     input.u.mi.time        = EVENT_x11_time_to_win32_time( event->time );
1548     input.u.mi.dwExtraInfo = 0;
1549
1550     if (XIMaskIsSet( event->valuators.mask, 0 )) dx = *values++;
1551     if (XIMaskIsSet( event->valuators.mask, 1 )) dy = *values++;
1552     input.u.mi.dx = dx;
1553     input.u.mi.dy = dy;
1554
1555     wine_tsx11_lock();
1556     for (i = 0; i < xinput2_device_count; ++i)
1557     {
1558         if (xinput2_devices[i].deviceid != event->deviceid) continue;
1559         for (j = 0; j < xinput2_devices[i].num_classes; j++)
1560         {
1561             XIValuatorClassInfo *class = (XIValuatorClassInfo *)xinput2_devices[i].classes[j];
1562
1563             if (xinput2_devices[i].classes[j]->type != XIValuatorClass) continue;
1564             if (class->min >= class->max) continue;
1565             if (class->number == 0)
1566                 input.u.mi.dx = dx * (virtual_screen_rect.right - virtual_screen_rect.left)
1567                                    / (class->max - class->min);
1568             else if (class->number == 1)
1569                 input.u.mi.dy = dy * (virtual_screen_rect.bottom - virtual_screen_rect.top)
1570                                    / (class->max - class->min);
1571         }
1572         break;
1573     }
1574
1575     wine_tsx11_unlock();
1576
1577     if (thread_data->warp_serial)
1578     {
1579         if ((long)(xev->serial - thread_data->warp_serial) < 0)
1580         {
1581             TRACE( "pos %d,%d old serial %lu, ignoring\n", input.u.mi.dx, input.u.mi.dy, xev->serial );
1582             return;
1583         }
1584         thread_data->warp_serial = 0;  /* we caught up now */
1585     }
1586
1587     TRACE( "pos %d,%d (event %f,%f)\n", input.u.mi.dx, input.u.mi.dy, dx, dy );
1588
1589     input.type = INPUT_MOUSE;
1590     __wine_send_input( 0, &input );
1591 }
1592
1593 #endif /* HAVE_X11_EXTENSIONS_XINPUT2_H */
1594
1595
1596 /***********************************************************************
1597  *              X11DRV_XInput2_Init
1598  */
1599 void X11DRV_XInput2_Init(void)
1600 {
1601 #if defined(SONAME_LIBXI) && defined(HAVE_X11_EXTENSIONS_XINPUT2_H)
1602     int event, error;
1603     void *libxi_handle = wine_dlopen( SONAME_LIBXI, RTLD_NOW, NULL, 0 );
1604
1605     if (!libxi_handle)
1606     {
1607         WARN( "couldn't load %s\n", SONAME_LIBXI );
1608         return;
1609     }
1610 #define LOAD_FUNCPTR(f) \
1611     if (!(p##f = wine_dlsym( libxi_handle, #f, NULL, 0))) \
1612     { \
1613         WARN("Failed to load %s.\n", #f); \
1614         return; \
1615     }
1616
1617     LOAD_FUNCPTR(XIFreeDeviceInfo);
1618     LOAD_FUNCPTR(XIQueryDevice);
1619     LOAD_FUNCPTR(XIQueryVersion);
1620     LOAD_FUNCPTR(XISelectEvents);
1621 #undef LOAD_FUNCPTR
1622
1623     wine_tsx11_lock();
1624     xinput2_available = XQueryExtension( gdi_display, "XInputExtension", &xinput2_opcode, &event, &error );
1625     wine_tsx11_unlock();
1626 #else
1627     TRACE( "X Input 2 support not compiled in.\n" );
1628 #endif
1629 }
1630
1631
1632 /***********************************************************************
1633  *           X11DRV_GenericEvent
1634  */
1635 void X11DRV_GenericEvent( HWND hwnd, XEvent *xev )
1636 {
1637 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
1638     XGenericEventCookie *event = &xev->xcookie;
1639
1640     if (!event->data) return;
1641     if (event->extension != xinput2_opcode) return;
1642
1643     switch (event->evtype)
1644     {
1645     case XI_RawMotion:
1646         X11DRV_RawMotion( event );
1647         break;
1648
1649     default:
1650         TRACE( "Unhandled event %#x\n", event->evtype );
1651         break;
1652     }
1653 #endif
1654 }