?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
winex11: Add support for animated cursors in X11 driver.
[wine/multimedia.git] / dlls / winex11.drv / mouse.c
blob485a50df4477fb684e31964b349c7c904560f984
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 <stdarg.h>
27
28 #ifdef SONAME_LIBXCURSOR
29 # include <X11/Xcursor/Xcursor.h>
30 static void *xcursor_handle;
31 # define MAKE_FUNCPTR(f) static typeof(f) * p##f
32 MAKE_FUNCPTR(XcursorImageCreate);
33 MAKE_FUNCPTR(XcursorImageDestroy);
34 MAKE_FUNCPTR(XcursorImageLoadCursor);
35 MAKE_FUNCPTR(XcursorImagesCreate);
36 MAKE_FUNCPTR(XcursorImagesDestroy);
37 MAKE_FUNCPTR(XcursorImagesLoadCursor);
38 # undef MAKE_FUNCPTR
39 #endif /* SONAME_LIBXCURSOR */
40
41 #define NONAMELESSUNION
42 #define NONAMELESSSTRUCT
43 #include "windef.h"
44 #include "winbase.h"
45
46 #include "x11drv.h"
47 #include "wine/server.h"
48 #include "wine/library.h"
49 #include "wine/debug.h"
50
51 WINE_DEFAULT_DEBUG_CHANNEL(cursor);
52
53 /**********************************************************************/
54
55 #ifndef Button6Mask
56 #define Button6Mask (1<<13)
57 #endif
58 #ifndef Button7Mask
59 #define Button7Mask (1<<14)
60 #endif
61
62 #define NB_BUTTONS 9 /* Windows can handle 5 buttons and the wheel too */
63
64 static const UINT button_down_flags[NB_BUTTONS] =
65 {
66 MOUSEEVENTF_LEFTDOWN,
67 MOUSEEVENTF_MIDDLEDOWN,
68 MOUSEEVENTF_RIGHTDOWN,
69 MOUSEEVENTF_WHEEL,
70 MOUSEEVENTF_WHEEL,
71 MOUSEEVENTF_XDOWN, /* FIXME: horizontal wheel */
72 MOUSEEVENTF_XDOWN,
73 MOUSEEVENTF_XDOWN,
74 MOUSEEVENTF_XDOWN
75 };
76
77 static const UINT button_up_flags[NB_BUTTONS] =
78 {
79 MOUSEEVENTF_LEFTUP,
80 MOUSEEVENTF_MIDDLEUP,
81 MOUSEEVENTF_RIGHTUP,
82 0,
83 0,
84 MOUSEEVENTF_XUP,
85 MOUSEEVENTF_XUP,
86 MOUSEEVENTF_XUP,
87 MOUSEEVENTF_XUP
88 };
89
90 POINT cursor_pos;
91 static HWND cursor_window;
92 static DWORD last_time_modified;
93 static RECT cursor_clip; /* Cursor clipping rect */
94 static XContext cursor_context;
95 static Cursor create_cursor( HANDLE handle );
96
97 BOOL CDECL X11DRV_SetCursorPos( INT x, INT y );
98
99
100 /***********************************************************************
101 * X11DRV_Xcursor_Init
102 *
103 * Load the Xcursor library for use.
104 */
105 void X11DRV_Xcursor_Init(void)
106 {
107 #ifdef SONAME_LIBXCURSOR
108 xcursor_handle = wine_dlopen(SONAME_LIBXCURSOR, RTLD_NOW, NULL, 0);
109 if (!xcursor_handle) /* wine_dlopen failed. */
110 {
111 WARN("Xcursor failed to load. Using fallback code.\n");
112 return;
113 }
114 #define LOAD_FUNCPTR(f) \
115 p##f = wine_dlsym(xcursor_handle, #f, NULL, 0)
116
117 LOAD_FUNCPTR(XcursorImageCreate);
118 LOAD_FUNCPTR(XcursorImageDestroy);
119 LOAD_FUNCPTR(XcursorImageLoadCursor);
120 LOAD_FUNCPTR(XcursorImagesCreate);
121 LOAD_FUNCPTR(XcursorImagesDestroy);
122 LOAD_FUNCPTR(XcursorImagesLoadCursor);
123 #undef LOAD_FUNCPTR
124 #endif /* SONAME_LIBXCURSOR */
125 }
126
127
128 /***********************************************************************
129 * clip_point_to_rect
130 *
131 * Clip point to the provided rectangle
132 */
133 static inline void clip_point_to_rect( LPCRECT rect, LPPOINT pt )
134 {
135 if (pt->x < rect->left) pt->x = rect->left;
136 else if (pt->x >= rect->right) pt->x = rect->right - 1;
137 if (pt->y < rect->top) pt->y = rect->top;
138 else if (pt->y >= rect->bottom) pt->y = rect->bottom - 1;
139 }
140
141 /***********************************************************************
142 * update_button_state
143 *
144 * Update the button state with what X provides us
145 */
146 static inline void update_button_state( unsigned int state )
147 {
148 key_state_table[VK_LBUTTON] = (state & Button1Mask ? 0x80 : 0);
149 key_state_table[VK_MBUTTON] = (state & Button2Mask ? 0x80 : 0);
150 key_state_table[VK_RBUTTON] = (state & Button3Mask ? 0x80 : 0);
151 /* X-buttons are not reported from XQueryPointer */
152 }
153
154 /***********************************************************************
155 * get_empty_cursor
156 */
157 static Cursor get_empty_cursor(void)
158 {
159 static Cursor cursor;
160 static const char data[] = { 0 };
161
162 wine_tsx11_lock();
163 if (!cursor)
164 {
165 XColor bg;
166 Pixmap pixmap;
167
168 bg.red = bg.green = bg.blue = 0x0000;
169 pixmap = XCreateBitmapFromData( gdi_display, root_window, data, 1, 1 );
170 if (pixmap)
171 {
172 cursor = XCreatePixmapCursor( gdi_display, pixmap, pixmap, &bg, &bg, 0, 0 );
173 XFreePixmap( gdi_display, pixmap );
174 }
175 }
176 wine_tsx11_unlock();
177 return cursor;
178 }
179
180 /***********************************************************************
181 * set_window_cursor
182 */
183 void set_window_cursor( HWND hwnd, HCURSOR handle )
184 {
185 struct x11drv_win_data *data;
186 Cursor cursor, prev;
187
188 if (!(data = X11DRV_get_win_data( hwnd ))) return;
189
190 wine_tsx11_lock();
191 if (!handle) cursor = get_empty_cursor();
192 else if (!cursor_context || XFindContext( gdi_display, (XID)handle, cursor_context, (char **)&cursor ))
193 {
194 /* try to create it */
195 wine_tsx11_unlock();
196 if (!(cursor = create_cursor( handle ))) return;
197
198 wine_tsx11_lock();
199 if (!cursor_context) cursor_context = XUniqueContext();
200 if (!XFindContext( gdi_display, (XID)handle, cursor_context, (char **)&prev ))
201 {
202 /* someone else was here first */
203 XFreeCursor( gdi_display, cursor );
204 cursor = prev;
205 }
206 else
207 {
208 XSaveContext( gdi_display, (XID)handle, cursor_context, (char *)cursor );
209 TRACE( "cursor %p created %lx\n", handle, cursor );
210 }
211 }
212
213 XDefineCursor( gdi_display, data->whole_window, cursor );
214 /* make the change take effect immediately */
215 XFlush( gdi_display );
216 data->cursor = handle;
217 wine_tsx11_unlock();
218 }
219
220 /***********************************************************************
221 * update_mouse_state
222 *
223 * Update the various window states on a mouse event.
224 */
225 static void update_mouse_state( HWND hwnd, Window window, int x, int y, unsigned int state, POINT *pt )
226 {
227 struct x11drv_win_data *data = X11DRV_get_win_data( hwnd );
228
229 if (!data) return;
230
231 if (window == data->whole_window)
232 {
233 x += data->whole_rect.left - data->client_rect.left;
234 y += data->whole_rect.top - data->client_rect.top;
235 }
236 pt->x = x + data->client_rect.left;
237 pt->y = y + data->client_rect.top;
238
239 cursor_window = hwnd;
240
241 /* update the wine server Z-order */
242
243 if (window != x11drv_thread_data()->grab_window &&
244 /* ignore event if a button is pressed, since the mouse is then grabbed too */
245 !(state & (Button1Mask|Button2Mask|Button3Mask|Button4Mask|Button5Mask|Button6Mask|Button7Mask)))
246 {
247 RECT rect;
248 SetRect( &rect, x, y, x + 1, y + 1 );
249 if (GetWindowLongW( data->hwnd, GWL_EXSTYLE ) & WS_EX_LAYOUTRTL)
250 mirror_rect( &data->client_rect, &rect );
251
252 SERVER_START_REQ( update_window_zorder )
253 {
254 req->window = wine_server_user_handle( hwnd );
255 req->rect.left = rect.left;
256 req->rect.top = rect.top;
257 req->rect.right = rect.right;
258 req->rect.bottom = rect.bottom;
259 wine_server_call( req );
260 }
261 SERVER_END_REQ;
262 }
263 }
264
265
266 /***********************************************************************
267 * get_key_state
268 */
269 static WORD get_key_state(void)
270 {
271 WORD ret = 0;
272
273 if (GetSystemMetrics( SM_SWAPBUTTON ))
274 {
275 if (key_state_table[VK_RBUTTON] & 0x80) ret |= MK_LBUTTON;
276 if (key_state_table[VK_LBUTTON] & 0x80) ret |= MK_RBUTTON;
277 }
278 else
279 {
280 if (key_state_table[VK_LBUTTON] & 0x80) ret |= MK_LBUTTON;
281 if (key_state_table[VK_RBUTTON] & 0x80) ret |= MK_RBUTTON;
282 }
283 if (key_state_table[VK_MBUTTON] & 0x80) ret |= MK_MBUTTON;
284 if (key_state_table[VK_SHIFT] & 0x80) ret |= MK_SHIFT;
285 if (key_state_table[VK_CONTROL] & 0x80) ret |= MK_CONTROL;
286 if (key_state_table[VK_XBUTTON1] & 0x80) ret |= MK_XBUTTON1;
287 if (key_state_table[VK_XBUTTON2] & 0x80) ret |= MK_XBUTTON2;
288 return ret;
289 }
290
291
292 /***********************************************************************
293 * queue_raw_mouse_message
294 */
295 static void queue_raw_mouse_message( UINT message, HWND hwnd, DWORD x, DWORD y,
296 DWORD data, DWORD time, DWORD extra_info, UINT injected_flags )
297 {
298 MSLLHOOKSTRUCT hook;
299 HCURSOR cursor;
300
301 hook.pt.x = x;
302 hook.pt.y = y;
303 hook.mouseData = MAKELONG( 0, data );
304 hook.flags = injected_flags;
305 hook.time = time;
306 hook.dwExtraInfo = extra_info;
307
308 last_time_modified = GetTickCount();
309 if (HOOK_CallHooks( WH_MOUSE_LL, HC_ACTION, message, (LPARAM)&hook, TRUE ))
310 message = 0; /* ignore it */
311
312 SERVER_START_REQ( send_hardware_message )
313 {
314 req->id = (injected_flags & LLMHF_INJECTED) ? 0 : GetCurrentThreadId();
315 req->win = wine_server_user_handle( hwnd );
316 req->msg = message;
317 req->wparam = MAKEWPARAM( get_key_state(), data );
318 req->lparam = 0;
319 req->x = x;
320 req->y = y;
321 req->time = time;
322 req->info = extra_info;
323 wine_server_call( req );
324 cursor = (reply->count >= 0) ? wine_server_ptr_handle(reply->cursor) : 0;
325 }
326 SERVER_END_REQ;
327
328 if (hwnd)
329 {
330 struct x11drv_win_data *data = X11DRV_get_win_data( hwnd );
331 if (data && cursor != data->cursor) set_window_cursor( hwnd, cursor );
332 }
333 }
334
335
336 /***********************************************************************
337 * X11DRV_send_mouse_input
338 */
339 void X11DRV_send_mouse_input( HWND hwnd, DWORD flags, DWORD x, DWORD y,
340 DWORD data, DWORD time, DWORD extra_info, UINT injected_flags )
341 {
342 POINT pt;
343
344 if (!time) time = GetTickCount();
345
346 if (flags & MOUSEEVENTF_MOVE && flags & MOUSEEVENTF_ABSOLUTE)
347 {
348 if (injected_flags & LLMHF_INJECTED)
349 {
350 pt.x = (x * screen_width) >> 16;
351 pt.y = (y * screen_height) >> 16;
352 }
353 else
354 {
355 pt.x = x;
356 pt.y = y;
357 wine_tsx11_lock();
358 if (cursor_pos.x == x && cursor_pos.y == y &&
359 (flags & ~(MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE)))
360 flags &= ~MOUSEEVENTF_MOVE;
361 wine_tsx11_unlock();
362 }
363 }
364 else if (flags & MOUSEEVENTF_MOVE)
365 {
366 int accel[3], xMult = 1, yMult = 1;
367
368 /* dx and dy can be negative numbers for relative movements */
369 SystemParametersInfoW(SPI_GETMOUSE, 0, accel, 0);
370
371 if (abs(x) > accel[0] && accel[2] != 0)
372 {
373 xMult = 2;
374 if ((abs(x) > accel[1]) && (accel[2] == 2)) xMult = 4;
375 }
376 if (abs(y) > accel[0] && accel[2] != 0)
377 {
378 yMult = 2;
379 if ((abs(y) > accel[1]) && (accel[2] == 2)) yMult = 4;
380 }
381
382 wine_tsx11_lock();
383 pt.x = cursor_pos.x + (long)x * xMult;
384 pt.y = cursor_pos.y + (long)y * yMult;
385 wine_tsx11_unlock();
386 }
387 else
388 {
389 wine_tsx11_lock();
390 pt = cursor_pos;
391 wine_tsx11_unlock();
392 }
393
394 if (flags & MOUSEEVENTF_MOVE)
395 {
396 queue_raw_mouse_message( WM_MOUSEMOVE, hwnd, pt.x, pt.y, data, time,
397 extra_info, injected_flags );
398 if ((injected_flags & LLMHF_INJECTED) &&
399 ((flags & MOUSEEVENTF_ABSOLUTE) || x || y)) /* we have to actually move the cursor */
400 {
401 X11DRV_SetCursorPos( pt.x, pt.y );
402 }
403 else
404 {
405 wine_tsx11_lock();
406 clip_point_to_rect( &cursor_clip, &pt);
407 cursor_pos = pt;
408 wine_tsx11_unlock();
409 }
410 }
411 if (flags & MOUSEEVENTF_LEFTDOWN)
412 {
413 key_state_table[VK_LBUTTON] |= 0xc0;
414 queue_raw_mouse_message( GetSystemMetrics(SM_SWAPBUTTON) ? WM_RBUTTONDOWN : WM_LBUTTONDOWN,
415 hwnd, pt.x, pt.y, data, time, extra_info, injected_flags );
416 }
417 if (flags & MOUSEEVENTF_LEFTUP)
418 {
419 key_state_table[VK_LBUTTON] &= ~0x80;
420 queue_raw_mouse_message( GetSystemMetrics(SM_SWAPBUTTON) ? WM_RBUTTONUP : WM_LBUTTONUP,
421 hwnd, pt.x, pt.y, data, time, extra_info, injected_flags );
422 }
423 if (flags & MOUSEEVENTF_RIGHTDOWN)
424 {
425 key_state_table[VK_RBUTTON] |= 0xc0;
426 queue_raw_mouse_message( GetSystemMetrics(SM_SWAPBUTTON) ? WM_LBUTTONDOWN : WM_RBUTTONDOWN,
427 hwnd, pt.x, pt.y, data, time, extra_info, injected_flags );
428 }
429 if (flags & MOUSEEVENTF_RIGHTUP)
430 {
431 key_state_table[VK_RBUTTON] &= ~0x80;
432 queue_raw_mouse_message( GetSystemMetrics(SM_SWAPBUTTON) ? WM_LBUTTONUP : WM_RBUTTONUP,
433 hwnd, pt.x, pt.y, data, time, extra_info, injected_flags );
434 }
435 if (flags & MOUSEEVENTF_MIDDLEDOWN)
436 {
437 key_state_table[VK_MBUTTON] |= 0xc0;
438 queue_raw_mouse_message( WM_MBUTTONDOWN, hwnd, pt.x, pt.y, data, time,
439 extra_info, injected_flags );
440 }
441 if (flags & MOUSEEVENTF_MIDDLEUP)
442 {
443 key_state_table[VK_MBUTTON] &= ~0x80;
444 queue_raw_mouse_message( WM_MBUTTONUP, hwnd, pt.x, pt.y, data, time,
445 extra_info, injected_flags );
446 }
447 if (flags & MOUSEEVENTF_WHEEL)
448 {
449 queue_raw_mouse_message( WM_MOUSEWHEEL, hwnd, pt.x, pt.y, data, time,
450 extra_info, injected_flags );
451 }
452 if (flags & MOUSEEVENTF_XDOWN)
453 {
454 key_state_table[VK_XBUTTON1 + data - 1] |= 0xc0;
455 queue_raw_mouse_message( WM_XBUTTONDOWN, hwnd, pt.x, pt.y, data, time,
456 extra_info, injected_flags );
457 }
458 if (flags & MOUSEEVENTF_XUP)
459 {
460 key_state_table[VK_XBUTTON1 + data - 1] &= ~0x80;
461 queue_raw_mouse_message( WM_XBUTTONUP, hwnd, pt.x, pt.y, data, time,
462 extra_info, injected_flags );
463 }
464 }
465
466 #ifdef SONAME_LIBXCURSOR
467
468 /***********************************************************************
469 * create_xcursor_frame
470 *
471 * Use Xcursor to create a frame of an X cursor from a Windows one.
472 */
473 static XcursorImage *create_xcursor_frame( HDC hdc, ICONINFO *iinfo, HANDLE icon,
474 HBITMAP hbmColor, unsigned char *color_bits, int color_size,
475 HBITMAP hbmMask, unsigned char *mask_bits, int mask_size,
476 int width, int height, int istep )
477 {
478 XcursorImage *image, *ret = NULL;
479 int x, y, i, has_alpha;
480 XcursorPixel *ptr;
481
482 wine_tsx11_lock();
483 image = pXcursorImageCreate( width, height );
484 wine_tsx11_unlock();
485 if (!image)
486 {
487 ERR("X11 failed to produce a cursor frame!\n");
488 goto cleanup;
489 }
490
491 image->xhot = iinfo->xHotspot;
492 image->yhot = iinfo->yHotspot;
493 image->delay = 100; /* TODO: find a way to get the proper delay */
494
495 /* draw the cursor frame to a temporary buffer then copy it into the XcursorImage */
496 memset( color_bits, 0x00, color_size );
497 SelectObject( hdc, hbmColor );
498 if (!DrawIconEx( hdc, 0, 0, icon, width, height, istep, NULL, DI_NORMAL ))
499 {
500 TRACE("Could not draw frame %d (walk past end of frames).\n", istep);
501 goto cleanup;
502 }
503 memcpy( image->pixels, color_bits, color_size );
504
505 /* check if the cursor frame was drawn with an alpha channel */
506 for (i = 0, ptr = image->pixels; i < width * height; i++, ptr++)
507 if ((has_alpha = (*ptr & 0xff000000) != 0)) break;
508
509 /* if no alpha channel was drawn then generate it from the mask */
510 if (!has_alpha)
511 {
512 unsigned int width_bytes = (width + 31) / 32 * 4;
513
514 /* draw the cursor mask to a temporary buffer */
515 memset( mask_bits, 0xFF, mask_size );
516 SelectObject( hdc, hbmMask );
517 if (!DrawIconEx( hdc, 0, 0, icon, width, height, istep, NULL, DI_MASK ))
518 {
519 ERR("Failed to draw frame mask %d.\n", istep);
520 goto cleanup;
521 }
522 /* use the buffer to directly modify the XcursorImage alpha channel */
523 for (y = 0, ptr = image->pixels; y < height; y++)
524 for (x = 0; x < width; x++, ptr++)
525 if (!((mask_bits[y * width_bytes + x / 8] << (x % 8)) & 0x80))
526 *ptr |= 0xff000000;
527 }
528 ret = image;
529
530 cleanup:
531 if (ret == NULL) pXcursorImageDestroy( image );
532 return ret;
533 }
534
535 /***********************************************************************
536 * create_xcursor_cursor
537 *
538 * Use Xcursor to create an X cursor from a Windows one.
539 */
540 static Cursor create_xcursor_cursor( HDC hdc, ICONINFO *iinfo, HANDLE icon, int width, int height )
541 {
542 unsigned char *color_bits, *mask_bits;
543 HBITMAP hbmColor = 0, hbmMask = 0;
544 XcursorImage **imgs, *image;
545 int color_size, mask_size;
546 BITMAPINFO *info = NULL;
547 XcursorImages *images;
548 Cursor cursor = 0;
549 int nFrames = 0;
550
551 if (!(imgs = HeapAlloc( GetProcessHeap(), 0, sizeof(XcursorImage*) ))) return 0;
552
553 /* Allocate all of the resources necessary to obtain a cursor frame */
554 if (!(info = HeapAlloc( GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO, bmiColors[256] )))) goto cleanup;
555 info->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
556 info->bmiHeader.biWidth = width;
557 info->bmiHeader.biHeight = -height;
558 info->bmiHeader.biPlanes = 1;
559 info->bmiHeader.biCompression = BI_RGB;
560 info->bmiHeader.biXPelsPerMeter = 0;
561 info->bmiHeader.biYPelsPerMeter = 0;
562 info->bmiHeader.biClrUsed = 0;
563 info->bmiHeader.biClrImportant = 0;
564 info->bmiHeader.biBitCount = 32;
565 color_size = width * height * 4;
566 info->bmiHeader.biSizeImage = color_size;
567 hbmColor = CreateDIBSection( hdc, info, DIB_RGB_COLORS, (VOID **) &color_bits, NULL, 0);
568 if (!hbmColor)
569 {
570 ERR("Failed to create DIB section for cursor color data!\n");
571 goto cleanup;
572 }
573 info->bmiHeader.biBitCount = 1;
574 mask_size = ((width + 31) / 32 * 4) * height; /* width_bytes * height */
575 info->bmiHeader.biSizeImage = mask_size;
576 hbmMask = CreateDIBSection( hdc, info, DIB_RGB_COLORS, (VOID **) &mask_bits, NULL, 0);
577 if (!hbmMask)
578 {
579 ERR("Failed to create DIB section for cursor mask data!\n");
580 goto cleanup;
581 }
582
583 /* Create an XcursorImage for each frame of the cursor */
584 while (1)
585 {
586 XcursorImage **imgstmp;
587
588 image = create_xcursor_frame( hdc, iinfo, icon,
589 hbmColor, color_bits, color_size,
590 hbmMask, mask_bits, mask_size,
591 width, height, nFrames );
592 if (!image) break; /* no more drawable frames */
593
594 imgs[nFrames++] = image;
595 if (!(imgstmp = HeapReAlloc( GetProcessHeap(), 0, imgs, (nFrames+1)*sizeof(XcursorImage*) ))) goto cleanup;
596 imgs = imgstmp;
597 }
598
599 /* Build an X cursor out of all of the frames */
600 if (!(images = pXcursorImagesCreate( nFrames ))) goto cleanup;
601 for (images->nimage = 0; images->nimage < nFrames; images->nimage++)
602 images->images[images->nimage] = imgs[images->nimage];
603 wine_tsx11_lock();
604 cursor = pXcursorImagesLoadCursor( gdi_display, images );
605 wine_tsx11_unlock();
606 pXcursorImagesDestroy( images ); /* Note: this frees each individual frame (calls XcursorImageDestroy) */
607 HeapFree( GetProcessHeap(), 0, imgs );
608 imgs = NULL;
609
610 cleanup:
611 if (imgs)
612 {
613 /* Failed to produce a cursor, free previously allocated frames */
614 for (nFrames--; nFrames >= 0; nFrames--)
615 pXcursorImageDestroy( imgs[nFrames] );
616 HeapFree( GetProcessHeap(), 0, imgs );
617 }
618 /* Cleanup all of the resources used to obtain the frame data */
619 if (hbmColor) DeleteObject( hbmColor );
620 if (hbmMask) DeleteObject( hbmMask );
621 HeapFree( GetProcessHeap(), 0, info );
622 return cursor;
623 }
624
625 #endif /* SONAME_LIBXCURSOR */
626
627
628 /***********************************************************************
629 * create_cursor_from_bitmaps
630 *
631 * Create an X11 cursor from source bitmaps.
632 */
633 static Cursor create_cursor_from_bitmaps( HBITMAP src_xor, HBITMAP src_and, int width, int height,
634 int xor_y, int and_y, XColor *fg, XColor *bg,
635 int hotspot_x, int hotspot_y )
636 {
637 HDC src = 0, dst = 0;
638 HBITMAP bits = 0, mask = 0, mask_inv = 0;
639 Cursor cursor = 0;
640
641 if (!(src = CreateCompatibleDC( 0 ))) goto done;
642 if (!(dst = CreateCompatibleDC( 0 ))) goto done;
643
644 if (!(bits = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
645 if (!(mask = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
646 if (!(mask_inv = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
647
648 /* We have to do some magic here, as cursors are not fully
649 * compatible between Windows and X11. Under X11, there are
650 * only 3 possible color cursor: black, white and masked. So
651 * we map the 4th Windows color (invert the bits on the screen)
652 * to black and an additional white bit on an other place
653 * (+1,+1). This require some boolean arithmetic:
654 *
655 * Windows | X11
656 * And Xor Result | Bits Mask Result
657 * 0 0 black | 0 1 background
658 * 0 1 white | 1 1 foreground
659 * 1 0 no change | X 0 no change
660 * 1 1 inverted | 0 1 background
661 *
662 * which gives:
663 * Bits = not 'And' and 'Xor' or 'And2' and 'Xor2'
664 * Mask = not 'And' or 'Xor' or 'And2' and 'Xor2'
665 */
666 SelectObject( src, src_and );
667 SelectObject( dst, bits );
668 BitBlt( dst, 0, 0, width, height, src, 0, and_y, SRCCOPY );
669 SelectObject( dst, mask );
670 BitBlt( dst, 0, 0, width, height, src, 0, and_y, SRCCOPY );
671 SelectObject( dst, mask_inv );
672 BitBlt( dst, 0, 0, width, height, src, 0, and_y, SRCCOPY );
673 SelectObject( src, src_xor );
674 BitBlt( dst, 0, 0, width, height, src, 0, xor_y, SRCAND /* src & dst */ );
675 SelectObject( dst, bits );
676 BitBlt( dst, 0, 0, width, height, src, 0, xor_y, SRCERASE /* src & ~dst */ );
677 SelectObject( dst, mask );
678 BitBlt( dst, 0, 0, width, height, src, 0, xor_y, 0xdd0228 /* src | ~dst */ );
679 /* additional white */
680 SelectObject( src, mask_inv );
681 BitBlt( dst, 1, 1, width, height, src, 0, 0, SRCPAINT /* src | dst */);
682 SelectObject( dst, bits );
683 BitBlt( dst, 1, 1, width, height, src, 0, 0, SRCPAINT /* src | dst */ );
684
685 wine_tsx11_lock();
686 cursor = XCreatePixmapCursor( gdi_display, X11DRV_get_pixmap(bits), X11DRV_get_pixmap(mask),
687 fg, bg, hotspot_x, hotspot_y );
688 wine_tsx11_unlock();
689
690 done:
691 DeleteDC( src );
692 DeleteDC( dst );
693 DeleteObject( bits );
694 DeleteObject( mask );
695 DeleteObject( mask_inv );
696 return cursor;
697 }
698
699 /***********************************************************************
700 * create_xlib_cursor
701 *
702 * Create an X cursor from a Windows one.
703 */
704 static Cursor create_xlib_cursor( HDC hdc, ICONINFO *icon, int width, int height )
705 {
706 XColor fg, bg;
707 Cursor cursor = None;
708 HBITMAP xor_bitmap = 0;
709 BITMAPINFO *info;
710 unsigned int *color_bits = NULL, *ptr;
711 unsigned char *mask_bits = NULL, *xor_bits = NULL;
712 int i, x, y, has_alpha = 0;
713 int rfg, gfg, bfg, rbg, gbg, bbg, fgBits, bgBits;
714 unsigned int width_bytes = (width + 31) / 32 * 4;
715
716 if (!(info = HeapAlloc( GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO, bmiColors[256] ))))
717 return FALSE;
718 info->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
719 info->bmiHeader.biWidth = width;
720 info->bmiHeader.biHeight = -height;
721 info->bmiHeader.biPlanes = 1;
722 info->bmiHeader.biBitCount = 1;
723 info->bmiHeader.biCompression = BI_RGB;
724 info->bmiHeader.biSizeImage = width_bytes * height;
725 info->bmiHeader.biXPelsPerMeter = 0;
726 info->bmiHeader.biYPelsPerMeter = 0;
727 info->bmiHeader.biClrUsed = 0;
728 info->bmiHeader.biClrImportant = 0;
729
730 if (!(mask_bits = HeapAlloc( GetProcessHeap(), 0, info->bmiHeader.biSizeImage ))) goto done;
731 if (!GetDIBits( hdc, icon->hbmMask, 0, height, mask_bits, info, DIB_RGB_COLORS )) goto done;
732
733 info->bmiHeader.biBitCount = 32;
734 info->bmiHeader.biSizeImage = width * height * 4;
735 if (!(color_bits = HeapAlloc( GetProcessHeap(), 0, info->bmiHeader.biSizeImage ))) goto done;
736 if (!(xor_bits = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, width_bytes * height ))) goto done;
737 GetDIBits( hdc, icon->hbmColor, 0, height, color_bits, info, DIB_RGB_COLORS );
738
739 /* compute fg/bg color and xor bitmap based on average of the color values */
740
741 if (!(xor_bitmap = CreateBitmap( width, height, 1, 1, NULL ))) goto done;
742 rfg = gfg = bfg = rbg = gbg = bbg = fgBits = 0;
743 for (y = 0, ptr = color_bits; y < height; y++)
744 {
745 for (x = 0; x < width; x++, ptr++)
746 {
747 int red = (*ptr >> 16) & 0xff;
748 int green = (*ptr >> 8) & 0xff;
749 int blue = (*ptr >> 0) & 0xff;
750 if (red + green + blue > 0x40)
751 {
752 rfg += red;
753 gfg += green;
754 bfg += blue;
755 fgBits++;
756 xor_bits[y * width_bytes + x / 8] |= 0x80 >> (x % 8);
757 }
758 else
759 {
760 rbg += red;
761 gbg += green;
762 bbg += blue;
763 }
764 }
765 }
766 if (fgBits)
767 {
768 fg.red = rfg * 257 / fgBits;
769 fg.green = gfg * 257 / fgBits;
770 fg.blue = bfg * 257 / fgBits;
771 }
772 else fg.red = fg.green = fg.blue = 0;
773 bgBits = width * height - fgBits;
774 if (bgBits)
775 {
776 bg.red = rbg * 257 / bgBits;
777 bg.green = gbg * 257 / bgBits;
778 bg.blue = bbg * 257 / bgBits;
779 }
780 else bg.red = bg.green = bg.blue = 0;
781
782 info->bmiHeader.biBitCount = 1;
783 info->bmiHeader.biSizeImage = width_bytes * height;
784 SetDIBits( hdc, xor_bitmap, 0, height, xor_bits, info, DIB_RGB_COLORS );
785
786 /* generate mask from the alpha channel if we have one */
787
788 for (i = 0, ptr = color_bits; i < width * height; i++, ptr++)
789 if ((has_alpha = (*ptr & 0xff000000) != 0)) break;
790
791 if (has_alpha)
792 {
793 memset( mask_bits, 0, width_bytes * height );
794 for (y = 0, ptr = color_bits; y < height; y++)
795 for (x = 0; x < width; x++, ptr++)
796 if ((*ptr >> 24) > 25) /* more than 10% alpha */
797 mask_bits[y * width_bytes + x / 8] |= 0x80 >> (x % 8);
798
799 info->bmiHeader.biBitCount = 1;
800 info->bmiHeader.biSizeImage = width_bytes * height;
801 SetDIBits( hdc, icon->hbmMask, 0, height, mask_bits, info, DIB_RGB_COLORS );
802
803 wine_tsx11_lock();
804 cursor = XCreatePixmapCursor( gdi_display,
805 X11DRV_get_pixmap(xor_bitmap),
806 X11DRV_get_pixmap(icon->hbmMask),
807 &fg, &bg, icon->xHotspot, icon->yHotspot );
808 wine_tsx11_unlock();
809 }
810 else
811 {
812 cursor = create_cursor_from_bitmaps( xor_bitmap, icon->hbmMask, width, height, 0, 0,
813 &fg, &bg, icon->xHotspot, icon->yHotspot );
814 }
815
816 done:
817 DeleteObject( xor_bitmap );
818 HeapFree( GetProcessHeap(), 0, info );
819 HeapFree( GetProcessHeap(), 0, color_bits );
820 HeapFree( GetProcessHeap(), 0, xor_bits );
821 HeapFree( GetProcessHeap(), 0, mask_bits );
822 return cursor;
823 }
824
825 /***********************************************************************
826 * create_cursor
827 *
828 * Create an X cursor from a Windows one.
829 */
830 static Cursor create_cursor( HANDLE handle )
831 {
832 Cursor cursor = 0;
833 HDC hdc;
834 ICONINFO info;
835 BITMAP bm;
836
837 if (!handle) return get_empty_cursor();
838
839 if (!(hdc = CreateCompatibleDC( 0 ))) return 0;
840 if (!GetIconInfo( handle, &info ))
841 {
842 DeleteDC( hdc );
843 return 0;
844 }
845
846 GetObjectW( info.hbmMask, sizeof(bm), &bm );
847 if (!info.hbmColor) bm.bmHeight /= 2;
848
849 /* make sure hotspot is valid */
850 if (info.xHotspot >= bm.bmWidth || info.yHotspot >= bm.bmHeight)
851 {
852 info.xHotspot = bm.bmWidth / 2;
853 info.yHotspot = bm.bmHeight / 2;
854 }
855
856 if (info.hbmColor)
857 {
858 #ifdef SONAME_LIBXCURSOR
859 if (pXcursorImagesLoadCursor) cursor = create_xcursor_cursor( hdc, &info, handle, bm.bmWidth, bm.bmHeight );
860 #endif
861 if (!cursor) cursor = create_xlib_cursor( hdc, &info, bm.bmWidth, bm.bmHeight );
862 DeleteObject( info.hbmColor );
863 }
864 else
865 {
866 XColor fg, bg;
867 fg.red = fg.green = fg.blue = 0xffff;
868 bg.red = bg.green = bg.blue = 0;
869 cursor = create_cursor_from_bitmaps( info.hbmMask, info.hbmMask, bm.bmWidth, bm.bmHeight,
870 bm.bmHeight, 0, &fg, &bg, info.xHotspot, info.yHotspot );
871 }
872
873 DeleteObject( info.hbmMask );
874 DeleteDC( hdc );
875 return cursor;
876 }
877
878 /***********************************************************************
879 * DestroyCursorIcon (X11DRV.@)
880 */
881 void CDECL X11DRV_DestroyCursorIcon( HCURSOR handle )
882 {
883 Cursor cursor;
884
885 wine_tsx11_lock();
886 if (cursor_context && !XFindContext( gdi_display, (XID)handle, cursor_context, (char **)&cursor ))
887 {
888 TRACE( "%p xid %lx\n", handle, cursor );
889 XFreeCursor( gdi_display, cursor );
890 XDeleteContext( gdi_display, (XID)handle, cursor_context );
891 }
892 wine_tsx11_unlock();
893 }
894
895 /***********************************************************************
896 * SetCursor (X11DRV.@)
897 */
898 void CDECL X11DRV_SetCursor( HCURSOR handle )
899 {
900 if (cursor_window) SendNotifyMessageW( cursor_window, WM_X11DRV_SET_CURSOR, 0, (LPARAM)handle );
901 }
902
903 /***********************************************************************
904 * SetCursorPos (X11DRV.@)
905 */
906 BOOL CDECL X11DRV_SetCursorPos( INT x, INT y )
907 {
908 Display *display = thread_init_display();
909 POINT pt;
910
911 TRACE( "warping to (%d,%d)\n", x, y );
912
913 wine_tsx11_lock();
914 if (cursor_pos.x == x && cursor_pos.y == y)
915 {
916 wine_tsx11_unlock();
917 /* We still need to generate WM_MOUSEMOVE */
918 queue_raw_mouse_message( WM_MOUSEMOVE, NULL, x, y, 0, GetCurrentTime(), 0, 0 );
919 return TRUE;
920 }
921
922 pt.x = x; pt.y = y;
923 clip_point_to_rect( &cursor_clip, &pt);
924 XWarpPointer( display, root_window, root_window, 0, 0, 0, 0,
925 pt.x - virtual_screen_rect.left, pt.y - virtual_screen_rect.top );
926 XFlush( display ); /* avoids bad mouse lag in games that do their own mouse warping */
927 cursor_pos = pt;
928 wine_tsx11_unlock();
929 return TRUE;
930 }
931
932 /***********************************************************************
933 * GetCursorPos (X11DRV.@)
934 */
935 BOOL CDECL X11DRV_GetCursorPos(LPPOINT pos)
936 {
937 Display *display = thread_init_display();
938 Window root, child;
939 int rootX, rootY, winX, winY;
940 unsigned int xstate;
941
942 wine_tsx11_lock();
943 if ((GetTickCount() - last_time_modified > 100) &&
944 XQueryPointer( display, root_window, &root, &child,
945 &rootX, &rootY, &winX, &winY, &xstate ))
946 {
947 update_button_state( xstate );
948 winX += virtual_screen_rect.left;
949 winY += virtual_screen_rect.top;
950 TRACE("pointer at (%d,%d)\n", winX, winY );
951 cursor_pos.x = winX;
952 cursor_pos.y = winY;
953 }
954 *pos = cursor_pos;
955 wine_tsx11_unlock();
956 return TRUE;
957 }
958
959
960 /***********************************************************************
961 * ClipCursor (X11DRV.@)
962 *
963 * Set the cursor clipping rectangle.
964 */
965 BOOL CDECL X11DRV_ClipCursor( LPCRECT clip )
966 {
967 if (!IntersectRect( &cursor_clip, &virtual_screen_rect, clip ))
968 cursor_clip = virtual_screen_rect;
969
970 return TRUE;
971 }
972
973 /***********************************************************************
974 * X11DRV_ButtonPress
975 */
976 void X11DRV_ButtonPress( HWND hwnd, XEvent *xev )
977 {
978 XButtonEvent *event = &xev->xbutton;
979 int buttonNum = event->button - 1;
980 WORD wData = 0;
981 POINT pt;
982
983 if (buttonNum >= NB_BUTTONS) return;
984 if (!hwnd) return;
985
986 switch (buttonNum)
987 {
988 case 3:
989 wData = WHEEL_DELTA;
990 break;
991 case 4:
992 wData = -WHEEL_DELTA;
993 break;
994 case 5:
995 wData = XBUTTON1;
996 break;
997 case 6:
998 wData = XBUTTON2;
999 break;
1000 case 7:
1001 wData = XBUTTON1;
1002 break;
1003 case 8:
1004 wData = XBUTTON2;
1005 break;
1006 }
1007
1008 update_user_time( event->time );
1009 update_mouse_state( hwnd, event->window, event->x, event->y, event->state, &pt );
1010
1011 X11DRV_send_mouse_input( hwnd, button_down_flags[buttonNum] | MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE,
1012 pt.x, pt.y, wData, EVENT_x11_time_to_win32_time(event->time), 0, 0 );
1013 }
1014
1015
1016 /***********************************************************************
1017 * X11DRV_ButtonRelease
1018 */
1019 void X11DRV_ButtonRelease( HWND hwnd, XEvent *xev )
1020 {
1021 XButtonEvent *event = &xev->xbutton;
1022 int buttonNum = event->button - 1;
1023 WORD wData = 0;
1024 POINT pt;
1025
1026 if (buttonNum >= NB_BUTTONS || !button_up_flags[buttonNum]) return;
1027 if (!hwnd) return;
1028
1029 switch (buttonNum)
1030 {
1031 case 5:
1032 wData = XBUTTON1;
1033 break;
1034 case 6:
1035 wData = XBUTTON2;
1036 break;
1037 case 7:
1038 wData = XBUTTON1;
1039 break;
1040 case 8:
1041 wData = XBUTTON2;
1042 break;
1043 }
1044
1045 update_mouse_state( hwnd, event->window, event->x, event->y, event->state, &pt );
1046
1047 X11DRV_send_mouse_input( hwnd, button_up_flags[buttonNum] | MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE,
1048 pt.x, pt.y, wData, EVENT_x11_time_to_win32_time(event->time), 0, 0 );
1049 }
1050
1051
1052 /***********************************************************************
1053 * X11DRV_MotionNotify
1054 */
1055 void X11DRV_MotionNotify( HWND hwnd, XEvent *xev )
1056 {
1057 XMotionEvent *event = &xev->xmotion;
1058 POINT pt;
1059
1060 TRACE("hwnd %p, event->is_hint %d\n", hwnd, event->is_hint);
1061
1062 if (!hwnd) return;
1063
1064 update_mouse_state( hwnd, event->window, event->x, event->y, event->state, &pt );
1065
1066 X11DRV_send_mouse_input( hwnd, MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE,
1067 pt.x, pt.y, 0, EVENT_x11_time_to_win32_time(event->time), 0, 0 );
1068 }
1069
1070
1071 /***********************************************************************
1072 * X11DRV_EnterNotify
1073 */
1074 void X11DRV_EnterNotify( HWND hwnd, XEvent *xev )
1075 {
1076 XCrossingEvent *event = &xev->xcrossing;
1077 POINT pt;
1078
1079 TRACE("hwnd %p, event->detail %d\n", hwnd, event->detail);
1080
1081 if (!hwnd) return;
1082 if (event->detail == NotifyVirtual || event->detail == NotifyNonlinearVirtual) return;
1083 if (event->window == x11drv_thread_data()->grab_window) return;
1084
1085 /* simulate a mouse motion event */
1086 update_mouse_state( hwnd, event->window, event->x, event->y, event->state, &pt );
1087
1088 X11DRV_send_mouse_input( hwnd, MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE,
1089 pt.x, pt.y, 0, EVENT_x11_time_to_win32_time(event->time), 0, 0 );
1090 }
Maarten's multimedia branch