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 = 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 = 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 = 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)