Release 20040408.
[wine.git] / dlls / x11drv / mouse.c
blob456bb90a2ef7aca4c952d4de35a5dfc7776bfce3
1 /*
2 * X11 mouse driver
4 * Copyright 1998 Ulrich Weigand
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 #include "config.h"
23 #include <X11/Xlib.h>
24 #ifdef HAVE_LIBXXF86DGA2
25 #include <X11/extensions/xf86dga.h>
26 #endif
27 #include <stdarg.h>
29 #define NONAMELESSUNION
30 #define NONAMELESSSTRUCT
31 #include "windef.h"
32 #include "winbase.h"
33 #include "wine/winuser16.h"
35 #include "x11drv.h"
36 #include "wine/debug.h"
38 WINE_DEFAULT_DEBUG_CHANNEL(cursor);
40 /**********************************************************************/
42 #define NB_BUTTONS 5 /* Windows can handle 3 buttons and the wheel too */
44 static const UINT button_down_flags[NB_BUTTONS] =
46 MOUSEEVENTF_LEFTDOWN,
47 MOUSEEVENTF_MIDDLEDOWN,
48 MOUSEEVENTF_RIGHTDOWN,
49 MOUSEEVENTF_WHEEL,
50 MOUSEEVENTF_WHEEL
53 static const UINT button_up_flags[NB_BUTTONS] =
55 MOUSEEVENTF_LEFTUP,
56 MOUSEEVENTF_MIDDLEUP,
57 MOUSEEVENTF_RIGHTUP,
62 static BYTE *pKeyStateTable;
65 /***********************************************************************
66 * get_coords
68 * get the coordinates of a mouse event
70 static void get_coords( HWND *hwnd, Window window, int x, int y, POINT *pt )
72 struct x11drv_win_data *data;
73 WND *win;
75 if (!(win = WIN_GetPtr( *hwnd )) || win == WND_OTHER_PROCESS) return;
76 data = win->pDriverData;
78 if (window == data->whole_window)
80 x -= data->client_rect.left;
81 y -= data->client_rect.top;
83 WIN_ReleasePtr( win );
85 pt->x = x;
86 pt->y = y;
87 if (*hwnd != GetDesktopWindow())
89 ClientToScreen( *hwnd, pt );
90 *hwnd = GetAncestor( *hwnd, GA_ROOT );
95 /***********************************************************************
96 * update_button_state
98 * Update the button state with what X provides us
100 static void update_button_state( unsigned int state )
102 pKeyStateTable[VK_LBUTTON] = (state & Button1Mask ? 0x80 : 0);
103 pKeyStateTable[VK_MBUTTON] = (state & Button2Mask ? 0x80 : 0);
104 pKeyStateTable[VK_RBUTTON] = (state & Button3Mask ? 0x80 : 0);
108 /***********************************************************************
109 * update_key_state
111 * Update the key state with what X provides us
113 static void update_key_state( unsigned int state )
115 pKeyStateTable[VK_SHIFT] = (state & ShiftMask ? 0x80 : 0);
116 pKeyStateTable[VK_CONTROL] = (state & ControlMask ? 0x80 : 0);
120 /***********************************************************************
121 * send_mouse_event
123 static void send_mouse_event( HWND hwnd, DWORD flags, DWORD posX, DWORD posY,
124 DWORD data, Time time )
126 INPUT input;
128 TRACE("(%04lX,%ld,%ld)\n", flags, posX, posY );
130 if (flags & MOUSEEVENTF_ABSOLUTE)
132 int width = GetSystemMetrics( SM_CXSCREEN );
133 int height = GetSystemMetrics( SM_CYSCREEN );
134 /* Relative mouse movements seem not to be scaled as absolute ones */
135 posX = (((long)posX << 16) + width-1) / width;
136 posY = (((long)posY << 16) + height-1) / height;
139 input.type = WINE_INTERNAL_INPUT_MOUSE;
140 input.u.mi.dx = posX;
141 input.u.mi.dy = posY;
142 input.u.mi.mouseData = data;
143 input.u.mi.dwFlags = flags;
144 input.u.mi.time = time - X11DRV_server_startticks;
145 input.u.mi.dwExtraInfo = (ULONG_PTR)hwnd;
146 SendInput( 1, &input, sizeof(input) );
150 /***********************************************************************
151 * update_cursor
153 * Update the cursor of a window on a mouse event.
155 static void update_cursor( HWND hwnd, Window win )
157 struct x11drv_thread_data *data = x11drv_thread_data();
159 if (win == X11DRV_get_client_window( hwnd ))
160 win = X11DRV_get_whole_window( hwnd ); /* always set cursor on whole window */
162 if (data->cursor_window != win)
164 data->cursor_window = win;
165 wine_tsx11_lock();
166 if (data->cursor) XDefineCursor( data->display, win, data->cursor );
167 wine_tsx11_unlock();
172 /***********************************************************************
173 * create_cursor
175 * Create an X cursor from a Windows one.
177 static Cursor create_cursor( Display *display, CURSORICONINFO *ptr )
179 Pixmap pixmapBits, pixmapMask, pixmapMaskInv, pixmapAll;
180 XColor fg, bg;
181 Cursor cursor = None;
183 if (!ptr) /* Create an empty cursor */
185 static const char data[] = { 0 };
187 bg.red = bg.green = bg.blue = 0x0000;
188 pixmapBits = XCreateBitmapFromData( display, root_window, data, 1, 1 );
189 if (pixmapBits)
191 cursor = XCreatePixmapCursor( display, pixmapBits, pixmapBits,
192 &bg, &bg, 0, 0 );
193 XFreePixmap( display, pixmapBits );
196 else /* Create the X cursor from the bits */
198 XImage *image;
199 GC gc;
201 TRACE("Bitmap %dx%d planes=%d bpp=%d bytesperline=%d\n",
202 ptr->nWidth, ptr->nHeight, ptr->bPlanes, ptr->bBitsPerPixel,
203 ptr->nWidthBytes);
204 /* Create a pixmap and transfer all the bits to it */
206 /* NOTE: Following hack works, but only because XFree depth
207 * 1 images really use 1 bit/pixel (and so the same layout
208 * as the Windows cursor data). Perhaps use a more generic
209 * algorithm here.
211 /* This pixmap will be written with two bitmaps. The first is
212 * the mask and the second is the image.
214 if (!(pixmapAll = XCreatePixmap( display, root_window,
215 ptr->nWidth, ptr->nHeight * 2, 1 )))
216 return 0;
217 if (!(image = XCreateImage( display, visual,
218 1, ZPixmap, 0, (char *)(ptr + 1), ptr->nWidth,
219 ptr->nHeight * 2, 16, ptr->nWidthBytes/ptr->bBitsPerPixel)))
221 XFreePixmap( display, pixmapAll );
222 return 0;
224 gc = XCreateGC( display, pixmapAll, 0, NULL );
225 XSetGraphicsExposures( display, gc, False );
226 image->byte_order = MSBFirst;
227 image->bitmap_bit_order = MSBFirst;
228 image->bitmap_unit = 16;
229 _XInitImageFuncPtrs(image);
230 if (ptr->bPlanes * ptr->bBitsPerPixel == 1)
232 /* A plain old white on black cursor. */
233 fg.red = fg.green = fg.blue = 0xffff;
234 bg.red = bg.green = bg.blue = 0x0000;
235 XPutImage( display, pixmapAll, gc, image,
236 0, 0, 0, 0, ptr->nWidth, ptr->nHeight * 2 );
238 else
240 int rbits, gbits, bbits, red, green, blue;
241 int rfg, gfg, bfg, rbg, gbg, bbg;
242 int rscale, gscale, bscale;
243 int x, y, xmax, ymax, bitIndex, byteIndex, xorIndex;
244 unsigned char *theMask, *theImage, theChar;
245 int threshold, fgBits, bgBits, bitShifted;
246 BYTE pXorBits[128]; /* Up to 32x32 icons */
248 switch (ptr->bBitsPerPixel)
250 case 24:
251 rbits = 8;
252 gbits = 8;
253 bbits = 8;
254 threshold = 0x40;
255 break;
256 case 16:
257 rbits = 5;
258 gbits = 6;
259 bbits = 5;
260 threshold = 0x40;
261 break;
262 default:
263 FIXME("Currently no support for cursors with %d bits per pixel\n",
264 ptr->bBitsPerPixel);
265 XFreePixmap( display, pixmapAll );
266 XFreeGC( display, gc );
267 image->data = NULL;
268 XDestroyImage( image );
269 return 0;
271 /* The location of the mask. */
272 theMask = (char *)(ptr + 1);
273 /* The mask should still be 1 bit per pixel. The color image
274 * should immediately follow the mask.
276 theImage = &theMask[ptr->nWidth/8 * ptr->nHeight];
277 rfg = gfg = bfg = rbg = gbg = bbg = 0;
278 bitIndex = 0;
279 byteIndex = 0;
280 xorIndex = 0;
281 fgBits = 0;
282 bitShifted = 0x01;
283 xmax = (ptr->nWidth > 32) ? 32 : ptr->nWidth;
284 if (ptr->nWidth > 32) {
285 ERR("Got a %dx%d cursor. Cannot handle larger than 32x32.\n",
286 ptr->nWidth, ptr->nHeight);
288 ymax = (ptr->nHeight > 32) ? 32 : ptr->nHeight;
290 memset(pXorBits, 0, 128);
291 for (y=0; y<ymax; y++)
293 for (x=0; x<xmax; x++)
295 red = green = blue = 0;
296 switch (ptr->bBitsPerPixel)
298 case 24:
299 theChar = theImage[byteIndex++];
300 blue = theChar;
301 theChar = theImage[byteIndex++];
302 green = theChar;
303 theChar = theImage[byteIndex++];
304 red = theChar;
305 break;
306 case 16:
307 theChar = theImage[byteIndex++];
308 blue = theChar & 0x1F;
309 green = (theChar & 0xE0) >> 5;
310 theChar = theImage[byteIndex++];
311 green |= (theChar & 0x07) << 3;
312 red = (theChar & 0xF8) >> 3;
313 break;
316 if (red+green+blue > threshold)
318 rfg += red;
319 gfg += green;
320 bfg += blue;
321 fgBits++;
322 pXorBits[xorIndex] |= bitShifted;
324 else
326 rbg += red;
327 gbg += green;
328 bbg += blue;
330 if (x%8 == 7)
332 bitShifted = 0x01;
333 xorIndex++;
335 else
336 bitShifted = bitShifted << 1;
339 rscale = 1 << (16 - rbits);
340 gscale = 1 << (16 - gbits);
341 bscale = 1 << (16 - bbits);
342 if (fgBits)
344 fg.red = rfg * rscale / fgBits;
345 fg.green = gfg * gscale / fgBits;
346 fg.blue = bfg * bscale / fgBits;
348 else fg.red = fg.green = fg.blue = 0;
349 bgBits = xmax * ymax - fgBits;
350 if (bgBits)
352 bg.red = rbg * rscale / bgBits;
353 bg.green = gbg * gscale / bgBits;
354 bg.blue = bbg * bscale / bgBits;
356 else bg.red = bg.green = bg.blue = 0;
357 pixmapBits = XCreateBitmapFromData( display, root_window, pXorBits, xmax, ymax );
358 if (!pixmapBits)
360 XFreePixmap( display, pixmapAll );
361 XFreeGC( display, gc );
362 image->data = NULL;
363 XDestroyImage( image );
364 return 0;
367 /* Put the mask. */
368 XPutImage( display, pixmapAll, gc, image,
369 0, 0, 0, 0, ptr->nWidth, ptr->nHeight );
370 XSetFunction( display, gc, GXcopy );
371 /* Put the image */
372 XCopyArea( display, pixmapBits, pixmapAll, gc,
373 0, 0, xmax, ymax, 0, ptr->nHeight );
374 XFreePixmap( display, pixmapBits );
376 image->data = NULL;
377 XDestroyImage( image );
379 /* Now create the 2 pixmaps for bits and mask */
381 pixmapBits = XCreatePixmap( display, root_window, ptr->nWidth, ptr->nHeight, 1 );
382 pixmapMask = XCreatePixmap( display, root_window, ptr->nWidth, ptr->nHeight, 1 );
383 pixmapMaskInv = XCreatePixmap( display, root_window, ptr->nWidth, ptr->nHeight, 1 );
385 /* Make sure everything went OK so far */
387 if (pixmapBits && pixmapMask && pixmapMaskInv)
389 POINT hotspot;
391 /* We have to do some magic here, as cursors are not fully
392 * compatible between Windows and X11. Under X11, there
393 * are only 3 possible color cursor: black, white and
394 * masked. So we map the 4th Windows color (invert the
395 * bits on the screen) to black and an additional white bit on
396 * an other place (+1,+1). This require some boolean arithmetic:
398 * Windows | X11
399 * And Xor Result | Bits Mask Result
400 * 0 0 black | 0 1 background
401 * 0 1 white | 1 1 foreground
402 * 1 0 no change | X 0 no change
403 * 1 1 inverted | 0 1 background
405 * which gives:
406 * Bits = not 'And' and 'Xor' or 'And2' and 'Xor2'
407 * Mask = not 'And' or 'Xor' or 'And2' and 'Xor2'
409 * FIXME: apparently some servers do support 'inverted' color.
410 * I don't know if it's correct per the X spec, but maybe
411 * we ought to take advantage of it. -- AJ
413 XSetFunction( display, gc, GXcopy );
414 XCopyArea( display, pixmapAll, pixmapBits, gc,
415 0, 0, ptr->nWidth, ptr->nHeight, 0, 0 );
416 XCopyArea( display, pixmapAll, pixmapMask, gc,
417 0, 0, ptr->nWidth, ptr->nHeight, 0, 0 );
418 XCopyArea( display, pixmapAll, pixmapMaskInv, gc,
419 0, 0, ptr->nWidth, ptr->nHeight, 0, 0 );
420 XSetFunction( display, gc, GXand );
421 XCopyArea( display, pixmapAll, pixmapMaskInv, gc,
422 0, ptr->nHeight, ptr->nWidth, ptr->nHeight, 0, 0 );
423 XSetFunction( display, gc, GXandReverse );
424 XCopyArea( display, pixmapAll, pixmapBits, gc,
425 0, ptr->nHeight, ptr->nWidth, ptr->nHeight, 0, 0 );
426 XSetFunction( display, gc, GXorReverse );
427 XCopyArea( display, pixmapAll, pixmapMask, gc,
428 0, ptr->nHeight, ptr->nWidth, ptr->nHeight, 0, 0 );
429 /* Additional white */
430 XSetFunction( display, gc, GXor );
431 XCopyArea( display, pixmapMaskInv, pixmapMask, gc,
432 0, 0, ptr->nWidth, ptr->nHeight, 1, 1 );
433 XCopyArea( display, pixmapMaskInv, pixmapBits, gc,
434 0, 0, ptr->nWidth, ptr->nHeight, 1, 1 );
435 XSetFunction( display, gc, GXcopy );
437 /* Make sure hotspot is valid */
438 hotspot.x = ptr->ptHotSpot.x;
439 hotspot.y = ptr->ptHotSpot.y;
440 if (hotspot.x < 0 || hotspot.x >= ptr->nWidth ||
441 hotspot.y < 0 || hotspot.y >= ptr->nHeight)
443 hotspot.x = ptr->nWidth / 2;
444 hotspot.y = ptr->nHeight / 2;
446 cursor = XCreatePixmapCursor( display, pixmapBits, pixmapMask,
447 &fg, &bg, hotspot.x, hotspot.y );
450 /* Now free everything */
452 if (pixmapAll) XFreePixmap( display, pixmapAll );
453 if (pixmapBits) XFreePixmap( display, pixmapBits );
454 if (pixmapMask) XFreePixmap( display, pixmapMask );
455 if (pixmapMaskInv) XFreePixmap( display, pixmapMaskInv );
456 XFreeGC( display, gc );
458 return cursor;
462 /***********************************************************************
463 * SetCursor (X11DRV.@)
465 void X11DRV_SetCursor( CURSORICONINFO *lpCursor )
467 Cursor cursor;
469 if (root_window != DefaultRootWindow(gdi_display))
471 /* If in desktop mode, set the cursor on the desktop window */
473 wine_tsx11_lock();
474 cursor = create_cursor( gdi_display, lpCursor );
475 if (cursor)
477 XDefineCursor( gdi_display, root_window, cursor );
478 /* Make the change take effect immediately */
479 XFlush(gdi_display);
480 XFreeCursor( gdi_display, cursor );
482 wine_tsx11_unlock();
484 else /* set the same cursor for all top-level windows of the current thread */
486 struct x11drv_thread_data *data = x11drv_thread_data();
488 wine_tsx11_lock();
489 cursor = create_cursor( data->display, lpCursor );
490 if (cursor)
492 if (data->cursor) XFreeCursor( data->display, data->cursor );
493 data->cursor = cursor;
494 if (data->cursor_window)
496 XDefineCursor( data->display, data->cursor_window, cursor );
497 /* Make the change take effect immediately */
498 XFlush( data->display );
501 wine_tsx11_unlock();
505 /***********************************************************************
506 * SetCursorPos (X11DRV.@)
508 void X11DRV_SetCursorPos( INT x, INT y )
510 Display *display = thread_display();
512 TRACE( "warping to (%d,%d)\n", x, y );
514 wine_tsx11_lock();
515 XWarpPointer( display, root_window, root_window, 0, 0, 0, 0, x, y );
516 XFlush( display ); /* just in case */
517 wine_tsx11_unlock();
520 /***********************************************************************
521 * GetCursorPos (X11DRV.@)
523 void X11DRV_GetCursorPos(LPPOINT pos)
525 Display *display = thread_display();
526 Window root, child;
527 int rootX, rootY, winX, winY;
528 unsigned int xstate;
530 wine_tsx11_lock();
531 if (XQueryPointer( display, root_window, &root, &child,
532 &rootX, &rootY, &winX, &winY, &xstate ))
534 update_key_state( xstate );
535 update_button_state( xstate );
536 TRACE("pointer at (%d,%d)\n", winX, winY );
537 pos->x = winX;
538 pos->y = winY;
540 wine_tsx11_unlock();
543 /***********************************************************************
544 * InitMouse (X11DRV.@)
546 void X11DRV_InitMouse( BYTE *key_state_table )
548 pKeyStateTable = key_state_table;
552 /***********************************************************************
553 * X11DRV_ButtonPress
555 void X11DRV_ButtonPress( HWND hwnd, XButtonEvent *event )
557 int buttonNum = event->button - 1;
558 WORD wData = 0;
559 POINT pt;
561 if (buttonNum >= NB_BUTTONS) return;
562 if (!hwnd) return;
564 update_cursor( hwnd, event->window );
565 get_coords( &hwnd, event->window, event->x, event->y, &pt );
567 switch (buttonNum)
569 case 3:
570 wData = WHEEL_DELTA;
571 break;
572 case 4:
573 wData = -WHEEL_DELTA;
574 break;
576 update_key_state( event->state );
577 send_mouse_event( hwnd, button_down_flags[buttonNum] | MOUSEEVENTF_ABSOLUTE,
578 pt.x, pt.y, wData, event->time );
582 /***********************************************************************
583 * X11DRV_ButtonRelease
585 void X11DRV_ButtonRelease( HWND hwnd, XButtonEvent *event )
587 int buttonNum = event->button - 1;
588 POINT pt;
590 if (buttonNum >= NB_BUTTONS || !button_up_flags[buttonNum]) return;
591 if (!hwnd) return;
593 update_cursor( hwnd, event->window );
594 get_coords( &hwnd, event->window, event->x, event->y, &pt );
595 update_key_state( event->state );
596 send_mouse_event( hwnd, button_up_flags[buttonNum] | MOUSEEVENTF_ABSOLUTE,
597 pt.x, pt.y, 0, event->time );
601 /***********************************************************************
602 * X11DRV_MotionNotify
604 void X11DRV_MotionNotify( HWND hwnd, XMotionEvent *event )
606 POINT pt;
608 if (!hwnd) return;
610 update_cursor( hwnd, event->window );
611 get_coords( &hwnd, event->window, event->x, event->y, &pt );
612 update_key_state( event->state );
613 send_mouse_event( hwnd, MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE,
614 pt.x, pt.y, 0, event->time );
618 /***********************************************************************
619 * X11DRV_EnterNotify
621 void X11DRV_EnterNotify( HWND hwnd, XCrossingEvent *event )
623 POINT pt;
625 if (event->detail == NotifyVirtual || event->detail == NotifyNonlinearVirtual) return;
626 if (!hwnd) return;
628 /* simulate a mouse motion event */
629 update_cursor( hwnd, event->window );
630 get_coords( &hwnd, event->window, event->x, event->y, &pt );
631 update_key_state( event->state );
632 send_mouse_event( hwnd, MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE,
633 pt.x, pt.y, 0, event->time );
637 #ifdef HAVE_LIBXXF86DGA2
638 /**********************************************************************
639 * X11DRV_DGAMotionEvent
641 void X11DRV_DGAMotionEvent( HWND hwnd, XDGAMotionEvent *event )
643 update_key_state( event->state );
644 send_mouse_event( hwnd, MOUSEEVENTF_MOVE, event->dx, event->dy, 0, event->time );
647 /**********************************************************************
648 * X11DRV_DGAButtonPressEvent
650 void X11DRV_DGAButtonPressEvent( HWND hwnd, XDGAButtonEvent *event )
652 int buttonNum = event->button - 1;
654 if (buttonNum >= NB_BUTTONS) return;
655 update_key_state( event->state );
656 send_mouse_event( hwnd, button_down_flags[buttonNum], 0, 0, 0, event->time );
659 /**********************************************************************
660 * X11DRV_DGAButtonReleaseEvent
662 void X11DRV_DGAButtonReleaseEvent( HWND hwnd, XDGAButtonEvent *event )
664 int buttonNum = event->button - 1;
666 if (buttonNum >= NB_BUTTONS) return;
667 update_key_state( event->state );
668 send_mouse_event( hwnd, button_up_flags[buttonNum], 0, 0, 0, event->time );
670 #endif /* HAVE_LIBXXF86DGA2 */