?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
winex11: Never try to clip the cursor if we don't have XInput2.
[wine/multimedia.git] / dlls / winex11.drv / mouse.c
blob3dc1196d8ee65e4b090e4f0f3b9ee1236de8ad00
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_cursor_from_bitmaps
940 *
941 * Create an X11 cursor from source bitmaps.
942 */
943 static Cursor create_cursor_from_bitmaps( HBITMAP src_xor, HBITMAP src_and, int width, int height,
944 int xor_y, int and_y, XColor *fg, XColor *bg,
945 int hotspot_x, int hotspot_y )
946 {
947 HDC src = 0, dst = 0;
948 HBITMAP bits = 0, mask = 0, mask_inv = 0;
949 Cursor cursor = 0;
950
951 if (!(src = CreateCompatibleDC( 0 ))) goto done;
952 if (!(dst = CreateCompatibleDC( 0 ))) goto done;
953
954 if (!(bits = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
955 if (!(mask = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
956 if (!(mask_inv = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
957
958 /* We have to do some magic here, as cursors are not fully
959 * compatible between Windows and X11. Under X11, there are
960 * only 3 possible color cursor: black, white and masked. So
961 * we map the 4th Windows color (invert the bits on the screen)
962 * to black and an additional white bit on an other place
963 * (+1,+1). This require some boolean arithmetic:
964 *
965 * Windows | X11
966 * And Xor Result | Bits Mask Result
967 * 0 0 black | 0 1 background
968 * 0 1 white | 1 1 foreground
969 * 1 0 no change | X 0 no change
970 * 1 1 inverted | 0 1 background
971 *
972 * which gives:
973 * Bits = not 'And' and 'Xor' or 'And2' and 'Xor2'
974 * Mask = not 'And' or 'Xor' or 'And2' and 'Xor2'
975 */
976 SelectObject( src, src_and );
977 SelectObject( dst, bits );
978 BitBlt( dst, 0, 0, width, height, src, 0, and_y, SRCCOPY );
979 SelectObject( dst, mask );
980 BitBlt( dst, 0, 0, width, height, src, 0, and_y, SRCCOPY );
981 SelectObject( dst, mask_inv );
982 BitBlt( dst, 0, 0, width, height, src, 0, and_y, SRCCOPY );
983 SelectObject( src, src_xor );
984 BitBlt( dst, 0, 0, width, height, src, 0, xor_y, SRCAND /* src & dst */ );
985 SelectObject( dst, bits );
986 BitBlt( dst, 0, 0, width, height, src, 0, xor_y, SRCERASE /* src & ~dst */ );
987 SelectObject( dst, mask );
988 BitBlt( dst, 0, 0, width, height, src, 0, xor_y, 0xdd0228 /* src | ~dst */ );
989 /* additional white */
990 SelectObject( src, mask_inv );
991 BitBlt( dst, 1, 1, width, height, src, 0, 0, SRCPAINT /* src | dst */);
992 SelectObject( dst, bits );
993 BitBlt( dst, 1, 1, width, height, src, 0, 0, SRCPAINT /* src | dst */ );
994
995 wine_tsx11_lock();
996 cursor = XCreatePixmapCursor( gdi_display, X11DRV_get_pixmap(bits), X11DRV_get_pixmap(mask),
997 fg, bg, hotspot_x, hotspot_y );
998 wine_tsx11_unlock();
999
1000 done:
1001 DeleteDC( src );
1002 DeleteDC( dst );
1003 DeleteObject( bits );
1004 DeleteObject( mask );
1005 DeleteObject( mask_inv );
1006 return cursor;
1007 }
1008
1009 /***********************************************************************
1010 * create_xlib_cursor
1011 *
1012 * Create an X cursor from a Windows one.
1013 */
1014 static Cursor create_xlib_cursor( HDC hdc, const ICONINFOEXW *icon, int width, int height )
1015 {
1016 XColor fg, bg;
1017 Cursor cursor = None;
1018 HBITMAP xor_bitmap = 0;
1019 BITMAPINFO *info;
1020 unsigned int *color_bits = NULL, *ptr;
1021 unsigned char *mask_bits = NULL, *xor_bits = NULL;
1022 int i, x, y, has_alpha = 0;
1023 int rfg, gfg, bfg, rbg, gbg, bbg, fgBits, bgBits;
1024 unsigned int width_bytes = (width + 31) / 32 * 4;
1025
1026 if (!(info = HeapAlloc( GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO, bmiColors[256] ))))
1027 return FALSE;
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 if (!(xor_bitmap = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
1052 rfg = gfg = bfg = rbg = gbg = bbg = fgBits = 0;
1053 for (y = 0, ptr = color_bits; y < height; y++)
1054 {
1055 for (x = 0; x < width; x++, ptr++)
1056 {
1057 int red = (*ptr >> 16) & 0xff;
1058 int green = (*ptr >> 8) & 0xff;
1059 int blue = (*ptr >> 0) & 0xff;
1060 if (red + green + blue > 0x40)
1061 {
1062 rfg += red;
1063 gfg += green;
1064 bfg += blue;
1065 fgBits++;
1066 xor_bits[y * width_bytes + x / 8] |= 0x80 >> (x % 8);
1067 }
1068 else
1069 {
1070 rbg += red;
1071 gbg += green;
1072 bbg += blue;
1073 }
1074 }
1075 }
1076 if (fgBits)
1077 {
1078 fg.red = rfg * 257 / fgBits;
1079 fg.green = gfg * 257 / fgBits;
1080 fg.blue = bfg * 257 / fgBits;
1081 }
1082 else fg.red = fg.green = fg.blue = 0;
1083 bgBits = width * height - fgBits;
1084 if (bgBits)
1085 {
1086 bg.red = rbg * 257 / bgBits;
1087 bg.green = gbg * 257 / bgBits;
1088 bg.blue = bbg * 257 / bgBits;
1089 }
1090 else bg.red = bg.green = bg.blue = 0;
1091
1092 info->bmiHeader.biBitCount = 1;
1093 info->bmiHeader.biSizeImage = width_bytes * height;
1094 SetDIBits( hdc, xor_bitmap, 0, height, xor_bits, info, DIB_RGB_COLORS );
1095
1096 /* generate mask from the alpha channel if we have one */
1097
1098 for (i = 0, ptr = color_bits; i < width * height; i++, ptr++)
1099 if ((has_alpha = (*ptr & 0xff000000) != 0)) break;
1100
1101 if (has_alpha)
1102 {
1103 /* make sure the bitmaps are owned by x11drv */
1104 HBITMAP orig = SelectObject( hdc, icon->hbmMask );
1105 SelectObject( hdc, xor_bitmap );
1106 SelectObject( hdc, orig );
1107
1108 memset( mask_bits, 0, width_bytes * height );
1109 for (y = 0, ptr = color_bits; y < height; y++)
1110 for (x = 0; x < width; x++, ptr++)
1111 if ((*ptr >> 24) > 25) /* more than 10% alpha */
1112 mask_bits[y * width_bytes + x / 8] |= 0x80 >> (x % 8);
1113
1114 info->bmiHeader.biBitCount = 1;
1115 info->bmiHeader.biSizeImage = width_bytes * height;
1116 SetDIBits( hdc, icon->hbmMask, 0, height, mask_bits, info, DIB_RGB_COLORS );
1117
1118 wine_tsx11_lock();
1119 cursor = XCreatePixmapCursor( gdi_display,
1120 X11DRV_get_pixmap(xor_bitmap),
1121 X11DRV_get_pixmap(icon->hbmMask),
1122 &fg, &bg, icon->xHotspot, icon->yHotspot );
1123 wine_tsx11_unlock();
1124 }
1125 else
1126 {
1127 cursor = create_cursor_from_bitmaps( xor_bitmap, icon->hbmMask, width, height, 0, 0,
1128 &fg, &bg, icon->xHotspot, icon->yHotspot );
1129 }
1130
1131 done:
1132 DeleteObject( xor_bitmap );
1133 HeapFree( GetProcessHeap(), 0, info );
1134 HeapFree( GetProcessHeap(), 0, color_bits );
1135 HeapFree( GetProcessHeap(), 0, xor_bits );
1136 HeapFree( GetProcessHeap(), 0, mask_bits );
1137 return cursor;
1138 }
1139
1140 /***********************************************************************
1141 * create_cursor
1142 *
1143 * Create an X cursor from a Windows one.
1144 */
1145 static Cursor create_cursor( HANDLE handle )
1146 {
1147 Cursor cursor = 0;
1148 ICONINFOEXW info;
1149 BITMAP bm;
1150
1151 if (!handle) return get_empty_cursor();
1152
1153 info.cbSize = sizeof(info);
1154 if (!GetIconInfoExW( handle, &info )) return 0;
1155
1156 #ifdef SONAME_LIBXCURSOR
1157 if (use_system_cursors && (cursor = create_xcursor_system_cursor( &info )))
1158 {
1159 DeleteObject( info.hbmColor );
1160 DeleteObject( info.hbmMask );
1161 return cursor;
1162 }
1163 #endif
1164
1165 GetObjectW( info.hbmMask, sizeof(bm), &bm );
1166 if (!info.hbmColor) bm.bmHeight = max( 1, bm.bmHeight / 2 );
1167
1168 /* make sure hotspot is valid */
1169 if (info.xHotspot >= bm.bmWidth || info.yHotspot >= bm.bmHeight)
1170 {
1171 info.xHotspot = bm.bmWidth / 2;
1172 info.yHotspot = bm.bmHeight / 2;
1173 }
1174
1175 if (info.hbmColor)
1176 {
1177 HDC hdc = CreateCompatibleDC( 0 );
1178 if (hdc)
1179 {
1180 #ifdef SONAME_LIBXCURSOR
1181 if (pXcursorImagesLoadCursor)
1182 cursor = create_xcursor_cursor( hdc, &info, handle, bm.bmWidth, bm.bmHeight );
1183 #endif
1184 if (!cursor) cursor = create_xlib_cursor( hdc, &info, bm.bmWidth, bm.bmHeight );
1185 }
1186 DeleteObject( info.hbmColor );
1187 DeleteDC( hdc );
1188 }
1189 else
1190 {
1191 XColor fg, bg;
1192 fg.red = fg.green = fg.blue = 0xffff;
1193 bg.red = bg.green = bg.blue = 0;
1194 cursor = create_cursor_from_bitmaps( info.hbmMask, info.hbmMask, bm.bmWidth, bm.bmHeight,
1195 bm.bmHeight, 0, &fg, &bg, info.xHotspot, info.yHotspot );
1196 }
1197
1198 DeleteObject( info.hbmMask );
1199 return cursor;
1200 }
1201
1202 /***********************************************************************
1203 * DestroyCursorIcon (X11DRV.@)
1204 */
1205 void CDECL X11DRV_DestroyCursorIcon( HCURSOR handle )
1206 {
1207 Cursor cursor;
1208
1209 wine_tsx11_lock();
1210 if (cursor_context && !XFindContext( gdi_display, (XID)handle, cursor_context, (char **)&cursor ))
1211 {
1212 TRACE( "%p xid %lx\n", handle, cursor );
1213 XFreeCursor( gdi_display, cursor );
1214 XDeleteContext( gdi_display, (XID)handle, cursor_context );
1215 }
1216 wine_tsx11_unlock();
1217 }
1218
1219 /***********************************************************************
1220 * SetCursor (X11DRV.@)
1221 */
1222 void CDECL X11DRV_SetCursor( HCURSOR handle )
1223 {
1224 if (InterlockedExchangePointer( (void **)&last_cursor, handle ) != handle ||
1225 GetTickCount() - last_cursor_change > 100)
1226 {
1227 last_cursor_change = GetTickCount();
1228 if (cursor_window) SendNotifyMessageW( cursor_window, WM_X11DRV_SET_CURSOR, 0, (LPARAM)handle );
1229 }
1230 }
1231
1232 /***********************************************************************
1233 * SetCursorPos (X11DRV.@)
1234 */
1235 BOOL CDECL X11DRV_SetCursorPos( INT x, INT y )
1236 {
1237 struct x11drv_thread_data *data = x11drv_init_thread_data();
1238
1239 wine_tsx11_lock();
1240 XWarpPointer( data->display, root_window, root_window, 0, 0, 0, 0,
1241 x - virtual_screen_rect.left, y - virtual_screen_rect.top );
1242 data->warp_serial = NextRequest( data->display );
1243 XNoOp( data->display );
1244 XFlush( data->display ); /* avoids bad mouse lag in games that do their own mouse warping */
1245 wine_tsx11_unlock();
1246 TRACE( "warped to %d,%d serial %lu\n", x, y, data->warp_serial );
1247 return TRUE;
1248 }
1249
1250 /***********************************************************************
1251 * GetCursorPos (X11DRV.@)
1252 */
1253 BOOL CDECL X11DRV_GetCursorPos(LPPOINT pos)
1254 {
1255 Display *display = thread_init_display();
1256 Window root, child;
1257 int rootX, rootY, winX, winY;
1258 unsigned int xstate;
1259 BOOL ret;
1260
1261 wine_tsx11_lock();
1262 ret = XQueryPointer( display, root_window, &root, &child, &rootX, &rootY, &winX, &winY, &xstate );
1263 if (ret)
1264 {
1265 POINT old = *pos;
1266 pos->x = winX + virtual_screen_rect.left;
1267 pos->y = winY + virtual_screen_rect.top;
1268 TRACE( "pointer at (%d,%d) server pos %d,%d\n", pos->x, pos->y, old.x, old.y );
1269 }
1270 wine_tsx11_unlock();
1271 return ret;
1272 }
1273
1274 /***********************************************************************
1275 * ClipCursor (X11DRV.@)
1276 */
1277 BOOL CDECL X11DRV_ClipCursor( LPCRECT clip )
1278 {
1279 if (!clip)
1280 {
1281 ungrab_clipping_window();
1282 return TRUE;
1283 }
1284
1285 if (GetWindowThreadProcessId( GetDesktopWindow(), NULL ) == GetCurrentThreadId())
1286 return TRUE; /* don't clip in the desktop process */
1287
1288 if (grab_pointer)
1289 {
1290 HWND foreground = GetForegroundWindow();
1291
1292 /* we are clipping if the clip rectangle is smaller than the screen */
1293 if (clip->left > virtual_screen_rect.left || clip->right < virtual_screen_rect.right ||
1294 clip->top > virtual_screen_rect.top || clip->bottom < virtual_screen_rect.bottom)
1295 {
1296 DWORD tid, pid;
1297
1298 /* forward request to the foreground window if it's in a different thread */
1299 tid = GetWindowThreadProcessId( foreground, &pid );
1300 if (tid && tid != GetCurrentThreadId() && pid == GetCurrentProcessId())
1301 {
1302 TRACE( "forwarding clip request to %p\n", foreground );
1303 SendNotifyMessageW( foreground, WM_X11DRV_CLIP_CURSOR, 0, 0 );
1304 return TRUE;
1305 }
1306 else if (grab_clipping_window( clip )) return TRUE;
1307 }
1308 else /* if currently clipping, check if we should switch to fullscreen clipping */
1309 {
1310 struct x11drv_thread_data *data = x11drv_thread_data();
1311 if (data && data->clip_hwnd)
1312 {
1313 if (EqualRect( clip, &clip_rect ) || clip_fullscreen_window( foreground, TRUE ))
1314 return TRUE;
1315 }
1316 }
1317 }
1318 ungrab_clipping_window();
1319 return TRUE;
1320 }
1321
1322 /***********************************************************************
1323 * move_resize_window
1324 */
1325 void move_resize_window( Display *display, struct x11drv_win_data *data, int dir )
1326 {
1327 DWORD pt;
1328 int x, y, rootX, rootY, ret, button = 0;
1329 XEvent xev;
1330 Window root, child;
1331 unsigned int xstate;
1332
1333 pt = GetMessagePos();
1334 x = (short)LOWORD( pt );
1335 y = (short)HIWORD( pt );
1336
1337 if (GetKeyState( VK_LBUTTON ) & 0x8000) button = 1;
1338 else if (GetKeyState( VK_MBUTTON ) & 0x8000) button = 2;
1339 else if (GetKeyState( VK_RBUTTON ) & 0x8000) button = 3;
1340
1341 TRACE( "hwnd %p/%lx, x %d, y %d, dir %d, button %d\n",
1342 data->hwnd, data->whole_window, x, y, dir, button );
1343
1344 xev.xclient.type = ClientMessage;
1345 xev.xclient.window = data->whole_window;
1346 xev.xclient.message_type = x11drv_atom(_NET_WM_MOVERESIZE);
1347 xev.xclient.serial = 0;
1348 xev.xclient.display = display;
1349 xev.xclient.send_event = True;
1350 xev.xclient.format = 32;
1351 xev.xclient.data.l[0] = x - virtual_screen_rect.left; /* x coord */
1352 xev.xclient.data.l[1] = y - virtual_screen_rect.top; /* y coord */
1353 xev.xclient.data.l[2] = dir; /* direction */
1354 xev.xclient.data.l[3] = button; /* button */
1355 xev.xclient.data.l[4] = 0; /* unused */
1356
1357 /* need to ungrab the pointer that may have been automatically grabbed
1358 * with a ButtonPress event */
1359 wine_tsx11_lock();
1360 XUngrabPointer( display, CurrentTime );
1361 XSendEvent(display, root_window, False, SubstructureNotifyMask | SubstructureRedirectMask, &xev);
1362 wine_tsx11_unlock();
1363
1364 /* try to detect the end of the size/move by polling for the mouse button to be released */
1365 /* (some apps don't like it if we return before the size/move is done) */
1366
1367 if (!button) return;
1368 for (;;)
1369 {
1370 MSG msg;
1371 INPUT input;
1372
1373 wine_tsx11_lock();
1374 ret = XQueryPointer( display, root_window, &root, &child, &rootX, &rootY, &x, &y, &xstate );
1375 wine_tsx11_unlock();
1376 if (!ret) break;
1377
1378 if (!(xstate & (Button1Mask << (button - 1))))
1379 {
1380 /* fake a button release event */
1381 input.type = INPUT_MOUSE;
1382 input.u.mi.dx = x + virtual_screen_rect.left;
1383 input.u.mi.dy = y + virtual_screen_rect.top;
1384 input.u.mi.mouseData = button_up_data[button - 1];
1385 input.u.mi.dwFlags = button_up_flags[button - 1] | MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE;
1386 input.u.mi.time = GetTickCount();
1387 input.u.mi.dwExtraInfo = 0;
1388 __wine_send_input( data->hwnd, &input );
1389 }
1390
1391 while (PeekMessageW( &msg, 0, 0, 0, PM_REMOVE ))
1392 {
1393 if (!CallMsgFilterW( &msg, MSGF_SIZE ))
1394 {
1395 TranslateMessage( &msg );
1396 DispatchMessageW( &msg );
1397 }
1398 }
1399
1400 if (!(xstate & (Button1Mask << (button - 1)))) break;
1401 MsgWaitForMultipleObjects( 0, NULL, FALSE, 100, QS_ALLINPUT );
1402 }
1403
1404 TRACE( "hwnd %p/%lx done\n", data->hwnd, data->whole_window );
1405 }
1406
1407
1408 /***********************************************************************
1409 * X11DRV_ButtonPress
1410 */
1411 void X11DRV_ButtonPress( HWND hwnd, XEvent *xev )
1412 {
1413 XButtonEvent *event = &xev->xbutton;
1414 int buttonNum = event->button - 1;
1415 INPUT input;
1416
1417 if (buttonNum >= NB_BUTTONS) return;
1418
1419 TRACE( "hwnd %p/%lx button %u pos %d,%d\n", hwnd, event->window, buttonNum, event->x, event->y );
1420
1421 input.u.mi.dx = event->x;
1422 input.u.mi.dy = event->y;
1423 input.u.mi.mouseData = button_down_data[buttonNum];
1424 input.u.mi.dwFlags = button_down_flags[buttonNum] | MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE;
1425 input.u.mi.time = EVENT_x11_time_to_win32_time( event->time );
1426 input.u.mi.dwExtraInfo = 0;
1427
1428 update_user_time( event->time );
1429 send_mouse_input( hwnd, event->window, event->state, &input );
1430 }
1431
1432
1433 /***********************************************************************
1434 * X11DRV_ButtonRelease
1435 */
1436 void X11DRV_ButtonRelease( HWND hwnd, XEvent *xev )
1437 {
1438 XButtonEvent *event = &xev->xbutton;
1439 int buttonNum = event->button - 1;
1440 INPUT input;
1441
1442 if (buttonNum >= NB_BUTTONS || !button_up_flags[buttonNum]) return;
1443
1444 TRACE( "hwnd %p/%lx button %u pos %d,%d\n", hwnd, event->window, buttonNum, event->x, event->y );
1445
1446 input.u.mi.dx = event->x;
1447 input.u.mi.dy = event->y;
1448 input.u.mi.mouseData = button_up_data[buttonNum];
1449 input.u.mi.dwFlags = button_up_flags[buttonNum] | MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE;
1450 input.u.mi.time = EVENT_x11_time_to_win32_time( event->time );
1451 input.u.mi.dwExtraInfo = 0;
1452
1453 send_mouse_input( hwnd, event->window, event->state, &input );
1454 }
1455
1456
1457 /***********************************************************************
1458 * X11DRV_MotionNotify
1459 */
1460 void X11DRV_MotionNotify( HWND hwnd, XEvent *xev )
1461 {
1462 XMotionEvent *event = &xev->xmotion;
1463 INPUT input;
1464
1465 TRACE( "hwnd %p/%lx pos %d,%d is_hint %d serial %lu\n",
1466 hwnd, event->window, event->x, event->y, event->is_hint, event->serial );
1467
1468 input.u.mi.dx = event->x;
1469 input.u.mi.dy = event->y;
1470 input.u.mi.mouseData = 0;
1471 input.u.mi.dwFlags = MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE;
1472 input.u.mi.time = EVENT_x11_time_to_win32_time( event->time );
1473 input.u.mi.dwExtraInfo = 0;
1474
1475 if (!hwnd)
1476 {
1477 struct x11drv_thread_data *thread_data = x11drv_thread_data();
1478 if (thread_data->warp_serial && (long)(event->serial - thread_data->warp_serial) < 0) return;
1479 }
1480
1481 send_mouse_input( hwnd, event->window, event->state, &input );
1482 }
1483
1484
1485 /***********************************************************************
1486 * X11DRV_EnterNotify
1487 */
1488 void X11DRV_EnterNotify( HWND hwnd, XEvent *xev )
1489 {
1490 XCrossingEvent *event = &xev->xcrossing;
1491 INPUT input;
1492
1493 TRACE( "hwnd %p/%lx pos %d,%d detail %d\n", hwnd, event->window, event->x, event->y, event->detail );
1494
1495 if (event->detail == NotifyVirtual || event->detail == NotifyNonlinearVirtual) return;
1496 if (event->window == x11drv_thread_data()->grab_window) return;
1497
1498 /* simulate a mouse motion event */
1499 input.u.mi.dx = event->x;
1500 input.u.mi.dy = event->y;
1501 input.u.mi.mouseData = 0;
1502 input.u.mi.dwFlags = MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE;
1503 input.u.mi.time = EVENT_x11_time_to_win32_time( event->time );
1504 input.u.mi.dwExtraInfo = 0;
1505
1506 send_mouse_input( hwnd, event->window, event->state, &input );
1507 }
1508
1509 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
1510
1511 /***********************************************************************
1512 * X11DRV_RawMotion
1513 */
1514 static void X11DRV_RawMotion( XGenericEventCookie *xev )
1515 {
1516 XIRawEvent *event = xev->data;
1517 const double *values = event->valuators.values;
1518 INPUT input;
1519 int i, j;
1520 double dx = 0, dy = 0;
1521 struct x11drv_thread_data *thread_data = x11drv_thread_data();
1522
1523 if (!event->valuators.mask_len) return;
1524 if (thread_data->xi2_state != xi_enabled) return;
1525
1526 input.u.mi.mouseData = 0;
1527 input.u.mi.dwFlags = MOUSEEVENTF_MOVE;
1528 input.u.mi.time = EVENT_x11_time_to_win32_time( event->time );
1529 input.u.mi.dwExtraInfo = 0;
1530
1531 if (XIMaskIsSet( event->valuators.mask, 0 )) dx = *values++;
1532 if (XIMaskIsSet( event->valuators.mask, 1 )) dy = *values++;
1533 input.u.mi.dx = dx;
1534 input.u.mi.dy = dy;
1535
1536 wine_tsx11_lock();
1537 for (i = 0; i < xinput2_device_count; ++i)
1538 {
1539 if (xinput2_devices[i].deviceid != event->deviceid) continue;
1540 for (j = 0; j < xinput2_devices[i].num_classes; j++)
1541 {
1542 XIValuatorClassInfo *class = (XIValuatorClassInfo *)xinput2_devices[i].classes[j];
1543
1544 if (xinput2_devices[i].classes[j]->type != XIValuatorClass) continue;
1545 if (class->min >= class->max) continue;
1546 if (class->number == 0)
1547 input.u.mi.dx = dx * (virtual_screen_rect.right - virtual_screen_rect.left)
1548 / (class->max - class->min);
1549 else if (class->number == 1)
1550 input.u.mi.dy = dy * (virtual_screen_rect.bottom - virtual_screen_rect.top)
1551 / (class->max - class->min);
1552 }
1553 break;
1554 }
1555
1556 wine_tsx11_unlock();
1557
1558 if (thread_data->warp_serial)
1559 {
1560 if ((long)(xev->serial - thread_data->warp_serial) < 0)
1561 {
1562 TRACE( "pos %d,%d old serial %lu, ignoring\n", input.u.mi.dx, input.u.mi.dy, xev->serial );
1563 return;
1564 }
1565 thread_data->warp_serial = 0; /* we caught up now */
1566 }
1567
1568 TRACE( "pos %d,%d (event %f,%f)\n", input.u.mi.dx, input.u.mi.dy, dx, dy );
1569
1570 input.type = INPUT_MOUSE;
1571 __wine_send_input( 0, &input );
1572 }
1573
1574 #endif /* HAVE_X11_EXTENSIONS_XINPUT2_H */
1575
1576
1577 /***********************************************************************
1578 * X11DRV_XInput2_Init
1579 */
1580 void X11DRV_XInput2_Init(void)
1581 {
1582 #if defined(SONAME_LIBXI) && defined(HAVE_X11_EXTENSIONS_XINPUT2_H)
1583 int event, error;
1584 void *libxi_handle = wine_dlopen( SONAME_LIBXI, RTLD_NOW, NULL, 0 );
1585
1586 if (!libxi_handle)
1587 {
1588 WARN( "couldn't load %s\n", SONAME_LIBXI );
1589 return;
1590 }
1591 #define LOAD_FUNCPTR(f) \
1592 if (!(p##f = wine_dlsym( libxi_handle, #f, NULL, 0))) \
1593 { \
1594 WARN("Failed to load %s.\n", #f); \
1595 return; \
1596 }
1597
1598 LOAD_FUNCPTR(XIFreeDeviceInfo);
1599 LOAD_FUNCPTR(XIQueryDevice);
1600 LOAD_FUNCPTR(XIQueryVersion);
1601 LOAD_FUNCPTR(XISelectEvents);
1602 #undef LOAD_FUNCPTR
1603
1604 wine_tsx11_lock();
1605 xinput2_available = XQueryExtension( gdi_display, "XInputExtension", &xinput2_opcode, &event, &error );
1606 wine_tsx11_unlock();
1607 #else
1608 TRACE( "X Input 2 support not compiled in.\n" );
1609 #endif
1610 }
1611
1612
1613 /***********************************************************************
1614 * X11DRV_GenericEvent
1615 */
1616 void X11DRV_GenericEvent( HWND hwnd, XEvent *xev )
1617 {
1618 #ifdef HAVE_X11_EXTENSIONS_XINPUT2_H
1619 XGenericEventCookie *event = &xev->xcookie;
1620
1621 if (!event->data) return;
1622 if (event->extension != xinput2_opcode) return;
1623
1624 switch (event->evtype)
1625 {
1626 case XI_RawMotion:
1627 X11DRV_RawMotion( event );
1628 break;
1629
1630 default:
1631 TRACE( "Unhandled event %#x\n", event->evtype );
1632 break;
1633 }
1634 #endif
1635 }
Maarten's multimedia branch