4 * taken and slightly changed from shell
5 * this should replace the icon extraction code in shell32 and shell16 once
6 * it needs a serious test for compliance with the native API
8 * Copyright 2000 Juergen Schmied
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
29 #include <stdlib.h> /* abs() */
30 #include <sys/types.h>
35 #define NONAMELESSUNION
36 #define NONAMELESSSTRUCT
41 #include "wine/winbase16.h"
42 #include "user_private.h"
43 #include "wine/debug.h"
45 WINE_DEFAULT_DEBUG_CHANNEL(icon
);
51 BYTE bWidth
; /* Width, in pixels, of the image */
52 BYTE bHeight
; /* Height, in pixels, of the image */
53 BYTE bColorCount
; /* Number of colors in image (0 if >=8bpp) */
54 BYTE bReserved
; /* Reserved ( must be 0) */
55 WORD wPlanes
; /* Color Planes */
56 WORD wBitCount
; /* Bits per pixel */
57 DWORD dwBytesInRes
; /* How many bytes in this resource? */
58 DWORD dwImageOffset
; /* Where in the file is this image? */
59 } icoICONDIRENTRY
, *LPicoICONDIRENTRY
;
63 WORD idReserved
; /* Reserved (must be 0) */
64 WORD idType
; /* Resource Type (RES_ICON or RES_CURSOR) */
65 WORD idCount
; /* How many images */
66 icoICONDIRENTRY idEntries
[1]; /* An entry for each image (idCount of 'em) */
67 } icoICONDIR
, *LPicoICONDIR
;
72 static void dumpIcoDirEnty ( LPicoICONDIRENTRY entry
)
74 TRACE("width = 0x%08x height = 0x%08x\n", entry
->bWidth
, entry
->bHeight
);
75 TRACE("colors = 0x%08x planes = 0x%08x\n", entry
->bColorCount
, entry
->wPlanes
);
76 TRACE("bitcount = 0x%08x bytesinres = 0x%08lx offset = 0x%08lx\n",
77 entry
->wBitCount
, entry
->dwBytesInRes
, entry
->dwImageOffset
);
79 static void dumpIcoDir ( LPicoICONDIR entry
)
81 TRACE("type = 0x%08x count = 0x%08x\n", entry
->idType
, entry
->idCount
);
85 /**********************************************************************
88 * Find an entry by id in a resource directory
89 * Copied from loader/pe_resource.c (FIXME: should use exported resource functions)
91 static const IMAGE_RESOURCE_DIRECTORY
*find_entry_by_id( const IMAGE_RESOURCE_DIRECTORY
*dir
,
92 WORD id
, const void *root
)
94 const IMAGE_RESOURCE_DIRECTORY_ENTRY
*entry
;
97 entry
= (const IMAGE_RESOURCE_DIRECTORY_ENTRY
*)(dir
+ 1);
98 min
= dir
->NumberOfNamedEntries
;
99 max
= min
+ dir
->NumberOfIdEntries
- 1;
102 pos
= (min
+ max
) / 2;
103 if (entry
[pos
].u1
.s2
.Id
== id
)
104 return (const IMAGE_RESOURCE_DIRECTORY
*)((const char *)root
+ entry
[pos
].u2
.s3
.OffsetToDirectory
);
105 if (entry
[pos
].u1
.s2
.Id
> id
) max
= pos
- 1;
111 /**********************************************************************
114 * Find a default entry in a resource directory
115 * Copied from loader/pe_resource.c (FIXME: should use exported resource functions)
117 static const IMAGE_RESOURCE_DIRECTORY
*find_entry_default( const IMAGE_RESOURCE_DIRECTORY
*dir
,
120 const IMAGE_RESOURCE_DIRECTORY_ENTRY
*entry
;
121 entry
= (const IMAGE_RESOURCE_DIRECTORY_ENTRY
*)(dir
+ 1);
122 return (const IMAGE_RESOURCE_DIRECTORY
*)((const char *)root
+ entry
->u2
.s3
.OffsetToDirectory
);
125 /*************************************************************************
126 * USER32_GetResourceTable
128 static DWORD
USER32_GetResourceTable(LPBYTE peimage
,DWORD pesize
,LPBYTE
*retptr
)
130 IMAGE_DOS_HEADER
* mz_header
;
132 TRACE("%p %p\n", peimage
, retptr
);
136 mz_header
= (IMAGE_DOS_HEADER
*) peimage
;
138 if (mz_header
->e_magic
!= IMAGE_DOS_SIGNATURE
)
140 if (mz_header
->e_cblp
== 1) /* .ICO file ? */
142 *retptr
= (LPBYTE
)-1; /* ICONHEADER.idType, must be 1 */
146 return 0; /* failed */
148 if (mz_header
->e_lfanew
>= pesize
) {
149 return 0; /* failed, happens with PKZIP DOS Exes for instance. */
151 if (*((DWORD
*)(peimage
+ mz_header
->e_lfanew
)) == IMAGE_NT_SIGNATURE
)
152 return IMAGE_NT_SIGNATURE
;
154 if (*((WORD
*)(peimage
+ mz_header
->e_lfanew
)) == IMAGE_OS2_SIGNATURE
)
156 IMAGE_OS2_HEADER
* ne_header
;
158 ne_header
= (IMAGE_OS2_HEADER
*)(peimage
+ mz_header
->e_lfanew
);
160 if (ne_header
->ne_magic
!= IMAGE_OS2_SIGNATURE
)
163 if( (ne_header
->ne_restab
- ne_header
->ne_rsrctab
) <= sizeof(NE_TYPEINFO
) )
164 *retptr
= (LPBYTE
)-1;
166 *retptr
= peimage
+ mz_header
->e_lfanew
+ ne_header
->ne_rsrctab
;
168 return IMAGE_OS2_SIGNATURE
;
170 return 0; /* failed */
172 /*************************************************************************
173 * USER32_LoadResource
175 static BYTE
* USER32_LoadResource( LPBYTE peimage
, NE_NAMEINFO
* pNInfo
, WORD sizeShift
, ULONG
*uSize
)
177 TRACE("%p %p 0x%08x\n", peimage
, pNInfo
, sizeShift
);
179 *uSize
= (DWORD
)pNInfo
->length
<< sizeShift
;
180 return peimage
+ ((DWORD
)pNInfo
->offset
<< sizeShift
);
183 /*************************************************************************
186 static BYTE
* ICO_LoadIcon( LPBYTE peimage
, LPicoICONDIRENTRY lpiIDE
, ULONG
*uSize
)
188 TRACE("%p %p\n", peimage
, lpiIDE
);
190 *uSize
= lpiIDE
->dwBytesInRes
;
191 return peimage
+ lpiIDE
->dwImageOffset
;
194 /*************************************************************************
195 * ICO_GetIconDirectory
197 * Reads .ico file and build phony ICONDIR struct
198 * see http://www.microsoft.com/win32dev/ui/icons.htm
200 #define HEADER_SIZE (sizeof(CURSORICONDIR) - sizeof (CURSORICONDIRENTRY))
201 #define HEADER_SIZE_FILE (sizeof(icoICONDIR) - sizeof (icoICONDIRENTRY))
203 static BYTE
* ICO_GetIconDirectory( LPBYTE peimage
, LPicoICONDIR
* lplpiID
, ULONG
*uSize
)
205 CURSORICONDIR
* lpcid
; /* icon resource in resource-dir format */
206 CURSORICONDIR
* lpID
; /* icon resource in resource format */
209 TRACE("%p %p\n", peimage
, lplpiID
);
211 lpcid
= (CURSORICONDIR
*)peimage
;
213 if( lpcid
->idReserved
|| (lpcid
->idType
!= 1) || (!lpcid
->idCount
) )
216 /* allocate the phony ICONDIR structure */
217 *uSize
= lpcid
->idCount
* sizeof(CURSORICONDIRENTRY
) + HEADER_SIZE
;
218 if( (lpID
= HeapAlloc(GetProcessHeap(),0, *uSize
) ))
220 /* copy the header */
221 lpID
->idReserved
= lpcid
->idReserved
;
222 lpID
->idType
= lpcid
->idType
;
223 lpID
->idCount
= lpcid
->idCount
;
225 /* copy the entries */
226 for( i
=0; i
< lpcid
->idCount
; i
++ )
228 memcpy((void*)&(lpID
->idEntries
[i
]),(void*)&(lpcid
->idEntries
[i
]), sizeof(CURSORICONDIRENTRY
) - 2);
229 lpID
->idEntries
[i
].wResId
= i
;
232 *lplpiID
= (LPicoICONDIR
)peimage
;
238 /******************************************************************************
239 * struct extract_icons_state [internal]
241 * Used to carry params and state through the iterations of EnumResourceNames in ICO_ExtractIconExW
243 struct extract_icons_state
{
244 INT nBaseIndex
; /* Zero based index or negated integer id of the first icon to extract. */
245 UINT nIcons
; /* Number of icons to extract. */
246 UINT cxDesired
; /* Desired horizontal size in pixels (Might be two sizes in HI/LOWORD). */
247 UINT cyDesired
; /* Desired vertical size in pixels (Might be two sizes in HI/LOWORD). */
248 UINT fuLoad
; /* Flags passed to LoadImage. */
249 INT cIter
; /* Iteration counter. */
250 HICON
*pahIcon
; /* Pointer to an array where the icon handles will be stored. */
251 UINT
*paIconId
; /* Pointer to an array where the icon identifiers will be stored. */
254 /******************************************************************************
255 * extract_icons_callback [internal]
257 * Callback function of type ENUMRESNAMEPROC for EnumResourceNames. Used in
258 * ICO_ExtractIconsExW.
260 static BOOL CALLBACK
extract_icons_callback(HMODULE hModule
, LPCWSTR pwszType
, LPWSTR pwszName
,
263 struct extract_icons_state
*pState
= (struct extract_icons_state
*)lParam
;
264 INT idCurrent
= (INT
)pwszName
;
266 /* If the handle array pointer is NULL, we just count the number of icons in the module. */
267 if (!pState
->pahIcon
) {
272 /* If we didn't already start extracting icons (cIter == 0), we look if the current
273 * icon is the one we should start with. That's the case if nBaseIndex is negative and
274 * it's absolute value matches the current icon's identifier. Or if nBaseIndex is positive
275 * and we already omitted the first nBaseIndex icons. */
276 if (pState
->cIter
== 0) {
277 if (pState
->nBaseIndex
< 0) {
278 if (!IS_INTRESOURCE(pwszName
) || idCurrent
!= -pState
->nBaseIndex
) {
281 } else if (pState
->nBaseIndex
> 0) {
282 pState
->nBaseIndex
--;
287 if (pState
->cIter
< pState
->nIcons
) {
288 /* Load the current icon with the size given in the LOWORD of cx/cyDesired */
289 pState
->pahIcon
[pState
->cIter
] =
290 LoadImageW(hModule
, pwszName
, IMAGE_ICON
, LOWORD(pState
->cxDesired
),
291 LOWORD(pState
->cyDesired
), pState
->fuLoad
);
292 /* FIXME: The resource's identifier (that is not idCurrent, which is the
293 * identifier of the icon directory) should be stored in paIconId, but I don't
294 * know how to query for it. */
295 if (pState
->paIconId
) pState
->paIconId
[pState
->cIter
] = 0;
298 /* If there is a second desired size given in the HIWORDs of cx/cyDesired, load too.
299 * There seems to be an off-by-one error here, since pState->cIter might now be equal
300 * to pState->nIcons, but this is in fact how it works on windows. */
301 if (HIWORD(pState
->cxDesired
) && HIWORD(pState
->cyDesired
)) {
302 pState
->pahIcon
[pState
->cIter
] =
303 LoadImageW(hModule
, pwszName
, IMAGE_ICON
, HIWORD(pState
->cxDesired
),
304 HIWORD(pState
->cyDesired
), pState
->fuLoad
);
305 if (pState
->paIconId
) pState
->paIconId
[pState
->cIter
] = 0;
310 return pState
->cIter
< pState
->nIcons
;
313 /*************************************************************************
314 * ICO_ExtractIconExW [internal]
317 * nIcons = 0: returns number of Icons in file
322 * success: number of icons in file (nIcons = 0) or nr of icons retrieved
324 static UINT
ICO_ExtractIconExW(
325 LPCWSTR lpszExeFileName
,
335 UINT cx1
, cx2
, cy1
, cy2
;
339 UINT16 iconDirCount
= 0,iconCount
= 0;
344 WCHAR szExePath
[MAX_PATH
];
345 DWORD dwSearchReturn
;
347 TRACE("%s, %d, %d %p 0x%08x\n", debugstr_w(lpszExeFileName
), nIconIndex
, nIcons
, pIconId
, flags
);
349 dwSearchReturn
= SearchPathW(NULL
, lpszExeFileName
, NULL
, sizeof(szExePath
) / sizeof(szExePath
[0]), szExePath
, NULL
);
350 if ((dwSearchReturn
== 0) || (dwSearchReturn
> sizeof(szExePath
) / sizeof(szExePath
[0])))
352 /* This is very wine specific: If the user tries to extract icon's from system dlls,
353 * wine's build-in *.dll.so's will not be found (Even if they would be found it wouldn't
354 * work, since they are not in PE-format). Thus, if the SearchPath call fails, we try
355 * to load the file with LoadLibary and extract the icons with LoadImage (via
356 * EnumResourceNames).
358 struct extract_icons_state state
;
359 HMODULE hDllSo
= LoadLibraryW(lpszExeFileName
);
362 WARN("File %s not found or path too long\n", debugstr_w(lpszExeFileName
));
366 state
.nBaseIndex
= nIconIndex
;
367 state
.nIcons
= nIcons
;
368 state
.cxDesired
= cxDesired
;
369 state
.cyDesired
= cyDesired
;
370 state
.fuLoad
= flags
;
372 state
.pahIcon
= RetPtr
;
373 state
.paIconId
= pIconId
;
375 EnumResourceNamesW(hDllSo
, MAKEINTRESOURCEW(RT_GROUP_ICON
), extract_icons_callback
,
382 hFile
= CreateFileW(szExePath
, GENERIC_READ
, FILE_SHARE_READ
, NULL
, OPEN_EXISTING
, 0, 0);
383 if (hFile
== INVALID_HANDLE_VALUE
) return ret
;
384 fsizel
= GetFileSize(hFile
,&fsizeh
);
387 fmapping
= CreateFileMappingW(hFile
, NULL
, PAGE_READONLY
| SEC_COMMIT
, 0, 0, NULL
);
391 WARN("CreateFileMapping error %ld\n", GetLastError() );
395 if (!(peimage
= MapViewOfFile(fmapping
, FILE_MAP_READ
, 0, 0, 0)))
397 WARN("MapViewOfFile error %ld\n", GetLastError() );
398 CloseHandle(fmapping
);
401 CloseHandle(fmapping
);
403 cx1
= LOWORD(cxDesired
);
404 cx2
= HIWORD(cxDesired
) ? HIWORD(cxDesired
) : cx1
;
405 cy1
= LOWORD(cyDesired
);
406 cy2
= HIWORD(cyDesired
) ? HIWORD(cyDesired
) : cy1
;
408 if (pIconId
) /* Invalidate first icon identifier */
409 *pIconId
= 0xFFFFFFFF;
411 if (!pIconId
) /* if no icon identifier array present use the icon handle array as intermediate storage */
412 pIconId
= (UINT
*)RetPtr
;
414 sig
= USER32_GetResourceTable(peimage
, fsizel
, &pData
);
416 /* ico file or NE exe/dll*/
417 if (sig
==IMAGE_OS2_SIGNATURE
|| sig
==1) /* .ICO file */
420 NE_TYPEINFO
*pTInfo
= (NE_TYPEINFO
*)(pData
+ 2);
421 NE_NAMEINFO
*pIconStorage
= NULL
;
422 NE_NAMEINFO
*pIconDir
= NULL
;
423 LPicoICONDIR lpiID
= NULL
;
425 TRACE("-- OS2/icon Signature (0x%08lx)\n", sig
);
427 if (pData
== (BYTE
*)-1)
429 pCIDir
= ICO_GetIconDirectory(peimage
, &lpiID
, &uSize
); /* check for .ICO file */
432 iconDirCount
= 1; iconCount
= lpiID
->idCount
;
433 TRACE("-- icon found %p 0x%08lx 0x%08x 0x%08x\n", pCIDir
, uSize
, iconDirCount
, iconCount
);
436 else while (pTInfo
->type_id
&& !(pIconStorage
&& pIconDir
))
438 if (pTInfo
->type_id
== NE_RSCTYPE_GROUP_ICON
) /* find icon directory and icon repository */
440 iconDirCount
= pTInfo
->count
;
441 pIconDir
= ((NE_NAMEINFO
*)(pTInfo
+ 1));
442 TRACE("\tfound directory - %i icon families\n", iconDirCount
);
444 if (pTInfo
->type_id
== NE_RSCTYPE_ICON
)
446 iconCount
= pTInfo
->count
;
447 pIconStorage
= ((NE_NAMEINFO
*)(pTInfo
+ 1));
448 TRACE("\ttotal icons - %i\n", iconCount
);
450 pTInfo
= (NE_TYPEINFO
*)((char*)(pTInfo
+1)+pTInfo
->count
*sizeof(NE_NAMEINFO
));
453 if ((pIconStorage
&& pIconDir
) || lpiID
) /* load resources and create icons */
458 if (lpiID
&& pCIDir
) /* *.ico file, deallocate heap pointer*/
459 HeapFree(GetProcessHeap(), 0, pCIDir
);
461 else if (nIconIndex
< iconDirCount
)
464 if (nIcons
> iconDirCount
- nIconIndex
)
465 nIcons
= iconDirCount
- nIconIndex
;
467 for (i
= 0; i
< nIcons
; i
++)
469 /* .ICO files have only one icon directory */
470 if (lpiID
== NULL
) /* not *.ico */
471 pCIDir
= USER32_LoadResource(peimage
, pIconDir
+ i
+ nIconIndex
, *(WORD
*)pData
, &uSize
);
472 pIconId
[i
] = LookupIconIdFromDirectoryEx(pCIDir
, TRUE
, (i
& 1) ? cx2
: cx1
, (i
& 1) ? cy2
: cy1
, flags
);
474 if (lpiID
&& pCIDir
) /* *.ico file, deallocate heap pointer*/
475 HeapFree(GetProcessHeap(), 0, pCIDir
);
477 for (icon
= 0; icon
< nIcons
; icon
++)
481 pCIDir
= ICO_LoadIcon(peimage
, lpiID
->idEntries
+ (int)pIconId
[icon
], &uSize
);
483 for (i
= 0; i
< iconCount
; i
++)
484 if (pIconStorage
[i
].id
== ((int)pIconId
[icon
] | 0x8000) )
485 pCIDir
= USER32_LoadResource(peimage
, pIconStorage
+ i
, *(WORD
*)pData
, &uSize
);
488 RetPtr
[icon
] = (HICON
)CreateIconFromResourceEx(pCIDir
, uSize
, TRUE
, 0x00030000,
489 (icon
& 1) ? cx2
: cx1
, (icon
& 1) ? cy2
: cy1
, flags
);
493 ret
= icon
; /* return number of retrieved icons */
500 else if( sig
== IMAGE_NT_SIGNATURE
)
503 PIMAGE_DOS_HEADER dheader
;
504 PIMAGE_NT_HEADERS pe_header
;
505 PIMAGE_SECTION_HEADER pe_sections
;
506 const IMAGE_RESOURCE_DIRECTORY
*rootresdir
,*iconresdir
,*icongroupresdir
;
507 const IMAGE_RESOURCE_DATA_ENTRY
*idataent
,*igdataent
;
508 const IMAGE_RESOURCE_DIRECTORY_ENTRY
*xresent
;
511 dheader
= (PIMAGE_DOS_HEADER
)peimage
;
512 pe_header
= (PIMAGE_NT_HEADERS
)(peimage
+dheader
->e_lfanew
); /* it is a pe header, USER32_GetResourceTable checked that */
513 pe_sections
= (PIMAGE_SECTION_HEADER
)(((char*)pe_header
) + sizeof(DWORD
) + sizeof(IMAGE_FILE_HEADER
)
514 + pe_header
->FileHeader
.SizeOfOptionalHeader
);
517 /* search for the root resource directory */
518 for (i
=0;i
<pe_header
->FileHeader
.NumberOfSections
;i
++)
520 if (pe_sections
[i
].Characteristics
& IMAGE_SCN_CNT_UNINITIALIZED_DATA
)
522 if (fsizel
< pe_sections
[i
].PointerToRawData
+pe_sections
[i
].SizeOfRawData
) {
523 FIXME("File %s too short (section is at %ld bytes, real size is %ld)\n",
524 debugstr_w(lpszExeFileName
),
525 pe_sections
[i
].PointerToRawData
+pe_sections
[i
].SizeOfRawData
,
530 /* FIXME: doesn't work when the resources are not in a separate section */
531 if (pe_sections
[i
].VirtualAddress
== pe_header
->OptionalHeader
.DataDirectory
[IMAGE_DIRECTORY_ENTRY_RESOURCE
].VirtualAddress
)
533 rootresdir
= (PIMAGE_RESOURCE_DIRECTORY
)(peimage
+pe_sections
[i
].PointerToRawData
);
540 WARN("haven't found section for resource directory.\n");
541 goto end
; /* failure */
544 /* search for the group icon directory */
545 if (!(icongroupresdir
= find_entry_by_id(rootresdir
, LOWORD(RT_GROUP_ICON
), rootresdir
)))
547 WARN("No Icongroupresourcedirectory!\n");
548 goto end
; /* failure */
550 iconDirCount
= icongroupresdir
->NumberOfNamedEntries
+ icongroupresdir
->NumberOfIdEntries
;
552 /* only number of icons requested */
556 goto end
; /* success */
561 /* search resource id */
563 int iId
= abs(nIconIndex
);
564 const IMAGE_RESOURCE_DIRECTORY_ENTRY
* xprdeTmp
= (const IMAGE_RESOURCE_DIRECTORY_ENTRY
*)(icongroupresdir
+1);
566 while(n
<iconDirCount
&& xprdeTmp
)
568 if(xprdeTmp
->u1
.s2
.Id
== iId
)
578 WARN("resource id %d not found\n", iId
);
579 goto end
; /* failure */
584 /* check nIconIndex to be in range */
585 if (nIconIndex
>= iconDirCount
)
587 WARN("nIconIndex %d is larger than iconDirCount %d\n",nIconIndex
,iconDirCount
);
588 goto end
; /* failure */
592 /* assure we don't get too much */
593 if( nIcons
> iconDirCount
- nIconIndex
)
594 nIcons
= iconDirCount
- nIconIndex
;
596 /* starting from specified index */
597 xresent
= (const IMAGE_RESOURCE_DIRECTORY_ENTRY
*)(icongroupresdir
+1) + nIconIndex
;
599 for (i
=0; i
< nIcons
; i
++,xresent
++)
601 const IMAGE_RESOURCE_DIRECTORY
*resdir
;
603 /* go down this resource entry, name */
604 resdir
= (PIMAGE_RESOURCE_DIRECTORY
)((char *)rootresdir
+ xresent
->u2
.s3
.OffsetToDirectory
);
606 /* default language (0) */
607 resdir
= find_entry_default(resdir
,rootresdir
);
608 igdataent
= (const IMAGE_RESOURCE_DATA_ENTRY
*)resdir
;
610 /* lookup address in mapped image for virtual address */
613 for (j
=0;j
<pe_header
->FileHeader
.NumberOfSections
;j
++)
615 if (igdataent
->OffsetToData
< pe_sections
[j
].VirtualAddress
)
617 if (igdataent
->OffsetToData
+igdataent
->Size
> pe_sections
[j
].VirtualAddress
+pe_sections
[j
].SizeOfRawData
)
620 if (igdataent
->OffsetToData
-pe_sections
[j
].VirtualAddress
+pe_sections
[j
].PointerToRawData
+igdataent
->Size
> fsizel
) {
621 FIXME("overflow in PE lookup (%s has len %ld, have offset %ld), short file?\n", debugstr_w(lpszExeFileName
), fsizel
,
622 igdataent
->OffsetToData
- pe_sections
[j
].VirtualAddress
+ pe_sections
[j
].PointerToRawData
+ igdataent
->Size
);
623 goto end
; /* failure */
625 igdata
= peimage
+(igdataent
->OffsetToData
-pe_sections
[j
].VirtualAddress
+pe_sections
[j
].PointerToRawData
);
630 FIXME("no matching real address for icongroup!\n");
631 goto end
; /* failure */
633 pIconId
[i
] = LookupIconIdFromDirectoryEx(igdata
, TRUE
, (i
& 1) ? cx2
: cx1
, (i
& 1) ? cy2
: cy1
, flags
);
636 if (!(iconresdir
=find_entry_by_id(rootresdir
,LOWORD(RT_ICON
),rootresdir
)))
638 WARN("No Iconresourcedirectory!\n");
639 goto end
; /* failure */
642 for (i
=0; i
<nIcons
; i
++)
644 const IMAGE_RESOURCE_DIRECTORY
*xresdir
;
645 xresdir
= find_entry_by_id(iconresdir
, LOWORD(pIconId
[i
]), rootresdir
);
648 WARN("icon entry %d not found\n", LOWORD(pIconId
[i
]));
652 xresdir
= find_entry_default(xresdir
, rootresdir
);
653 idataent
= (const IMAGE_RESOURCE_DATA_ENTRY
*)xresdir
;
656 /* map virtual to address in image */
657 for (j
=0;j
<pe_header
->FileHeader
.NumberOfSections
;j
++)
659 if (idataent
->OffsetToData
< pe_sections
[j
].VirtualAddress
)
661 if (idataent
->OffsetToData
+idataent
->Size
> pe_sections
[j
].VirtualAddress
+pe_sections
[j
].SizeOfRawData
)
663 idata
= peimage
+(idataent
->OffsetToData
-pe_sections
[j
].VirtualAddress
+pe_sections
[j
].PointerToRawData
);
667 WARN("no matching real address found for icondata!\n");
671 RetPtr
[i
] = (HICON
) CreateIconFromResourceEx(idata
,idataent
->Size
,TRUE
,0x00030000,
672 (i
& 1) ? cx2
: cx1
, (i
& 1) ? cy2
: cy1
, flags
);
674 ret
= i
; /* return number of retrieved icons */
675 } /* if(sig == IMAGE_NT_SIGNATURE) */
678 UnmapViewOfFile(peimage
); /* success */
682 /***********************************************************************
683 * PrivateExtractIconsW [USER32.@]
686 * If HIWORD(sizeX) && HIWORD(sizeY) 2 * ((nIcons + 1) MOD 2) icons are
687 * returned, with the LOWORD size icon first and the HIWORD size icon
689 * Also the Windows equivalent does extract icons in a strange way if
690 * nIndex is negative. Our implementation treats a negative nIndex as
691 * looking for that resource identifier for the first icon to retrieve.
694 * should also support 16 bit EXE + DLLs, cursor and animated cursor as
695 * well as bitmap files.
698 UINT WINAPI
PrivateExtractIconsW (
703 HICON
* phicon
, /* [out] pointer to array of nIcons HICON handles */
704 UINT
* pIconId
, /* [out] pointer to array of nIcons icon identifiers or NULL */
705 UINT nIcons
, /* [in] number of icons to retrieve */
706 UINT flags
) /* [in] LR_* flags used by LoadImage */
708 TRACE("%s %d %dx%d %p %p %d 0x%08x\n",
709 debugstr_w(lpwstrFile
), nIndex
, sizeX
, sizeY
, phicon
, pIconId
, nIcons
, flags
);
711 if ((nIcons
& 1) && HIWORD(sizeX
) && HIWORD(sizeY
))
713 WARN("Uneven number %d of icons requested for small and large icons!\n", nIcons
);
715 return ICO_ExtractIconExW(lpwstrFile
, phicon
, nIndex
, nIcons
, sizeX
, sizeY
, pIconId
, flags
);
718 /***********************************************************************
719 * PrivateExtractIconsA [USER32.@]
722 UINT WINAPI
PrivateExtractIconsA (
727 HICON
* phicon
, /* [out] pointer to array of nIcons HICON handles */
728 UINT
* piconid
, /* [out] pointer to array of nIcons icon identifiers or NULL */
729 UINT nIcons
, /* [in] number of icons to retrieve */
730 UINT flags
) /* [in] LR_* flags used by LoadImage */
733 INT len
= MultiByteToWideChar(CP_ACP
, 0, lpstrFile
, -1, NULL
, 0);
734 LPWSTR lpwstrFile
= HeapAlloc(GetProcessHeap(), 0, len
* sizeof(WCHAR
));
736 MultiByteToWideChar(CP_ACP
, 0, lpstrFile
, -1, lpwstrFile
, len
);
737 ret
= PrivateExtractIconsW(lpwstrFile
, nIndex
, sizeX
, sizeY
, phicon
, piconid
, nIcons
, flags
);
739 HeapFree(GetProcessHeap(), 0, lpwstrFile
);
743 /***********************************************************************
744 * PrivateExtractIconExW [USER32.@]
746 * if nIndex == -1 it returns the number of icons in any case !!!
748 UINT WINAPI
PrivateExtractIconExW (
755 DWORD cyicon
, cysmicon
, cxicon
, cxsmicon
;
758 TRACE("%s %d %p %p %d\n",
759 debugstr_w(lpwstrFile
),nIndex
,phIconLarge
, phIconSmall
, nIcons
);
762 /* get the number of icons */
763 return ICO_ExtractIconExW(lpwstrFile
, NULL
, 0, 0, 0, 0, NULL
, LR_DEFAULTCOLOR
);
765 if (nIcons
== 1 && phIconSmall
&& phIconLarge
)
768 cxicon
= GetSystemMetrics(SM_CXICON
);
769 cyicon
= GetSystemMetrics(SM_CYICON
);
770 cxsmicon
= GetSystemMetrics(SM_CXSMICON
);
771 cysmicon
= GetSystemMetrics(SM_CYSMICON
);
773 ret
= ICO_ExtractIconExW(lpwstrFile
, (HICON
*) &hIcon
, nIndex
, 2, cxicon
| (cxsmicon
<<16),
774 cyicon
| (cysmicon
<<16), NULL
, LR_DEFAULTCOLOR
);
775 *phIconLarge
= hIcon
[0];
776 *phIconSmall
= hIcon
[1];
782 /* extract n small icons */
783 cxsmicon
= GetSystemMetrics(SM_CXSMICON
);
784 cysmicon
= GetSystemMetrics(SM_CYSMICON
);
785 ret
= ICO_ExtractIconExW(lpwstrFile
, phIconSmall
, nIndex
, nIcons
, cxsmicon
,
786 cysmicon
, NULL
, LR_DEFAULTCOLOR
);
790 /* extract n large icons */
791 cxicon
= GetSystemMetrics(SM_CXICON
);
792 cyicon
= GetSystemMetrics(SM_CYICON
);
793 ret
= ICO_ExtractIconExW(lpwstrFile
, phIconLarge
, nIndex
, nIcons
, cxicon
,
794 cyicon
, NULL
, LR_DEFAULTCOLOR
);
799 /***********************************************************************
800 * PrivateExtractIconExA [USER32.@]
802 UINT WINAPI
PrivateExtractIconExA (
810 INT len
= MultiByteToWideChar(CP_ACP
, 0, lpstrFile
, -1, NULL
, 0);
811 LPWSTR lpwstrFile
= HeapAlloc(GetProcessHeap(), 0, len
* sizeof(WCHAR
));
813 TRACE("%s %d %p %p %d\n", lpstrFile
, nIndex
, phIconLarge
, phIconSmall
, nIcons
);
815 MultiByteToWideChar(CP_ACP
, 0, lpstrFile
, -1, lpwstrFile
, len
);
816 ret
= PrivateExtractIconExW(lpwstrFile
, nIndex
, phIconLarge
, phIconSmall
, nIcons
);
817 HeapFree(GetProcessHeap(), 0, lpwstrFile
);