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