2 * Virtual Workplace folder
4 * Copyright 1997 Marcus Meissner
5 * Copyright 1998, 1999, 2002 Juergen Schmied
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 #include "wine/port.h"
31 #define NONAMELESSUNION
32 #define NONAMELESSSTRUCT
42 #include "enumidlist.h"
43 #include "undocshell.h"
44 #include "shell32_main.h"
47 #include "wine/debug.h"
51 WINE_DEFAULT_DEBUG_CHANNEL (shell
);
53 /***********************************************************************
54 * IShellFolder implementation
58 const IShellFolder2Vtbl
*lpVtbl
;
60 const IPersistFolder2Vtbl
*lpVtblPersistFolder2
;
62 /* both paths are parsible from the desktop */
63 LPITEMIDLIST pidlRoot
; /* absolute pidl */
66 static const IShellFolder2Vtbl vt_ShellFolder2
;
67 static const IPersistFolder2Vtbl vt_PersistFolder2
;
69 #define _IPersistFolder2_Offset ((int)(&(((IGenericSFImpl*)0)->lpVtblPersistFolder2)))
70 #define _ICOM_THIS_From_IPersistFolder2(class, name) class* This = (class*)(((char*)name)-_IPersistFolder2_Offset);
73 converts This to an interface pointer
75 #define _IUnknown_(This) (IUnknown*)&(This->lpVtbl)
76 #define _IShellFolder_(This) (IShellFolder*)&(This->lpVtbl)
77 #define _IShellFolder2_(This) (IShellFolder2*)&(This->lpVtbl)
79 #define _IPersist_(This) (IPersist*)&(This->lpVtblPersistFolder2)
80 #define _IPersistFolder_(This) (IPersistFolder*)&(This->lpVtblPersistFolder2)
81 #define _IPersistFolder2_(This) (IPersistFolder2*)&(This->lpVtblPersistFolder2)
83 /***********************************************************************
84 * IShellFolder [MyComputer] implementation
87 static const shvheader MyComputerSFHeader
[] = {
88 {IDS_SHV_COLUMN1
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 15},
89 {IDS_SHV_COLUMN3
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 10},
90 {IDS_SHV_COLUMN6
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 10},
91 {IDS_SHV_COLUMN7
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 10},
94 #define MYCOMPUTERSHELLVIEWCOLUMNS 4
96 /**************************************************************************
97 * ISF_MyComputer_Constructor
99 HRESULT WINAPI
ISF_MyComputer_Constructor (IUnknown
* pUnkOuter
, REFIID riid
, LPVOID
* ppv
)
103 TRACE ("unkOut=%p %s\n", pUnkOuter
, shdebugstr_guid (riid
));
108 return CLASS_E_NOAGGREGATION
;
110 sf
= LocalAlloc (LMEM_ZEROINIT
, sizeof (IGenericSFImpl
));
112 return E_OUTOFMEMORY
;
115 sf
->lpVtbl
= &vt_ShellFolder2
;
116 sf
->lpVtblPersistFolder2
= &vt_PersistFolder2
;
117 sf
->pidlRoot
= _ILCreateMyComputer (); /* my qualified pidl */
119 if (!SUCCEEDED (IUnknown_QueryInterface (_IUnknown_ (sf
), riid
, ppv
)))
121 IUnknown_Release (_IUnknown_ (sf
));
122 return E_NOINTERFACE
;
125 TRACE ("--(%p)\n", sf
);
129 /**************************************************************************
130 * ISF_MyComputer_fnQueryInterface
132 * NOTES supports not IPersist/IPersistFolder
134 static HRESULT WINAPI
ISF_MyComputer_fnQueryInterface (IShellFolder2
*iface
,
135 REFIID riid
, LPVOID
*ppvObj
)
137 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
139 TRACE ("(%p)->(%s,%p)\n", This
, shdebugstr_guid (riid
), ppvObj
);
143 if (IsEqualIID (riid
, &IID_IUnknown
) ||
144 IsEqualIID (riid
, &IID_IShellFolder
) ||
145 IsEqualIID (riid
, &IID_IShellFolder2
))
149 else if (IsEqualIID (riid
, &IID_IPersist
) ||
150 IsEqualIID (riid
, &IID_IPersistFolder
) ||
151 IsEqualIID (riid
, &IID_IPersistFolder2
))
153 *ppvObj
= _IPersistFolder2_ (This
);
158 IUnknown_AddRef ((IUnknown
*) (*ppvObj
));
159 TRACE ("-- Interface: (%p)->(%p)\n", ppvObj
, *ppvObj
);
162 TRACE ("-- Interface: E_NOINTERFACE\n");
163 return E_NOINTERFACE
;
166 static ULONG WINAPI
ISF_MyComputer_fnAddRef (IShellFolder2
* iface
)
168 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
169 ULONG refCount
= InterlockedIncrement(&This
->ref
);
171 TRACE ("(%p)->(count=%lu)\n", This
, refCount
- 1);
176 static ULONG WINAPI
ISF_MyComputer_fnRelease (IShellFolder2
* iface
)
178 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
179 ULONG refCount
= InterlockedDecrement(&This
->ref
);
181 TRACE ("(%p)->(count=%lu)\n", This
, refCount
+ 1);
185 TRACE ("-- destroying IShellFolder(%p)\n", This
);
187 SHFree (This
->pidlRoot
);
188 LocalFree ((HLOCAL
) This
);
193 /**************************************************************************
194 * ISF_MyComputer_fnParseDisplayName
196 static HRESULT WINAPI
ISF_MyComputer_fnParseDisplayName (IShellFolder2
*iface
,
197 HWND hwndOwner
, LPBC pbc
, LPOLESTR lpszDisplayName
,
198 DWORD
* pchEaten
, LPITEMIDLIST
* ppidl
, DWORD
* pdwAttributes
)
200 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
201 HRESULT hr
= E_INVALIDARG
;
202 LPCWSTR szNext
= NULL
;
203 WCHAR szElement
[MAX_PATH
];
204 LPITEMIDLIST pidlTemp
= NULL
;
207 TRACE("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n", This
,
208 hwndOwner
, pbc
, lpszDisplayName
, debugstr_w (lpszDisplayName
),
209 pchEaten
, ppidl
, pdwAttributes
);
213 *pchEaten
= 0; /* strange but like the original */
215 /* handle CLSID paths */
216 if (lpszDisplayName
[0] == ':' && lpszDisplayName
[1] == ':')
218 szNext
= GetNextElementW (lpszDisplayName
, szElement
, MAX_PATH
);
219 TRACE ("-- element: %s\n", debugstr_w (szElement
));
220 SHCLSIDFromStringW (szElement
+ 2, &clsid
);
221 pidlTemp
= _ILCreateGuid (PT_GUID
, &clsid
);
223 /* do we have an absolute path name ? */
224 else if (PathGetDriveNumberW (lpszDisplayName
) >= 0 &&
225 lpszDisplayName
[2] == (WCHAR
) '\\')
227 szNext
= GetNextElementW (lpszDisplayName
, szElement
, MAX_PATH
);
228 /* make drive letter uppercase to enable PIDL comparison */
229 szElement
[0] = toupper(szElement
[0]);
230 pidlTemp
= _ILCreateDrive (szElement
);
233 if (szNext
&& *szNext
)
235 hr
= SHELL32_ParseNextElement (iface
, hwndOwner
, pbc
, &pidlTemp
,
236 (LPOLESTR
) szNext
, pchEaten
, pdwAttributes
);
240 if (pdwAttributes
&& *pdwAttributes
)
241 SHELL32_GetItemAttributes (_IShellFolder_ (This
),
242 pidlTemp
, pdwAttributes
);
248 TRACE ("(%p)->(-- ret=0x%08lx)\n", This
, hr
);
253 /**************************************************************************
254 * CreateMyCompEnumList()
256 static const WCHAR MyComputer_NameSpaceW
[] = { 'S','O','F','T','W','A','R','E',
257 '\\','M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\',
258 'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\','E','x','p','l',
259 'o','r','e','r','\\','M','y','C','o','m','p','u','t','e','r','\\','N','a','m',
260 'e','s','p','a','c','e','\0' };
262 static BOOL
CreateMyCompEnumList(IEnumIDList
*list
, DWORD dwFlags
)
266 TRACE("(%p)->(flags=0x%08lx) \n",list
,dwFlags
);
268 /* enumerate the folders */
269 if (dwFlags
& SHCONTF_FOLDERS
)
271 WCHAR wszDriveName
[] = {'A', ':', '\\', '\0'};
272 DWORD dwDrivemap
= GetLogicalDrives();
275 while (ret
&& wszDriveName
[0]<='Z')
277 if(dwDrivemap
& 0x00000001L
)
278 ret
= AddToEnumList(list
, _ILCreateDrive(wszDriveName
));
280 dwDrivemap
= dwDrivemap
>> 1;
283 TRACE("-- (%p)-> enumerate (mycomputer shell extensions)\n",list
);
284 if (ret
&& !RegOpenKeyExW(HKEY_LOCAL_MACHINE
, MyComputer_NameSpaceW
,
295 size
= sizeof(iid
) / sizeof(iid
[0]);
296 r
= RegEnumKeyExW(hkey
, i
, iid
, &size
, 0, NULL
, NULL
, NULL
);
297 if (ERROR_SUCCESS
== r
)
299 /* FIXME: shell extensions, shouldn't the type be
301 ret
= AddToEnumList(list
, _ILCreateGuidFromStrW(iid
));
304 else if (ERROR_NO_MORE_ITEMS
== r
)
315 /**************************************************************************
316 * ISF_MyComputer_fnEnumObjects
318 static HRESULT WINAPI
ISF_MyComputer_fnEnumObjects (IShellFolder2
*iface
,
319 HWND hwndOwner
, DWORD dwFlags
, LPENUMIDLIST
*ppEnumIDList
)
321 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
323 TRACE("(%p)->(HWND=%p flags=0x%08lx pplist=%p)\n", This
,
324 hwndOwner
, dwFlags
, ppEnumIDList
);
326 *ppEnumIDList
= IEnumIDList_Constructor();
328 CreateMyCompEnumList(*ppEnumIDList
, dwFlags
);
330 TRACE ("-- (%p)->(new ID List: %p)\n", This
, *ppEnumIDList
);
332 return (*ppEnumIDList
) ? S_OK
: E_OUTOFMEMORY
;
335 /**************************************************************************
336 * ISF_MyComputer_fnBindToObject
338 static HRESULT WINAPI
ISF_MyComputer_fnBindToObject (IShellFolder2
*iface
,
339 LPCITEMIDLIST pidl
, LPBC pbcReserved
, REFIID riid
, LPVOID
*ppvOut
)
341 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
343 TRACE("(%p)->(pidl=%p,%p,%s,%p)\n", This
,
344 pidl
, pbcReserved
, shdebugstr_guid (riid
), ppvOut
);
346 return SHELL32_BindToChild (This
->pidlRoot
, NULL
, pidl
, riid
, ppvOut
);
349 /**************************************************************************
350 * ISF_MyComputer_fnBindToStorage
352 static HRESULT WINAPI
ISF_MyComputer_fnBindToStorage (IShellFolder2
* iface
,
353 LPCITEMIDLIST pidl
, LPBC pbcReserved
, REFIID riid
, LPVOID
*ppvOut
)
355 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
357 FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", This
,
358 pidl
, pbcReserved
, shdebugstr_guid (riid
), ppvOut
);
364 /**************************************************************************
365 * ISF_MyComputer_fnCompareIDs
368 static HRESULT WINAPI
ISF_MyComputer_fnCompareIDs (IShellFolder2
*iface
,
369 LPARAM lParam
, LPCITEMIDLIST pidl1
, LPCITEMIDLIST pidl2
)
371 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
374 TRACE ("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This
, lParam
, pidl1
, pidl2
);
375 nReturn
= SHELL32_CompareIDs (_IShellFolder_ (This
), lParam
, pidl1
, pidl2
);
376 TRACE ("-- %i\n", nReturn
);
380 /**************************************************************************
381 * ISF_MyComputer_fnCreateViewObject
383 static HRESULT WINAPI
ISF_MyComputer_fnCreateViewObject (IShellFolder2
*iface
,
384 HWND hwndOwner
, REFIID riid
, LPVOID
* ppvOut
)
386 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
387 LPSHELLVIEW pShellView
;
388 HRESULT hr
= E_INVALIDARG
;
390 TRACE("(%p)->(hwnd=%p,%s,%p)\n", This
,
391 hwndOwner
, shdebugstr_guid (riid
), ppvOut
);
398 if (IsEqualIID (riid
, &IID_IDropTarget
))
400 WARN ("IDropTarget not implemented\n");
403 else if (IsEqualIID (riid
, &IID_IContextMenu
))
405 WARN ("IContextMenu not implemented\n");
408 else if (IsEqualIID (riid
, &IID_IShellView
))
410 pShellView
= IShellView_Constructor ((IShellFolder
*) iface
);
413 hr
= IShellView_QueryInterface (pShellView
, riid
, ppvOut
);
414 IShellView_Release (pShellView
);
417 TRACE ("-- (%p)->(interface=%p)\n", This
, ppvOut
);
421 /**************************************************************************
422 * ISF_MyComputer_fnGetAttributesOf
424 static HRESULT WINAPI
ISF_MyComputer_fnGetAttributesOf (IShellFolder2
* iface
,
425 UINT cidl
, LPCITEMIDLIST
* apidl
, DWORD
* rgfInOut
)
427 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
430 TRACE ("(%p)->(cidl=%d apidl=%p mask=%p (0x%08lx))\n",
431 This
, cidl
, apidl
, rgfInOut
, rgfInOut
? *rgfInOut
: 0);
442 IShellFolder
*psfParent
= NULL
;
443 LPCITEMIDLIST rpidl
= NULL
;
445 hr
= SHBindToParent(This
->pidlRoot
, &IID_IShellFolder
, (LPVOID
*)&psfParent
, (LPCITEMIDLIST
*)&rpidl
);
447 SHELL32_GetItemAttributes (psfParent
, rpidl
, rgfInOut
);
448 IShellFolder_Release(psfParent
);
451 while (cidl
> 0 && *apidl
) {
453 SHELL32_GetItemAttributes (_IShellFolder_ (This
), *apidl
, rgfInOut
);
458 /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
459 *rgfInOut
&= ~SFGAO_VALIDATE
;
461 TRACE ("-- result=0x%08lx\n", *rgfInOut
);
465 /**************************************************************************
466 * ISF_MyComputer_fnGetUIObjectOf
469 * hwndOwner [in] Parent window for any output
470 * cidl [in] array size
471 * apidl [in] simple pidl array
472 * riid [in] Requested Interface
473 * prgfInOut [ ] reserved
474 * ppvObject [out] Resulting Interface
477 static HRESULT WINAPI
ISF_MyComputer_fnGetUIObjectOf (IShellFolder2
* iface
,
478 HWND hwndOwner
, UINT cidl
, LPCITEMIDLIST
* apidl
, REFIID riid
,
479 UINT
* prgfInOut
, LPVOID
* ppvOut
)
481 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
484 IUnknown
*pObj
= NULL
;
485 HRESULT hr
= E_INVALIDARG
;
487 TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n", This
,
488 hwndOwner
, cidl
, apidl
, shdebugstr_guid (riid
), prgfInOut
, ppvOut
);
495 if (IsEqualIID (riid
, &IID_IContextMenu
) && (cidl
>= 1))
497 pObj
= (LPUNKNOWN
) ISvItemCm_Constructor ((IShellFolder
*) iface
,
498 This
->pidlRoot
, apidl
, cidl
);
501 else if (IsEqualIID (riid
, &IID_IDataObject
) && (cidl
>= 1))
503 pObj
= (LPUNKNOWN
) IDataObject_Constructor (hwndOwner
,
504 This
->pidlRoot
, apidl
, cidl
);
507 else if (IsEqualIID (riid
, &IID_IExtractIconA
) && (cidl
== 1))
509 pidl
= ILCombine (This
->pidlRoot
, apidl
[0]);
510 pObj
= (LPUNKNOWN
) IExtractIconA_Constructor (pidl
);
514 else if (IsEqualIID (riid
, &IID_IExtractIconW
) && (cidl
== 1))
516 pidl
= ILCombine (This
->pidlRoot
, apidl
[0]);
517 pObj
= (LPUNKNOWN
) IExtractIconW_Constructor (pidl
);
521 else if (IsEqualIID (riid
, &IID_IDropTarget
) && (cidl
>= 1))
523 hr
= IShellFolder_QueryInterface (iface
, &IID_IDropTarget
,
526 else if ((IsEqualIID(riid
,&IID_IShellLinkW
) ||
527 IsEqualIID(riid
,&IID_IShellLinkA
)) && (cidl
== 1))
529 pidl
= ILCombine (This
->pidlRoot
, apidl
[0]);
530 hr
= IShellLink_ConstructFromFile(NULL
, riid
, pidl
, (LPVOID
*) &pObj
);
536 if (SUCCEEDED(hr
) && !pObj
)
540 TRACE ("(%p)->hr=0x%08lx\n", This
, hr
);
544 /**************************************************************************
545 * ISF_MyComputer_fnGetDisplayNameOf
547 static HRESULT WINAPI
ISF_MyComputer_fnGetDisplayNameOf (IShellFolder2
*iface
,
548 LPCITEMIDLIST pidl
, DWORD dwFlags
, LPSTRRET strRet
)
550 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
552 char szPath
[MAX_PATH
];
555 TRACE ("(%p)->(pidl=%p,0x%08lx,%p)\n", This
, pidl
, dwFlags
, strRet
);
565 /* parsing name like ::{...} */
566 lstrcpyA (szPath
, "::");
567 SHELL32_GUIDToStringA(&CLSID_MyComputer
, &szPath
[2]);
569 else if (_ILIsPidlSimple(pidl
))
571 /* take names of special folders only if its only this folder */
572 if (_ILIsSpecialFolder(pidl
))
576 clsid
= _ILGetGUIDPointer (pidl
);
579 if (GET_SHGDN_FOR (dwFlags
) & SHGDN_FORPARSING
)
581 static const WCHAR clsidW
[] =
582 { 'C','L','S','I','D','\\',0 };
583 static const WCHAR shellfolderW
[] =
584 { '\\','s','h','e','l','l','f','o','l','d','e','r',0 };
585 static const WCHAR wantsForParsingW
[] =
586 { 'W','a','n','t','s','F','o','r','P','a','r','s','i','n',
588 int bWantsForParsing
= FALSE
;
589 WCHAR szRegPath
[100];
593 * We can only get a filesystem path from a shellfolder
594 * if the value WantsFORPARSING exists in
595 * CLSID\\{...}\\shellfolder
596 * exception: the MyComputer folder has this keys not
597 * but like any filesystem backed
598 * folder it needs these behaviour
600 * Get the "WantsFORPARSING" flag from the registry
603 lstrcpyW (szRegPath
, clsidW
);
604 SHELL32_GUIDToStringW (clsid
, &szRegPath
[6]);
605 lstrcatW (szRegPath
, shellfolderW
);
606 r
= SHGetValueW (HKEY_CLASSES_ROOT
, szRegPath
,
607 wantsForParsingW
, NULL
, NULL
, NULL
);
608 if (r
== ERROR_SUCCESS
)
609 bWantsForParsing
= TRUE
;
611 if ((GET_SHGDN_RELATION (dwFlags
) == SHGDN_NORMAL
) &&
615 * We need the filesystem path to the destination folder
616 * Only the folder itself can know it
618 hr
= SHELL32_GetDisplayNameOfChild (iface
, pidl
,
619 dwFlags
, szPath
, MAX_PATH
);
625 /* parsing name like ::{...} */
626 p
= lstrcpyA(szPath
, "::") + 2;
627 p
+= SHELL32_GUIDToStringA(&CLSID_MyComputer
, p
);
631 SHELL32_GUIDToStringA(clsid
, p
);
636 /* user friendly name */
637 HCR_GetClassNameA (clsid
, szPath
, MAX_PATH
);
642 /* append my own path */
643 _ILSimpleGetText (pidl
, szPath
, MAX_PATH
);
646 else if (_ILIsDrive(pidl
))
648 _ILSimpleGetText (pidl
, szPath
, MAX_PATH
); /* append my own path */
650 /* long view "lw_name (C:)" */
651 if (!(dwFlags
& SHGDN_FORPARSING
))
653 DWORD dwVolumeSerialNumber
, dwMaximumComponetLength
, dwFileSystemFlags
;
654 char szDrive
[18] = "";
656 GetVolumeInformationA (szPath
, szDrive
, sizeof (szDrive
) - 6,
657 &dwVolumeSerialNumber
,
658 &dwMaximumComponetLength
, &dwFileSystemFlags
, NULL
, 0);
659 strcat (szDrive
, " (");
660 strncat (szDrive
, szPath
, 2);
661 strcat (szDrive
, ")");
662 strcpy (szPath
, szDrive
);
667 /* Neither a shell namespace extension nor a drive letter. */
668 ERR("Wrong pidl type\n");
674 /* Complex pidl. Let the child folder do the work */
675 strRet
->uType
= STRRET_CSTR
;
676 hr
= SHELL32_GetDisplayNameOfChild(iface
, pidl
, dwFlags
, szPath
, MAX_PATH
);
681 strRet
->uType
= STRRET_CSTR
;
682 lstrcpynA (strRet
->u
.cStr
, szPath
, MAX_PATH
);
685 TRACE ("-- (%p)->(%s)\n", This
, szPath
);
689 /**************************************************************************
690 * ISF_MyComputer_fnSetNameOf
691 * Changes the name of a file object or subfolder, possibly changing its item
692 * identifier in the process.
695 * hwndOwner [in] Owner window for output
696 * pidl [in] simple pidl of item to change
697 * lpszName [in] the items new display name
698 * dwFlags [in] SHGNO formatting flags
699 * ppidlOut [out] simple pidl returned
701 static HRESULT WINAPI
ISF_MyComputer_fnSetNameOf (
702 IShellFolder2
* iface
, HWND hwndOwner
, LPCITEMIDLIST pidl
,
703 LPCOLESTR lpName
, DWORD dwFlags
, LPITEMIDLIST
* pPidlOut
)
705 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
706 FIXME ("(%p)->(%p,pidl=%p,%s,%lu,%p)\n", This
,
707 hwndOwner
, pidl
, debugstr_w (lpName
), dwFlags
, pPidlOut
);
711 static HRESULT WINAPI
ISF_MyComputer_fnGetDefaultSearchGUID (
712 IShellFolder2
* iface
, GUID
* pguid
)
714 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
715 FIXME ("(%p)\n", This
);
718 static HRESULT WINAPI
ISF_MyComputer_fnEnumSearches (
719 IShellFolder2
* iface
, IEnumExtraSearch
** ppenum
)
721 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
722 FIXME ("(%p)\n", This
);
725 static HRESULT WINAPI
ISF_MyComputer_fnGetDefaultColumn (
726 IShellFolder2
*iface
, DWORD dwRes
, ULONG
*pSort
, ULONG
*pDisplay
)
728 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
730 TRACE ("(%p)\n", This
);
738 static HRESULT WINAPI
ISF_MyComputer_fnGetDefaultColumnState (
739 IShellFolder2
* iface
, UINT iColumn
, DWORD
* pcsFlags
)
741 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
743 TRACE ("(%p)\n", This
);
745 if (!pcsFlags
|| iColumn
>= MYCOMPUTERSHELLVIEWCOLUMNS
)
747 *pcsFlags
= MyComputerSFHeader
[iColumn
].pcsFlags
;
751 static HRESULT WINAPI
ISF_MyComputer_fnGetDetailsEx (IShellFolder2
* iface
,
752 LPCITEMIDLIST pidl
, const SHCOLUMNID
* pscid
, VARIANT
* pv
)
754 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
755 FIXME ("(%p)\n", This
);
759 /* FIXME: drive size >4GB is rolling over */
760 static HRESULT WINAPI
ISF_MyComputer_fnGetDetailsOf (IShellFolder2
* iface
,
761 LPCITEMIDLIST pidl
, UINT iColumn
, SHELLDETAILS
* psd
)
763 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
766 TRACE ("(%p)->(%p %i %p)\n", This
, pidl
, iColumn
, psd
);
768 if (!psd
|| iColumn
>= MYCOMPUTERSHELLVIEWCOLUMNS
)
773 psd
->fmt
= MyComputerSFHeader
[iColumn
].fmt
;
774 psd
->cxChar
= MyComputerSFHeader
[iColumn
].cxChar
;
775 psd
->str
.uType
= STRRET_CSTR
;
776 LoadStringA (shell32_hInstance
, MyComputerSFHeader
[iColumn
].colnameid
,
777 psd
->str
.u
.cStr
, MAX_PATH
);
782 char szPath
[MAX_PATH
];
783 ULARGE_INTEGER ulBytes
;
785 psd
->str
.u
.cStr
[0] = 0x00;
786 psd
->str
.uType
= STRRET_CSTR
;
790 hr
= IShellFolder_GetDisplayNameOf (iface
, pidl
,
791 SHGDN_NORMAL
| SHGDN_INFOLDER
, &psd
->str
);
794 _ILGetFileType (pidl
, psd
->str
.u
.cStr
, MAX_PATH
);
796 case 2: /* total size */
797 if (_ILIsDrive (pidl
))
799 _ILSimpleGetText (pidl
, szPath
, MAX_PATH
);
800 GetDiskFreeSpaceExA (szPath
, NULL
, &ulBytes
, NULL
);
801 StrFormatByteSizeA (ulBytes
.u
.LowPart
, psd
->str
.u
.cStr
, MAX_PATH
);
804 case 3: /* free size */
805 if (_ILIsDrive (pidl
))
807 _ILSimpleGetText (pidl
, szPath
, MAX_PATH
);
808 GetDiskFreeSpaceExA (szPath
, &ulBytes
, NULL
, NULL
);
809 StrFormatByteSizeA (ulBytes
.u
.LowPart
, psd
->str
.u
.cStr
, MAX_PATH
);
819 static HRESULT WINAPI
ISF_MyComputer_fnMapColumnToSCID (
820 IShellFolder2
* iface
, UINT column
, SHCOLUMNID
* pscid
)
822 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
823 FIXME ("(%p)\n", This
);
827 static const IShellFolder2Vtbl vt_ShellFolder2
=
829 ISF_MyComputer_fnQueryInterface
,
830 ISF_MyComputer_fnAddRef
,
831 ISF_MyComputer_fnRelease
,
832 ISF_MyComputer_fnParseDisplayName
,
833 ISF_MyComputer_fnEnumObjects
,
834 ISF_MyComputer_fnBindToObject
,
835 ISF_MyComputer_fnBindToStorage
,
836 ISF_MyComputer_fnCompareIDs
,
837 ISF_MyComputer_fnCreateViewObject
,
838 ISF_MyComputer_fnGetAttributesOf
,
839 ISF_MyComputer_fnGetUIObjectOf
,
840 ISF_MyComputer_fnGetDisplayNameOf
,
841 ISF_MyComputer_fnSetNameOf
,
843 ISF_MyComputer_fnGetDefaultSearchGUID
,
844 ISF_MyComputer_fnEnumSearches
,
845 ISF_MyComputer_fnGetDefaultColumn
,
846 ISF_MyComputer_fnGetDefaultColumnState
,
847 ISF_MyComputer_fnGetDetailsEx
,
848 ISF_MyComputer_fnGetDetailsOf
,
849 ISF_MyComputer_fnMapColumnToSCID
852 /************************************************************************
853 * IMCFldr_PersistFolder2_QueryInterface
855 static HRESULT WINAPI
IMCFldr_PersistFolder2_QueryInterface (
856 IPersistFolder2
* iface
, REFIID iid
, LPVOID
* ppvObj
)
858 _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl
, iface
);
860 TRACE ("(%p)\n", This
);
862 return IUnknown_QueryInterface (_IUnknown_ (This
), iid
, ppvObj
);
865 /************************************************************************
866 * IMCFldr_PersistFolder2_AddRef
868 static ULONG WINAPI
IMCFldr_PersistFolder2_AddRef (IPersistFolder2
* iface
)
870 _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl
, iface
);
872 TRACE ("(%p)->(count=%lu)\n", This
, This
->ref
);
874 return IUnknown_AddRef (_IUnknown_ (This
));
877 /************************************************************************
878 * ISFPersistFolder_Release
880 static ULONG WINAPI
IMCFldr_PersistFolder2_Release (IPersistFolder2
* iface
)
882 _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl
, iface
);
884 TRACE ("(%p)->(count=%lu)\n", This
, This
->ref
);
886 return IUnknown_Release (_IUnknown_ (This
));
889 /************************************************************************
890 * IMCFldr_PersistFolder2_GetClassID
892 static HRESULT WINAPI
IMCFldr_PersistFolder2_GetClassID (
893 IPersistFolder2
* iface
, CLSID
* lpClassId
)
895 _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl
, iface
);
897 TRACE ("(%p)\n", This
);
901 *lpClassId
= CLSID_MyComputer
;
906 /************************************************************************
907 * IMCFldr_PersistFolder2_Initialize
909 * NOTES: it makes no sense to change the pidl
911 static HRESULT WINAPI
IMCFldr_PersistFolder2_Initialize (
912 IPersistFolder2
* iface
, LPCITEMIDLIST pidl
)
914 _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl
, iface
);
915 TRACE ("(%p)->(%p)\n", This
, pidl
);
919 /**************************************************************************
920 * IPersistFolder2_fnGetCurFolder
922 static HRESULT WINAPI
IMCFldr_PersistFolder2_GetCurFolder (
923 IPersistFolder2
* iface
, LPITEMIDLIST
* pidl
)
925 _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl
, iface
);
927 TRACE ("(%p)->(%p)\n", This
, pidl
);
931 *pidl
= ILClone (This
->pidlRoot
);
935 static const IPersistFolder2Vtbl vt_PersistFolder2
=
937 IMCFldr_PersistFolder2_QueryInterface
,
938 IMCFldr_PersistFolder2_AddRef
,
939 IMCFldr_PersistFolder2_Release
,
940 IMCFldr_PersistFolder2_GetClassID
,
941 IMCFldr_PersistFolder2_Initialize
,
942 IMCFldr_PersistFolder2_GetCurFolder