4 * Copyright 1998 Marcus Meissner
5 * Copyright 1998 Juergen Schmied (jsch) * <juergen.schmied@metronet.de>
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
42 #include "undocshell.h"
44 #include "shell32_main.h"
48 #include "wine/debug.h"
49 #include "wine/unicode.h"
51 WINE_DEFAULT_DEBUG_CHANNEL(shell
);
53 extern const char * const SHELL_Authors
[];
56 /*************************************************************************
57 * CommandLineToArgvW [SHELL32.@]
59 * We must interpret the quotes in the command line to rebuild the argv
61 * - arguments are separated by spaces or tabs
62 * - quotes serve as optional argument delimiters
64 * - escaped quotes must be converted back to '"'
66 * - an odd number of '\'s followed by '"' correspond to half that number
67 * of '\' followed by a '"' (extension of the above)
70 * - an even number of '\'s followed by a '"' correspond to half that number
71 * of '\', plus a regular quote serving as an argument delimiter (which
72 * means it does not appear in the result)
73 * 'a\\"b c"' -> 'a\b c'
74 * 'a\\\\"b c"' -> 'a\\b c'
75 * - '\' that are not followed by a '"' are copied literally
85 LPWSTR
* WINAPI
CommandLineToArgvW(LPCWSTR lpCmdline
, int* numargs
)
97 /* Return the path to the executable */
100 hargv
=GlobalAlloc(0, size
);
101 argv
=GlobalLock(hargv
);
104 len
= GetModuleFileNameW(0, (LPWSTR
)(argv
+1), (size
-sizeof(LPWSTR
))/sizeof(WCHAR
));
110 if (len
< size
) break;
112 hargv
=GlobalReAlloc(hargv
, size
, 0);
113 argv
=GlobalLock(hargv
);
115 argv
[0]=(LPWSTR
)(argv
+1);
122 /* to get a writable copy */
129 if (*cs
==0 || ((*cs
==0x0009 || *cs
==0x0020) && !in_quotes
))
133 /* skip the remaining spaces */
134 while (*cs
==0x0009 || *cs
==0x0020) {
142 else if (*cs
==0x005c)
144 /* '\', count them */
147 else if ((*cs
==0x0022) && ((bcount
& 1)==0))
150 in_quotes
=!in_quotes
;
155 /* a regular character */
160 /* Allocate in a single lump, the string array, and the strings that go with it.
161 * This way the caller can make a single GlobalFree call to free both, as per MSDN.
163 hargv
=GlobalAlloc(0, argc
*sizeof(LPWSTR
)+(strlenW(lpCmdline
)+1)*sizeof(WCHAR
));
164 argv
=GlobalLock(hargv
);
167 cmdline
=(LPWSTR
)(argv
+argc
);
168 strcpyW(cmdline
, lpCmdline
);
176 if ((*s
==0x0009 || *s
==0x0020) && !in_quotes
)
178 /* Close the argument and copy it */
182 /* skip the remaining spaces */
185 } while (*s
==0x0009 || *s
==0x0020);
187 /* Start with a new argument */
202 /* Preceded by an even number of '\', this is half that
203 * number of '\', plus a quote which we erase.
206 in_quotes
=!in_quotes
;
211 /* Preceded by an odd number of '\', this is half that
212 * number of '\' followed by a '"'
222 /* a regular character */
238 static DWORD
shgfi_get_exe_type(LPCWSTR szFullPath
)
243 IMAGE_DOS_HEADER mz_header
;
248 status
= GetBinaryTypeW (szFullPath
, &BinaryType
);
251 if (BinaryType
== SCS_DOS_BINARY
|| BinaryType
== SCS_PIF_BINARY
)
254 hfile
= CreateFileW( szFullPath
, GENERIC_READ
, FILE_SHARE_READ
,
255 NULL
, OPEN_EXISTING
, 0, 0 );
256 if ( hfile
== INVALID_HANDLE_VALUE
)
260 * The next section is adapted from MODULE_GetBinaryType, as we need
261 * to examine the image header to get OS and version information. We
262 * know from calling GetBinaryTypeA that the image is valid and either
263 * an NE or PE, so much error handling can be omitted.
264 * Seek to the start of the file and read the header information.
267 SetFilePointer( hfile
, 0, NULL
, SEEK_SET
);
268 ReadFile( hfile
, &mz_header
, sizeof(mz_header
), &len
, NULL
);
270 SetFilePointer( hfile
, mz_header
.e_lfanew
, NULL
, SEEK_SET
);
271 ReadFile( hfile
, magic
, sizeof(magic
), &len
, NULL
);
272 if ( *(DWORD
*)magic
== IMAGE_NT_SIGNATURE
)
274 SetFilePointer( hfile
, mz_header
.e_lfanew
, NULL
, SEEK_SET
);
275 ReadFile( hfile
, &nt
, sizeof(nt
), &len
, NULL
);
276 CloseHandle( hfile
);
277 /* DLL files are not executable and should return 0 */
278 if (nt
.FileHeader
.Characteristics
& IMAGE_FILE_DLL
)
280 if (nt
.OptionalHeader
.Subsystem
== IMAGE_SUBSYSTEM_WINDOWS_GUI
)
282 return IMAGE_NT_SIGNATURE
|
283 (nt
.OptionalHeader
.MajorSubsystemVersion
<< 24) |
284 (nt
.OptionalHeader
.MinorSubsystemVersion
<< 16);
286 return IMAGE_NT_SIGNATURE
;
288 else if ( *(WORD
*)magic
== IMAGE_OS2_SIGNATURE
)
291 SetFilePointer( hfile
, mz_header
.e_lfanew
, NULL
, SEEK_SET
);
292 ReadFile( hfile
, &ne
, sizeof(ne
), &len
, NULL
);
293 CloseHandle( hfile
);
294 if (ne
.ne_exetyp
== 2)
295 return IMAGE_OS2_SIGNATURE
| (ne
.ne_expver
<< 16);
298 CloseHandle( hfile
);
302 /*************************************************************************
303 * SHELL_IsShortcut [internal]
305 * Decide if an item id list points to a shell shortcut
307 BOOL
SHELL_IsShortcut(LPCITEMIDLIST pidlLast
)
309 char szTemp
[MAX_PATH
];
313 if (_ILGetExtension(pidlLast
, szTemp
, MAX_PATH
) &&
314 HCR_MapTypeToValueA(szTemp
, szTemp
, MAX_PATH
, TRUE
))
316 if (ERROR_SUCCESS
== RegOpenKeyExA(HKEY_CLASSES_ROOT
, szTemp
, 0, KEY_QUERY_VALUE
, &keyCls
))
318 if (ERROR_SUCCESS
== RegQueryValueExA(keyCls
, "IsShortcut", NULL
, NULL
, NULL
, NULL
))
328 #define SHGFI_KNOWN_FLAGS \
329 (SHGFI_SMALLICON | SHGFI_OPENICON | SHGFI_SHELLICONSIZE | SHGFI_PIDL | \
330 SHGFI_USEFILEATTRIBUTES | SHGFI_ADDOVERLAYS | SHGFI_OVERLAYINDEX | \
331 SHGFI_ICON | SHGFI_DISPLAYNAME | SHGFI_TYPENAME | SHGFI_ATTRIBUTES | \
332 SHGFI_ICONLOCATION | SHGFI_EXETYPE | SHGFI_SYSICONINDEX | \
333 SHGFI_LINKOVERLAY | SHGFI_SELECTED | SHGFI_ATTR_SPECIFIED)
335 /*************************************************************************
336 * SHGetFileInfoW [SHELL32.@]
339 DWORD_PTR WINAPI
SHGetFileInfoW(LPCWSTR path
,DWORD dwFileAttributes
,
340 SHFILEINFOW
*psfi
, UINT sizeofpsfi
, UINT flags
)
342 WCHAR szLocation
[MAX_PATH
], szFullPath
[MAX_PATH
];
344 DWORD_PTR ret
= TRUE
;
345 DWORD dwAttributes
= 0;
346 IShellFolder
* psfParent
= NULL
;
347 IExtractIconW
* pei
= NULL
;
348 LPITEMIDLIST pidlLast
= NULL
, pidl
= NULL
;
350 BOOL IconNotYetLoaded
=TRUE
;
353 TRACE("%s fattr=0x%x sfi=%p(attr=0x%08x) size=0x%x flags=0x%x\n",
354 (flags
& SHGFI_PIDL
)? "pidl" : debugstr_w(path
), dwFileAttributes
,
355 psfi
, psfi
->dwAttributes
, sizeofpsfi
, flags
);
357 if ( (flags
& SHGFI_USEFILEATTRIBUTES
) &&
358 (flags
& (SHGFI_ATTRIBUTES
|SHGFI_EXETYPE
|SHGFI_PIDL
)))
361 /* windows initializes these values regardless of the flags */
364 psfi
->szDisplayName
[0] = '\0';
365 psfi
->szTypeName
[0] = '\0';
369 if (!(flags
& SHGFI_PIDL
))
371 /* SHGetFileInfo should work with absolute and relative paths */
372 if (PathIsRelativeW(path
))
374 GetCurrentDirectoryW(MAX_PATH
, szLocation
);
375 PathCombineW(szFullPath
, szLocation
, path
);
379 lstrcpynW(szFullPath
, path
, MAX_PATH
);
383 if (flags
& SHGFI_EXETYPE
)
385 if (flags
!= SHGFI_EXETYPE
)
387 return shgfi_get_exe_type(szFullPath
);
391 * psfi is NULL normally to query EXE type. If it is NULL, none of the
392 * below makes sense anyway. Windows allows this and just returns FALSE
398 * translate the path into a pidl only when SHGFI_USEFILEATTRIBUTES
400 * The pidl functions fail on not existing file names
403 if (flags
& SHGFI_PIDL
)
405 pidl
= ILClone((LPCITEMIDLIST
)path
);
407 else if (!(flags
& SHGFI_USEFILEATTRIBUTES
))
409 hr
= SHILCreateFromPathW(szFullPath
, &pidl
, &dwAttributes
);
412 if ((flags
& SHGFI_PIDL
) || !(flags
& SHGFI_USEFILEATTRIBUTES
))
414 /* get the parent shellfolder */
417 hr
= SHBindToParent( pidl
, &IID_IShellFolder
, (LPVOID
*)&psfParent
,
418 (LPCITEMIDLIST
*)&pidlLast
);
420 pidlLast
= ILClone(pidlLast
);
425 ERR("pidl is null!\n");
430 /* get the attributes of the child */
431 if (SUCCEEDED(hr
) && (flags
& SHGFI_ATTRIBUTES
))
433 if (!(flags
& SHGFI_ATTR_SPECIFIED
))
435 psfi
->dwAttributes
= 0xffffffff;
437 IShellFolder_GetAttributesOf( psfParent
, 1, (LPCITEMIDLIST
*)&pidlLast
,
438 &(psfi
->dwAttributes
) );
441 /* get the displayname */
442 if (SUCCEEDED(hr
) && (flags
& SHGFI_DISPLAYNAME
))
444 if (flags
& SHGFI_USEFILEATTRIBUTES
)
446 lstrcpyW (psfi
->szDisplayName
, PathFindFileNameW(szFullPath
));
451 hr
= IShellFolder_GetDisplayNameOf( psfParent
, pidlLast
,
452 SHGDN_INFOLDER
, &str
);
453 StrRetToStrNW (psfi
->szDisplayName
, MAX_PATH
, &str
, pidlLast
);
457 /* get the type name */
458 if (SUCCEEDED(hr
) && (flags
& SHGFI_TYPENAME
))
460 static const WCHAR szFile
[] = { 'F','i','l','e',0 };
461 static const WCHAR szDashFile
[] = { '-','f','i','l','e',0 };
463 if (!(flags
& SHGFI_USEFILEATTRIBUTES
))
467 _ILGetFileType(pidlLast
, ftype
, 80);
468 MultiByteToWideChar(CP_ACP
, 0, ftype
, -1, psfi
->szTypeName
, 80 );
472 if (dwFileAttributes
& FILE_ATTRIBUTE_DIRECTORY
)
473 strcatW (psfi
->szTypeName
, szFile
);
478 lstrcpyW(sTemp
,PathFindExtensionW(szFullPath
));
479 if (!( HCR_MapTypeToValueW(sTemp
, sTemp
, 64, TRUE
) &&
480 HCR_MapTypeToValueW(sTemp
, psfi
->szTypeName
, 80, FALSE
)))
482 lstrcpynW (psfi
->szTypeName
, sTemp
, 64);
483 strcatW (psfi
->szTypeName
, szDashFile
);
490 if (flags
& SHGFI_OPENICON
)
491 uGilFlags
|= GIL_OPENICON
;
493 if (flags
& SHGFI_LINKOVERLAY
)
494 uGilFlags
|= GIL_FORSHORTCUT
;
495 else if ((flags
&SHGFI_ADDOVERLAYS
) ||
496 (flags
&(SHGFI_ICON
|SHGFI_SMALLICON
))==SHGFI_ICON
)
498 if (SHELL_IsShortcut(pidlLast
))
499 uGilFlags
|= GIL_FORSHORTCUT
;
502 if (flags
& SHGFI_OVERLAYINDEX
)
503 FIXME("SHGFI_OVERLAYINDEX unhandled\n");
505 if (flags
& SHGFI_SELECTED
)
506 FIXME("set icon to selected, stub\n");
508 if (flags
& SHGFI_SHELLICONSIZE
)
509 FIXME("set icon to shell size, stub\n");
511 /* get the iconlocation */
512 if (SUCCEEDED(hr
) && (flags
& SHGFI_ICONLOCATION
))
516 if (flags
& SHGFI_USEFILEATTRIBUTES
)
518 if (dwFileAttributes
& FILE_ATTRIBUTE_DIRECTORY
)
520 lstrcpyW(psfi
->szDisplayName
, swShell32Name
);
521 psfi
->iIcon
= -IDI_SHELL_FOLDER
;
526 static const WCHAR p1W
[] = {'%','1',0};
527 WCHAR sTemp
[MAX_PATH
];
529 szExt
= (LPWSTR
) PathFindExtensionW(szFullPath
);
530 TRACE("szExt=%s\n", debugstr_w(szExt
));
532 HCR_MapTypeToValueW(szExt
, sTemp
, MAX_PATH
, TRUE
) &&
533 HCR_GetDefaultIconW(sTemp
, sTemp
, MAX_PATH
, &psfi
->iIcon
))
535 if (lstrcmpW(p1W
, sTemp
))
536 strcpyW(psfi
->szDisplayName
, sTemp
);
539 /* the icon is in the file */
540 strcpyW(psfi
->szDisplayName
, szFullPath
);
549 hr
= IShellFolder_GetUIObjectOf(psfParent
, 0, 1,
550 (LPCITEMIDLIST
*)&pidlLast
, &IID_IExtractIconW
,
551 &uDummy
, (LPVOID
*)&pei
);
554 hr
= IExtractIconW_GetIconLocation(pei
, uGilFlags
,
555 szLocation
, MAX_PATH
, &iIndex
, &uFlags
);
557 if (uFlags
& GIL_NOTFILENAME
)
561 lstrcpyW (psfi
->szDisplayName
, szLocation
);
562 psfi
->iIcon
= iIndex
;
564 IExtractIconW_Release(pei
);
569 /* get icon index (or load icon)*/
570 if (SUCCEEDED(hr
) && (flags
& (SHGFI_ICON
| SHGFI_SYSICONINDEX
)))
572 if (flags
& SHGFI_USEFILEATTRIBUTES
)
574 WCHAR sTemp
[MAX_PATH
];
578 lstrcpynW(sTemp
, szFullPath
, MAX_PATH
);
580 if (dwFileAttributes
& FILE_ATTRIBUTE_DIRECTORY
)
581 psfi
->iIcon
= SIC_GetIconIndex(swShell32Name
, -IDI_SHELL_FOLDER
, 0);
584 static const WCHAR p1W
[] = {'%','1',0};
587 szExt
= (LPWSTR
) PathFindExtensionW(sTemp
);
589 HCR_MapTypeToValueW(szExt
, sTemp
, MAX_PATH
, TRUE
) &&
590 HCR_GetDefaultIconW(sTemp
, sTemp
, MAX_PATH
, &icon_idx
))
592 if (!lstrcmpW(p1W
,sTemp
)) /* icon is in the file */
593 strcpyW(sTemp
, szFullPath
);
595 if (flags
& SHGFI_SYSICONINDEX
)
597 psfi
->iIcon
= SIC_GetIconIndex(sTemp
,icon_idx
,0);
598 if (psfi
->iIcon
== -1)
603 IconNotYetLoaded
=FALSE
;
604 if (flags
& SHGFI_SMALLICON
)
605 PrivateExtractIconsW( sTemp
,icon_idx
,
606 GetSystemMetrics( SM_CXSMICON
),
607 GetSystemMetrics( SM_CYSMICON
),
608 &psfi
->hIcon
, 0, 1, 0);
610 PrivateExtractIconsW( sTemp
, icon_idx
,
611 GetSystemMetrics( SM_CXICON
),
612 GetSystemMetrics( SM_CYICON
),
613 &psfi
->hIcon
, 0, 1, 0);
614 psfi
->iIcon
= icon_idx
;
621 if (!(PidlToSicIndex(psfParent
, pidlLast
, !(flags
& SHGFI_SMALLICON
),
622 uGilFlags
, &(psfi
->iIcon
))))
629 if (flags
& SHGFI_SMALLICON
)
630 ret
= (DWORD_PTR
) ShellSmallIconList
;
632 ret
= (DWORD_PTR
) ShellBigIconList
;
637 if (SUCCEEDED(hr
) && (flags
& SHGFI_ICON
) && IconNotYetLoaded
)
639 if (flags
& SHGFI_SMALLICON
)
640 psfi
->hIcon
= ImageList_GetIcon( ShellSmallIconList
, psfi
->iIcon
, ILD_NORMAL
);
642 psfi
->hIcon
= ImageList_GetIcon( ShellBigIconList
, psfi
->iIcon
, ILD_NORMAL
);
645 if (flags
& ~SHGFI_KNOWN_FLAGS
)
646 FIXME("unknown flags %08x\n", flags
& ~SHGFI_KNOWN_FLAGS
);
649 IShellFolder_Release(psfParent
);
657 TRACE ("icon=%p index=0x%08x attr=0x%08x name=%s type=%s ret=0x%08lx\n",
658 psfi
->hIcon
, psfi
->iIcon
, psfi
->dwAttributes
,
659 debugstr_w(psfi
->szDisplayName
), debugstr_w(psfi
->szTypeName
), ret
);
665 /*************************************************************************
666 * SHGetFileInfoA [SHELL32.@]
668 DWORD_PTR WINAPI
SHGetFileInfoA(LPCSTR path
,DWORD dwFileAttributes
,
669 SHFILEINFOA
*psfi
, UINT sizeofpsfi
,
673 LPWSTR temppath
= NULL
;
676 SHFILEINFOW temppsfi
;
678 if (flags
& SHGFI_PIDL
)
680 /* path contains a pidl */
681 pathW
= (LPCWSTR
)path
;
685 len
= MultiByteToWideChar(CP_ACP
, 0, path
, -1, NULL
, 0);
686 temppath
= HeapAlloc(GetProcessHeap(), 0, len
*sizeof(WCHAR
));
687 MultiByteToWideChar(CP_ACP
, 0, path
, -1, temppath
, len
);
691 if (psfi
&& (flags
& SHGFI_ATTR_SPECIFIED
))
692 temppsfi
.dwAttributes
=psfi
->dwAttributes
;
695 ret
= SHGetFileInfoW(pathW
, dwFileAttributes
, NULL
, sizeof(temppsfi
), flags
);
697 ret
= SHGetFileInfoW(pathW
, dwFileAttributes
, &temppsfi
, sizeof(temppsfi
), flags
);
701 if(flags
& SHGFI_ICON
)
702 psfi
->hIcon
=temppsfi
.hIcon
;
703 if(flags
& (SHGFI_SYSICONINDEX
|SHGFI_ICON
|SHGFI_ICONLOCATION
))
704 psfi
->iIcon
=temppsfi
.iIcon
;
705 if(flags
& SHGFI_ATTRIBUTES
)
706 psfi
->dwAttributes
=temppsfi
.dwAttributes
;
707 if(flags
& (SHGFI_DISPLAYNAME
|SHGFI_ICONLOCATION
))
709 WideCharToMultiByte(CP_ACP
, 0, temppsfi
.szDisplayName
, -1,
710 psfi
->szDisplayName
, sizeof(psfi
->szDisplayName
), NULL
, NULL
);
712 if(flags
& SHGFI_TYPENAME
)
714 WideCharToMultiByte(CP_ACP
, 0, temppsfi
.szTypeName
, -1,
715 psfi
->szTypeName
, sizeof(psfi
->szTypeName
), NULL
, NULL
);
719 HeapFree(GetProcessHeap(), 0, temppath
);
724 /*************************************************************************
725 * DuplicateIcon [SHELL32.@]
727 HICON WINAPI
DuplicateIcon( HINSTANCE hInstance
, HICON hIcon
)
732 TRACE("%p %p\n", hInstance
, hIcon
);
734 if (GetIconInfo(hIcon
, &IconInfo
))
736 hDupIcon
= CreateIconIndirect(&IconInfo
);
738 /* clean up hbmMask and hbmColor */
739 DeleteObject(IconInfo
.hbmMask
);
740 DeleteObject(IconInfo
.hbmColor
);
746 /*************************************************************************
747 * ExtractIconA [SHELL32.@]
749 HICON WINAPI
ExtractIconA(HINSTANCE hInstance
, LPCSTR lpszFile
, UINT nIconIndex
)
752 INT len
= MultiByteToWideChar(CP_ACP
, 0, lpszFile
, -1, NULL
, 0);
753 LPWSTR lpwstrFile
= HeapAlloc(GetProcessHeap(), 0, len
* sizeof(WCHAR
));
755 TRACE("%p %s %d\n", hInstance
, lpszFile
, nIconIndex
);
757 MultiByteToWideChar(CP_ACP
, 0, lpszFile
, -1, lpwstrFile
, len
);
758 ret
= ExtractIconW(hInstance
, lpwstrFile
, nIconIndex
);
759 HeapFree(GetProcessHeap(), 0, lpwstrFile
);
764 /*************************************************************************
765 * ExtractIconW [SHELL32.@]
767 HICON WINAPI
ExtractIconW(HINSTANCE hInstance
, LPCWSTR lpszFile
, UINT nIconIndex
)
771 UINT cx
= GetSystemMetrics(SM_CXICON
), cy
= GetSystemMetrics(SM_CYICON
);
773 TRACE("%p %s %d\n", hInstance
, debugstr_w(lpszFile
), nIconIndex
);
775 if (nIconIndex
== 0xFFFFFFFF)
777 ret
= PrivateExtractIconsW(lpszFile
, 0, cx
, cy
, NULL
, NULL
, 0, LR_DEFAULTCOLOR
);
778 if (ret
!= 0xFFFFFFFF && ret
)
779 return (HICON
)(UINT_PTR
)ret
;
783 ret
= PrivateExtractIconsW(lpszFile
, nIconIndex
, cx
, cy
, &hIcon
, NULL
, 1, LR_DEFAULTCOLOR
);
785 if (ret
== 0xFFFFFFFF)
787 else if (ret
> 0 && hIcon
)
793 /*************************************************************************
794 * Printer_LoadIconsW [SHELL32.205]
796 VOID WINAPI
Printer_LoadIconsW(LPCWSTR wsPrinterName
, HICON
* pLargeIcon
, HICON
* pSmallIcon
)
798 INT iconindex
=IDI_SHELL_PRINTER
;
800 TRACE("(%s, %p, %p)\n", debugstr_w(wsPrinterName
), pLargeIcon
, pSmallIcon
);
802 /* We should check if wsPrinterName is
803 1. the Default Printer or not
805 3. a Local Printer or a Network-Printer
806 and use different Icons
808 if((wsPrinterName
!= NULL
) && (wsPrinterName
[0] != 0))
810 FIXME("(select Icon by PrinterName %s not implemented)\n", debugstr_w(wsPrinterName
));
813 if(pLargeIcon
!= NULL
)
814 *pLargeIcon
= LoadImageW(shell32_hInstance
,
815 (LPCWSTR
) MAKEINTRESOURCE(iconindex
), IMAGE_ICON
,
816 0, 0, LR_DEFAULTCOLOR
|LR_DEFAULTSIZE
);
818 if(pSmallIcon
!= NULL
)
819 *pSmallIcon
= LoadImageW(shell32_hInstance
,
820 (LPCWSTR
) MAKEINTRESOURCE(iconindex
), IMAGE_ICON
,
821 16, 16, LR_DEFAULTCOLOR
);
824 /*************************************************************************
825 * Printers_RegisterWindowW [SHELL32.213]
826 * used by "printui.dll":
827 * find the Window of the given Type for the specific Printer and
828 * return the already existent hwnd or open a new window
830 BOOL WINAPI
Printers_RegisterWindowW(LPCWSTR wsPrinter
, DWORD dwType
,
831 HANDLE
* phClassPidl
, HWND
* phwnd
)
833 FIXME("(%s, %x, %p (%p), %p (%p)) stub!\n", debugstr_w(wsPrinter
), dwType
,
834 phClassPidl
, (phClassPidl
!= NULL
) ? *(phClassPidl
) : NULL
,
835 phwnd
, (phwnd
!= NULL
) ? *(phwnd
) : NULL
);
840 /*************************************************************************
841 * Printers_UnregisterWindow [SHELL32.214]
843 VOID WINAPI
Printers_UnregisterWindow(HANDLE hClassPidl
, HWND hwnd
)
845 FIXME("(%p, %p) stub!\n", hClassPidl
, hwnd
);
848 /*************************************************************************/
853 LPCWSTR szOtherStuff
;
858 #define IDC_STATIC_TEXT1 100
859 #define IDC_STATIC_TEXT2 101
860 #define IDC_LISTBOX 99
861 #define IDC_WINE_TEXT 98
863 #define DROP_FIELD_TOP (-15)
864 #define DROP_FIELD_HEIGHT 15
866 static BOOL
__get_dropline( HWND hWnd
, LPRECT lprect
)
868 HWND hWndCtl
= GetDlgItem(hWnd
, IDC_WINE_TEXT
);
872 GetWindowRect( hWndCtl
, lprect
);
873 MapWindowPoints( 0, hWnd
, (LPPOINT
)lprect
, 2 );
874 lprect
->bottom
= (lprect
->top
+= DROP_FIELD_TOP
);
880 /*************************************************************************
881 * SHAppBarMessage [SHELL32.@]
883 UINT WINAPI
SHAppBarMessage(DWORD msg
, PAPPBARDATA data
)
885 int width
=data
->rc
.right
- data
->rc
.left
;
886 int height
=data
->rc
.bottom
- data
->rc
.top
;
892 return ABS_ALWAYSONTOP
| ABS_AUTOHIDE
;
893 case ABM_GETTASKBARPOS
:
894 GetWindowRect(data
->hWnd
, &rec
);
898 SetActiveWindow(data
->hWnd
);
900 case ABM_GETAUTOHIDEBAR
:
901 data
->hWnd
=GetActiveWindow();
904 /* cbSize, hWnd, and uCallbackMessage are used. All other ignored */
905 SetWindowPos(data
->hWnd
,HWND_TOP
,0,0,0,0,SWP_SHOWWINDOW
|SWP_NOMOVE
|SWP_NOSIZE
);
908 GetWindowRect(data
->hWnd
, &(data
->rc
));
911 FIXME("ABM_REMOVE broken\n");
912 /* FIXME: this is wrong; should it be DestroyWindow instead? */
913 /*CloseHandle(data->hWnd);*/
915 case ABM_SETAUTOHIDEBAR
:
916 SetWindowPos(data
->hWnd
,HWND_TOP
,rec
.left
+1000,rec
.top
,
917 width
,height
,SWP_SHOWWINDOW
);
920 data
->uEdge
=(ABE_RIGHT
| ABE_LEFT
);
921 SetWindowPos(data
->hWnd
,HWND_TOP
,data
->rc
.left
,data
->rc
.top
,
922 width
,height
,SWP_SHOWWINDOW
);
924 case ABM_WINDOWPOSCHANGED
:
930 /*************************************************************************
931 * SHHelpShortcuts_RunDLLA [SHELL32.@]
934 DWORD WINAPI
SHHelpShortcuts_RunDLLA(DWORD dwArg1
, DWORD dwArg2
, DWORD dwArg3
, DWORD dwArg4
)
936 FIXME("(%x, %x, %x, %x) stub!\n", dwArg1
, dwArg2
, dwArg3
, dwArg4
);
940 /*************************************************************************
941 * SHHelpShortcuts_RunDLLA [SHELL32.@]
944 DWORD WINAPI
SHHelpShortcuts_RunDLLW(DWORD dwArg1
, DWORD dwArg2
, DWORD dwArg3
, DWORD dwArg4
)
946 FIXME("(%x, %x, %x, %x) stub!\n", dwArg1
, dwArg2
, dwArg3
, dwArg4
);
950 /*************************************************************************
951 * SHLoadInProc [SHELL32.@]
952 * Create an instance of specified object class from within
953 * the shell process and release it immediately
955 HRESULT WINAPI
SHLoadInProc (REFCLSID rclsid
)
959 TRACE("%s\n", debugstr_guid(rclsid
));
961 CoCreateInstance(rclsid
, NULL
, CLSCTX_INPROC_SERVER
, &IID_IUnknown
,&ptr
);
964 IUnknown
* pUnk
= ptr
;
965 IUnknown_Release(pUnk
);
968 return DISP_E_MEMBERNOTFOUND
;
971 /*************************************************************************
972 * AboutDlgProc (internal)
974 INT_PTR CALLBACK
AboutDlgProc( HWND hWnd
, UINT msg
, WPARAM wParam
,
985 ABOUT_INFO
*info
= (ABOUT_INFO
*)lParam
;
986 WCHAR Template
[512], AppTitle
[512];
990 const char* const *pstr
= SHELL_Authors
;
991 SendDlgItemMessageW(hWnd
, stc1
, STM_SETICON
,(WPARAM
)info
->hIcon
, 0);
992 GetWindowTextW( hWnd
, Template
, sizeof(Template
)/sizeof(WCHAR
) );
993 sprintfW( AppTitle
, Template
, info
->szApp
);
994 SetWindowTextW( hWnd
, AppTitle
);
995 SetWindowTextW( GetDlgItem(hWnd
, IDC_STATIC_TEXT1
), info
->szApp
);
996 SetWindowTextW( GetDlgItem(hWnd
, IDC_STATIC_TEXT2
), info
->szOtherStuff
);
997 hWndCtl
= GetDlgItem(hWnd
, IDC_LISTBOX
);
998 SendMessageW( hWndCtl
, WM_SETREDRAW
, 0, 0 );
999 SendMessageW( hWndCtl
, WM_SETFONT
, (WPARAM
)info
->hFont
, 0 );
1003 /* authors list is in utf-8 format */
1004 MultiByteToWideChar( CP_UTF8
, 0, *pstr
, -1, name
, sizeof(name
)/sizeof(WCHAR
) );
1005 SendMessageW( hWndCtl
, LB_ADDSTRING
, (WPARAM
)-1, (LPARAM
)name
);
1008 SendMessageW( hWndCtl
, WM_SETREDRAW
, 1, 0 );
1017 HDC hDC
= BeginPaint( hWnd
, &ps
);
1019 if (__get_dropline( hWnd
, &rect
))
1021 SelectObject( hDC
, GetStockObject( BLACK_PEN
) );
1022 MoveToEx( hDC
, rect
.left
, rect
.top
, NULL
);
1023 LineTo( hDC
, rect
.right
, rect
.bottom
);
1025 EndPaint( hWnd
, &ps
);
1030 if (wParam
== IDOK
|| wParam
== IDCANCEL
)
1032 EndDialog(hWnd
, TRUE
);
1037 EndDialog(hWnd
, TRUE
);
1045 /*************************************************************************
1046 * ShellAboutA [SHELL32.288]
1048 BOOL WINAPI
ShellAboutA( HWND hWnd
, LPCSTR szApp
, LPCSTR szOtherStuff
, HICON hIcon
)
1051 LPWSTR appW
= NULL
, otherW
= NULL
;
1056 len
= MultiByteToWideChar(CP_ACP
, 0, szApp
, -1, NULL
, 0);
1057 appW
= HeapAlloc(GetProcessHeap(), 0, len
* sizeof(WCHAR
));
1058 MultiByteToWideChar(CP_ACP
, 0, szApp
, -1, appW
, len
);
1062 len
= MultiByteToWideChar(CP_ACP
, 0, szOtherStuff
, -1, NULL
, 0);
1063 otherW
= HeapAlloc(GetProcessHeap(), 0, len
* sizeof(WCHAR
));
1064 MultiByteToWideChar(CP_ACP
, 0, szOtherStuff
, -1, otherW
, len
);
1067 ret
= ShellAboutW(hWnd
, appW
, otherW
, hIcon
);
1069 HeapFree(GetProcessHeap(), 0, otherW
);
1070 HeapFree(GetProcessHeap(), 0, appW
);
1075 /*************************************************************************
1076 * ShellAboutW [SHELL32.289]
1078 BOOL WINAPI
ShellAboutW( HWND hWnd
, LPCWSTR szApp
, LPCWSTR szOtherStuff
,
1086 static const WCHAR wszSHELL_ABOUT_MSGBOX
[] =
1087 {'S','H','E','L','L','_','A','B','O','U','T','_','M','S','G','B','O','X',0};
1091 if(!(hRes
= FindResourceW(shell32_hInstance
, wszSHELL_ABOUT_MSGBOX
, (LPWSTR
)RT_DIALOG
)))
1093 if(!(template = (LPVOID
)LoadResource(shell32_hInstance
, hRes
)))
1096 info
.szOtherStuff
= szOtherStuff
;
1097 info
.hIcon
= hIcon
? hIcon
: LoadIconW( 0, (LPWSTR
)IDI_WINLOGO
);
1099 SystemParametersInfoW( SPI_GETICONTITLELOGFONT
, 0, &logFont
, 0 );
1100 info
.hFont
= CreateFontIndirectW( &logFont
);
1102 bRet
= DialogBoxIndirectParamW((HINSTANCE
)GetWindowLongPtrW( hWnd
, GWLP_HINSTANCE
),
1103 template, hWnd
, AboutDlgProc
, (LPARAM
)&info
);
1104 DeleteObject(info
.hFont
);
1108 /*************************************************************************
1109 * FreeIconList (SHELL32.@)
1111 void WINAPI
FreeIconList( DWORD dw
)
1113 FIXME("%x: stub\n",dw
);
1116 /*************************************************************************
1117 * SHLoadNonloadedIconOverlayIdentifiers (SHELL32.@)
1119 HRESULT WINAPI
SHLoadNonloadedIconOverlayIdentifiers( VOID
)
1125 /***********************************************************************
1126 * DllGetVersion [SHELL32.@]
1128 * Retrieves version information of the 'SHELL32.DLL'
1131 * pdvi [O] pointer to version information structure.
1135 * Failure: E_INVALIDARG
1138 * Returns version of a shell32.dll from IE4.01 SP1.
1141 HRESULT WINAPI
DllGetVersion (DLLVERSIONINFO
*pdvi
)
1143 /* FIXME: shouldn't these values come from the version resource? */
1144 if (pdvi
->cbSize
== sizeof(DLLVERSIONINFO
) ||
1145 pdvi
->cbSize
== sizeof(DLLVERSIONINFO2
))
1147 pdvi
->dwMajorVersion
= WINE_FILEVERSION_MAJOR
;
1148 pdvi
->dwMinorVersion
= WINE_FILEVERSION_MINOR
;
1149 pdvi
->dwBuildNumber
= WINE_FILEVERSION_BUILD
;
1150 pdvi
->dwPlatformID
= WINE_FILEVERSION_PLATFORMID
;
1151 if (pdvi
->cbSize
== sizeof(DLLVERSIONINFO2
))
1153 DLLVERSIONINFO2
*pdvi2
= (DLLVERSIONINFO2
*)pdvi
;
1156 pdvi2
->ullVersion
= MAKEDLLVERULL(WINE_FILEVERSION_MAJOR
,
1157 WINE_FILEVERSION_MINOR
,
1158 WINE_FILEVERSION_BUILD
,
1159 WINE_FILEVERSION_PLATFORMID
);
1161 TRACE("%u.%u.%u.%u\n",
1162 pdvi
->dwMajorVersion
, pdvi
->dwMinorVersion
,
1163 pdvi
->dwBuildNumber
, pdvi
->dwPlatformID
);
1168 WARN("wrong DLLVERSIONINFO size from app\n");
1169 return E_INVALIDARG
;
1173 /*************************************************************************
1174 * global variables of the shell32.dll
1175 * all are once per process
1178 HINSTANCE shell32_hInstance
= 0;
1179 HIMAGELIST ShellSmallIconList
= 0;
1180 HIMAGELIST ShellBigIconList
= 0;
1183 /*************************************************************************
1187 * calling oleinitialize here breaks sone apps.
1189 BOOL WINAPI
DllMain(HINSTANCE hinstDLL
, DWORD fdwReason
, LPVOID fImpLoad
)
1191 TRACE("%p 0x%x %p\n", hinstDLL
, fdwReason
, fImpLoad
);
1195 case DLL_PROCESS_ATTACH
:
1196 shell32_hInstance
= hinstDLL
;
1197 DisableThreadLibraryCalls(shell32_hInstance
);
1199 /* get full path to this DLL for IExtractIconW_fnGetIconLocation() */
1200 GetModuleFileNameW(hinstDLL
, swShell32Name
, MAX_PATH
);
1201 swShell32Name
[MAX_PATH
- 1] = '\0';
1203 InitCommonControlsEx(NULL
);
1206 InitChangeNotifications();
1209 case DLL_PROCESS_DETACH
:
1210 shell32_hInstance
= 0;
1212 FreeChangeNotifications();
1218 /*************************************************************************
1219 * DllInstall [SHELL32.@]
1223 * BOOL bInstall - TRUE for install, FALSE for uninstall
1224 * LPCWSTR pszCmdLine - command line (unused by shell32?)
1227 HRESULT WINAPI
DllInstall(BOOL bInstall
, LPCWSTR cmdline
)
1229 FIXME("%s %s: stub\n", bInstall
? "TRUE":"FALSE", debugstr_w(cmdline
));
1230 return S_OK
; /* indicate success */
1233 /***********************************************************************
1234 * DllCanUnloadNow (SHELL32.@)
1236 HRESULT WINAPI
DllCanUnloadNow(void)