| /* |
| * WINE |
| static char Copyright[] = "Copyright Martin Ayotte, 1993"; |
| */ |
| |
| #include <stdio.h> |
| #include <stdlib.h> |
| #include <string.h> |
| #include <sys/types.h> |
| #include <sys/stat.h> |
| #include <fcntl.h> |
| #include <unistd.h> |
| #include <X11/cursorfont.h> |
| #include <X11/Xlib.h> |
| #include <X11/Xutil.h> |
| #include "windows.h" |
| #include "win.h" |
| #include "gdi.h" |
| #include "neexe.h" |
| #include "wine.h" |
| #include "callback.h" |
| #include "cursor.h" |
| #include "resource.h" |
| #include "stddebug.h" |
| #include "debug.h" |
| #include "arch.h" |
| #include "bitmap.h" |
| |
| static int ShowCursCount = 0; |
| static HCURSOR hActiveCursor; |
| static HCURSOR hEmptyCursor = 0; |
| RECT ClipCursorRect; |
| |
| static struct { |
| SEGPTR name; HCURSOR cursor; unsigned int shape; |
| } system_cursor[] = |
| { |
| { IDC_ARROW, 0, XC_top_left_arrow}, |
| { IDC_IBEAM, 0, XC_xterm }, |
| { IDC_WAIT, 0, XC_watch }, |
| { IDC_CROSS, 0, XC_crosshair }, |
| { IDC_UPARROW, 0, XC_based_arrow_up }, |
| { IDC_SIZE, 0, XC_bottom_right_corner }, |
| { IDC_ICON, 0, XC_icon }, |
| { IDC_SIZENWSE, 0, XC_fleur }, |
| { IDC_SIZENESW, 0, XC_fleur }, |
| { IDC_SIZEWE, 0, XC_sb_h_double_arrow }, |
| { IDC_SIZENS, 0, XC_sb_v_double_arrow } |
| }; |
| |
| #define NB_SYS_CURSORS (sizeof(system_cursor)/sizeof(system_cursor[0])) |
| |
| |
| /********************************************************************** |
| * LoadCursor [USER.173] |
| */ |
| HCURSOR LoadCursor(HANDLE instance, SEGPTR cursor_name) |
| { |
| HCURSOR hCursor; |
| HRSRC hRsrc; |
| HANDLE rsc_mem; |
| char *lpbits; |
| LONG *lpl,size; |
| CURSORALLOC *lpcur; |
| CURSORDIR *lpcurdir; |
| CURSORDESCRIP curdesc; |
| POINT hotspot; |
| int i; |
| dprintf_resource(stddeb,"LoadCursor: instance = %04x, name = %08lx\n", |
| instance, cursor_name); |
| if (!instance) |
| { |
| for (i = 0; i < NB_SYS_CURSORS; i++) |
| if (system_cursor[i].name == cursor_name) |
| { |
| if (!system_cursor[i].cursor) |
| { |
| hCursor = GlobalAlloc (GMEM_MOVEABLE, sizeof (Cursor)); |
| dprintf_cursor(stddeb,"LoadCursor Alloc hCursor=%X\n", hCursor); |
| system_cursor[i].cursor = hCursor; |
| lpcur = (CURSORALLOC *) GlobalLock(hCursor); |
| lpcur->xcursor = XCreateFontCursor(display, system_cursor[i].shape); |
| GlobalUnlock(hCursor); |
| } |
| return system_cursor[i].cursor; |
| } |
| return 0; |
| } |
| |
| if (!(hRsrc = FindResource( instance, cursor_name, RT_GROUP_CURSOR ))) |
| return 0; |
| rsc_mem = LoadResource(instance, hRsrc ); |
| if (rsc_mem == (HANDLE)NULL) { |
| fprintf(stderr,"LoadCursor / Cursor %08lx not Found !\n", cursor_name); |
| return 0; |
| } |
| lpcurdir = (CURSORDIR *)LockResource(rsc_mem); |
| if (lpcurdir == NULL) { |
| FreeResource( rsc_mem ); |
| return 0; |
| } |
| curdesc = *(CURSORDESCRIP *)(lpcurdir + 1); /* CONV_CURDESC ? */ |
| #if 0 |
| dprintf_cursor(stddeb,"LoadCursor / curReserved=%X\n", lpcurdir->cdReserved); |
| dprintf_cursor(stddeb,"LoadCursor / curResourceType=%X\n", lpcurdir->cdType); |
| dprintf_cursor(stddeb,"LoadCursor / curResourceCount=%X\n", lpcurdir->cdCount); |
| dprintf_cursor(stddeb,"LoadCursor / cursor Width=%d\n", |
| (int)curdesc.Width); |
| dprintf_cursor(stddeb,"LoadCursor / cursor Height=%d\n", |
| (int)curdesc.Height); |
| dprintf_cursor(stddeb,"LoadCursor / cursor curDIBSize=%lX\n", |
| (DWORD)curdesc.curDIBSize); |
| dprintf_cursor(stddeb,"LoadCursor / cursor curDIBOffset=%lX\n", |
| (DWORD)curdesc.curDIBOffset); |
| #endif |
| FreeResource( rsc_mem ); |
| if (!(hRsrc = FindResource( instance, |
| MAKEINTRESOURCE(curdesc.curDIBOffset), |
| RT_CURSOR ))) |
| return 0; |
| rsc_mem = LoadResource(instance, hRsrc ); |
| if (rsc_mem == (HANDLE)NULL) { |
| fprintf(stderr, |
| "LoadCursor / Cursor %08lx Bitmap not Found !\n", cursor_name); |
| return 0; |
| } |
| lpl = (LONG *) LockResource(rsc_mem); |
| if (lpl == NULL) { |
| FreeResource( rsc_mem ); |
| return 0; |
| } |
| hotspot = *(POINT *) lpl++; /* CONV_POINT ? */ |
| size = CONV_LONG (*lpl); |
| #if 0 |
| if (!(hdc = GetDC(0))) { |
| FreeResource( rsc_mem ); |
| return 0; |
| } |
| if (size == sizeof(BITMAPCOREHEADER)){ |
| CONV_BITMAPCOREHEADER (lpl); |
| ((BITMAPINFOHEADER *)lpl)->biHeight /= 2; |
| lpcur->hBitmap = ConvertCoreBitmap( hdc, (BITMAPCOREHEADER *) lpl ); |
| } else if (size == sizeof(BITMAPINFOHEADER)){ |
| CONV_BITMAPINFO (lpl); |
| ((BITMAPINFOHEADER *)lpl)->biHeight /= 2; |
| lpcur->hBitmap = ConvertInfoBitmap( hdc, (BITMAPINFO *) lpl ); |
| } else { |
| fprintf(stderr,"No bitmap for cursor?\n"); |
| lpcur->hBitmap = 0; |
| } |
| ReleaseDC(0,hdc); |
| #endif |
| if (size == sizeof(BITMAPCOREHEADER)) |
| lpbits = (char *)lpl + sizeof(BITMAPCOREHEADER) + 2*sizeof(RGBTRIPLE); |
| else if (size == sizeof(BITMAPINFOHEADER)) |
| lpbits = (char *)lpl + sizeof(BITMAPINFOHEADER) + 2*sizeof(RGBQUAD); |
| else { |
| fprintf(stderr,"Invalid bitmap in cursor resource\n"); |
| FreeResource(rsc_mem); |
| return 0; |
| } |
| /* The height of the cursor is the height of the XOR-Bitmap |
| * plus the height of the AND-Bitmap, so divide it by two. |
| */ |
| size = curdesc.Height/2 * ((curdesc.Width+31)/32 * 4); |
| #if 0 |
| dprintf_cursor(stddeb,"Bitmap:\n"); |
| for(i=0;i<2*size;i++) { |
| dprintf_cursor(stddeb,"%02x ",(unsigned char) lpc[i]); |
| if ((i & 7) == 7) dprintf_cursor(stddeb,"\n"); |
| } |
| #endif |
| hCursor = CreateCursor(instance, hotspot.x, hotspot.y, |
| curdesc.Width, curdesc.Height / 2, |
| lpbits+size, lpbits); |
| FreeResource( rsc_mem ); |
| return hCursor; |
| } |
| |
| |
| |
| /*********************************************************************** |
| * CreateCursorIconIndirect (USER.408) |
| * |
| * Returns handle to either an icon or a cursor. Used by CreateCursor |
| * and CreateIcon in Windoze, but will use same in this version. |
| */ |
| HANDLE CreateCursorIconIndirect(HANDLE hInstance, LPCURSORICONINFO lpInfo, |
| LPSTR lpANDBits, /* bitmap data */ |
| LPSTR lpXORBits /* masking data */) |
| { |
| return CreateIcon(hInstance, |
| lpInfo->nWidth, lpInfo->nHeight, |
| lpInfo->byPlanes, lpInfo->byBitsPix, |
| lpANDBits, lpXORBits); |
| } |
| |
| |
| /********************************************************************** |
| * CreateCursor [USER.406] |
| */ |
| HCURSOR CreateCursor(HANDLE instance, short nXhotspot, short nYhotspot, |
| short nWidth, short nHeight, LPSTR lpANDbitPlane, LPSTR lpXORbitPlane) |
| { |
| HCURSOR hCursor; |
| CURSORALLOC *lpcur; |
| int bpl = (nWidth + 31)/32 * 4; |
| char *tmpbits = malloc(bpl * nHeight); |
| char *src, *dst; |
| int i; |
| XImage *image; |
| Pixmap pixshape, pixmask; |
| extern void _XInitImageFuncPtrs( XImage* ); |
| |
| XColor bkcolor,fgcolor; |
| Colormap cmap = XDefaultColormap(display,XDefaultScreen(display)); |
| |
| dprintf_resource(stddeb, "CreateCursor: inst=%04x nXhotspot=%d nYhotspot=%d nWidth=%d nHeight=%d\n", |
| instance, nXhotspot, nYhotspot, nWidth, nHeight); |
| dprintf_resource(stddeb,"CreateCursor: inst=%04x lpANDbitPlane=%p lpXORbitPlane=%p\n", |
| instance, lpANDbitPlane, lpXORbitPlane); |
| |
| image = XCreateImage( display, DefaultVisualOfScreen(screen), |
| 1, ZPixmap, 0, tmpbits, |
| nWidth, nHeight, 32, bpl ); |
| if (!image) { |
| free (tmpbits); |
| return 0; |
| } |
| image->byte_order = MSBFirst; |
| image->bitmap_bit_order = MSBFirst; |
| image->bitmap_unit = 16; |
| _XInitImageFuncPtrs(image); |
| |
| hCursor = GlobalAlloc(GMEM_MOVEABLE, sizeof(Cursor)); |
| if (hCursor == (HCURSOR)NULL) { |
| XDestroyImage(image); |
| return 0; |
| } |
| dprintf_cursor(stddeb,"CreateCursor Alloc hCursor=%X\n", hCursor); |
| lpcur = (CURSORALLOC *)GlobalLock(hCursor); |
| |
| for(src=lpANDbitPlane, dst=tmpbits+(nHeight-1)*bpl; |
| dst>=tmpbits; src+=bpl, dst-=bpl) |
| for(i=0; i<bpl; i++) |
| dst[i] = ~src[i]; |
| pixmask = XCreatePixmap(display, DefaultRootWindow(display), |
| nWidth, nHeight, 1); |
| CallTo32_LargeStack(XPutImage, 10, |
| display, pixmask, BITMAP_monoGC, image, |
| 0, 0, 0, 0, nWidth, nHeight ); |
| |
| for(src=lpXORbitPlane, dst=tmpbits+(nHeight-1)*bpl; |
| dst>=tmpbits; src+=bpl, dst-=bpl) |
| for(i=0; i<bpl; i++) |
| dst[i] = ~src[i]; |
| pixshape = XCreatePixmap(display, DefaultRootWindow(display), |
| nWidth, nHeight, 1); |
| CallTo32_LargeStack(XPutImage, 10, |
| display, pixshape, BITMAP_monoGC, image, |
| 0, 0, 0, 0, nWidth, nHeight ); |
| XParseColor(display,cmap,"#000000",&fgcolor); |
| XParseColor(display,cmap,"#ffffff",&bkcolor); |
| lpcur->xcursor = XCreatePixmapCursor(display, pixshape, pixmask, |
| &fgcolor, &bkcolor, nXhotspot, nYhotspot); |
| XFreePixmap(display, pixshape); |
| XFreePixmap(display, pixmask); |
| GlobalUnlock(hCursor); |
| XDestroyImage(image); |
| return hCursor; |
| } |
| |
| |
| |
| /********************************************************************** |
| * DestroyCursor [USER.458] |
| */ |
| BOOL DestroyCursor(HCURSOR hCursor) |
| { |
| int i; |
| CURSORALLOC *lpcur; |
| |
| if (hCursor == 0) return FALSE; |
| for (i = 0; i < NB_SYS_CURSORS; i++) { |
| if (system_cursor[i].cursor == hCursor) return TRUE; |
| } |
| lpcur = (CURSORALLOC *)GlobalLock(hCursor); |
| XFreeCursor (display, lpcur->xcursor); |
| GlobalUnlock(hCursor); |
| GlobalFree(hCursor); |
| return TRUE; |
| } |
| |
| |
| /********************************************************************** |
| * CURSOR_SetCursor |
| * |
| * Internal helper function for SetCursor() and ShowCursor(). |
| */ |
| static void CURSOR_SetCursor( HCURSOR hCursor ) |
| { |
| CURSORALLOC *lpcur; |
| |
| if (!(lpcur = (CURSORALLOC *)GlobalLock(hCursor))) return; |
| if (rootWindow != DefaultRootWindow(display)) |
| { |
| XDefineCursor( display, rootWindow, lpcur->xcursor ); |
| } |
| else |
| { |
| HWND hwnd = GetWindow( GetDesktopWindow(), GW_CHILD ); |
| while(hwnd) |
| { |
| Window win = WIN_GetXWindow( hwnd ); |
| if (win) XDefineCursor( display, win, lpcur->xcursor ); |
| hwnd = GetWindow( hwnd, GW_HWNDNEXT ); |
| } |
| } |
| GlobalUnlock( hCursor ); |
| } |
| |
| /********************************************************************** |
| * SetCursor [USER.69] |
| */ |
| HCURSOR SetCursor(HCURSOR hCursor) |
| { |
| HCURSOR hOldCursor; |
| |
| dprintf_cursor(stddeb,"SetCursor / hCursor=%04X !\n", hCursor); |
| hOldCursor = hActiveCursor; |
| hActiveCursor = hCursor; |
| if ((hCursor != hOldCursor) || (ShowCursCount < 0)) |
| { |
| CURSOR_SetCursor( hCursor ); |
| } |
| ShowCursCount = 0; |
| return hOldCursor; |
| } |
| |
| |
| /********************************************************************** |
| * GetCursor [USER.247] |
| */ |
| HCURSOR GetCursor(void) |
| { |
| return hActiveCursor; |
| } |
| |
| |
| /********************************************************************** |
| * SetCursorPos [USER.70] |
| */ |
| void SetCursorPos(short x, short y) |
| { |
| dprintf_cursor(stddeb,"SetCursorPos // x=%d y=%d\n", x, y); |
| XWarpPointer( display, None, rootWindow, 0, 0, 0, 0, x, y ); |
| } |
| |
| |
| /********************************************************************** |
| * GetCursorPos [USER.17] |
| */ |
| void GetCursorPos(LPPOINT lpRetPoint) |
| { |
| Window root, child; |
| int rootX, rootY; |
| int childX, childY; |
| unsigned int mousebut; |
| |
| if (!lpRetPoint) return; |
| if (!XQueryPointer( display, rootWindow, &root, &child, |
| &rootX, &rootY, &childX, &childY, &mousebut )) |
| lpRetPoint->x = lpRetPoint->y = 0; |
| else |
| { |
| lpRetPoint->x = rootX + desktopX; |
| lpRetPoint->y = rootY + desktopY; |
| } |
| dprintf_cursor(stddeb, |
| "GetCursorPos // x=%d y=%d\n", lpRetPoint->x, lpRetPoint->y); |
| } |
| |
| |
| /********************************************************************** |
| * ShowCursor [USER.71] |
| */ |
| int ShowCursor(BOOL bShow) |
| { |
| dprintf_cursor(stddeb, "ShowCursor(%d), count=%d\n", bShow, ShowCursCount); |
| |
| if (bShow) |
| { |
| if (++ShowCursCount == 0) /* Time to show it */ |
| CURSOR_SetCursor( hActiveCursor ); |
| } |
| else /* Hide it */ |
| { |
| if (--ShowCursCount == -1) /* Time to hide it */ |
| { |
| if (!hEmptyCursor) |
| hEmptyCursor = CreateCursor( 0, 1, 1, 1, 1, |
| "\xFF\xFF\xFF\xFF", "\xFF\xFF\xFF\xFF" ); |
| CURSOR_SetCursor( hEmptyCursor ); |
| } |
| } |
| return 0; |
| } |
| |
| |
| /********************************************************************** |
| * ClipCursor [USER.16] |
| */ |
| void ClipCursor(LPRECT lpNewClipRect) |
| { |
| if (!lpNewClipRect) SetRectEmpty( &ClipCursorRect ); |
| else CopyRect( &ClipCursorRect, lpNewClipRect ); |
| } |
| |
| |
| /********************************************************************** |
| * GetClipCursor [USER.309] |
| */ |
| void GetClipCursor(LPRECT lpRetClipRect) |
| { |
| if (lpRetClipRect != NULL) |
| CopyRect(lpRetClipRect, &ClipCursorRect); |
| } |