2 * Cursor and icon support
4 * Copyright 1995 Alexandre Julliard
5 * 1996 Martin Von Loewis
7 * 1998 Turchanov Sergey
10 * This library is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU Lesser General Public
12 * License as published by the Free Software Foundation; either
13 * version 2.1 of the License, or (at your option) any later version.
15 * This library is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 * Lesser General Public License for more details.
20 * You should have received a copy of the GNU Lesser General Public
21 * License along with this library; if not, write to the Free Software
22 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
28 * Cursors and icons are stored in a global heap block, with the
31 * CURSORICONINFO info;
35 * The bits structures are in the format of a device-dependent bitmap.
37 * This layout is very sub-optimal, as the bitmap bits are stored in
38 * the X client instead of in the server like other bitmaps; however,
39 * some programs (notably Paint Brush) expect to be able to manipulate
40 * the bits directly :-(
44 #include "wine/port.h"
54 #include "wine/winbase16.h"
55 #include "wine/winuser16.h"
56 #include "wine/exception.h"
57 #include "wine/debug.h"
58 #include "user_private.h"
60 WINE_DEFAULT_DEBUG_CHANNEL(cursor
);
61 WINE_DECLARE_DEBUG_CHANNEL(icon
);
62 WINE_DECLARE_DEBUG_CHANNEL(resource
);
75 } CURSORICONFILEDIRENTRY
;
82 CURSORICONFILEDIRENTRY idEntries
[1];
87 #define CID_RESOURCE 0x0001
88 #define CID_WIN32 0x0004
89 #define CID_NONSHARED 0x0008
91 static RECT CURSOR_ClipRect
; /* Cursor clipping rect */
95 static const WCHAR DISPLAYW
[] = {'D','I','S','P','L','A','Y',0};
97 /**********************************************************************
98 * ICONCACHE for cursors/icons loaded with LR_SHARED.
100 * FIXME: This should not be allocated on the system heap, but on a
101 * subsystem-global heap (i.e. one for all Win16 processes,
102 * and one for each Win32 process).
104 typedef struct tagICONCACHE
106 struct tagICONCACHE
*next
;
117 static ICONCACHE
*IconAnchor
= NULL
;
119 static CRITICAL_SECTION IconCrst
;
120 static CRITICAL_SECTION_DEBUG critsect_debug
=
123 { &critsect_debug
.ProcessLocksList
, &critsect_debug
.ProcessLocksList
},
124 0, 0, { (DWORD_PTR
)(__FILE__
": IconCrst") }
126 static CRITICAL_SECTION IconCrst
= { &critsect_debug
, -1, 0, 0, 0, 0 };
128 static const WORD ICON_HOTSPOT
= 0x4242;
131 /***********************************************************************
134 * Helper function to map a file to memory:
136 * [RETURN] ptr - pointer to mapped file
137 * [RETURN] filesize - pointer size of file to be stored if not NULL
139 static void *map_fileW( LPCWSTR name
, LPDWORD filesize
)
141 HANDLE hFile
, hMapping
;
144 hFile
= CreateFileW( name
, GENERIC_READ
, FILE_SHARE_READ
, NULL
,
145 OPEN_EXISTING
, FILE_FLAG_RANDOM_ACCESS
, 0 );
146 if (hFile
!= INVALID_HANDLE_VALUE
)
148 hMapping
= CreateFileMappingW( hFile
, NULL
, PAGE_READONLY
, 0, 0, NULL
);
151 ptr
= MapViewOfFile( hMapping
, FILE_MAP_READ
, 0, 0, 0 );
152 CloseHandle( hMapping
);
154 *filesize
= GetFileSize( hFile
, NULL
);
156 CloseHandle( hFile
);
162 /***********************************************************************
163 * get_bitmap_width_bytes
165 * Return number of bytes taken by a scanline of 16-bit aligned Windows DDB
168 static int get_bitmap_width_bytes( int width
, int bpp
)
173 return 2 * ((width
+15) / 16);
175 return 2 * ((width
+3) / 4);
180 return width
+ (width
& 1);
187 WARN("Unknown depth %d, please report.\n", bpp
);
193 /***********************************************************************
194 * get_dib_width_bytes
196 * Return the width of a DIB bitmap in bytes. DIB bitmap data is 32-bit aligned.
198 static int get_dib_width_bytes( int width
, int depth
)
204 case 1: words
= (width
+ 31) / 32; break;
205 case 4: words
= (width
+ 7) / 8; break;
206 case 8: words
= (width
+ 3) / 4; break;
208 case 16: words
= (width
+ 1) / 2; break;
209 case 24: words
= (width
* 3 + 3)/4; break;
211 WARN("(%d): Unsupported depth\n", depth
);
220 /***********************************************************************
223 * Return the size of the bitmap info structure including color table.
225 static int bitmap_info_size( const BITMAPINFO
* info
, WORD coloruse
)
227 int colors
, masks
= 0;
229 if (info
->bmiHeader
.biSize
== sizeof(BITMAPCOREHEADER
))
231 const BITMAPCOREHEADER
*core
= (const BITMAPCOREHEADER
*)info
;
232 colors
= (core
->bcBitCount
<= 8) ? 1 << core
->bcBitCount
: 0;
233 return sizeof(BITMAPCOREHEADER
) + colors
*
234 ((coloruse
== DIB_RGB_COLORS
) ? sizeof(RGBTRIPLE
) : sizeof(WORD
));
236 else /* assume BITMAPINFOHEADER */
238 colors
= info
->bmiHeader
.biClrUsed
;
239 if (colors
> 256) /* buffer overflow otherwise */
241 if (!colors
&& (info
->bmiHeader
.biBitCount
<= 8))
242 colors
= 1 << info
->bmiHeader
.biBitCount
;
243 if (info
->bmiHeader
.biCompression
== BI_BITFIELDS
) masks
= 3;
244 return sizeof(BITMAPINFOHEADER
) + masks
* sizeof(DWORD
) + colors
*
245 ((coloruse
== DIB_RGB_COLORS
) ? sizeof(RGBQUAD
) : sizeof(WORD
));
250 /***********************************************************************
253 * Returns whether a DIB can be converted to a monochrome DDB.
255 * A DIB can be converted if its color table contains only black and
256 * white. Black must be the first color in the color table.
258 * Note : If the first color in the color table is white followed by
259 * black, we can't convert it to a monochrome DDB with
260 * SetDIBits, because black and white would be inverted.
262 static BOOL
is_dib_monochrome( const BITMAPINFO
* info
)
264 if (info
->bmiHeader
.biBitCount
!= 1) return FALSE
;
266 if (info
->bmiHeader
.biSize
== sizeof(BITMAPCOREHEADER
))
268 const RGBTRIPLE
*rgb
= ((const BITMAPCOREINFO
*)info
)->bmciColors
;
270 /* Check if the first color is black */
271 if ((rgb
->rgbtRed
== 0) && (rgb
->rgbtGreen
== 0) && (rgb
->rgbtBlue
== 0))
275 /* Check if the second color is white */
276 return ((rgb
->rgbtRed
== 0xff) && (rgb
->rgbtGreen
== 0xff)
277 && (rgb
->rgbtBlue
== 0xff));
281 else /* assume BITMAPINFOHEADER */
283 const RGBQUAD
*rgb
= info
->bmiColors
;
285 /* Check if the first color is black */
286 if ((rgb
->rgbRed
== 0) && (rgb
->rgbGreen
== 0) &&
287 (rgb
->rgbBlue
== 0) && (rgb
->rgbReserved
== 0))
291 /* Check if the second color is white */
292 return ((rgb
->rgbRed
== 0xff) && (rgb
->rgbGreen
== 0xff)
293 && (rgb
->rgbBlue
== 0xff) && (rgb
->rgbReserved
== 0));
299 /***********************************************************************
302 * Get the info from a bitmap header.
303 * Return 1 for INFOHEADER, 0 for COREHEADER,
304 * 4 for V4HEADER, 5 for V5HEADER, -1 for error.
306 static int DIB_GetBitmapInfo( const BITMAPINFOHEADER
*header
, LONG
*width
,
307 LONG
*height
, WORD
*bpp
, DWORD
*compr
)
309 if (header
->biSize
== sizeof(BITMAPINFOHEADER
))
311 *width
= header
->biWidth
;
312 *height
= header
->biHeight
;
313 *bpp
= header
->biBitCount
;
314 *compr
= header
->biCompression
;
317 if (header
->biSize
== sizeof(BITMAPCOREHEADER
))
319 const BITMAPCOREHEADER
*core
= (const BITMAPCOREHEADER
*)header
;
320 *width
= core
->bcWidth
;
321 *height
= core
->bcHeight
;
322 *bpp
= core
->bcBitCount
;
326 if (header
->biSize
== sizeof(BITMAPV4HEADER
))
328 const BITMAPV4HEADER
*v4hdr
= (const BITMAPV4HEADER
*)header
;
329 *width
= v4hdr
->bV4Width
;
330 *height
= v4hdr
->bV4Height
;
331 *bpp
= v4hdr
->bV4BitCount
;
332 *compr
= v4hdr
->bV4V4Compression
;
335 if (header
->biSize
== sizeof(BITMAPV5HEADER
))
337 const BITMAPV5HEADER
*v5hdr
= (const BITMAPV5HEADER
*)header
;
338 *width
= v5hdr
->bV5Width
;
339 *height
= v5hdr
->bV5Height
;
340 *bpp
= v5hdr
->bV5BitCount
;
341 *compr
= v5hdr
->bV5Compression
;
344 ERR("(%d): unknown/wrong size for header\n", header
->biSize
);
348 /**********************************************************************
349 * CURSORICON_FindSharedIcon
351 static HICON
CURSORICON_FindSharedIcon( HMODULE hModule
, HRSRC hRsrc
)
356 EnterCriticalSection( &IconCrst
);
358 for ( ptr
= IconAnchor
; ptr
; ptr
= ptr
->next
)
359 if ( ptr
->hModule
== hModule
&& ptr
->hRsrc
== hRsrc
)
366 LeaveCriticalSection( &IconCrst
);
371 /*************************************************************************
372 * CURSORICON_FindCache
374 * Given a handle, find the corresponding cache element
377 * Handle [I] handle to an Image
380 * Success: The cache entry
384 static ICONCACHE
* CURSORICON_FindCache(HICON hIcon
)
387 ICONCACHE
*pRet
=NULL
;
388 BOOL IsFound
= FALSE
;
390 EnterCriticalSection( &IconCrst
);
392 for (ptr
= IconAnchor
; ptr
!= NULL
&& !IsFound
; ptr
= ptr
->next
)
394 if ( hIcon
== ptr
->hIcon
)
401 LeaveCriticalSection( &IconCrst
);
406 /**********************************************************************
407 * CURSORICON_AddSharedIcon
409 static void CURSORICON_AddSharedIcon( HMODULE hModule
, HRSRC hRsrc
, HRSRC hGroupRsrc
, HICON hIcon
)
411 ICONCACHE
*ptr
= HeapAlloc( GetProcessHeap(), 0, sizeof(ICONCACHE
) );
414 ptr
->hModule
= hModule
;
417 ptr
->hGroupRsrc
= hGroupRsrc
;
420 EnterCriticalSection( &IconCrst
);
421 ptr
->next
= IconAnchor
;
423 LeaveCriticalSection( &IconCrst
);
426 /**********************************************************************
427 * CURSORICON_DelSharedIcon
429 static INT
CURSORICON_DelSharedIcon( HICON hIcon
)
434 EnterCriticalSection( &IconCrst
);
436 for ( ptr
= IconAnchor
; ptr
; ptr
= ptr
->next
)
437 if ( ptr
->hIcon
== hIcon
)
439 if ( ptr
->count
> 0 ) ptr
->count
--;
444 LeaveCriticalSection( &IconCrst
);
449 /**********************************************************************
450 * CURSORICON_FreeModuleIcons
452 void CURSORICON_FreeModuleIcons( HMODULE16 hMod16
)
454 ICONCACHE
**ptr
= &IconAnchor
;
455 HMODULE hModule
= HMODULE_32(GetExePtr( hMod16
));
457 EnterCriticalSection( &IconCrst
);
461 if ( (*ptr
)->hModule
== hModule
)
463 ICONCACHE
*freePtr
= *ptr
;
464 *ptr
= freePtr
->next
;
466 GlobalFree16(HICON_16(freePtr
->hIcon
));
467 HeapFree( GetProcessHeap(), 0, freePtr
);
473 LeaveCriticalSection( &IconCrst
);
476 /**********************************************************************
479 BOOL
get_icon_size( HICON handle
, SIZE
*size
)
481 CURSORICONINFO
*info
;
483 if (!(info
= GlobalLock16( HICON_16(handle
) ))) return FALSE
;
484 size
->cx
= info
->nWidth
;
485 size
->cy
= info
->nHeight
;
486 GlobalUnlock16( HICON_16(handle
) );
491 * The following macro functions account for the irregularities of
492 * accessing cursor and icon resources in files and resource entries.
494 typedef BOOL (*fnGetCIEntry
)( LPVOID dir
, int n
,
495 int *width
, int *height
, int *bits
);
497 /**********************************************************************
498 * CURSORICON_FindBestIcon
500 * Find the icon closest to the requested size and number of colors.
502 static int CURSORICON_FindBestIcon( LPVOID dir
, fnGetCIEntry get_entry
,
503 int width
, int height
, int colors
)
505 int i
, cx
, cy
, bits
, bestEntry
= -1;
506 UINT iTotalDiff
, iXDiff
=0, iYDiff
=0, iColorDiff
;
507 UINT iTempXDiff
, iTempYDiff
, iTempColorDiff
;
510 iTotalDiff
= 0xFFFFFFFF;
511 iColorDiff
= 0xFFFFFFFF;
512 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
514 iTempXDiff
= abs(width
- cx
);
515 iTempYDiff
= abs(height
- cy
);
517 if(iTotalDiff
> (iTempXDiff
+ iTempYDiff
))
521 iTotalDiff
= iXDiff
+ iYDiff
;
525 /* Find Best Colors for Best Fit */
526 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
528 if(abs(width
- cx
) == iXDiff
&& abs(height
- cy
) == iYDiff
)
530 iTempColorDiff
= abs(colors
- (1<<bits
));
531 if(iColorDiff
> iTempColorDiff
)
534 iColorDiff
= iTempColorDiff
;
542 static BOOL
CURSORICON_GetResIconEntry( LPVOID dir
, int n
,
543 int *width
, int *height
, int *bits
)
545 CURSORICONDIR
*resdir
= dir
;
548 if ( resdir
->idCount
<= n
)
550 icon
= &resdir
->idEntries
[n
].ResInfo
.icon
;
551 *width
= icon
->bWidth
;
552 *height
= icon
->bHeight
;
553 *bits
= resdir
->idEntries
[n
].wBitCount
;
557 /**********************************************************************
558 * CURSORICON_FindBestCursor
560 * Find the cursor closest to the requested size.
562 * FIXME: parameter 'color' ignored.
564 static int CURSORICON_FindBestCursor( LPVOID dir
, fnGetCIEntry get_entry
,
565 int width
, int height
, int color
)
567 int i
, maxwidth
, maxheight
, cx
, cy
, bits
, bestEntry
= -1;
569 /* Double height to account for AND and XOR masks */
573 /* First find the largest one smaller than or equal to the requested size*/
575 maxwidth
= maxheight
= 0;
576 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
578 if ((cx
<= width
) && (cy
<= height
) &&
579 (cx
> maxwidth
) && (cy
> maxheight
))
586 if (bestEntry
!= -1) return bestEntry
;
588 /* Now find the smallest one larger than the requested size */
590 maxwidth
= maxheight
= 255;
591 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
593 if (((cx
< maxwidth
) && (cy
< maxheight
)) || (bestEntry
== -1))
604 static BOOL
CURSORICON_GetResCursorEntry( LPVOID dir
, int n
,
605 int *width
, int *height
, int *bits
)
607 CURSORICONDIR
*resdir
= dir
;
610 if ( resdir
->idCount
<= n
)
612 cursor
= &resdir
->idEntries
[n
].ResInfo
.cursor
;
613 *width
= cursor
->wWidth
;
614 *height
= cursor
->wHeight
;
615 *bits
= resdir
->idEntries
[n
].wBitCount
;
619 static CURSORICONDIRENTRY
*CURSORICON_FindBestIconRes( CURSORICONDIR
* dir
,
620 int width
, int height
, int colors
)
624 n
= CURSORICON_FindBestIcon( dir
, CURSORICON_GetResIconEntry
,
625 width
, height
, colors
);
628 return &dir
->idEntries
[n
];
631 static CURSORICONDIRENTRY
*CURSORICON_FindBestCursorRes( CURSORICONDIR
*dir
,
632 int width
, int height
, int color
)
634 int n
= CURSORICON_FindBestCursor( dir
, CURSORICON_GetResCursorEntry
,
635 width
, height
, color
);
638 return &dir
->idEntries
[n
];
641 static BOOL
CURSORICON_GetFileEntry( LPVOID dir
, int n
,
642 int *width
, int *height
, int *bits
)
644 CURSORICONFILEDIR
*filedir
= dir
;
645 CURSORICONFILEDIRENTRY
*entry
;
647 if ( filedir
->idCount
<= n
)
649 entry
= &filedir
->idEntries
[n
];
650 *width
= entry
->bWidth
;
651 *height
= entry
->bHeight
;
652 *bits
= entry
->bColorCount
;
656 static CURSORICONFILEDIRENTRY
*CURSORICON_FindBestCursorFile( CURSORICONFILEDIR
*dir
,
657 int width
, int height
, int color
)
659 int n
= CURSORICON_FindBestCursor( dir
, CURSORICON_GetFileEntry
,
660 width
, height
, color
);
663 return &dir
->idEntries
[n
];
666 static CURSORICONFILEDIRENTRY
*CURSORICON_FindBestIconFile( CURSORICONFILEDIR
*dir
,
667 int width
, int height
, int color
)
669 int n
= CURSORICON_FindBestIcon( dir
, CURSORICON_GetFileEntry
,
670 width
, height
, color
);
673 return &dir
->idEntries
[n
];
676 /***********************************************************************
679 * A helper function that stretches a bitmap buffer into an HBITMAP.
682 * hDest [I] The handle of the destination bitmap.
683 * pDestInfo [I] The BITMAPINFO of the destination bitmap.
684 * pSrcInfo [I] The BITMAPINFO of the source bitmap.
685 * pSrcBits [I] A pointer to the source bitmap buffer.
687 static BOOL
stretch_blt_icon(HBITMAP hDest
, BITMAPINFO
*pDestInfo
, BITMAPINFO
*pSrcInfo
, char *pSrcBits
)
691 HDC hdcMem
= CreateCompatibleDC(screen_dc
);
695 hOld
= SelectObject(hdcMem
, hDest
);
696 res
= StretchDIBits(hdcMem
,
697 0, 0, pDestInfo
->bmiHeader
.biWidth
, pDestInfo
->bmiHeader
.biHeight
,
698 0, 0, pSrcInfo
->bmiHeader
.biWidth
, pSrcInfo
->bmiHeader
.biHeight
,
699 pSrcBits
, pSrcInfo
, DIB_RGB_COLORS
, SRCCOPY
);
700 SelectObject(hdcMem
, hOld
);
707 static HICON
CURSORICON_CreateIconFromBMI( BITMAPINFO
*bmi
,
708 POINT16 hotspot
, BOOL bIcon
,
710 INT width
, INT height
,
714 int sizeAnd
, sizeXor
;
715 HBITMAP hAndBits
= 0, hXorBits
= 0; /* error condition for later */
716 BITMAP bmpXor
, bmpAnd
;
718 BITMAPINFO
*pSrcInfo
, *pDestInfo
;
720 if (dwVersion
== 0x00020000)
722 FIXME_(cursor
)("\t2.xx resources are not supported\n");
726 /* Check bitmap header */
728 if ( (bmi
->bmiHeader
.biSize
!= sizeof(BITMAPCOREHEADER
)) &&
729 (bmi
->bmiHeader
.biSize
!= sizeof(BITMAPINFOHEADER
) ||
730 bmi
->bmiHeader
.biCompression
!= BI_RGB
) )
732 WARN_(cursor
)("\tinvalid resource bitmap header.\n");
736 size
= bitmap_info_size( bmi
, DIB_RGB_COLORS
);
738 if (!width
) width
= bmi
->bmiHeader
.biWidth
;
739 if (!height
) height
= bmi
->bmiHeader
.biHeight
/2;
741 /* Scale the hotspot */
742 if (((bmi
->bmiHeader
.biHeight
/2 != height
) || (bmi
->bmiHeader
.biWidth
!= width
)) &&
743 hotspot
.x
!= ICON_HOTSPOT
&& hotspot
.y
!= ICON_HOTSPOT
)
745 hotspot
.x
= (hotspot
.x
* width
) / bmi
->bmiHeader
.biWidth
;
746 hotspot
.y
= (hotspot
.y
* height
) / (bmi
->bmiHeader
.biHeight
/ 2);
749 if (!screen_dc
) screen_dc
= CreateDCW( DISPLAYW
, NULL
, NULL
, NULL
);
752 /* Make sure we have room for the monochrome bitmap later on.
753 * Note that BITMAPINFOINFO and BITMAPCOREHEADER are the same
754 * up to and including the biBitCount. In-memory icon resource
755 * format is as follows:
757 * BITMAPINFOHEADER icHeader // DIB header
758 * RGBQUAD icColors[] // Color table
759 * BYTE icXOR[] // DIB bits for XOR mask
760 * BYTE icAND[] // DIB bits for AND mask
763 pSrcInfo
= HeapAlloc( GetProcessHeap(), 0,
764 max(size
, sizeof(BITMAPINFOHEADER
) + 2*sizeof(RGBQUAD
)));
765 pDestInfo
= HeapAlloc( GetProcessHeap(), 0,
766 max(size
, sizeof(BITMAPINFOHEADER
) + 2*sizeof(RGBQUAD
)));
767 if (pSrcInfo
&& pDestInfo
)
769 memcpy( pSrcInfo
, bmi
, size
);
770 pSrcInfo
->bmiHeader
.biHeight
/= 2;
772 memcpy( pDestInfo
, bmi
, size
);
773 pDestInfo
->bmiHeader
.biWidth
= width
;
774 pDestInfo
->bmiHeader
.biHeight
= height
;
775 pDestInfo
->bmiHeader
.biSizeImage
= 0;
777 /* Create the XOR bitmap */
778 if(pSrcInfo
->bmiHeader
.biBitCount
== 32)
780 void *pDIBBuffer
= NULL
;
781 hXorBits
= CreateDIBSection(screen_dc
, pDestInfo
, DIB_RGB_COLORS
, &pDIBBuffer
, NULL
, 0);
785 if (!stretch_blt_icon(hXorBits
, pDestInfo
, pSrcInfo
, (char*)bmi
+ size
))
787 DeleteObject(hXorBits
);
794 hXorBits
= CreateCompatibleBitmap(screen_dc
, width
, height
);
798 if(!stretch_blt_icon(hXorBits
, pDestInfo
, pSrcInfo
, (char*)bmi
+ size
))
800 DeleteObject(hXorBits
);
808 char* xbits
= (char *)bmi
+ size
+
809 get_dib_width_bytes( bmi
->bmiHeader
.biWidth
,
810 bmi
->bmiHeader
.biBitCount
) * abs( bmi
->bmiHeader
.biHeight
) / 2;
812 pSrcInfo
->bmiHeader
.biBitCount
= 1;
813 if (pSrcInfo
->bmiHeader
.biSize
!= sizeof(BITMAPCOREHEADER
))
815 RGBQUAD
*rgb
= pSrcInfo
->bmiColors
;
817 pSrcInfo
->bmiHeader
.biClrUsed
= pSrcInfo
->bmiHeader
.biClrImportant
= 2;
818 rgb
[0].rgbBlue
= rgb
[0].rgbGreen
= rgb
[0].rgbRed
= 0x00;
819 rgb
[1].rgbBlue
= rgb
[1].rgbGreen
= rgb
[1].rgbRed
= 0xff;
820 rgb
[0].rgbReserved
= rgb
[1].rgbReserved
= 0;
824 RGBTRIPLE
*rgb
= (RGBTRIPLE
*)(((BITMAPCOREHEADER
*)pSrcInfo
) + 1);
826 rgb
[0].rgbtBlue
= rgb
[0].rgbtGreen
= rgb
[0].rgbtRed
= 0x00;
827 rgb
[1].rgbtBlue
= rgb
[1].rgbtGreen
= rgb
[1].rgbtRed
= 0xff;
830 /* Create the AND bitmap */
831 hAndBits
= CreateBitmap(width
, height
, 1, 1, NULL
);
833 if(!stretch_blt_icon(hAndBits
, pDestInfo
, pSrcInfo
, xbits
))
835 DeleteObject(hAndBits
);
841 DeleteObject( hXorBits
);
847 HeapFree( GetProcessHeap(), 0, pSrcInfo
);
848 HeapFree( GetProcessHeap(), 0, pDestInfo
);
851 if( !hXorBits
|| !hAndBits
)
853 WARN_(cursor
)("\tunable to create an icon bitmap.\n");
857 /* Now create the CURSORICONINFO structure */
858 GetObjectA( hXorBits
, sizeof(bmpXor
), &bmpXor
);
859 GetObjectA( hAndBits
, sizeof(bmpAnd
), &bmpAnd
);
860 sizeXor
= bmpXor
.bmHeight
* bmpXor
.bmWidthBytes
;
861 sizeAnd
= bmpAnd
.bmHeight
* bmpAnd
.bmWidthBytes
;
863 hObj
= GlobalAlloc16( GMEM_MOVEABLE
,
864 sizeof(CURSORICONINFO
) + sizeXor
+ sizeAnd
);
867 CURSORICONINFO
*info
;
869 info
= GlobalLock16( hObj
);
870 info
->ptHotSpot
.x
= hotspot
.x
;
871 info
->ptHotSpot
.y
= hotspot
.y
;
872 info
->nWidth
= bmpXor
.bmWidth
;
873 info
->nHeight
= bmpXor
.bmHeight
;
874 info
->nWidthBytes
= bmpXor
.bmWidthBytes
;
875 info
->bPlanes
= bmpXor
.bmPlanes
;
876 info
->bBitsPerPixel
= bmpXor
.bmBitsPixel
;
878 /* Transfer the bitmap bits to the CURSORICONINFO structure */
880 GetBitmapBits( hAndBits
, sizeAnd
, info
+ 1 );
881 GetBitmapBits( hXorBits
, sizeXor
, (char *)(info
+ 1) + sizeAnd
);
882 GlobalUnlock16( hObj
);
885 DeleteObject( hAndBits
);
886 DeleteObject( hXorBits
);
887 return HICON_32(hObj
);
891 /**********************************************************************
892 * .ANI cursor support
894 #define RIFF_FOURCC( c0, c1, c2, c3 ) \
895 ( (DWORD)(BYTE)(c0) | ( (DWORD)(BYTE)(c1) << 8 ) | \
896 ( (DWORD)(BYTE)(c2) << 16 ) | ( (DWORD)(BYTE)(c3) << 24 ) )
898 #define ANI_RIFF_ID RIFF_FOURCC('R', 'I', 'F', 'F')
899 #define ANI_LIST_ID RIFF_FOURCC('L', 'I', 'S', 'T')
900 #define ANI_ACON_ID RIFF_FOURCC('A', 'C', 'O', 'N')
901 #define ANI_anih_ID RIFF_FOURCC('a', 'n', 'i', 'h')
902 #define ANI_seq__ID RIFF_FOURCC('s', 'e', 'q', ' ')
903 #define ANI_fram_ID RIFF_FOURCC('f', 'r', 'a', 'm')
905 #define ANI_FLAG_ICON 0x1
906 #define ANI_FLAG_SEQUENCE 0x2
922 const unsigned char *data
;
925 static void dump_ani_header( const ani_header
*header
)
927 TRACE(" header size: %d\n", header
->header_size
);
928 TRACE(" frames: %d\n", header
->num_frames
);
929 TRACE(" steps: %d\n", header
->num_steps
);
930 TRACE(" width: %d\n", header
->width
);
931 TRACE(" height: %d\n", header
->height
);
932 TRACE(" bpp: %d\n", header
->bpp
);
933 TRACE(" planes: %d\n", header
->num_planes
);
934 TRACE(" display rate: %d\n", header
->display_rate
);
935 TRACE(" flags: 0x%08x\n", header
->flags
);
957 static void riff_find_chunk( DWORD chunk_id
, DWORD chunk_type
, const riff_chunk_t
*parent_chunk
, riff_chunk_t
*chunk
)
959 const unsigned char *ptr
= parent_chunk
->data
;
960 const unsigned char *end
= parent_chunk
->data
+ (parent_chunk
->data_size
- (2 * sizeof(DWORD
)));
962 if (chunk_type
== ANI_LIST_ID
|| chunk_type
== ANI_RIFF_ID
) end
-= sizeof(DWORD
);
966 if ((!chunk_type
&& *(DWORD
*)ptr
== chunk_id
)
967 || (chunk_type
&& *(DWORD
*)ptr
== chunk_type
&& *((DWORD
*)ptr
+ 2) == chunk_id
))
969 ptr
+= sizeof(DWORD
);
970 chunk
->data_size
= *(DWORD
*)ptr
;
971 ptr
+= sizeof(DWORD
);
972 if (chunk_type
== ANI_LIST_ID
|| chunk_type
== ANI_RIFF_ID
) ptr
+= sizeof(DWORD
);
978 ptr
+= sizeof(DWORD
);
979 ptr
+= *(DWORD
*)ptr
;
980 ptr
+= sizeof(DWORD
);
988 * RIFF:'ACON' RIFF chunk
989 * |- CHUNK:'anih' Header
990 * |- CHUNK:'seq ' Sequence information (optional)
991 * \- LIST:'fram' Frame list
992 * |- CHUNK:icon Cursor frames
997 static HCURSOR
CURSORICON_CreateIconFromANI( const LPBYTE bits
, DWORD bits_size
,
998 INT width
, INT height
, INT colors
)
1001 ani_header header
= {0};
1002 LPBYTE frame_bits
= 0;
1004 CURSORICONFILEDIRENTRY
*entry
;
1006 riff_chunk_t root_chunk
= { bits_size
, bits
};
1007 riff_chunk_t ACON_chunk
= {0};
1008 riff_chunk_t anih_chunk
= {0};
1009 riff_chunk_t fram_chunk
= {0};
1010 const unsigned char *icon_data
;
1012 TRACE("bits %p, bits_size %d\n", bits
, bits_size
);
1014 if (!bits
) return 0;
1016 riff_find_chunk( ANI_ACON_ID
, ANI_RIFF_ID
, &root_chunk
, &ACON_chunk
);
1017 if (!ACON_chunk
.data
)
1019 ERR("Failed to get root chunk.\n");
1023 riff_find_chunk( ANI_anih_ID
, 0, &ACON_chunk
, &anih_chunk
);
1024 if (!anih_chunk
.data
)
1026 ERR("Failed to get 'anih' chunk.\n");
1029 memcpy( &header
, anih_chunk
.data
, sizeof(header
) );
1030 dump_ani_header( &header
);
1032 riff_find_chunk( ANI_fram_ID
, ANI_LIST_ID
, &ACON_chunk
, &fram_chunk
);
1033 if (!fram_chunk
.data
)
1035 ERR("Failed to get icon list.\n");
1039 /* FIXME: For now, just load the first frame. Before we can load all the
1040 * frames, we need to write the needed code in wineserver, etc. to handle
1041 * cursors. Once this code is written, we can extend it to support .ani
1042 * cursors and then update user32 and winex11.drv to load all frames.
1044 * Hopefully this will at least make some games (C&C3, etc.) more playable
1047 FIXME("Loading all frames for .ani cursors not implemented.\n");
1048 icon_data
= fram_chunk
.data
+ (2 * sizeof(DWORD
));
1050 entry
= CURSORICON_FindBestIconFile( (CURSORICONFILEDIR
*) icon_data
,
1051 width
, height
, colors
);
1053 frame_bits
= HeapAlloc( GetProcessHeap(), 0, entry
->dwDIBSize
);
1054 memcpy( frame_bits
, icon_data
+ entry
->dwDIBOffset
, entry
->dwDIBSize
);
1056 if (!header
.width
|| !header
.height
)
1058 header
.width
= entry
->bWidth
;
1059 header
.height
= entry
->bHeight
;
1062 hotspot
.x
= entry
->xHotspot
;
1063 hotspot
.y
= entry
->yHotspot
;
1065 cursor
= CURSORICON_CreateIconFromBMI( (BITMAPINFO
*) frame_bits
, hotspot
,
1066 FALSE
, 0x00030000, header
.width
, header
.height
, 0 );
1068 HeapFree( GetProcessHeap(), 0, frame_bits
);
1074 /**********************************************************************
1075 * CreateIconFromResourceEx (USER32.@)
1077 * FIXME: Convert to mono when cFlag is LR_MONOCHROME. Do something
1078 * with cbSize parameter as well.
1080 HICON WINAPI
CreateIconFromResourceEx( LPBYTE bits
, UINT cbSize
,
1081 BOOL bIcon
, DWORD dwVersion
,
1082 INT width
, INT height
,
1088 hotspot
.x
= ICON_HOTSPOT
;
1089 hotspot
.y
= ICON_HOTSPOT
;
1091 TRACE_(cursor
)("%p (%u bytes), ver %08x, %ix%i %s %s\n",
1092 bits
, cbSize
, dwVersion
, width
, height
,
1093 bIcon
? "icon" : "cursor", (cFlag
& LR_MONOCHROME
) ? "mono" : "" );
1096 bmi
= (BITMAPINFO
*)bits
;
1097 else /* get the hotspot */
1099 POINT16
*pt
= (POINT16
*)bits
;
1101 bmi
= (BITMAPINFO
*)(pt
+ 1);
1104 return CURSORICON_CreateIconFromBMI( bmi
, hotspot
, bIcon
, dwVersion
,
1105 width
, height
, cFlag
);
1109 /**********************************************************************
1110 * CreateIconFromResource (USER32.@)
1112 HICON WINAPI
CreateIconFromResource( LPBYTE bits
, UINT cbSize
,
1113 BOOL bIcon
, DWORD dwVersion
)
1115 return CreateIconFromResourceEx( bits
, cbSize
, bIcon
, dwVersion
, 0,0,0);
1119 static HICON
CURSORICON_LoadFromFile( LPCWSTR filename
,
1120 INT width
, INT height
, INT colors
,
1121 BOOL fCursor
, UINT loadflags
)
1123 CURSORICONFILEDIRENTRY
*entry
;
1124 CURSORICONFILEDIR
*dir
;
1130 TRACE("loading %s\n", debugstr_w( filename
));
1132 bits
= map_fileW( filename
, &filesize
);
1136 /* Check for .ani. */
1137 if (memcmp( bits
, "RIFF", 4 ) == 0)
1139 hIcon
= CURSORICON_CreateIconFromANI( bits
, filesize
, width
, height
,
1144 dir
= (CURSORICONFILEDIR
*) bits
;
1145 if ( filesize
< sizeof(*dir
) )
1148 if ( filesize
< (sizeof(*dir
) + sizeof(dir
->idEntries
[0])*(dir
->idCount
-1)) )
1152 entry
= CURSORICON_FindBestCursorFile( dir
, width
, height
, colors
);
1154 entry
= CURSORICON_FindBestIconFile( dir
, width
, height
, colors
);
1159 /* check that we don't run off the end of the file */
1160 if ( entry
->dwDIBOffset
> filesize
)
1162 if ( entry
->dwDIBOffset
+ entry
->dwDIBSize
> filesize
)
1165 /* Set the actual hotspot for cursors and ICON_HOTSPOT for icons. */
1168 hotspot
.x
= entry
->xHotspot
;
1169 hotspot
.y
= entry
->yHotspot
;
1173 hotspot
.x
= ICON_HOTSPOT
;
1174 hotspot
.y
= ICON_HOTSPOT
;
1176 hIcon
= CURSORICON_CreateIconFromBMI( (BITMAPINFO
*)&bits
[entry
->dwDIBOffset
],
1177 hotspot
, !fCursor
, 0x00030000,
1178 width
, height
, loadflags
);
1180 TRACE("loaded %s -> %p\n", debugstr_w( filename
), hIcon
);
1181 UnmapViewOfFile( bits
);
1185 /**********************************************************************
1188 * Load a cursor or icon from resource or file.
1190 static HICON
CURSORICON_Load(HINSTANCE hInstance
, LPCWSTR name
,
1191 INT width
, INT height
, INT colors
,
1192 BOOL fCursor
, UINT loadflags
)
1196 HRSRC hRsrc
, hGroupRsrc
;
1198 CURSORICONDIRENTRY
*dirEntry
;
1203 TRACE("%p, %s, %dx%d, colors %d, fCursor %d, flags 0x%04x\n",
1204 hInstance
, debugstr_w(name
), width
, height
, colors
, fCursor
, loadflags
);
1206 if ( loadflags
& LR_LOADFROMFILE
) /* Load from file */
1207 return CURSORICON_LoadFromFile( name
, width
, height
, colors
, fCursor
, loadflags
);
1209 if (!hInstance
) hInstance
= user32_module
; /* Load OEM cursor/icon */
1211 /* Normalize hInstance (must be uniquely represented for icon cache) */
1213 if (!HIWORD( hInstance
))
1214 hInstance
= HINSTANCE_32(GetExePtr( HINSTANCE_16(hInstance
) ));
1216 /* Get directory resource ID */
1218 if (!(hRsrc
= FindResourceW( hInstance
, name
,
1219 (LPWSTR
)(fCursor
? RT_GROUP_CURSOR
: RT_GROUP_ICON
) )))
1223 /* Find the best entry in the directory */
1225 if (!(handle
= LoadResource( hInstance
, hRsrc
))) return 0;
1226 if (!(dir
= LockResource( handle
))) return 0;
1228 dirEntry
= CURSORICON_FindBestCursorRes( dir
, width
, height
, colors
);
1230 dirEntry
= CURSORICON_FindBestIconRes( dir
, width
, height
, colors
);
1231 if (!dirEntry
) return 0;
1232 wResId
= dirEntry
->wResId
;
1233 dwBytesInRes
= dirEntry
->dwBytesInRes
;
1234 FreeResource( handle
);
1236 /* Load the resource */
1238 if (!(hRsrc
= FindResourceW(hInstance
,MAKEINTRESOURCEW(wResId
),
1239 (LPWSTR
)(fCursor
? RT_CURSOR
: RT_ICON
) ))) return 0;
1241 /* If shared icon, check whether it was already loaded */
1242 if ( (loadflags
& LR_SHARED
)
1243 && (hIcon
= CURSORICON_FindSharedIcon( hInstance
, hRsrc
) ) != 0 )
1246 if (!(handle
= LoadResource( hInstance
, hRsrc
))) return 0;
1247 bits
= LockResource( handle
);
1248 hIcon
= CreateIconFromResourceEx( bits
, dwBytesInRes
,
1249 !fCursor
, 0x00030000, width
, height
, loadflags
);
1250 FreeResource( handle
);
1252 /* If shared icon, add to icon cache */
1254 if ( hIcon
&& (loadflags
& LR_SHARED
) )
1255 CURSORICON_AddSharedIcon( hInstance
, hRsrc
, hGroupRsrc
, hIcon
);
1260 /***********************************************************************
1263 * Make a copy of a cursor or icon.
1265 static HICON
CURSORICON_Copy( HINSTANCE16 hInst16
, HICON hIcon
)
1267 char *ptrOld
, *ptrNew
;
1269 HICON16 hOld
= HICON_16(hIcon
);
1272 if (!(ptrOld
= GlobalLock16( hOld
))) return 0;
1273 if (hInst16
&& !(hInst16
= GetExePtr( hInst16
))) return 0;
1274 size
= GlobalSize16( hOld
);
1275 hNew
= GlobalAlloc16( GMEM_MOVEABLE
, size
);
1276 FarSetOwner16( hNew
, hInst16
);
1277 ptrNew
= GlobalLock16( hNew
);
1278 memcpy( ptrNew
, ptrOld
, size
);
1279 GlobalUnlock16( hOld
);
1280 GlobalUnlock16( hNew
);
1281 return HICON_32(hNew
);
1284 /*************************************************************************
1285 * CURSORICON_ExtCopy
1287 * Copies an Image from the Cache if LR_COPYFROMRESOURCE is specified
1290 * Handle [I] handle to an Image
1291 * nType [I] Type of Handle (IMAGE_CURSOR | IMAGE_ICON)
1292 * iDesiredCX [I] The Desired width of the Image
1293 * iDesiredCY [I] The desired height of the Image
1294 * nFlags [I] The flags from CopyImage
1297 * Success: The new handle of the Image
1300 * LR_COPYDELETEORG and LR_MONOCHROME are currently not implemented.
1301 * LR_MONOCHROME should be implemented by CreateIconFromResourceEx.
1302 * LR_COPYFROMRESOURCE will only work if the Image is in the Cache.
1307 static HICON
CURSORICON_ExtCopy(HICON hIcon
, UINT nType
,
1308 INT iDesiredCX
, INT iDesiredCY
,
1313 TRACE_(icon
)("hIcon %p, nType %u, iDesiredCX %i, iDesiredCY %i, nFlags %u\n",
1314 hIcon
, nType
, iDesiredCX
, iDesiredCY
, nFlags
);
1321 /* Best Fit or Monochrome */
1322 if( (nFlags
& LR_COPYFROMRESOURCE
1323 && (iDesiredCX
> 0 || iDesiredCY
> 0))
1324 || nFlags
& LR_MONOCHROME
)
1326 ICONCACHE
* pIconCache
= CURSORICON_FindCache(hIcon
);
1328 /* Not Found in Cache, then do a straight copy
1330 if(pIconCache
== NULL
)
1332 hNew
= CURSORICON_Copy(0, hIcon
);
1333 if(nFlags
& LR_COPYFROMRESOURCE
)
1335 TRACE_(icon
)("LR_COPYFROMRESOURCE: Failed to load from cache\n");
1340 int iTargetCY
= iDesiredCY
, iTargetCX
= iDesiredCX
;
1346 CURSORICONDIR
*pDir
;
1347 CURSORICONDIRENTRY
*pDirEntry
;
1348 BOOL bIsIcon
= (nType
== IMAGE_ICON
);
1350 /* Completing iDesiredCX CY for Monochrome Bitmaps if needed
1352 if(((nFlags
& LR_MONOCHROME
) && !(nFlags
& LR_COPYFROMRESOURCE
))
1353 || (iDesiredCX
== 0 && iDesiredCY
== 0))
1355 iDesiredCY
= GetSystemMetrics(bIsIcon
?
1356 SM_CYICON
: SM_CYCURSOR
);
1357 iDesiredCX
= GetSystemMetrics(bIsIcon
?
1358 SM_CXICON
: SM_CXCURSOR
);
1361 /* Retrieve the CURSORICONDIRENTRY
1363 if (!(hMem
= LoadResource( pIconCache
->hModule
,
1364 pIconCache
->hGroupRsrc
)))
1368 if (!(pDir
= LockResource( hMem
)))
1377 pDirEntry
= CURSORICON_FindBestIconRes(
1378 pDir
, iDesiredCX
, iDesiredCY
, 256 );
1382 pDirEntry
= CURSORICON_FindBestCursorRes(
1383 pDir
, iDesiredCX
, iDesiredCY
, 1);
1386 wResId
= pDirEntry
->wResId
;
1387 dwBytesInRes
= pDirEntry
->dwBytesInRes
;
1390 TRACE_(icon
)("ResID %u, BytesInRes %u, Width %d, Height %d DX %d, DY %d\n",
1391 wResId
, dwBytesInRes
, pDirEntry
->ResInfo
.icon
.bWidth
,
1392 pDirEntry
->ResInfo
.icon
.bHeight
, iDesiredCX
, iDesiredCY
);
1396 if (!(hRsrc
= FindResourceW(pIconCache
->hModule
,
1397 MAKEINTRESOURCEW(wResId
), (LPWSTR
)(bIsIcon
? RT_ICON
: RT_CURSOR
))))
1401 if (!(hMem
= LoadResource( pIconCache
->hModule
, hRsrc
)))
1406 pBits
= LockResource( hMem
);
1408 if(nFlags
& LR_DEFAULTSIZE
)
1410 iTargetCY
= GetSystemMetrics(SM_CYICON
);
1411 iTargetCX
= GetSystemMetrics(SM_CXICON
);
1414 /* Create a New Icon with the proper dimension
1416 hNew
= CreateIconFromResourceEx( pBits
, dwBytesInRes
,
1417 bIsIcon
, 0x00030000, iTargetCX
, iTargetCY
, nFlags
);
1421 else hNew
= CURSORICON_Copy(0, hIcon
);
1426 /***********************************************************************
1427 * CreateCursor (USER32.@)
1429 HCURSOR WINAPI
CreateCursor( HINSTANCE hInstance
,
1430 INT xHotSpot
, INT yHotSpot
,
1431 INT nWidth
, INT nHeight
,
1432 LPCVOID lpANDbits
, LPCVOID lpXORbits
)
1434 CURSORICONINFO info
;
1436 TRACE_(cursor
)("%dx%d spot=%d,%d xor=%p and=%p\n",
1437 nWidth
, nHeight
, xHotSpot
, yHotSpot
, lpXORbits
, lpANDbits
);
1439 info
.ptHotSpot
.x
= xHotSpot
;
1440 info
.ptHotSpot
.y
= yHotSpot
;
1441 info
.nWidth
= nWidth
;
1442 info
.nHeight
= nHeight
;
1443 info
.nWidthBytes
= 0;
1445 info
.bBitsPerPixel
= 1;
1447 return HICON_32(CreateCursorIconIndirect16(0, &info
, lpANDbits
, lpXORbits
));
1451 /***********************************************************************
1452 * CreateIcon (USER.407)
1454 HICON16 WINAPI
CreateIcon16( HINSTANCE16 hInstance
, INT16 nWidth
,
1455 INT16 nHeight
, BYTE bPlanes
, BYTE bBitsPixel
,
1456 LPCVOID lpANDbits
, LPCVOID lpXORbits
)
1458 CURSORICONINFO info
;
1460 TRACE_(icon
)("%dx%dx%d, xor=%p, and=%p\n",
1461 nWidth
, nHeight
, bPlanes
* bBitsPixel
, lpXORbits
, lpANDbits
);
1463 info
.ptHotSpot
.x
= ICON_HOTSPOT
;
1464 info
.ptHotSpot
.y
= ICON_HOTSPOT
;
1465 info
.nWidth
= nWidth
;
1466 info
.nHeight
= nHeight
;
1467 info
.nWidthBytes
= 0;
1468 info
.bPlanes
= bPlanes
;
1469 info
.bBitsPerPixel
= bBitsPixel
;
1471 return CreateCursorIconIndirect16( hInstance
, &info
, lpANDbits
, lpXORbits
);
1475 /***********************************************************************
1476 * CreateIcon (USER32.@)
1478 * Creates an icon based on the specified bitmaps. The bitmaps must be
1479 * provided in a device dependent format and will be resized to
1480 * (SM_CXICON,SM_CYICON) and depth converted to match the screen's color
1481 * depth. The provided bitmaps must be top-down bitmaps.
1482 * Although Windows does not support 15bpp(*) this API must support it
1483 * for Winelib applications.
1485 * (*) Windows does not support 15bpp but it supports the 555 RGB 16bpp
1489 * Success: handle to an icon
1492 * FIXME: Do we need to resize the bitmaps?
1494 HICON WINAPI
CreateIcon(
1495 HINSTANCE hInstance
, /* [in] the application's hInstance */
1496 INT nWidth
, /* [in] the width of the provided bitmaps */
1497 INT nHeight
, /* [in] the height of the provided bitmaps */
1498 BYTE bPlanes
, /* [in] the number of planes in the provided bitmaps */
1499 BYTE bBitsPixel
, /* [in] the number of bits per pixel of the lpXORbits bitmap */
1500 LPCVOID lpANDbits
, /* [in] a monochrome bitmap representing the icon's mask */
1501 LPCVOID lpXORbits
) /* [in] the icon's 'color' bitmap */
1506 TRACE_(icon
)("%dx%d, planes %d, bpp %d, xor %p, and %p\n",
1507 nWidth
, nHeight
, bPlanes
, bBitsPixel
, lpXORbits
, lpANDbits
);
1510 iinfo
.xHotspot
= ICON_HOTSPOT
;
1511 iinfo
.yHotspot
= ICON_HOTSPOT
;
1512 iinfo
.hbmMask
= CreateBitmap( nWidth
, nHeight
, 1, 1, lpANDbits
);
1513 iinfo
.hbmColor
= CreateBitmap( nWidth
, nHeight
, bPlanes
, bBitsPixel
, lpXORbits
);
1515 hIcon
= CreateIconIndirect( &iinfo
);
1517 DeleteObject( iinfo
.hbmMask
);
1518 DeleteObject( iinfo
.hbmColor
);
1524 /***********************************************************************
1525 * CreateCursorIconIndirect (USER.408)
1527 HGLOBAL16 WINAPI
CreateCursorIconIndirect16( HINSTANCE16 hInstance
,
1528 CURSORICONINFO
*info
,
1534 int sizeAnd
, sizeXor
;
1536 hInstance
= GetExePtr( hInstance
); /* Make it a module handle */
1537 if (!lpXORbits
|| !lpANDbits
|| info
->bPlanes
!= 1) return 0;
1538 info
->nWidthBytes
= get_bitmap_width_bytes(info
->nWidth
,info
->bBitsPerPixel
);
1539 sizeXor
= info
->nHeight
* info
->nWidthBytes
;
1540 sizeAnd
= info
->nHeight
* get_bitmap_width_bytes( info
->nWidth
, 1 );
1541 if (!(handle
= GlobalAlloc16( GMEM_MOVEABLE
,
1542 sizeof(CURSORICONINFO
) + sizeXor
+ sizeAnd
)))
1544 FarSetOwner16( handle
, hInstance
);
1545 ptr
= GlobalLock16( handle
);
1546 memcpy( ptr
, info
, sizeof(*info
) );
1547 memcpy( ptr
+ sizeof(CURSORICONINFO
), lpANDbits
, sizeAnd
);
1548 memcpy( ptr
+ sizeof(CURSORICONINFO
) + sizeAnd
, lpXORbits
, sizeXor
);
1549 GlobalUnlock16( handle
);
1554 /***********************************************************************
1555 * CopyIcon (USER.368)
1557 HICON16 WINAPI
CopyIcon16( HINSTANCE16 hInstance
, HICON16 hIcon
)
1559 TRACE_(icon
)("%04x %04x\n", hInstance
, hIcon
);
1560 return HICON_16(CURSORICON_Copy(hInstance
, HICON_32(hIcon
)));
1564 /***********************************************************************
1565 * CopyIcon (USER32.@)
1567 HICON WINAPI
CopyIcon( HICON hIcon
)
1569 TRACE_(icon
)("%p\n", hIcon
);
1570 return CURSORICON_Copy( 0, hIcon
);
1574 /***********************************************************************
1575 * CopyCursor (USER.369)
1577 HCURSOR16 WINAPI
CopyCursor16( HINSTANCE16 hInstance
, HCURSOR16 hCursor
)
1579 TRACE_(cursor
)("%04x %04x\n", hInstance
, hCursor
);
1580 return HICON_16(CURSORICON_Copy(hInstance
, HCURSOR_32(hCursor
)));
1583 /**********************************************************************
1584 * DestroyIcon32 (USER.610)
1586 * This routine is actually exported from Win95 USER under the name
1587 * DestroyIcon32 ... The behaviour implemented here should mimic
1588 * the Win95 one exactly, especially the return values, which
1589 * depend on the setting of various flags.
1591 WORD WINAPI
DestroyIcon32( HGLOBAL16 handle
, UINT16 flags
)
1595 TRACE_(icon
)("(%04x, %04x)\n", handle
, flags
);
1597 /* Check whether destroying active cursor */
1599 if ( get_user_thread_info()->cursor
== HICON_32(handle
) )
1601 WARN_(cursor
)("Destroying active cursor!\n" );
1605 /* Try shared cursor/icon first */
1607 if ( !(flags
& CID_NONSHARED
) )
1609 INT count
= CURSORICON_DelSharedIcon(HICON_32(handle
));
1612 return (flags
& CID_WIN32
)? TRUE
: (count
== 0);
1614 /* FIXME: OEM cursors/icons should be recognized */
1617 /* Now assume non-shared cursor/icon */
1619 retv
= GlobalFree16( handle
);
1620 return (flags
& CID_RESOURCE
)? retv
: TRUE
;
1623 /***********************************************************************
1624 * DestroyIcon (USER32.@)
1626 BOOL WINAPI
DestroyIcon( HICON hIcon
)
1628 return DestroyIcon32(HICON_16(hIcon
), CID_WIN32
);
1632 /***********************************************************************
1633 * DestroyCursor (USER32.@)
1635 BOOL WINAPI
DestroyCursor( HCURSOR hCursor
)
1637 return DestroyIcon32(HCURSOR_16(hCursor
), CID_WIN32
);
1640 /***********************************************************************
1641 * bitmap_has_alpha_channel
1643 * Analyses bits bitmap to determine if alpha data is present.
1646 * bpp [I] The bits-per-pixel of the bitmap
1647 * bitmapBits [I] A pointer to the bitmap data
1648 * bitmapLength [I] The length of the bitmap in bytes
1651 * TRUE if an alpha channel is discovered, FALSE
1654 * Windows' behaviour is that if the icon bitmap is 32-bit and at
1655 * least one pixel has a non-zero alpha, then the bitmap is a
1656 * treated as having an alpha channel transparentcy. Otherwise,
1657 * it's treated as being completely opaque.
1660 static BOOL
bitmap_has_alpha_channel( int bpp
, unsigned char *bitmapBits
,
1661 unsigned int bitmapLength
)
1663 /* Detect an alpha channel by looking for non-zero alpha pixels */
1666 unsigned int offset
;
1667 for(offset
= 3; offset
< bitmapLength
; offset
+= 4)
1669 if(bitmapBits
[offset
] != 0)
1678 /***********************************************************************
1679 * premultiply_alpha_channel
1681 * Premultiplies the color channels of a 32-bit bitmap by the alpha
1682 * channel. This is a necessary step that must be carried out on
1683 * the image before it is passed to GdiAlphaBlend
1686 * destBitmap [I] The destination bitmap buffer
1687 * srcBitmap [I] The source bitmap buffer
1688 * bitmapLength [I] The length of the bitmap in bytes
1691 static void premultiply_alpha_channel( unsigned char *destBitmap
,
1692 unsigned char *srcBitmap
,
1693 unsigned int bitmapLength
)
1695 unsigned char *destPixel
= destBitmap
;
1696 unsigned char *srcPixel
= srcBitmap
;
1698 while(destPixel
< destBitmap
+ bitmapLength
)
1700 unsigned char alpha
= srcPixel
[3];
1701 *(destPixel
++) = *(srcPixel
++) * alpha
/ 255;
1702 *(destPixel
++) = *(srcPixel
++) * alpha
/ 255;
1703 *(destPixel
++) = *(srcPixel
++) * alpha
/ 255;
1704 *(destPixel
++) = *(srcPixel
++);
1708 /***********************************************************************
1709 * DrawIcon (USER32.@)
1711 BOOL WINAPI
DrawIcon( HDC hdc
, INT x
, INT y
, HICON hIcon
)
1713 CURSORICONINFO
*ptr
;
1715 HBITMAP hXorBits
= NULL
, hAndBits
= NULL
, hBitTemp
= NULL
;
1716 COLORREF oldFg
, oldBg
;
1717 unsigned char *xorBitmapBits
;
1718 unsigned int dibLength
;
1720 TRACE("%p, (%d,%d), %p\n", hdc
, x
, y
, hIcon
);
1722 if (!(ptr
= GlobalLock16(HICON_16(hIcon
)))) return FALSE
;
1723 if (!(hMemDC
= CreateCompatibleDC( hdc
))) return FALSE
;
1725 dibLength
= ptr
->nHeight
* get_bitmap_width_bytes(
1726 ptr
->nWidth
, ptr
->bBitsPerPixel
);
1728 xorBitmapBits
= (unsigned char *)(ptr
+ 1) + ptr
->nHeight
*
1729 get_bitmap_width_bytes(ptr
->nWidth
, 1);
1731 oldFg
= SetTextColor( hdc
, RGB(0,0,0) );
1732 oldBg
= SetBkColor( hdc
, RGB(255,255,255) );
1734 if(bitmap_has_alpha_channel(ptr
->bBitsPerPixel
, xorBitmapBits
, dibLength
))
1736 BITMAPINFOHEADER bmih
;
1737 unsigned char *dibBits
;
1739 memset(&bmih
, 0, sizeof(BITMAPINFOHEADER
));
1740 bmih
.biSize
= sizeof(BITMAPINFOHEADER
);
1741 bmih
.biWidth
= ptr
->nWidth
;
1742 bmih
.biHeight
= -ptr
->nHeight
;
1743 bmih
.biPlanes
= ptr
->bPlanes
;
1744 bmih
.biBitCount
= 32;
1745 bmih
.biCompression
= BI_RGB
;
1747 hXorBits
= CreateDIBSection(hdc
, (BITMAPINFO
*)&bmih
, DIB_RGB_COLORS
,
1748 (void*)&dibBits
, NULL
, 0);
1750 if (hXorBits
&& dibBits
)
1752 BLENDFUNCTION pixelblend
= { AC_SRC_OVER
, 0, 255, AC_SRC_ALPHA
};
1754 /* Do the alpha blending render */
1755 premultiply_alpha_channel(dibBits
, xorBitmapBits
, dibLength
);
1756 hBitTemp
= SelectObject( hMemDC
, hXorBits
);
1757 /* Destination width/height has to be "System Large" size */
1758 GdiAlphaBlend(hdc
, x
, y
, GetSystemMetrics(SM_CXICON
),
1759 GetSystemMetrics(SM_CYICON
), hMemDC
,
1760 0, 0, ptr
->nWidth
, ptr
->nHeight
, pixelblend
);
1761 SelectObject( hMemDC
, hBitTemp
);
1766 hAndBits
= CreateBitmap( ptr
->nWidth
, ptr
->nHeight
, 1, 1, ptr
+ 1 );
1767 hXorBits
= CreateBitmap( ptr
->nWidth
, ptr
->nHeight
, ptr
->bPlanes
,
1768 ptr
->bBitsPerPixel
, xorBitmapBits
);
1770 if (hXorBits
&& hAndBits
)
1772 hBitTemp
= SelectObject( hMemDC
, hAndBits
);
1773 StretchBlt( hdc
, x
, y
, GetSystemMetrics(SM_CXICON
),
1774 GetSystemMetrics(SM_CYICON
), hMemDC
, 0, 0,
1775 ptr
->nWidth
, ptr
->nHeight
, SRCAND
);
1776 SelectObject( hMemDC
, hXorBits
);
1777 StretchBlt( hdc
, x
, y
, GetSystemMetrics(SM_CXICON
),
1778 GetSystemMetrics(SM_CYICON
), hMemDC
, 0, 0,
1779 ptr
->nWidth
, ptr
->nHeight
, SRCINVERT
);
1780 SelectObject( hMemDC
, hBitTemp
);
1785 if (hXorBits
) DeleteObject( hXorBits
);
1786 if (hAndBits
) DeleteObject( hAndBits
);
1787 GlobalUnlock16(HICON_16(hIcon
));
1788 SetTextColor( hdc
, oldFg
);
1789 SetBkColor( hdc
, oldBg
);
1793 /***********************************************************************
1794 * DumpIcon (USER.459)
1796 DWORD WINAPI
DumpIcon16( SEGPTR pInfo
, WORD
*lpLen
,
1797 SEGPTR
*lpXorBits
, SEGPTR
*lpAndBits
)
1799 CURSORICONINFO
*info
= MapSL( pInfo
);
1800 int sizeAnd
, sizeXor
;
1802 if (!info
) return 0;
1803 sizeXor
= info
->nHeight
* info
->nWidthBytes
;
1804 sizeAnd
= info
->nHeight
* get_bitmap_width_bytes( info
->nWidth
, 1 );
1805 if (lpAndBits
) *lpAndBits
= pInfo
+ sizeof(CURSORICONINFO
);
1806 if (lpXorBits
) *lpXorBits
= pInfo
+ sizeof(CURSORICONINFO
) + sizeAnd
;
1807 if (lpLen
) *lpLen
= sizeof(CURSORICONINFO
) + sizeAnd
+ sizeXor
;
1808 return MAKELONG( sizeXor
, sizeXor
);
1812 /***********************************************************************
1813 * SetCursor (USER32.@)
1815 * Set the cursor shape.
1818 * A handle to the previous cursor shape.
1820 HCURSOR WINAPI DECLSPEC_HOTPATCH
SetCursor( HCURSOR hCursor
/* [in] Handle of cursor to show */ )
1822 struct user_thread_info
*thread_info
= get_user_thread_info();
1825 if (hCursor
== thread_info
->cursor
) return hCursor
; /* No change */
1826 TRACE("%p\n", hCursor
);
1827 hOldCursor
= thread_info
->cursor
;
1828 thread_info
->cursor
= hCursor
;
1829 /* Change the cursor shape only if it is visible */
1830 if (thread_info
->cursor_count
>= 0)
1832 USER_Driver
->pSetCursor(GlobalLock16(HCURSOR_16(hCursor
)));
1833 GlobalUnlock16(HCURSOR_16(hCursor
));
1838 /***********************************************************************
1839 * ShowCursor (USER32.@)
1841 INT WINAPI DECLSPEC_HOTPATCH
ShowCursor( BOOL bShow
)
1843 struct user_thread_info
*thread_info
= get_user_thread_info();
1845 TRACE("%d, count=%d\n", bShow
, thread_info
->cursor_count
);
1849 if (++thread_info
->cursor_count
== 0) /* Show it */
1851 USER_Driver
->pSetCursor(GlobalLock16(HCURSOR_16(thread_info
->cursor
)));
1852 GlobalUnlock16(HCURSOR_16(thread_info
->cursor
));
1857 if (--thread_info
->cursor_count
== -1) /* Hide it */
1858 USER_Driver
->pSetCursor( NULL
);
1860 return thread_info
->cursor_count
;
1863 /***********************************************************************
1864 * GetCursor (USER32.@)
1866 HCURSOR WINAPI
GetCursor(void)
1868 return get_user_thread_info()->cursor
;
1872 /***********************************************************************
1873 * ClipCursor (USER32.@)
1875 BOOL WINAPI DECLSPEC_HOTPATCH
ClipCursor( const RECT
*rect
)
1879 SetRect( &virt
, 0, 0, GetSystemMetrics( SM_CXVIRTUALSCREEN
),
1880 GetSystemMetrics( SM_CYVIRTUALSCREEN
) );
1881 OffsetRect( &virt
, GetSystemMetrics( SM_XVIRTUALSCREEN
),
1882 GetSystemMetrics( SM_YVIRTUALSCREEN
) );
1884 TRACE( "Clipping to: %s was: %s screen: %s\n", wine_dbgstr_rect(rect
),
1885 wine_dbgstr_rect(&CURSOR_ClipRect
), wine_dbgstr_rect(&virt
) );
1887 if (!IntersectRect( &CURSOR_ClipRect
, &virt
, rect
))
1888 CURSOR_ClipRect
= virt
;
1890 USER_Driver
->pClipCursor( rect
);
1895 /***********************************************************************
1896 * GetClipCursor (USER32.@)
1898 BOOL WINAPI DECLSPEC_HOTPATCH
GetClipCursor( RECT
*rect
)
1900 /* If this is first time - initialize the rect */
1901 if (IsRectEmpty( &CURSOR_ClipRect
)) ClipCursor( NULL
);
1903 return CopyRect( rect
, &CURSOR_ClipRect
);
1907 /***********************************************************************
1908 * SetSystemCursor (USER32.@)
1910 BOOL WINAPI
SetSystemCursor(HCURSOR hcur
, DWORD id
)
1912 FIXME("(%p,%08x),stub!\n", hcur
, id
);
1917 /**********************************************************************
1918 * LookupIconIdFromDirectoryEx (USER.364)
1920 * FIXME: exact parameter sizes
1922 INT16 WINAPI
LookupIconIdFromDirectoryEx16( LPBYTE dir
, BOOL16 bIcon
,
1923 INT16 width
, INT16 height
, UINT16 cFlag
)
1925 return LookupIconIdFromDirectoryEx( dir
, bIcon
, width
, height
, cFlag
);
1928 /**********************************************************************
1929 * LookupIconIdFromDirectoryEx (USER32.@)
1931 INT WINAPI
LookupIconIdFromDirectoryEx( LPBYTE xdir
, BOOL bIcon
,
1932 INT width
, INT height
, UINT cFlag
)
1934 CURSORICONDIR
*dir
= (CURSORICONDIR
*)xdir
;
1936 if( dir
&& !dir
->idReserved
&& (dir
->idType
& 3) )
1938 CURSORICONDIRENTRY
* entry
;
1943 palEnts
= GetSystemPaletteEntries(hdc
, 0, 0, NULL
);
1946 colors
= (cFlag
& LR_MONOCHROME
) ? 2 : palEnts
;
1951 entry
= CURSORICON_FindBestIconRes( dir
, width
, height
, colors
);
1953 entry
= CURSORICON_FindBestCursorRes( dir
, width
, height
, colors
);
1955 if( entry
) retVal
= entry
->wResId
;
1957 else WARN_(cursor
)("invalid resource directory\n");
1961 /**********************************************************************
1962 * LookupIconIdFromDirectory (USER32.@)
1964 INT WINAPI
LookupIconIdFromDirectory( LPBYTE dir
, BOOL bIcon
)
1966 return LookupIconIdFromDirectoryEx( dir
, bIcon
,
1967 bIcon
? GetSystemMetrics(SM_CXICON
) : GetSystemMetrics(SM_CXCURSOR
),
1968 bIcon
? GetSystemMetrics(SM_CYICON
) : GetSystemMetrics(SM_CYCURSOR
), bIcon
? 0 : LR_MONOCHROME
);
1971 /**********************************************************************
1972 * GetIconID (USER.455)
1974 WORD WINAPI
GetIconID16( HGLOBAL16 hResource
, DWORD resType
)
1976 LPBYTE lpDir
= GlobalLock16(hResource
);
1978 TRACE_(cursor
)("hRes=%04x, entries=%i\n",
1979 hResource
, lpDir
? ((CURSORICONDIR
*)lpDir
)->idCount
: 0);
1984 return (WORD
)LookupIconIdFromDirectoryEx16( lpDir
, FALSE
,
1985 GetSystemMetrics(SM_CXCURSOR
), GetSystemMetrics(SM_CYCURSOR
), LR_MONOCHROME
);
1987 return (WORD
)LookupIconIdFromDirectoryEx16( lpDir
, TRUE
,
1988 GetSystemMetrics(SM_CXICON
), GetSystemMetrics(SM_CYICON
), 0 );
1990 WARN_(cursor
)("invalid res type %d\n", resType
);
1995 /**********************************************************************
1996 * LoadCursorIconHandler (USER.336)
1998 * Supposed to load resources of Windows 2.x applications.
2000 HGLOBAL16 WINAPI
LoadCursorIconHandler16( HGLOBAL16 hResource
, HMODULE16 hModule
, HRSRC16 hRsrc
)
2002 FIXME_(cursor
)("(%04x,%04x,%04x): old 2.x resources are not supported!\n",
2003 hResource
, hModule
, hRsrc
);
2007 /**********************************************************************
2008 * LoadIconHandler (USER.456)
2010 HICON16 WINAPI
LoadIconHandler16( HGLOBAL16 hResource
, BOOL16 bNew
)
2012 LPBYTE bits
= LockResource16( hResource
);
2014 TRACE_(cursor
)("hRes=%04x\n",hResource
);
2016 return HICON_16(CreateIconFromResourceEx( bits
, 0, TRUE
,
2017 bNew
? 0x00030000 : 0x00020000, 0, 0, LR_DEFAULTCOLOR
));
2020 /***********************************************************************
2021 * LoadCursorW (USER32.@)
2023 HCURSOR WINAPI
LoadCursorW(HINSTANCE hInstance
, LPCWSTR name
)
2025 TRACE("%p, %s\n", hInstance
, debugstr_w(name
));
2027 return LoadImageW( hInstance
, name
, IMAGE_CURSOR
, 0, 0,
2028 LR_SHARED
| LR_DEFAULTSIZE
);
2031 /***********************************************************************
2032 * LoadCursorA (USER32.@)
2034 HCURSOR WINAPI
LoadCursorA(HINSTANCE hInstance
, LPCSTR name
)
2036 TRACE("%p, %s\n", hInstance
, debugstr_a(name
));
2038 return LoadImageA( hInstance
, name
, IMAGE_CURSOR
, 0, 0,
2039 LR_SHARED
| LR_DEFAULTSIZE
);
2042 /***********************************************************************
2043 * LoadCursorFromFileW (USER32.@)
2045 HCURSOR WINAPI
LoadCursorFromFileW (LPCWSTR name
)
2047 TRACE("%s\n", debugstr_w(name
));
2049 return LoadImageW( 0, name
, IMAGE_CURSOR
, 0, 0,
2050 LR_LOADFROMFILE
| LR_DEFAULTSIZE
);
2053 /***********************************************************************
2054 * LoadCursorFromFileA (USER32.@)
2056 HCURSOR WINAPI
LoadCursorFromFileA (LPCSTR name
)
2058 TRACE("%s\n", debugstr_a(name
));
2060 return LoadImageA( 0, name
, IMAGE_CURSOR
, 0, 0,
2061 LR_LOADFROMFILE
| LR_DEFAULTSIZE
);
2064 /***********************************************************************
2065 * LoadIconW (USER32.@)
2067 HICON WINAPI
LoadIconW(HINSTANCE hInstance
, LPCWSTR name
)
2069 TRACE("%p, %s\n", hInstance
, debugstr_w(name
));
2071 return LoadImageW( hInstance
, name
, IMAGE_ICON
, 0, 0,
2072 LR_SHARED
| LR_DEFAULTSIZE
);
2075 /***********************************************************************
2076 * LoadIconA (USER32.@)
2078 HICON WINAPI
LoadIconA(HINSTANCE hInstance
, LPCSTR name
)
2080 TRACE("%p, %s\n", hInstance
, debugstr_a(name
));
2082 return LoadImageA( hInstance
, name
, IMAGE_ICON
, 0, 0,
2083 LR_SHARED
| LR_DEFAULTSIZE
);
2086 /**********************************************************************
2087 * GetIconInfo (USER32.@)
2089 BOOL WINAPI
GetIconInfo(HICON hIcon
, PICONINFO iconinfo
)
2091 CURSORICONINFO
*ciconinfo
;
2094 ciconinfo
= GlobalLock16(HICON_16(hIcon
));
2098 TRACE("%p => %dx%d, %d bpp\n", hIcon
,
2099 ciconinfo
->nWidth
, ciconinfo
->nHeight
, ciconinfo
->bBitsPerPixel
);
2101 if ( (ciconinfo
->ptHotSpot
.x
== ICON_HOTSPOT
) &&
2102 (ciconinfo
->ptHotSpot
.y
== ICON_HOTSPOT
) )
2104 iconinfo
->fIcon
= TRUE
;
2105 iconinfo
->xHotspot
= ciconinfo
->nWidth
/ 2;
2106 iconinfo
->yHotspot
= ciconinfo
->nHeight
/ 2;
2110 iconinfo
->fIcon
= FALSE
;
2111 iconinfo
->xHotspot
= ciconinfo
->ptHotSpot
.x
;
2112 iconinfo
->yHotspot
= ciconinfo
->ptHotSpot
.y
;
2115 height
= ciconinfo
->nHeight
;
2117 if (ciconinfo
->bBitsPerPixel
> 1)
2119 iconinfo
->hbmColor
= CreateBitmap( ciconinfo
->nWidth
, ciconinfo
->nHeight
,
2120 ciconinfo
->bPlanes
, ciconinfo
->bBitsPerPixel
,
2121 (char *)(ciconinfo
+ 1)
2122 + ciconinfo
->nHeight
*
2123 get_bitmap_width_bytes (ciconinfo
->nWidth
,1) );
2127 iconinfo
->hbmColor
= 0;
2131 iconinfo
->hbmMask
= CreateBitmap ( ciconinfo
->nWidth
, height
,
2132 1, 1, ciconinfo
+ 1);
2134 GlobalUnlock16(HICON_16(hIcon
));
2139 /**********************************************************************
2140 * CreateIconIndirect (USER32.@)
2142 HICON WINAPI
CreateIconIndirect(PICONINFO iconinfo
)
2147 int xor_objsize
= 0, sizeXor
= 0, sizeAnd
, planes
, bpp
;
2149 TRACE("color %p, mask %p, hotspot %ux%u, fIcon %d\n",
2150 iconinfo
->hbmColor
, iconinfo
->hbmMask
,
2151 iconinfo
->xHotspot
, iconinfo
->yHotspot
, iconinfo
->fIcon
);
2153 if (!iconinfo
->hbmMask
) return 0;
2155 planes
= GetDeviceCaps( screen_dc
, PLANES
);
2156 bpp
= GetDeviceCaps( screen_dc
, BITSPIXEL
);
2158 if (iconinfo
->hbmColor
)
2160 xor_objsize
= GetObjectW( iconinfo
->hbmColor
, sizeof(bmpXor
), &bmpXor
);
2161 TRACE("color: width %d, height %d, width bytes %d, planes %u, bpp %u\n",
2162 bmpXor
.dsBm
.bmWidth
, bmpXor
.dsBm
.bmHeight
, bmpXor
.dsBm
.bmWidthBytes
,
2163 bmpXor
.dsBm
.bmPlanes
, bmpXor
.dsBm
.bmBitsPixel
);
2164 /* we can use either depth 1 or screen depth for xor bitmap */
2165 if (bmpXor
.dsBm
.bmPlanes
== 1 && bmpXor
.dsBm
.bmBitsPixel
== 1) planes
= bpp
= 1;
2166 sizeXor
= bmpXor
.dsBm
.bmHeight
* planes
* get_bitmap_width_bytes( bmpXor
.dsBm
.bmWidth
, bpp
);
2168 GetObjectW( iconinfo
->hbmMask
, sizeof(bmpAnd
), &bmpAnd
);
2169 TRACE("mask: width %d, height %d, width bytes %d, planes %u, bpp %u\n",
2170 bmpAnd
.bmWidth
, bmpAnd
.bmHeight
, bmpAnd
.bmWidthBytes
,
2171 bmpAnd
.bmPlanes
, bmpAnd
.bmBitsPixel
);
2173 sizeAnd
= bmpAnd
.bmHeight
* get_bitmap_width_bytes(bmpAnd
.bmWidth
, 1);
2175 hObj
= GlobalAlloc16( GMEM_MOVEABLE
,
2176 sizeof(CURSORICONINFO
) + sizeXor
+ sizeAnd
);
2179 CURSORICONINFO
*info
;
2181 info
= GlobalLock16( hObj
);
2183 /* If we are creating an icon, the hotspot is unused */
2184 if (iconinfo
->fIcon
)
2186 info
->ptHotSpot
.x
= ICON_HOTSPOT
;
2187 info
->ptHotSpot
.y
= ICON_HOTSPOT
;
2191 info
->ptHotSpot
.x
= iconinfo
->xHotspot
;
2192 info
->ptHotSpot
.y
= iconinfo
->yHotspot
;
2195 if (iconinfo
->hbmColor
)
2197 info
->nWidth
= bmpXor
.dsBm
.bmWidth
;
2198 info
->nHeight
= bmpXor
.dsBm
.bmHeight
;
2199 info
->nWidthBytes
= bmpXor
.dsBm
.bmWidthBytes
;
2200 info
->bPlanes
= planes
;
2201 info
->bBitsPerPixel
= bpp
;
2205 info
->nWidth
= bmpAnd
.bmWidth
;
2206 info
->nHeight
= bmpAnd
.bmHeight
/ 2;
2207 info
->nWidthBytes
= get_bitmap_width_bytes(bmpAnd
.bmWidth
, 1);
2209 info
->bBitsPerPixel
= 1;
2212 /* Transfer the bitmap bits to the CURSORICONINFO structure */
2214 /* Some apps pass a color bitmap as a mask, convert it to b/w */
2215 if (bmpAnd
.bmBitsPixel
== 1)
2217 GetBitmapBits( iconinfo
->hbmMask
, sizeAnd
, info
+ 1 );
2222 HBITMAP hbmp_old
, hbmp_mem_old
, hbmp_mono
;
2225 hdc_mem
= CreateCompatibleDC( hdc
);
2227 hbmp_mono
= CreateBitmap( bmpAnd
.bmWidth
, bmpAnd
.bmHeight
, 1, 1, NULL
);
2229 hbmp_old
= SelectObject( hdc
, iconinfo
->hbmMask
);
2230 hbmp_mem_old
= SelectObject( hdc_mem
, hbmp_mono
);
2232 BitBlt( hdc_mem
, 0, 0, bmpAnd
.bmWidth
, bmpAnd
.bmHeight
, hdc
, 0, 0, SRCCOPY
);
2234 SelectObject( hdc
, hbmp_old
);
2235 SelectObject( hdc_mem
, hbmp_mem_old
);
2237 DeleteDC( hdc_mem
);
2238 ReleaseDC( 0, hdc
);
2240 GetBitmapBits( hbmp_mono
, sizeAnd
, info
+ 1 );
2241 DeleteObject( hbmp_mono
);
2244 if (iconinfo
->hbmColor
)
2246 char *dst_bits
= (char*)(info
+ 1) + sizeAnd
;
2248 if (bmpXor
.dsBm
.bmPlanes
== planes
&& bmpXor
.dsBm
.bmBitsPixel
== bpp
)
2249 GetBitmapBits( iconinfo
->hbmColor
, sizeXor
, dst_bits
);
2253 int dib_width
= get_dib_width_bytes( info
->nWidth
, info
->bBitsPerPixel
);
2254 int bitmap_width
= get_bitmap_width_bytes( info
->nWidth
, info
->bBitsPerPixel
);
2256 bminfo
.bmiHeader
.biSize
= sizeof(bminfo
);
2257 bminfo
.bmiHeader
.biWidth
= info
->nWidth
;
2258 bminfo
.bmiHeader
.biHeight
= info
->nHeight
;
2259 bminfo
.bmiHeader
.biPlanes
= info
->bPlanes
;
2260 bminfo
.bmiHeader
.biBitCount
= info
->bBitsPerPixel
;
2261 bminfo
.bmiHeader
.biCompression
= BI_RGB
;
2262 bminfo
.bmiHeader
.biSizeImage
= info
->nHeight
* dib_width
;
2263 bminfo
.bmiHeader
.biXPelsPerMeter
= 0;
2264 bminfo
.bmiHeader
.biYPelsPerMeter
= 0;
2265 bminfo
.bmiHeader
.biClrUsed
= 0;
2266 bminfo
.bmiHeader
.biClrImportant
= 0;
2268 /* swap lines for dib sections */
2269 if (xor_objsize
== sizeof(DIBSECTION
))
2270 bminfo
.bmiHeader
.biHeight
= -bminfo
.bmiHeader
.biHeight
;
2272 if (dib_width
!= bitmap_width
) /* need to fixup alignment */
2274 char *src_bits
= HeapAlloc( GetProcessHeap(), 0, bminfo
.bmiHeader
.biSizeImage
);
2276 if (src_bits
&& GetDIBits( screen_dc
, iconinfo
->hbmColor
, 0, info
->nHeight
,
2277 src_bits
, &bminfo
, DIB_RGB_COLORS
))
2280 for (y
= 0; y
< info
->nHeight
; y
++)
2281 memcpy( dst_bits
+ y
* bitmap_width
, src_bits
+ y
* dib_width
, bitmap_width
);
2283 HeapFree( GetProcessHeap(), 0, src_bits
);
2286 GetDIBits( screen_dc
, iconinfo
->hbmColor
, 0, info
->nHeight
,
2287 dst_bits
, &bminfo
, DIB_RGB_COLORS
);
2290 GlobalUnlock16( hObj
);
2292 return HICON_32(hObj
);
2295 /******************************************************************************
2296 * DrawIconEx (USER32.@) Draws an icon or cursor on device context
2299 * Why is this using SM_CXICON instead of SM_CXCURSOR?
2302 * hdc [I] Handle to device context
2303 * x0 [I] X coordinate of upper left corner
2304 * y0 [I] Y coordinate of upper left corner
2305 * hIcon [I] Handle to icon to draw
2306 * cxWidth [I] Width of icon
2307 * cyWidth [I] Height of icon
2308 * istep [I] Index of frame in animated cursor
2309 * hbr [I] Handle to background brush
2310 * flags [I] Icon-drawing flags
2316 BOOL WINAPI
DrawIconEx( HDC hdc
, INT x0
, INT y0
, HICON hIcon
,
2317 INT cxWidth
, INT cyWidth
, UINT istep
,
2318 HBRUSH hbr
, UINT flags
)
2320 CURSORICONINFO
*ptr
;
2321 HDC hDC_off
= 0, hMemDC
;
2322 BOOL result
= FALSE
, DoOffscreen
;
2323 HBITMAP hB_off
= 0, hOld
= 0;
2324 unsigned char *xorBitmapBits
;
2325 unsigned int xorLength
;
2326 BOOL has_alpha
= FALSE
;
2328 TRACE_(icon
)("(hdc=%p,pos=%d.%d,hicon=%p,extend=%d.%d,istep=%d,br=%p,flags=0x%08x)\n",
2329 hdc
,x0
,y0
,hIcon
,cxWidth
,cyWidth
,istep
,hbr
,flags
);
2331 if (!(ptr
= GlobalLock16(HICON_16(hIcon
)))) return FALSE
;
2332 if (!(hMemDC
= CreateCompatibleDC( hdc
))) return FALSE
;
2335 FIXME_(icon
)("Ignoring istep=%d\n", istep
);
2336 if (flags
& DI_NOMIRROR
)
2337 FIXME_(icon
)("Ignoring flag DI_NOMIRROR\n");
2339 xorLength
= ptr
->nHeight
* get_bitmap_width_bytes(
2340 ptr
->nWidth
, ptr
->bBitsPerPixel
);
2341 xorBitmapBits
= (unsigned char *)(ptr
+ 1) + ptr
->nHeight
*
2342 get_bitmap_width_bytes(ptr
->nWidth
, 1);
2344 if (flags
& DI_IMAGE
)
2345 has_alpha
= bitmap_has_alpha_channel(
2346 ptr
->bBitsPerPixel
, xorBitmapBits
, xorLength
);
2348 /* Calculate the size of the destination image. */
2351 if (flags
& DI_DEFAULTSIZE
)
2352 cxWidth
= GetSystemMetrics (SM_CXICON
);
2354 cxWidth
= ptr
->nWidth
;
2358 if (flags
& DI_DEFAULTSIZE
)
2359 cyWidth
= GetSystemMetrics (SM_CYICON
);
2361 cyWidth
= ptr
->nHeight
;
2364 DoOffscreen
= (GetObjectType( hbr
) == OBJ_BRUSH
);
2374 hDC_off
= CreateCompatibleDC(hdc
);
2375 hB_off
= CreateCompatibleBitmap(hdc
, cxWidth
, cyWidth
);
2376 if (hDC_off
&& hB_off
) {
2377 hOld
= SelectObject(hDC_off
, hB_off
);
2378 FillRect(hDC_off
, &r
, hbr
);
2382 if (hMemDC
&& (!DoOffscreen
|| (hDC_off
&& hB_off
)))
2385 HBITMAP hXorBits
= NULL
, hAndBits
= NULL
;
2386 COLORREF oldFg
, oldBg
;
2389 nStretchMode
= SetStretchBltMode (hdc
, STRETCH_DELETESCANS
);
2391 oldFg
= SetTextColor( hdc
, RGB(0,0,0) );
2392 oldBg
= SetBkColor( hdc
, RGB(255,255,255) );
2394 if (((flags
& DI_MASK
) && !(flags
& DI_IMAGE
)) ||
2395 ((flags
& DI_MASK
) && !has_alpha
))
2397 hAndBits
= CreateBitmap ( ptr
->nWidth
, ptr
->nHeight
, 1, 1, ptr
+ 1 );
2400 hBitTemp
= SelectObject( hMemDC
, hAndBits
);
2402 StretchBlt (hDC_off
, 0, 0, cxWidth
, cyWidth
,
2403 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCAND
);
2405 StretchBlt (hdc
, x0
, y0
, cxWidth
, cyWidth
,
2406 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCAND
);
2407 SelectObject( hMemDC
, hBitTemp
);
2411 if (flags
& DI_IMAGE
)
2413 BITMAPINFOHEADER bmih
;
2414 unsigned char *dibBits
;
2416 memset(&bmih
, 0, sizeof(BITMAPINFOHEADER
));
2417 bmih
.biSize
= sizeof(BITMAPINFOHEADER
);
2418 bmih
.biWidth
= ptr
->nWidth
;
2419 bmih
.biHeight
= -ptr
->nHeight
;
2420 bmih
.biPlanes
= ptr
->bPlanes
;
2421 bmih
.biBitCount
= ptr
->bBitsPerPixel
;
2422 bmih
.biCompression
= BI_RGB
;
2424 hXorBits
= CreateDIBSection(hdc
, (BITMAPINFO
*)&bmih
, DIB_RGB_COLORS
,
2425 (void*)&dibBits
, NULL
, 0);
2427 if (hXorBits
&& dibBits
)
2431 BLENDFUNCTION pixelblend
= { AC_SRC_OVER
, 0, 255, AC_SRC_ALPHA
};
2433 /* Do the alpha blending render */
2434 premultiply_alpha_channel(dibBits
, xorBitmapBits
, xorLength
);
2435 hBitTemp
= SelectObject( hMemDC
, hXorBits
);
2438 GdiAlphaBlend(hDC_off
, 0, 0, cxWidth
, cyWidth
, hMemDC
,
2439 0, 0, ptr
->nWidth
, ptr
->nHeight
, pixelblend
);
2441 GdiAlphaBlend(hdc
, x0
, y0
, cxWidth
, cyWidth
, hMemDC
,
2442 0, 0, ptr
->nWidth
, ptr
->nHeight
, pixelblend
);
2444 SelectObject( hMemDC
, hBitTemp
);
2448 memcpy(dibBits
, xorBitmapBits
, xorLength
);
2449 hBitTemp
= SelectObject( hMemDC
, hXorBits
);
2451 StretchBlt (hDC_off
, 0, 0, cxWidth
, cyWidth
,
2452 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCPAINT
);
2454 StretchBlt (hdc
, x0
, y0
, cxWidth
, cyWidth
,
2455 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCPAINT
);
2456 SelectObject( hMemDC
, hBitTemp
);
2459 DeleteObject( hXorBits
);
2465 SetTextColor( hdc
, oldFg
);
2466 SetBkColor( hdc
, oldBg
);
2468 if (hAndBits
) DeleteObject( hAndBits
);
2469 SetStretchBltMode (hdc
, nStretchMode
);
2471 BitBlt(hdc
, x0
, y0
, cxWidth
, cyWidth
, hDC_off
, 0, 0, SRCCOPY
);
2472 SelectObject(hDC_off
, hOld
);
2475 if (hMemDC
) DeleteDC( hMemDC
);
2476 if (hDC_off
) DeleteDC(hDC_off
);
2477 if (hB_off
) DeleteObject(hB_off
);
2478 GlobalUnlock16(HICON_16(hIcon
));
2482 /***********************************************************************
2483 * DIB_FixColorsToLoadflags
2485 * Change color table entries when LR_LOADTRANSPARENT or LR_LOADMAP3DCOLORS
2488 static void DIB_FixColorsToLoadflags(BITMAPINFO
* bmi
, UINT loadflags
, BYTE pix
)
2491 COLORREF c_W
, c_S
, c_F
, c_L
, c_C
;
2500 if (((bitmap_type
= DIB_GetBitmapInfo((BITMAPINFOHEADER
*) bmi
, &width
, &height
, &bpp
, &compr
)) == -1))
2502 WARN_(resource
)("Invalid bitmap\n");
2506 if (bpp
> 8) return;
2508 if (bitmap_type
== 0) /* BITMAPCOREHEADER */
2516 colors
= bmi
->bmiHeader
.biClrUsed
;
2517 if (colors
> 256) colors
= 256;
2518 if (!colors
&& (bpp
<= 8)) colors
= 1 << bpp
;
2521 c_W
= GetSysColor(COLOR_WINDOW
);
2522 c_S
= GetSysColor(COLOR_3DSHADOW
);
2523 c_F
= GetSysColor(COLOR_3DFACE
);
2524 c_L
= GetSysColor(COLOR_3DLIGHT
);
2526 if (loadflags
& LR_LOADTRANSPARENT
) {
2528 case 1: pix
= pix
>> 7; break;
2529 case 4: pix
= pix
>> 4; break;
2532 WARN_(resource
)("(%d): Unsupported depth\n", bpp
);
2535 if (pix
>= colors
) {
2536 WARN_(resource
)("pixel has color index greater than biClrUsed!\n");
2539 if (loadflags
& LR_LOADMAP3DCOLORS
) c_W
= c_F
;
2540 ptr
= (RGBQUAD
*)((char*)bmi
->bmiColors
+pix
*incr
);
2541 ptr
->rgbBlue
= GetBValue(c_W
);
2542 ptr
->rgbGreen
= GetGValue(c_W
);
2543 ptr
->rgbRed
= GetRValue(c_W
);
2545 if (loadflags
& LR_LOADMAP3DCOLORS
)
2546 for (i
=0; i
<colors
; i
++) {
2547 ptr
= (RGBQUAD
*)((char*)bmi
->bmiColors
+i
*incr
);
2548 c_C
= RGB(ptr
->rgbRed
, ptr
->rgbGreen
, ptr
->rgbBlue
);
2549 if (c_C
== RGB(128, 128, 128)) {
2550 ptr
->rgbRed
= GetRValue(c_S
);
2551 ptr
->rgbGreen
= GetGValue(c_S
);
2552 ptr
->rgbBlue
= GetBValue(c_S
);
2553 } else if (c_C
== RGB(192, 192, 192)) {
2554 ptr
->rgbRed
= GetRValue(c_F
);
2555 ptr
->rgbGreen
= GetGValue(c_F
);
2556 ptr
->rgbBlue
= GetBValue(c_F
);
2557 } else if (c_C
== RGB(223, 223, 223)) {
2558 ptr
->rgbRed
= GetRValue(c_L
);
2559 ptr
->rgbGreen
= GetGValue(c_L
);
2560 ptr
->rgbBlue
= GetBValue(c_L
);
2566 /**********************************************************************
2569 static HBITMAP
BITMAP_Load( HINSTANCE instance
, LPCWSTR name
,
2570 INT desiredx
, INT desiredy
, UINT loadflags
)
2572 HBITMAP hbitmap
= 0, orig_bm
;
2576 BITMAPINFO
*info
, *fix_info
= NULL
, *scaled_info
= NULL
;
2580 LONG width
, height
, new_width
, new_height
;
2584 HDC screen_mem_dc
= NULL
;
2586 if (!(loadflags
& LR_LOADFROMFILE
))
2590 /* OEM bitmap: try to load the resource from user32.dll */
2591 instance
= user32_module
;
2594 if (!(hRsrc
= FindResourceW( instance
, name
, (LPWSTR
)RT_BITMAP
))) return 0;
2595 if (!(handle
= LoadResource( instance
, hRsrc
))) return 0;
2597 if ((info
= LockResource( handle
)) == NULL
) return 0;
2601 BITMAPFILEHEADER
* bmfh
;
2603 if (!(ptr
= map_fileW( name
, NULL
))) return 0;
2604 info
= (BITMAPINFO
*)(ptr
+ sizeof(BITMAPFILEHEADER
));
2605 bmfh
= (BITMAPFILEHEADER
*)ptr
;
2606 if (!( bmfh
->bfType
== 0x4d42 /* 'BM' */ &&
2607 bmfh
->bfReserved1
== 0 &&
2608 bmfh
->bfReserved2
== 0))
2610 WARN("Invalid/unsupported bitmap format!\n");
2611 UnmapViewOfFile( ptr
);
2616 size
= bitmap_info_size(info
, DIB_RGB_COLORS
);
2617 fix_info
= HeapAlloc(GetProcessHeap(), 0, size
);
2618 scaled_info
= HeapAlloc(GetProcessHeap(), 0, size
);
2620 if (!fix_info
|| !scaled_info
) goto end
;
2621 memcpy(fix_info
, info
, size
);
2623 pix
= *((LPBYTE
)info
+ size
);
2624 DIB_FixColorsToLoadflags(fix_info
, loadflags
, pix
);
2626 memcpy(scaled_info
, fix_info
, size
);
2627 bm_type
= DIB_GetBitmapInfo( &fix_info
->bmiHeader
, &width
, &height
,
2628 &bpp_dummy
, &compr_dummy
);
2630 new_width
= desiredx
;
2635 new_height
= height
> 0 ? desiredy
: -desiredy
;
2637 new_height
= height
;
2641 BITMAPCOREHEADER
*core
= (BITMAPCOREHEADER
*)&scaled_info
->bmiHeader
;
2642 core
->bcWidth
= new_width
;
2643 core
->bcHeight
= new_height
;
2647 scaled_info
->bmiHeader
.biWidth
= new_width
;
2648 scaled_info
->bmiHeader
.biHeight
= new_height
;
2651 if (new_height
< 0) new_height
= -new_height
;
2653 if (!screen_dc
) screen_dc
= CreateDCW( DISPLAYW
, NULL
, NULL
, NULL
);
2654 if (!(screen_mem_dc
= CreateCompatibleDC( screen_dc
))) goto end
;
2656 bits
= (char *)info
+ size
;
2658 if (loadflags
& LR_CREATEDIBSECTION
)
2660 scaled_info
->bmiHeader
.biCompression
= 0; /* DIBSection can't be compressed */
2661 hbitmap
= CreateDIBSection(screen_dc
, scaled_info
, DIB_RGB_COLORS
, NULL
, 0, 0);
2665 if (is_dib_monochrome(fix_info
))
2666 hbitmap
= CreateBitmap(new_width
, new_height
, 1, 1, NULL
);
2668 hbitmap
= CreateCompatibleBitmap(screen_dc
, new_width
, new_height
);
2671 orig_bm
= SelectObject(screen_mem_dc
, hbitmap
);
2672 StretchDIBits(screen_mem_dc
, 0, 0, new_width
, new_height
, 0, 0, width
, height
, bits
, fix_info
, DIB_RGB_COLORS
, SRCCOPY
);
2673 SelectObject(screen_mem_dc
, orig_bm
);
2676 if (screen_mem_dc
) DeleteDC(screen_mem_dc
);
2677 HeapFree(GetProcessHeap(), 0, scaled_info
);
2678 HeapFree(GetProcessHeap(), 0, fix_info
);
2679 if (loadflags
& LR_LOADFROMFILE
) UnmapViewOfFile( ptr
);
2684 /**********************************************************************
2685 * LoadImageA (USER32.@)
2689 HANDLE WINAPI
LoadImageA( HINSTANCE hinst
, LPCSTR name
, UINT type
,
2690 INT desiredx
, INT desiredy
, UINT loadflags
)
2696 return LoadImageW(hinst
, (LPCWSTR
)name
, type
, desiredx
, desiredy
, loadflags
);
2699 DWORD len
= MultiByteToWideChar( CP_ACP
, 0, name
, -1, NULL
, 0 );
2700 u_name
= HeapAlloc( GetProcessHeap(), 0, len
* sizeof(WCHAR
) );
2701 MultiByteToWideChar( CP_ACP
, 0, name
, -1, u_name
, len
);
2703 __EXCEPT_PAGE_FAULT
{
2704 SetLastError( ERROR_INVALID_PARAMETER
);
2708 res
= LoadImageW(hinst
, u_name
, type
, desiredx
, desiredy
, loadflags
);
2709 HeapFree(GetProcessHeap(), 0, u_name
);
2714 /******************************************************************************
2715 * LoadImageW (USER32.@) Loads an icon, cursor, or bitmap
2718 * hinst [I] Handle of instance that contains image
2719 * name [I] Name of image
2720 * type [I] Type of image
2721 * desiredx [I] Desired width
2722 * desiredy [I] Desired height
2723 * loadflags [I] Load flags
2726 * Success: Handle to newly loaded image
2729 * FIXME: Implementation lacks some features, see LR_ defines in winuser.h
2731 HANDLE WINAPI
LoadImageW( HINSTANCE hinst
, LPCWSTR name
, UINT type
,
2732 INT desiredx
, INT desiredy
, UINT loadflags
)
2734 TRACE_(resource
)("(%p,%s,%d,%d,%d,0x%08x)\n",
2735 hinst
,debugstr_w(name
),type
,desiredx
,desiredy
,loadflags
);
2737 if (loadflags
& LR_DEFAULTSIZE
) {
2738 if (type
== IMAGE_ICON
) {
2739 if (!desiredx
) desiredx
= GetSystemMetrics(SM_CXICON
);
2740 if (!desiredy
) desiredy
= GetSystemMetrics(SM_CYICON
);
2741 } else if (type
== IMAGE_CURSOR
) {
2742 if (!desiredx
) desiredx
= GetSystemMetrics(SM_CXCURSOR
);
2743 if (!desiredy
) desiredy
= GetSystemMetrics(SM_CYCURSOR
);
2746 if (loadflags
& LR_LOADFROMFILE
) loadflags
&= ~LR_SHARED
;
2749 return BITMAP_Load( hinst
, name
, desiredx
, desiredy
, loadflags
);
2752 if (!screen_dc
) screen_dc
= CreateDCW( DISPLAYW
, NULL
, NULL
, NULL
);
2755 UINT palEnts
= GetSystemPaletteEntries(screen_dc
, 0, 0, NULL
);
2756 if (palEnts
== 0) palEnts
= 256;
2757 return CURSORICON_Load(hinst
, name
, desiredx
, desiredy
,
2758 palEnts
, FALSE
, loadflags
);
2763 return CURSORICON_Load(hinst
, name
, desiredx
, desiredy
,
2764 1, TRUE
, loadflags
);
2769 /******************************************************************************
2770 * CopyImage (USER32.@) Creates new image and copies attributes to it
2773 * hnd [I] Handle to image to copy
2774 * type [I] Type of image to copy
2775 * desiredx [I] Desired width of new image
2776 * desiredy [I] Desired height of new image
2777 * flags [I] Copy flags
2780 * Success: Handle to newly created image
2784 * Only Windows NT 4.0 supports the LR_COPYRETURNORG flag for bitmaps,
2785 * all other versions (95/2000/XP have been tested) ignore it.
2788 * If LR_CREATEDIBSECTION is absent, the copy will be monochrome for
2789 * a monochrome source bitmap or if LR_MONOCHROME is present, otherwise
2790 * the copy will have the same depth as the screen.
2791 * The content of the image will only be copied if the bit depth of the
2792 * original image is compatible with the bit depth of the screen, or
2793 * if the source is a DIB section.
2794 * The LR_MONOCHROME flag is ignored if LR_CREATEDIBSECTION is present.
2796 HANDLE WINAPI
CopyImage( HANDLE hnd
, UINT type
, INT desiredx
,
2797 INT desiredy
, UINT flags
)
2799 TRACE("hnd=%p, type=%u, desiredx=%d, desiredy=%d, flags=%x\n",
2800 hnd
, type
, desiredx
, desiredy
, flags
);
2811 objSize
= GetObjectW( hnd
, sizeof(ds
), &ds
);
2812 if (!objSize
) return 0;
2813 if ((desiredx
< 0) || (desiredy
< 0)) return 0;
2815 if (flags
& LR_COPYFROMRESOURCE
)
2817 FIXME("The flag LR_COPYFROMRESOURCE is not implemented for bitmaps\n");
2820 if (desiredx
== 0) desiredx
= ds
.dsBm
.bmWidth
;
2821 if (desiredy
== 0) desiredy
= ds
.dsBm
.bmHeight
;
2823 /* Allocate memory for a BITMAPINFOHEADER structure and a
2824 color table. The maximum number of colors in a color table
2825 is 256 which corresponds to a bitmap with depth 8.
2826 Bitmaps with higher depths don't have color tables. */
2827 bi
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(BITMAPINFOHEADER
) + 256 * sizeof(RGBQUAD
));
2830 bi
->bmiHeader
.biSize
= sizeof(bi
->bmiHeader
);
2831 bi
->bmiHeader
.biPlanes
= ds
.dsBm
.bmPlanes
;
2832 bi
->bmiHeader
.biBitCount
= ds
.dsBm
.bmBitsPixel
;
2833 bi
->bmiHeader
.biCompression
= BI_RGB
;
2835 if (flags
& LR_CREATEDIBSECTION
)
2837 /* Create a DIB section. LR_MONOCHROME is ignored */
2839 HDC dc
= CreateCompatibleDC(NULL
);
2841 if (objSize
== sizeof(DIBSECTION
))
2843 /* The source bitmap is a DIB.
2844 Get its attributes to create an exact copy */
2845 memcpy(bi
, &ds
.dsBmih
, sizeof(BITMAPINFOHEADER
));
2848 /* Get the color table or the color masks */
2849 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, NULL
, bi
, DIB_RGB_COLORS
);
2851 bi
->bmiHeader
.biWidth
= desiredx
;
2852 bi
->bmiHeader
.biHeight
= desiredy
;
2853 bi
->bmiHeader
.biSizeImage
= 0;
2855 res
= CreateDIBSection(dc
, bi
, DIB_RGB_COLORS
, &bits
, NULL
, 0);
2860 /* Create a device-dependent bitmap */
2862 BOOL monochrome
= (flags
& LR_MONOCHROME
);
2864 if (objSize
== sizeof(DIBSECTION
))
2866 /* The source bitmap is a DIB section.
2867 Get its attributes */
2868 HDC dc
= CreateCompatibleDC(NULL
);
2869 bi
->bmiHeader
.biSize
= sizeof(bi
->bmiHeader
);
2870 bi
->bmiHeader
.biBitCount
= ds
.dsBm
.bmBitsPixel
;
2871 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, NULL
, bi
, DIB_RGB_COLORS
);
2874 if (!monochrome
&& ds
.dsBm
.bmBitsPixel
== 1)
2876 /* Look if the colors of the DIB are black and white */
2879 (bi
->bmiColors
[0].rgbRed
== 0xff
2880 && bi
->bmiColors
[0].rgbGreen
== 0xff
2881 && bi
->bmiColors
[0].rgbBlue
== 0xff
2882 && bi
->bmiColors
[0].rgbReserved
== 0
2883 && bi
->bmiColors
[1].rgbRed
== 0
2884 && bi
->bmiColors
[1].rgbGreen
== 0
2885 && bi
->bmiColors
[1].rgbBlue
== 0
2886 && bi
->bmiColors
[1].rgbReserved
== 0)
2888 (bi
->bmiColors
[0].rgbRed
== 0
2889 && bi
->bmiColors
[0].rgbGreen
== 0
2890 && bi
->bmiColors
[0].rgbBlue
== 0
2891 && bi
->bmiColors
[0].rgbReserved
== 0
2892 && bi
->bmiColors
[1].rgbRed
== 0xff
2893 && bi
->bmiColors
[1].rgbGreen
== 0xff
2894 && bi
->bmiColors
[1].rgbBlue
== 0xff
2895 && bi
->bmiColors
[1].rgbReserved
== 0);
2898 else if (!monochrome
)
2900 monochrome
= ds
.dsBm
.bmBitsPixel
== 1;
2905 res
= CreateBitmap(desiredx
, desiredy
, 1, 1, NULL
);
2909 HDC screenDC
= GetDC(NULL
);
2910 res
= CreateCompatibleBitmap(screenDC
, desiredx
, desiredy
);
2911 ReleaseDC(NULL
, screenDC
);
2917 /* Only copy the bitmap if it's a DIB section or if it's
2918 compatible to the screen */
2921 if (objSize
== sizeof(DIBSECTION
))
2923 copyContents
= TRUE
;
2927 HDC screenDC
= GetDC(NULL
);
2928 int screen_depth
= GetDeviceCaps(screenDC
, BITSPIXEL
);
2929 ReleaseDC(NULL
, screenDC
);
2931 copyContents
= (ds
.dsBm
.bmBitsPixel
== 1 || ds
.dsBm
.bmBitsPixel
== screen_depth
);
2936 /* The source bitmap may already be selected in a device context,
2937 use GetDIBits/StretchDIBits and not StretchBlt */
2942 dc
= CreateCompatibleDC(NULL
);
2944 bi
->bmiHeader
.biWidth
= ds
.dsBm
.bmWidth
;
2945 bi
->bmiHeader
.biHeight
= ds
.dsBm
.bmHeight
;
2946 bi
->bmiHeader
.biSizeImage
= 0;
2947 bi
->bmiHeader
.biClrUsed
= 0;
2948 bi
->bmiHeader
.biClrImportant
= 0;
2950 /* Fill in biSizeImage */
2951 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, NULL
, bi
, DIB_RGB_COLORS
);
2952 bits
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, bi
->bmiHeader
.biSizeImage
);
2958 /* Get the image bits of the source bitmap */
2959 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, bits
, bi
, DIB_RGB_COLORS
);
2961 /* Copy it to the destination bitmap */
2962 oldBmp
= SelectObject(dc
, res
);
2963 StretchDIBits(dc
, 0, 0, desiredx
, desiredy
,
2964 0, 0, ds
.dsBm
.bmWidth
, ds
.dsBm
.bmHeight
,
2965 bits
, bi
, DIB_RGB_COLORS
, SRCCOPY
);
2966 SelectObject(dc
, oldBmp
);
2968 HeapFree(GetProcessHeap(), 0, bits
);
2974 if (flags
& LR_COPYDELETEORG
)
2979 HeapFree(GetProcessHeap(), 0, bi
);
2983 return CURSORICON_ExtCopy(hnd
,type
, desiredx
, desiredy
, flags
);
2985 /* Should call CURSORICON_ExtCopy but more testing
2986 * needs to be done before we change this
2988 if (flags
) FIXME("Flags are ignored\n");
2989 return CopyCursor(hnd
);
2995 /******************************************************************************
2996 * LoadBitmapW (USER32.@) Loads bitmap from the executable file
2999 * Success: Handle to specified bitmap
3002 HBITMAP WINAPI
LoadBitmapW(
3003 HINSTANCE instance
, /* [in] Handle to application instance */
3004 LPCWSTR name
) /* [in] Address of bitmap resource name */
3006 return LoadImageW( instance
, name
, IMAGE_BITMAP
, 0, 0, 0 );
3009 /**********************************************************************
3010 * LoadBitmapA (USER32.@)
3014 HBITMAP WINAPI
LoadBitmapA( HINSTANCE instance
, LPCSTR name
)
3016 return LoadImageA( instance
, name
, IMAGE_BITMAP
, 0, 0, 0 );