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 * 32-bit cursors and icons are stored in the server.
30 * 16-bit cursors and icons are stored in a global heap block, with the
33 * CURSORICONINFO info;
37 * The bits structures are in the format of a device-dependent bitmap.
39 * This layout is very sub-optimal, as the bitmap bits are stored in
40 * the X client instead of in the server like other bitmaps; however,
41 * some programs (notably Paint Brush) expect to be able to manipulate
42 * the bits directly :-(
46 #include "wine/port.h"
53 #define WIN32_NO_STATUS
59 #include "wine/winbase16.h"
60 #include "wine/winuser16.h"
61 #include "wine/exception.h"
62 #include "wine/debug.h"
63 #include "wine/list.h"
64 #include "wine/server.h"
65 #include "user_private.h"
67 WINE_DEFAULT_DEBUG_CHANNEL(cursor
);
68 WINE_DECLARE_DEBUG_CHANNEL(icon
);
69 WINE_DECLARE_DEBUG_CHANNEL(resource
);
82 } CURSORICONFILEDIRENTRY
;
89 CURSORICONFILEDIRENTRY idEntries
[1];
94 #define CID_RESOURCE 0x0001
95 #define CID_WIN32 0x0004
96 #define CID_NONSHARED 0x0008
98 static RECT CURSOR_ClipRect
; /* Cursor clipping rect */
100 static HDC screen_dc
;
102 static const WCHAR DISPLAYW
[] = {'D','I','S','P','L','A','Y',0};
104 /**********************************************************************
105 * ICONCACHE for cursors/icons loaded with LR_SHARED.
107 * FIXME: This should not be allocated on the system heap, but on a
108 * subsystem-global heap (i.e. one for all Win16 processes,
109 * and one for each Win32 process).
111 typedef struct tagICONCACHE
113 struct tagICONCACHE
*next
;
124 static ICONCACHE
*IconAnchor
= NULL
;
126 static CRITICAL_SECTION IconCrst
;
127 static CRITICAL_SECTION_DEBUG critsect_debug
=
130 { &critsect_debug
.ProcessLocksList
, &critsect_debug
.ProcessLocksList
},
131 0, 0, { (DWORD_PTR
)(__FILE__
": IconCrst") }
133 static CRITICAL_SECTION IconCrst
= { &critsect_debug
, -1, 0, 0, 0, 0 };
135 static const WORD ICON_HOTSPOT
= 0x4242;
137 /* What is a good table size? */
138 #define CURSOR_HASH_SIZE 97
145 } cursor_map_entry_t
;
147 static int get_bitmap_width_bytes( int width
, int bpp
);
149 static struct list cursor16to32
[CURSOR_HASH_SIZE
];
150 static struct list cursor32to16
[CURSOR_HASH_SIZE
];
152 static inline int hash_cursor_handle( DWORD handle
)
154 return handle
% CURSOR_HASH_SIZE
;
157 static void add_cursor16to32_entry( cursor_map_entry_t
*entry
)
159 int idx
= hash_cursor_handle( entry
->cursor16
);
161 if (!cursor16to32
[idx
].next
) list_init( &cursor16to32
[idx
] );
163 list_add_head( &cursor16to32
[idx
], &entry
->entry16
);
166 static void add_cursor32to16_entry( cursor_map_entry_t
*entry
)
168 int idx
= hash_cursor_handle( (DWORD
)entry
->cursor32
);
170 if (!cursor32to16
[idx
].next
) list_init( &cursor32to16
[idx
] );
172 list_add_head( &cursor32to16
[idx
], &entry
->entry32
);
175 static cursor_map_entry_t
*remove_cursor16to32_entry( HCURSOR16 cursor16
)
177 cursor_map_entry_t
*entry
= NULL
;
178 int idx
= hash_cursor_handle( cursor16
);
180 if (cursor16to32
[idx
].next
)
182 LIST_FOR_EACH_ENTRY( entry
, &cursor16to32
[idx
], cursor_map_entry_t
, entry16
)
183 if (entry
->cursor16
== cursor16
)
185 list_remove( &entry
->entry16
);
193 static cursor_map_entry_t
*remove_cursor32to16_entry( HCURSOR cursor32
)
195 cursor_map_entry_t
*entry
= NULL
;
196 int idx
= hash_cursor_handle( (DWORD
)cursor32
);
198 if (cursor32to16
[idx
].next
)
200 LIST_FOR_EACH_ENTRY( entry
, &cursor32to16
[idx
], cursor_map_entry_t
, entry32
)
201 if (entry
->cursor32
== cursor32
)
203 list_remove( &entry
->entry32
);
211 /* Ask the server for a cursor */
212 static HCURSOR
create_cursor( unsigned int num_frames
, unsigned int delay
)
216 SERVER_START_REQ(create_cursor
)
218 req
->num_frames
= num_frames
;
220 if (!wine_server_call_err( req
)) cursor
= reply
->handle
;
227 /* Tell the server to kill a cursor */
228 static HCURSOR16
destroy_cursor( HCURSOR cursor
)
230 cursor_map_entry_t
*entry
;
231 HCURSOR16 cursor16
= 0;
233 if (!cursor
) return 0;
235 SERVER_START_REQ(destroy_cursor
)
237 req
->handle
= cursor
;
238 wine_server_call( req
);
242 entry
= remove_cursor32to16_entry( cursor
);
245 cursor16
= entry
->cursor16
;
246 remove_cursor16to32_entry( cursor16
);
247 HeapFree( GetProcessHeap(), 0, entry
);
250 return GlobalFree16( cursor16
);
253 /* Upload a cursor frame to the server */
254 static void set_cursor_frame( HCURSOR cursor
, unsigned int frame_idx
, cursor_frame_t
*frame
)
256 SERVER_START_REQ(set_cursor_frame
)
258 req
->handle
= cursor
;
259 req
->frame_idx
= frame_idx
;
260 req
->xhot
= frame
->xhot
;
261 req
->yhot
= frame
->yhot
;
262 req
->width
= frame
->width
;
263 req
->height
= frame
->height
;
264 req
->and_width_bytes
= frame
->and_width_bytes
;
265 req
->xor_width_bytes
= frame
->xor_width_bytes
;
266 req
->planes
= frame
->planes
;
267 req
->bpp
= frame
->bpp
;
268 wine_server_add_data( req
, frame
->bits
, (frame
->and_width_bytes
+ frame
->xor_width_bytes
) * frame
->height
);
269 wine_server_call( req
);
274 /* Download a cursor frame from the server */
275 static BOOL
get_cursor_frame( HCURSOR cursor
, unsigned int frame_idx
, cursor_frame_t
*frame
)
278 /* Enough for a 32-bits 32x32 cursor / icon. */
279 unsigned int buffer_size
= 4224;
280 unsigned int count
= 0;
284 frame
->bits
= HeapAlloc(GetProcessHeap(), 0, buffer_size
);
285 SERVER_START_REQ(get_cursor_frame
)
287 req
->handle
= cursor
;
288 req
->frame_idx
= frame_idx
;
289 wine_server_set_reply( req
, frame
->bits
, buffer_size
);
290 if (!(res
= wine_server_call_err( req
)))
292 frame
->xhot
= reply
->xhot
;
293 frame
->yhot
= reply
->yhot
;
294 frame
->width
= reply
->width
;
295 frame
->height
= reply
->height
;
296 frame
->and_width_bytes
= reply
->and_width_bytes
;
297 frame
->xor_width_bytes
= reply
->xor_width_bytes
;
298 frame
->planes
= reply
->planes
;
299 frame
->bpp
= reply
->bpp
;
301 HeapFree( GetProcessHeap(), 0, frame
->bits
);
302 buffer_size
= (reply
->and_width_bytes
+ reply
->xor_width_bytes
) * reply
->height
;
306 } while (res
== STATUS_BUFFER_OVERFLOW
&& !count
++);
310 HeapFree( GetProcessHeap(), 0, frame
->bits
);
318 /* Retrieve a cursor and all its frames from the server */
319 static cursor_t
*get_cursor_object( HCURSOR handle
)
322 cursor_t
*cursor
= HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(cursor_t
) );
324 SERVER_START_REQ(get_cursor_info
)
326 req
->handle
= handle
;
327 if (!wine_server_call_err( req
))
329 cursor
->num_frames
= reply
->num_frames
;
330 cursor
->delay
= reply
->delay
;
335 if (!cursor
->num_frames
)
337 HeapFree( GetProcessHeap(), 0, cursor
);
341 cursor
->frames
= HeapAlloc( GetProcessHeap(), 0, cursor
->num_frames
* sizeof(cursor_frame_t
) );
342 for (i
= 0; i
< cursor
->num_frames
; ++i
)
344 if (!get_cursor_frame( handle
, i
, &cursor
->frames
[i
] ))
348 for (j
= 0; j
< i
; ++j
)
350 HeapFree( GetProcessHeap(), 0, cursor
->frames
[j
].bits
);
352 HeapFree( GetProcessHeap(), 0, cursor
->frames
);
353 HeapFree( GetProcessHeap(), 0, cursor
);
362 static void destroy_cursor_object( cursor_t
*cursor
)
368 for (i
= 0; i
< cursor
->num_frames
; ++i
)
370 HeapFree( GetProcessHeap(), 0, cursor
->frames
[i
].bits
);
372 HeapFree( GetProcessHeap(), 0, cursor
->frames
);
373 HeapFree( GetProcessHeap(), 0, cursor
);
376 /* Lookup the cursor's 16-bit handle. Create one if it doesn't already exist. */
377 HCURSOR16
get_cursor_handle16( HCURSOR cursor32
, BOOL create
)
379 cursor_map_entry_t
*entry
;
380 int idx
= hash_cursor_handle( (DWORD
)cursor32
);
382 if (!cursor32
) return 0;
384 if (cursor32to16
[idx
].next
)
386 LIST_FOR_EACH_ENTRY( entry
, &cursor32to16
[idx
], cursor_map_entry_t
, entry32
)
387 if (entry
->cursor32
== cursor32
) return entry
->cursor16
;
390 /* 16-bit cursor handle not found, create one */
395 cursor_frame_t frame
;
397 if (!get_cursor_frame( cursor32
, 0, &frame
)) return 0;
399 entry
= HeapAlloc( GetProcessHeap(), 0, sizeof(cursor_map_entry_t
) );
400 bits_size
= (frame
.and_width_bytes
+ frame
.xor_width_bytes
) * frame
.height
;
401 cursor16
= GlobalAlloc16( GMEM_MOVEABLE
, sizeof(CURSORICONINFO
) + bits_size
);
404 CURSORICONINFO
*info
;
406 info
= (CURSORICONINFO
*)GlobalLock16( cursor16
);
407 info
->ptHotSpot
.x
= frame
.xhot
;
408 info
->ptHotSpot
.y
= frame
.yhot
;
409 info
->nWidth
= frame
.width
;
410 info
->nHeight
= frame
.height
;
411 info
->nWidthBytes
= frame
.xor_width_bytes
;
412 info
->bPlanes
= frame
.planes
;
413 info
->bBitsPerPixel
= frame
.bpp
;
414 CopyMemory( info
+ 1, frame
.bits
, bits_size
);
415 GlobalUnlock16( cursor16
);
417 HeapFree( GetProcessHeap(), 0, frame
.bits
);
419 entry
->cursor16
= cursor16
;
420 entry
->cursor32
= cursor32
;
421 add_cursor16to32_entry( entry
);
422 add_cursor32to16_entry( entry
);
430 HCURSOR
get_cursor_handle32( HCURSOR16 cursor16
)
432 cursor_map_entry_t
*entry
;
433 int idx
= hash_cursor_handle( cursor16
);
435 if (!cursor16
) return 0;
437 if (cursor16to32
[idx
].next
)
439 LIST_FOR_EACH_ENTRY( entry
, &cursor16to32
[idx
], cursor_map_entry_t
, entry16
)
440 if (entry
->cursor16
== cursor16
) return entry
->cursor32
;
446 static void update_cursor_32from16( HCURSOR cursor32
)
450 cursor_frame_t frame
;
451 CURSORICONINFO
*info
;
453 if (!cursor32
) return;
455 cursor16
= get_cursor_handle16( cursor32
, FALSE
);
456 if (!cursor16
) return;
458 info
= (CURSORICONINFO
*)GlobalLock16( cursor16
);
459 frame
.xhot
= info
->ptHotSpot
.x
;
460 frame
.yhot
= info
->ptHotSpot
.y
;
461 frame
.width
= info
->nWidth
;
462 frame
.height
= info
->nHeight
;
463 frame
.and_width_bytes
= get_bitmap_width_bytes( info
->nWidth
, 1 );
464 frame
.xor_width_bytes
= info
->nWidthBytes
;
465 frame
.planes
= info
->bPlanes
;
466 frame
.bpp
= info
->bBitsPerPixel
;
467 bits_size
= (frame
.and_width_bytes
+ frame
.xor_width_bytes
) * frame
.height
;
468 frame
.bits
= HeapAlloc( GetProcessHeap(), 0, bits_size
);
469 CopyMemory( frame
.bits
, info
+ 1, bits_size
);
470 GlobalUnlock16( cursor16
);
472 set_cursor_frame( cursor32
, 0, &frame
);
473 HeapFree( GetProcessHeap(), 0, frame
.bits
);
476 /***********************************************************************
479 * Helper function to map a file to memory:
481 * [RETURN] ptr - pointer to mapped file
482 * [RETURN] filesize - pointer size of file to be stored if not NULL
484 static void *map_fileW( LPCWSTR name
, LPDWORD filesize
)
486 HANDLE hFile
, hMapping
;
489 hFile
= CreateFileW( name
, GENERIC_READ
, FILE_SHARE_READ
, NULL
,
490 OPEN_EXISTING
, FILE_FLAG_RANDOM_ACCESS
, 0 );
491 if (hFile
!= INVALID_HANDLE_VALUE
)
493 hMapping
= CreateFileMappingW( hFile
, NULL
, PAGE_READONLY
, 0, 0, NULL
);
496 ptr
= MapViewOfFile( hMapping
, FILE_MAP_READ
, 0, 0, 0 );
497 CloseHandle( hMapping
);
499 *filesize
= GetFileSize( hFile
, NULL
);
501 CloseHandle( hFile
);
507 /***********************************************************************
508 * get_bitmap_width_bytes
510 * Return number of bytes taken by a scanline of 16-bit aligned Windows DDB
513 static int get_bitmap_width_bytes( int width
, int bpp
)
518 return 2 * ((width
+15) / 16);
520 return 2 * ((width
+3) / 4);
525 return width
+ (width
& 1);
532 WARN("Unknown depth %d, please report.\n", bpp
);
538 /***********************************************************************
539 * get_dib_width_bytes
541 * Return the width of a DIB bitmap in bytes. DIB bitmap data is 32-bit aligned.
543 static int get_dib_width_bytes( int width
, int depth
)
549 case 1: words
= (width
+ 31) / 32; break;
550 case 4: words
= (width
+ 7) / 8; break;
551 case 8: words
= (width
+ 3) / 4; break;
553 case 16: words
= (width
+ 1) / 2; break;
554 case 24: words
= (width
* 3 + 3)/4; break;
556 WARN("(%d): Unsupported depth\n", depth
);
565 /***********************************************************************
568 * Return the size of the bitmap info structure including color table.
570 static int bitmap_info_size( const BITMAPINFO
* info
, WORD coloruse
)
572 int colors
, masks
= 0;
574 if (info
->bmiHeader
.biSize
== sizeof(BITMAPCOREHEADER
))
576 const BITMAPCOREHEADER
*core
= (const BITMAPCOREHEADER
*)info
;
577 colors
= (core
->bcBitCount
<= 8) ? 1 << core
->bcBitCount
: 0;
578 return sizeof(BITMAPCOREHEADER
) + colors
*
579 ((coloruse
== DIB_RGB_COLORS
) ? sizeof(RGBTRIPLE
) : sizeof(WORD
));
581 else /* assume BITMAPINFOHEADER */
583 colors
= info
->bmiHeader
.biClrUsed
;
584 if (colors
> 256) /* buffer overflow otherwise */
586 if (!colors
&& (info
->bmiHeader
.biBitCount
<= 8))
587 colors
= 1 << info
->bmiHeader
.biBitCount
;
588 if (info
->bmiHeader
.biCompression
== BI_BITFIELDS
) masks
= 3;
589 return sizeof(BITMAPINFOHEADER
) + masks
* sizeof(DWORD
) + colors
*
590 ((coloruse
== DIB_RGB_COLORS
) ? sizeof(RGBQUAD
) : sizeof(WORD
));
595 /***********************************************************************
598 * Returns whether a DIB can be converted to a monochrome DDB.
600 * A DIB can be converted if its color table contains only black and
601 * white. Black must be the first color in the color table.
603 * Note : If the first color in the color table is white followed by
604 * black, we can't convert it to a monochrome DDB with
605 * SetDIBits, because black and white would be inverted.
607 static BOOL
is_dib_monochrome( const BITMAPINFO
* info
)
609 if (info
->bmiHeader
.biBitCount
!= 1) return FALSE
;
611 if (info
->bmiHeader
.biSize
== sizeof(BITMAPCOREHEADER
))
613 const RGBTRIPLE
*rgb
= ((const BITMAPCOREINFO
*)info
)->bmciColors
;
615 /* Check if the first color is black */
616 if ((rgb
->rgbtRed
== 0) && (rgb
->rgbtGreen
== 0) && (rgb
->rgbtBlue
== 0))
620 /* Check if the second color is white */
621 return ((rgb
->rgbtRed
== 0xff) && (rgb
->rgbtGreen
== 0xff)
622 && (rgb
->rgbtBlue
== 0xff));
626 else /* assume BITMAPINFOHEADER */
628 const RGBQUAD
*rgb
= info
->bmiColors
;
630 /* Check if the first color is black */
631 if ((rgb
->rgbRed
== 0) && (rgb
->rgbGreen
== 0) &&
632 (rgb
->rgbBlue
== 0) && (rgb
->rgbReserved
== 0))
636 /* Check if the second color is white */
637 return ((rgb
->rgbRed
== 0xff) && (rgb
->rgbGreen
== 0xff)
638 && (rgb
->rgbBlue
== 0xff) && (rgb
->rgbReserved
== 0));
644 /***********************************************************************
647 * Get the info from a bitmap header.
648 * Return 1 for INFOHEADER, 0 for COREHEADER,
649 * 4 for V4HEADER, 5 for V5HEADER, -1 for error.
651 static int DIB_GetBitmapInfo( const BITMAPINFOHEADER
*header
, LONG
*width
,
652 LONG
*height
, WORD
*bpp
, DWORD
*compr
)
654 if (header
->biSize
== sizeof(BITMAPINFOHEADER
))
656 *width
= header
->biWidth
;
657 *height
= header
->biHeight
;
658 *bpp
= header
->biBitCount
;
659 *compr
= header
->biCompression
;
662 if (header
->biSize
== sizeof(BITMAPCOREHEADER
))
664 const BITMAPCOREHEADER
*core
= (const BITMAPCOREHEADER
*)header
;
665 *width
= core
->bcWidth
;
666 *height
= core
->bcHeight
;
667 *bpp
= core
->bcBitCount
;
671 if (header
->biSize
== sizeof(BITMAPV4HEADER
))
673 const BITMAPV4HEADER
*v4hdr
= (const BITMAPV4HEADER
*)header
;
674 *width
= v4hdr
->bV4Width
;
675 *height
= v4hdr
->bV4Height
;
676 *bpp
= v4hdr
->bV4BitCount
;
677 *compr
= v4hdr
->bV4V4Compression
;
680 if (header
->biSize
== sizeof(BITMAPV5HEADER
))
682 const BITMAPV5HEADER
*v5hdr
= (const BITMAPV5HEADER
*)header
;
683 *width
= v5hdr
->bV5Width
;
684 *height
= v5hdr
->bV5Height
;
685 *bpp
= v5hdr
->bV5BitCount
;
686 *compr
= v5hdr
->bV5Compression
;
689 ERR("(%d): unknown/wrong size for header\n", header
->biSize
);
693 /**********************************************************************
694 * CURSORICON_FindSharedIcon
696 static HICON
CURSORICON_FindSharedIcon( HMODULE hModule
, HRSRC hRsrc
)
701 EnterCriticalSection( &IconCrst
);
703 for ( ptr
= IconAnchor
; ptr
; ptr
= ptr
->next
)
704 if ( ptr
->hModule
== hModule
&& ptr
->hRsrc
== hRsrc
)
711 LeaveCriticalSection( &IconCrst
);
716 /*************************************************************************
717 * CURSORICON_FindCache
719 * Given a handle, find the corresponding cache element
722 * Handle [I] handle to an Image
725 * Success: The cache entry
729 static ICONCACHE
* CURSORICON_FindCache(HICON hIcon
)
732 ICONCACHE
*pRet
=NULL
;
733 BOOL IsFound
= FALSE
;
735 EnterCriticalSection( &IconCrst
);
737 for (ptr
= IconAnchor
; ptr
!= NULL
&& !IsFound
; ptr
= ptr
->next
)
739 if ( hIcon
== ptr
->hIcon
)
746 LeaveCriticalSection( &IconCrst
);
751 /**********************************************************************
752 * CURSORICON_AddSharedIcon
754 static void CURSORICON_AddSharedIcon( HMODULE hModule
, HRSRC hRsrc
, HRSRC hGroupRsrc
, HICON hIcon
)
756 ICONCACHE
*ptr
= HeapAlloc( GetProcessHeap(), 0, sizeof(ICONCACHE
) );
759 ptr
->hModule
= hModule
;
762 ptr
->hGroupRsrc
= hGroupRsrc
;
765 EnterCriticalSection( &IconCrst
);
766 ptr
->next
= IconAnchor
;
768 LeaveCriticalSection( &IconCrst
);
771 /**********************************************************************
772 * CURSORICON_DelSharedIcon
774 static INT
CURSORICON_DelSharedIcon( HICON hIcon
)
779 EnterCriticalSection( &IconCrst
);
781 for ( ptr
= IconAnchor
; ptr
; ptr
= ptr
->next
)
782 if ( ptr
->hIcon
== hIcon
)
784 if ( ptr
->count
> 0 ) ptr
->count
--;
789 LeaveCriticalSection( &IconCrst
);
794 /**********************************************************************
795 * CURSORICON_FreeModuleIcons
797 void CURSORICON_FreeModuleIcons( HMODULE16 hMod16
)
799 ICONCACHE
**ptr
= &IconAnchor
;
800 HMODULE hModule
= HMODULE_32(GetExePtr( hMod16
));
802 EnterCriticalSection( &IconCrst
);
806 if ( (*ptr
)->hModule
== hModule
)
808 ICONCACHE
*freePtr
= *ptr
;
809 *ptr
= freePtr
->next
;
811 destroy_cursor( freePtr
->hIcon
);
812 HeapFree( GetProcessHeap(), 0, freePtr
);
818 LeaveCriticalSection( &IconCrst
);
822 * The following macro functions account for the irregularities of
823 * accessing cursor and icon resources in files and resource entries.
825 typedef BOOL (*fnGetCIEntry
)( LPVOID dir
, int n
,
826 int *width
, int *height
, int *bits
);
828 /**********************************************************************
829 * CURSORICON_FindBestIcon
831 * Find the icon closest to the requested size and number of colors.
833 static int CURSORICON_FindBestIcon( LPVOID dir
, fnGetCIEntry get_entry
,
834 int width
, int height
, int colors
)
836 int i
, cx
, cy
, bits
, bestEntry
= -1;
837 UINT iTotalDiff
, iXDiff
=0, iYDiff
=0, iColorDiff
;
838 UINT iTempXDiff
, iTempYDiff
, iTempColorDiff
;
841 iTotalDiff
= 0xFFFFFFFF;
842 iColorDiff
= 0xFFFFFFFF;
843 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
845 iTempXDiff
= abs(width
- cx
);
846 iTempYDiff
= abs(height
- cy
);
848 if(iTotalDiff
> (iTempXDiff
+ iTempYDiff
))
852 iTotalDiff
= iXDiff
+ iYDiff
;
856 /* Find Best Colors for Best Fit */
857 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
859 if(abs(width
- cx
) == iXDiff
&& abs(height
- cy
) == iYDiff
)
861 iTempColorDiff
= abs(colors
- (1<<bits
));
862 if(iColorDiff
> iTempColorDiff
)
865 iColorDiff
= iTempColorDiff
;
873 static BOOL
CURSORICON_GetResIconEntry( LPVOID dir
, int n
,
874 int *width
, int *height
, int *bits
)
876 CURSORICONDIR
*resdir
= dir
;
879 if ( resdir
->idCount
<= n
)
881 icon
= &resdir
->idEntries
[n
].ResInfo
.icon
;
882 *width
= icon
->bWidth
;
883 *height
= icon
->bHeight
;
884 *bits
= resdir
->idEntries
[n
].wBitCount
;
888 /**********************************************************************
889 * CURSORICON_FindBestCursor
891 * Find the cursor closest to the requested size.
892 * FIXME: parameter 'color' ignored and entries with more than 1 bpp
895 static int CURSORICON_FindBestCursor( LPVOID dir
, fnGetCIEntry get_entry
,
896 int width
, int height
, int color
)
898 int i
, maxwidth
, maxheight
, cx
, cy
, bits
, bestEntry
= -1;
900 /* Double height to account for AND and XOR masks */
904 /* First find the largest one smaller than or equal to the requested size*/
906 maxwidth
= maxheight
= 0;
907 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
909 if ((cx
<= width
) && (cy
<= height
) &&
910 (cx
> maxwidth
) && (cy
> maxheight
) &&
918 if (bestEntry
!= -1) return bestEntry
;
920 /* Now find the smallest one larger than the requested size */
922 maxwidth
= maxheight
= 255;
923 for ( i
= 0; get_entry( dir
, i
, &cx
, &cy
, &bits
); i
++ )
925 if (((cx
< maxwidth
) && (cy
< maxheight
) && (bits
== 1)) ||
937 static BOOL
CURSORICON_GetResCursorEntry( LPVOID dir
, int n
,
938 int *width
, int *height
, int *bits
)
940 CURSORICONDIR
*resdir
= dir
;
943 if ( resdir
->idCount
<= n
)
945 cursor
= &resdir
->idEntries
[n
].ResInfo
.cursor
;
946 *width
= cursor
->wWidth
;
947 *height
= cursor
->wHeight
;
948 *bits
= resdir
->idEntries
[n
].wBitCount
;
952 static CURSORICONDIRENTRY
*CURSORICON_FindBestIconRes( CURSORICONDIR
* dir
,
953 int width
, int height
, int colors
)
957 n
= CURSORICON_FindBestIcon( dir
, CURSORICON_GetResIconEntry
,
958 width
, height
, colors
);
961 return &dir
->idEntries
[n
];
964 static CURSORICONDIRENTRY
*CURSORICON_FindBestCursorRes( CURSORICONDIR
*dir
,
965 int width
, int height
, int color
)
967 int n
= CURSORICON_FindBestCursor( dir
, CURSORICON_GetResCursorEntry
,
968 width
, height
, color
);
971 return &dir
->idEntries
[n
];
974 static BOOL
CURSORICON_GetFileEntry( LPVOID dir
, int n
,
975 int *width
, int *height
, int *bits
)
977 CURSORICONFILEDIR
*filedir
= dir
;
978 CURSORICONFILEDIRENTRY
*entry
;
980 if ( filedir
->idCount
<= n
)
982 entry
= &filedir
->idEntries
[n
];
983 *width
= entry
->bWidth
;
984 *height
= entry
->bHeight
;
985 *bits
= entry
->bColorCount
;
989 static CURSORICONFILEDIRENTRY
*CURSORICON_FindBestCursorFile( CURSORICONFILEDIR
*dir
,
990 int width
, int height
, int color
)
992 int n
= CURSORICON_FindBestCursor( dir
, CURSORICON_GetFileEntry
,
993 width
, height
, color
);
996 return &dir
->idEntries
[n
];
999 static CURSORICONFILEDIRENTRY
*CURSORICON_FindBestIconFile( CURSORICONFILEDIR
*dir
,
1000 int width
, int height
, int color
)
1002 int n
= CURSORICON_FindBestIcon( dir
, CURSORICON_GetFileEntry
,
1003 width
, height
, color
);
1006 return &dir
->idEntries
[n
];
1009 static BOOL
load_cursor_frame( BITMAPINFO
*bmi
,
1012 INT width
, INT height
,
1013 UINT cFlag
, cursor_frame_t
*frame
)
1016 int sizeAnd
, sizeXor
;
1017 HBITMAP hAndBits
= 0, hXorBits
= 0; /* error condition for later */
1018 BITMAP bmpXor
, bmpAnd
;
1022 if (dwVersion
== 0x00020000)
1024 FIXME_(cursor
)("\t2.xx resources are not supported\n");
1028 /* Check bitmap header */
1030 if ( (bmi
->bmiHeader
.biSize
!= sizeof(BITMAPCOREHEADER
)) &&
1031 (bmi
->bmiHeader
.biSize
!= sizeof(BITMAPINFOHEADER
) ||
1032 bmi
->bmiHeader
.biCompression
!= BI_RGB
) )
1034 WARN_(cursor
)("\tinvalid resource bitmap header.\n");
1038 size
= bitmap_info_size( bmi
, DIB_RGB_COLORS
);
1040 if (!width
) width
= bmi
->bmiHeader
.biWidth
;
1041 if (!height
) height
= bmi
->bmiHeader
.biHeight
/2;
1042 DoStretch
= (bmi
->bmiHeader
.biHeight
/2 != height
) ||
1043 (bmi
->bmiHeader
.biWidth
!= width
);
1045 /* Scale the hotspot */
1046 if (DoStretch
&& hotspot
.x
!= ICON_HOTSPOT
&& hotspot
.y
!= ICON_HOTSPOT
)
1048 hotspot
.x
= (hotspot
.x
* width
) / bmi
->bmiHeader
.biWidth
;
1049 hotspot
.y
= (hotspot
.y
* height
) / (bmi
->bmiHeader
.biWidth
/ 2);
1052 if (!screen_dc
) screen_dc
= CreateDCW( DISPLAYW
, NULL
, NULL
, NULL
);
1057 /* Make sure we have room for the monochrome bitmap later on.
1058 * Note that BITMAPINFOINFO and BITMAPCOREHEADER are the same
1059 * up to and including the biBitCount. In-memory icon resource
1060 * format is as follows:
1062 * BITMAPINFOHEADER icHeader // DIB header
1063 * RGBQUAD icColors[] // Color table
1064 * BYTE icXOR[] // DIB bits for XOR mask
1065 * BYTE icAND[] // DIB bits for AND mask
1068 if ((pInfo
= HeapAlloc( GetProcessHeap(), 0,
1069 max(size
, sizeof(BITMAPINFOHEADER
) + 2*sizeof(RGBQUAD
)))))
1071 memcpy( pInfo
, bmi
, size
);
1072 pInfo
->bmiHeader
.biHeight
/= 2;
1074 /* Create the XOR bitmap */
1077 hXorBits
= CreateCompatibleBitmap(screen_dc
, width
, height
);
1083 if (!hdcMem
) hdcMem
= CreateCompatibleDC(screen_dc
);
1085 hOld
= SelectObject(hdcMem
, hXorBits
);
1086 res
= StretchDIBits(hdcMem
, 0, 0, width
, height
, 0, 0,
1087 bmi
->bmiHeader
.biWidth
, bmi
->bmiHeader
.biHeight
/2,
1088 (char*)bmi
+ size
, pInfo
, DIB_RGB_COLORS
, SRCCOPY
);
1089 SelectObject(hdcMem
, hOld
);
1091 if (!res
) { DeleteObject(hXorBits
); hXorBits
= 0; }
1094 if (is_dib_monochrome(bmi
)) {
1095 hXorBits
= CreateBitmap(width
, height
, 1, 1, NULL
);
1096 SetDIBits(screen_dc
, hXorBits
, 0, height
,
1097 (char*)bmi
+ size
, pInfo
, DIB_RGB_COLORS
);
1098 } else if (bmi
->bmiHeader
.biBitCount
== 32) {
1099 hXorBits
= CreateDIBSection(screen_dc
, pInfo
, DIB_RGB_COLORS
, NULL
, NULL
, 0);
1100 SetDIBits(screen_dc
, hXorBits
, 0, height
,
1101 (char*)bmi
+ size
, pInfo
, DIB_RGB_COLORS
);
1104 hXorBits
= CreateDIBitmap(screen_dc
, &pInfo
->bmiHeader
,
1105 CBM_INIT
, (char*)bmi
+ size
, pInfo
, DIB_RGB_COLORS
);
1110 char* xbits
= (char *)bmi
+ size
+
1111 get_dib_width_bytes( bmi
->bmiHeader
.biWidth
,
1112 bmi
->bmiHeader
.biBitCount
) * abs( bmi
->bmiHeader
.biHeight
) / 2;
1114 pInfo
->bmiHeader
.biBitCount
= 1;
1115 if (pInfo
->bmiHeader
.biSize
!= sizeof(BITMAPCOREHEADER
))
1117 RGBQUAD
*rgb
= pInfo
->bmiColors
;
1119 pInfo
->bmiHeader
.biClrUsed
= pInfo
->bmiHeader
.biClrImportant
= 2;
1120 rgb
[0].rgbBlue
= rgb
[0].rgbGreen
= rgb
[0].rgbRed
= 0x00;
1121 rgb
[1].rgbBlue
= rgb
[1].rgbGreen
= rgb
[1].rgbRed
= 0xff;
1122 rgb
[0].rgbReserved
= rgb
[1].rgbReserved
= 0;
1126 RGBTRIPLE
*rgb
= (RGBTRIPLE
*)(((BITMAPCOREHEADER
*)pInfo
) + 1);
1128 rgb
[0].rgbtBlue
= rgb
[0].rgbtGreen
= rgb
[0].rgbtRed
= 0x00;
1129 rgb
[1].rgbtBlue
= rgb
[1].rgbtGreen
= rgb
[1].rgbtRed
= 0xff;
1132 /* Create the AND bitmap */
1135 if ((hAndBits
= CreateBitmap(width
, height
, 1, 1, NULL
))) {
1139 if (!hdcMem
) hdcMem
= CreateCompatibleDC(screen_dc
);
1141 hOld
= SelectObject(hdcMem
, hAndBits
);
1142 res
= StretchDIBits(hdcMem
, 0, 0, width
, height
, 0, 0,
1143 pInfo
->bmiHeader
.biWidth
, pInfo
->bmiHeader
.biHeight
,
1144 xbits
, pInfo
, DIB_RGB_COLORS
, SRCCOPY
);
1145 SelectObject(hdcMem
, hOld
);
1147 if (!res
) { DeleteObject(hAndBits
); hAndBits
= 0; }
1150 hAndBits
= CreateBitmap(width
, height
, 1, 1, NULL
);
1152 if (hAndBits
) SetDIBits(screen_dc
, hAndBits
, 0, height
,
1153 xbits
, pInfo
, DIB_RGB_COLORS
);
1156 if( !hAndBits
) DeleteObject( hXorBits
);
1158 HeapFree( GetProcessHeap(), 0, pInfo
);
1162 if( !hXorBits
|| !hAndBits
)
1164 WARN_(cursor
)("\tunable to create an icon bitmap.\n");
1168 /* Setup a cursor frame, send it to the server */
1169 GetObjectA( hXorBits
, sizeof(bmpXor
), &bmpXor
);
1170 GetObjectA( hAndBits
, sizeof(bmpAnd
), &bmpAnd
);
1171 sizeXor
= bmpXor
.bmHeight
* bmpXor
.bmWidthBytes
;
1172 sizeAnd
= bmpAnd
.bmHeight
* bmpAnd
.bmWidthBytes
;
1174 frame
->xhot
= hotspot
.x
;
1175 frame
->yhot
= hotspot
.y
;
1176 frame
->width
= bmpXor
.bmWidth
;
1177 frame
->height
= bmpXor
.bmHeight
;
1178 frame
->and_width_bytes
= bmpAnd
.bmWidthBytes
;
1179 frame
->xor_width_bytes
= bmpXor
.bmWidthBytes
;
1180 frame
->planes
= bmpXor
.bmPlanes
;
1181 frame
->bpp
= bmpXor
.bmBitsPixel
;
1182 frame
->bits
= HeapAlloc( GetProcessHeap(), 0, sizeAnd
+ sizeXor
);
1183 GetBitmapBits( hAndBits
, sizeAnd
, frame
->bits
);
1184 GetBitmapBits( hXorBits
, sizeXor
, frame
->bits
+ sizeAnd
);
1186 DeleteObject( hAndBits
);
1187 DeleteObject( hXorBits
);
1193 /**********************************************************************
1194 * .ANI cursor support
1196 #define RIFF_FOURCC( c0, c1, c2, c3 ) \
1197 ( (DWORD)(BYTE)(c0) | ( (DWORD)(BYTE)(c1) << 8 ) | \
1198 ( (DWORD)(BYTE)(c2) << 16 ) | ( (DWORD)(BYTE)(c3) << 24 ) )
1200 #define ANI_RIFF_ID RIFF_FOURCC('R', 'I', 'F', 'F')
1201 #define ANI_LIST_ID RIFF_FOURCC('L', 'I', 'S', 'T')
1202 #define ANI_ACON_ID RIFF_FOURCC('A', 'C', 'O', 'N')
1203 #define ANI_anih_ID RIFF_FOURCC('a', 'n', 'i', 'h')
1204 #define ANI_seq__ID RIFF_FOURCC('s', 'e', 'q', ' ')
1205 #define ANI_fram_ID RIFF_FOURCC('f', 'r', 'a', 'm')
1207 #define ANI_FLAG_ICON 0x1
1208 #define ANI_FLAG_SEQUENCE 0x2
1224 const unsigned char *data
;
1227 static void dump_ani_header( const ani_header
*header
)
1229 TRACE(" header size: %d\n", header
->header_size
);
1230 TRACE(" frames: %d\n", header
->num_frames
);
1231 TRACE(" steps: %d\n", header
->num_steps
);
1232 TRACE(" width: %d\n", header
->width
);
1233 TRACE(" height: %d\n", header
->height
);
1234 TRACE(" bpp: %d\n", header
->bpp
);
1235 TRACE(" planes: %d\n", header
->num_planes
);
1236 TRACE(" display rate: %d\n", header
->display_rate
);
1237 TRACE(" flags: 0x%08x\n", header
->flags
);
1259 static void riff_find_chunk( DWORD chunk_id
, DWORD chunk_type
, const riff_chunk_t
*parent_chunk
, riff_chunk_t
*chunk
)
1261 const unsigned char *ptr
= parent_chunk
->data
;
1262 const unsigned char *end
= parent_chunk
->data
+ (parent_chunk
->data_size
- (2 * sizeof(DWORD
)));
1264 if (chunk_type
== ANI_LIST_ID
|| chunk_type
== ANI_RIFF_ID
) end
-= sizeof(DWORD
);
1268 if ((!chunk_type
&& *(DWORD
*)ptr
== chunk_id
)
1269 || (chunk_type
&& *(DWORD
*)ptr
== chunk_type
&& *((DWORD
*)ptr
+ 2) == chunk_id
))
1271 ptr
+= sizeof(DWORD
);
1272 chunk
->data_size
= *(DWORD
*)ptr
;
1273 ptr
+= sizeof(DWORD
);
1274 if (chunk_type
== ANI_LIST_ID
|| chunk_type
== ANI_RIFF_ID
) ptr
+= sizeof(DWORD
);
1280 ptr
+= sizeof(DWORD
);
1281 ptr
+= *(DWORD
*)ptr
;
1282 ptr
+= sizeof(DWORD
);
1290 * RIFF:'ACON' RIFF chunk
1291 * |- CHUNK:'anih' Header
1292 * |- CHUNK:'seq ' Sequence information (optional)
1293 * \- LIST:'fram' Frame list
1294 * |- CHUNK:icon Cursor frames
1299 static HCURSOR
load_ani( const LPBYTE bits
, DWORD bits_size
, INT width
, INT height
)
1304 CURSORICONFILEDIR
*dir
= 0;
1305 ani_header header
= {0};
1306 DWORD
*frame_seq
= 0;
1307 cursor_frame_t
*frames
;
1308 unsigned int frame_bits_size
= 0;
1309 LPBYTE frame_bits
= 0;
1312 riff_chunk_t root_chunk
= { bits_size
, bits
};
1313 riff_chunk_t ACON_chunk
= {0};
1314 riff_chunk_t anih_chunk
= {0};
1315 riff_chunk_t fram_chunk
= {0};
1316 const unsigned char *icon_chunk
;
1317 const unsigned char *icon_data
;
1319 TRACE("bits %p, bits_size %d\n", bits
, bits_size
);
1321 if (!bits
) return 0;
1323 riff_find_chunk( ANI_ACON_ID
, ANI_RIFF_ID
, &root_chunk
, &ACON_chunk
);
1324 if (!ACON_chunk
.data
)
1326 ERR("Failed to get root chunk.\n");
1330 riff_find_chunk( ANI_anih_ID
, 0, &ACON_chunk
, &anih_chunk
);
1331 if (!anih_chunk
.data
)
1333 ERR("Failed to get 'anih' chunk.\n");
1336 memcpy( &header
, anih_chunk
.data
, sizeof(header
) );
1337 dump_ani_header( &header
);
1339 if (header
.flags
& ANI_FLAG_SEQUENCE
)
1341 riff_chunk_t seq_chunk
= {0};
1343 TRACE("Loading sequence data.\n");
1344 riff_find_chunk( ANI_seq__ID
, 0, &ACON_chunk
, &seq_chunk
);
1345 if (!seq_chunk
.data
)
1347 ERR("Failed to get 'seq ' chunk\n");
1350 frame_seq
= HeapAlloc( GetProcessHeap(), 0, sizeof(DWORD
) * header
.num_steps
);
1351 memcpy( frame_seq
, seq_chunk
.data
, sizeof(DWORD
) * header
.num_steps
);
1354 riff_find_chunk( ANI_fram_ID
, ANI_LIST_ID
, &ACON_chunk
, &fram_chunk
);
1355 if (!fram_chunk
.data
)
1357 ERR("Failed to get icon list\n");
1361 icon_chunk
= fram_chunk
.data
;
1362 icon_data
= icon_chunk
+ (2 * sizeof(DWORD
));
1363 /* The .ANI stores the display rate in 1/60s, we store the delay between frames in ms */
1364 cursor
= create_cursor( header
.num_steps
, (100 * header
.display_rate
) / 6 );
1365 frames
= HeapAlloc( GetProcessHeap(), 0, header
.num_frames
* sizeof(cursor_frame_t
) );
1367 for (i
= 0; i
< header
.num_frames
; ++i
)
1370 CURSORICONFILEDIRENTRY
*entry
;
1371 DWORD chunk_size
= *(DWORD
*)(icon_chunk
+ sizeof(DWORD
));
1373 /* Read icon count, skip magic */
1374 memcpy( &count
, icon_data
+ sizeof(DWORD
), sizeof(WORD
) );
1376 /* There's a decent chance the amount of entries will be the same for each icon */
1377 if (count
> max_count
)
1379 HeapFree( GetProcessHeap(), 0, dir
);
1380 /* sizeof(CURSORICONFILEDIRENTRY) for each entry, +6 for magic & count */
1381 dir
= HeapAlloc( GetProcessHeap(), 0, (count
* sizeof(CURSORICONFILEDIRENTRY
)) + 6 );
1385 /* sizeof(CURSORICONFILEDIRENTRY) for each entry, +6 for magic & count */
1386 memcpy( dir
, icon_data
, (count
* sizeof(CURSORICONFILEDIRENTRY
)) + 6 );
1387 entry
= CURSORICON_FindBestCursorFile( dir
, width
, height
, 1 );
1389 if (frame_bits_size
< entry
->dwDIBSize
)
1391 frame_bits_size
= entry
->dwDIBSize
;
1392 HeapFree( GetProcessHeap(), 0, frame_bits
);
1393 frame_bits
= HeapAlloc( GetProcessHeap(), 0, frame_bits_size
);
1396 if (!header
.width
|| !header
.height
)
1398 header
.width
= entry
->bWidth
;
1399 header
.height
= entry
->bHeight
;
1402 hotspot
.x
= entry
->xHotspot
;
1403 hotspot
.y
= entry
->yHotspot
;
1405 memcpy( frame_bits
, icon_data
+ entry
->dwDIBOffset
, entry
->dwDIBSize
);
1407 load_cursor_frame( frame_bits
, entry
->dwDIBSize
, hotspot
, 0x00030000, header
.width
, header
.height
, 0, &frames
[i
] );
1409 /* Advance to the next chunk */
1410 icon_chunk
+= chunk_size
+ (2 * sizeof(DWORD
));
1411 icon_data
= icon_chunk
+ (2 * sizeof(DWORD
));
1413 HeapFree( GetProcessHeap(), 0, dir
);
1415 /* Set the frames in the correct sequence */
1416 for (i
= 0; i
< header
.num_steps
; ++i
)
1418 int frame_idx
= (frame_seq
? frame_seq
[i
] : i
);
1419 set_cursor_frame( cursor
, i
, &frames
[frame_idx
] );
1423 for (i
= 0; i
< header
.num_frames
; ++i
)
1425 HeapFree( GetProcessHeap(), 0, frames
[i
].bits
);
1427 HeapFree( GetProcessHeap(), 0, frame_seq
);
1428 HeapFree( GetProcessHeap(), 0, frames
);
1434 /**********************************************************************
1435 * CreateIconFromResourceEx (USER32.@)
1437 * FIXME: Convert to mono when cFlag is LR_MONOCHROME. Do something
1438 * with cbSize parameter as well.
1440 HICON WINAPI
CreateIconFromResourceEx( LPBYTE bits
, UINT cbSize
,
1441 BOOL bIcon
, DWORD dwVersion
,
1442 INT width
, INT height
,
1447 HCURSOR cursor
= create_cursor( 1, 0 );
1448 cursor_frame_t frame
= {0};
1450 hotspot
.x
= ICON_HOTSPOT
;
1451 hotspot
.y
= ICON_HOTSPOT
;
1453 TRACE_(cursor
)("%p (%u bytes), ver %08x, %ix%i %s %s\n",
1454 bits
, cbSize
, dwVersion
, width
, height
,
1455 bIcon
? "icon" : "cursor", (cFlag
& LR_MONOCHROME
) ? "mono" : "" );
1458 bmi
= (BITMAPINFO
*)bits
;
1459 else /* get the hotspot */
1461 POINT16
*pt
= (POINT16
*)bits
;
1463 bmi
= (BITMAPINFO
*)(pt
+ 1);
1466 if (load_cursor_frame( bmi
, hotspot
, dwVersion
, width
, height
, cFlag
, &frame
))
1468 set_cursor_frame( cursor
, 0, &frame
);
1472 destroy_cursor( cursor
);
1476 HeapFree( GetProcessHeap(), 0, frame
.bits
);
1482 /**********************************************************************
1483 * CreateIconFromResource (USER32.@)
1485 HICON WINAPI
CreateIconFromResource( LPBYTE bits
, UINT cbSize
,
1486 BOOL bIcon
, DWORD dwVersion
)
1488 return CreateIconFromResourceEx( bits
, cbSize
, bIcon
, dwVersion
, 0,0,0);
1492 static HICON
CURSORICON_LoadFromFile( LPCWSTR filename
,
1493 INT width
, INT height
, INT colors
,
1494 BOOL fCursor
, UINT loadflags
)
1496 CURSORICONFILEDIRENTRY
*entry
;
1497 cursor_frame_t frame
= {0};
1498 CURSORICONFILEDIR
*dir
;
1504 TRACE("loading %s\n", debugstr_w( filename
));
1506 bits
= map_fileW( filename
, &filesize
);
1510 /* If the data contains the magic for an .ICO it's an .ICO,
1511 * regardless of what fCursor says. */
1512 if (!memcmp( bits
, "\x00\x00\x01\x00", 4 )) fCursor
= FALSE
;
1513 /* Same thing for .CUR */
1514 else if (!memcmp( bits
, "\x00\x00\x02\x00", 4 )) fCursor
= TRUE
;
1515 /* Check for .ani. */
1516 else if (!memcmp( bits
, "RIFF", 4 ))
1518 hIcon
= load_ani( bits
, filesize
, width
, height
);
1522 dir
= (CURSORICONFILEDIR
*) bits
;
1523 if ( filesize
< sizeof(*dir
) )
1526 if ( filesize
< (sizeof(*dir
) + sizeof(dir
->idEntries
[0])*(dir
->idCount
-1)) )
1530 entry
= CURSORICON_FindBestCursorFile( dir
, width
, height
, colors
);
1532 entry
= CURSORICON_FindBestIconFile( dir
, width
, height
, colors
);
1537 /* check that we don't run off the end of the file */
1538 if ( entry
->dwDIBOffset
> filesize
)
1540 if ( entry
->dwDIBOffset
+ entry
->dwDIBSize
> filesize
)
1545 hotspot
.x
= entry
->xHotspot
;
1546 hotspot
.y
= entry
->yHotspot
;
1550 hotspot
.x
= ICON_HOTSPOT
;
1551 hotspot
.y
= ICON_HOTSPOT
;
1553 hIcon
= create_cursor( 1, 0 );
1554 if (load_cursor_frame( (BITMAPINFO
*)&bits
[entry
->dwDIBOffset
],
1555 hotspot
, 0x00030000,
1556 width
, height
, loadflags
,
1559 set_cursor_frame( hIcon
, 0, &frame
);
1563 destroy_cursor( hIcon
);
1566 HeapFree( GetProcessHeap(), 0, frame
.bits
);
1569 TRACE("loaded %s -> %p\n", debugstr_w( filename
), hIcon
);
1570 UnmapViewOfFile( bits
);
1574 /**********************************************************************
1577 * Load a cursor or icon from resource or file.
1579 static HICON
CURSORICON_Load(HINSTANCE hInstance
, LPCWSTR name
,
1580 INT width
, INT height
, INT colors
,
1581 BOOL fCursor
, UINT loadflags
)
1585 HRSRC hRsrc
, hGroupRsrc
;
1587 CURSORICONDIRENTRY
*dirEntry
;
1592 TRACE("%p, %s, %dx%d, colors %d, fCursor %d, flags 0x%04x\n",
1593 hInstance
, debugstr_w(name
), width
, height
, colors
, fCursor
, loadflags
);
1595 if ( loadflags
& LR_LOADFROMFILE
) /* Load from file */
1596 return CURSORICON_LoadFromFile( name
, width
, height
, colors
, fCursor
, loadflags
);
1598 if (!hInstance
) hInstance
= user32_module
; /* Load OEM cursor/icon */
1600 /* Normalize hInstance (must be uniquely represented for icon cache) */
1602 if (!HIWORD( hInstance
))
1603 hInstance
= HINSTANCE_32(GetExePtr( HINSTANCE_16(hInstance
) ));
1605 /* Get directory resource ID */
1607 if (!(hRsrc
= FindResourceW( hInstance
, name
,
1608 (LPWSTR
)(fCursor
? RT_GROUP_CURSOR
: RT_GROUP_ICON
) )))
1612 /* Find the best entry in the directory */
1614 if (!(handle
= LoadResource( hInstance
, hRsrc
))) return 0;
1615 if (!(dir
= (CURSORICONDIR
*)LockResource( handle
))) return 0;
1617 dirEntry
= CURSORICON_FindBestCursorRes( dir
, width
, height
, 1);
1619 dirEntry
= CURSORICON_FindBestIconRes( dir
, width
, height
, colors
);
1620 if (!dirEntry
) return 0;
1621 wResId
= dirEntry
->wResId
;
1622 dwBytesInRes
= dirEntry
->dwBytesInRes
;
1623 FreeResource( handle
);
1625 /* Load the resource */
1627 if (!(hRsrc
= FindResourceW(hInstance
,MAKEINTRESOURCEW(wResId
),
1628 (LPWSTR
)(fCursor
? RT_CURSOR
: RT_ICON
) ))) return 0;
1630 /* If shared icon, check whether it was already loaded */
1631 if ( (loadflags
& LR_SHARED
)
1632 && (hIcon
= CURSORICON_FindSharedIcon( hInstance
, hRsrc
) ) != 0 )
1635 if (!(handle
= LoadResource( hInstance
, hRsrc
))) return 0;
1636 bits
= (LPBYTE
)LockResource( handle
);
1637 hIcon
= CreateIconFromResourceEx( bits
, dwBytesInRes
,
1638 !fCursor
, 0x00030000, width
, height
, loadflags
);
1639 FreeResource( handle
);
1641 /* If shared icon, add to icon cache */
1643 if ( hIcon
&& (loadflags
& LR_SHARED
) )
1644 CURSORICON_AddSharedIcon( hInstance
, hRsrc
, hGroupRsrc
, hIcon
);
1649 /***********************************************************************
1652 * Make a copy of a cursor or icon.
1654 static HICON
CURSORICON_Copy( HINSTANCE16 hInst16
, HICON hIcon
)
1656 /* Should animated cursors be copyable like this as well? */
1658 cursor_frame_t frame
;
1660 if (!hIcon
|| !get_cursor_frame( hIcon
, 0, &frame
))
1665 new_cursor
= create_cursor( 1, 0 );
1666 set_cursor_frame( new_cursor
, 0, &frame
);
1667 HeapFree( GetProcessHeap(), 0, frame
.bits
);
1672 /*************************************************************************
1673 * CURSORICON_ExtCopy
1675 * Copies an Image from the Cache if LR_COPYFROMRESOURCE is specified
1678 * Handle [I] handle to an Image
1679 * nType [I] Type of Handle (IMAGE_CURSOR | IMAGE_ICON)
1680 * iDesiredCX [I] The Desired width of the Image
1681 * iDesiredCY [I] The desired height of the Image
1682 * nFlags [I] The flags from CopyImage
1685 * Success: The new handle of the Image
1688 * LR_COPYDELETEORG and LR_MONOCHROME are currently not implemented.
1689 * LR_MONOCHROME should be implemented by CreateIconFromResourceEx.
1690 * LR_COPYFROMRESOURCE will only work if the Image is in the Cache.
1695 static HICON
CURSORICON_ExtCopy(HICON hIcon
, UINT nType
,
1696 INT iDesiredCX
, INT iDesiredCY
,
1701 TRACE_(icon
)("hIcon %p, nType %u, iDesiredCX %i, iDesiredCY %i, nFlags %u\n",
1702 hIcon
, nType
, iDesiredCX
, iDesiredCY
, nFlags
);
1709 /* Best Fit or Monochrome */
1710 if( (nFlags
& LR_COPYFROMRESOURCE
1711 && (iDesiredCX
> 0 || iDesiredCY
> 0))
1712 || nFlags
& LR_MONOCHROME
)
1714 ICONCACHE
* pIconCache
= CURSORICON_FindCache(hIcon
);
1716 /* Not Found in Cache, then do a straight copy
1718 if(pIconCache
== NULL
)
1720 hNew
= CURSORICON_Copy(0, hIcon
);
1721 if(nFlags
& LR_COPYFROMRESOURCE
)
1723 TRACE_(icon
)("LR_COPYFROMRESOURCE: Failed to load from cache\n");
1728 int iTargetCY
= iDesiredCY
, iTargetCX
= iDesiredCX
;
1734 CURSORICONDIR
*pDir
;
1735 CURSORICONDIRENTRY
*pDirEntry
;
1736 BOOL bIsIcon
= (nType
== IMAGE_ICON
);
1738 /* Completing iDesiredCX CY for Monochrome Bitmaps if needed
1740 if(((nFlags
& LR_MONOCHROME
) && !(nFlags
& LR_COPYFROMRESOURCE
))
1741 || (iDesiredCX
== 0 && iDesiredCY
== 0))
1743 iDesiredCY
= GetSystemMetrics(bIsIcon
?
1744 SM_CYICON
: SM_CYCURSOR
);
1745 iDesiredCX
= GetSystemMetrics(bIsIcon
?
1746 SM_CXICON
: SM_CXCURSOR
);
1749 /* Retrieve the CURSORICONDIRENTRY
1751 if (!(hMem
= LoadResource( pIconCache
->hModule
,
1752 pIconCache
->hGroupRsrc
)))
1756 if (!(pDir
= (CURSORICONDIR
*)LockResource( hMem
)))
1765 pDirEntry
= CURSORICON_FindBestIconRes(
1766 pDir
, iDesiredCX
, iDesiredCY
, 256 );
1770 pDirEntry
= CURSORICON_FindBestCursorRes(
1771 pDir
, iDesiredCX
, iDesiredCY
, 1);
1774 wResId
= pDirEntry
->wResId
;
1775 dwBytesInRes
= pDirEntry
->dwBytesInRes
;
1778 TRACE_(icon
)("ResID %u, BytesInRes %u, Width %d, Height %d DX %d, DY %d\n",
1779 wResId
, dwBytesInRes
, pDirEntry
->ResInfo
.icon
.bWidth
,
1780 pDirEntry
->ResInfo
.icon
.bHeight
, iDesiredCX
, iDesiredCY
);
1784 if (!(hRsrc
= FindResourceW(pIconCache
->hModule
,
1785 MAKEINTRESOURCEW(wResId
), (LPWSTR
)(bIsIcon
? RT_ICON
: RT_CURSOR
))))
1789 if (!(hMem
= LoadResource( pIconCache
->hModule
, hRsrc
)))
1794 pBits
= (LPBYTE
)LockResource( hMem
);
1796 if(nFlags
& LR_DEFAULTSIZE
)
1798 iTargetCY
= GetSystemMetrics(SM_CYICON
);
1799 iTargetCX
= GetSystemMetrics(SM_CXICON
);
1802 /* Create a New Icon with the proper dimension
1804 hNew
= CreateIconFromResourceEx( pBits
, dwBytesInRes
,
1805 bIsIcon
, 0x00030000, iTargetCX
, iTargetCY
, nFlags
);
1809 else hNew
= CURSORICON_Copy(0, hIcon
);
1814 /***********************************************************************
1815 * CreateCursor (USER32.@)
1817 HCURSOR WINAPI
CreateCursor( HINSTANCE hInstance
,
1818 INT xHotSpot
, INT yHotSpot
,
1819 INT nWidth
, INT nHeight
,
1820 LPCVOID lpANDbits
, LPCVOID lpXORbits
)
1822 CURSORICONINFO info
;
1824 TRACE_(cursor
)("%dx%d spot=%d,%d xor=%p and=%p\n",
1825 nWidth
, nHeight
, xHotSpot
, yHotSpot
, lpXORbits
, lpANDbits
);
1827 info
.ptHotSpot
.x
= xHotSpot
;
1828 info
.ptHotSpot
.y
= yHotSpot
;
1829 info
.nWidth
= nWidth
;
1830 info
.nHeight
= nHeight
;
1831 info
.nWidthBytes
= 0;
1833 info
.bBitsPerPixel
= 1;
1835 return HICON_32(CreateCursorIconIndirect16(0, &info
, lpANDbits
, lpXORbits
));
1839 /***********************************************************************
1840 * CreateIcon (USER.407)
1842 HICON16 WINAPI
CreateIcon16( HINSTANCE16 hInstance
, INT16 nWidth
,
1843 INT16 nHeight
, BYTE bPlanes
, BYTE bBitsPixel
,
1844 LPCVOID lpANDbits
, LPCVOID lpXORbits
)
1846 CURSORICONINFO info
;
1848 TRACE_(icon
)("%dx%dx%d, xor=%p, and=%p\n",
1849 nWidth
, nHeight
, bPlanes
* bBitsPixel
, lpXORbits
, lpANDbits
);
1851 info
.ptHotSpot
.x
= ICON_HOTSPOT
;
1852 info
.ptHotSpot
.y
= ICON_HOTSPOT
;
1853 info
.nWidth
= nWidth
;
1854 info
.nHeight
= nHeight
;
1855 info
.nWidthBytes
= 0;
1856 info
.bPlanes
= bPlanes
;
1857 info
.bBitsPerPixel
= bBitsPixel
;
1859 return CreateCursorIconIndirect16( hInstance
, &info
, lpANDbits
, lpXORbits
);
1863 /***********************************************************************
1864 * CreateIcon (USER32.@)
1866 * Creates an icon based on the specified bitmaps. The bitmaps must be
1867 * provided in a device dependent format and will be resized to
1868 * (SM_CXICON,SM_CYICON) and depth converted to match the screen's color
1869 * depth. The provided bitmaps must be top-down bitmaps.
1870 * Although Windows does not support 15bpp(*) this API must support it
1871 * for Winelib applications.
1873 * (*) Windows does not support 15bpp but it supports the 555 RGB 16bpp
1877 * Success: handle to an icon
1880 * FIXME: Do we need to resize the bitmaps?
1882 HICON WINAPI
CreateIcon(
1883 HINSTANCE hInstance
, /* [in] the application's hInstance */
1884 INT nWidth
, /* [in] the width of the provided bitmaps */
1885 INT nHeight
, /* [in] the height of the provided bitmaps */
1886 BYTE bPlanes
, /* [in] the number of planes in the provided bitmaps */
1887 BYTE bBitsPixel
, /* [in] the number of bits per pixel of the lpXORbits bitmap */
1888 LPCVOID lpANDbits
, /* [in] a monochrome bitmap representing the icon's mask */
1889 LPCVOID lpXORbits
) /* [in] the icon's 'color' bitmap */
1894 TRACE_(icon
)("%dx%d, planes %d, bpp %d, xor %p, and %p\n",
1895 nWidth
, nHeight
, bPlanes
, bBitsPixel
, lpXORbits
, lpANDbits
);
1898 iinfo
.xHotspot
= ICON_HOTSPOT
;
1899 iinfo
.yHotspot
= ICON_HOTSPOT
;
1900 iinfo
.hbmMask
= CreateBitmap( nWidth
, nHeight
, 1, 1, lpANDbits
);
1901 iinfo
.hbmColor
= CreateBitmap( nWidth
, nHeight
, bPlanes
, bBitsPixel
, lpXORbits
);
1903 hIcon
= CreateIconIndirect( &iinfo
);
1905 DeleteObject( iinfo
.hbmMask
);
1906 DeleteObject( iinfo
.hbmColor
);
1912 /***********************************************************************
1913 * CreateCursorIconIndirect (USER.408)
1915 HGLOBAL16 WINAPI
CreateCursorIconIndirect16( HINSTANCE16 hInstance
,
1916 CURSORICONINFO
*info
,
1921 cursor_frame_t frame
;
1922 int sizeAnd
, sizeXor
;
1924 if (!lpXORbits
|| !lpANDbits
|| info
->bPlanes
!= 1) return 0;
1925 info
->nWidthBytes
= get_bitmap_width_bytes(info
->nWidth
,info
->bBitsPerPixel
);
1926 sizeXor
= info
->nHeight
* info
->nWidthBytes
;
1927 sizeAnd
= info
->nHeight
* get_bitmap_width_bytes( info
->nWidth
, 1 );
1929 cursor
= create_cursor( 1, 0 );
1930 frame
.xhot
= info
->ptHotSpot
.x
;
1931 frame
.yhot
= info
->ptHotSpot
.y
;
1932 frame
.width
= info
->nWidth
;
1933 frame
.height
= info
->nHeight
;
1934 frame
.and_width_bytes
= get_bitmap_width_bytes( info
->nWidth
, 1 );
1935 frame
.xor_width_bytes
= info
->nWidthBytes
;
1936 frame
.planes
= info
->bPlanes
;
1937 frame
.bpp
= info
->bBitsPerPixel
;
1938 frame
.bits
= HeapAlloc( GetProcessHeap(), 0, sizeAnd
+ sizeXor
);
1939 CopyMemory( frame
.bits
, lpANDbits
, sizeAnd
);
1940 CopyMemory( frame
.bits
+ sizeAnd
, lpXORbits
, sizeXor
);
1941 set_cursor_frame( cursor
, 0, &frame
);
1942 HeapFree( GetProcessHeap(), 0, frame
.bits
);
1944 return HICON_16(cursor
);
1948 /***********************************************************************
1949 * CopyIcon (USER.368)
1951 HICON16 WINAPI
CopyIcon16( HINSTANCE16 hInstance
, HICON16 hIcon
)
1953 TRACE_(icon
)("%04x %04x\n", hInstance
, hIcon
);
1954 return HICON_16(CURSORICON_Copy(hInstance
, HICON_32(hIcon
)));
1958 /***********************************************************************
1959 * CopyIcon (USER32.@)
1961 HICON WINAPI
CopyIcon( HICON hIcon
)
1963 TRACE_(icon
)("%p\n", hIcon
);
1964 return CURSORICON_Copy( 0, hIcon
);
1968 /***********************************************************************
1969 * CopyCursor (USER.369)
1971 HCURSOR16 WINAPI
CopyCursor16( HINSTANCE16 hInstance
, HCURSOR16 hCursor
)
1973 TRACE_(cursor
)("%04x %04x\n", hInstance
, hCursor
);
1974 return HICON_16(CURSORICON_Copy(hInstance
, HCURSOR_32(hCursor
)));
1977 /**********************************************************************
1978 * DestroyIcon32 (USER.610)
1980 * This routine is actually exported from Win95 USER under the name
1981 * DestroyIcon32 ... The behaviour implemented here should mimic
1982 * the Win95 one exactly, especially the return values, which
1983 * depend on the setting of various flags.
1985 WORD WINAPI
DestroyIcon32( HGLOBAL16 handle
, UINT16 flags
)
1989 TRACE_(icon
)("(%04x, %04x)\n", handle
, flags
);
1991 /* Check whether destroying active cursor */
1993 if ( get_user_thread_info()->cursor
== HICON_32(handle
) )
1995 WARN_(cursor
)("Destroying active cursor!\n" );
1999 /* Try shared cursor/icon first */
2001 if ( !(flags
& CID_NONSHARED
) )
2003 INT count
= CURSORICON_DelSharedIcon(HICON_32(handle
));
2006 return (flags
& CID_WIN32
)? TRUE
: (count
== 0);
2008 /* FIXME: OEM cursors/icons should be recognized */
2011 /* Now assume non-shared cursor/icon */
2013 retv
= destroy_cursor( HCURSOR_32(handle
) );
2014 return (flags
& CID_RESOURCE
)? retv
: TRUE
;
2017 /***********************************************************************
2018 * DestroyIcon (USER32.@)
2020 BOOL WINAPI
DestroyIcon( HICON hIcon
)
2022 return DestroyIcon32(HICON_16(hIcon
), CID_WIN32
);
2026 /***********************************************************************
2027 * DestroyCursor (USER32.@)
2029 BOOL WINAPI
DestroyCursor( HCURSOR hCursor
)
2031 return DestroyIcon32(HCURSOR_16(hCursor
), CID_WIN32
);
2035 /***********************************************************************
2036 * DrawIcon (USER32.@)
2038 BOOL WINAPI
DrawIcon( HDC hdc
, INT x
, INT y
, HICON hIcon
)
2040 CURSORICONINFO
*ptr
;
2042 HBITMAP hXorBits
, hAndBits
;
2043 COLORREF oldFg
, oldBg
;
2045 TRACE("%p, (%d,%d), %p\n", hdc
, x
, y
, hIcon
);
2047 if (!(ptr
= (CURSORICONINFO
*)GlobalLock16(HICON_16(hIcon
)))) return FALSE
;
2048 if (!(hMemDC
= CreateCompatibleDC( hdc
))) return FALSE
;
2049 hAndBits
= CreateBitmap( ptr
->nWidth
, ptr
->nHeight
, 1, 1,
2051 hXorBits
= CreateBitmap( ptr
->nWidth
, ptr
->nHeight
, ptr
->bPlanes
,
2052 ptr
->bBitsPerPixel
, (char *)(ptr
+ 1)
2053 + ptr
->nHeight
* get_bitmap_width_bytes(ptr
->nWidth
,1) );
2054 oldFg
= SetTextColor( hdc
, RGB(0,0,0) );
2055 oldBg
= SetBkColor( hdc
, RGB(255,255,255) );
2057 if (hXorBits
&& hAndBits
)
2059 HBITMAP hBitTemp
= SelectObject( hMemDC
, hAndBits
);
2060 BitBlt( hdc
, x
, y
, ptr
->nWidth
, ptr
->nHeight
, hMemDC
, 0, 0, SRCAND
);
2061 SelectObject( hMemDC
, hXorBits
);
2062 BitBlt(hdc
, x
, y
, ptr
->nWidth
, ptr
->nHeight
, hMemDC
, 0, 0,SRCINVERT
);
2063 SelectObject( hMemDC
, hBitTemp
);
2066 if (hXorBits
) DeleteObject( hXorBits
);
2067 if (hAndBits
) DeleteObject( hAndBits
);
2068 GlobalUnlock16(HICON_16(hIcon
));
2069 SetTextColor( hdc
, oldFg
);
2070 SetBkColor( hdc
, oldBg
);
2074 /***********************************************************************
2075 * DumpIcon (USER.459)
2077 DWORD WINAPI
DumpIcon16( SEGPTR pInfo
, WORD
*lpLen
,
2078 SEGPTR
*lpXorBits
, SEGPTR
*lpAndBits
)
2080 CURSORICONINFO
*info
= MapSL( pInfo
);
2081 int sizeAnd
, sizeXor
;
2083 if (!info
) return 0;
2084 sizeXor
= info
->nHeight
* info
->nWidthBytes
;
2085 sizeAnd
= info
->nHeight
* get_bitmap_width_bytes( info
->nWidth
, 1 );
2086 if (lpAndBits
) *lpAndBits
= pInfo
+ sizeof(CURSORICONINFO
);
2087 if (lpXorBits
) *lpXorBits
= pInfo
+ sizeof(CURSORICONINFO
) + sizeAnd
;
2088 if (lpLen
) *lpLen
= sizeof(CURSORICONINFO
) + sizeAnd
+ sizeXor
;
2089 return MAKELONG( sizeXor
, sizeXor
);
2093 /***********************************************************************
2094 * SetCursor (USER32.@)
2096 * Set the cursor shape.
2099 * A handle to the previous cursor shape.
2101 HCURSOR WINAPI
SetCursor( HCURSOR hCursor
/* [in] Handle of cursor to show */ )
2103 struct user_thread_info
*thread_info
= get_user_thread_info();
2106 if (hCursor
== thread_info
->cursor
) return hCursor
; /* No change */
2107 TRACE("%p\n", hCursor
);
2108 hOldCursor
= thread_info
->cursor
;
2109 thread_info
->cursor
= hCursor
;
2110 /* Change the cursor shape only if it is visible */
2111 if (thread_info
->cursor_count
>= 0)
2115 update_cursor_32from16( hCursor
);
2116 cursor
= get_cursor_object( hCursor
);
2117 USER_Driver
->pSetCursor( cursor
);
2118 destroy_cursor_object( cursor
);
2123 /***********************************************************************
2124 * ShowCursor (USER32.@)
2126 INT WINAPI
ShowCursor( BOOL bShow
)
2128 struct user_thread_info
*thread_info
= get_user_thread_info();
2130 TRACE("%d, count=%d\n", bShow
, thread_info
->cursor_count
);
2134 if (++thread_info
->cursor_count
== 0) /* Show it */
2138 update_cursor_32from16( thread_info
->cursor
);
2139 cursor
= get_cursor_object( thread_info
->cursor
);
2140 USER_Driver
->pSetCursor( cursor
);
2141 destroy_cursor_object( cursor
);
2146 if (--thread_info
->cursor_count
== -1) /* Hide it */
2147 USER_Driver
->pSetCursor( NULL
);
2149 return thread_info
->cursor_count
;
2152 /***********************************************************************
2153 * GetCursor (USER32.@)
2155 HCURSOR WINAPI
GetCursor(void)
2157 return get_user_thread_info()->cursor
;
2161 /***********************************************************************
2162 * ClipCursor (USER32.@)
2164 BOOL WINAPI
ClipCursor( const RECT
*rect
)
2168 SetRect( &virt
, 0, 0, GetSystemMetrics( SM_CXVIRTUALSCREEN
),
2169 GetSystemMetrics( SM_CYVIRTUALSCREEN
) );
2170 OffsetRect( &virt
, GetSystemMetrics( SM_XVIRTUALSCREEN
),
2171 GetSystemMetrics( SM_YVIRTUALSCREEN
) );
2173 TRACE( "Clipping to: %s was: %s screen: %s\n", wine_dbgstr_rect(rect
),
2174 wine_dbgstr_rect(&CURSOR_ClipRect
), wine_dbgstr_rect(&virt
) );
2176 if (!IntersectRect( &CURSOR_ClipRect
, &virt
, rect
))
2177 CURSOR_ClipRect
= virt
;
2179 USER_Driver
->pClipCursor( rect
);
2184 /***********************************************************************
2185 * GetClipCursor (USER32.@)
2187 BOOL WINAPI
GetClipCursor( RECT
*rect
)
2189 /* If this is first time - initialize the rect */
2190 if (IsRectEmpty( &CURSOR_ClipRect
)) ClipCursor( NULL
);
2192 return CopyRect( rect
, &CURSOR_ClipRect
);
2196 /***********************************************************************
2197 * SetSystemCursor (USER32.@)
2199 BOOL WINAPI
SetSystemCursor(HCURSOR hcur
, DWORD id
)
2201 FIXME("(%p,%08x),stub!\n", hcur
, id
);
2206 /**********************************************************************
2207 * LookupIconIdFromDirectoryEx (USER.364)
2209 * FIXME: exact parameter sizes
2211 INT16 WINAPI
LookupIconIdFromDirectoryEx16( LPBYTE dir
, BOOL16 bIcon
,
2212 INT16 width
, INT16 height
, UINT16 cFlag
)
2214 return LookupIconIdFromDirectoryEx( dir
, bIcon
, width
, height
, cFlag
);
2217 /**********************************************************************
2218 * LookupIconIdFromDirectoryEx (USER32.@)
2220 INT WINAPI
LookupIconIdFromDirectoryEx( LPBYTE xdir
, BOOL bIcon
,
2221 INT width
, INT height
, UINT cFlag
)
2223 CURSORICONDIR
*dir
= (CURSORICONDIR
*)xdir
;
2225 if( dir
&& !dir
->idReserved
&& (dir
->idType
& 3) )
2227 CURSORICONDIRENTRY
* entry
;
2232 palEnts
= GetSystemPaletteEntries(hdc
, 0, 0, NULL
);
2235 colors
= (cFlag
& LR_MONOCHROME
) ? 2 : palEnts
;
2240 entry
= CURSORICON_FindBestIconRes( dir
, width
, height
, colors
);
2242 entry
= CURSORICON_FindBestCursorRes( dir
, width
, height
, 1);
2244 if( entry
) retVal
= entry
->wResId
;
2246 else WARN_(cursor
)("invalid resource directory\n");
2250 /**********************************************************************
2251 * LookupIconIdFromDirectory (USER.?)
2253 INT16 WINAPI
LookupIconIdFromDirectory16( LPBYTE dir
, BOOL16 bIcon
)
2255 return LookupIconIdFromDirectoryEx16( dir
, bIcon
,
2256 bIcon
? GetSystemMetrics(SM_CXICON
) : GetSystemMetrics(SM_CXCURSOR
),
2257 bIcon
? GetSystemMetrics(SM_CYICON
) : GetSystemMetrics(SM_CYCURSOR
), bIcon
? 0 : LR_MONOCHROME
);
2260 /**********************************************************************
2261 * LookupIconIdFromDirectory (USER32.@)
2263 INT WINAPI
LookupIconIdFromDirectory( LPBYTE dir
, BOOL bIcon
)
2265 return LookupIconIdFromDirectoryEx( dir
, bIcon
,
2266 bIcon
? GetSystemMetrics(SM_CXICON
) : GetSystemMetrics(SM_CXCURSOR
),
2267 bIcon
? GetSystemMetrics(SM_CYICON
) : GetSystemMetrics(SM_CYCURSOR
), bIcon
? 0 : LR_MONOCHROME
);
2270 /**********************************************************************
2271 * GetIconID (USER.455)
2273 WORD WINAPI
GetIconID16( HGLOBAL16 hResource
, DWORD resType
)
2275 LPBYTE lpDir
= (LPBYTE
)GlobalLock16(hResource
);
2277 TRACE_(cursor
)("hRes=%04x, entries=%i\n",
2278 hResource
, lpDir
? ((CURSORICONDIR
*)lpDir
)->idCount
: 0);
2283 return (WORD
)LookupIconIdFromDirectoryEx16( lpDir
, FALSE
,
2284 GetSystemMetrics(SM_CXCURSOR
), GetSystemMetrics(SM_CYCURSOR
), LR_MONOCHROME
);
2286 return (WORD
)LookupIconIdFromDirectoryEx16( lpDir
, TRUE
,
2287 GetSystemMetrics(SM_CXICON
), GetSystemMetrics(SM_CYICON
), 0 );
2289 WARN_(cursor
)("invalid res type %d\n", resType
);
2294 /**********************************************************************
2295 * LoadCursorIconHandler (USER.336)
2297 * Supposed to load resources of Windows 2.x applications.
2299 HGLOBAL16 WINAPI
LoadCursorIconHandler16( HGLOBAL16 hResource
, HMODULE16 hModule
, HRSRC16 hRsrc
)
2301 FIXME_(cursor
)("(%04x,%04x,%04x): old 2.x resources are not supported!\n",
2302 hResource
, hModule
, hRsrc
);
2303 return (HGLOBAL16
)0;
2306 /**********************************************************************
2307 * LoadIconHandler (USER.456)
2309 HICON16 WINAPI
LoadIconHandler16( HGLOBAL16 hResource
, BOOL16 bNew
)
2311 LPBYTE bits
= (LPBYTE
)LockResource16( hResource
);
2313 TRACE_(cursor
)("hRes=%04x\n",hResource
);
2315 return HICON_16(CreateIconFromResourceEx( bits
, 0, TRUE
,
2316 bNew
? 0x00030000 : 0x00020000, 0, 0, LR_DEFAULTCOLOR
));
2319 /***********************************************************************
2320 * LoadCursorW (USER32.@)
2322 HCURSOR WINAPI
LoadCursorW(HINSTANCE hInstance
, LPCWSTR name
)
2324 TRACE("%p, %s\n", hInstance
, debugstr_w(name
));
2326 return LoadImageW( hInstance
, name
, IMAGE_CURSOR
, 0, 0,
2327 LR_SHARED
| LR_DEFAULTSIZE
);
2330 /***********************************************************************
2331 * LoadCursorA (USER32.@)
2333 HCURSOR WINAPI
LoadCursorA(HINSTANCE hInstance
, LPCSTR name
)
2335 TRACE("%p, %s\n", hInstance
, debugstr_a(name
));
2337 return LoadImageA( hInstance
, name
, IMAGE_CURSOR
, 0, 0,
2338 LR_SHARED
| LR_DEFAULTSIZE
);
2341 /***********************************************************************
2342 * LoadCursorFromFileW (USER32.@)
2344 HCURSOR WINAPI
LoadCursorFromFileW (LPCWSTR name
)
2346 TRACE("%s\n", debugstr_w(name
));
2348 return LoadImageW( 0, name
, IMAGE_CURSOR
, 0, 0,
2349 LR_LOADFROMFILE
| LR_DEFAULTSIZE
);
2352 /***********************************************************************
2353 * LoadCursorFromFileA (USER32.@)
2355 HCURSOR WINAPI
LoadCursorFromFileA (LPCSTR name
)
2357 TRACE("%s\n", debugstr_a(name
));
2359 return LoadImageA( 0, name
, IMAGE_CURSOR
, 0, 0,
2360 LR_LOADFROMFILE
| LR_DEFAULTSIZE
);
2363 /***********************************************************************
2364 * LoadIconW (USER32.@)
2366 HICON WINAPI
LoadIconW(HINSTANCE hInstance
, LPCWSTR name
)
2368 TRACE("%p, %s\n", hInstance
, debugstr_w(name
));
2370 return LoadImageW( hInstance
, name
, IMAGE_ICON
, 0, 0,
2371 LR_SHARED
| LR_DEFAULTSIZE
);
2374 /***********************************************************************
2375 * LoadIconA (USER32.@)
2377 HICON WINAPI
LoadIconA(HINSTANCE hInstance
, LPCSTR name
)
2379 TRACE("%p, %s\n", hInstance
, debugstr_a(name
));
2381 return LoadImageA( hInstance
, name
, IMAGE_ICON
, 0, 0,
2382 LR_SHARED
| LR_DEFAULTSIZE
);
2385 /**********************************************************************
2386 * GetIconInfo (USER32.@)
2388 BOOL WINAPI
GetIconInfo(HICON hIcon
, PICONINFO iconinfo
)
2390 CURSORICONINFO
*ciconinfo
;
2393 ciconinfo
= GlobalLock16(HICON_16(hIcon
));
2397 TRACE("%p => %dx%d, %d bpp\n", hIcon
,
2398 ciconinfo
->nWidth
, ciconinfo
->nHeight
, ciconinfo
->bBitsPerPixel
);
2400 if ( (ciconinfo
->ptHotSpot
.x
== ICON_HOTSPOT
) &&
2401 (ciconinfo
->ptHotSpot
.y
== ICON_HOTSPOT
) )
2403 iconinfo
->fIcon
= TRUE
;
2404 iconinfo
->xHotspot
= ciconinfo
->nWidth
/ 2;
2405 iconinfo
->yHotspot
= ciconinfo
->nHeight
/ 2;
2409 iconinfo
->fIcon
= FALSE
;
2410 iconinfo
->xHotspot
= ciconinfo
->ptHotSpot
.x
;
2411 iconinfo
->yHotspot
= ciconinfo
->ptHotSpot
.y
;
2414 height
= ciconinfo
->nHeight
;
2416 if (ciconinfo
->bBitsPerPixel
> 1)
2418 iconinfo
->hbmColor
= CreateBitmap( ciconinfo
->nWidth
, ciconinfo
->nHeight
,
2419 ciconinfo
->bPlanes
, ciconinfo
->bBitsPerPixel
,
2420 (char *)(ciconinfo
+ 1)
2421 + ciconinfo
->nHeight
*
2422 get_bitmap_width_bytes (ciconinfo
->nWidth
,1) );
2426 iconinfo
->hbmColor
= 0;
2430 iconinfo
->hbmMask
= CreateBitmap ( ciconinfo
->nWidth
, height
,
2431 1, 1, (char *)(ciconinfo
+ 1));
2433 GlobalUnlock16(HICON_16(hIcon
));
2438 /**********************************************************************
2439 * CreateIconIndirect (USER32.@)
2441 HICON WINAPI
CreateIconIndirect(PICONINFO iconinfo
)
2444 cursor_frame_t frame
;
2447 int xor_objsize
= 0, sizeXor
= 0, sizeAnd
, planes
, bpp
;
2449 TRACE("color %p, mask %p, hotspot %ux%u, fIcon %d\n",
2450 iconinfo
->hbmColor
, iconinfo
->hbmMask
,
2451 iconinfo
->xHotspot
, iconinfo
->yHotspot
, iconinfo
->fIcon
);
2453 if (!iconinfo
->hbmMask
) return 0;
2455 planes
= GetDeviceCaps( screen_dc
, PLANES
);
2456 bpp
= GetDeviceCaps( screen_dc
, BITSPIXEL
);
2458 if (iconinfo
->hbmColor
)
2460 xor_objsize
= GetObjectW( iconinfo
->hbmColor
, sizeof(bmpXor
), &bmpXor
);
2461 TRACE("color: width %d, height %d, width bytes %d, planes %u, bpp %u\n",
2462 bmpXor
.dsBm
.bmWidth
, bmpXor
.dsBm
.bmHeight
, bmpXor
.dsBm
.bmWidthBytes
,
2463 bmpXor
.dsBm
.bmPlanes
, bmpXor
.dsBm
.bmBitsPixel
);
2464 /* we can use either depth 1 or screen depth for xor bitmap */
2465 if (bmpXor
.dsBm
.bmPlanes
== 1 && bmpXor
.dsBm
.bmBitsPixel
== 1) planes
= bpp
= 1;
2466 sizeXor
= bmpXor
.dsBm
.bmHeight
* planes
* get_bitmap_width_bytes( bmpXor
.dsBm
.bmWidth
, bpp
);
2468 GetObjectW( iconinfo
->hbmMask
, sizeof(bmpAnd
), &bmpAnd
);
2469 TRACE("mask: width %d, height %d, width bytes %d, planes %u, bpp %u\n",
2470 bmpAnd
.bmWidth
, bmpAnd
.bmHeight
, bmpAnd
.bmWidthBytes
,
2471 bmpAnd
.bmPlanes
, bmpAnd
.bmBitsPixel
);
2473 sizeAnd
= bmpAnd
.bmHeight
* get_bitmap_width_bytes(bmpAnd
.bmWidth
, 1);
2475 cursor
= create_cursor( 1, 0 );
2477 /* If we are creating an icon, the hotspot is unused */
2478 if (iconinfo
->fIcon
)
2480 frame
.xhot
= ICON_HOTSPOT
;
2481 frame
.yhot
= ICON_HOTSPOT
;
2485 frame
.xhot
= iconinfo
->xHotspot
;
2486 frame
.yhot
= iconinfo
->yHotspot
;
2489 if (iconinfo
->hbmColor
)
2491 frame
.width
= bmpXor
.dsBm
.bmWidth
;
2492 frame
.height
= bmpXor
.dsBm
.bmHeight
;
2493 frame
.and_width_bytes
= bmpAnd
.bmWidthBytes
;
2494 frame
.xor_width_bytes
= bmpXor
.dsBm
.bmWidthBytes
;
2495 frame
.planes
= planes
;
2500 frame
.width
= bmpAnd
.bmWidth
;
2501 frame
.height
= bmpAnd
.bmHeight
/ 2;
2502 frame
.and_width_bytes
= get_bitmap_width_bytes(bmpAnd
.bmWidth
, 1);
2503 frame
.xor_width_bytes
= 0;
2508 frame
.bits
= HeapAlloc( GetProcessHeap(), 0, sizeAnd
+ sizeXor
);
2510 /* Some apps pass a color bitmap as a mask, convert it to b/w */
2511 if (bmpAnd
.bmBitsPixel
== 1)
2513 GetBitmapBits( iconinfo
->hbmMask
, sizeAnd
, frame
.bits
);
2518 HBITMAP hbmp_old
, hbmp_mem_old
, hbmp_mono
;
2521 hdc_mem
= CreateCompatibleDC( hdc
);
2523 hbmp_mono
= CreateBitmap( bmpAnd
.bmWidth
, bmpAnd
.bmHeight
, 1, 1, NULL
);
2525 hbmp_old
= SelectObject( hdc
, iconinfo
->hbmMask
);
2526 hbmp_mem_old
= SelectObject( hdc_mem
, hbmp_mono
);
2528 BitBlt( hdc_mem
, 0, 0, bmpAnd
.bmWidth
, bmpAnd
.bmHeight
, hdc
, 0, 0, SRCCOPY
);
2530 SelectObject( hdc
, hbmp_old
);
2531 SelectObject( hdc_mem
, hbmp_mem_old
);
2533 DeleteDC( hdc_mem
);
2534 ReleaseDC( 0, hdc
);
2536 GetBitmapBits( hbmp_mono
, sizeAnd
, frame
.bits
);
2537 DeleteObject( hbmp_mono
);
2540 if (iconinfo
->hbmColor
)
2542 unsigned char *dst_bits
= frame
.bits
+ sizeAnd
;
2544 if (bmpXor
.dsBm
.bmPlanes
== planes
&& bmpXor
.dsBm
.bmBitsPixel
== bpp
)
2545 GetBitmapBits( iconinfo
->hbmColor
, sizeXor
, dst_bits
);
2549 int dib_width
= get_dib_width_bytes( frame
.width
, frame
.bpp
);
2550 int bitmap_width
= get_bitmap_width_bytes( frame
.width
, frame
.bpp
);
2552 bminfo
.bmiHeader
.biSize
= sizeof(bminfo
);
2553 bminfo
.bmiHeader
.biWidth
= frame
.width
;
2554 bminfo
.bmiHeader
.biHeight
= frame
.height
;
2555 bminfo
.bmiHeader
.biPlanes
= frame
.planes
;
2556 bminfo
.bmiHeader
.biBitCount
= frame
.bpp
;
2557 bminfo
.bmiHeader
.biCompression
= BI_RGB
;
2558 bminfo
.bmiHeader
.biSizeImage
= frame
.height
* dib_width
;
2559 bminfo
.bmiHeader
.biXPelsPerMeter
= 0;
2560 bminfo
.bmiHeader
.biYPelsPerMeter
= 0;
2561 bminfo
.bmiHeader
.biClrUsed
= 0;
2562 bminfo
.bmiHeader
.biClrImportant
= 0;
2564 /* swap lines for dib sections */
2565 if (xor_objsize
== sizeof(DIBSECTION
))
2566 bminfo
.bmiHeader
.biHeight
= -bminfo
.bmiHeader
.biHeight
;
2568 if (dib_width
!= bitmap_width
) /* need to fixup alignment */
2570 char *src_bits
= HeapAlloc( GetProcessHeap(), 0, bminfo
.bmiHeader
.biSizeImage
);
2572 if (src_bits
&& GetDIBits( screen_dc
, iconinfo
->hbmColor
, 0, frame
.height
,
2573 src_bits
, &bminfo
, DIB_RGB_COLORS
))
2576 for (y
= 0; y
< frame
.height
; y
++)
2577 memcpy( dst_bits
+ y
* bitmap_width
, src_bits
+ y
* dib_width
, bitmap_width
);
2579 HeapFree( GetProcessHeap(), 0, src_bits
);
2582 GetDIBits( screen_dc
, iconinfo
->hbmColor
, 0, frame
.height
,
2583 dst_bits
, &bminfo
, DIB_RGB_COLORS
);
2586 set_cursor_frame( cursor
, 0, &frame
);
2587 HeapFree( GetProcessHeap(), 0, frame
.bits
);
2592 /******************************************************************************
2593 * DrawIconEx (USER32.@) Draws an icon or cursor on device context
2596 * Why is this using SM_CXICON instead of SM_CXCURSOR?
2599 * hdc [I] Handle to device context
2600 * x0 [I] X coordinate of upper left corner
2601 * y0 [I] Y coordinate of upper left corner
2602 * hIcon [I] Handle to icon to draw
2603 * cxWidth [I] Width of icon
2604 * cyWidth [I] Height of icon
2605 * istep [I] Index of frame in animated cursor
2606 * hbr [I] Handle to background brush
2607 * flags [I] Icon-drawing flags
2613 BOOL WINAPI
DrawIconEx( HDC hdc
, INT x0
, INT y0
, HICON hIcon
,
2614 INT cxWidth
, INT cyWidth
, UINT istep
,
2615 HBRUSH hbr
, UINT flags
)
2617 CURSORICONINFO
*ptr
= (CURSORICONINFO
*)GlobalLock16(HICON_16(hIcon
));
2618 HDC hDC_off
= 0, hMemDC
;
2619 BOOL result
= FALSE
, DoOffscreen
;
2620 HBITMAP hB_off
= 0, hOld
= 0;
2622 if (!ptr
) return FALSE
;
2623 TRACE_(icon
)("(hdc=%p,pos=%d.%d,hicon=%p,extend=%d.%d,istep=%d,br=%p,flags=0x%08x)\n",
2624 hdc
,x0
,y0
,hIcon
,cxWidth
,cyWidth
,istep
,hbr
,flags
);
2626 hMemDC
= CreateCompatibleDC (hdc
);
2628 FIXME_(icon
)("Ignoring istep=%d\n", istep
);
2629 if (flags
& DI_NOMIRROR
)
2630 FIXME_(icon
)("Ignoring flag DI_NOMIRROR\n");
2633 FIXME_(icon
)("no flags set? setting to DI_NORMAL\n");
2637 /* Calculate the size of the destination image. */
2640 if (flags
& DI_DEFAULTSIZE
)
2641 cxWidth
= GetSystemMetrics (SM_CXICON
);
2643 cxWidth
= ptr
->nWidth
;
2647 if (flags
& DI_DEFAULTSIZE
)
2648 cyWidth
= GetSystemMetrics (SM_CYICON
);
2650 cyWidth
= ptr
->nHeight
;
2653 DoOffscreen
= (GetObjectType( hbr
) == OBJ_BRUSH
);
2663 hDC_off
= CreateCompatibleDC(hdc
);
2664 hB_off
= CreateCompatibleBitmap(hdc
, cxWidth
, cyWidth
);
2665 if (hDC_off
&& hB_off
) {
2666 hOld
= SelectObject(hDC_off
, hB_off
);
2667 FillRect(hDC_off
, &r
, hbr
);
2671 if (hMemDC
&& (!DoOffscreen
|| (hDC_off
&& hB_off
)))
2673 HBITMAP hXorBits
, hAndBits
;
2674 COLORREF oldFg
, oldBg
;
2677 nStretchMode
= SetStretchBltMode (hdc
, STRETCH_DELETESCANS
);
2679 hXorBits
= CreateBitmap ( ptr
->nWidth
, ptr
->nHeight
,
2680 ptr
->bPlanes
, ptr
->bBitsPerPixel
,
2683 get_bitmap_width_bytes(ptr
->nWidth
,1) );
2684 hAndBits
= CreateBitmap ( ptr
->nWidth
, ptr
->nHeight
,
2685 1, 1, (char *)(ptr
+1) );
2686 oldFg
= SetTextColor( hdc
, RGB(0,0,0) );
2687 oldBg
= SetBkColor( hdc
, RGB(255,255,255) );
2689 if (hXorBits
&& hAndBits
)
2691 HBITMAP hBitTemp
= SelectObject( hMemDC
, hAndBits
);
2692 if (flags
& DI_MASK
)
2695 StretchBlt (hDC_off
, 0, 0, cxWidth
, cyWidth
,
2696 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCAND
);
2698 StretchBlt (hdc
, x0
, y0
, cxWidth
, cyWidth
,
2699 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCAND
);
2701 SelectObject( hMemDC
, hXorBits
);
2702 if (flags
& DI_IMAGE
)
2705 StretchBlt (hDC_off
, 0, 0, cxWidth
, cyWidth
,
2706 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCPAINT
);
2708 StretchBlt (hdc
, x0
, y0
, cxWidth
, cyWidth
,
2709 hMemDC
, 0, 0, ptr
->nWidth
, ptr
->nHeight
, SRCPAINT
);
2711 SelectObject( hMemDC
, hBitTemp
);
2715 SetTextColor( hdc
, oldFg
);
2716 SetBkColor( hdc
, oldBg
);
2717 if (hXorBits
) DeleteObject( hXorBits
);
2718 if (hAndBits
) DeleteObject( hAndBits
);
2719 SetStretchBltMode (hdc
, nStretchMode
);
2721 BitBlt(hdc
, x0
, y0
, cxWidth
, cyWidth
, hDC_off
, 0, 0, SRCCOPY
);
2722 SelectObject(hDC_off
, hOld
);
2725 if (hMemDC
) DeleteDC( hMemDC
);
2726 if (hDC_off
) DeleteDC(hDC_off
);
2727 if (hB_off
) DeleteObject(hB_off
);
2728 GlobalUnlock16(HICON_16(hIcon
));
2732 /***********************************************************************
2733 * DIB_FixColorsToLoadflags
2735 * Change color table entries when LR_LOADTRANSPARENT or LR_LOADMAP3DCOLORS
2738 static void DIB_FixColorsToLoadflags(BITMAPINFO
* bmi
, UINT loadflags
, BYTE pix
)
2741 COLORREF c_W
, c_S
, c_F
, c_L
, c_C
;
2750 if (((bitmap_type
= DIB_GetBitmapInfo((BITMAPINFOHEADER
*) bmi
, &width
, &height
, &bpp
, &compr
)) == -1))
2752 WARN_(resource
)("Invalid bitmap\n");
2756 if (bpp
> 8) return;
2758 if (bitmap_type
== 0) /* BITMAPCOREHEADER */
2766 colors
= bmi
->bmiHeader
.biClrUsed
;
2767 if (colors
> 256) colors
= 256;
2768 if (!colors
&& (bpp
<= 8)) colors
= 1 << bpp
;
2771 c_W
= GetSysColor(COLOR_WINDOW
);
2772 c_S
= GetSysColor(COLOR_3DSHADOW
);
2773 c_F
= GetSysColor(COLOR_3DFACE
);
2774 c_L
= GetSysColor(COLOR_3DLIGHT
);
2776 if (loadflags
& LR_LOADTRANSPARENT
) {
2778 case 1: pix
= pix
>> 7; break;
2779 case 4: pix
= pix
>> 4; break;
2782 WARN_(resource
)("(%d): Unsupported depth\n", bpp
);
2785 if (pix
>= colors
) {
2786 WARN_(resource
)("pixel has color index greater than biClrUsed!\n");
2789 if (loadflags
& LR_LOADMAP3DCOLORS
) c_W
= c_F
;
2790 ptr
= (RGBQUAD
*)((char*)bmi
->bmiColors
+pix
*incr
);
2791 ptr
->rgbBlue
= GetBValue(c_W
);
2792 ptr
->rgbGreen
= GetGValue(c_W
);
2793 ptr
->rgbRed
= GetRValue(c_W
);
2795 if (loadflags
& LR_LOADMAP3DCOLORS
)
2796 for (i
=0; i
<colors
; i
++) {
2797 ptr
= (RGBQUAD
*)((char*)bmi
->bmiColors
+i
*incr
);
2798 c_C
= RGB(ptr
->rgbRed
, ptr
->rgbGreen
, ptr
->rgbBlue
);
2799 if (c_C
== RGB(128, 128, 128)) {
2800 ptr
->rgbRed
= GetRValue(c_S
);
2801 ptr
->rgbGreen
= GetGValue(c_S
);
2802 ptr
->rgbBlue
= GetBValue(c_S
);
2803 } else if (c_C
== RGB(192, 192, 192)) {
2804 ptr
->rgbRed
= GetRValue(c_F
);
2805 ptr
->rgbGreen
= GetGValue(c_F
);
2806 ptr
->rgbBlue
= GetBValue(c_F
);
2807 } else if (c_C
== RGB(223, 223, 223)) {
2808 ptr
->rgbRed
= GetRValue(c_L
);
2809 ptr
->rgbGreen
= GetGValue(c_L
);
2810 ptr
->rgbBlue
= GetBValue(c_L
);
2816 /**********************************************************************
2819 static HBITMAP
BITMAP_Load( HINSTANCE instance
, LPCWSTR name
,
2820 INT desiredx
, INT desiredy
, UINT loadflags
)
2822 HBITMAP hbitmap
= 0, orig_bm
;
2826 BITMAPINFO
*info
, *fix_info
= NULL
, *scaled_info
= NULL
;
2830 LONG width
, height
, new_width
, new_height
;
2834 HDC screen_mem_dc
= NULL
;
2836 if (!(loadflags
& LR_LOADFROMFILE
))
2840 /* OEM bitmap: try to load the resource from user32.dll */
2841 instance
= user32_module
;
2844 if (!(hRsrc
= FindResourceW( instance
, name
, (LPWSTR
)RT_BITMAP
))) return 0;
2845 if (!(handle
= LoadResource( instance
, hRsrc
))) return 0;
2847 if ((info
= (BITMAPINFO
*)LockResource( handle
)) == NULL
) return 0;
2851 BITMAPFILEHEADER
* bmfh
;
2853 if (!(ptr
= map_fileW( name
, NULL
))) return 0;
2854 info
= (BITMAPINFO
*)(ptr
+ sizeof(BITMAPFILEHEADER
));
2855 bmfh
= (BITMAPFILEHEADER
*)ptr
;
2856 if (!( bmfh
->bfType
== 0x4d42 /* 'BM' */ &&
2857 bmfh
->bfReserved1
== 0 &&
2858 bmfh
->bfReserved2
== 0))
2860 WARN("Invalid/unsupported bitmap format!\n");
2861 UnmapViewOfFile( ptr
);
2866 size
= bitmap_info_size(info
, DIB_RGB_COLORS
);
2867 fix_info
= HeapAlloc(GetProcessHeap(), 0, size
);
2868 scaled_info
= HeapAlloc(GetProcessHeap(), 0, size
);
2870 if (!fix_info
|| !scaled_info
) goto end
;
2871 memcpy(fix_info
, info
, size
);
2873 pix
= *((LPBYTE
)info
+ size
);
2874 DIB_FixColorsToLoadflags(fix_info
, loadflags
, pix
);
2876 memcpy(scaled_info
, fix_info
, size
);
2877 bm_type
= DIB_GetBitmapInfo( &fix_info
->bmiHeader
, &width
, &height
,
2878 &bpp_dummy
, &compr_dummy
);
2880 new_width
= desiredx
;
2885 new_height
= height
> 0 ? desiredy
: -desiredy
;
2887 new_height
= height
;
2891 BITMAPCOREHEADER
*core
= (BITMAPCOREHEADER
*)&scaled_info
->bmiHeader
;
2892 core
->bcWidth
= new_width
;
2893 core
->bcHeight
= new_height
;
2897 scaled_info
->bmiHeader
.biWidth
= new_width
;
2898 scaled_info
->bmiHeader
.biHeight
= new_height
;
2901 if (new_height
< 0) new_height
= -new_height
;
2903 if (!screen_dc
) screen_dc
= CreateDCW( DISPLAYW
, NULL
, NULL
, NULL
);
2904 if (!(screen_mem_dc
= CreateCompatibleDC( screen_dc
))) goto end
;
2906 bits
= (char *)info
+ size
;
2908 if (loadflags
& LR_CREATEDIBSECTION
)
2910 scaled_info
->bmiHeader
.biCompression
= 0; /* DIBSection can't be compressed */
2911 hbitmap
= CreateDIBSection(screen_dc
, scaled_info
, DIB_RGB_COLORS
, NULL
, 0, 0);
2915 if (is_dib_monochrome(fix_info
))
2916 hbitmap
= CreateBitmap(new_width
, new_height
, 1, 1, NULL
);
2918 hbitmap
= CreateCompatibleBitmap(screen_dc
, new_width
, new_height
);
2921 orig_bm
= SelectObject(screen_mem_dc
, hbitmap
);
2922 StretchDIBits(screen_mem_dc
, 0, 0, new_width
, new_height
, 0, 0, width
, height
, bits
, fix_info
, DIB_RGB_COLORS
, SRCCOPY
);
2923 SelectObject(screen_mem_dc
, orig_bm
);
2926 if (screen_mem_dc
) DeleteDC(screen_mem_dc
);
2927 HeapFree(GetProcessHeap(), 0, scaled_info
);
2928 HeapFree(GetProcessHeap(), 0, fix_info
);
2929 if (loadflags
& LR_LOADFROMFILE
) UnmapViewOfFile( ptr
);
2934 /**********************************************************************
2935 * LoadImageA (USER32.@)
2939 HANDLE WINAPI
LoadImageA( HINSTANCE hinst
, LPCSTR name
, UINT type
,
2940 INT desiredx
, INT desiredy
, UINT loadflags
)
2946 return LoadImageW(hinst
, (LPCWSTR
)name
, type
, desiredx
, desiredy
, loadflags
);
2949 DWORD len
= MultiByteToWideChar( CP_ACP
, 0, name
, -1, NULL
, 0 );
2950 u_name
= HeapAlloc( GetProcessHeap(), 0, len
* sizeof(WCHAR
) );
2951 MultiByteToWideChar( CP_ACP
, 0, name
, -1, u_name
, len
);
2953 __EXCEPT_PAGE_FAULT
{
2954 SetLastError( ERROR_INVALID_PARAMETER
);
2958 res
= LoadImageW(hinst
, u_name
, type
, desiredx
, desiredy
, loadflags
);
2959 HeapFree(GetProcessHeap(), 0, u_name
);
2964 /******************************************************************************
2965 * LoadImageW (USER32.@) Loads an icon, cursor, or bitmap
2968 * hinst [I] Handle of instance that contains image
2969 * name [I] Name of image
2970 * type [I] Type of image
2971 * desiredx [I] Desired width
2972 * desiredy [I] Desired height
2973 * loadflags [I] Load flags
2976 * Success: Handle to newly loaded image
2979 * FIXME: Implementation lacks some features, see LR_ defines in winuser.h
2981 HANDLE WINAPI
LoadImageW( HINSTANCE hinst
, LPCWSTR name
, UINT type
,
2982 INT desiredx
, INT desiredy
, UINT loadflags
)
2984 TRACE_(resource
)("(%p,%s,%d,%d,%d,0x%08x)\n",
2985 hinst
,debugstr_w(name
),type
,desiredx
,desiredy
,loadflags
);
2987 if (loadflags
& LR_DEFAULTSIZE
) {
2988 if (type
== IMAGE_ICON
) {
2989 if (!desiredx
) desiredx
= GetSystemMetrics(SM_CXICON
);
2990 if (!desiredy
) desiredy
= GetSystemMetrics(SM_CYICON
);
2991 } else if (type
== IMAGE_CURSOR
) {
2992 if (!desiredx
) desiredx
= GetSystemMetrics(SM_CXCURSOR
);
2993 if (!desiredy
) desiredy
= GetSystemMetrics(SM_CYCURSOR
);
2996 if (loadflags
& LR_LOADFROMFILE
) loadflags
&= ~LR_SHARED
;
2999 return BITMAP_Load( hinst
, name
, desiredx
, desiredy
, loadflags
);
3002 if (!screen_dc
) screen_dc
= CreateDCW( DISPLAYW
, NULL
, NULL
, NULL
);
3005 UINT palEnts
= GetSystemPaletteEntries(screen_dc
, 0, 0, NULL
);
3006 if (palEnts
== 0) palEnts
= 256;
3007 return CURSORICON_Load(hinst
, name
, desiredx
, desiredy
,
3008 palEnts
, FALSE
, loadflags
);
3013 return CURSORICON_Load(hinst
, name
, desiredx
, desiredy
,
3014 1, TRUE
, loadflags
);
3019 /******************************************************************************
3020 * CopyImage (USER32.@) Creates new image and copies attributes to it
3023 * hnd [I] Handle to image to copy
3024 * type [I] Type of image to copy
3025 * desiredx [I] Desired width of new image
3026 * desiredy [I] Desired height of new image
3027 * flags [I] Copy flags
3030 * Success: Handle to newly created image
3034 * Only Windows NT 4.0 supports the LR_COPYRETURNORG flag for bitmaps,
3035 * all other versions (95/2000/XP have been tested) ignore it.
3038 * If LR_CREATEDIBSECTION is absent, the copy will be monochrome for
3039 * a monochrome source bitmap or if LR_MONOCHROME is present, otherwise
3040 * the copy will have the same depth as the screen.
3041 * The content of the image will only be copied if the bit depth of the
3042 * original image is compatible with the bit depth of the screen, or
3043 * if the source is a DIB section.
3044 * The LR_MONOCHROME flag is ignored if LR_CREATEDIBSECTION is present.
3046 HANDLE WINAPI
CopyImage( HANDLE hnd
, UINT type
, INT desiredx
,
3047 INT desiredy
, UINT flags
)
3049 TRACE("hnd=%p, type=%u, desiredx=%d, desiredy=%d, flags=%x\n",
3050 hnd
, type
, desiredx
, desiredy
, flags
);
3061 objSize
= GetObjectW( hnd
, sizeof(ds
), &ds
);
3062 if (!objSize
) return 0;
3063 if ((desiredx
< 0) || (desiredy
< 0)) return 0;
3065 if (flags
& LR_COPYFROMRESOURCE
)
3067 FIXME("The flag LR_COPYFROMRESOURCE is not implemented for bitmaps\n");
3070 if (desiredx
== 0) desiredx
= ds
.dsBm
.bmWidth
;
3071 if (desiredy
== 0) desiredy
= ds
.dsBm
.bmHeight
;
3073 /* Allocate memory for a BITMAPINFOHEADER structure and a
3074 color table. The maximum number of colors in a color table
3075 is 256 which corresponds to a bitmap with depth 8.
3076 Bitmaps with higher depths don't have color tables. */
3077 bi
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(BITMAPINFOHEADER
) + 256 * sizeof(RGBQUAD
));
3080 bi
->bmiHeader
.biSize
= sizeof(bi
->bmiHeader
);
3081 bi
->bmiHeader
.biPlanes
= ds
.dsBm
.bmPlanes
;
3082 bi
->bmiHeader
.biBitCount
= ds
.dsBm
.bmBitsPixel
;
3083 bi
->bmiHeader
.biCompression
= BI_RGB
;
3085 if (flags
& LR_CREATEDIBSECTION
)
3087 /* Create a DIB section. LR_MONOCHROME is ignored */
3089 HDC dc
= CreateCompatibleDC(NULL
);
3091 if (objSize
== sizeof(DIBSECTION
))
3093 /* The source bitmap is a DIB.
3094 Get its attributes to create an exact copy */
3095 memcpy(bi
, &ds
.dsBmih
, sizeof(BITMAPINFOHEADER
));
3098 /* Get the color table or the color masks */
3099 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, NULL
, bi
, DIB_RGB_COLORS
);
3101 bi
->bmiHeader
.biWidth
= desiredx
;
3102 bi
->bmiHeader
.biHeight
= desiredy
;
3103 bi
->bmiHeader
.biSizeImage
= 0;
3105 res
= CreateDIBSection(dc
, bi
, DIB_RGB_COLORS
, &bits
, NULL
, 0);
3110 /* Create a device-dependent bitmap */
3112 BOOL monochrome
= (flags
& LR_MONOCHROME
);
3114 if (objSize
== sizeof(DIBSECTION
))
3116 /* The source bitmap is a DIB section.
3117 Get its attributes */
3118 HDC dc
= CreateCompatibleDC(NULL
);
3119 bi
->bmiHeader
.biSize
= sizeof(bi
->bmiHeader
);
3120 bi
->bmiHeader
.biBitCount
= ds
.dsBm
.bmBitsPixel
;
3121 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, NULL
, bi
, DIB_RGB_COLORS
);
3124 if (!monochrome
&& ds
.dsBm
.bmBitsPixel
== 1)
3126 /* Look if the colors of the DIB are black and white */
3129 (bi
->bmiColors
[0].rgbRed
== 0xff
3130 && bi
->bmiColors
[0].rgbGreen
== 0xff
3131 && bi
->bmiColors
[0].rgbBlue
== 0xff
3132 && bi
->bmiColors
[0].rgbReserved
== 0
3133 && bi
->bmiColors
[1].rgbRed
== 0
3134 && bi
->bmiColors
[1].rgbGreen
== 0
3135 && bi
->bmiColors
[1].rgbBlue
== 0
3136 && bi
->bmiColors
[1].rgbReserved
== 0)
3138 (bi
->bmiColors
[0].rgbRed
== 0
3139 && bi
->bmiColors
[0].rgbGreen
== 0
3140 && bi
->bmiColors
[0].rgbBlue
== 0
3141 && bi
->bmiColors
[0].rgbReserved
== 0
3142 && bi
->bmiColors
[1].rgbRed
== 0xff
3143 && bi
->bmiColors
[1].rgbGreen
== 0xff
3144 && bi
->bmiColors
[1].rgbBlue
== 0xff
3145 && bi
->bmiColors
[1].rgbReserved
== 0);
3148 else if (!monochrome
)
3150 monochrome
= ds
.dsBm
.bmBitsPixel
== 1;
3155 res
= CreateBitmap(desiredx
, desiredy
, 1, 1, NULL
);
3159 HDC screenDC
= GetDC(NULL
);
3160 res
= CreateCompatibleBitmap(screenDC
, desiredx
, desiredy
);
3161 ReleaseDC(NULL
, screenDC
);
3167 /* Only copy the bitmap if it's a DIB section or if it's
3168 compatible to the screen */
3171 if (objSize
== sizeof(DIBSECTION
))
3173 copyContents
= TRUE
;
3177 HDC screenDC
= GetDC(NULL
);
3178 int screen_depth
= GetDeviceCaps(screenDC
, BITSPIXEL
);
3179 ReleaseDC(NULL
, screenDC
);
3181 copyContents
= (ds
.dsBm
.bmBitsPixel
== 1 || ds
.dsBm
.bmBitsPixel
== screen_depth
);
3186 /* The source bitmap may already be selected in a device context,
3187 use GetDIBits/StretchDIBits and not StretchBlt */
3192 dc
= CreateCompatibleDC(NULL
);
3194 bi
->bmiHeader
.biWidth
= ds
.dsBm
.bmWidth
;
3195 bi
->bmiHeader
.biHeight
= ds
.dsBm
.bmHeight
;
3196 bi
->bmiHeader
.biSizeImage
= 0;
3197 bi
->bmiHeader
.biClrUsed
= 0;
3198 bi
->bmiHeader
.biClrImportant
= 0;
3200 /* Fill in biSizeImage */
3201 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, NULL
, bi
, DIB_RGB_COLORS
);
3202 bits
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, bi
->bmiHeader
.biSizeImage
);
3208 /* Get the image bits of the source bitmap */
3209 GetDIBits(dc
, hnd
, 0, ds
.dsBm
.bmHeight
, bits
, bi
, DIB_RGB_COLORS
);
3211 /* Copy it to the destination bitmap */
3212 oldBmp
= SelectObject(dc
, res
);
3213 StretchDIBits(dc
, 0, 0, desiredx
, desiredy
,
3214 0, 0, ds
.dsBm
.bmWidth
, ds
.dsBm
.bmHeight
,
3215 bits
, bi
, DIB_RGB_COLORS
, SRCCOPY
);
3216 SelectObject(dc
, oldBmp
);
3218 HeapFree(GetProcessHeap(), 0, bits
);
3224 if (flags
& LR_COPYDELETEORG
)
3229 HeapFree(GetProcessHeap(), 0, bi
);
3233 return CURSORICON_ExtCopy(hnd
,type
, desiredx
, desiredy
, flags
);
3235 /* Should call CURSORICON_ExtCopy but more testing
3236 * needs to be done before we change this
3238 if (flags
) FIXME("Flags are ignored\n");
3239 return CopyCursor(hnd
);
3245 /******************************************************************************
3246 * LoadBitmapW (USER32.@) Loads bitmap from the executable file
3249 * Success: Handle to specified bitmap
3252 HBITMAP WINAPI
LoadBitmapW(
3253 HINSTANCE instance
, /* [in] Handle to application instance */
3254 LPCWSTR name
) /* [in] Address of bitmap resource name */
3256 return LoadImageW( instance
, name
, IMAGE_BITMAP
, 0, 0, 0 );
3259 /**********************************************************************
3260 * LoadBitmapA (USER32.@)
3264 HBITMAP WINAPI
LoadBitmapA( HINSTANCE instance
, LPCSTR name
)
3266 return LoadImageA( instance
, name
, IMAGE_BITMAP
, 0, 0, 0 );