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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, 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 static inline IGenericSFImpl
*impl_from_IPersistFolder2( IPersistFolder2
*iface
)
71 return (IGenericSFImpl
*)((char*)iface
- FIELD_OFFSET(IGenericSFImpl
, lpVtblPersistFolder2
));
76 converts This to an interface pointer
78 #define _IUnknown_(This) ((IUnknown*)&(This)->lpVtbl)
79 #define _IShellFolder_(This) ((IShellFolder*)&(This)->lpVtbl)
80 #define _IShellFolder2_(This) (&(This)->lpVtbl)
82 #define _IPersist_(This) (&(This)->lpVtblPersistFolder2)
83 #define _IPersistFolder_(This) (&(This)->lpVtblPersistFolder2)
84 #define _IPersistFolder2_(This) (&(This)->lpVtblPersistFolder2)
86 /***********************************************************************
87 * IShellFolder [MyComputer] implementation
90 static const shvheader MyComputerSFHeader
[] = {
91 {IDS_SHV_COLUMN1
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 15},
92 {IDS_SHV_COLUMN3
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 10},
93 {IDS_SHV_COLUMN6
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 10},
94 {IDS_SHV_COLUMN7
, SHCOLSTATE_TYPE_STR
| SHCOLSTATE_ONBYDEFAULT
, LVCFMT_RIGHT
, 10},
97 #define MYCOMPUTERSHELLVIEWCOLUMNS 4
99 /**************************************************************************
100 * ISF_MyComputer_Constructor
102 HRESULT WINAPI
ISF_MyComputer_Constructor (IUnknown
* pUnkOuter
, REFIID riid
, LPVOID
* ppv
)
106 TRACE ("unkOut=%p %s\n", pUnkOuter
, shdebugstr_guid (riid
));
111 return CLASS_E_NOAGGREGATION
;
113 sf
= LocalAlloc (LMEM_ZEROINIT
, sizeof (IGenericSFImpl
));
115 return E_OUTOFMEMORY
;
118 sf
->lpVtbl
= &vt_ShellFolder2
;
119 sf
->lpVtblPersistFolder2
= &vt_PersistFolder2
;
120 sf
->pidlRoot
= _ILCreateMyComputer (); /* my qualified pidl */
122 if (FAILED (IUnknown_QueryInterface (_IUnknown_ (sf
), riid
, ppv
)))
124 IUnknown_Release (_IUnknown_ (sf
));
125 return E_NOINTERFACE
;
128 TRACE ("--(%p)\n", sf
);
132 /**************************************************************************
133 * ISF_MyComputer_fnQueryInterface
135 * NOTES supports not IPersist/IPersistFolder
137 static HRESULT WINAPI
ISF_MyComputer_fnQueryInterface (IShellFolder2
*iface
,
138 REFIID riid
, LPVOID
*ppvObj
)
140 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
142 TRACE ("(%p)->(%s,%p)\n", This
, shdebugstr_guid (riid
), ppvObj
);
146 if (IsEqualIID (riid
, &IID_IUnknown
) ||
147 IsEqualIID (riid
, &IID_IShellFolder
) ||
148 IsEqualIID (riid
, &IID_IShellFolder2
))
152 else if (IsEqualIID (riid
, &IID_IPersist
) ||
153 IsEqualIID (riid
, &IID_IPersistFolder
) ||
154 IsEqualIID (riid
, &IID_IPersistFolder2
))
156 *ppvObj
= _IPersistFolder2_ (This
);
161 IUnknown_AddRef ((IUnknown
*) (*ppvObj
));
162 TRACE ("-- Interface: (%p)->(%p)\n", ppvObj
, *ppvObj
);
165 TRACE ("-- Interface: E_NOINTERFACE\n");
166 return E_NOINTERFACE
;
169 static ULONG WINAPI
ISF_MyComputer_fnAddRef (IShellFolder2
* iface
)
171 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
172 ULONG refCount
= InterlockedIncrement(&This
->ref
);
174 TRACE ("(%p)->(count=%u)\n", This
, refCount
- 1);
179 static ULONG WINAPI
ISF_MyComputer_fnRelease (IShellFolder2
* iface
)
181 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
182 ULONG refCount
= InterlockedDecrement(&This
->ref
);
184 TRACE ("(%p)->(count=%u)\n", This
, refCount
+ 1);
188 TRACE ("-- destroying IShellFolder(%p)\n", This
);
189 SHFree (This
->pidlRoot
);
190 LocalFree ((HLOCAL
) This
);
195 /**************************************************************************
196 * ISF_MyComputer_fnParseDisplayName
198 static HRESULT WINAPI
ISF_MyComputer_fnParseDisplayName (IShellFolder2
*iface
,
199 HWND hwndOwner
, LPBC pbc
, LPOLESTR lpszDisplayName
,
200 DWORD
* pchEaten
, LPITEMIDLIST
* ppidl
, DWORD
* pdwAttributes
)
202 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
203 HRESULT hr
= E_INVALIDARG
;
204 LPCWSTR szNext
= NULL
;
205 WCHAR szElement
[MAX_PATH
];
206 LPITEMIDLIST pidlTemp
= NULL
;
209 TRACE("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n", This
,
210 hwndOwner
, pbc
, lpszDisplayName
, debugstr_w (lpszDisplayName
),
211 pchEaten
, ppidl
, pdwAttributes
);
215 *pchEaten
= 0; /* strange but like the original */
217 /* handle CLSID paths */
218 if (lpszDisplayName
[0] == ':' && lpszDisplayName
[1] == ':')
220 szNext
= GetNextElementW (lpszDisplayName
, szElement
, MAX_PATH
);
221 TRACE ("-- element: %s\n", debugstr_w (szElement
));
222 SHCLSIDFromStringW (szElement
+ 2, &clsid
);
223 pidlTemp
= _ILCreateGuid (PT_GUID
, &clsid
);
225 /* do we have an absolute path name ? */
226 else if (PathGetDriveNumberW (lpszDisplayName
) >= 0 &&
227 lpszDisplayName
[2] == (WCHAR
) '\\')
229 szNext
= GetNextElementW (lpszDisplayName
, szElement
, MAX_PATH
);
230 /* make drive letter uppercase to enable PIDL comparison */
231 szElement
[0] = toupper(szElement
[0]);
232 pidlTemp
= _ILCreateDrive (szElement
);
235 if (szNext
&& *szNext
)
237 hr
= SHELL32_ParseNextElement (iface
, hwndOwner
, pbc
, &pidlTemp
,
238 (LPOLESTR
) szNext
, pchEaten
, pdwAttributes
);
242 if (pdwAttributes
&& *pdwAttributes
)
243 SHELL32_GetItemAttributes (_IShellFolder_ (This
),
244 pidlTemp
, pdwAttributes
);
250 TRACE ("(%p)->(-- ret=0x%08x)\n", This
, hr
);
255 /* retrieve a map of drives that should be displayed */
256 static DWORD
get_drive_map(void)
258 static const WCHAR policiesW
[] = {'S','o','f','t','w','a','r','e','\\',
259 'M','i','c','r','o','s','o','f','t','\\',
260 'W','i','n','d','o','w','s','\\',
261 'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
262 'P','o','l','i','c','i','e','s','\\',
263 'E','x','p','l','o','r','e','r',0};
264 static const WCHAR nodrivesW
[] = {'N','o','D','r','i','v','e','s',0};
265 static DWORD drive_mask
, init_done
;
269 DWORD type
, size
, data
, mask
= 0;
272 if (!RegOpenKeyW( HKEY_LOCAL_MACHINE
, policiesW
, &hkey
))
275 if (!RegQueryValueExW( hkey
, nodrivesW
, NULL
, &type
, (LPBYTE
)&data
, &size
) && type
== REG_DWORD
)
279 if (!RegOpenKeyW( HKEY_CURRENT_USER
, policiesW
, &hkey
))
282 if (!RegQueryValueExW( hkey
, nodrivesW
, NULL
, &type
, (LPBYTE
)&data
, &size
) && type
== REG_DWORD
)
290 return GetLogicalDrives() & ~drive_mask
;
293 /**************************************************************************
294 * CreateMyCompEnumList()
296 static const WCHAR MyComputer_NameSpaceW
[] = { 'S','O','F','T','W','A','R','E',
297 '\\','M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\',
298 'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\','E','x','p','l',
299 'o','r','e','r','\\','M','y','C','o','m','p','u','t','e','r','\\','N','a','m',
300 'e','s','p','a','c','e','\0' };
302 static BOOL
CreateMyCompEnumList(IEnumIDList
*list
, DWORD dwFlags
)
306 TRACE("(%p)->(flags=0x%08x)\n", list
, dwFlags
);
308 /* enumerate the folders */
309 if (dwFlags
& SHCONTF_FOLDERS
)
311 WCHAR wszDriveName
[] = {'A', ':', '\\', '\0'};
312 DWORD dwDrivemap
= get_drive_map();
316 while (ret
&& wszDriveName
[0]<='Z')
318 if(dwDrivemap
& 0x00000001L
)
319 ret
= AddToEnumList(list
, _ILCreateDrive(wszDriveName
));
321 dwDrivemap
= dwDrivemap
>> 1;
324 TRACE("-- (%p)-> enumerate (mycomputer shell extensions)\n",list
);
325 for (i
=0; i
<2; i
++) {
326 if (ret
&& !RegOpenKeyExW(i
== 0 ? HKEY_LOCAL_MACHINE
: HKEY_CURRENT_USER
,
327 MyComputer_NameSpaceW
, 0, KEY_READ
, &hkey
))
337 size
= sizeof(iid
) / sizeof(iid
[0]);
338 r
= RegEnumKeyExW(hkey
, i
, iid
, &size
, 0, NULL
, NULL
, NULL
);
339 if (ERROR_SUCCESS
== r
)
341 /* FIXME: shell extensions, shouldn't the type be
343 ret
= AddToEnumList(list
, _ILCreateGuidFromStrW(iid
));
346 else if (ERROR_NO_MORE_ITEMS
== r
)
358 /**************************************************************************
359 * ISF_MyComputer_fnEnumObjects
361 static HRESULT WINAPI
ISF_MyComputer_fnEnumObjects (IShellFolder2
*iface
,
362 HWND hwndOwner
, DWORD dwFlags
, LPENUMIDLIST
*ppEnumIDList
)
364 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
366 TRACE("(%p)->(HWND=%p flags=0x%08x pplist=%p)\n", This
,
367 hwndOwner
, dwFlags
, ppEnumIDList
);
369 *ppEnumIDList
= IEnumIDList_Constructor();
371 CreateMyCompEnumList(*ppEnumIDList
, dwFlags
);
373 TRACE ("-- (%p)->(new ID List: %p)\n", This
, *ppEnumIDList
);
375 return (*ppEnumIDList
) ? S_OK
: E_OUTOFMEMORY
;
378 /**************************************************************************
379 * ISF_MyComputer_fnBindToObject
381 static HRESULT WINAPI
ISF_MyComputer_fnBindToObject (IShellFolder2
*iface
,
382 LPCITEMIDLIST pidl
, LPBC pbcReserved
, REFIID riid
, LPVOID
*ppvOut
)
384 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
386 TRACE("(%p)->(pidl=%p,%p,%s,%p)\n", This
,
387 pidl
, pbcReserved
, shdebugstr_guid (riid
), ppvOut
);
389 return SHELL32_BindToChild (This
->pidlRoot
, NULL
, pidl
, riid
, ppvOut
);
392 /**************************************************************************
393 * ISF_MyComputer_fnBindToStorage
395 static HRESULT WINAPI
ISF_MyComputer_fnBindToStorage (IShellFolder2
* iface
,
396 LPCITEMIDLIST pidl
, LPBC pbcReserved
, REFIID riid
, LPVOID
*ppvOut
)
398 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
400 FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", This
,
401 pidl
, pbcReserved
, shdebugstr_guid (riid
), ppvOut
);
407 /**************************************************************************
408 * ISF_MyComputer_fnCompareIDs
411 static HRESULT WINAPI
ISF_MyComputer_fnCompareIDs (IShellFolder2
*iface
,
412 LPARAM lParam
, LPCITEMIDLIST pidl1
, LPCITEMIDLIST pidl2
)
414 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
417 TRACE ("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This
, lParam
, pidl1
, pidl2
);
418 nReturn
= SHELL32_CompareIDs (_IShellFolder_ (This
), lParam
, pidl1
, pidl2
);
419 TRACE ("-- %i\n", nReturn
);
423 /**************************************************************************
424 * ISF_MyComputer_fnCreateViewObject
426 static HRESULT WINAPI
ISF_MyComputer_fnCreateViewObject (IShellFolder2
*iface
,
427 HWND hwndOwner
, REFIID riid
, LPVOID
* ppvOut
)
429 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
430 LPSHELLVIEW pShellView
;
431 HRESULT hr
= E_INVALIDARG
;
433 TRACE("(%p)->(hwnd=%p,%s,%p)\n", This
,
434 hwndOwner
, shdebugstr_guid (riid
), ppvOut
);
441 if (IsEqualIID (riid
, &IID_IDropTarget
))
443 WARN ("IDropTarget not implemented\n");
446 else if (IsEqualIID (riid
, &IID_IContextMenu
))
448 WARN ("IContextMenu not implemented\n");
451 else if (IsEqualIID (riid
, &IID_IShellView
))
453 pShellView
= IShellView_Constructor ((IShellFolder
*) iface
);
456 hr
= IShellView_QueryInterface (pShellView
, riid
, ppvOut
);
457 IShellView_Release (pShellView
);
460 TRACE ("-- (%p)->(interface=%p)\n", This
, ppvOut
);
464 /**************************************************************************
465 * ISF_MyComputer_fnGetAttributesOf
467 static HRESULT WINAPI
ISF_MyComputer_fnGetAttributesOf (IShellFolder2
* iface
,
468 UINT cidl
, LPCITEMIDLIST
* apidl
, DWORD
* rgfInOut
)
470 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
473 TRACE ("(%p)->(cidl=%d apidl=%p mask=%p (0x%08x))\n",
474 This
, cidl
, apidl
, rgfInOut
, rgfInOut
? *rgfInOut
: 0);
485 IShellFolder
*psfParent
= NULL
;
486 LPCITEMIDLIST rpidl
= NULL
;
488 hr
= SHBindToParent(This
->pidlRoot
, &IID_IShellFolder
, (LPVOID
*)&psfParent
, &rpidl
);
490 SHELL32_GetItemAttributes (psfParent
, rpidl
, rgfInOut
);
491 IShellFolder_Release(psfParent
);
494 while (cidl
> 0 && *apidl
) {
496 SHELL32_GetItemAttributes (_IShellFolder_ (This
), *apidl
, rgfInOut
);
501 /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
502 *rgfInOut
&= ~SFGAO_VALIDATE
;
504 TRACE ("-- result=0x%08x\n", *rgfInOut
);
508 /**************************************************************************
509 * ISF_MyComputer_fnGetUIObjectOf
512 * hwndOwner [in] Parent window for any output
513 * cidl [in] array size
514 * apidl [in] simple pidl array
515 * riid [in] Requested Interface
516 * prgfInOut [ ] reserved
517 * ppvObject [out] Resulting Interface
520 static HRESULT WINAPI
ISF_MyComputer_fnGetUIObjectOf (IShellFolder2
* iface
,
521 HWND hwndOwner
, UINT cidl
, LPCITEMIDLIST
* apidl
, REFIID riid
,
522 UINT
* prgfInOut
, LPVOID
* ppvOut
)
524 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
527 IUnknown
*pObj
= NULL
;
528 HRESULT hr
= E_INVALIDARG
;
530 TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n", This
,
531 hwndOwner
, cidl
, apidl
, shdebugstr_guid (riid
), prgfInOut
, ppvOut
);
538 if (IsEqualIID (riid
, &IID_IContextMenu
) && (cidl
>= 1))
540 pObj
= (LPUNKNOWN
) ISvItemCm_Constructor ((IShellFolder
*) iface
,
541 This
->pidlRoot
, apidl
, cidl
);
544 else if (IsEqualIID (riid
, &IID_IDataObject
) && (cidl
>= 1))
546 pObj
= (LPUNKNOWN
) IDataObject_Constructor (hwndOwner
,
547 This
->pidlRoot
, apidl
, cidl
);
550 else if (IsEqualIID (riid
, &IID_IExtractIconA
) && (cidl
== 1))
552 pidl
= ILCombine (This
->pidlRoot
, apidl
[0]);
553 pObj
= (LPUNKNOWN
) IExtractIconA_Constructor (pidl
);
557 else if (IsEqualIID (riid
, &IID_IExtractIconW
) && (cidl
== 1))
559 pidl
= ILCombine (This
->pidlRoot
, apidl
[0]);
560 pObj
= (LPUNKNOWN
) IExtractIconW_Constructor (pidl
);
564 else if (IsEqualIID (riid
, &IID_IDropTarget
) && (cidl
>= 1))
566 hr
= IShellFolder_QueryInterface (iface
, &IID_IDropTarget
,
569 else if ((IsEqualIID(riid
,&IID_IShellLinkW
) ||
570 IsEqualIID(riid
,&IID_IShellLinkA
)) && (cidl
== 1))
572 pidl
= ILCombine (This
->pidlRoot
, apidl
[0]);
573 hr
= IShellLink_ConstructFromFile(NULL
, riid
, pidl
, (LPVOID
*) &pObj
);
579 if (SUCCEEDED(hr
) && !pObj
)
583 TRACE ("(%p)->hr=0x%08x\n", This
, hr
);
587 /**************************************************************************
588 * ISF_MyComputer_fnGetDisplayNameOf
590 static HRESULT WINAPI
ISF_MyComputer_fnGetDisplayNameOf (IShellFolder2
*iface
,
591 LPCITEMIDLIST pidl
, DWORD dwFlags
, LPSTRRET strRet
)
593 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
598 TRACE ("(%p)->(pidl=%p,0x%08x,%p)\n", This
, pidl
, dwFlags
, strRet
);
604 pszPath
= CoTaskMemAlloc((MAX_PATH
+1) * sizeof(WCHAR
));
606 return E_OUTOFMEMORY
;
612 /* parsing name like ::{...} */
615 SHELL32_GUIDToStringW(&CLSID_MyComputer
, &pszPath
[2]);
617 else if (_ILIsPidlSimple(pidl
))
619 /* take names of special folders only if its only this folder */
620 if (_ILIsSpecialFolder(pidl
))
624 clsid
= _ILGetGUIDPointer (pidl
);
627 if (GET_SHGDN_FOR (dwFlags
) & SHGDN_FORPARSING
)
629 static const WCHAR clsidW
[] =
630 { 'C','L','S','I','D','\\',0 };
631 static const WCHAR shellfolderW
[] =
632 { '\\','s','h','e','l','l','f','o','l','d','e','r',0 };
633 static const WCHAR wantsForParsingW
[] =
634 { 'W','a','n','t','s','F','o','r','P','a','r','s','i','n',
636 int bWantsForParsing
= FALSE
;
637 WCHAR szRegPath
[100];
641 * We can only get a filesystem path from a shellfolder
642 * if the value WantsFORPARSING exists in
643 * CLSID\\{...}\\shellfolder
644 * exception: the MyComputer folder has this keys not
645 * but like any filesystem backed
646 * folder it needs these behaviour
648 * Get the "WantsFORPARSING" flag from the registry
651 lstrcpyW (szRegPath
, clsidW
);
652 SHELL32_GUIDToStringW (clsid
, &szRegPath
[6]);
653 lstrcatW (szRegPath
, shellfolderW
);
654 r
= SHGetValueW (HKEY_CLASSES_ROOT
, szRegPath
,
655 wantsForParsingW
, NULL
, NULL
, NULL
);
656 if (r
== ERROR_SUCCESS
)
657 bWantsForParsing
= TRUE
;
659 if ((GET_SHGDN_RELATION (dwFlags
) == SHGDN_NORMAL
) &&
663 * We need the filesystem path to the destination folder
664 * Only the folder itself can know it
666 hr
= SHELL32_GetDisplayNameOfChild (iface
, pidl
,
667 dwFlags
, pszPath
, MAX_PATH
);
673 /* parsing name like ::{...} */
677 p
+= SHELL32_GUIDToStringW(&CLSID_MyComputer
, p
);
684 SHELL32_GUIDToStringW(clsid
, p
);
689 /* user friendly name */
690 HCR_GetClassNameW (clsid
, pszPath
, MAX_PATH
);
695 /* append my own path */
696 _ILSimpleGetTextW (pidl
, pszPath
, MAX_PATH
);
699 else if (_ILIsDrive(pidl
))
701 _ILSimpleGetTextW (pidl
, pszPath
, MAX_PATH
); /* append my own path */
703 /* long view "lw_name (C:)" */
704 if (!(dwFlags
& SHGDN_FORPARSING
))
706 DWORD dwVolumeSerialNumber
, dwMaximumComponetLength
, dwFileSystemFlags
;
707 WCHAR wszDrive
[18] = {0};
708 static const WCHAR wszOpenBracket
[] = {' ','(',0};
709 static const WCHAR wszCloseBracket
[] = {')',0};
711 GetVolumeInformationW (pszPath
, wszDrive
,
712 sizeof(wszDrive
)/sizeof(wszDrive
[0]) - 6,
713 &dwVolumeSerialNumber
,
714 &dwMaximumComponetLength
, &dwFileSystemFlags
, NULL
, 0);
715 strcatW (wszDrive
, wszOpenBracket
);
716 lstrcpynW (wszDrive
+ strlenW(wszDrive
), pszPath
, 3);
717 strcatW (wszDrive
, wszCloseBracket
);
718 strcpyW (pszPath
, wszDrive
);
723 /* Neither a shell namespace extension nor a drive letter. */
724 ERR("Wrong pidl type\n");
725 CoTaskMemFree(pszPath
);
731 /* Complex pidl. Let the child folder do the work */
732 hr
= SHELL32_GetDisplayNameOfChild(iface
, pidl
, dwFlags
, pszPath
, MAX_PATH
);
737 /* Win9x always returns ANSI strings, NT always returns Unicode strings */
738 if (GetVersion() & 0x80000000)
740 strRet
->uType
= STRRET_CSTR
;
741 if (!WideCharToMultiByte(CP_ACP
, 0, pszPath
, -1, strRet
->u
.cStr
, MAX_PATH
,
743 strRet
->u
.cStr
[0] = '\0';
744 CoTaskMemFree(pszPath
);
748 strRet
->uType
= STRRET_WSTR
;
749 strRet
->u
.pOleStr
= pszPath
;
753 CoTaskMemFree(pszPath
);
755 TRACE ("-- (%p)->(%s)\n", This
, strRet
->uType
== STRRET_CSTR
? strRet
->u
.cStr
: debugstr_w(strRet
->u
.pOleStr
));
759 /**************************************************************************
760 * ISF_MyComputer_fnSetNameOf
761 * Changes the name of a file object or subfolder, possibly changing its item
762 * identifier in the process.
765 * hwndOwner [in] Owner window for output
766 * pidl [in] simple pidl of item to change
767 * lpszName [in] the items new display name
768 * dwFlags [in] SHGNO formatting flags
769 * ppidlOut [out] simple pidl returned
771 static HRESULT WINAPI
ISF_MyComputer_fnSetNameOf (
772 IShellFolder2
* iface
, HWND hwndOwner
, LPCITEMIDLIST pidl
,
773 LPCOLESTR lpName
, DWORD dwFlags
, LPITEMIDLIST
* pPidlOut
)
775 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
776 FIXME ("(%p)->(%p,pidl=%p,%s,%u,%p)\n", This
,
777 hwndOwner
, pidl
, debugstr_w (lpName
), dwFlags
, pPidlOut
);
781 static HRESULT WINAPI
ISF_MyComputer_fnGetDefaultSearchGUID (
782 IShellFolder2
* iface
, GUID
* pguid
)
784 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
785 FIXME ("(%p)\n", This
);
788 static HRESULT WINAPI
ISF_MyComputer_fnEnumSearches (
789 IShellFolder2
* iface
, IEnumExtraSearch
** ppenum
)
791 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
792 FIXME ("(%p)\n", This
);
795 static HRESULT WINAPI
ISF_MyComputer_fnGetDefaultColumn (
796 IShellFolder2
*iface
, DWORD dwRes
, ULONG
*pSort
, ULONG
*pDisplay
)
798 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
800 TRACE ("(%p)\n", This
);
808 static HRESULT WINAPI
ISF_MyComputer_fnGetDefaultColumnState (
809 IShellFolder2
* iface
, UINT iColumn
, DWORD
* pcsFlags
)
811 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
813 TRACE ("(%p)\n", This
);
815 if (!pcsFlags
|| iColumn
>= MYCOMPUTERSHELLVIEWCOLUMNS
)
817 *pcsFlags
= MyComputerSFHeader
[iColumn
].pcsFlags
;
821 static HRESULT WINAPI
ISF_MyComputer_fnGetDetailsEx (IShellFolder2
* iface
,
822 LPCITEMIDLIST pidl
, const SHCOLUMNID
* pscid
, VARIANT
* pv
)
824 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
825 FIXME ("(%p)\n", This
);
829 /* FIXME: drive size >4GB is rolling over */
830 static HRESULT WINAPI
ISF_MyComputer_fnGetDetailsOf (IShellFolder2
* iface
,
831 LPCITEMIDLIST pidl
, UINT iColumn
, SHELLDETAILS
* psd
)
833 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
836 TRACE ("(%p)->(%p %i %p)\n", This
, pidl
, iColumn
, psd
);
838 if (!psd
|| iColumn
>= MYCOMPUTERSHELLVIEWCOLUMNS
)
843 psd
->fmt
= MyComputerSFHeader
[iColumn
].fmt
;
844 psd
->cxChar
= MyComputerSFHeader
[iColumn
].cxChar
;
845 psd
->str
.uType
= STRRET_CSTR
;
846 LoadStringA (shell32_hInstance
, MyComputerSFHeader
[iColumn
].colnameid
,
847 psd
->str
.u
.cStr
, MAX_PATH
);
852 char szPath
[MAX_PATH
];
853 ULARGE_INTEGER ulBytes
;
855 psd
->str
.u
.cStr
[0] = 0x00;
856 psd
->str
.uType
= STRRET_CSTR
;
860 hr
= IShellFolder_GetDisplayNameOf (iface
, pidl
,
861 SHGDN_NORMAL
| SHGDN_INFOLDER
, &psd
->str
);
864 _ILGetFileType (pidl
, psd
->str
.u
.cStr
, MAX_PATH
);
866 case 2: /* total size */
867 if (_ILIsDrive (pidl
))
869 _ILSimpleGetText (pidl
, szPath
, MAX_PATH
);
870 GetDiskFreeSpaceExA (szPath
, NULL
, &ulBytes
, NULL
);
871 StrFormatByteSizeA (ulBytes
.u
.LowPart
, psd
->str
.u
.cStr
, MAX_PATH
);
874 case 3: /* free size */
875 if (_ILIsDrive (pidl
))
877 _ILSimpleGetText (pidl
, szPath
, MAX_PATH
);
878 GetDiskFreeSpaceExA (szPath
, &ulBytes
, NULL
, NULL
);
879 StrFormatByteSizeA (ulBytes
.u
.LowPart
, psd
->str
.u
.cStr
, MAX_PATH
);
889 static HRESULT WINAPI
ISF_MyComputer_fnMapColumnToSCID (
890 IShellFolder2
* iface
, UINT column
, SHCOLUMNID
* pscid
)
892 IGenericSFImpl
*This
= (IGenericSFImpl
*)iface
;
893 FIXME ("(%p)\n", This
);
897 static const IShellFolder2Vtbl vt_ShellFolder2
=
899 ISF_MyComputer_fnQueryInterface
,
900 ISF_MyComputer_fnAddRef
,
901 ISF_MyComputer_fnRelease
,
902 ISF_MyComputer_fnParseDisplayName
,
903 ISF_MyComputer_fnEnumObjects
,
904 ISF_MyComputer_fnBindToObject
,
905 ISF_MyComputer_fnBindToStorage
,
906 ISF_MyComputer_fnCompareIDs
,
907 ISF_MyComputer_fnCreateViewObject
,
908 ISF_MyComputer_fnGetAttributesOf
,
909 ISF_MyComputer_fnGetUIObjectOf
,
910 ISF_MyComputer_fnGetDisplayNameOf
,
911 ISF_MyComputer_fnSetNameOf
,
913 ISF_MyComputer_fnGetDefaultSearchGUID
,
914 ISF_MyComputer_fnEnumSearches
,
915 ISF_MyComputer_fnGetDefaultColumn
,
916 ISF_MyComputer_fnGetDefaultColumnState
,
917 ISF_MyComputer_fnGetDetailsEx
,
918 ISF_MyComputer_fnGetDetailsOf
,
919 ISF_MyComputer_fnMapColumnToSCID
922 /************************************************************************
923 * IMCFldr_PersistFolder2_QueryInterface
925 static HRESULT WINAPI
IMCFldr_PersistFolder2_QueryInterface (
926 IPersistFolder2
* iface
, REFIID iid
, LPVOID
* ppvObj
)
928 IGenericSFImpl
*This
= impl_from_IPersistFolder2(iface
);
930 TRACE ("(%p)\n", This
);
932 return IUnknown_QueryInterface (_IUnknown_ (This
), iid
, ppvObj
);
935 /************************************************************************
936 * IMCFldr_PersistFolder2_AddRef
938 static ULONG WINAPI
IMCFldr_PersistFolder2_AddRef (IPersistFolder2
* iface
)
940 IGenericSFImpl
*This
= impl_from_IPersistFolder2(iface
);
942 TRACE ("(%p)->(count=%u)\n", This
, This
->ref
);
944 return IUnknown_AddRef (_IUnknown_ (This
));
947 /************************************************************************
948 * ISFPersistFolder_Release
950 static ULONG WINAPI
IMCFldr_PersistFolder2_Release (IPersistFolder2
* iface
)
952 IGenericSFImpl
*This
= impl_from_IPersistFolder2(iface
);
954 TRACE ("(%p)->(count=%u)\n", This
, This
->ref
);
956 return IUnknown_Release (_IUnknown_ (This
));
959 /************************************************************************
960 * IMCFldr_PersistFolder2_GetClassID
962 static HRESULT WINAPI
IMCFldr_PersistFolder2_GetClassID (
963 IPersistFolder2
* iface
, CLSID
* lpClassId
)
965 IGenericSFImpl
*This
= impl_from_IPersistFolder2(iface
);
967 TRACE ("(%p)\n", This
);
971 *lpClassId
= CLSID_MyComputer
;
976 /************************************************************************
977 * IMCFldr_PersistFolder2_Initialize
979 * NOTES: it makes no sense to change the pidl
981 static HRESULT WINAPI
IMCFldr_PersistFolder2_Initialize (
982 IPersistFolder2
* iface
, LPCITEMIDLIST pidl
)
984 IGenericSFImpl
*This
= impl_from_IPersistFolder2(iface
);
985 TRACE ("(%p)->(%p)\n", This
, pidl
);
989 /**************************************************************************
990 * IPersistFolder2_fnGetCurFolder
992 static HRESULT WINAPI
IMCFldr_PersistFolder2_GetCurFolder (
993 IPersistFolder2
* iface
, LPITEMIDLIST
* pidl
)
995 IGenericSFImpl
*This
= impl_from_IPersistFolder2(iface
);
997 TRACE ("(%p)->(%p)\n", This
, pidl
);
1001 *pidl
= ILClone (This
->pidlRoot
);
1005 static const IPersistFolder2Vtbl vt_PersistFolder2
=
1007 IMCFldr_PersistFolder2_QueryInterface
,
1008 IMCFldr_PersistFolder2_AddRef
,
1009 IMCFldr_PersistFolder2_Release
,
1010 IMCFldr_PersistFolder2_GetClassID
,
1011 IMCFldr_PersistFolder2_Initialize
,
1012 IMCFldr_PersistFolder2_GetCurFolder