2 * Cursor and icon support
4 * Copyright 1995 Alexandre Julliard
5 * 1996 Martin Von Loewis
7 * 1998 Turchanov Sergey
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
27 * Cursors and icons are stored in a global heap block, with the
30 * CURSORICONINFO info;
34 * The bits structures are in the format of a device-dependent bitmap.
36 * This layout is very sub-optimal, as the bitmap bits are stored in
37 * the X client instead of in the server like other bitmaps; however,
38 * some programs (notably Paint Brush) expect to be able to manipulate
39 * the bits directly :-(
43 #include "wine/port.h"
53 #include "wine/winbase16.h"
54 #include "wine/winuser16.h"
55 #include "wine/exception.h"
56 #include "wine/debug.h"
57 #include "user_private.h"
59 WINE_DEFAULT_DEBUG_CHANNEL(cursor
);
60 WINE_DECLARE_DEBUG_CHANNEL(icon
);
61 WINE_DECLARE_DEBUG_CHANNEL(resource
);
74 } CURSORICONFILEDIRENTRY
;
81 CURSORICONFILEDIRENTRY idEntries
[1];
86 #define CID_RESOURCE 0x0001
87 #define CID_WIN32 0x0004
88 #define CID_NONSHARED 0x0008
90 static RECT CURSOR_ClipRect
; /* Cursor clipping rect */
94 static const WCHAR DISPLAYW
[] = {'D','I','S','P','L','A','Y',0};
96 /**********************************************************************
97 * ICONCACHE for cursors/icons loaded with LR_SHARED.
99 * FIXME: This should not be allocated on the system heap, but on a
100 * subsystem-global heap (i.e. one for all Win16 processes,
101 * and one for each Win32 process).
103 typedef struct tagICONCACHE
105 struct tagICONCACHE
*next
;
116 static ICONCACHE
*IconAnchor
= NULL
;
118 static CRITICAL_SECTION IconCrst
;
119 static CRITICAL_SECTION_DEBUG critsect_debug
=
122 { &critsect_debug
.ProcessLocksList
, &critsect_debug
.ProcessLocksList
},
123 0, 0, { (DWORD_PTR
)(__FILE__
": IconCrst") }
125 static CRITICAL_SECTION IconCrst
= { &critsect_debug
, -1, 0, 0, 0, 0 };
127 static const WORD ICON_HOTSPOT
= 0x4242;
130 /***********************************************************************
133 * Helper function to map a file to memory:
135 * [RETURN] ptr - pointer to mapped file
136 * [RETURN] filesize - pointer size of file to be stored if not NULL
138 static void *map_fileW( LPCWSTR name
, LPDWORD filesize
)
140 HANDLE hFile
, hMapping
;
143 hFile
= CreateFileW( name
, GENERIC_READ
, FILE_SHARE_READ
, NULL
,
144 OPEN_EXISTING
, FILE_FLAG_RANDOM_ACCESS
, 0 );
145 if (hFile
!= INVALID_HANDLE_VALUE
)
147 hMapping
= CreateFileMappingW( hFile
, NULL
, PAGE_READONLY
, 0, 0, NULL
);
150 ptr
= MapViewOfFile( hMapping
, FILE_MAP_READ
, 0, 0, 0 );
151 CloseHandle( hMapping
);
153 *filesize
= GetFileSize( hFile
, NULL
);
155 CloseHandle( hFile
);
161 /***********************************************************************
162 * get_bitmap_width_bytes
164 * Return number of bytes taken by a scanline of 16-bit aligned Windows DDB
167 static int get_bitmap_width_bytes( int width
, int bpp
)
172 return 2 * ((width
+15) / 16);
174 return 2 * ((width
+3) / 4);
179 return width
+ (width
& 1);
186 WARN("Unknown depth %d, please report.\n", bpp
);
192 /***********************************************************************
193 * get_dib_width_bytes
195 * Return the width of a DIB bitmap in bytes. DIB bitmap data is 32-bit aligned.
197 static int get_dib_width_bytes( int width
, int depth
)
203 case 1: words
= (width
+ 31) / 32; break;
204 case 4: words
= (width
+ 7) / 8; break;
205 case 8: words
= (width
+ 3) / 4; break;
207 case 16: words
= (width
+ 1) / 2; break;
208 case 24: words
= (width
* 3 + 3)/4; break;
210 WARN("(%d): Unsupported depth\n", depth
);
219 /***********************************************************************
222 * Return the size of the bitmap info structure including color table.
224 static int bitmap_info_size( const BITMAPINFO
* info
, WORD coloruse
)
228 if (info
->bmiHeader
.biSize
== sizeof(BITMAPCOREHEADER
))
230 const BITMAPCOREHEADER
*core
= (const BITMAPCOREHEADER
*)info
;
231 colors
= (core
->bcBitCount
<= 8) ? 1 << core
->bcBitCount
: 0;
232 return sizeof(BITMAPCOREHEADER
) + colors
*
233 ((coloruse
== DIB_RGB_COLORS
) ? sizeof(RGBTRIPLE
) : sizeof(WORD
));
235 else /* assume BITMAPINFOHEADER */
237 colors
= info
->bmiHeader
.biClrUsed
;
238 if (colors
> 256) /* buffer overflow otherwise */
240 if (!colors
&& (info
->bmiHeader
.biBitCount
<= 8))
241 colors
= 1 << info
->bmiHeader
.biBitCount
;
242 return sizeof(BITMAPINFOHEADER
) + colors
*
243 ((coloruse
== DIB_RGB_COLORS
) ? sizeof(RGBQUAD
) : sizeof(WORD
));
248 /***********************************************************************
251 * Returns whether a DIB can be converted to a monochrome DDB.
253 * A DIB can be converted if its color table contains only black and
254 * white. Black must be the first color in the color table.
256 * Note : If the first color in the color table is white followed by
257 * black, we can't convert it to a monochrome DDB with
258 * SetDIBits, because black and white would be inverted.
260 static BOOL
is_dib_monochrome( const BITMAPINFO
* info
)
262 if (info
->bmiHeader
.biBitCount
!= 1) return FALSE
;
264 if (info
->bmiHeader
.biSize
== sizeof(BITMAPCOREHEADER
))
266 const RGBTRIPLE
*rgb
= ((const BITMAPCOREINFO
*)info
)->bmciColors
;
268 /* Check if the first color is black */
269 if ((rgb
->rgbtRed
== 0) && (rgb
->rgbtGreen
== 0) && (rgb
->rgbtBlue
== 0))
273 /* Check if the second color is white */
274 return ((rgb
->rgbtRed
== 0xff) && (rgb
->rgbtGreen
== 0xff)
275 && (rgb
->rgbtBlue
== 0xff));
279 else /* assume BITMAPINFOHEADER */
281 const RGBQUAD
*rgb
= info
->bmiColors
;
283 /* Check if the first color is black */
284 if ((rgb
->rgbRed
== 0) && (rgb
->rgbGreen
== 0) &&
285 (rgb
->rgbBlue
== 0) && (rgb
->rgbReserved
== 0))
289 /* Check if the second color is white */
290 return ((rgb
->rgbRed
== 0xff) && (rgb
->rgbGreen
== 0xff)
291 && (rgb
->rgbBlue
== 0xff) && (rgb
->rgbReserved
== 0));
297 /***********************************************************************
300 * Get the info from a bitmap header.
301 * Return 1 for INFOHEADER, 0 for COREHEADER,
302 * 4 for V4HEADER, 5 for V5HEADER, -1 for error.
304 static int DIB_GetBitmapInfo( const BITMAPINFOHEADER
*header
, LONG
*width
,
305 LONG
*height
, WORD
*bpp
, DWORD
*compr
)
307 if (header
->biSize
== sizeof(BITMAPINFOHEADER
))
309 *width
= header
->biWidth
;
310 *height
= header
->biHeight
;
311 *bpp
= header
->biBitCount
;
312 *compr
= header
->biCompression
;
315 if (header
->biSize
== sizeof(BITMAPCOREHEADER
))
317 const BITMAPCOREHEADER
*core
= (const BITMAPCOREHEADER
*)header
;
318 *width
= core
->bcWidth
;
319 *height
= core
->bcHeight
;
320 *bpp
= core
->bcBitCount
;
324 if (header
->biSize
== sizeof(BITMAPV4HEADER
))
326 const BITMAPV4HEADER
*v4hdr
= (const BITMAPV4HEADER
*)header
;
327 *width
= v4hdr
->bV4Width
;
328 *height
= v4hdr
->bV4Height
;
329 *bpp
= v4hdr
->bV4BitCount
;
330 *compr
= v4hdr
->bV4V4Compression
;
333 if (header
->biSize
== sizeof(BITMAPV5HEADER
))
335 const BITMAPV5HEADER
*v5hdr
= (const BITMAPV5HEADER
*)header
;
336 *width
= v5hdr
->bV5Width
;
337 *height
= v5hdr
->bV5Height
;
338 *bpp
= v5hdr
->bV5BitCount
;
339 *compr
= v5hdr
->bV5Compression
;
342 ERR("(%d): unknown/wrong size for header\n", header
->biSize
);
346 /**********************************************************************
347 * CURSORICON_FindSharedIcon
349 static HICON
CURSORICON_FindSharedIcon( HMODULE hModule
, HRSRC hRsrc
)
354 EnterCriticalSection( &IconCrst
);
356 for ( ptr
= IconAnchor
; ptr
; ptr
= ptr
->next
)
357 if ( ptr
->hModule
== hModule
&& ptr
->hRsrc
== hRsrc
)
364 LeaveCriticalSection( &IconCrst
);
369 /*************************************************************************
370 * CURSORICON_FindCache
372 * Given a handle, find the corresponding cache element
375 * Handle [I] handle to an Image
378 * Success: The cache entry
382 static ICONCACHE
* CURSORICON_FindCache(HICON hIcon
)
385 ICONCACHE
*pRet
=NULL
;
386 BOOL IsFound
= FALSE
;
389 EnterCriticalSection( &IconCrst
);
391 for (count
= 0, ptr
= IconAnchor
; ptr
!= NULL
&& !IsFound
; ptr
= ptr
->next
, count
++ )
393 if ( hIcon
== ptr
->hIcon
)
400 LeaveCriticalSection( &IconCrst
);
405 /**********************************************************************
406 * CURSORICON_AddSharedIcon
408 static void CURSORICON_AddSharedIcon( HMODULE hModule
, HRSRC hRsrc
, HRSRC hGroupRsrc
, HICON hIcon
)
410 ICONCACHE
*ptr
= HeapAlloc( GetProcessHeap(), 0, sizeof(ICONCACHE
) );
413 ptr
->hModule
= hModule
;
416 ptr
->hGroupRsrc
= hGroupRsrc
;
419 EnterCriticalSection( &IconCrst
);
420 ptr
->next
= IconAnchor
;
422 LeaveCriticalSection( &IconCrst
);
425 /**********************************************************************
426 * CURSORICON_DelSharedIcon
428 static INT
CURSORICON_DelSharedIcon( HICON hIcon
)
433 EnterCriticalSection( &IconCrst
);
435 for ( ptr
= IconAnchor
; ptr
; ptr
= ptr
->next
)
436 if ( ptr
->hIcon
== hIcon
)
438 if ( ptr
->count
> 0 ) ptr
->count
--;
443 LeaveCriticalSection( &IconCrst
);
448 /**********************************************************************
449 * CURSORICON_FreeModuleIcons
451 void CURSORICON_FreeModuleIcons( HMODULE16 hMod16
)
453 ICONCACHE
**ptr
= &IconAnchor
;
454 HMODULE hModule
= HMODULE_32(GetExePtr( hMod16
));
456 EnterCriticalSection( &IconCrst
);
460 if ( (*ptr
)->hModule
== hModule
)
462 ICONCACHE
*freePtr
= *ptr
;
463 *ptr
= freePtr
->next
;
465 GlobalFree16(HICON_16(freePtr
->hIcon
));
466 HeapFree( GetProcessHeap(), 0, freePtr
);
472 LeaveCriticalSection( &IconCrst
);
476 * The following macro functions account for the irregularities of
477 * accessing cursor and icon resources in files and resource entries.
479 typedef BOOL (*fnGetCIEntry
)( LPVOID dir
, int n
,
480 int *width
, int *height
, int *bits
);
482 /**********************************************************************
483 * CURSORICON_FindBestIcon
485 * Find the icon closest to the requested size and number of colors.
487 static int CURSORICON_FindBestIcon( LPVOID dir
, fnGetCIEntry get_entry
,
488 int width
, int height
, int colors
)
490 int i
, cx
, cy
, bits
, bestEntry
= -1;
491 UINT iTotalDiff
, iXDiff
=0, iYDiff
=0, iColorDiff
;
492 UINT iTempXDiff
, iTempYDiff
, iTempColorDiff
;
495 iTotalDiff
= 0xFFFFFFFF;
496 iColorDiff
= 0xFFFFFFFF;
497 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
499 iTempXDiff
= abs(width
- cx
);
500 iTempYDiff
= abs(height
- cy
);
502 if(iTotalDiff
> (iTempXDiff
+ iTempYDiff
))
506 iTotalDiff
= iXDiff
+ iYDiff
;
510 /* Find Best Colors for Best Fit */
511 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
513 if(abs(width
- cx
) == iXDiff
&& abs(height
- cy
) == iYDiff
)
515 iTempColorDiff
= abs(colors
- (1<<bits
));
516 if(iColorDiff
> iTempColorDiff
)
519 iColorDiff
= iTempColorDiff
;
527 static BOOL
CURSORICON_GetResIconEntry( LPVOID dir
, int n
,
528 int *width
, int *height
, int *bits
)
530 CURSORICONDIR
*resdir
= dir
;
533 if ( resdir
->idCount
<= n
)
535 icon
= &resdir
->idEntries
[n
].ResInfo
.icon
;
536 *width
= icon
->bWidth
;
537 *height
= icon
->bHeight
;
538 *bits
= resdir
->idEntries
[n
].wBitCount
;
542 /**********************************************************************
543 * CURSORICON_FindBestCursor
545 * Find the cursor closest to the requested size.
546 * FIXME: parameter 'color' ignored and entries with more than 1 bpp
549 static int CURSORICON_FindBestCursor( LPVOID dir
, fnGetCIEntry get_entry
,
550 int width
, int height
, int color
)
552 int i
, maxwidth
, maxheight
, cx
, cy
, bits
, bestEntry
= -1;
554 /* Double height to account for AND and XOR masks */
558 /* First find the largest one smaller than or equal to the requested size*/
560 maxwidth
= maxheight
= 0;
561 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
563 if ((cx
<= width
) && (cy
<= height
) &&
564 (cx
> maxwidth
) && (cy
> maxheight
) &&
572 if (bestEntry
!= -1) return bestEntry
;
574 /* Now find the smallest one larger than the requested size */
576 maxwidth
= maxheight
= 255;
577 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
579 if (((cx
< maxwidth
) && (cy
< maxheight
) && (bits
== 1)) ||
591 static BOOL
CURSORICON_GetResCursorEntry( LPVOID dir
, int n
,
592 int *width
, int *height
, int *bits
)
594 CURSORICONDIR
*resdir
= dir
;
597 if ( resdir
->idCount
<= n
)
599 cursor
= &resdir
->idEntries
[n
].ResInfo
.cursor
;
600 *width
= cursor
->wWidth
;
601 *height
= cursor
->wHeight
;
602 *bits
= resdir
->idEntries
[n
].wBitCount
;
606 static CURSORICONDIRENTRY
*CURSORICON_FindBestIconRes( CURSORICONDIR
* dir
,
607 int width
, int height
, int colors
)
611 n
= CURSORICON_FindBestIcon( dir
, CURSORICON_GetResIconEntry
,
612 width
, height
, colors
);
615 return &dir
->idEntries
[n
];
618 static CURSORICONDIRENTRY
*CURSORICON_FindBestCursorRes( CURSORICONDIR
*dir
,
619 int width
, int height
, int color
)
621 int n
= CURSORICON_FindBestCursor( dir
, CURSORICON_GetResCursorEntry
,
622 width
, height
, color
);
625 return &dir
->idEntries
[n
];
628 static BOOL
CURSORICON_GetFileEntry( LPVOID dir
, int n
,
629 int *width
, int *height
, int *bits
)
631 CURSORICONFILEDIR
*filedir
= dir
;
632 CURSORICONFILEDIRENTRY
*entry
;
634 if ( filedir
->idCount
<= n
)
636 entry
= &filedir
->idEntries
[n
];
637 *width
= entry
->bWidth
;
638 *height
= entry
->bHeight
;
639 *bits
= entry
->bColorCount
;
643 static CURSORICONFILEDIRENTRY
*CURSORICON_FindBestCursorFile( CURSORICONFILEDIR
*dir
,
644 int width
, int height
, int color
)
646 int n
= CURSORICON_FindBestCursor( dir
, CURSORICON_GetFileEntry
,
647 width
, height
, color
);
650 return &dir
->idEntries
[n
];
653 static CURSORICONFILEDIRENTRY
*CURSORICON_FindBestIconFile( CURSORICONFILEDIR
*dir
,
654 int width
, int height
, int color
)
656 int n
= CURSORICON_FindBestIcon( dir
, CURSORICON_GetFileEntry
,
657 width
, height
, color
);
660 return &dir
->idEntries
[n
];
663 /**********************************************************************
664 * CreateIconFromResourceEx (USER32.@)
666 * FIXME: Convert to mono when cFlag is LR_MONOCHROME. Do something
667 * with cbSize parameter as well.
669 HICON WINAPI
CreateIconFromResourceEx( LPBYTE bits
, UINT cbSize
,
670 BOOL bIcon
, DWORD dwVersion
,
671 INT width
, INT height
,
676 int sizeAnd
, sizeXor
;
677 HBITMAP hAndBits
= 0, hXorBits
= 0; /* error condition for later */
678 BITMAP bmpXor
, bmpAnd
;
684 hotspot
.x
= ICON_HOTSPOT
;
685 hotspot
.y
= ICON_HOTSPOT
;
687 TRACE_(cursor
)("%p (%u bytes), ver %08x, %ix%i %s %s\n",
688 bits
, cbSize
, dwVersion
, width
, height
,
689 bIcon
? "icon" : "cursor", (cFlag
& LR_MONOCHROME
) ? "mono" : "" );
690 if (dwVersion
== 0x00020000)
692 FIXME_(cursor
)("\t2.xx resources are not supported\n");
697 bmi
= (BITMAPINFO
*)bits
;
698 else /* get the hotspot */
700 POINT16
*pt
= (POINT16
*)bits
;
702 bmi
= (BITMAPINFO
*)(pt
+ 1);
705 /* Check bitmap header */
707 if ( (bmi
->bmiHeader
.biSize
!= sizeof(BITMAPCOREHEADER
)) &&
708 (bmi
->bmiHeader
.biSize
!= sizeof(BITMAPINFOHEADER
) ||
709 bmi
->bmiHeader
.biCompression
!= BI_RGB
) )
711 WARN_(cursor
)("\tinvalid resource bitmap header.\n");
715 size
= bitmap_info_size( bmi
, DIB_RGB_COLORS
);
717 if (!width
) width
= bmi
->bmiHeader
.biWidth
;
718 if (!height
) height
= bmi
->bmiHeader
.biHeight
/2;
719 DoStretch
= (bmi
->bmiHeader
.biHeight
/2 != height
) ||
720 (bmi
->bmiHeader
.biWidth
!= width
);
722 if (!screen_dc
) screen_dc
= CreateDCW( DISPLAYW
, NULL
, NULL
, NULL
);
727 /* Make sure we have room for the monochrome bitmap later on.
728 * Note that BITMAPINFOINFO and BITMAPCOREHEADER are the same
729 * up to and including the biBitCount. In-memory icon resource
730 * format is as follows:
732 * BITMAPINFOHEADER icHeader // DIB header
733 * RGBQUAD icColors[] // Color table
734 * BYTE icXOR[] // DIB bits for XOR mask
735 * BYTE icAND[] // DIB bits for AND mask
738 if ((pInfo
= HeapAlloc( GetProcessHeap(), 0,
739 max(size
, sizeof(BITMAPINFOHEADER
) + 2*sizeof(RGBQUAD
)))))
741 memcpy( pInfo
, bmi
, size
);
742 pInfo
->bmiHeader
.biHeight
/= 2;
744 /* Create the XOR bitmap */
749 hXorBits
= CreateCompatibleBitmap(screen_dc
, width
, height
);
753 hXorBits
= CreateBitmap(width
, height
, 1, 1, NULL
);
760 if (!hdcMem
) hdcMem
= CreateCompatibleDC(screen_dc
);
762 hOld
= SelectObject(hdcMem
, hXorBits
);
763 res
= StretchDIBits(hdcMem
, 0, 0, width
, height
, 0, 0,
764 bmi
->bmiHeader
.biWidth
, bmi
->bmiHeader
.biHeight
/2,
765 (char*)bmi
+ size
, pInfo
, DIB_RGB_COLORS
, SRCCOPY
);
766 SelectObject(hdcMem
, hOld
);
768 if (!res
) { DeleteObject(hXorBits
); hXorBits
= 0; }
771 if (is_dib_monochrome(bmi
)) {
772 hXorBits
= CreateBitmap(width
, height
, 1, 1, NULL
);
773 SetDIBits(screen_dc
, hXorBits
, 0, height
,
774 (char*)bmi
+ size
, pInfo
, DIB_RGB_COLORS
);
777 hXorBits
= CreateDIBitmap(screen_dc
, &pInfo
->bmiHeader
,
778 CBM_INIT
, (char*)bmi
+ size
, pInfo
, DIB_RGB_COLORS
);
783 char* xbits
= (char *)bmi
+ size
+
784 get_dib_width_bytes( bmi
->bmiHeader
.biWidth
,
785 bmi
->bmiHeader
.biBitCount
) * abs( bmi
->bmiHeader
.biHeight
) / 2;
787 pInfo
->bmiHeader
.biBitCount
= 1;
788 if (pInfo
->bmiHeader
.biSize
!= sizeof(BITMAPCOREHEADER
))
790 RGBQUAD
*rgb
= pInfo
->bmiColors
;
792 pInfo
->bmiHeader
.biClrUsed
= pInfo
->bmiHeader
.biClrImportant
= 2;
793 rgb
[0].rgbBlue
= rgb
[0].rgbGreen
= rgb
[0].rgbRed
= 0x00;
794 rgb
[1].rgbBlue
= rgb
[1].rgbGreen
= rgb
[1].rgbRed
= 0xff;
795 rgb
[0].rgbReserved
= rgb
[1].rgbReserved
= 0;
799 RGBTRIPLE
*rgb
= (RGBTRIPLE
*)(((BITMAPCOREHEADER
*)pInfo
) + 1);
801 rgb
[0].rgbtBlue
= rgb
[0].rgbtGreen
= rgb
[0].rgbtRed
= 0x00;
802 rgb
[1].rgbtBlue
= rgb
[1].rgbtGreen
= rgb
[1].rgbtRed
= 0xff;
805 /* Create the AND bitmap */
808 if ((hAndBits
= CreateBitmap(width
, height
, 1, 1, NULL
))) {
812 if (!hdcMem
) hdcMem
= CreateCompatibleDC(screen_dc
);
814 hOld
= SelectObject(hdcMem
, hAndBits
);
815 res
= StretchDIBits(hdcMem
, 0, 0, width
, height
, 0, 0,
816 pInfo
->bmiHeader
.biWidth
, pInfo
->bmiHeader
.biHeight
,
817 xbits
, pInfo
, DIB_RGB_COLORS
, SRCCOPY
);
818 SelectObject(hdcMem
, hOld
);
820 if (!res
) { DeleteObject(hAndBits
); hAndBits
= 0; }
823 hAndBits
= CreateBitmap(width
, height
, 1, 1, NULL
);
825 if (hAndBits
) SetDIBits(screen_dc
, hAndBits
, 0, height
,
826 xbits
, pInfo
, DIB_RGB_COLORS
);
829 if( !hAndBits
) DeleteObject( hXorBits
);
831 HeapFree( GetProcessHeap(), 0, pInfo
);
835 if( !hXorBits
|| !hAndBits
)
837 WARN_(cursor
)("\tunable to create an icon bitmap.\n");
841 /* Now create the CURSORICONINFO structure */
842 GetObjectA( hXorBits
, sizeof(bmpXor
), &bmpXor
);
843 GetObjectA( hAndBits
, sizeof(bmpAnd
), &bmpAnd
);
844 sizeXor
= bmpXor
.bmHeight
* bmpXor
.bmWidthBytes
;
845 sizeAnd
= bmpAnd
.bmHeight
* bmpAnd
.bmWidthBytes
;
847 hObj
= GlobalAlloc16( GMEM_MOVEABLE
,
848 sizeof(CURSORICONINFO
) + sizeXor
+ sizeAnd
);
851 CURSORICONINFO
*info
;
853 info
= (CURSORICONINFO
*)GlobalLock16( hObj
);
854 info
->ptHotSpot
.x
= hotspot
.x
;
855 info
->ptHotSpot
.y
= hotspot
.y
;
856 info
->nWidth
= bmpXor
.bmWidth
;
857 info
->nHeight
= bmpXor
.bmHeight
;
858 info
->nWidthBytes
= bmpXor
.bmWidthBytes
;
859 info
->bPlanes
= bmpXor
.bmPlanes
;
860 info
->bBitsPerPixel
= bmpXor
.bmBitsPixel
;
862 /* Transfer the bitmap bits to the CURSORICONINFO structure */
864 GetBitmapBits( hAndBits
, sizeAnd
, (char *)(info
+ 1) );
865 GetBitmapBits( hXorBits
, sizeXor
, (char *)(info
+ 1) + sizeAnd
);
866 GlobalUnlock16( hObj
);
869 DeleteObject( hAndBits
);
870 DeleteObject( hXorBits
);
871 return HICON_32(hObj
);
875 /**********************************************************************
876 * CreateIconFromResource (USER32.@)
878 HICON WINAPI
CreateIconFromResource( LPBYTE bits
, UINT cbSize
,
879 BOOL bIcon
, DWORD dwVersion
)
881 return CreateIconFromResourceEx( bits
, cbSize
, bIcon
, dwVersion
, 0,0,0);
885 static HICON
CURSORICON_LoadFromFile( LPCWSTR filename
,
886 INT width
, INT height
, INT colors
,
887 BOOL fCursor
, UINT loadflags
)
889 CURSORICONFILEDIRENTRY
*entry
;
890 CURSORICONFILEDIR
*dir
;
895 TRACE("loading %s\n", debugstr_w( filename
));
897 bits
= map_fileW( filename
, &filesize
);
901 /* Check for .ani. */
902 if (memcmp( bits
, "RIFF", 4 ) == 0)
904 FIXME("No support for .ani cursors.\n");
908 dir
= (CURSORICONFILEDIR
*) bits
;
909 if ( filesize
< sizeof(*dir
) )
912 if ( filesize
< (sizeof(*dir
) + sizeof(dir
->idEntries
[0])*(dir
->idCount
-1)) )
916 entry
= CURSORICON_FindBestCursorFile( dir
, width
, height
, colors
);
918 entry
= CURSORICON_FindBestIconFile( dir
, width
, height
, colors
);
923 /* check that we don't run off the end of the file */
924 if ( entry
->dwDIBOffset
> filesize
)
926 if ( entry
->dwDIBOffset
+ entry
->dwDIBSize
> filesize
)
929 hIcon
= CreateIconFromResourceEx( &bits
[entry
->dwDIBOffset
], entry
->dwDIBSize
,
930 !fCursor
, 0x00030000, width
, height
, loadflags
);
932 TRACE("loaded %s -> %p\n", debugstr_w( filename
), hIcon
);
933 UnmapViewOfFile( bits
);
937 /**********************************************************************
940 * Load a cursor or icon from resource or file.
942 static HICON
CURSORICON_Load(HINSTANCE hInstance
, LPCWSTR name
,
943 INT width
, INT height
, INT colors
,
944 BOOL fCursor
, UINT loadflags
)
948 HRSRC hRsrc
, hGroupRsrc
;
950 CURSORICONDIRENTRY
*dirEntry
;
955 TRACE("%p, %s, %dx%d, colors %d, fCursor %d, flags 0x%04x\n",
956 hInstance
, debugstr_w(name
), width
, height
, colors
, fCursor
, loadflags
);
958 if ( loadflags
& LR_LOADFROMFILE
) /* Load from file */
959 return CURSORICON_LoadFromFile( name
, width
, height
, colors
, fCursor
, loadflags
);
961 if (!hInstance
) hInstance
= user32_module
; /* Load OEM cursor/icon */
963 /* Normalize hInstance (must be uniquely represented for icon cache) */
965 if (!HIWORD( hInstance
))
966 hInstance
= HINSTANCE_32(GetExePtr( HINSTANCE_16(hInstance
) ));
968 /* Get directory resource ID */
970 if (!(hRsrc
= FindResourceW( hInstance
, name
,
971 (LPWSTR
)(fCursor
? RT_GROUP_CURSOR
: RT_GROUP_ICON
) )))
975 /* Find the best entry in the directory */
977 if (!(handle
= LoadResource( hInstance
, hRsrc
))) return 0;
978 if (!(dir
= (CURSORICONDIR
*)LockResource( handle
))) return 0;
980 dirEntry
= CURSORICON_FindBestCursorRes( dir
, width
, height
, 1);
982 dirEntry
= CURSORICON_FindBestIconRes( dir
, width
, height
, colors
);
983 if (!dirEntry
) return 0;
984 wResId
= dirEntry
->wResId
;
985 dwBytesInRes
= dirEntry
->dwBytesInRes
;
986 FreeResource( handle
);
988 /* Load the resource */
990 if (!(hRsrc
= FindResourceW(hInstance
,MAKEINTRESOURCEW(wResId
),
991 (LPWSTR
)(fCursor
? RT_CURSOR
: RT_ICON
) ))) return 0;
993 /* If shared icon, check whether it was already loaded */
994 if ( (loadflags
& LR_SHARED
)
995 && (hIcon
= CURSORICON_FindSharedIcon( hInstance
, hRsrc
) ) != 0 )
998 if (!(handle
= LoadResource( hInstance
, hRsrc
))) return 0;
999 bits
= (LPBYTE
)LockResource( handle
);
1000 hIcon
= CreateIconFromResourceEx( bits
, dwBytesInRes
,
1001 !fCursor
, 0x00030000, width
, height
, loadflags
);
1002 FreeResource( handle
);
1004 /* If shared icon, add to icon cache */
1006 if ( hIcon
&& (loadflags
& LR_SHARED
) )
1007 CURSORICON_AddSharedIcon( hInstance
, hRsrc
, hGroupRsrc
, hIcon
);
1012 /***********************************************************************
1015 * Make a copy of a cursor or icon.
1017 static HICON
CURSORICON_Copy( HINSTANCE16 hInst16
, HICON hIcon
)
1019 char *ptrOld
, *ptrNew
;
1021 HICON16 hOld
= HICON_16(hIcon
);
1024 if (!(ptrOld
= (char *)GlobalLock16( hOld
))) return 0;
1025 if (hInst16
&& !(hInst16
= GetExePtr( hInst16
))) return 0;
1026 size
= GlobalSize16( hOld
);
1027 hNew
= GlobalAlloc16( GMEM_MOVEABLE
, size
);
1028 FarSetOwner16( hNew
, hInst16
);
1029 ptrNew
= (char *)GlobalLock16( hNew
);
1030 memcpy( ptrNew
, ptrOld
, size
);
1031 GlobalUnlock16( hOld
);
1032 GlobalUnlock16( hNew
);
1033 return HICON_32(hNew
);
1036 /*************************************************************************
1037 * CURSORICON_ExtCopy
1039 * Copies an Image from the Cache if LR_COPYFROMRESOURCE is specified
1042 * Handle [I] handle to an Image
1043 * nType [I] Type of Handle (IMAGE_CURSOR | IMAGE_ICON)
1044 * iDesiredCX [I] The Desired width of the Image
1045 * iDesiredCY [I] The desired height of the Image
1046 * nFlags [I] The flags from CopyImage
1049 * Success: The new handle of the Image
1052 * LR_COPYDELETEORG and LR_MONOCHROME are currently not implemented.
1053 * LR_MONOCHROME should be implemented by CreateIconFromResourceEx.
1054 * LR_COPYFROMRESOURCE will only work if the Image is in the Cache.
1059 static HICON
CURSORICON_ExtCopy(HICON hIcon
, UINT nType
,
1060 INT iDesiredCX
, INT iDesiredCY
,
1065 TRACE_(icon
)("hIcon %p, nType %u, iDesiredCX %i, iDesiredCY %i, nFlags %u\n",
1066 hIcon
, nType
, iDesiredCX
, iDesiredCY
, nFlags
);
1073 /* Best Fit or Monochrome */
1074 if( (nFlags
& LR_COPYFROMRESOURCE
1075 && (iDesiredCX
> 0 || iDesiredCY
> 0))
1076 || nFlags
& LR_MONOCHROME
)
1078 ICONCACHE
* pIconCache
= CURSORICON_FindCache(hIcon
);
1080 /* Not Found in Cache, then do a straight copy
1082 if(pIconCache
== NULL
)
1084 hNew
= CURSORICON_Copy(0, hIcon
);
1085 if(nFlags
& LR_COPYFROMRESOURCE
)
1087 TRACE_(icon
)("LR_COPYFROMRESOURCE: Failed to load from cache\n");
1092 int iTargetCY
= iDesiredCY
, iTargetCX
= iDesiredCX
;
1098 CURSORICONDIR
*pDir
;
1099 CURSORICONDIRENTRY
*pDirEntry
;
1100 BOOL bIsIcon
= (nType
== IMAGE_ICON
);
1102 /* Completing iDesiredCX CY for Monochrome Bitmaps if needed
1104 if(((nFlags
& LR_MONOCHROME
) && !(nFlags
& LR_COPYFROMRESOURCE
))
1105 || (iDesiredCX
== 0 && iDesiredCY
== 0))
1107 iDesiredCY
= GetSystemMetrics(bIsIcon
?
1108 SM_CYICON
: SM_CYCURSOR
);
1109 iDesiredCX
= GetSystemMetrics(bIsIcon
?
1110 SM_CXICON
: SM_CXCURSOR
);
1113 /* Retrieve the CURSORICONDIRENTRY
1115 if (!(hMem
= LoadResource( pIconCache
->hModule
,
1116 pIconCache
->hGroupRsrc
)))
1120 if (!(pDir
= (CURSORICONDIR
*)LockResource( hMem
)))
1129 pDirEntry
= CURSORICON_FindBestIconRes(
1130 pDir
, iDesiredCX
, iDesiredCY
, 256 );
1134 pDirEntry
= CURSORICON_FindBestCursorRes(
1135 pDir
, iDesiredCX
, iDesiredCY
, 1);
1138 wResId
= pDirEntry
->wResId
;
1139 dwBytesInRes
= pDirEntry
->dwBytesInRes
;
1142 TRACE_(icon
)("ResID %u, BytesInRes %u, Width %d, Height %d DX %d, DY %d\n",
1143 wResId
, dwBytesInRes
, pDirEntry
->ResInfo
.icon
.bWidth
,
1144 pDirEntry
->ResInfo
.icon
.bHeight
, iDesiredCX
, iDesiredCY
);
1148 if (!(hRsrc
= FindResourceW(pIconCache
->hModule
,
1149 MAKEINTRESOURCEW(wResId
), (LPWSTR
)(bIsIcon
? RT_ICON
: RT_CURSOR
))))
1153 if (!(hMem
= LoadResource( pIconCache
->hModule
, hRsrc
)))
1158 pBits
= (LPBYTE
)LockResource( hMem
);
1160 if(nFlags
& LR_DEFAULTSIZE
)
1162 iTargetCY
= GetSystemMetrics(SM_CYICON
);
1163 iTargetCX
= GetSystemMetrics(SM_CXICON
);
1166 /* Create a New Icon with the proper dimension
1168 hNew
= CreateIconFromResourceEx( pBits
, dwBytesInRes
,
1169 bIsIcon
, 0x00030000, iTargetCX
, iTargetCY
, nFlags
);
1173 else hNew
= CURSORICON_Copy(0, hIcon
);
1178 /***********************************************************************
1179 * CreateCursor (USER32.@)
1181 HCURSOR WINAPI
CreateCursor( HINSTANCE hInstance
,
1182 INT xHotSpot
, INT yHotSpot
,
1183 INT nWidth
, INT nHeight
,
1184 LPCVOID lpANDbits
, LPCVOID lpXORbits
)
1186 CURSORICONINFO info
;
1188 TRACE_(cursor
)("%dx%d spot=%d,%d xor=%p and=%p\n",
1189 nWidth
, nHeight
, xHotSpot
, yHotSpot
, lpXORbits
, lpANDbits
);
1191 info
.ptHotSpot
.x
= xHotSpot
;
1192 info
.ptHotSpot
.y
= yHotSpot
;
1193 info
.nWidth
= nWidth
;
1194 info
.nHeight
= nHeight
;
1195 info
.nWidthBytes
= 0;
1197 info
.bBitsPerPixel
= 1;
1199 return HICON_32(CreateCursorIconIndirect16(0, &info
, lpANDbits
, lpXORbits
));
1203 /***********************************************************************
1204 * CreateIcon (USER.407)
1206 HICON16 WINAPI
CreateIcon16( HINSTANCE16 hInstance
, INT16 nWidth
,
1207 INT16 nHeight
, BYTE bPlanes
, BYTE bBitsPixel
,
1208 LPCVOID lpANDbits
, LPCVOID lpXORbits
)
1210 CURSORICONINFO info
;
1212 TRACE_(icon
)("%dx%dx%d, xor=%p, and=%p\n",
1213 nWidth
, nHeight
, bPlanes
* bBitsPixel
, lpXORbits
, lpANDbits
);
1215 info
.ptHotSpot
.x
= ICON_HOTSPOT
;
1216 info
.ptHotSpot
.y
= ICON_HOTSPOT
;
1217 info
.nWidth
= nWidth
;
1218 info
.nHeight
= nHeight
;
1219 info
.nWidthBytes
= 0;
1220 info
.bPlanes
= bPlanes
;
1221 info
.bBitsPerPixel
= bBitsPixel
;
1223 return CreateCursorIconIndirect16( hInstance
, &info
, lpANDbits
, lpXORbits
);
1227 /***********************************************************************
1228 * CreateIcon (USER32.@)
1230 * Creates an icon based on the specified bitmaps. The bitmaps must be
1231 * provided in a device dependent format and will be resized to
1232 * (SM_CXICON,SM_CYICON) and depth converted to match the screen's color
1233 * depth. The provided bitmaps must be top-down bitmaps.
1234 * Although Windows does not support 15bpp(*) this API must support it
1235 * for Winelib applications.
1237 * (*) Windows does not support 15bpp but it supports the 555 RGB 16bpp
1241 * Success: handle to an icon
1244 * FIXME: Do we need to resize the bitmaps?
1246 HICON WINAPI
CreateIcon(
1247 HINSTANCE hInstance
, /* [in] the application's hInstance */
1248 INT nWidth
, /* [in] the width of the provided bitmaps */
1249 INT nHeight
, /* [in] the height of the provided bitmaps */
1250 BYTE bPlanes
, /* [in] the number of planes in the provided bitmaps */
1251 BYTE bBitsPixel
, /* [in] the number of bits per pixel of the lpXORbits bitmap */
1252 LPCVOID lpANDbits
, /* [in] a monochrome bitmap representing the icon's mask */
1253 LPCVOID lpXORbits
) /* [in] the icon's 'color' bitmap */
1258 TRACE_(icon
)("%dx%d, planes %d, bpp %d, xor %p, and %p\n",
1259 nWidth
, nHeight
, bPlanes
, bBitsPixel
, lpXORbits
, lpANDbits
);
1262 iinfo
.xHotspot
= ICON_HOTSPOT
;
1263 iinfo
.yHotspot
= ICON_HOTSPOT
;
1264 iinfo
.hbmMask
= CreateBitmap( nWidth
, nHeight
, 1, 1, lpANDbits
);
1265 iinfo
.hbmColor
= CreateBitmap( nWidth
, nHeight
, bPlanes
, bBitsPixel
, lpXORbits
);
1267 hIcon
= CreateIconIndirect( &iinfo
);
1269 DeleteObject( iinfo
.hbmMask
);
1270 DeleteObject( iinfo
.hbmColor
);
1276 /***********************************************************************
1277 * CreateCursorIconIndirect (USER.408)
1279 HGLOBAL16 WINAPI
CreateCursorIconIndirect16( HINSTANCE16 hInstance
,
1280 CURSORICONINFO
*info
,
1286 int sizeAnd
, sizeXor
;
1288 hInstance
= GetExePtr( hInstance
); /* Make it a module handle */
1289 if (!lpXORbits
|| !lpANDbits
|| info
->bPlanes
!= 1) return 0;
1290 info
->nWidthBytes
= get_bitmap_width_bytes(info
->nWidth
,info
->bBitsPerPixel
);
1291 sizeXor
= info
->nHeight
* info
->nWidthBytes
;
1292 sizeAnd
= info
->nHeight
* get_bitmap_width_bytes( info
->nWidth
, 1 );
1293 if (!(handle
= GlobalAlloc16( GMEM_MOVEABLE
,
1294 sizeof(CURSORICONINFO
) + sizeXor
+ sizeAnd
)))
1296 FarSetOwner16( handle
, hInstance
);
1297 ptr
= (char *)GlobalLock16( handle
);
1298 memcpy( ptr
, info
, sizeof(*info
) );
1299 memcpy( ptr
+ sizeof(CURSORICONINFO
), lpANDbits
, sizeAnd
);
1300 memcpy( ptr
+ sizeof(CURSORICONINFO
) + sizeAnd
, lpXORbits
, sizeXor
);
1301 GlobalUnlock16( handle
);
1306 /***********************************************************************
1307 * CopyIcon (USER.368)
1309 HICON16 WINAPI
CopyIcon16( HINSTANCE16 hInstance
, HICON16 hIcon
)
1311 TRACE_(icon
)("%04x %04x\n", hInstance
, hIcon
);
1312 return HICON_16(CURSORICON_Copy(hInstance
, HICON_32(hIcon
)));
1316 /***********************************************************************
1317 * CopyIcon (USER32.@)
1319 HICON WINAPI
CopyIcon( HICON hIcon
)
1321 TRACE_(icon
)("%p\n", hIcon
);
1322 return CURSORICON_Copy( 0, hIcon
);
1326 /***********************************************************************
1327 * CopyCursor (USER.369)
1329 HCURSOR16 WINAPI
CopyCursor16( HINSTANCE16 hInstance
, HCURSOR16 hCursor
)
1331 TRACE_(cursor
)("%04x %04x\n", hInstance
, hCursor
);
1332 return HICON_16(CURSORICON_Copy(hInstance
, HCURSOR_32(hCursor
)));
1335 /**********************************************************************
1336 * DestroyIcon32 (USER.610)
1338 * This routine is actually exported from Win95 USER under the name
1339 * DestroyIcon32 ... The behaviour implemented here should mimic
1340 * the Win95 one exactly, especially the return values, which
1341 * depend on the setting of various flags.
1343 WORD WINAPI
DestroyIcon32( HGLOBAL16 handle
, UINT16 flags
)
1347 TRACE_(icon
)("(%04x, %04x)\n", handle
, flags
);
1349 /* Check whether destroying active cursor */
1351 if ( get_user_thread_info()->cursor
== HICON_32(handle
) )
1353 WARN_(cursor
)("Destroying active cursor!\n" );
1357 /* Try shared cursor/icon first */
1359 if ( !(flags
& CID_NONSHARED
) )
1361 INT count
= CURSORICON_DelSharedIcon(HICON_32(handle
));
1364 return (flags
& CID_WIN32
)? TRUE
: (count
== 0);
1366 /* FIXME: OEM cursors/icons should be recognized */
1369 /* Now assume non-shared cursor/icon */
1371 retv
= GlobalFree16( handle
);
1372 return (flags
& CID_RESOURCE
)? retv
: TRUE
;
1375 /***********************************************************************
1376 * DestroyIcon (USER32.@)
1378 BOOL WINAPI
DestroyIcon( HICON hIcon
)
1380 return DestroyIcon32(HICON_16(hIcon
), CID_WIN32
);
1384 /***********************************************************************
1385 * DestroyCursor (USER32.@)
1387 BOOL WINAPI
DestroyCursor( HCURSOR hCursor
)
1389 return DestroyIcon32(HCURSOR_16(hCursor
), CID_WIN32
);
1393 /***********************************************************************
1394 * DrawIcon (USER32.@)
1396 BOOL WINAPI
DrawIcon( HDC hdc
, INT x
, INT y
, HICON hIcon
)
1398 CURSORICONINFO
*ptr
;
1400 HBITMAP hXorBits
, hAndBits
;
1401 COLORREF oldFg
, oldBg
;
1403 TRACE("%p, (%d,%d), %p\n", hdc
, x
, y
, hIcon
);
1405 if (!(ptr
= (CURSORICONINFO
*)GlobalLock16(HICON_16(hIcon
)))) return FALSE
;
1406 if (!(hMemDC
= CreateCompatibleDC( hdc
))) return FALSE
;
1407 hAndBits
= CreateBitmap( ptr
->nWidth
, ptr
->nHeight
, 1, 1,
1409 hXorBits
= CreateBitmap( ptr
->nWidth
, ptr
->nHeight
, ptr
->bPlanes
,
1410 ptr
->bBitsPerPixel
, (char *)(ptr
+ 1)
1411 + ptr
->nHeight
* get_bitmap_width_bytes(ptr
->nWidth
,1) );
1412 oldFg
= SetTextColor( hdc
, RGB(0,0,0) );
1413 oldBg
= SetBkColor( hdc
, RGB(255,255,255) );
1415 if (hXorBits
&& hAndBits
)
1417 HBITMAP hBitTemp
= SelectObject( hMemDC
, hAndBits
);
1418 BitBlt( hdc
, x
, y
, ptr
->nWidth
, ptr
->nHeight
, hMemDC
, 0, 0, SRCAND
);
1419 SelectObject( hMemDC
, hXorBits
);
1420 BitBlt(hdc
, x
, y
, ptr
->nWidth
, ptr
->nHeight
, hMemDC
, 0, 0,SRCINVERT
);
1421 SelectObject( hMemDC
, hBitTemp
);
1424 if (hXorBits
) DeleteObject( hXorBits
);
1425 if (hAndBits
) DeleteObject( hAndBits
);
1426 GlobalUnlock16(HICON_16(hIcon
));
1427 SetTextColor( hdc
, oldFg
);
1428 SetBkColor( hdc
, oldBg
);
1432 /***********************************************************************
1433 * DumpIcon (USER.459)
1435 DWORD WINAPI
DumpIcon16( SEGPTR pInfo
, WORD
*lpLen
,
1436 SEGPTR
*lpXorBits
, SEGPTR
*lpAndBits
)
1438 CURSORICONINFO
*info
= MapSL( pInfo
);
1439 int sizeAnd
, sizeXor
;
1441 if (!info
) return 0;
1442 sizeXor
= info
->nHeight
* info
->nWidthBytes
;
1443 sizeAnd
= info
->nHeight
* get_bitmap_width_bytes( info
->nWidth
, 1 );
1444 if (lpAndBits
) *lpAndBits
= pInfo
+ sizeof(CURSORICONINFO
);
1445 if (lpXorBits
) *lpXorBits
= pInfo
+ sizeof(CURSORICONINFO
) + sizeAnd
;
1446 if (lpLen
) *lpLen
= sizeof(CURSORICONINFO
) + sizeAnd
+ sizeXor
;
1447 return MAKELONG( sizeXor
, sizeXor
);
1451 /***********************************************************************
1452 * SetCursor (USER32.@)
1454 * Set the cursor shape.
1457 * A handle to the previous cursor shape.
1459 HCURSOR WINAPI
SetCursor( HCURSOR hCursor
/* [in] Handle of cursor to show */ )
1461 struct user_thread_info
*thread_info
= get_user_thread_info();
1464 if (hCursor
== thread_info
->cursor
) return hCursor
; /* No change */
1465 TRACE("%p\n", hCursor
);
1466 hOldCursor
= thread_info
->cursor
;
1467 thread_info
->cursor
= hCursor
;
1468 /* Change the cursor shape only if it is visible */
1469 if (thread_info
->cursor_count
>= 0)
1471 USER_Driver
->pSetCursor( (CURSORICONINFO
*)GlobalLock16(HCURSOR_16(hCursor
)) );
1472 GlobalUnlock16(HCURSOR_16(hCursor
));
1477 /***********************************************************************
1478 * ShowCursor (USER32.@)
1480 INT WINAPI
ShowCursor( BOOL bShow
)
1482 struct user_thread_info
*thread_info
= get_user_thread_info();
1484 TRACE("%d, count=%d\n", bShow
, thread_info
->cursor_count
);
1488 if (++thread_info
->cursor_count
== 0) /* Show it */
1490 USER_Driver
->pSetCursor((CURSORICONINFO
*)GlobalLock16(HCURSOR_16(thread_info
->cursor
)));
1491 GlobalUnlock16(HCURSOR_16(thread_info
->cursor
));
1496 if (--thread_info
->cursor_count
== -1) /* Hide it */
1497 USER_Driver
->pSetCursor( NULL
);
1499 return thread_info
->cursor_count
;
1502 /***********************************************************************
1503 * GetCursor (USER32.@)
1505 HCURSOR WINAPI
GetCursor(void)
1507 return get_user_thread_info()->cursor
;
1511 /***********************************************************************
1512 * ClipCursor (USER32.@)
1514 BOOL WINAPI
ClipCursor( const RECT
*rect
)
1518 SetRect( &virt
, 0, 0, GetSystemMetrics( SM_CXVIRTUALSCREEN
),
1519 GetSystemMetrics( SM_CYVIRTUALSCREEN
) );
1520 OffsetRect( &virt
, GetSystemMetrics( SM_XVIRTUALSCREEN
),
1521 GetSystemMetrics( SM_YVIRTUALSCREEN
) );
1523 TRACE( "Clipping to: %s was: %s screen: %s\n", wine_dbgstr_rect(rect
),
1524 wine_dbgstr_rect(&CURSOR_ClipRect
), wine_dbgstr_rect(&virt
) );
1526 if (!IntersectRect( &CURSOR_ClipRect
, &virt
, rect
))
1527 CURSOR_ClipRect
= virt
;
1529 USER_Driver
->pClipCursor( rect
);
1534 /***********************************************************************
1535 * GetClipCursor (USER32.@)
1537 BOOL WINAPI
GetClipCursor( RECT
*rect
)
1539 /* If this is first time - initialize the rect */
1540 if (IsRectEmpty( &CURSOR_ClipRect
)) ClipCursor( NULL
);
1542 return CopyRect( rect
, &CURSOR_ClipRect
);
1546 /***********************************************************************
1547 * SetSystemCursor (USER32.@)
1549 BOOL WINAPI
SetSystemCursor(HCURSOR hcur
, DWORD id
)
1551 FIXME("(%p,%08x),stub!\n", hcur
, id
);
1556 /**********************************************************************
1557 * LookupIconIdFromDirectoryEx (USER.364)
1559 * FIXME: exact parameter sizes
1561 INT16 WINAPI
LookupIconIdFromDirectoryEx16( LPBYTE dir
, BOOL16 bIcon
,
1562 INT16 width
, INT16 height
, UINT16 cFlag
)
1564 return LookupIconIdFromDirectoryEx( dir
, bIcon
, width
, height
, cFlag
);
1567 /**********************************************************************
1568 * LookupIconIdFromDirectoryEx (USER32.@)
1570 INT WINAPI
LookupIconIdFromDirectoryEx( LPBYTE xdir
, BOOL bIcon
,
1571 INT width
, INT height
, UINT cFlag
)
1573 CURSORICONDIR
*dir
= (CURSORICONDIR
*)xdir
;
1575 if( dir
&& !dir
->idReserved
&& (dir
->idType
& 3) )
1577 CURSORICONDIRENTRY
* entry
;
1582 palEnts
= GetSystemPaletteEntries(hdc
, 0, 0, NULL
);
1585 colors
= (cFlag
& LR_MONOCHROME
) ? 2 : palEnts
;
1590 entry
= CURSORICON_FindBestIconRes( dir
, width
, height
, colors
);
1592 entry
= CURSORICON_FindBestCursorRes( dir
, width
, height
, 1);
1594 if( entry
) retVal
= entry
->wResId
;
1596 else WARN_(cursor
)("invalid resource directory\n");
1600 /**********************************************************************
1601 * LookupIconIdFromDirectory (USER.?)
1603 INT16 WINAPI
LookupIconIdFromDirectory16( LPBYTE dir
, BOOL16 bIcon
)
1605 return LookupIconIdFromDirectoryEx16( dir
, bIcon
,
1606 bIcon
? GetSystemMetrics(SM_CXICON
) : GetSystemMetrics(SM_CXCURSOR
),
1607 bIcon
? GetSystemMetrics(SM_CYICON
) : GetSystemMetrics(SM_CYCURSOR
), bIcon
? 0 : LR_MONOCHROME
);
1610 /**********************************************************************
1611 * LookupIconIdFromDirectory (USER32.@)
1613 INT WINAPI
LookupIconIdFromDirectory( LPBYTE dir
, BOOL bIcon
)
1615 return LookupIconIdFromDirectoryEx( dir
, bIcon
,
1616 bIcon
? GetSystemMetrics(SM_CXICON
) : GetSystemMetrics(SM_CXCURSOR
),
1617 bIcon
? GetSystemMetrics(SM_CYICON
) : GetSystemMetrics(SM_CYCURSOR
), bIcon
? 0 : LR_MONOCHROME
);
1620 /**********************************************************************
1621 * GetIconID (USER.455)
1623 WORD WINAPI
GetIconID16( HGLOBAL16 hResource
, DWORD resType
)
1625 LPBYTE lpDir
= (LPBYTE
)GlobalLock16(hResource
);
1627 TRACE_(cursor
)("hRes=%04x, entries=%i\n",
1628 hResource
, lpDir
? ((CURSORICONDIR
*)lpDir
)->idCount
: 0);
1633 return (WORD
)LookupIconIdFromDirectoryEx16( lpDir
, FALSE
,
1634 GetSystemMetrics(SM_CXCURSOR
), GetSystemMetrics(SM_CYCURSOR
), LR_MONOCHROME
);
1636 return (WORD
)LookupIconIdFromDirectoryEx16( lpDir
, TRUE
,
1637 GetSystemMetrics(SM_CXICON
), GetSystemMetrics(SM_CYICON
), 0 );
1639 WARN_(cursor
)("invalid res type %d\n", resType
);
1644 /**********************************************************************
1645 * LoadCursorIconHandler (USER.336)
1647 * Supposed to load resources of Windows 2.x applications.
1649 HGLOBAL16 WINAPI
LoadCursorIconHandler16( HGLOBAL16 hResource
, HMODULE16 hModule
, HRSRC16 hRsrc
)
1651 FIXME_(cursor
)("(%04x,%04x,%04x): old 2.x resources are not supported!\n",
1652 hResource
, hModule
, hRsrc
);
1653 return (HGLOBAL16
)0;
1656 /**********************************************************************
1657 * LoadIconHandler (USER.456)
1659 HICON16 WINAPI
LoadIconHandler16( HGLOBAL16 hResource
, BOOL16 bNew
)
1661 LPBYTE bits
= (LPBYTE
)LockResource16( hResource
);
1663 TRACE_(cursor
)("hRes=%04x\n",hResource
);
1665 return HICON_16(CreateIconFromResourceEx( bits
, 0, TRUE
,
1666 bNew
? 0x00030000 : 0x00020000, 0, 0, LR_DEFAULTCOLOR
));
1669 /***********************************************************************
1670 * LoadCursorW (USER32.@)
1672 HCURSOR WINAPI
LoadCursorW(HINSTANCE hInstance
, LPCWSTR name
)
1674 TRACE("%p, %s\n", hInstance
, debugstr_w(name
));
1676 return LoadImageW( hInstance
, name
, IMAGE_CURSOR
, 0, 0,
1677 LR_SHARED
| LR_DEFAULTSIZE
);
1680 /***********************************************************************
1681 * LoadCursorA (USER32.@)
1683 HCURSOR WINAPI
LoadCursorA(HINSTANCE hInstance
, LPCSTR name
)
1685 TRACE("%p, %s\n", hInstance
, debugstr_a(name
));
1687 return LoadImageA( hInstance
, name
, IMAGE_CURSOR
, 0, 0,
1688 LR_SHARED
| LR_DEFAULTSIZE
);
1691 /***********************************************************************
1692 * LoadCursorFromFileW (USER32.@)
1694 HCURSOR WINAPI
LoadCursorFromFileW (LPCWSTR name
)
1696 TRACE("%s\n", debugstr_w(name
));
1698 return LoadImageW( 0, name
, IMAGE_CURSOR
, 0, 0,
1699 LR_LOADFROMFILE
| LR_DEFAULTSIZE
);
1702 /***********************************************************************
1703 * LoadCursorFromFileA (USER32.@)
1705 HCURSOR WINAPI
LoadCursorFromFileA (LPCSTR name
)
1707 TRACE("%s\n", debugstr_a(name
));
1709 return LoadImageA( 0, name
, IMAGE_CURSOR
, 0, 0,
1710 LR_LOADFROMFILE
| LR_DEFAULTSIZE
);
1713 /***********************************************************************
1714 * LoadIconW (USER32.@)
1716 HICON WINAPI
LoadIconW(HINSTANCE hInstance
, LPCWSTR name
)
1718 TRACE("%p, %s\n", hInstance
, debugstr_w(name
));
1720 return LoadImageW( hInstance
, name
, IMAGE_ICON
, 0, 0,
1721 LR_SHARED
| LR_DEFAULTSIZE
);
1724 /***********************************************************************
1725 * LoadIconA (USER32.@)
1727 HICON WINAPI
LoadIconA(HINSTANCE hInstance
, LPCSTR name
)
1729 TRACE("%p, %s\n", hInstance
, debugstr_a(name
));
1731 return LoadImageA( hInstance
, name
, IMAGE_ICON
, 0, 0,
1732 LR_SHARED
| LR_DEFAULTSIZE
);
1735 /**********************************************************************
1736 * GetIconInfo (USER32.@)
1738 BOOL WINAPI
GetIconInfo(HICON hIcon
, PICONINFO iconinfo
)
1740 CURSORICONINFO
*ciconinfo
;
1743 ciconinfo
= GlobalLock16(HICON_16(hIcon
));
1747 TRACE("%p => %dx%d, %d bpp\n", hIcon
,
1748 ciconinfo
->nWidth
, ciconinfo
->nHeight
, ciconinfo
->bBitsPerPixel
);
1750 if ( (ciconinfo
->ptHotSpot
.x
== ICON_HOTSPOT
) &&
1751 (ciconinfo
->ptHotSpot
.y
== ICON_HOTSPOT
) )
1753 iconinfo
->fIcon
= TRUE
;
1754 iconinfo
->xHotspot
= ciconinfo
->nWidth
/ 2;
1755 iconinfo
->yHotspot
= ciconinfo
->nHeight
/ 2;
1759 iconinfo
->fIcon
= FALSE
;
1760 iconinfo
->xHotspot
= ciconinfo
->ptHotSpot
.x
;
1761 iconinfo
->yHotspot
= ciconinfo
->ptHotSpot
.y
;
1764 height
= ciconinfo
->nHeight
;
1766 if (ciconinfo
->bBitsPerPixel
> 1)
1768 iconinfo
->hbmColor
= CreateBitmap( ciconinfo
->nWidth
, ciconinfo
->nHeight
,
1769 ciconinfo
->bPlanes
, ciconinfo
->bBitsPerPixel
,
1770 (char *)(ciconinfo
+ 1)
1771 + ciconinfo
->nHeight
*
1772 get_bitmap_width_bytes (ciconinfo
->nWidth
,1) );
1776 iconinfo
->hbmColor
= 0;
1780 iconinfo
->hbmMask
= CreateBitmap ( ciconinfo
->nWidth
, height
,
1781 1, 1, (char *)(ciconinfo
+ 1));
1783 GlobalUnlock16(HICON_16(hIcon
));
1788 /**********************************************************************
1789 * CreateIconIndirect (USER32.@)
1791 HICON WINAPI
CreateIconIndirect(PICONINFO iconinfo
)
1793 BITMAP bmpXor
,bmpAnd
;
1795 int sizeXor
,sizeAnd
;
1797 TRACE("color %p, mask %p, hotspot %ux%u, fIcon %d\n",
1798 iconinfo
->hbmColor
, iconinfo
->hbmMask
,
1799 iconinfo
->xHotspot
, iconinfo
->yHotspot
, iconinfo
->fIcon
);
1801 if (!iconinfo
->hbmMask
) return 0;
1803 if (iconinfo
->hbmColor
)
1805 GetObjectW( iconinfo
->hbmColor
, sizeof(bmpXor
), &bmpXor
);
1806 TRACE("color: width %d, height %d, width bytes %d, planes %u, bpp %u\n",
1807 bmpXor
.bmWidth
, bmpXor
.bmHeight
, bmpXor
.bmWidthBytes
,
1808 bmpXor
.bmPlanes
, bmpXor
.bmBitsPixel
);
1810 GetObjectW( iconinfo
->hbmMask
, sizeof(bmpAnd
), &bmpAnd
);
1811 TRACE("mask: width %d, height %d, width bytes %d, planes %u, bpp %u\n",
1812 bmpAnd
.bmWidth
, bmpAnd
.bmHeight
, bmpAnd
.bmWidthBytes
,
1813 bmpAnd
.bmPlanes
, bmpAnd
.bmBitsPixel
);
1815 sizeXor
= iconinfo
->hbmColor
? (bmpXor
.bmHeight
* bmpXor
.bmWidthBytes
) : 0;
1816 sizeAnd
= bmpAnd
.bmHeight
* get_bitmap_width_bytes(bmpAnd
.bmWidth
, 1);
1818 hObj
= GlobalAlloc16( GMEM_MOVEABLE
,
1819 sizeof(CURSORICONINFO
) + sizeXor
+ sizeAnd
);
1822 CURSORICONINFO
*info
;
1824 info
= (CURSORICONINFO
*)GlobalLock16( hObj
);
1826 /* If we are creating an icon, the hotspot is unused */
1827 if (iconinfo
->fIcon
)
1829 info
->ptHotSpot
.x
= ICON_HOTSPOT
;
1830 info
->ptHotSpot
.y
= ICON_HOTSPOT
;
1834 info
->ptHotSpot
.x
= iconinfo
->xHotspot
;
1835 info
->ptHotSpot
.y
= iconinfo
->yHotspot
;
1838 if (iconinfo
->hbmColor
)
1840 info
->nWidth
= bmpXor
.bmWidth
;
1841 info
->nHeight
= bmpXor
.bmHeight
;
1842 info
->nWidthBytes
= bmpXor
.bmWidthBytes
;
1843 info
->bPlanes
= bmpXor
.bmPlanes
;
1844 info
->bBitsPerPixel
= bmpXor
.bmBitsPixel
;
1848 info
->nWidth
= bmpAnd
.bmWidth
;
1849 info
->nHeight
= bmpAnd
.bmHeight
/ 2;
1850 info
->nWidthBytes
= get_bitmap_width_bytes(bmpAnd
.bmWidth
, 1);
1852 info
->bBitsPerPixel
= 1;
1855 /* Transfer the bitmap bits to the CURSORICONINFO structure */
1857 /* Some apps pass a color bitmap as a mask, convert it to b/w */
1858 if (bmpAnd
.bmBitsPixel
== 1)
1860 GetBitmapBits( iconinfo
->hbmMask
, sizeAnd
, (char*)(info
+ 1) );
1865 HBITMAP hbmp_old
, hbmp_mem_old
, hbmp_mono
;
1868 hdc_mem
= CreateCompatibleDC( hdc
);
1870 hbmp_mono
= CreateBitmap( bmpAnd
.bmWidth
, bmpAnd
.bmHeight
, 1, 1, NULL
);
1872 hbmp_old
= SelectObject( hdc
, iconinfo
->hbmMask
);
1873 hbmp_mem_old
= SelectObject( hdc_mem
, hbmp_mono
);
1875 BitBlt( hdc_mem
, 0, 0, bmpAnd
.bmWidth
, bmpAnd
.bmHeight
, hdc
, 0, 0, SRCCOPY
);
1877 SelectObject( hdc
, hbmp_old
);
1878 SelectObject( hdc_mem
, hbmp_mem_old
);
1880 DeleteDC( hdc_mem
);
1881 ReleaseDC( 0, hdc
);
1883 GetBitmapBits( hbmp_mono
, sizeAnd
, (char*)(info
+ 1) );
1884 DeleteObject( hbmp_mono
);
1886 if (iconinfo
->hbmColor
) GetBitmapBits( iconinfo
->hbmColor
, sizeXor
, (char*)(info
+ 1) + sizeAnd
);
1887 GlobalUnlock16( hObj
);
1889 return HICON_32(hObj
);
1892 /******************************************************************************
1893 * DrawIconEx (USER32.@) Draws an icon or cursor on device context
1896 * Why is this using SM_CXICON instead of SM_CXCURSOR?
1899 * hdc [I] Handle to device context
1900 * x0 [I] X coordinate of upper left corner
1901 * y0 [I] Y coordinate of upper left corner
1902 * hIcon [I] Handle to icon to draw
1903 * cxWidth [I] Width of icon
1904 * cyWidth [I] Height of icon
1905 * istep [I] Index of frame in animated cursor
1906 * hbr [I] Handle to background brush
1907 * flags [I] Icon-drawing flags
1913 BOOL WINAPI
DrawIconEx( HDC hdc
, INT x0
, INT y0
, HICON hIcon
,
1914 INT cxWidth
, INT cyWidth
, UINT istep
,
1915 HBRUSH hbr
, UINT flags
)
1917 CURSORICONINFO
*ptr
= (CURSORICONINFO
*)GlobalLock16(HICON_16(hIcon
));
1918 HDC hDC_off
= 0, hMemDC
;
1919 BOOL result
= FALSE
, DoOffscreen
;
1920 HBITMAP hB_off
= 0, hOld
= 0;
1922 if (!ptr
) return FALSE
;
1923 TRACE_(icon
)("(hdc=%p,pos=%d.%d,hicon=%p,extend=%d.%d,istep=%d,br=%p,flags=0x%08x)\n",
1924 hdc
,x0
,y0
,hIcon
,cxWidth
,cyWidth
,istep
,hbr
,flags
);
1926 hMemDC
= CreateCompatibleDC (hdc
);
1928 FIXME_(icon
)("Ignoring istep=%d\n", istep
);
1929 if (flags
& DI_COMPAT
)
1930 FIXME_(icon
)("Ignoring flag DI_COMPAT\n");
1933 FIXME_(icon
)("no flags set? setting to DI_NORMAL\n");
1937 /* Calculate the size of the destination image. */
1940 if (flags
& DI_DEFAULTSIZE
)
1941 cxWidth
= GetSystemMetrics (SM_CXICON
);
1943 cxWidth
= ptr
->nWidth
;
1947 if (flags
& DI_DEFAULTSIZE
)
1948 cyWidth
= GetSystemMetrics (SM_CYICON
);
1950 cyWidth
= ptr
->nHeight
;
1953 DoOffscreen
= (GetObjectType( hbr
) == OBJ_BRUSH
);
1963 hDC_off
= CreateCompatibleDC(hdc
);
1964 hB_off
= CreateCompatibleBitmap(hdc
, cxWidth
, cyWidth
);
1965 if (hDC_off
&& hB_off
) {
1966 hOld
= SelectObject(hDC_off
, hB_off
);
1967 FillRect(hDC_off
, &r
, hbr
);
1971 if (hMemDC
&& (!DoOffscreen
|| (hDC_off
&& hB_off
)))
1973 HBITMAP hXorBits
, hAndBits
;
1974 COLORREF oldFg
, oldBg
;
1977 nStretchMode
= SetStretchBltMode (hdc
, STRETCH_DELETESCANS
);
1979 hXorBits
= CreateBitmap ( ptr
->nWidth
, ptr
->nHeight
,
1980 ptr
->bPlanes
, ptr
->bBitsPerPixel
,
1983 get_bitmap_width_bytes(ptr
->nWidth
,1) );
1984 hAndBits
= CreateBitmap ( ptr
->nWidth
, ptr
->nHeight
,
1985 1, 1, (char *)(ptr
+1) );
1986 oldFg
= SetTextColor( hdc
, RGB(0,0,0) );
1987 oldBg
= SetBkColor( hdc
, RGB(255,255,255) );
1989 if (hXorBits
&& hAndBits
)
1991 HBITMAP hBitTemp
= SelectObject( hMemDC
, hAndBits
);
1992 if (flags
& DI_MASK
)
1995 StretchBlt (hDC_off
, 0, 0, cxWidth
, cyWidth
,
1996 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCAND
);
1998 StretchBlt (hdc
, x0
, y0
, cxWidth
, cyWidth
,
1999 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCAND
);
2001 SelectObject( hMemDC
, hXorBits
);
2002 if (flags
& DI_IMAGE
)
2005 StretchBlt (hDC_off
, 0, 0, cxWidth
, cyWidth
,
2006 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCPAINT
);
2008 StretchBlt (hdc
, x0
, y0
, cxWidth
, cyWidth
,
2009 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCPAINT
);
2011 SelectObject( hMemDC
, hBitTemp
);
2015 SetTextColor( hdc
, oldFg
);
2016 SetBkColor( hdc
, oldBg
);
2017 if (hXorBits
) DeleteObject( hXorBits
);
2018 if (hAndBits
) DeleteObject( hAndBits
);
2019 SetStretchBltMode (hdc
, nStretchMode
);
2021 BitBlt(hdc
, x0
, y0
, cxWidth
, cyWidth
, hDC_off
, 0, 0, SRCCOPY
);
2022 SelectObject(hDC_off
, hOld
);
2025 if (hMemDC
) DeleteDC( hMemDC
);
2026 if (hDC_off
) DeleteDC(hDC_off
);
2027 if (hB_off
) DeleteObject(hB_off
);
2028 GlobalUnlock16(HICON_16(hIcon
));
2032 /***********************************************************************
2033 * DIB_FixColorsToLoadflags
2035 * Change color table entries when LR_LOADTRANSPARENT or LR_LOADMAP3DCOLORS
2038 static void DIB_FixColorsToLoadflags(BITMAPINFO
* bmi
, UINT loadflags
, BYTE pix
)
2041 COLORREF c_W
, c_S
, c_F
, c_L
, c_C
;
2050 if (((bitmap_type
= DIB_GetBitmapInfo((BITMAPINFOHEADER
*) bmi
, &width
, &height
, &bpp
, &compr
)) == -1))
2052 WARN_(resource
)("Invalid bitmap\n");
2056 if (bpp
> 8) return;
2058 if (bitmap_type
== 0) /* BITMAPCOREHEADER */
2066 colors
= bmi
->bmiHeader
.biClrUsed
;
2067 if (colors
> 256) colors
= 256;
2068 if (!colors
&& (bpp
<= 8)) colors
= 1 << bpp
;
2071 c_W
= GetSysColor(COLOR_WINDOW
);
2072 c_S
= GetSysColor(COLOR_3DSHADOW
);
2073 c_F
= GetSysColor(COLOR_3DFACE
);
2074 c_L
= GetSysColor(COLOR_3DLIGHT
);
2076 if (loadflags
& LR_LOADTRANSPARENT
) {
2078 case 1: pix
= pix
>> 7; break;
2079 case 4: pix
= pix
>> 4; break;
2082 WARN_(resource
)("(%d): Unsupported depth\n", bpp
);
2085 if (pix
>= colors
) {
2086 WARN_(resource
)("pixel has color index greater than biClrUsed!\n");
2089 if (loadflags
& LR_LOADMAP3DCOLORS
) c_W
= c_F
;
2090 ptr
= (RGBQUAD
*)((char*)bmi
->bmiColors
+pix
*incr
);
2091 ptr
->rgbBlue
= GetBValue(c_W
);
2092 ptr
->rgbGreen
= GetGValue(c_W
);
2093 ptr
->rgbRed
= GetRValue(c_W
);
2095 if (loadflags
& LR_LOADMAP3DCOLORS
)
2096 for (i
=0; i
<colors
; i
++) {
2097 ptr
= (RGBQUAD
*)((char*)bmi
->bmiColors
+i
*incr
);
2098 c_C
= RGB(ptr
->rgbRed
, ptr
->rgbGreen
, ptr
->rgbBlue
);
2099 if (c_C
== RGB(128, 128, 128)) {
2100 ptr
->rgbRed
= GetRValue(c_S
);
2101 ptr
->rgbGreen
= GetGValue(c_S
);
2102 ptr
->rgbBlue
= GetBValue(c_S
);
2103 } else if (c_C
== RGB(192, 192, 192)) {
2104 ptr
->rgbRed
= GetRValue(c_F
);
2105 ptr
->rgbGreen
= GetGValue(c_F
);
2106 ptr
->rgbBlue
= GetBValue(c_F
);
2107 } else if (c_C
== RGB(223, 223, 223)) {
2108 ptr
->rgbRed
= GetRValue(c_L
);
2109 ptr
->rgbGreen
= GetGValue(c_L
);
2110 ptr
->rgbBlue
= GetBValue(c_L
);
2116 /**********************************************************************
2119 static HBITMAP
BITMAP_Load( HINSTANCE instance
, LPCWSTR name
,
2120 INT desiredx
, INT desiredy
, UINT loadflags
)
2122 HBITMAP hbitmap
= 0, orig_bm
;
2126 BITMAPINFO
*info
, *fix_info
= NULL
, *scaled_info
= NULL
;
2130 LONG width
, height
, new_width
, new_height
;
2134 HDC screen_mem_dc
= NULL
;
2136 if (!(loadflags
& LR_LOADFROMFILE
))
2140 /* OEM bitmap: try to load the resource from user32.dll */
2141 instance
= user32_module
;
2144 if (!(hRsrc
= FindResourceW( instance
, name
, (LPWSTR
)RT_BITMAP
))) return 0;
2145 if (!(handle
= LoadResource( instance
, hRsrc
))) return 0;
2147 if ((info
= (BITMAPINFO
*)LockResource( handle
)) == NULL
) return 0;
2151 BITMAPFILEHEADER
* bmfh
;
2153 if (!(ptr
= map_fileW( name
, NULL
))) return 0;
2154 info
= (BITMAPINFO
*)(ptr
+ sizeof(BITMAPFILEHEADER
));
2155 bmfh
= (BITMAPFILEHEADER
*)ptr
;
2156 if (!( bmfh
->bfType
== 0x4d42 /* 'BM' */ &&
2157 bmfh
->bfReserved1
== 0 &&
2158 bmfh
->bfReserved2
== 0))
2160 WARN("Invalid/unsupported bitmap format!\n");
2161 UnmapViewOfFile( ptr
);
2166 size
= bitmap_info_size(info
, DIB_RGB_COLORS
);
2167 fix_info
= HeapAlloc(GetProcessHeap(), 0, size
);
2168 scaled_info
= HeapAlloc(GetProcessHeap(), 0, size
);
2170 if (!fix_info
|| !scaled_info
) goto end
;
2171 memcpy(fix_info
, info
, size
);
2173 pix
= *((LPBYTE
)info
+ size
);
2174 DIB_FixColorsToLoadflags(fix_info
, loadflags
, pix
);
2176 memcpy(scaled_info
, fix_info
, size
);
2177 bm_type
= DIB_GetBitmapInfo( &fix_info
->bmiHeader
, &width
, &height
,
2178 &bpp_dummy
, &compr_dummy
);
2180 new_width
= desiredx
;
2185 new_height
= height
> 0 ? desiredy
: -desiredy
;
2187 new_height
= height
;
2191 BITMAPCOREHEADER
*core
= (BITMAPCOREHEADER
*)&scaled_info
->bmiHeader
;
2192 core
->bcWidth
= new_width
;
2193 core
->bcHeight
= new_height
;
2197 scaled_info
->bmiHeader
.biWidth
= new_width
;
2198 scaled_info
->bmiHeader
.biHeight
= new_height
;
2201 if (new_height
< 0) new_height
= -new_height
;
2203 if (!screen_dc
) screen_dc
= CreateDCW( DISPLAYW
, NULL
, NULL
, NULL
);
2204 if (!(screen_mem_dc
= CreateCompatibleDC( screen_dc
))) goto end
;
2206 bits
= (char *)info
+ size
;
2208 if (loadflags
& LR_CREATEDIBSECTION
)
2210 scaled_info
->bmiHeader
.biCompression
= 0; /* DIBSection can't be compressed */
2211 hbitmap
= CreateDIBSection(screen_dc
, scaled_info
, DIB_RGB_COLORS
, NULL
, 0, 0);
2215 if (is_dib_monochrome(fix_info
))
2216 hbitmap
= CreateBitmap(new_width
, new_height
, 1, 1, NULL
);
2218 hbitmap
= CreateCompatibleBitmap(screen_dc
, new_width
, new_height
);
2221 orig_bm
= SelectObject(screen_mem_dc
, hbitmap
);
2222 StretchDIBits(screen_mem_dc
, 0, 0, new_width
, new_height
, 0, 0, width
, height
, bits
, fix_info
, DIB_RGB_COLORS
, SRCCOPY
);
2223 SelectObject(screen_mem_dc
, orig_bm
);
2226 if (screen_mem_dc
) DeleteDC(screen_mem_dc
);
2227 HeapFree(GetProcessHeap(), 0, scaled_info
);
2228 HeapFree(GetProcessHeap(), 0, fix_info
);
2229 if (loadflags
& LR_LOADFROMFILE
) UnmapViewOfFile( ptr
);
2234 /**********************************************************************
2235 * LoadImageA (USER32.@)
2239 HANDLE WINAPI
LoadImageA( HINSTANCE hinst
, LPCSTR name
, UINT type
,
2240 INT desiredx
, INT desiredy
, UINT loadflags
)
2246 return LoadImageW(hinst
, (LPCWSTR
)name
, type
, desiredx
, desiredy
, loadflags
);
2249 DWORD len
= MultiByteToWideChar( CP_ACP
, 0, name
, -1, NULL
, 0 );
2250 u_name
= HeapAlloc( GetProcessHeap(), 0, len
* sizeof(WCHAR
) );
2251 MultiByteToWideChar( CP_ACP
, 0, name
, -1, u_name
, len
);
2253 __EXCEPT_PAGE_FAULT
{
2254 SetLastError( ERROR_INVALID_PARAMETER
);
2258 res
= LoadImageW(hinst
, u_name
, type
, desiredx
, desiredy
, loadflags
);
2259 HeapFree(GetProcessHeap(), 0, u_name
);
2264 /******************************************************************************
2265 * LoadImageW (USER32.@) Loads an icon, cursor, or bitmap
2268 * hinst [I] Handle of instance that contains image
2269 * name [I] Name of image
2270 * type [I] Type of image
2271 * desiredx [I] Desired width
2272 * desiredy [I] Desired height
2273 * loadflags [I] Load flags
2276 * Success: Handle to newly loaded image
2279 * FIXME: Implementation lacks some features, see LR_ defines in winuser.h
2281 HANDLE WINAPI
LoadImageW( HINSTANCE hinst
, LPCWSTR name
, UINT type
,
2282 INT desiredx
, INT desiredy
, UINT loadflags
)
2284 TRACE_(resource
)("(%p,%s,%d,%d,%d,0x%08x)\n",
2285 hinst
,debugstr_w(name
),type
,desiredx
,desiredy
,loadflags
);
2287 if (loadflags
& LR_DEFAULTSIZE
) {
2288 if (type
== IMAGE_ICON
) {
2289 if (!desiredx
) desiredx
= GetSystemMetrics(SM_CXICON
);
2290 if (!desiredy
) desiredy
= GetSystemMetrics(SM_CYICON
);
2291 } else if (type
== IMAGE_CURSOR
) {
2292 if (!desiredx
) desiredx
= GetSystemMetrics(SM_CXCURSOR
);
2293 if (!desiredy
) desiredy
= GetSystemMetrics(SM_CYCURSOR
);
2296 if (loadflags
& LR_LOADFROMFILE
) loadflags
&= ~LR_SHARED
;
2299 return BITMAP_Load( hinst
, name
, desiredx
, desiredy
, loadflags
);
2302 if (!screen_dc
) screen_dc
= CreateDCW( DISPLAYW
, NULL
, NULL
, NULL
);
2305 UINT palEnts
= GetSystemPaletteEntries(screen_dc
, 0, 0, NULL
);
2306 if (palEnts
== 0) palEnts
= 256;
2307 return CURSORICON_Load(hinst
, name
, desiredx
, desiredy
,
2308 palEnts
, FALSE
, loadflags
);
2313 return CURSORICON_Load(hinst
, name
, desiredx
, desiredy
,
2314 1, TRUE
, loadflags
);
2319 /******************************************************************************
2320 * CopyImage (USER32.@) Creates new image and copies attributes to it
2323 * hnd [I] Handle to image to copy
2324 * type [I] Type of image to copy
2325 * desiredx [I] Desired width of new image
2326 * desiredy [I] Desired height of new image
2327 * flags [I] Copy flags
2330 * Success: Handle to newly created image
2334 * Only Windows NT 4.0 supports the LR_COPYRETURNORG flag for bitmaps,
2335 * all other versions (95/2000/XP have been tested) ignore it.
2338 * If LR_CREATEDIBSECTION is absent, the copy will be monochrome for
2339 * a monochrome source bitmap or if LR_MONOCHROME is present, otherwise
2340 * the copy will have the same depth as the screen.
2341 * The content of the image will only be copied if the bit depth of the
2342 * original image is compatible with the bit depth of the screen, or
2343 * if the source is a DIB section.
2344 * The LR_MONOCHROME flag is ignored if LR_CREATEDIBSECTION is present.
2346 HANDLE WINAPI
CopyImage( HANDLE hnd
, UINT type
, INT desiredx
,
2347 INT desiredy
, UINT flags
)
2349 TRACE("hnd=%p, type=%u, desiredx=%d, desiredy=%d, flags=%x\n",
2350 hnd
, type
, desiredx
, desiredy
, flags
);
2361 objSize
= GetObjectW( hnd
, sizeof(ds
), &ds
);
2362 if (!objSize
) return 0;
2363 if ((desiredx
< 0) || (desiredy
< 0)) return 0;
2365 if (flags
& LR_COPYFROMRESOURCE
)
2367 FIXME("The flag LR_COPYFROMRESOURCE is not implemented for bitmaps\n");
2370 if (desiredx
== 0) desiredx
= ds
.dsBm
.bmWidth
;
2371 if (desiredy
== 0) desiredy
= ds
.dsBm
.bmHeight
;
2373 /* Allocate memory for a BITMAPINFOHEADER structure and a
2374 color table. The maximum number of colors in a color table
2375 is 256 which corresponds to a bitmap with depth 8.
2376 Bitmaps with higher depths don't have color tables. */
2377 bi
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(BITMAPINFOHEADER
) + 256 * sizeof(RGBQUAD
));
2380 bi
->bmiHeader
.biSize
= sizeof(bi
->bmiHeader
);
2381 bi
->bmiHeader
.biPlanes
= ds
.dsBm
.bmPlanes
;
2382 bi
->bmiHeader
.biBitCount
= ds
.dsBm
.bmBitsPixel
;
2383 bi
->bmiHeader
.biCompression
= BI_RGB
;
2385 if (flags
& LR_CREATEDIBSECTION
)
2387 /* Create a DIB section. LR_MONOCHROME is ignored */
2389 HDC dc
= CreateCompatibleDC(NULL
);
2391 if (objSize
== sizeof(DIBSECTION
))
2393 /* The source bitmap is a DIB.
2394 Get its attributes to create an exact copy */
2395 memcpy(bi
, &ds
.dsBmih
, sizeof(BITMAPINFOHEADER
));
2398 /* Get the color table or the color masks */
2399 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, NULL
, bi
, DIB_RGB_COLORS
);
2401 bi
->bmiHeader
.biWidth
= desiredx
;
2402 bi
->bmiHeader
.biHeight
= desiredy
;
2403 bi
->bmiHeader
.biSizeImage
= 0;
2405 res
= CreateDIBSection(dc
, bi
, DIB_RGB_COLORS
, &bits
, NULL
, 0);
2410 /* Create a device-dependent bitmap */
2412 BOOL monochrome
= (flags
& LR_MONOCHROME
);
2414 if (objSize
== sizeof(DIBSECTION
))
2416 /* The source bitmap is a DIB section.
2417 Get its attributes */
2418 HDC dc
= CreateCompatibleDC(NULL
);
2419 bi
->bmiHeader
.biSize
= sizeof(bi
->bmiHeader
);
2420 bi
->bmiHeader
.biBitCount
= ds
.dsBm
.bmBitsPixel
;
2421 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, NULL
, bi
, DIB_RGB_COLORS
);
2424 if (!monochrome
&& ds
.dsBm
.bmBitsPixel
== 1)
2426 /* Look if the colors of the DIB are black and white */
2429 (bi
->bmiColors
[0].rgbRed
== 0xff
2430 && bi
->bmiColors
[0].rgbGreen
== 0xff
2431 && bi
->bmiColors
[0].rgbBlue
== 0xff
2432 && bi
->bmiColors
[0].rgbReserved
== 0
2433 && bi
->bmiColors
[1].rgbRed
== 0
2434 && bi
->bmiColors
[1].rgbGreen
== 0
2435 && bi
->bmiColors
[1].rgbBlue
== 0
2436 && bi
->bmiColors
[1].rgbReserved
== 0)
2438 (bi
->bmiColors
[0].rgbRed
== 0
2439 && bi
->bmiColors
[0].rgbGreen
== 0
2440 && bi
->bmiColors
[0].rgbBlue
== 0
2441 && bi
->bmiColors
[0].rgbReserved
== 0
2442 && bi
->bmiColors
[1].rgbRed
== 0xff
2443 && bi
->bmiColors
[1].rgbGreen
== 0xff
2444 && bi
->bmiColors
[1].rgbBlue
== 0xff
2445 && bi
->bmiColors
[1].rgbReserved
== 0);
2448 else if (!monochrome
)
2450 monochrome
= ds
.dsBm
.bmBitsPixel
== 1;
2455 res
= CreateBitmap(desiredx
, desiredy
, 1, 1, NULL
);
2459 HDC screenDC
= GetDC(NULL
);
2460 res
= CreateCompatibleBitmap(screenDC
, desiredx
, desiredy
);
2461 ReleaseDC(NULL
, screenDC
);
2467 /* Only copy the bitmap if it's a DIB section or if it's
2468 compatible to the screen */
2471 if (objSize
== sizeof(DIBSECTION
))
2473 copyContents
= TRUE
;
2477 HDC screenDC
= GetDC(NULL
);
2478 int screen_depth
= GetDeviceCaps(screenDC
, BITSPIXEL
);
2479 ReleaseDC(NULL
, screenDC
);
2481 copyContents
= (ds
.dsBm
.bmBitsPixel
== 1 || ds
.dsBm
.bmBitsPixel
== screen_depth
);
2486 /* The source bitmap may already be selected in a device context,
2487 use GetDIBits/StretchDIBits and not StretchBlt */
2492 dc
= CreateCompatibleDC(NULL
);
2494 bi
->bmiHeader
.biWidth
= ds
.dsBm
.bmWidth
;
2495 bi
->bmiHeader
.biHeight
= ds
.dsBm
.bmHeight
;
2496 bi
->bmiHeader
.biSizeImage
= 0;
2497 bi
->bmiHeader
.biClrUsed
= 0;
2498 bi
->bmiHeader
.biClrImportant
= 0;
2500 /* Fill in biSizeImage */
2501 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, NULL
, bi
, DIB_RGB_COLORS
);
2502 bits
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, bi
->bmiHeader
.biSizeImage
);
2508 /* Get the image bits of the source bitmap */
2509 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, bits
, bi
, DIB_RGB_COLORS
);
2511 /* Copy it to the destination bitmap */
2512 oldBmp
= SelectObject(dc
, res
);
2513 StretchDIBits(dc
, 0, 0, desiredx
, desiredy
,
2514 0, 0, ds
.dsBm
.bmWidth
, ds
.dsBm
.bmHeight
,
2515 bits
, bi
, DIB_RGB_COLORS
, SRCCOPY
);
2516 SelectObject(dc
, oldBmp
);
2518 HeapFree(GetProcessHeap(), 0, bits
);
2524 if (flags
& LR_COPYDELETEORG
)
2529 HeapFree(GetProcessHeap(), 0, bi
);
2533 return CURSORICON_ExtCopy(hnd
,type
, desiredx
, desiredy
, flags
);
2535 /* Should call CURSORICON_ExtCopy but more testing
2536 * needs to be done before we change this
2538 if (flags
) FIXME("Flags are ignored\n");
2539 return CopyCursor(hnd
);
2545 /******************************************************************************
2546 * LoadBitmapW (USER32.@) Loads bitmap from the executable file
2549 * Success: Handle to specified bitmap
2552 HBITMAP WINAPI
LoadBitmapW(
2553 HINSTANCE instance
, /* [in] Handle to application instance */
2554 LPCWSTR name
) /* [in] Address of bitmap resource name */
2556 return LoadImageW( instance
, name
, IMAGE_BITMAP
, 0, 0, 0 );
2559 /**********************************************************************
2560 * LoadBitmapA (USER32.@)
2564 HBITMAP WINAPI
LoadBitmapA( HINSTANCE instance
, LPCSTR name
)
2566 return LoadImageA( instance
, name
, IMAGE_BITMAP
, 0, 0, 0 );