| /* | |
| * Virtual Workplace folder | |
| * | |
| * Copyright 1997 Marcus Meissner | |
| * Copyright 1998, 1999, 2002 Juergen Schmied | |
| * | |
| * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
| */ | |
| #include "config.h" | |
| #include "wine/port.h" | |
| #include <stdlib.h> | |
| #include <string.h> | |
| #include <stdarg.h> | |
| #include <stdio.h> | |
| #define COBJMACROS | |
| #define NONAMELESSUNION | |
| #define NONAMELESSSTRUCT | |
| #include "winerror.h" | |
| #include "windef.h" | |
| #include "winbase.h" | |
| #include "winreg.h" | |
| #include "wingdi.h" | |
| #include "pidl.h" | |
| #include "shlguid.h" | |
| #include "enumidlist.h" | |
| #include "undocshell.h" | |
| #include "shell32_main.h" | |
| #include "shresdef.h" | |
| #include "shlwapi.h" | |
| #include "shellfolder.h" | |
| #include "wine/debug.h" | |
| #include "debughlp.h" | |
| #include "shfldr.h" | |
| WINE_DEFAULT_DEBUG_CHANNEL (shell); | |
| /*********************************************************************** | |
| * IShellFolder implementation | |
| */ | |
| typedef struct { | |
| IShellFolder2Vtbl *lpVtbl; | |
| DWORD ref; | |
| IPersistFolder2Vtbl *lpVtblPersistFolder2; | |
| /* both paths are parsible from the desktop */ | |
| LPITEMIDLIST pidlRoot; /* absolute pidl */ | |
| int dwAttributes; /* attributes returned by GetAttributesOf FIXME: use it */ | |
| } IGenericSFImpl; | |
| static struct IShellFolder2Vtbl vt_ShellFolder2; | |
| static struct IPersistFolder2Vtbl vt_PersistFolder2; | |
| #define _IPersistFolder2_Offset ((int)(&(((IGenericSFImpl*)0)->lpVtblPersistFolder2))) | |
| #define _ICOM_THIS_From_IPersistFolder2(class, name) class* This = (class*)(((char*)name)-_IPersistFolder2_Offset); | |
| /* | |
| converts This to a interface pointer | |
| */ | |
| #define _IUnknown_(This) (IUnknown*)&(This->lpVtbl) | |
| #define _IShellFolder_(This) (IShellFolder*)&(This->lpVtbl) | |
| #define _IShellFolder2_(This) (IShellFolder2*)&(This->lpVtbl) | |
| #define _IPersist_(This) (IPersist*)&(This->lpVtblPersistFolder2) | |
| #define _IPersistFolder_(This) (IPersistFolder*)&(This->lpVtblPersistFolder2) | |
| #define _IPersistFolder2_(This) (IPersistFolder2*)&(This->lpVtblPersistFolder2) | |
| /*********************************************************************** | |
| * IShellFolder [MyComputer] implementation | |
| */ | |
| static shvheader MyComputerSFHeader[] = { | |
| {IDS_SHV_COLUMN1, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 15}, | |
| {IDS_SHV_COLUMN3, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10}, | |
| {IDS_SHV_COLUMN6, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10}, | |
| {IDS_SHV_COLUMN7, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10}, | |
| }; | |
| #define MYCOMPUTERSHELLVIEWCOLUMNS 4 | |
| /************************************************************************** | |
| * ISF_MyComputer_Constructor | |
| */ | |
| HRESULT WINAPI ISF_MyComputer_Constructor (IUnknown * pUnkOuter, REFIID riid, LPVOID * ppv) | |
| { | |
| IGenericSFImpl *sf; | |
| TRACE ("unkOut=%p %s\n", pUnkOuter, shdebugstr_guid (riid)); | |
| if (!ppv) | |
| return E_POINTER; | |
| if (pUnkOuter) | |
| return CLASS_E_NOAGGREGATION; | |
| sf = (IGenericSFImpl *) LocalAlloc (GMEM_ZEROINIT, sizeof (IGenericSFImpl)); | |
| if (!sf) | |
| return E_OUTOFMEMORY; | |
| sf->ref = 0; | |
| sf->lpVtbl = &vt_ShellFolder2; | |
| sf->lpVtblPersistFolder2 = &vt_PersistFolder2; | |
| sf->pidlRoot = _ILCreateMyComputer (); /* my qualified pidl */ | |
| if (!SUCCEEDED (IUnknown_QueryInterface (_IUnknown_ (sf), riid, ppv))) { | |
| IUnknown_Release (_IUnknown_ (sf)); | |
| return E_NOINTERFACE; | |
| } | |
| TRACE ("--(%p)\n", sf); | |
| return S_OK; | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnQueryInterface | |
| * | |
| * NOTES supports not IPersist/IPersistFolder | |
| */ | |
| static HRESULT WINAPI ISF_MyComputer_fnQueryInterface (IShellFolder2 * iface, REFIID riid, LPVOID * ppvObj) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| TRACE ("(%p)->(%s,%p)\n", This, shdebugstr_guid (riid), ppvObj); | |
| *ppvObj = NULL; | |
| if (IsEqualIID (riid, &IID_IUnknown) || | |
| IsEqualIID (riid, &IID_IShellFolder) || IsEqualIID (riid, &IID_IShellFolder2)) { | |
| *ppvObj = This; | |
| } else if (IsEqualIID (riid, &IID_IPersist) || | |
| IsEqualIID (riid, &IID_IPersistFolder) || IsEqualIID (riid, &IID_IPersistFolder2)) { | |
| *ppvObj = _IPersistFolder2_ (This); | |
| } | |
| if (*ppvObj) { | |
| IUnknown_AddRef ((IUnknown *) (*ppvObj)); | |
| TRACE ("-- Interface: (%p)->(%p)\n", ppvObj, *ppvObj); | |
| return S_OK; | |
| } | |
| TRACE ("-- Interface: E_NOINTERFACE\n"); | |
| return E_NOINTERFACE; | |
| } | |
| static ULONG WINAPI ISF_MyComputer_fnAddRef (IShellFolder2 * iface) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| TRACE ("(%p)->(count=%lu)\n", This, This->ref); | |
| return ++(This->ref); | |
| } | |
| static ULONG WINAPI ISF_MyComputer_fnRelease (IShellFolder2 * iface) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| TRACE ("(%p)->(count=%lu)\n", This, This->ref); | |
| if (!--(This->ref)) { | |
| TRACE ("-- destroying IShellFolder(%p)\n", This); | |
| if (This->pidlRoot) | |
| SHFree (This->pidlRoot); | |
| LocalFree ((HLOCAL) This); | |
| return 0; | |
| } | |
| return This->ref; | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnParseDisplayName | |
| */ | |
| static HRESULT WINAPI | |
| ISF_MyComputer_fnParseDisplayName (IShellFolder2 * iface, | |
| HWND hwndOwner, | |
| LPBC pbc, | |
| LPOLESTR lpszDisplayName, | |
| DWORD * pchEaten, LPITEMIDLIST * ppidl, DWORD * pdwAttributes) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| HRESULT hr = E_INVALIDARG; | |
| LPCWSTR szNext = NULL; | |
| WCHAR szElement[MAX_PATH]; | |
| LPITEMIDLIST pidlTemp = NULL; | |
| CLSID clsid; | |
| TRACE ("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n", | |
| This, hwndOwner, pbc, lpszDisplayName, debugstr_w (lpszDisplayName), pchEaten, ppidl, pdwAttributes); | |
| *ppidl = 0; | |
| if (pchEaten) | |
| *pchEaten = 0; /* strange but like the original */ | |
| /* handle CLSID paths */ | |
| if (lpszDisplayName[0] == ':' && lpszDisplayName[1] == ':') { | |
| szNext = GetNextElementW (lpszDisplayName, szElement, MAX_PATH); | |
| TRACE ("-- element: %s\n", debugstr_w (szElement)); | |
| SHCLSIDFromStringW (szElement + 2, &clsid); | |
| pidlTemp = _ILCreateGuid (PT_GUID, &clsid); | |
| } | |
| /* do we have an absolute path name ? */ | |
| else if (PathGetDriveNumberW (lpszDisplayName) >= 0 && lpszDisplayName[2] == (WCHAR) '\\') { | |
| szNext = GetNextElementW (lpszDisplayName, szElement, MAX_PATH); | |
| szElement[0] = toupper(szElement[0]); /* make drive letter uppercase to enable PIDL comparison */ | |
| pidlTemp = _ILCreateDrive (szElement); | |
| } | |
| if (szNext && *szNext) { | |
| hr = SHELL32_ParseNextElement (iface, hwndOwner, pbc, &pidlTemp, (LPOLESTR) szNext, pchEaten, pdwAttributes); | |
| } else { | |
| if (pdwAttributes && *pdwAttributes) { | |
| SHELL32_GetItemAttributes (_IShellFolder_ (This), pidlTemp, pdwAttributes); | |
| } | |
| hr = S_OK; | |
| } | |
| *ppidl = pidlTemp; | |
| TRACE ("(%p)->(-- ret=0x%08lx)\n", This, hr); | |
| return hr; | |
| } | |
| /************************************************************************** | |
| * CreateMyCompEnumList() | |
| */ | |
| static BOOL CreateMyCompEnumList(IEnumIDList *list, DWORD dwFlags) | |
| { | |
| BOOL ret = TRUE; | |
| TRACE("(%p)->(flags=0x%08lx) \n",list,dwFlags); | |
| /*enumerate the folders*/ | |
| if(dwFlags & SHCONTF_FOLDERS) | |
| { | |
| WCHAR wszDriveName[] = {'A', ':', '\\', '\0'}; | |
| DWORD dwDrivemap = GetLogicalDrives(); | |
| HKEY hkey; | |
| while (ret && wszDriveName[0]<='Z') | |
| { | |
| if(dwDrivemap & 0x00000001L) | |
| ret = AddToEnumList(list, _ILCreateDrive(wszDriveName)); | |
| wszDriveName[0]++; | |
| dwDrivemap = dwDrivemap >> 1; | |
| } | |
| TRACE("-- (%p)-> enumerate (mycomputer shell extensions)\n",list); | |
| if (ret && !RegOpenKeyExA(HKEY_LOCAL_MACHINE, | |
| "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\explorer\\mycomputer\\NameSpace", | |
| 0, KEY_READ, &hkey)) | |
| { | |
| char iid[50]; | |
| int i=0; | |
| while (ret) | |
| { | |
| DWORD size = sizeof (iid); | |
| LONG apiRet = RegEnumKeyExA(hkey, i, iid, &size, 0, NULL, NULL, | |
| NULL); | |
| if (ERROR_SUCCESS == apiRet) | |
| { | |
| /* FIXME: shell extensions, shouldn't the type be | |
| * PT_SHELLEXT? */ | |
| ret = AddToEnumList(list, _ILCreateGuidFromStrA(iid)); | |
| i++; | |
| } | |
| else if (ERROR_NO_MORE_ITEMS == apiRet) | |
| break; | |
| else | |
| ret = FALSE; | |
| } | |
| RegCloseKey(hkey); | |
| } | |
| } | |
| return ret; | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnEnumObjects | |
| */ | |
| static HRESULT WINAPI | |
| ISF_MyComputer_fnEnumObjects (IShellFolder2 * iface, HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST * ppEnumIDList) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| TRACE ("(%p)->(HWND=%p flags=0x%08lx pplist=%p)\n", This, hwndOwner, dwFlags, ppEnumIDList); | |
| *ppEnumIDList = IEnumIDList_Constructor(); | |
| if (*ppEnumIDList) | |
| CreateMyCompEnumList(*ppEnumIDList, dwFlags); | |
| TRACE ("-- (%p)->(new ID List: %p)\n", This, *ppEnumIDList); | |
| return (*ppEnumIDList) ? S_OK : E_OUTOFMEMORY; | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnBindToObject | |
| */ | |
| static HRESULT WINAPI | |
| ISF_MyComputer_fnBindToObject (IShellFolder2 * iface, LPCITEMIDLIST pidl, | |
| LPBC pbcReserved, REFIID riid, LPVOID * ppvOut) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| TRACE ("(%p)->(pidl=%p,%p,%s,%p)\n", This, pidl, pbcReserved, shdebugstr_guid (riid), ppvOut); | |
| return SHELL32_BindToChild (This->pidlRoot, NULL, pidl, riid, ppvOut); | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnBindToStorage | |
| */ | |
| static HRESULT WINAPI | |
| ISF_MyComputer_fnBindToStorage (IShellFolder2 * iface, | |
| LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID * ppvOut) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| FIXME ("(%p)->(pidl=%p,%p,%s,%p) stub\n", This, pidl, pbcReserved, shdebugstr_guid (riid), ppvOut); | |
| *ppvOut = NULL; | |
| return E_NOTIMPL; | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnCompareIDs | |
| */ | |
| static HRESULT WINAPI | |
| ISF_MyComputer_fnCompareIDs (IShellFolder2 * iface, LPARAM lParam, LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| int nReturn; | |
| TRACE ("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This, lParam, pidl1, pidl2); | |
| nReturn = SHELL32_CompareIDs (_IShellFolder_ (This), lParam, pidl1, pidl2); | |
| TRACE ("-- %i\n", nReturn); | |
| return nReturn; | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnCreateViewObject | |
| */ | |
| static HRESULT WINAPI | |
| ISF_MyComputer_fnCreateViewObject (IShellFolder2 * iface, HWND hwndOwner, REFIID riid, LPVOID * ppvOut) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| LPSHELLVIEW pShellView; | |
| HRESULT hr = E_INVALIDARG; | |
| TRACE ("(%p)->(hwnd=%p,%s,%p)\n", This, hwndOwner, shdebugstr_guid (riid), ppvOut); | |
| if (ppvOut) { | |
| *ppvOut = NULL; | |
| if (IsEqualIID (riid, &IID_IDropTarget)) { | |
| WARN ("IDropTarget not implemented\n"); | |
| hr = E_NOTIMPL; | |
| } else if (IsEqualIID (riid, &IID_IContextMenu)) { | |
| WARN ("IContextMenu not implemented\n"); | |
| hr = E_NOTIMPL; | |
| } else if (IsEqualIID (riid, &IID_IShellView)) { | |
| pShellView = IShellView_Constructor ((IShellFolder *) iface); | |
| if (pShellView) { | |
| hr = IShellView_QueryInterface (pShellView, riid, ppvOut); | |
| IShellView_Release (pShellView); | |
| } | |
| } | |
| } | |
| TRACE ("-- (%p)->(interface=%p)\n", This, ppvOut); | |
| return hr; | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnGetAttributesOf | |
| */ | |
| static HRESULT WINAPI | |
| ISF_MyComputer_fnGetAttributesOf (IShellFolder2 * iface, UINT cidl, LPCITEMIDLIST * apidl, DWORD * rgfInOut) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| HRESULT hr = S_OK; | |
| TRACE ("(%p)->(cidl=%d apidl=%p mask=0x%08lx)\n", This, cidl, apidl, *rgfInOut); | |
| if ((!cidl) || (!apidl) || (!rgfInOut)) | |
| return E_INVALIDARG; | |
| if (*rgfInOut == 0) | |
| *rgfInOut = ~0; | |
| while (cidl > 0 && *apidl) { | |
| pdump (*apidl); | |
| SHELL32_GetItemAttributes (_IShellFolder_ (This), *apidl, rgfInOut); | |
| apidl++; | |
| cidl--; | |
| } | |
| TRACE ("-- result=0x%08lx\n", *rgfInOut); | |
| return hr; | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnGetUIObjectOf | |
| * | |
| * PARAMETERS | |
| * HWND hwndOwner, //[in ] Parent window for any output | |
| * UINT cidl, //[in ] array size | |
| * LPCITEMIDLIST* apidl, //[in ] simple pidl array | |
| * REFIID riid, //[in ] Requested Interface | |
| * UINT* prgfInOut, //[ ] reserved | |
| * LPVOID* ppvObject) //[out] Resulting Interface | |
| * | |
| */ | |
| static HRESULT WINAPI | |
| ISF_MyComputer_fnGetUIObjectOf (IShellFolder2 * iface, | |
| HWND hwndOwner, | |
| UINT cidl, LPCITEMIDLIST * apidl, REFIID riid, UINT * prgfInOut, LPVOID * ppvOut) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| LPITEMIDLIST pidl; | |
| IUnknown *pObj = NULL; | |
| HRESULT hr = E_INVALIDARG; | |
| TRACE ("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n", | |
| This, hwndOwner, cidl, apidl, shdebugstr_guid (riid), prgfInOut, ppvOut); | |
| if (ppvOut) { | |
| *ppvOut = NULL; | |
| if (IsEqualIID (riid, &IID_IContextMenu) && (cidl >= 1)) { | |
| pObj = (LPUNKNOWN) ISvItemCm_Constructor ((IShellFolder *) iface, This->pidlRoot, apidl, cidl); | |
| hr = S_OK; | |
| } else if (IsEqualIID (riid, &IID_IDataObject) && (cidl >= 1)) { | |
| pObj = (LPUNKNOWN) IDataObject_Constructor (hwndOwner, This->pidlRoot, apidl, cidl); | |
| hr = S_OK; | |
| } else if (IsEqualIID (riid, &IID_IExtractIconA) && (cidl == 1)) { | |
| pidl = ILCombine (This->pidlRoot, apidl[0]); | |
| pObj = (LPUNKNOWN) IExtractIconA_Constructor (pidl); | |
| SHFree (pidl); | |
| hr = S_OK; | |
| } else if (IsEqualIID (riid, &IID_IExtractIconW) && (cidl == 1)) { | |
| pidl = ILCombine (This->pidlRoot, apidl[0]); | |
| pObj = (LPUNKNOWN) IExtractIconW_Constructor (pidl); | |
| SHFree (pidl); | |
| hr = S_OK; | |
| } else if (IsEqualIID (riid, &IID_IDropTarget) && (cidl >= 1)) { | |
| hr = IShellFolder_QueryInterface (iface, &IID_IDropTarget, (LPVOID *) & pObj); | |
| } else if ((IsEqualIID(riid,&IID_IShellLinkW) || IsEqualIID(riid,&IID_IShellLinkA)) | |
| && (cidl == 1)) { | |
| pidl = ILCombine (This->pidlRoot, apidl[0]); | |
| hr = IShellLink_ConstructFromFile(NULL, riid, pidl, (LPVOID*)&pObj); | |
| SHFree (pidl); | |
| } else { | |
| hr = E_NOINTERFACE; | |
| } | |
| if (SUCCEEDED(hr) && !pObj) | |
| hr = E_OUTOFMEMORY; | |
| *ppvOut = pObj; | |
| } | |
| TRACE ("(%p)->hr=0x%08lx\n", This, hr); | |
| return hr; | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnGetDisplayNameOf | |
| */ | |
| static HRESULT WINAPI ISF_MyComputer_fnGetDisplayNameOf (IShellFolder2 * iface, LPCITEMIDLIST pidl, DWORD dwFlags, LPSTRRET strRet) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| char szPath[MAX_PATH], | |
| szDrive[18]; | |
| int len = 0; | |
| BOOL bSimplePidl; | |
| HRESULT hr = S_OK; | |
| TRACE ("(%p)->(pidl=%p,0x%08lx,%p)\n", This, pidl, dwFlags, strRet); | |
| pdump (pidl); | |
| if (!strRet) | |
| return E_INVALIDARG; | |
| szPath[0] = 0x00; | |
| szDrive[0] = 0x00; | |
| bSimplePidl = _ILIsPidlSimple (pidl); | |
| if (!pidl->mkid.cb) { | |
| /* parsing name like ::{...} */ | |
| lstrcpyA (szPath, "::"); | |
| SHELL32_GUIDToStringA(&CLSID_MyComputer, &szPath[2]); | |
| } else if (_ILIsSpecialFolder (pidl)) { | |
| /* take names of special folders only if its only this folder */ | |
| if (bSimplePidl) { | |
| GUID const *clsid; | |
| if ((clsid = _ILGetGUIDPointer (pidl))) { | |
| if (GET_SHGDN_FOR (dwFlags) == SHGDN_FORPARSING) { | |
| int bWantsForParsing; | |
| /* | |
| * we can only get a filesystem path from a shellfolder if the value WantsFORPARSING in | |
| * CLSID\\{...}\\shellfolder exists | |
| * exception: the MyComputer folder has this keys not but like any filesystem backed | |
| * folder it needs these behaviour | |
| */ | |
| /* get the "WantsFORPARSING" flag from the registry */ | |
| char szRegPath[100]; | |
| lstrcpyA (szRegPath, "CLSID\\"); | |
| SHELL32_GUIDToStringA (clsid, &szRegPath[6]); | |
| lstrcatA (szRegPath, "\\shellfolder"); | |
| bWantsForParsing = | |
| (ERROR_SUCCESS == | |
| SHGetValueA (HKEY_CLASSES_ROOT, szRegPath, "WantsFORPARSING", NULL, NULL, NULL)); | |
| if ((GET_SHGDN_RELATION (dwFlags) == SHGDN_NORMAL) && bWantsForParsing) { | |
| /* we need the filesystem path to the destination folder. Only the folder itself can know it */ | |
| hr = SHELL32_GetDisplayNameOfChild (iface, pidl, dwFlags, szPath, MAX_PATH); | |
| } else { | |
| LPSTR p; | |
| /* parsing name like ::{...} */ | |
| p = lstrcpyA(szPath, "::") + 2; | |
| p += SHELL32_GUIDToStringA(&CLSID_MyComputer, p); | |
| lstrcatA(p, "\\::"); | |
| p += 3; | |
| SHELL32_GUIDToStringA(clsid, p); | |
| } | |
| } else { | |
| /* user friendly name */ | |
| HCR_GetClassNameA (clsid, szPath, MAX_PATH); | |
| } | |
| } else | |
| _ILSimpleGetText (pidl, szPath, MAX_PATH); /* append my own path */ | |
| } else { | |
| FIXME ("special folder\n"); | |
| } | |
| } else { | |
| if (!_ILIsDrive (pidl)) { | |
| ERR ("Wrong pidl type\n"); | |
| return E_INVALIDARG; | |
| } | |
| _ILSimpleGetText (pidl, szPath, MAX_PATH); /* append my own path */ | |
| /* long view "lw_name (C:)" */ | |
| if (bSimplePidl && !(dwFlags & SHGDN_FORPARSING)) { | |
| DWORD dwVolumeSerialNumber, | |
| dwMaximumComponetLength, | |
| dwFileSystemFlags; | |
| GetVolumeInformationA (szPath, szDrive, sizeof (szDrive) - 6, &dwVolumeSerialNumber, | |
| &dwMaximumComponetLength, &dwFileSystemFlags, NULL, 0); | |
| strcat (szDrive, " ("); | |
| strncat (szDrive, szPath, 2); | |
| strcat (szDrive, ")"); | |
| strcpy (szPath, szDrive); | |
| } | |
| } | |
| if (!bSimplePidl) { /* go deeper if needed */ | |
| PathAddBackslashA (szPath); | |
| len = strlen (szPath); | |
| hr = SHELL32_GetDisplayNameOfChild (iface, pidl, dwFlags | SHGDN_INFOLDER, szPath + len, MAX_PATH - len); | |
| } | |
| if (SUCCEEDED (hr)) { | |
| strRet->uType = STRRET_CSTR; | |
| lstrcpynA (strRet->u.cStr, szPath, MAX_PATH); | |
| } | |
| TRACE ("-- (%p)->(%s)\n", This, szPath); | |
| return hr; | |
| } | |
| /************************************************************************** | |
| * ISF_MyComputer_fnSetNameOf | |
| * Changes the name of a file object or subfolder, possibly changing its item | |
| * identifier in the process. | |
| * | |
| * PARAMETERS | |
| * HWND hwndOwner, //[in ] Owner window for output | |
| * LPCITEMIDLIST pidl, //[in ] simple pidl of item to change | |
| * LPCOLESTR lpszName, //[in ] the items new display name | |
| * DWORD dwFlags, //[in ] SHGNO formatting flags | |
| * LPITEMIDLIST* ppidlOut) //[out] simple pidl returned | |
| */ | |
| static HRESULT WINAPI ISF_MyComputer_fnSetNameOf (IShellFolder2 * iface, HWND hwndOwner, LPCITEMIDLIST pidl, /*simple pidl */ | |
| LPCOLESTR lpName, DWORD dwFlags, LPITEMIDLIST * pPidlOut) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| FIXME ("(%p)->(%p,pidl=%p,%s,%lu,%p)\n", This, hwndOwner, pidl, debugstr_w (lpName), dwFlags, pPidlOut); | |
| return E_FAIL; | |
| } | |
| static HRESULT WINAPI ISF_MyComputer_fnGetDefaultSearchGUID (IShellFolder2 * iface, GUID * pguid) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| FIXME ("(%p)\n", This); | |
| return E_NOTIMPL; | |
| } | |
| static HRESULT WINAPI ISF_MyComputer_fnEnumSearches (IShellFolder2 * iface, IEnumExtraSearch ** ppenum) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| FIXME ("(%p)\n", This); | |
| return E_NOTIMPL; | |
| } | |
| static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumn (IShellFolder2 * iface, DWORD dwRes, ULONG * pSort, ULONG * pDisplay) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| TRACE ("(%p)\n", This); | |
| if (pSort) *pSort = 0; | |
| if (pDisplay) *pDisplay = 0; | |
| return S_OK; | |
| } | |
| static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumnState (IShellFolder2 * iface, UINT iColumn, DWORD * pcsFlags) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| TRACE ("(%p)\n", This); | |
| if (!pcsFlags || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS) return E_INVALIDARG; | |
| *pcsFlags = MyComputerSFHeader[iColumn].pcsFlags; | |
| return S_OK; | |
| } | |
| static HRESULT WINAPI ISF_MyComputer_fnGetDetailsEx (IShellFolder2 * iface, LPCITEMIDLIST pidl, const SHCOLUMNID * pscid, VARIANT * pv) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| FIXME ("(%p)\n", This); | |
| return E_NOTIMPL; | |
| } | |
| /* FIXME: drive size >4GB is rolling over */ | |
| static HRESULT WINAPI ISF_MyComputer_fnGetDetailsOf (IShellFolder2 * iface, LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS * psd) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| HRESULT hr; | |
| TRACE ("(%p)->(%p %i %p)\n", This, pidl, iColumn, psd); | |
| if (!psd || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS) | |
| return E_INVALIDARG; | |
| if (!pidl) { | |
| psd->fmt = MyComputerSFHeader[iColumn].fmt; | |
| psd->cxChar = MyComputerSFHeader[iColumn].cxChar; | |
| psd->str.uType = STRRET_CSTR; | |
| LoadStringA (shell32_hInstance, MyComputerSFHeader[iColumn].colnameid, psd->str.u.cStr, MAX_PATH); | |
| return S_OK; | |
| } else { | |
| char szPath[MAX_PATH]; | |
| ULARGE_INTEGER ulBytes; | |
| psd->str.u.cStr[0] = 0x00; | |
| psd->str.uType = STRRET_CSTR; | |
| switch (iColumn) { | |
| case 0: /* name */ | |
| hr = IShellFolder_GetDisplayNameOf (iface, pidl, SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str); | |
| break; | |
| case 1: /* type */ | |
| _ILGetFileType (pidl, psd->str.u.cStr, MAX_PATH); | |
| break; | |
| case 2: /* total size */ | |
| if (_ILIsDrive (pidl)) { | |
| _ILSimpleGetText (pidl, szPath, MAX_PATH); | |
| GetDiskFreeSpaceExA (szPath, NULL, &ulBytes, NULL); | |
| StrFormatByteSizeA (ulBytes.u.LowPart, psd->str.u.cStr, MAX_PATH); | |
| } | |
| break; | |
| case 3: /* free size */ | |
| if (_ILIsDrive (pidl)) { | |
| _ILSimpleGetText (pidl, szPath, MAX_PATH); | |
| GetDiskFreeSpaceExA (szPath, &ulBytes, NULL, NULL); | |
| StrFormatByteSizeA (ulBytes.u.LowPart, psd->str.u.cStr, MAX_PATH); | |
| } | |
| break; | |
| } | |
| hr = S_OK; | |
| } | |
| return hr; | |
| } | |
| static HRESULT WINAPI ISF_MyComputer_fnMapColumnToSCID (IShellFolder2 * iface, UINT column, SHCOLUMNID * pscid) | |
| { | |
| IGenericSFImpl *This = (IGenericSFImpl *)iface; | |
| FIXME ("(%p)\n", This); | |
| return E_NOTIMPL; | |
| } | |
| static IShellFolder2Vtbl vt_ShellFolder2 = | |
| { | |
| ISF_MyComputer_fnQueryInterface, | |
| ISF_MyComputer_fnAddRef, | |
| ISF_MyComputer_fnRelease, | |
| ISF_MyComputer_fnParseDisplayName, | |
| ISF_MyComputer_fnEnumObjects, | |
| ISF_MyComputer_fnBindToObject, | |
| ISF_MyComputer_fnBindToStorage, | |
| ISF_MyComputer_fnCompareIDs, | |
| ISF_MyComputer_fnCreateViewObject, | |
| ISF_MyComputer_fnGetAttributesOf, | |
| ISF_MyComputer_fnGetUIObjectOf, | |
| ISF_MyComputer_fnGetDisplayNameOf, | |
| ISF_MyComputer_fnSetNameOf, | |
| /* ShellFolder2 */ | |
| ISF_MyComputer_fnGetDefaultSearchGUID, | |
| ISF_MyComputer_fnEnumSearches, | |
| ISF_MyComputer_fnGetDefaultColumn, | |
| ISF_MyComputer_fnGetDefaultColumnState, | |
| ISF_MyComputer_fnGetDetailsEx, | |
| ISF_MyComputer_fnGetDetailsOf, | |
| ISF_MyComputer_fnMapColumnToSCID | |
| }; | |
| /************************************************************************ | |
| * IMCFldr_PersistFolder2_QueryInterface | |
| */ | |
| static HRESULT WINAPI IMCFldr_PersistFolder2_QueryInterface (IPersistFolder2 * iface, REFIID iid, LPVOID * ppvObj) | |
| { | |
| _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface); | |
| TRACE ("(%p)\n", This); | |
| return IUnknown_QueryInterface (_IUnknown_ (This), iid, ppvObj); | |
| } | |
| /************************************************************************ | |
| * IMCFldr_PersistFolder2_AddRef | |
| */ | |
| static ULONG WINAPI IMCFldr_PersistFolder2_AddRef (IPersistFolder2 * iface) | |
| { | |
| _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface); | |
| TRACE ("(%p)->(count=%lu)\n", This, This->ref); | |
| return IUnknown_AddRef (_IUnknown_ (This)); | |
| } | |
| /************************************************************************ | |
| * ISFPersistFolder_Release | |
| */ | |
| static ULONG WINAPI IMCFldr_PersistFolder2_Release (IPersistFolder2 * iface) | |
| { | |
| _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface); | |
| TRACE ("(%p)->(count=%lu)\n", This, This->ref); | |
| return IUnknown_Release (_IUnknown_ (This)); | |
| } | |
| /************************************************************************ | |
| * IMCFldr_PersistFolder2_GetClassID | |
| */ | |
| static HRESULT WINAPI IMCFldr_PersistFolder2_GetClassID (IPersistFolder2 * iface, CLSID * lpClassId) | |
| { | |
| _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface); | |
| TRACE ("(%p)\n", This); | |
| if (!lpClassId) | |
| return E_POINTER; | |
| *lpClassId = CLSID_MyComputer; | |
| return S_OK; | |
| } | |
| /************************************************************************ | |
| * IMCFldr_PersistFolder2_Initialize | |
| * | |
| * NOTES: it makes no sense to change the pidl | |
| */ | |
| static HRESULT WINAPI IMCFldr_PersistFolder2_Initialize (IPersistFolder2 * iface, LPCITEMIDLIST pidl) | |
| { | |
| _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface); | |
| TRACE ("(%p)->(%p)\n", This, pidl); | |
| return E_NOTIMPL; | |
| } | |
| /************************************************************************** | |
| * IPersistFolder2_fnGetCurFolder | |
| */ | |
| static HRESULT WINAPI IMCFldr_PersistFolder2_GetCurFolder (IPersistFolder2 * iface, LPITEMIDLIST * pidl) | |
| { | |
| _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface); | |
| TRACE ("(%p)->(%p)\n", This, pidl); | |
| if (!pidl) | |
| return E_POINTER; | |
| *pidl = ILClone (This->pidlRoot); | |
| return S_OK; | |
| } | |
| static IPersistFolder2Vtbl vt_PersistFolder2 = | |
| { | |
| IMCFldr_PersistFolder2_QueryInterface, | |
| IMCFldr_PersistFolder2_AddRef, | |
| IMCFldr_PersistFolder2_Release, | |
| IMCFldr_PersistFolder2_GetClassID, | |
| IMCFldr_PersistFolder2_Initialize, | |
| IMCFldr_PersistFolder2_GetCurFolder | |
| }; |