| /* | 
 |  * Unit test of the IShellFolder functions. | 
 |  * | 
 |  * Copyright 2004 Vitaliy Margolen | 
 |  * | 
 |  * This library is free software; you can redistribute it and/or | 
 |  * modify it under the terms of the GNU Lesser General Public | 
 |  * License as published by the Free Software Foundation; either | 
 |  * version 2.1 of the License, or (at your option) any later version. | 
 |  * | 
 |  * This library is distributed in the hope that it will be useful, | 
 |  * but WITHOUT ANY WARRANTY; without even the implied warranty of | 
 |  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU | 
 |  * Lesser General Public License for more details. | 
 |  * | 
 |  * You should have received a copy of the GNU Lesser General Public | 
 |  * License along with this library; if not, write to the Free Software | 
 |  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA | 
 |  */ | 
 |  | 
 | #include <stdarg.h> | 
 | #include <stdio.h> | 
 |  | 
 | #define COBJMACROS | 
 | #define CONST_VTABLE | 
 |  | 
 | #include "windef.h" | 
 | #include "winbase.h" | 
 | #include "wtypes.h" | 
 | #include "shellapi.h" | 
 |  | 
 |  | 
 | #include "shlguid.h" | 
 | #include "shlobj.h" | 
 | #include "shobjidl.h" | 
 | #include "shlwapi.h" | 
 | #include "ocidl.h" | 
 | #include "oleauto.h" | 
 |  | 
 | #include "wine/test.h" | 
 |  | 
 |  | 
 | static IMalloc *ppM; | 
 |  | 
 | static HRESULT (WINAPI *pSHBindToParent)(LPCITEMIDLIST, REFIID, LPVOID*, LPCITEMIDLIST*); | 
 | static BOOL (WINAPI *pSHGetSpecialFolderPathW)(HWND, LPWSTR, int, BOOL); | 
 | static HRESULT (WINAPI *pStrRetToBufW)(STRRET*,LPCITEMIDLIST,LPWSTR,UINT); | 
 | static LPITEMIDLIST (WINAPI *pILFindLastID)(LPCITEMIDLIST); | 
 |  | 
 | static void init_function_pointers(void) | 
 | { | 
 |     HMODULE hmod; | 
 |     HRESULT hr; | 
 |  | 
 |     hmod = GetModuleHandleA("shell32.dll"); | 
 |     if(hmod) | 
 |     { | 
 |         pSHBindToParent = (void*)GetProcAddress(hmod, "SHBindToParent"); | 
 |         pSHGetSpecialFolderPathW = (void*)GetProcAddress(hmod, "SHGetSpecialFolderPathW"); | 
 |         pILFindLastID = (void *)GetProcAddress(hmod, (LPCSTR)16); | 
 |  | 
 |     } | 
 |  | 
 |     hmod = GetModuleHandleA("shlwapi.dll"); | 
 |     if(hmod) | 
 |     { | 
 |         pStrRetToBufW = (void*)GetProcAddress(hmod, "StrRetToBufW"); | 
 |     } | 
 |  | 
 |     hr = SHGetMalloc(&ppM); | 
 |     ok(hr == S_OK, "SHGetMalloc failed %08x\n", hr); | 
 | } | 
 |  | 
 | static void test_ParseDisplayName(void) | 
 | { | 
 |     HRESULT hr; | 
 |     IShellFolder *IDesktopFolder; | 
 |     static const char *cNonExistDir1A = "c:\\nonexist_subdir"; | 
 |     static const char *cNonExistDir2A = "c:\\\\nonexist_subdir"; | 
 |     DWORD res; | 
 |     WCHAR cTestDirW [MAX_PATH] = {0}; | 
 |     ITEMIDLIST *newPIDL; | 
 |     BOOL bRes; | 
 |  | 
 |     hr = SHGetDesktopFolder(&IDesktopFolder); | 
 |     if(hr != S_OK) return; | 
 |  | 
 |     res = GetFileAttributesA(cNonExistDir1A); | 
 |     if(res != INVALID_FILE_ATTRIBUTES) return; | 
 |  | 
 |     MultiByteToWideChar(CP_ACP, 0, cNonExistDir1A, -1, cTestDirW, MAX_PATH); | 
 |     hr = IShellFolder_ParseDisplayName(IDesktopFolder,  | 
 |         NULL, NULL, cTestDirW, NULL, &newPIDL, 0); | 
 |     ok((hr == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND)) || (hr == E_FAIL),  | 
 |         "ParseDisplayName returned %08x, expected 80070002 or E_FAIL\n", hr); | 
 |  | 
 |     res = GetFileAttributesA(cNonExistDir2A); | 
 |     if(res != INVALID_FILE_ATTRIBUTES) return; | 
 |  | 
 |     MultiByteToWideChar(CP_ACP, 0, cNonExistDir2A, -1, cTestDirW, MAX_PATH); | 
 |     hr = IShellFolder_ParseDisplayName(IDesktopFolder,  | 
 |         NULL, NULL, cTestDirW, NULL, &newPIDL, 0); | 
 |     ok((hr == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND)) || (hr == E_FAIL) || (hr == E_INVALIDARG),  | 
 |         "ParseDisplayName returned %08x, expected 80070002, E_FAIL or E_INVALIDARG\n", hr); | 
 |  | 
 |     /* I thought that perhaps the DesktopFolder's ParseDisplayName would recognize the | 
 |      * path corresponding to CSIDL_PERSONAL and return a CLSID_MyDocuments PIDL. Turns | 
 |      * out it doesn't. The magic seems to happen in the file dialogs, then. */ | 
 |     if (!pSHGetSpecialFolderPathW || !pILFindLastID) goto finished; | 
 |      | 
 |     bRes = pSHGetSpecialFolderPathW(NULL, cTestDirW, CSIDL_PERSONAL, FALSE); | 
 |     ok(bRes, "SHGetSpecialFolderPath(CSIDL_PERSONAL) failed! %d\n", GetLastError()); | 
 |     if (!bRes) goto finished; | 
 |  | 
 |     hr = IShellFolder_ParseDisplayName(IDesktopFolder, NULL, NULL, cTestDirW, NULL, &newPIDL, 0); | 
 |     ok(SUCCEEDED(hr), "DesktopFolder->ParseDisplayName failed. hr = %08x.\n", hr); | 
 |     if (FAILED(hr)) goto finished; | 
 |  | 
 |     ok(pILFindLastID(newPIDL)->mkid.abID[0] == 0x31, "Last pidl should be of type " | 
 |        "PT_FOLDER, but is: %02x\n", pILFindLastID(newPIDL)->mkid.abID[0]); | 
 |     IMalloc_Free(ppM, newPIDL); | 
 |      | 
 | finished: | 
 |     IShellFolder_Release(IDesktopFolder); | 
 | } | 
 |  | 
 | /* creates a file with the specified name for tests */ | 
 | static void CreateTestFile(const CHAR *name) | 
 | { | 
 |     HANDLE file; | 
 |     DWORD written; | 
 |  | 
 |     file = CreateFileA(name, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL); | 
 |     if (file != INVALID_HANDLE_VALUE) | 
 |     { | 
 | 	WriteFile(file, name, strlen(name), &written, NULL); | 
 | 	WriteFile(file, "\n", strlen("\n"), &written, NULL); | 
 | 	CloseHandle(file); | 
 |     } | 
 | } | 
 |  | 
 |  | 
 | /* initializes the tests */ | 
 | static void CreateFilesFolders(void) | 
 | { | 
 |     CreateDirectoryA(".\\testdir", NULL); | 
 |     CreateDirectoryA(".\\testdir\\test.txt", NULL); | 
 |     CreateTestFile  (".\\testdir\\test1.txt "); | 
 |     CreateTestFile  (".\\testdir\\test2.txt "); | 
 |     CreateTestFile  (".\\testdir\\test3.txt "); | 
 |     CreateDirectoryA(".\\testdir\\testdir2 ", NULL); | 
 |     CreateDirectoryA(".\\testdir\\testdir2\\subdir", NULL); | 
 | } | 
 |  | 
 | /* cleans after tests */ | 
 | static void Cleanup(void) | 
 | { | 
 |     DeleteFileA(".\\testdir\\test1.txt"); | 
 |     DeleteFileA(".\\testdir\\test2.txt"); | 
 |     DeleteFileA(".\\testdir\\test3.txt"); | 
 |     RemoveDirectoryA(".\\testdir\\test.txt"); | 
 |     RemoveDirectoryA(".\\testdir\\testdir2\\subdir"); | 
 |     RemoveDirectoryA(".\\testdir\\testdir2"); | 
 |     RemoveDirectoryA(".\\testdir"); | 
 | } | 
 |  | 
 |  | 
 | /* perform test */ | 
 | static void test_EnumObjects(IShellFolder *iFolder) | 
 | { | 
 |     IEnumIDList *iEnumList; | 
 |     LPITEMIDLIST newPIDL, idlArr[10]; | 
 |     ULONG NumPIDLs; | 
 |     int i=0, j; | 
 |     HRESULT hr; | 
 |  | 
 |     static const WORD iResults [5][5] = | 
 |     { | 
 | 	{ 0,-1,-1,-1,-1}, | 
 | 	{ 1, 0,-1,-1,-1}, | 
 | 	{ 1, 1, 0,-1,-1}, | 
 | 	{ 1, 1, 1, 0,-1}, | 
 | 	{ 1, 1, 1, 1, 0} | 
 |     }; | 
 |  | 
 | #define SFGAO_testfor SFGAO_FILESYSTEM | SFGAO_FOLDER | SFGAO_FILESYSANCESTOR | SFGAO_CAPABILITYMASK | 
 |     /* Don't test for SFGAO_HASSUBFOLDER since we return real state and native cached */ | 
 |     static const ULONG attrs[5] = | 
 |     { | 
 |         SFGAO_CAPABILITYMASK | SFGAO_FILESYSTEM | SFGAO_FOLDER | SFGAO_FILESYSANCESTOR, | 
 |         SFGAO_CAPABILITYMASK | SFGAO_FILESYSTEM | SFGAO_FOLDER | SFGAO_FILESYSANCESTOR, | 
 |         SFGAO_CAPABILITYMASK | SFGAO_FILESYSTEM, | 
 |         SFGAO_CAPABILITYMASK | SFGAO_FILESYSTEM, | 
 |         SFGAO_CAPABILITYMASK | SFGAO_FILESYSTEM, | 
 |     }; | 
 |  | 
 |     hr = IShellFolder_EnumObjects(iFolder, NULL, SHCONTF_FOLDERS | SHCONTF_NONFOLDERS | SHCONTF_INCLUDEHIDDEN, &iEnumList); | 
 |     ok(hr == S_OK, "EnumObjects failed %08x\n", hr); | 
 |  | 
 |     /* This is to show that, contrary to what is said on MSDN, on IEnumIDList::Next, | 
 |      * the filesystem shellfolders return S_OK even if less than 'celt' items are | 
 |      * returned (in contrast to S_FALSE). We have to do it in a loop since WinXP | 
 |      * only ever returns a single entry per call. */ | 
 |     while (IEnumIDList_Next(iEnumList, 10-i, &idlArr[i], &NumPIDLs) == S_OK)  | 
 |         i += NumPIDLs; | 
 |     ok (i == 5, "i: %d\n", i); | 
 |  | 
 |     hr = IEnumIDList_Release(iEnumList); | 
 |     ok(hr == S_OK, "IEnumIDList_Release failed %08x\n", hr); | 
 |      | 
 |     /* Sort them first in case of wrong order from system */ | 
 |     for (i=0;i<5;i++) for (j=0;j<5;j++) | 
 |         if ((SHORT)IShellFolder_CompareIDs(iFolder, 0, idlArr[i], idlArr[j]) < 0) | 
 | 	{ | 
 |             newPIDL = idlArr[i]; | 
 |             idlArr[i] = idlArr[j]; | 
 |             idlArr[j] = newPIDL; | 
 |         } | 
 | 	     | 
 |     for (i=0;i<5;i++) for (j=0;j<5;j++) | 
 |     { | 
 |         hr = IShellFolder_CompareIDs(iFolder, 0, idlArr[i], idlArr[j]); | 
 |         ok(hr == iResults[i][j], "Got %x expected [%d]-[%d]=%x\n", hr, i, j, iResults[i][j]); | 
 |     } | 
 |  | 
 |  | 
 |     for (i = 0; i < 5; i++) | 
 |     { | 
 |         SFGAOF flags; | 
 |         /* Native returns all flags no matter what we ask for */ | 
 |         flags = SFGAO_CANCOPY; | 
 |         hr = IShellFolder_GetAttributesOf(iFolder, 1, (LPCITEMIDLIST*)(idlArr + i), &flags); | 
 |         flags &= SFGAO_testfor; | 
 |         ok(hr == S_OK, "GetAttributesOf returns %08x\n", hr); | 
 |         ok(flags == (attrs[i]), "GetAttributesOf[%i] got %08x, expected %08x\n", i, flags, attrs[i]); | 
 |  | 
 |         flags = SFGAO_testfor; | 
 |         hr = IShellFolder_GetAttributesOf(iFolder, 1, (LPCITEMIDLIST*)(idlArr + i), &flags); | 
 |         flags &= SFGAO_testfor; | 
 |         ok(hr == S_OK, "GetAttributesOf returns %08x\n", hr); | 
 |         ok(flags == attrs[i], "GetAttributesOf[%i] got %08x, expected %08x\n", i, flags, attrs[i]); | 
 |     } | 
 |  | 
 |     for (i=0;i<5;i++) | 
 |         IMalloc_Free(ppM, idlArr[i]); | 
 | } | 
 |  | 
 | static void test_BindToObject(void) | 
 | { | 
 |     HRESULT hr; | 
 |     UINT cChars; | 
 |     IShellFolder *psfDesktop, *psfChild, *psfMyComputer, *psfSystemDir; | 
 |     SHITEMID emptyitem = { 0, { 0 } }; | 
 |     LPITEMIDLIST pidlMyComputer, pidlSystemDir, pidlEmpty = (LPITEMIDLIST)&emptyitem; | 
 |     WCHAR wszSystemDir[MAX_PATH]; | 
 |     char szSystemDir[MAX_PATH]; | 
 |     WCHAR wszMyComputer[] = {  | 
 |         ':',':','{','2','0','D','0','4','F','E','0','-','3','A','E','A','-','1','0','6','9','-', | 
 |         'A','2','D','8','-','0','8','0','0','2','B','3','0','3','0','9','D','}',0 }; | 
 |  | 
 |     /* The following tests shows that BindToObject should fail with E_INVALIDARG if called | 
 |      * with an empty pidl. This is tested for Desktop, MyComputer and the FS ShellFolder | 
 |      */ | 
 |     hr = SHGetDesktopFolder(&psfDesktop); | 
 |     ok (SUCCEEDED(hr), "SHGetDesktopFolder failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |      | 
 |     hr = IShellFolder_BindToObject(psfDesktop, pidlEmpty, NULL, &IID_IShellFolder, (LPVOID*)&psfChild); | 
 |     ok (hr == E_INVALIDARG, "Desktop's BindToObject should fail, when called with empty pidl! hr = %08x\n", hr); | 
 |  | 
 |     hr = IShellFolder_BindToObject(psfDesktop, NULL, NULL, &IID_IShellFolder, (LPVOID*)&psfChild); | 
 |     ok (hr == E_INVALIDARG, "Desktop's BindToObject should fail, when called with NULL pidl! hr = %08x\n", hr); | 
 |  | 
 |     hr = IShellFolder_ParseDisplayName(psfDesktop, NULL, NULL, wszMyComputer, NULL, &pidlMyComputer, NULL); | 
 |     ok (SUCCEEDED(hr), "Desktop's ParseDisplayName failed to parse MyComputer's CLSID! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |      | 
 |     hr = IShellFolder_BindToObject(psfDesktop, pidlMyComputer, NULL, &IID_IShellFolder, (LPVOID*)&psfMyComputer); | 
 |     ok (SUCCEEDED(hr), "Desktop failed to bind to MyComputer object! hr = %08x\n", hr); | 
 |     IShellFolder_Release(psfDesktop); | 
 |     IMalloc_Free(ppM, pidlMyComputer); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IShellFolder_BindToObject(psfMyComputer, pidlEmpty, NULL, &IID_IShellFolder, (LPVOID*)&psfChild); | 
 |     ok (hr == E_INVALIDARG, "MyComputers's BindToObject should fail, when called with empty pidl! hr = %08x\n", hr); | 
 |  | 
 | #if 0 | 
 |     /* this call segfaults on 98SE */ | 
 |     hr = IShellFolder_BindToObject(psfMyComputer, NULL, NULL, &IID_IShellFolder, (LPVOID*)&psfChild); | 
 |     ok (hr == E_INVALIDARG, "MyComputers's BindToObject should fail, when called with NULL pidl! hr = %08x\n", hr); | 
 | #endif | 
 |  | 
 |     cChars = GetSystemDirectoryA(szSystemDir, MAX_PATH); | 
 |     ok (cChars > 0 && cChars < MAX_PATH, "GetSystemDirectoryA failed! LastError: %08x\n", GetLastError()); | 
 |     if (cChars == 0 || cChars >= MAX_PATH) { | 
 |         IShellFolder_Release(psfMyComputer); | 
 |         return; | 
 |     } | 
 |     MultiByteToWideChar(CP_ACP, 0, szSystemDir, -1, wszSystemDir, MAX_PATH); | 
 |      | 
 |     hr = IShellFolder_ParseDisplayName(psfMyComputer, NULL, NULL, wszSystemDir, NULL, &pidlSystemDir, NULL); | 
 |     ok (SUCCEEDED(hr), "MyComputers's ParseDisplayName failed to parse the SystemDirectory! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(psfMyComputer); | 
 |         return; | 
 |     } | 
 |  | 
 |     hr = IShellFolder_BindToObject(psfMyComputer, pidlSystemDir, NULL, &IID_IShellFolder, (LPVOID*)&psfSystemDir); | 
 |     ok (SUCCEEDED(hr), "MyComputer failed to bind to a FileSystem ShellFolder! hr = %08x\n", hr); | 
 |     IShellFolder_Release(psfMyComputer); | 
 |     IMalloc_Free(ppM, pidlSystemDir); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IShellFolder_BindToObject(psfSystemDir, pidlEmpty, NULL, &IID_IShellFolder, (LPVOID*)&psfChild); | 
 |     ok (hr == E_INVALIDARG,  | 
 |         "FileSystem ShellFolder's BindToObject should fail, when called with empty pidl! hr = %08x\n", hr); | 
 |      | 
 | #if 0 | 
 |     /* this call segfaults on 98SE */ | 
 |     hr = IShellFolder_BindToObject(psfSystemDir, NULL, NULL, &IID_IShellFolder, (LPVOID*)&psfChild); | 
 |     ok (hr == E_INVALIDARG,  | 
 |         "FileSystem ShellFolder's BindToObject should fail, when called with NULL pidl! hr = %08x\n", hr); | 
 | #endif | 
 |  | 
 |     IShellFolder_Release(psfSystemDir); | 
 | } | 
 |    | 
 | static void test_GetDisplayName(void) | 
 | { | 
 |     BOOL result; | 
 |     HRESULT hr; | 
 |     HANDLE hTestFile; | 
 |     WCHAR wszTestFile[MAX_PATH], wszTestFile2[MAX_PATH], wszTestDir[MAX_PATH]; | 
 |     char szTestFile[MAX_PATH], szTestDir[MAX_PATH]; | 
 |     STRRET strret; | 
 |     LPSHELLFOLDER psfDesktop, psfPersonal; | 
 |     IUnknown *psfFile; | 
 |     SHITEMID emptyitem = { 0, { 0 } }; | 
 |     LPITEMIDLIST pidlTestFile, pidlEmpty = (LPITEMIDLIST)&emptyitem; | 
 |     LPCITEMIDLIST pidlLast; | 
 |     static const WCHAR wszFileName[] = { 'w','i','n','e','t','e','s','t','.','f','o','o',0 }; | 
 |     static const WCHAR wszDirName[] = { 'w','i','n','e','t','e','s','t',0 }; | 
 |  | 
 |     /* I'm trying to figure if there is a functional difference between calling | 
 |      * SHGetPathFromIDList and calling GetDisplayNameOf(SHGDN_FORPARSING) after | 
 |      * binding to the shellfolder. One thing I thought of was that perhaps  | 
 |      * SHGetPathFromIDList would be able to get the path to a file, which does | 
 |      * not exist anymore, while the other method would'nt. It turns out there's | 
 |      * no functional difference in this respect. | 
 |      */ | 
 |  | 
 |     if(!pSHGetSpecialFolderPathW) return; | 
 |  | 
 |     /* First creating a directory in MyDocuments and a file in this directory. */ | 
 |     result = pSHGetSpecialFolderPathW(NULL, wszTestDir, CSIDL_PERSONAL, FALSE); | 
 |     ok(result, "SHGetSpecialFolderPathW failed! Last error: %08x\n", GetLastError()); | 
 |     if (!result) return; | 
 |  | 
 |     PathAddBackslashW(wszTestDir); | 
 |     lstrcatW(wszTestDir, wszDirName); | 
 |     WideCharToMultiByte(CP_ACP, 0, wszTestDir, -1, szTestDir, MAX_PATH, 0, 0); | 
 |     result = CreateDirectoryA(szTestDir, NULL); | 
 |     ok(result, "CreateDirectoryA failed! Last error: %08x\n", GetLastError()); | 
 |     if (!result) return; | 
 |  | 
 |     lstrcpyW(wszTestFile, wszTestDir); | 
 |     PathAddBackslashW(wszTestFile); | 
 |     lstrcatW(wszTestFile, wszFileName); | 
 |     WideCharToMultiByte(CP_ACP, 0, wszTestFile, -1, szTestFile, MAX_PATH, 0, 0); | 
 |  | 
 |     hTestFile = CreateFileA(szTestFile, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL); | 
 |     ok((hTestFile != INVALID_HANDLE_VALUE), "CreateFileA failed! Last error: %08x\n", GetLastError()); | 
 |     if (hTestFile == INVALID_HANDLE_VALUE) return; | 
 |     CloseHandle(hTestFile); | 
 |  | 
 |     /* Getting an itemidlist for the file. */ | 
 |     hr = SHGetDesktopFolder(&psfDesktop); | 
 |     ok(SUCCEEDED(hr), "SHGetDesktopFolder failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IShellFolder_ParseDisplayName(psfDesktop, NULL, NULL, wszTestFile, NULL, &pidlTestFile, NULL); | 
 |     ok(SUCCEEDED(hr), "Desktop->ParseDisplayName failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |  | 
 |     /* WinXP stores the filenames as both ANSI and UNICODE in the pidls */ | 
 |     pidlLast = pILFindLastID(pidlTestFile); | 
 |     ok(pidlLast->mkid.cb >=76, "Expected pidl length of at least 76, got %d.\n", pidlLast->mkid.cb); | 
 |     if (pidlLast->mkid.cb >= 76) { | 
 |         ok(!lstrcmpW((WCHAR*)&pidlLast->mkid.abID[46], wszFileName), | 
 |             "WinXP stores the filename as a wchar-string at this position!\n"); | 
 |     } | 
 |      | 
 |     /* It seems as if we cannot bind to regular files on windows, but only directories.  | 
 |      */ | 
 |     hr = IShellFolder_BindToObject(psfDesktop, pidlTestFile, NULL, &IID_IUnknown, (VOID**)&psfFile); | 
 |     todo_wine { ok (hr == HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND), "hr = %08x\n", hr); } | 
 |     if (SUCCEEDED(hr)) { | 
 |         IShellFolder_Release(psfFile); | 
 |     } | 
 |    | 
 |     /* Some tests for IShellFolder::SetNameOf */ | 
 |     hr = pSHBindToParent(pidlTestFile, &IID_IShellFolder, (VOID**)&psfPersonal, &pidlLast); | 
 |     ok(SUCCEEDED(hr), "SHBindToParent failed! hr = %08x\n", hr); | 
 |     if (SUCCEEDED(hr)) { | 
 |         /* It's ok to use this fixed path. Call will fail anyway. */ | 
 |         WCHAR wszAbsoluteFilename[] = { 'C',':','\\','w','i','n','e','t','e','s','t', 0 }; | 
 |         LPITEMIDLIST pidlNew; | 
 |  | 
 |         /* The pidl returned through the last parameter of SetNameOf is a simple one. */ | 
 |         hr = IShellFolder_SetNameOf(psfPersonal, NULL, pidlLast, wszDirName, SHGDN_NORMAL, &pidlNew); | 
 |         ok (SUCCEEDED(hr), "SetNameOf failed! hr = %08x\n", hr); | 
 |         ok (((LPITEMIDLIST)((LPBYTE)pidlNew+pidlNew->mkid.cb))->mkid.cb == 0,  | 
 |             "pidl returned from SetNameOf should be simple!\n"); | 
 |  | 
 |         /* Passing an absolute path to SetNameOf fails. The HRESULT code indicates that SetNameOf | 
 |          * is implemented on top of SHFileOperation in WinXP. */ | 
 |         hr = IShellFolder_SetNameOf(psfPersonal, NULL, pidlNew, wszAbsoluteFilename,  | 
 |                 SHGDN_FORPARSING, NULL); | 
 |         ok (hr == HRESULT_FROM_WIN32(ERROR_CANCELLED), "SetNameOf succeeded! hr = %08x\n", hr); | 
 |     | 
 |         /* Rename the file back to it's original name. SetNameOf ignores the fact, that the  | 
 |          * SHGDN flags specify an absolute path. */ | 
 |         hr = IShellFolder_SetNameOf(psfPersonal, NULL, pidlNew, wszFileName, SHGDN_FORPARSING, NULL); | 
 |         ok (SUCCEEDED(hr), "SetNameOf failed! hr = %08x\n", hr); | 
 |  | 
 |         ILFree(pidlNew); | 
 |         IShellFolder_Release(psfPersonal); | 
 |     } | 
 |      | 
 |     /* Deleting the file and the directory */ | 
 |     DeleteFileA(szTestFile); | 
 |     RemoveDirectoryA(szTestDir); | 
 |  | 
 |     /* SHGetPathFromIDListW still works, although the file is not present anymore. */ | 
 |     result = SHGetPathFromIDListW(pidlTestFile, wszTestFile2); | 
 |     ok (result, "SHGetPathFromIDListW failed! Last error: %08x\n", GetLastError()); | 
 |     ok (!lstrcmpiW(wszTestFile, wszTestFile2), "SHGetPathFromIDListW returns incorrect path!\n"); | 
 |  | 
 |     if(!pSHBindToParent) return; | 
 |  | 
 |     /* SHBindToParent fails, if called with a NULL PIDL. */ | 
 |     hr = pSHBindToParent(NULL, &IID_IShellFolder, (VOID**)&psfPersonal, &pidlLast); | 
 |     ok (FAILED(hr), "SHBindToParent(NULL) should fail!\n"); | 
 |  | 
 |     /* But it succeeds with an empty PIDL. */ | 
 |     hr = pSHBindToParent(pidlEmpty, &IID_IShellFolder, (VOID**)&psfPersonal, &pidlLast); | 
 |     ok (SUCCEEDED(hr), "SHBindToParent(empty PIDL) should succeed! hr = %08x\n", hr); | 
 |     ok (pidlLast == pidlEmpty, "The last element of an empty PIDL should be the PIDL itself!\n"); | 
 |     if (SUCCEEDED(hr))  | 
 |         IShellFolder_Release(psfPersonal); | 
 |      | 
 |     /* Binding to the folder and querying the display name of the file also works. */ | 
 |     hr = pSHBindToParent(pidlTestFile, &IID_IShellFolder, (VOID**)&psfPersonal, &pidlLast);  | 
 |     ok (SUCCEEDED(hr), "SHBindToParent failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |  | 
 |     /* This test shows that Windows doesn't allocate a new pidlLast, but returns a pointer into  | 
 |      * pidlTestFile (In accordance with MSDN). */ | 
 |     ok (pILFindLastID(pidlTestFile) == pidlLast,  | 
 |                                 "SHBindToParent doesn't return the last id of the pidl param!\n"); | 
 |      | 
 |     hr = IShellFolder_GetDisplayNameOf(psfPersonal, pidlLast, SHGDN_FORPARSING, &strret); | 
 |     ok (SUCCEEDED(hr), "Personal->GetDisplayNameOf failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         IShellFolder_Release(psfPersonal); | 
 |         return; | 
 |     } | 
 |  | 
 |     if (pStrRetToBufW) | 
 |     { | 
 |         hr = pStrRetToBufW(&strret, pidlLast, wszTestFile2, MAX_PATH); | 
 |         ok (SUCCEEDED(hr), "StrRetToBufW failed! hr = %08x\n", hr); | 
 |         ok (!lstrcmpiW(wszTestFile, wszTestFile2), "GetDisplayNameOf returns incorrect path!\n"); | 
 |     } | 
 |      | 
 |     IShellFolder_Release(psfDesktop); | 
 |     IShellFolder_Release(psfPersonal); | 
 | } | 
 |  | 
 | static void test_CallForAttributes(void) | 
 | { | 
 |     HKEY hKey; | 
 |     LONG lResult; | 
 |     HRESULT hr; | 
 |     DWORD dwSize; | 
 |     LPSHELLFOLDER psfDesktop; | 
 |     LPITEMIDLIST pidlMyDocuments; | 
 |     DWORD dwAttributes, dwCallForAttributes, dwOrigAttributes, dwOrigCallForAttributes; | 
 |     static const WCHAR wszAttributes[] = { 'A','t','t','r','i','b','u','t','e','s',0 }; | 
 |     static const WCHAR wszCallForAttributes[] = {  | 
 |         'C','a','l','l','F','o','r','A','t','t','r','i','b','u','t','e','s',0 }; | 
 |     static const WCHAR wszMyDocumentsKey[] = { | 
 |         'C','L','S','I','D','\\','{','4','5','0','D','8','F','B','A','-','A','D','2','5','-', | 
 |         '1','1','D','0','-','9','8','A','8','-','0','8','0','0','3','6','1','B','1','1','0','3','}', | 
 |         '\\','S','h','e','l','l','F','o','l','d','e','r',0 }; | 
 |     WCHAR wszMyDocuments[] = { | 
 |         ':',':','{','4','5','0','D','8','F','B','A','-','A','D','2','5','-','1','1','D','0','-', | 
 |         '9','8','A','8','-','0','8','0','0','3','6','1','B','1','1','0','3','}',0 }; | 
 |      | 
 |     /* For the root of a namespace extension, the attributes are not queried by binding | 
 |      * to the object and calling GetAttributesOf. Instead, the attributes are read from  | 
 |      * the registry value HKCR/CLSID/{...}/ShellFolder/Attributes. This is documented on MSDN. | 
 |      * | 
 |      * The MyDocuments shellfolder on WinXP has a HKCR/CLSID/{...}/ShellFolder/CallForAttributes | 
 |      * value. It seems that if the folder is queried for one of the flags set in CallForAttributes, | 
 |      * the shell does bind to the folder object and calls GetAttributesOf. This is not documented | 
 |      * on MSDN. This test is meant to document the observed behaviour on WinXP SP2. | 
 |      */ | 
 |     hr = SHGetDesktopFolder(&psfDesktop); | 
 |     ok (SUCCEEDED(hr), "SHGetDesktopFolder failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |      | 
 |     hr = IShellFolder_ParseDisplayName(psfDesktop, NULL, NULL, wszMyDocuments, NULL,  | 
 |                                        &pidlMyDocuments, NULL); | 
 |     ok (SUCCEEDED(hr),  | 
 |         "Desktop's ParseDisplayName failed to parse MyDocuments's CLSID! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |  | 
 |     dwAttributes = 0xffffffff; | 
 |     hr = IShellFolder_GetAttributesOf(psfDesktop, 1,  | 
 |                                       (LPCITEMIDLIST*)&pidlMyDocuments, &dwAttributes); | 
 |     ok (SUCCEEDED(hr), "Desktop->GetAttributesOf(MyDocuments) failed! hr = %08x\n", hr); | 
 |  | 
 |     /* We need the following setup (as observed on WinXP SP2), for the tests to make sense. */ | 
 |     ok (dwAttributes & SFGAO_FILESYSTEM, "SFGAO_FILESYSTEM attribute is not set for MyDocuments!\n"); | 
 |     ok (!(dwAttributes & SFGAO_ISSLOW), "SFGAO_ISSLOW attribute is set for MyDocuments!\n"); | 
 |     ok (!(dwAttributes & SFGAO_GHOSTED), "SFGAO_GHOSTED attribute is set for MyDocuments!\n"); | 
 |  | 
 |     /* We don't have the MyDocuments shellfolder in wine yet, and thus we don't have the registry | 
 |      * key. So the test will return at this point, if run on wine.  | 
 |      */ | 
 |     lResult = RegOpenKeyExW(HKEY_CLASSES_ROOT, wszMyDocumentsKey, 0, KEY_WRITE|KEY_READ, &hKey); | 
 |     ok (lResult == ERROR_SUCCESS, "RegOpenKeyEx failed! result: %08x\n", lResult); | 
 |     if (lResult != ERROR_SUCCESS) { | 
 |         IMalloc_Free(ppM, pidlMyDocuments); | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |      | 
 |     /* Query MyDocuments' Attributes value, to be able to restore it later. */ | 
 |     dwSize = sizeof(DWORD); | 
 |     lResult = RegQueryValueExW(hKey, wszAttributes, NULL, NULL, (LPBYTE)&dwOrigAttributes, &dwSize); | 
 |     ok (lResult == ERROR_SUCCESS, "RegQueryValueEx failed! result: %08x\n", lResult); | 
 |     if (lResult != ERROR_SUCCESS) { | 
 |         RegCloseKey(hKey); | 
 |         IMalloc_Free(ppM, pidlMyDocuments); | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |  | 
 |     /* Query MyDocuments' CallForAttributes value, to be able to restore it later. */ | 
 |     dwSize = sizeof(DWORD); | 
 |     lResult = RegQueryValueExW(hKey, wszCallForAttributes, NULL, NULL,  | 
 |                               (LPBYTE)&dwOrigCallForAttributes, &dwSize); | 
 |     ok (lResult == ERROR_SUCCESS, "RegQueryValueEx failed! result: %08x\n", lResult); | 
 |     if (lResult != ERROR_SUCCESS) { | 
 |         RegCloseKey(hKey); | 
 |         IMalloc_Free(ppM, pidlMyDocuments); | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |      | 
 |     /* Define via the Attributes value that MyDocuments attributes are SFGAO_ISSLOW and  | 
 |      * SFGAO_GHOSTED and that MyDocuments should be called for the SFGAO_ISSLOW and | 
 |      * SFGAO_FILESYSTEM attributes. */ | 
 |     dwAttributes = SFGAO_ISSLOW|SFGAO_GHOSTED; | 
 |     RegSetValueExW(hKey, wszAttributes, 0, REG_DWORD, (LPBYTE)&dwAttributes, sizeof(DWORD)); | 
 |     dwCallForAttributes = SFGAO_ISSLOW|SFGAO_FILESYSTEM; | 
 |     RegSetValueExW(hKey, wszCallForAttributes, 0, REG_DWORD,  | 
 |                    (LPBYTE)&dwCallForAttributes, sizeof(DWORD)); | 
 |  | 
 |     /* Although it is not set in CallForAttributes, the SFGAO_GHOSTED flag is reset by  | 
 |      * GetAttributesOf. It seems that once there is a single attribute queried, for which | 
 |      * CallForAttributes is set, all flags are taken from the GetAttributesOf call and | 
 |      * the flags in Attributes are ignored.  | 
 |      */ | 
 |     dwAttributes = SFGAO_ISSLOW|SFGAO_GHOSTED|SFGAO_FILESYSTEM; | 
 |     hr = IShellFolder_GetAttributesOf(psfDesktop, 1,  | 
 |                                       (LPCITEMIDLIST*)&pidlMyDocuments, &dwAttributes); | 
 |     ok (SUCCEEDED(hr), "Desktop->GetAttributesOf(MyDocuments) failed! hr = %08x\n", hr); | 
 |     if (SUCCEEDED(hr))  | 
 |         ok (dwAttributes == SFGAO_FILESYSTEM,  | 
 |             "Desktop->GetAttributes(MyDocuments) returned unexpected attributes: %08x\n",  | 
 |             dwAttributes); | 
 |  | 
 |     /* Restore MyDocuments' original Attributes and CallForAttributes registry values */ | 
 |     RegSetValueExW(hKey, wszAttributes, 0, REG_DWORD, (LPBYTE)&dwOrigAttributes, sizeof(DWORD)); | 
 |     RegSetValueExW(hKey, wszCallForAttributes, 0, REG_DWORD,  | 
 |                    (LPBYTE)&dwOrigCallForAttributes, sizeof(DWORD)); | 
 |     RegCloseKey(hKey); | 
 |     IMalloc_Free(ppM, pidlMyDocuments); | 
 |     IShellFolder_Release(psfDesktop); | 
 | } | 
 |  | 
 | static void test_GetAttributesOf(void)  | 
 | { | 
 |     HRESULT hr; | 
 |     LPSHELLFOLDER psfDesktop, psfMyComputer; | 
 |     SHITEMID emptyitem = { 0, { 0 } }; | 
 |     LPCITEMIDLIST pidlEmpty = (LPCITEMIDLIST)&emptyitem; | 
 |     LPITEMIDLIST pidlMyComputer; | 
 |     DWORD dwFlags; | 
 |     static const DWORD dwDesktopFlags = /* As observed on WinXP SP2 */ | 
 |         SFGAO_STORAGE | SFGAO_HASPROPSHEET | SFGAO_STORAGEANCESTOR | | 
 |         SFGAO_FILESYSANCESTOR | SFGAO_FOLDER | SFGAO_FILESYSTEM | SFGAO_HASSUBFOLDER; | 
 |     static const DWORD dwMyComputerFlags = /* As observed on WinXP SP2 */ | 
 |         SFGAO_CANRENAME | SFGAO_CANDELETE | SFGAO_HASPROPSHEET | | 
 |         SFGAO_DROPTARGET | SFGAO_FILESYSANCESTOR | SFGAO_FOLDER | SFGAO_HASSUBFOLDER; | 
 |     WCHAR wszMyComputer[] = {  | 
 |         ':',':','{','2','0','D','0','4','F','E','0','-','3','A','E','A','-','1','0','6','9','-', | 
 |         'A','2','D','8','-','0','8','0','0','2','B','3','0','3','0','9','D','}',0 }; | 
 |     char  cCurrDirA [MAX_PATH] = {0}; | 
 |     WCHAR cCurrDirW [MAX_PATH]; | 
 |     static WCHAR cTestDirW[] = {'t','e','s','t','d','i','r',0}; | 
 |     static const WCHAR cBackSlash[] = {'\\',0}; | 
 |     IShellFolder *IDesktopFolder, *testIShellFolder; | 
 |     ITEMIDLIST *newPIDL; | 
 |     int len; | 
 |  | 
 |     hr = SHGetDesktopFolder(&psfDesktop); | 
 |     ok (SUCCEEDED(hr), "SHGetDesktopFolder failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     /* The Desktop attributes can be queried with a single empty itemidlist, .. */ | 
 |     dwFlags = 0xffffffff; | 
 |     hr = IShellFolder_GetAttributesOf(psfDesktop, 1, &pidlEmpty, &dwFlags); | 
 |     ok (SUCCEEDED(hr), "Desktop->GetAttributesOf(empty pidl) failed! hr = %08x\n", hr); | 
 |     ok (dwFlags == dwDesktopFlags, "Wrong Desktop attributes: %08x, expected: %08x\n",  | 
 |         dwFlags, dwDesktopFlags); | 
 |  | 
 |     /* .. or with no itemidlist at all. */ | 
 |     dwFlags = 0xffffffff; | 
 |     hr = IShellFolder_GetAttributesOf(psfDesktop, 0, NULL, &dwFlags); | 
 |     ok (SUCCEEDED(hr), "Desktop->GetAttributesOf(NULL) failed! hr = %08x\n", hr); | 
 |     ok (dwFlags == dwDesktopFlags, "Wrong Desktop attributes: %08x, expected: %08x\n",  | 
 |         dwFlags, dwDesktopFlags); | 
 |     | 
 |     /* Testing the attributes of the MyComputer shellfolder */ | 
 |     hr = IShellFolder_ParseDisplayName(psfDesktop, NULL, NULL, wszMyComputer, NULL, &pidlMyComputer, NULL); | 
 |     ok (SUCCEEDED(hr), "Desktop's ParseDisplayName failed to parse MyComputer's CLSID! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |  | 
 |     /* WinXP SP2 sets the SFGAO_CANLINK flag, when MyComputer is queried via the Desktop  | 
 |      * folder object. It doesn't do this, if MyComputer is queried directly (see below). | 
 |      * SFGAO_CANLINK is the same as DROPEFFECT_LINK, which MSDN says means: "Drag source | 
 |      * should create a link to the original data". You can't create links on MyComputer on | 
 |      * Windows, so this flag shouldn't be set. Seems like a bug in Windows. As long as nobody | 
 |      * depends on this bug, we probably shouldn't imitate it. | 
 |      */ | 
 |     dwFlags = 0xffffffff; | 
 |     hr = IShellFolder_GetAttributesOf(psfDesktop, 1, (LPCITEMIDLIST*)&pidlMyComputer, &dwFlags); | 
 |     ok (SUCCEEDED(hr), "Desktop->GetAttributesOf(MyComputer) failed! hr = %08x\n", hr); | 
 |     ok ((dwFlags & ~(DWORD)SFGAO_CANLINK) == dwMyComputerFlags,  | 
 |                     "Wrong MyComputer attributes: %08x, expected: %08x\n", dwFlags, dwMyComputerFlags); | 
 |  | 
 |     hr = IShellFolder_BindToObject(psfDesktop, pidlMyComputer, NULL, &IID_IShellFolder, (LPVOID*)&psfMyComputer); | 
 |     ok (SUCCEEDED(hr), "Desktop failed to bind to MyComputer object! hr = %08x\n", hr); | 
 |     IShellFolder_Release(psfDesktop); | 
 |     IMalloc_Free(ppM, pidlMyComputer); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IShellFolder_GetAttributesOf(psfMyComputer, 1, &pidlEmpty, &dwFlags); | 
 |     todo_wine {ok (hr == E_INVALIDARG, "MyComputer->GetAttributesOf(emtpy pidl) should fail! hr = %08x\n", hr); } | 
 |  | 
 |     dwFlags = 0xffffffff; | 
 |     hr = IShellFolder_GetAttributesOf(psfMyComputer, 0, NULL, &dwFlags); | 
 |     ok (SUCCEEDED(hr), "MyComputer->GetAttributesOf(NULL) failed! hr = %08x\n", hr);  | 
 |     todo_wine { ok (dwFlags == dwMyComputerFlags,  | 
 |                     "Wrong MyComputer attributes: %08x, expected: %08x\n", dwFlags, dwMyComputerFlags); } | 
 |  | 
 |     IShellFolder_Release(psfMyComputer); | 
 |  | 
 |     /* create test directory */ | 
 |     CreateFilesFolders(); | 
 |  | 
 |     GetCurrentDirectoryA(MAX_PATH, cCurrDirA); | 
 |     len = lstrlenA(cCurrDirA); | 
 |  | 
 |     if (len == 0) { | 
 | 	trace("GetCurrentDirectoryA returned empty string. Skipping test_EnumObjects_and_CompareIDs\n"); | 
 | 	return; | 
 |     } | 
 |     if(cCurrDirA[len-1] == '\\') | 
 | 	cCurrDirA[len-1] = 0; | 
 |  | 
 |     MultiByteToWideChar(CP_ACP, 0, cCurrDirA, -1, cCurrDirW, MAX_PATH); | 
 |   | 
 |     hr = SHGetDesktopFolder(&IDesktopFolder); | 
 |     ok(hr == S_OK, "SHGetDesktopfolder failed %08x\n", hr); | 
 |  | 
 |     hr = IShellFolder_ParseDisplayName(IDesktopFolder, NULL, NULL, cCurrDirW, NULL, &newPIDL, 0); | 
 |     ok(hr == S_OK, "ParseDisplayName failed %08x\n", hr); | 
 |  | 
 |     hr = IShellFolder_BindToObject(IDesktopFolder, newPIDL, NULL, (REFIID)&IID_IShellFolder, (LPVOID *)&testIShellFolder); | 
 |     ok(hr == S_OK, "BindToObject failed %08x\n", hr); | 
 |  | 
 |     IMalloc_Free(ppM, newPIDL); | 
 |  | 
 |     /* get relative PIDL */ | 
 |     hr = IShellFolder_ParseDisplayName(testIShellFolder, NULL, NULL, cTestDirW, NULL, &newPIDL, 0); | 
 |     ok(hr == S_OK, "ParseDisplayName failed %08x\n", hr); | 
 |  | 
 |     /* test the shell attributes of the test directory using the relative PIDL */ | 
 |     dwFlags = SFGAO_FOLDER; | 
 |     hr = IShellFolder_GetAttributesOf(testIShellFolder, 1, (LPCITEMIDLIST*)&newPIDL, &dwFlags); | 
 |     ok (SUCCEEDED(hr), "Desktop->GetAttributesOf() failed! hr = %08x\n", hr); | 
 |     ok ((dwFlags&SFGAO_FOLDER), "Wrong directory attribute for relative PIDL: %08x\n", dwFlags); | 
 |  | 
 |     /* free memory */ | 
 |     IMalloc_Free(ppM, newPIDL); | 
 |  | 
 |     /* append testdirectory name to path */ | 
 |     lstrcatW(cCurrDirW, cBackSlash); | 
 |     lstrcatW(cCurrDirW, cTestDirW); | 
 |  | 
 |     hr = IShellFolder_ParseDisplayName(IDesktopFolder, NULL, NULL, cCurrDirW, NULL, &newPIDL, 0); | 
 |     ok(hr == S_OK, "ParseDisplayName failed %08x\n", hr); | 
 |  | 
 |     /* test the shell attributes of the test directory using the absolute PIDL */ | 
 |     dwFlags = SFGAO_FOLDER; | 
 |     hr = IShellFolder_GetAttributesOf(IDesktopFolder, 1, (LPCITEMIDLIST*)&newPIDL, &dwFlags); | 
 |     ok (SUCCEEDED(hr), "Desktop->GetAttributesOf() failed! hr = %08x\n", hr); | 
 |     ok ((dwFlags&SFGAO_FOLDER), "Wrong directory attribute for absolute PIDL: %08x\n", dwFlags); | 
 |          | 
 |     /* free memory */ | 
 |     IMalloc_Free(ppM, newPIDL); | 
 |  | 
 |     IShellFolder_Release(testIShellFolder); | 
 |  | 
 |     Cleanup(); | 
 |  | 
 |     IShellFolder_Release(IDesktopFolder); | 
 | }     | 
 |  | 
 | static void test_SHGetPathFromIDList(void) | 
 | { | 
 |     SHITEMID emptyitem = { 0, { 0 } }; | 
 |     LPCITEMIDLIST pidlEmpty = (LPCITEMIDLIST)&emptyitem; | 
 |     LPITEMIDLIST pidlMyComputer; | 
 |     WCHAR wszPath[MAX_PATH], wszDesktop[MAX_PATH]; | 
 |     BOOL result; | 
 |     HRESULT hr; | 
 |     LPSHELLFOLDER psfDesktop; | 
 |     WCHAR wszMyComputer[] = {  | 
 |         ':',':','{','2','0','D','0','4','F','E','0','-','3','A','E','A','-','1','0','6','9','-', | 
 |         'A','2','D','8','-','0','8','0','0','2','B','3','0','3','0','9','D','}',0 }; | 
 |     WCHAR wszFileName[MAX_PATH]; | 
 |     LPITEMIDLIST pidlTestFile; | 
 |     HANDLE hTestFile; | 
 |     STRRET strret; | 
 |     static WCHAR wszTestFile[] = { | 
 |         'w','i','n','e','t','e','s','t','.','f','o','o',0 }; | 
 | 	HRESULT (WINAPI *pSHGetSpecialFolderLocation)(HWND, int, LPITEMIDLIST *); | 
 | 	HMODULE hShell32; | 
 | 	LPITEMIDLIST pidlPrograms; | 
 |  | 
 |     if(!pSHGetSpecialFolderPathW) return; | 
 |  | 
 |     /* Calling SHGetPathFromIDList with no pidl should return the empty string */ | 
 |     wszPath[0] = 'a'; | 
 |     wszPath[1] = '\0'; | 
 |     result = SHGetPathFromIDListW(NULL, wszPath); | 
 |     ok(!result, "Expected failure\n"); | 
 |     ok(!wszPath[0], "Expected empty string\n"); | 
 |  | 
 |     /* Calling SHGetPathFromIDList with an empty pidl should return the desktop folder's path. */ | 
 |     result = pSHGetSpecialFolderPathW(NULL, wszDesktop, CSIDL_DESKTOP, FALSE); | 
 |     ok(result, "SHGetSpecialFolderPathW(CSIDL_DESKTOP) failed! Last error: %08x\n", GetLastError()); | 
 |     if (!result) return; | 
 |      | 
 |     result = SHGetPathFromIDListW(pidlEmpty, wszPath); | 
 |     ok(result, "SHGetPathFromIDListW failed! Last error: %08x\n", GetLastError()); | 
 |     if (!result) return; | 
 |     ok(!lstrcmpiW(wszDesktop, wszPath), "SHGetPathFromIDList didn't return desktop path for empty pidl!\n"); | 
 |  | 
 |     /* MyComputer does not map to a filesystem path. SHGetPathFromIDList should fail. */ | 
 |     hr = SHGetDesktopFolder(&psfDesktop); | 
 |     ok (SUCCEEDED(hr), "SHGetDesktopFolder failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IShellFolder_ParseDisplayName(psfDesktop, NULL, NULL, wszMyComputer, NULL, &pidlMyComputer, NULL); | 
 |     ok (SUCCEEDED(hr), "Desktop's ParseDisplayName failed to parse MyComputer's CLSID! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |  | 
 |     SetLastError(0xdeadbeef); | 
 |     wszPath[0] = 'a'; | 
 |     wszPath[1] = '\0'; | 
 |     result = SHGetPathFromIDListW(pidlMyComputer, wszPath); | 
 |     ok (!result, "SHGetPathFromIDList succeeded where it shouldn't!\n"); | 
 |     ok (GetLastError()==0xdeadbeef, "SHGetPathFromIDList shouldn't set last error! Last error: %08x\n", GetLastError()); | 
 |     ok (!wszPath[0], "Expected empty path\n"); | 
 |     if (result) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |  | 
 |     IMalloc_Free(ppM, pidlMyComputer); | 
 |  | 
 |     result = pSHGetSpecialFolderPathW(NULL, wszFileName, CSIDL_DESKTOPDIRECTORY, FALSE); | 
 |     ok(result, "SHGetSpecialFolderPathW failed! Last error: %08x\n", GetLastError()); | 
 |     if (!result) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |     PathAddBackslashW(wszFileName); | 
 |     lstrcatW(wszFileName, wszTestFile); | 
 |     hTestFile = CreateFileW(wszFileName, GENERIC_WRITE, 0, NULL, CREATE_NEW, 0, NULL); | 
 |     ok(hTestFile != INVALID_HANDLE_VALUE, "CreateFileW failed! Last error: %08x\n", GetLastError()); | 
 |     if (hTestFile == INVALID_HANDLE_VALUE) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |     CloseHandle(hTestFile); | 
 |  | 
 |     hr = IShellFolder_ParseDisplayName(psfDesktop, NULL, NULL, wszTestFile, NULL, &pidlTestFile, NULL); | 
 |     ok (SUCCEEDED(hr), "Desktop's ParseDisplayName failed to parse filename hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         DeleteFileW(wszFileName); | 
 |         IMalloc_Free(ppM, pidlTestFile); | 
 |         return; | 
 |     } | 
 |  | 
 |     /* This test is to show that the Desktop shellfolder prepends the CSIDL_DESKTOPDIRECTORY | 
 |      * path for files placed on the desktop, if called with SHGDN_FORPARSING. */ | 
 |     hr = IShellFolder_GetDisplayNameOf(psfDesktop, pidlTestFile, SHGDN_FORPARSING, &strret); | 
 |     ok (SUCCEEDED(hr), "Desktop's GetDisplayNamfOf failed! hr = %08x\n", hr); | 
 |     IShellFolder_Release(psfDesktop); | 
 |     DeleteFileW(wszFileName); | 
 |     if (FAILED(hr)) { | 
 |         IMalloc_Free(ppM, pidlTestFile); | 
 |         return; | 
 |     } | 
 |     if (pStrRetToBufW) | 
 |     { | 
 |         pStrRetToBufW(&strret, pidlTestFile, wszPath, MAX_PATH); | 
 |         ok(0 == lstrcmpW(wszFileName, wszPath),  | 
 |            "Desktop->GetDisplayNameOf(pidlTestFile, SHGDN_FORPARSING) " | 
 |            "returned incorrect path for file placed on desktop\n"); | 
 |     } | 
 |  | 
 |     result = SHGetPathFromIDListW(pidlTestFile, wszPath); | 
 |     ok(result, "SHGetPathFromIDListW failed! Last error: %08x\n", GetLastError()); | 
 |     IMalloc_Free(ppM, pidlTestFile); | 
 |     if (!result) return; | 
 |     ok(0 == lstrcmpW(wszFileName, wszPath), "SHGetPathFromIDListW returned incorrect path for file placed on desktop\n"); | 
 |  | 
 |  | 
 | 	/* Test if we can get the path from the start menu "program files" PIDL. */ | 
 |     hShell32 = GetModuleHandleA("shell32"); | 
 |     pSHGetSpecialFolderLocation = (void *)GetProcAddress(hShell32, "SHGetSpecialFolderLocation"); | 
 |  | 
 |     hr = pSHGetSpecialFolderLocation(NULL, CSIDL_PROGRAM_FILES, &pidlPrograms); | 
 |     ok(SUCCEEDED(hr), "SHGetFolderLocation failed: 0x%08x\n", hr); | 
 |  | 
 |     SetLastError(0xdeadbeef); | 
 |     result = SHGetPathFromIDListW(pidlPrograms, wszPath); | 
 | 	IMalloc_Free(ppM, pidlPrograms); | 
 |     ok(result, "SHGetPathFromIDList failed\n"); | 
 | } | 
 |  | 
 | static void test_EnumObjects_and_CompareIDs(void) | 
 | { | 
 |     ITEMIDLIST *newPIDL; | 
 |     IShellFolder *IDesktopFolder, *testIShellFolder; | 
 |     char  cCurrDirA [MAX_PATH] = {0}; | 
 |     WCHAR cCurrDirW [MAX_PATH]; | 
 |     static const WCHAR cTestDirW[] = {'\\','t','e','s','t','d','i','r',0}; | 
 |     int len; | 
 |     HRESULT hr; | 
 |  | 
 |     GetCurrentDirectoryA(MAX_PATH, cCurrDirA); | 
 |     len = lstrlenA(cCurrDirA); | 
 |  | 
 |     if(len == 0) { | 
 |         trace("GetCurrentDirectoryA returned empty string. Skipping test_EnumObjects_and_CompareIDs\n"); | 
 |         return; | 
 |     } | 
 |     if(cCurrDirA[len-1] == '\\') | 
 |         cCurrDirA[len-1] = 0; | 
 |  | 
 |     MultiByteToWideChar(CP_ACP, 0, cCurrDirA, -1, cCurrDirW, MAX_PATH); | 
 |     lstrcatW(cCurrDirW, cTestDirW); | 
 |  | 
 |     hr = SHGetDesktopFolder(&IDesktopFolder); | 
 |     ok(hr == S_OK, "SHGetDesktopfolder failed %08x\n", hr); | 
 |  | 
 |     CreateFilesFolders(); | 
 |  | 
 |     hr = IShellFolder_ParseDisplayName(IDesktopFolder, NULL, NULL, cCurrDirW, NULL, &newPIDL, 0); | 
 |     ok(hr == S_OK, "ParseDisplayName failed %08x\n", hr); | 
 |  | 
 |     hr = IShellFolder_BindToObject(IDesktopFolder, newPIDL, NULL, (REFIID)&IID_IShellFolder, (LPVOID *)&testIShellFolder); | 
 |     ok(hr == S_OK, "BindToObject failed %08x\n", hr); | 
 |  | 
 |     test_EnumObjects(testIShellFolder); | 
 |  | 
 |     IShellFolder_Release(testIShellFolder); | 
 |  | 
 |     Cleanup(); | 
 |  | 
 |     IMalloc_Free(ppM, newPIDL); | 
 |  | 
 |     IShellFolder_Release(IDesktopFolder); | 
 | } | 
 |  | 
 | /* A simple implementation of an IPropertyBag, which returns fixed values for | 
 |  * 'Target' and 'Attributes' properties. | 
 |  */ | 
 | static HRESULT WINAPI InitPropertyBag_IPropertyBag_QueryInterface(IPropertyBag *iface, REFIID riid, | 
 |     void **ppvObject)  | 
 | { | 
 |     if (!ppvObject) | 
 |         return E_INVALIDARG; | 
 |  | 
 |     if (IsEqualIID(&IID_IUnknown, riid) || IsEqualIID(&IID_IPropertyBag, riid)) { | 
 |         *ppvObject = iface; | 
 |     } else { | 
 |         ok (FALSE, "InitPropertyBag asked for unknown interface!\n"); | 
 |         return E_NOINTERFACE; | 
 |     } | 
 |  | 
 |     IPropertyBag_AddRef(iface); | 
 |     return S_OK; | 
 | } | 
 |  | 
 | static ULONG WINAPI InitPropertyBag_IPropertyBag_AddRef(IPropertyBag *iface) { | 
 |     return 2; | 
 | } | 
 |  | 
 | static ULONG WINAPI InitPropertyBag_IPropertyBag_Release(IPropertyBag *iface) { | 
 |     return 1; | 
 | } | 
 |  | 
 | static HRESULT WINAPI InitPropertyBag_IPropertyBag_Read(IPropertyBag *iface, LPCOLESTR pszPropName, | 
 |     VARIANT *pVar, IErrorLog *pErrorLog) | 
 | { | 
 |     static const WCHAR wszTargetSpecialFolder[] = { | 
 |         'T','a','r','g','e','t','S','p','e','c','i','a','l','F','o','l','d','e','r',0 }; | 
 |     static const WCHAR wszTarget[] = { | 
 |         'T','a','r','g','e','t',0 }; | 
 |     static const WCHAR wszAttributes[] = { | 
 |         'A','t','t','r','i','b','u','t','e','s',0 }; | 
 |     static const WCHAR wszResolveLinkFlags[] = { | 
 |         'R','e','s','o','l','v','e','L','i','n','k','F','l','a','g','s',0 }; | 
 |         | 
 |     if (!lstrcmpW(pszPropName, wszTargetSpecialFolder)) { | 
 |         ok(V_VT(pVar) == VT_I4, "Wrong variant type for 'TargetSpecialFolder' property!\n"); | 
 |         return E_INVALIDARG; | 
 |     } | 
 |      | 
 |     if (!lstrcmpW(pszPropName, wszResolveLinkFlags))  | 
 |     { | 
 |         ok(V_VT(pVar) == VT_UI4, "Wrong variant type for 'ResolveLinkFlags' property!\n"); | 
 |         return E_INVALIDARG; | 
 |     } | 
 |  | 
 |     if (!lstrcmpW(pszPropName, wszTarget)) { | 
 |         WCHAR wszPath[MAX_PATH]; | 
 |         BOOL result; | 
 |          | 
 |         ok(V_VT(pVar) == VT_BSTR, "Wrong variant type for 'Target' property!\n"); | 
 |         if (V_VT(pVar) != VT_BSTR) return E_INVALIDARG; | 
 |  | 
 |         result = pSHGetSpecialFolderPathW(NULL, wszPath, CSIDL_DESKTOPDIRECTORY, FALSE); | 
 |         ok(result, "SHGetSpecialFolderPathW(DESKTOPDIRECTORY) failed! x%08x\n", GetLastError()); | 
 |         if (!result) return E_INVALIDARG; | 
 |  | 
 |         V_BSTR(pVar) = SysAllocString(wszPath); | 
 |         return S_OK; | 
 |     } | 
 |  | 
 |     if (!lstrcmpW(pszPropName, wszAttributes)) { | 
 |         ok(V_VT(pVar) == VT_UI4, "Wrong variant type for 'Attributes' property!\n"); | 
 |         if (V_VT(pVar) != VT_UI4) return E_INVALIDARG; | 
 |         V_UI4(pVar) = SFGAO_FOLDER|SFGAO_HASSUBFOLDER|SFGAO_FILESYSANCESTOR| | 
 |                       SFGAO_CANRENAME|SFGAO_FILESYSTEM; | 
 |         return S_OK; | 
 |     } | 
 |  | 
 |     ok(FALSE, "PropertyBag was asked for unknown property (vt=%d)!\n", V_VT(pVar)); | 
 |     return E_INVALIDARG; | 
 | } | 
 |  | 
 | static HRESULT WINAPI InitPropertyBag_IPropertyBag_Write(IPropertyBag *iface, LPCOLESTR pszPropName, | 
 |     VARIANT *pVar) | 
 | { | 
 |     ok(FALSE, "Unexpected call to IPropertyBag_Write\n"); | 
 |     return E_NOTIMPL; | 
 | } | 
 |      | 
 | static const IPropertyBagVtbl InitPropertyBag_IPropertyBagVtbl = { | 
 |     InitPropertyBag_IPropertyBag_QueryInterface, | 
 |     InitPropertyBag_IPropertyBag_AddRef, | 
 |     InitPropertyBag_IPropertyBag_Release, | 
 |     InitPropertyBag_IPropertyBag_Read, | 
 |     InitPropertyBag_IPropertyBag_Write | 
 | }; | 
 |  | 
 | struct IPropertyBag InitPropertyBag = { | 
 |     &InitPropertyBag_IPropertyBagVtbl | 
 | }; | 
 |  | 
 | void test_FolderShortcut(void) { | 
 |     IPersistPropertyBag *pPersistPropertyBag; | 
 |     IShellFolder *pShellFolder, *pDesktopFolder; | 
 |     IPersistFolder3 *pPersistFolder3; | 
 |     HRESULT hr; | 
 |     STRRET strret; | 
 |     WCHAR wszDesktopPath[MAX_PATH], wszBuffer[MAX_PATH]; | 
 |     BOOL result; | 
 |     CLSID clsid; | 
 |     LPITEMIDLIST pidlCurrentFolder, pidlWineTestFolder, pidlSubFolder; | 
 |     HKEY hShellExtKey; | 
 |     WCHAR wszWineTestFolder[] = { | 
 |         ':',':','{','9','B','3','5','2','E','B','F','-','2','7','6','5','-','4','5','C','1','-', | 
 |         'B','4','C','6','-','8','5','C','C','7','F','7','A','B','C','6','4','}',0 }; | 
 |     WCHAR wszShellExtKey[] = { 'S','o','f','t','w','a','r','e','\\', | 
 |         'M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\', | 
 |         'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\', | 
 |         'E','x','p','l','o','r','e','r','\\','D','e','s','k','t','o','p','\\', | 
 |         'N','a','m','e','S','p','a','c','e','\\', | 
 |         '{','9','b','3','5','2','e','b','f','-','2','7','6','5','-','4','5','c','1','-', | 
 |         'b','4','c','6','-','8','5','c','c','7','f','7','a','b','c','6','4','}',0 }; | 
 |      | 
 |     WCHAR wszSomeSubFolder[] = { 'S','u','b','F','o','l','d','e','r', 0}; | 
 |     static const GUID CLSID_UnixDosFolder =  | 
 |         {0x9d20aae8, 0x0625, 0x44b0, {0x9c, 0xa7, 0x71, 0x88, 0x9c, 0x22, 0x54, 0xd9}}; | 
 |  | 
 |     if (!pSHGetSpecialFolderPathW || !pStrRetToBufW) return; | 
 |     | 
 |     /* These tests basically show, that CLSID_FolderShortcuts are initialized | 
 |      * via their IPersistPropertyBag interface. And that the target folder | 
 |      * is taken from the IPropertyBag's 'Target' property. | 
 |      */ | 
 |     hr = CoCreateInstance(&CLSID_FolderShortcut, NULL, CLSCTX_INPROC_SERVER,  | 
 |                           &IID_IPersistPropertyBag, (LPVOID*)&pPersistPropertyBag); | 
 |     ok (SUCCEEDED(hr), "CoCreateInstance failed! hr = 0x%08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IPersistPropertyBag_Load(pPersistPropertyBag, &InitPropertyBag, NULL); | 
 |     ok(SUCCEEDED(hr), "IPersistPropertyBag_Load failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IPersistPropertyBag_Release(pPersistPropertyBag); | 
 |         return; | 
 |     } | 
 |      | 
 |     hr = IPersistPropertyBag_QueryInterface(pPersistPropertyBag, &IID_IShellFolder,  | 
 |                                             (LPVOID*)&pShellFolder); | 
 |     IPersistPropertyBag_Release(pPersistPropertyBag); | 
 |     ok(SUCCEEDED(hr), "IPersistPropertyBag_QueryInterface(IShellFolder) failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IShellFolder_GetDisplayNameOf(pShellFolder, NULL, SHGDN_FORPARSING, &strret); | 
 |     ok(SUCCEEDED(hr), "IShellFolder_GetDisplayNameOf(NULL) failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(pShellFolder); | 
 |         return; | 
 |     } | 
 |  | 
 |     result = pSHGetSpecialFolderPathW(NULL, wszDesktopPath, CSIDL_DESKTOPDIRECTORY, FALSE); | 
 |     ok(result, "SHGetSpecialFolderPathW(CSIDL_DESKTOPDIRECTORY) failed! 0x%08x\n", GetLastError()); | 
 |     if (!result) return; | 
 |  | 
 |     pStrRetToBufW(&strret, NULL, wszBuffer, MAX_PATH); | 
 |     ok(!lstrcmpiW(wszDesktopPath, wszBuffer), "FolderShortcut returned incorrect folder!\n"); | 
 |  | 
 |     hr = IShellFolder_QueryInterface(pShellFolder, &IID_IPersistFolder3, (LPVOID*)&pPersistFolder3); | 
 |     IShellFolder_Release(pShellFolder); | 
 |     ok(SUCCEEDED(hr), "IShellFolder_QueryInterface(IID_IPersistFolder3 failed! hr = 0x%08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IPersistFolder3_GetClassID(pPersistFolder3, &clsid); | 
 |     ok(SUCCEEDED(hr), "IPersistFolder3_GetClassID failed! hr=0x%08x\n", hr); | 
 |     ok(IsEqualCLSID(&clsid, &CLSID_FolderShortcut), "Unexpected CLSID!\n"); | 
 |  | 
 |     hr = IPersistFolder3_GetCurFolder(pPersistFolder3, &pidlCurrentFolder); | 
 |     ok(SUCCEEDED(hr), "IPersistFolder3_GetCurFolder failed! hr=0x%08x\n", hr); | 
 |     ok(!pidlCurrentFolder, "IPersistFolder3_GetCurFolder should return a NULL pidl!\n"); | 
 |                      | 
 |     /* For FolderShortcut objects, the Initialize method initialized the folder's position in the | 
 |      * shell namespace. The target folder, read from the property bag above, remains untouched.  | 
 |      * The following tests show this: The itemidlist for some imaginary shellfolder object | 
 |      * is created and the FolderShortcut is initialized with it. GetCurFolder now returns this | 
 |      * itemidlist, but GetDisplayNameOf still returns the path from above. | 
 |      */ | 
 |     hr = SHGetDesktopFolder(&pDesktopFolder); | 
 |     ok (SUCCEEDED(hr), "SHGetDesktopFolder failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     /* Temporarily register WineTestFolder as a shell namespace extension at the Desktop.  | 
 |      * Otherwise ParseDisplayName fails on WinXP with E_INVALIDARG */ | 
 |     RegCreateKeyW(HKEY_CURRENT_USER, wszShellExtKey, &hShellExtKey); | 
 |     RegCloseKey(hShellExtKey); | 
 |     hr = IShellFolder_ParseDisplayName(pDesktopFolder, NULL, NULL, wszWineTestFolder, NULL, | 
 |                                        &pidlWineTestFolder, NULL); | 
 |     RegDeleteKeyW(HKEY_CURRENT_USER, wszShellExtKey); | 
 |     IShellFolder_Release(pDesktopFolder); | 
 |     ok (SUCCEEDED(hr), "IShellFolder::ParseDisplayName failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IPersistFolder3_Initialize(pPersistFolder3, pidlWineTestFolder); | 
 |     ok (SUCCEEDED(hr), "IPersistFolder3::Initialize failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IPersistFolder3_Release(pPersistFolder3); | 
 |         ILFree(pidlWineTestFolder); | 
 |         return; | 
 |     } | 
 |      | 
 |     hr = IPersistFolder3_GetCurFolder(pPersistFolder3, &pidlCurrentFolder); | 
 |     ok(SUCCEEDED(hr), "IPersistFolder3_GetCurFolder failed! hr=0x%08x\n", hr); | 
 |     ok(ILIsEqual(pidlCurrentFolder, pidlWineTestFolder),  | 
 |         "IPersistFolder3_GetCurFolder should return pidlWineTestFolder!\n"); | 
 |     ILFree(pidlCurrentFolder); | 
 |     ILFree(pidlWineTestFolder); | 
 |   | 
 |     hr = IPersistFolder3_QueryInterface(pPersistFolder3, &IID_IShellFolder, (LPVOID*)&pShellFolder); | 
 |     IPersistFolder3_Release(pPersistFolder3); | 
 |     ok(SUCCEEDED(hr), "IPersistFolder3_QueryInterface(IShellFolder) failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IShellFolder_GetDisplayNameOf(pShellFolder, NULL, SHGDN_FORPARSING, &strret); | 
 |     ok(SUCCEEDED(hr), "IShellFolder_GetDisplayNameOf(NULL) failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(pShellFolder); | 
 |         return; | 
 |     } | 
 |  | 
 |     pStrRetToBufW(&strret, NULL, wszBuffer, MAX_PATH); | 
 |     ok(!lstrcmpiW(wszDesktopPath, wszBuffer), "FolderShortcut returned incorrect folder!\n"); | 
 |  | 
 |     /* Next few lines are meant to show that children of FolderShortcuts are not FolderShortcuts, | 
 |      * but ShellFSFolders. */ | 
 |     PathAddBackslashW(wszDesktopPath); | 
 |     lstrcatW(wszDesktopPath, wszSomeSubFolder); | 
 |     if (!CreateDirectoryW(wszDesktopPath, NULL)) { | 
 |         IShellFolder_Release(pShellFolder); | 
 |         return; | 
 |     } | 
 |      | 
 |     hr = IShellFolder_ParseDisplayName(pShellFolder, NULL, NULL, wszSomeSubFolder, NULL,  | 
 |                                        &pidlSubFolder, NULL); | 
 |     RemoveDirectoryW(wszDesktopPath); | 
 |     ok (SUCCEEDED(hr), "IShellFolder::ParseDisplayName failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(pShellFolder); | 
 |         return; | 
 |     } | 
 |  | 
 |     hr = IShellFolder_BindToObject(pShellFolder, pidlSubFolder, NULL, &IID_IPersistFolder3,  | 
 |                                    (LPVOID*)&pPersistFolder3); | 
 |     IShellFolder_Release(pShellFolder); | 
 |     ILFree(pidlSubFolder); | 
 |     ok (SUCCEEDED(hr), "IShellFolder::BindToObject failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr))  | 
 |         return; | 
 |  | 
 |     /* On windows, we expect CLSID_ShellFSFolder. On wine we relax this constraint | 
 |      * a little bit and also allow CLSID_UnixDosFolder. */ | 
 |     hr = IPersistFolder3_GetClassID(pPersistFolder3, &clsid); | 
 |     ok(SUCCEEDED(hr), "IPersistFolder3_GetClassID failed! hr=0x%08x\n", hr); | 
 |     ok(IsEqualCLSID(&clsid, &CLSID_ShellFSFolder) || IsEqualCLSID(&clsid, &CLSID_UnixDosFolder), | 
 |         "IPersistFolder3::GetClassID returned unexpected CLSID!\n"); | 
 |  | 
 |     IPersistFolder3_Release(pPersistFolder3); | 
 | } | 
 |  | 
 | #include "pshpack1.h" | 
 | struct FileStructA { | 
 |     BYTE  type; | 
 |     BYTE  dummy; | 
 |     DWORD dwFileSize; | 
 |     WORD  uFileDate;    /* In our current implementation this is */ | 
 |     WORD  uFileTime;    /* FileTimeToDosDate(WIN32_FIND_DATA->ftLastWriteTime) */ | 
 |     WORD  uFileAttribs; | 
 |     CHAR  szName[1]; | 
 | }; | 
 |  | 
 | struct FileStructW { | 
 |     WORD  cbLen;        /* Length of this element. */ | 
 |     BYTE  abFooBar1[6]; /* Beyond any recognition. */ | 
 |     WORD  uDate;        /* FileTimeToDosDate(WIN32_FIND_DATA->ftCreationTime)? */ | 
 |     WORD  uTime;        /* (this is currently speculation) */ | 
 |     WORD  uDate2;       /* FileTimeToDosDate(WIN32_FIND_DATA->ftLastAccessTime)? */ | 
 |     WORD  uTime2;       /* (this is currently speculation) */ | 
 |     BYTE  abFooBar2[4]; /* Beyond any recognition. */ | 
 |     WCHAR wszName[1];   /* The long filename in unicode. */ | 
 |     /* Just for documentation: Right after the unicode string: */ | 
 |     WORD  cbOffset;     /* FileStructW's offset from the beginning of the SHITMEID.  | 
 |                          * SHITEMID->cb == uOffset + cbLen */ | 
 | }; | 
 | #include "poppack.h" | 
 |  | 
 | void test_ITEMIDLIST_format(void) { | 
 |     WCHAR wszPersonal[MAX_PATH]; | 
 |     LPSHELLFOLDER psfDesktop, psfPersonal; | 
 |     LPITEMIDLIST pidlPersonal, pidlFile; | 
 |     HANDLE hFile; | 
 |     HRESULT hr; | 
 |     BOOL bResult; | 
 |     WCHAR wszFile[3][17] = { { 'e','v','e','n','_',0 }, { 'o','d','d','_',0 },  | 
 |         { 'l','o','n','g','e','r','_','t','h','a','n','.','8','_','3',0 } }; | 
 |     int i; | 
 |      | 
 |     if(!pSHGetSpecialFolderPathW) return; | 
 |  | 
 |     bResult = pSHGetSpecialFolderPathW(NULL, wszPersonal, CSIDL_PERSONAL, FALSE); | 
 |     ok(bResult, "SHGetSpecialFolderPathW failed! Last error: %08x\n", GetLastError()); | 
 |     if (!bResult) return; | 
 |  | 
 |     bResult = SetCurrentDirectoryW(wszPersonal); | 
 |     ok(bResult, "SetCurrentDirectory failed! Last error: %d\n", GetLastError()); | 
 |     if (!bResult) return; | 
 |  | 
 |     hr = SHGetDesktopFolder(&psfDesktop); | 
 |     ok(SUCCEEDED(hr), "SHGetDesktopFolder failed! hr: %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     hr = IShellFolder_ParseDisplayName(psfDesktop, NULL, NULL, wszPersonal, NULL, &pidlPersonal, NULL); | 
 |     ok(SUCCEEDED(hr), "psfDesktop->ParseDisplayName failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) { | 
 |         IShellFolder_Release(psfDesktop); | 
 |         return; | 
 |     } | 
 |  | 
 |     hr = IShellFolder_BindToObject(psfDesktop, pidlPersonal, NULL, &IID_IShellFolder,  | 
 |         (LPVOID*)&psfPersonal); | 
 |     IShellFolder_Release(psfDesktop); | 
 |     ILFree(pidlPersonal); | 
 |     ok(SUCCEEDED(hr), "psfDesktop->BindToObject failed! hr = %08x\n", hr); | 
 |     if (FAILED(hr)) return; | 
 |  | 
 |     for (i=0; i<3; i++) { | 
 |         CHAR szFile[MAX_PATH]; | 
 |         struct FileStructA *pFileStructA; | 
 |         WORD cbOffset; | 
 |          | 
 |         WideCharToMultiByte(CP_ACP, 0, wszFile[i], -1, szFile, MAX_PATH, NULL, NULL); | 
 |          | 
 |         hFile = CreateFileW(wszFile[i], GENERIC_WRITE, 0, NULL, CREATE_NEW, FILE_FLAG_WRITE_THROUGH, NULL); | 
 |         ok(hFile != INVALID_HANDLE_VALUE, "CreateFile failed! (%d)\n", GetLastError()); | 
 |         if (hFile == INVALID_HANDLE_VALUE) { | 
 |             IShellFolder_Release(psfPersonal); | 
 |             return; | 
 |         } | 
 |         CloseHandle(hFile); | 
 |  | 
 |         hr = IShellFolder_ParseDisplayName(psfPersonal, NULL, NULL, wszFile[i], NULL, &pidlFile, NULL); | 
 |         DeleteFileW(wszFile[i]); | 
 |         ok(SUCCEEDED(hr), "psfPersonal->ParseDisplayName failed! hr: %08x\n", hr); | 
 |         if (FAILED(hr)) { | 
 |             IShellFolder_Release(psfPersonal); | 
 |             return; | 
 |         } | 
 |  | 
 |         pFileStructA = (struct FileStructA *)pidlFile->mkid.abID; | 
 |         ok(pFileStructA->type == 0x32, "PIDLTYPE should be 0x32!\n"); | 
 |         ok(pFileStructA->dummy == 0x00, "Dummy Byte should be 0x00!\n"); | 
 |         ok(pFileStructA->dwFileSize == 0, "Filesize should be zero!\n");  | 
 |  | 
 |         if (i < 2) /* First two file names are already in valid 8.3 format */  | 
 |             ok(!strcmp(szFile, (CHAR*)&pidlFile->mkid.abID[12]), "Wrong file name!\n"); | 
 |         else  | 
 |             /* WinXP stores a derived 8.3 dos name (LONGER~1.8_3) here. We probably | 
 |              * can't implement this correctly, since unix filesystems don't support | 
 |              * this nasty short/long filename stuff. So we'll probably stay with our | 
 |              * current habbit of storing the long filename here, which seems to work | 
 |              * just fine. */ | 
 |             todo_wine { ok(pidlFile->mkid.abID[18] == '~', "Should be derived 8.3 name!\n"); } | 
 |  | 
 |         if (i == 0) /* First file name has an even number of chars. No need for alignment. */ | 
 |             ok(pidlFile->mkid.abID[12 + strlen(szFile) + 1] != '\0',  | 
 |                 "Alignment byte, where there shouldn't be!\n");  | 
 |          | 
 |         if (i == 1) /* Second file name has an uneven number of chars => alignment byte */ | 
 |             ok(pidlFile->mkid.abID[12 + strlen(szFile) + 1] == '\0',  | 
 |                 "There should be an alignment byte, but isn't!\n"); | 
 |  | 
 |         /* The offset of the FileStructW member is stored as a WORD at the end of the pidl. */ | 
 |         cbOffset = *(WORD*)(((LPBYTE)pidlFile)+pidlFile->mkid.cb-sizeof(WORD)); | 
 |         ok (cbOffset >= sizeof(struct FileStructA) && | 
 |             cbOffset <= pidlFile->mkid.cb - sizeof(struct FileStructW), | 
 |             "Wrong offset value (%d) stored at the end of the PIDL\n", cbOffset); | 
 |  | 
 |         if (cbOffset >= sizeof(struct FileStructA) && | 
 |             cbOffset <= pidlFile->mkid.cb - sizeof(struct FileStructW))  | 
 |         { | 
 |             struct FileStructW *pFileStructW = (struct FileStructW *)(((LPBYTE)pidlFile)+cbOffset); | 
 |  | 
 |             ok(pidlFile->mkid.cb == cbOffset + pFileStructW->cbLen,  | 
 |                 "FileStructW's offset and length should add up to the PIDL's length!\n"); | 
 |  | 
 |             if (pidlFile->mkid.cb == cbOffset + pFileStructW->cbLen) { | 
 |                 /* Since we just created the file, time of creation, | 
 |                  * time of last access and time of last write access just be the same.  | 
 |                  * These tests seem to fail sometimes (on WinXP), if the test is run again shortly  | 
 |                  * after the first run. I do remember something with NTFS keeping the creation time | 
 |                  * if a file is deleted and then created again within a couple of seconds or so. | 
 |                  * Might be the reason. */ | 
 |                 ok (pFileStructA->uFileDate == pFileStructW->uDate && | 
 |                     pFileStructA->uFileTime == pFileStructW->uTime, | 
 |                     "Last write time should match creation time!\n"); | 
 |      | 
 |                 ok (pFileStructA->uFileDate == pFileStructW->uDate2 && | 
 |                     pFileStructA->uFileTime == pFileStructW->uTime2, | 
 |                     "Last write time should match last access time!\n"); | 
 |  | 
 |                 ok (!lstrcmpW(wszFile[i], pFileStructW->wszName), | 
 |                     "The filename should be stored in unicode at this position!\n"); | 
 |             } | 
 |         } | 
 |  | 
 |         ILFree(pidlFile); | 
 |     } | 
 | } | 
 |  | 
 | START_TEST(shlfolder) | 
 | { | 
 |     init_function_pointers(); | 
 |     /* if OleInitialize doesn't get called, ParseDisplayName returns | 
 |        CO_E_NOTINITIALIZED for malformed directory names on win2k. */ | 
 |     OleInitialize(NULL); | 
 |  | 
 |     test_ParseDisplayName(); | 
 |     test_BindToObject(); | 
 |     test_EnumObjects_and_CompareIDs(); | 
 |     test_GetDisplayName(); | 
 |     test_GetAttributesOf(); | 
 |     test_SHGetPathFromIDList(); | 
 |     test_CallForAttributes(); | 
 |     test_FolderShortcut(); | 
 |     test_ITEMIDLIST_format(); | 
 |  | 
 |     OleUninitialize(); | 
 | } |