/* * X11 mouse driver * * Copyright 1998 Ulrich Weigand */ #include "config.h" #ifndef X_DISPLAY_MISSING #include "ts_xlib.h" #include "callback.h" #include "debug.h" #include "mouse.h" #include "win.h" #include "windef.h" #include "x11drv.h" DEFAULT_DEBUG_CHANNEL(cursor) /**********************************************************************/ Cursor X11DRV_MOUSE_XCursor = None; /* Current X cursor */ static BOOL X11DRV_MOUSE_WarpPointer = TRUE; /* hack; see DISPLAY_MoveCursor */ /*********************************************************************** * X11DRV_MOUSE_DoSetCursor */ static BOOL X11DRV_MOUSE_DoSetCursor( CURSORICONINFO *ptr ) { Pixmap pixmapBits, pixmapMask, pixmapAll; XColor fg, bg; Cursor cursor = None; if (!ptr) /* Create an empty cursor */ { static const char data[] = { 0 }; bg.red = bg.green = bg.blue = 0x0000; pixmapBits = XCreateBitmapFromData( display, X11DRV_GetXRootWindow(), data, 1, 1 ); if (pixmapBits) { cursor = XCreatePixmapCursor( display, pixmapBits, pixmapBits, &bg, &bg, 0, 0 ); XFreePixmap( display, pixmapBits ); } } else /* Create the X cursor from the bits */ { XImage *image; if (ptr->bPlanes * ptr->bBitsPerPixel != 1) { WARN(cursor, "Cursor has more than 1 bpp!\n" ); return FALSE; } /* Create a pixmap and transfer all the bits to it */ /* NOTE: Following hack works, but only because XFree depth * 1 images really use 1 bit/pixel (and so the same layout * as the Windows cursor data). Perhaps use a more generic * algorithm here. */ pixmapAll = XCreatePixmap( display, X11DRV_GetXRootWindow(), ptr->nWidth, ptr->nHeight * 2, 1 ); image = XCreateImage( display, DefaultVisualOfScreen(X11DRV_GetXScreen()), 1, ZPixmap, 0, (char *)(ptr + 1), ptr->nWidth, ptr->nHeight * 2, 16, ptr->nWidthBytes); if (image) { image->byte_order = MSBFirst; image->bitmap_bit_order = MSBFirst; image->bitmap_unit = 16; _XInitImageFuncPtrs(image); if (pixmapAll) XPutImage( display, pixmapAll, BITMAP_monoGC, image, 0, 0, 0, 0, ptr->nWidth, ptr->nHeight * 2 ); image->data = NULL; XDestroyImage( image ); } /* Now create the 2 pixmaps for bits and mask */ pixmapBits = XCreatePixmap( display, X11DRV_GetXRootWindow(), ptr->nWidth, ptr->nHeight, 1 ); pixmapMask = XCreatePixmap( display, X11DRV_GetXRootWindow(), ptr->nWidth, ptr->nHeight, 1 ); /* Make sure everything went OK so far */ if (pixmapBits && pixmapMask && pixmapAll) { /* We have to do some magic here, as cursors are not fully * compatible between Windows and X11. Under X11, there * are only 3 possible color cursor: black, white and * masked. So we map the 4th Windows color (invert the * bits on the screen) to black. This require some boolean * arithmetic: * * Windows | X11 * Xor And Result | Bits Mask Result * 0 0 black | 0 1 background * 0 1 no change | X 0 no change * 1 0 white | 1 1 foreground * 1 1 inverted | 0 1 background * * which gives: * Bits = 'Xor' and not 'And' * Mask = 'Xor' or not 'And' * * FIXME: apparently some servers do support 'inverted' color. * I don't know if it's correct per the X spec, but maybe * we ought to take advantage of it. -- AJ */ XCopyArea( display, pixmapAll, pixmapBits, BITMAP_monoGC, 0, 0, ptr->nWidth, ptr->nHeight, 0, 0 ); XCopyArea( display, pixmapAll, pixmapMask, BITMAP_monoGC, 0, 0, ptr->nWidth, ptr->nHeight, 0, 0 ); XSetFunction( display, BITMAP_monoGC, GXandReverse ); XCopyArea( display, pixmapAll, pixmapBits, BITMAP_monoGC, 0, ptr->nHeight, ptr->nWidth, ptr->nHeight, 0, 0 ); XSetFunction( display, BITMAP_monoGC, GXorReverse ); XCopyArea( display, pixmapAll, pixmapMask, BITMAP_monoGC, 0, ptr->nHeight, ptr->nWidth, ptr->nHeight, 0, 0 ); XSetFunction( display, BITMAP_monoGC, GXcopy ); fg.red = fg.green = fg.blue = 0xffff; bg.red = bg.green = bg.blue = 0x0000; cursor = XCreatePixmapCursor( display, pixmapBits, pixmapMask, &fg, &bg, ptr->ptHotSpot.x, ptr->ptHotSpot.y ); } /* Now free everything */ if (pixmapAll) XFreePixmap( display, pixmapAll ); if (pixmapBits) XFreePixmap( display, pixmapBits ); if (pixmapMask) XFreePixmap( display, pixmapMask ); } if (cursor == None) return FALSE; if (X11DRV_MOUSE_XCursor != None) XFreeCursor( display, X11DRV_MOUSE_XCursor ); X11DRV_MOUSE_XCursor = cursor; return TRUE; } /*********************************************************************** * X11DRV_MOUSE_SetCursor */ void X11DRV_MOUSE_SetCursor( CURSORICONINFO *lpCursor ) { BOOL success; EnterCriticalSection( &X11DRV_CritSection ); success = CALL_LARGE_STACK( X11DRV_MOUSE_DoSetCursor, lpCursor ); LeaveCriticalSection( &X11DRV_CritSection ); if ( !success ) return; if (X11DRV_GetXRootWindow() != DefaultRootWindow(display)) { /* If in desktop mode, set the cursor on the desktop window */ XDefineCursor( display, X11DRV_GetXRootWindow(), X11DRV_MOUSE_XCursor ); } else { /* Else, set the same cursor for all top-level windows */ /* FIXME: we should not reference USER internals here, but native USER works only in desktop mode anyway, so this should not matter */ HWND hwnd = GetWindow( GetDesktopWindow(), GW_CHILD ); while(hwnd) { WND *tmpWnd = WIN_FindWndPtr(hwnd); Window win = X11DRV_WND_FindXWindow(tmpWnd ); if (win && win!=DefaultRootWindow(display)) XDefineCursor( display, win, X11DRV_MOUSE_XCursor ); hwnd = GetWindow( hwnd, GW_HWNDNEXT ); WIN_ReleaseWndPtr(tmpWnd); } } } /*********************************************************************** * X11DRV_MOUSE_MoveCursor */ void X11DRV_MOUSE_MoveCursor(WORD wAbsX, WORD wAbsY) { /* * We do not want the to create MotionNotify events here, * otherwise we will get an endless recursion: * XMotionEvent -> MOUSEEVENTF_MOVE -> mouse_event -> DisplayMoveCursor * -> XWarpPointer -> XMotionEvent -> ... * * Unfortunately, the XWarpPointer call does create a MotionNotify * event. So, we use a hack: before MOUSE_SendEvent calls the mouse event * procedure, it sets a global flag. If this flag is set, we skip the * XWarpPointer call. If we are *not* called from within MOUSE_SendEvent, * we will call XWarpPointer, which will create a MotionNotify event. * Strictly speaking, this is also wrong, but that should normally not * have any negative effects ... * * But first of all, we check whether we already are at the position * are supposed to move to; if so, we don't need to do anything. */ Window root, child; int rootX, rootY, winX, winY; unsigned int xstate; if (!X11DRV_MOUSE_WarpPointer) return; if (!TSXQueryPointer( display, X11DRV_GetXRootWindow(), &root, &child, &rootX, &rootY, &winX, &winY, &xstate )) return; if ( winX == wAbsX && winY == wAbsY ) return; TRACE( cursor, "(%d,%d): moving from (%d,%d)\n", wAbsX, wAbsY, winX, winY ); TSXWarpPointer( display, X11DRV_GetXRootWindow(), X11DRV_GetXRootWindow(), 0, 0, 0, 0, wAbsX, wAbsY ); } /*********************************************************************** * X11DRV_MOUSE_EnableWarpPointer */ BOOL X11DRV_MOUSE_EnableWarpPointer(BOOL bEnable) { BOOL bOldEnable = X11DRV_MOUSE_WarpPointer; X11DRV_MOUSE_WarpPointer = bEnable; return bOldEnable; } #endif /* !defined(X_DISPLAY_MISSING) */