shell32: Merge ShellView menu implementations into a single file.
[wine/multimedia.git] / dlls / shell32 / shfldr_mycomp.c
blob248222305664a62a90eafa07695c092d76e97f2b
1 /*
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
22 #include "config.h"
23 #include "wine/port.h"
25 #include <stdlib.h>
26 #include <string.h>
27 #include <stdarg.h>
28 #include <stdio.h>
30 #define COBJMACROS
31 #define NONAMELESSUNION
32 #define NONAMELESSSTRUCT
34 #include "winerror.h"
35 #include "windef.h"
36 #include "winbase.h"
37 #include "winreg.h"
39 #include "wingdi.h"
40 #include "pidl.h"
41 #include "shlguid.h"
42 #include "undocshell.h"
43 #include "shell32_main.h"
44 #include "shresdef.h"
45 #include "shlwapi.h"
46 #include "wine/debug.h"
47 #include "debughlp.h"
48 #include "shfldr.h"
50 WINE_DEFAULT_DEBUG_CHANNEL (shell);
52 /***********************************************************************
53 * IShellFolder implementation
56 typedef struct {
57 IShellFolder2 IShellFolder2_iface;
58 IPersistFolder2 IPersistFolder2_iface;
59 LONG ref;
61 /* both paths are parsible from the desktop */
62 LPITEMIDLIST pidlRoot; /* absolute pidl */
63 } IMyComputerFolderImpl;
65 static const IShellFolder2Vtbl vt_ShellFolder2;
66 static const IPersistFolder2Vtbl vt_PersistFolder2;
68 static inline IMyComputerFolderImpl *impl_from_IShellFolder2(IShellFolder2 *iface)
70 return CONTAINING_RECORD(iface, IMyComputerFolderImpl, IShellFolder2_iface);
73 static inline IMyComputerFolderImpl *impl_from_IPersistFolder2(IPersistFolder2 *iface)
75 return CONTAINING_RECORD(iface, IMyComputerFolderImpl, IPersistFolder2_iface);
79 /***********************************************************************
80 * IShellFolder [MyComputer] implementation
83 static const shvheader mycomputer_header[] = {
84 {IDS_SHV_COLUMN1, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 15},
85 {IDS_SHV_COLUMN3, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
86 {IDS_SHV_COLUMN6, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
87 {IDS_SHV_COLUMN7, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
90 #define MYCOMPUTERSHELLVIEWCOLUMNS sizeof(mycomputer_header)/sizeof(shvheader)
92 /**************************************************************************
93 * ISF_MyComputer_Constructor
95 HRESULT WINAPI ISF_MyComputer_Constructor (IUnknown * pUnkOuter, REFIID riid, LPVOID * ppv)
97 IMyComputerFolderImpl *sf;
99 TRACE ("unkOut=%p %s\n", pUnkOuter, shdebugstr_guid (riid));
101 if (!ppv)
102 return E_POINTER;
103 if (pUnkOuter)
104 return CLASS_E_NOAGGREGATION;
106 sf = LocalAlloc (LMEM_ZEROINIT, sizeof (IMyComputerFolderImpl));
107 if (!sf)
108 return E_OUTOFMEMORY;
110 sf->ref = 0;
111 sf->IShellFolder2_iface.lpVtbl = &vt_ShellFolder2;
112 sf->IPersistFolder2_iface.lpVtbl = &vt_PersistFolder2;
113 sf->pidlRoot = _ILCreateMyComputer (); /* my qualified pidl */
115 if (FAILED (IUnknown_QueryInterface (&sf->IShellFolder2_iface, riid, ppv)))
117 IUnknown_Release (&sf->IShellFolder2_iface);
118 return E_NOINTERFACE;
121 TRACE ("--(%p)\n", sf);
122 return S_OK;
125 /**************************************************************************
126 * ISF_MyComputer_fnQueryInterface
128 * NOTES supports not IPersist/IPersistFolder
130 static HRESULT WINAPI ISF_MyComputer_fnQueryInterface (IShellFolder2 *iface,
131 REFIID riid, LPVOID *ppvObj)
133 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
135 TRACE ("(%p)->(%s,%p)\n", This, shdebugstr_guid (riid), ppvObj);
137 *ppvObj = NULL;
139 if (IsEqualIID (riid, &IID_IUnknown) ||
140 IsEqualIID (riid, &IID_IShellFolder) ||
141 IsEqualIID (riid, &IID_IShellFolder2))
143 *ppvObj = This;
145 else if (IsEqualIID (riid, &IID_IPersist) ||
146 IsEqualIID (riid, &IID_IPersistFolder) ||
147 IsEqualIID (riid, &IID_IPersistFolder2))
149 *ppvObj = &This->IPersistFolder2_iface;
152 if (*ppvObj)
154 IUnknown_AddRef ((IUnknown *) (*ppvObj));
155 TRACE ("-- Interface: (%p)->(%p)\n", ppvObj, *ppvObj);
156 return S_OK;
158 TRACE ("-- Interface: E_NOINTERFACE\n");
159 return E_NOINTERFACE;
162 static ULONG WINAPI ISF_MyComputer_fnAddRef (IShellFolder2 * iface)
164 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
165 ULONG refCount = InterlockedIncrement(&This->ref);
167 TRACE ("(%p)->(count=%u)\n", This, refCount - 1);
169 return refCount;
172 static ULONG WINAPI ISF_MyComputer_fnRelease (IShellFolder2 * iface)
174 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
175 ULONG refCount = InterlockedDecrement(&This->ref);
177 TRACE ("(%p)->(count=%u)\n", This, refCount + 1);
179 if (!refCount)
181 TRACE ("-- destroying IShellFolder(%p)\n", This);
182 SHFree (This->pidlRoot);
183 LocalFree (This);
185 return refCount;
188 /**************************************************************************
189 * ISF_MyComputer_fnParseDisplayName
191 static HRESULT WINAPI ISF_MyComputer_fnParseDisplayName (IShellFolder2 *iface,
192 HWND hwndOwner, LPBC pbc, LPOLESTR lpszDisplayName,
193 DWORD * pchEaten, LPITEMIDLIST * ppidl, DWORD * pdwAttributes)
195 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
196 HRESULT hr = E_INVALIDARG;
197 LPCWSTR szNext = NULL;
198 WCHAR szElement[MAX_PATH];
199 LPITEMIDLIST pidlTemp = NULL;
200 CLSID clsid;
202 TRACE("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n", This,
203 hwndOwner, pbc, lpszDisplayName, debugstr_w (lpszDisplayName),
204 pchEaten, ppidl, pdwAttributes);
206 *ppidl = 0;
207 if (pchEaten)
208 *pchEaten = 0; /* strange but like the original */
210 /* handle CLSID paths */
211 if (lpszDisplayName[0] == ':' && lpszDisplayName[1] == ':')
213 szNext = GetNextElementW (lpszDisplayName, szElement, MAX_PATH);
214 TRACE ("-- element: %s\n", debugstr_w (szElement));
215 SHCLSIDFromStringW (szElement + 2, &clsid);
216 pidlTemp = _ILCreateGuid (PT_GUID, &clsid);
218 /* do we have an absolute path name ? */
219 else if (PathGetDriveNumberW (lpszDisplayName) >= 0 &&
220 lpszDisplayName[2] == (WCHAR) '\\')
222 szNext = GetNextElementW (lpszDisplayName, szElement, MAX_PATH);
223 /* make drive letter uppercase to enable PIDL comparison */
224 szElement[0] = toupper(szElement[0]);
225 pidlTemp = _ILCreateDrive (szElement);
228 if (szNext && *szNext)
230 hr = SHELL32_ParseNextElement (iface, hwndOwner, pbc, &pidlTemp,
231 (LPOLESTR) szNext, pchEaten, pdwAttributes);
233 else
235 if (pdwAttributes && *pdwAttributes)
236 SHELL32_GetItemAttributes ((IShellFolder*)&This->IShellFolder2_iface, pidlTemp,
237 pdwAttributes);
238 hr = S_OK;
241 *ppidl = pidlTemp;
243 TRACE ("(%p)->(-- ret=0x%08x)\n", This, hr);
245 return hr;
248 /* retrieve a map of drives that should be displayed */
249 static DWORD get_drive_map(void)
251 static const WCHAR policiesW[] = {'S','o','f','t','w','a','r','e','\\',
252 'M','i','c','r','o','s','o','f','t','\\',
253 'W','i','n','d','o','w','s','\\',
254 'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
255 'P','o','l','i','c','i','e','s','\\',
256 'E','x','p','l','o','r','e','r',0};
257 static const WCHAR nodrivesW[] = {'N','o','D','r','i','v','e','s',0};
258 static DWORD drive_mask, init_done;
260 if (!init_done)
262 DWORD type, size, data, mask = 0;
263 HKEY hkey;
265 if (!RegOpenKeyW( HKEY_LOCAL_MACHINE, policiesW, &hkey ))
267 size = sizeof(data);
268 if (!RegQueryValueExW( hkey, nodrivesW, NULL, &type, (LPBYTE)&data, &size ) && type == REG_DWORD)
269 mask |= data;
270 RegCloseKey( hkey );
272 if (!RegOpenKeyW( HKEY_CURRENT_USER, policiesW, &hkey ))
274 size = sizeof(data);
275 if (!RegQueryValueExW( hkey, nodrivesW, NULL, &type, (LPBYTE)&data, &size ) && type == REG_DWORD)
276 mask |= data;
277 RegCloseKey( hkey );
279 drive_mask = mask;
280 init_done = 1;
283 return GetLogicalDrives() & ~drive_mask;
286 /**************************************************************************
287 * CreateMyCompEnumList()
289 static const WCHAR MyComputer_NameSpaceW[] = { 'S','O','F','T','W','A','R','E',
290 '\\','M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\',
291 'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\','E','x','p','l',
292 'o','r','e','r','\\','M','y','C','o','m','p','u','t','e','r','\\','N','a','m',
293 'e','s','p','a','c','e','\0' };
295 static BOOL CreateMyCompEnumList(IEnumIDListImpl *list, DWORD dwFlags)
297 BOOL ret = TRUE;
299 TRACE("(%p)->(flags=0x%08x)\n", list, dwFlags);
301 /* enumerate the folders */
302 if (dwFlags & SHCONTF_FOLDERS)
304 WCHAR wszDriveName[] = {'A', ':', '\\', '\0'};
305 DWORD dwDrivemap = get_drive_map();
306 HKEY hkey;
307 UINT i;
309 while (ret && wszDriveName[0]<='Z')
311 if(dwDrivemap & 0x00000001L)
312 ret = AddToEnumList(list, _ILCreateDrive(wszDriveName));
313 wszDriveName[0]++;
314 dwDrivemap = dwDrivemap >> 1;
317 TRACE("-- (%p)-> enumerate (mycomputer shell extensions)\n",list);
318 for (i=0; i<2; i++) {
319 if (ret && !RegOpenKeyExW(i == 0 ? HKEY_LOCAL_MACHINE : HKEY_CURRENT_USER,
320 MyComputer_NameSpaceW, 0, KEY_READ, &hkey))
322 WCHAR iid[50];
323 int i=0;
325 while (ret)
327 DWORD size;
328 LONG r;
330 size = sizeof(iid) / sizeof(iid[0]);
331 r = RegEnumKeyExW(hkey, i, iid, &size, 0, NULL, NULL, NULL);
332 if (ERROR_SUCCESS == r)
334 /* FIXME: shell extensions, shouldn't the type be
335 * PT_SHELLEXT? */
336 ret = AddToEnumList(list, _ILCreateGuidFromStrW(iid));
337 i++;
339 else if (ERROR_NO_MORE_ITEMS == r)
340 break;
341 else
342 ret = FALSE;
344 RegCloseKey(hkey);
348 return ret;
351 /**************************************************************************
352 * ISF_MyComputer_fnEnumObjects
354 static HRESULT WINAPI ISF_MyComputer_fnEnumObjects (IShellFolder2 *iface,
355 HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST *ppEnumIDList)
357 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
358 IEnumIDListImpl *list;
360 TRACE("(%p)->(HWND=%p flags=0x%08x pplist=%p)\n", This,
361 hwndOwner, dwFlags, ppEnumIDList);
363 if (!(list = IEnumIDList_Constructor()))
364 return E_OUTOFMEMORY;
365 CreateMyCompEnumList(list, dwFlags);
366 *ppEnumIDList = &list->IEnumIDList_iface;
368 TRACE ("-- (%p)->(new ID List: %p)\n", This, *ppEnumIDList);
370 return S_OK;
373 /**************************************************************************
374 * ISF_MyComputer_fnBindToObject
376 static HRESULT WINAPI ISF_MyComputer_fnBindToObject (IShellFolder2 *iface,
377 LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID *ppvOut)
379 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
381 TRACE("(%p)->(pidl=%p,%p,%s,%p)\n", This,
382 pidl, pbcReserved, shdebugstr_guid (riid), ppvOut);
384 return SHELL32_BindToChild (This->pidlRoot, NULL, pidl, riid, ppvOut);
387 /**************************************************************************
388 * ISF_MyComputer_fnBindToStorage
390 static HRESULT WINAPI ISF_MyComputer_fnBindToStorage (IShellFolder2 * iface,
391 LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID *ppvOut)
393 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
395 FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", This,
396 pidl, pbcReserved, shdebugstr_guid (riid), ppvOut);
398 *ppvOut = NULL;
399 return E_NOTIMPL;
402 /**************************************************************************
403 * ISF_MyComputer_fnCompareIDs
406 static HRESULT WINAPI ISF_MyComputer_fnCompareIDs (IShellFolder2 *iface,
407 LPARAM lParam, LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2)
409 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
410 HRESULT hr;
412 TRACE ("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This, lParam, pidl1, pidl2);
413 hr = SHELL32_CompareIDs ((IShellFolder*)&This->IShellFolder2_iface, lParam, pidl1, pidl2);
414 TRACE ("-- 0x%08x\n", hr);
415 return hr;
418 /**************************************************************************
419 * ISF_MyComputer_fnCreateViewObject
421 static HRESULT WINAPI ISF_MyComputer_fnCreateViewObject (IShellFolder2 *iface,
422 HWND hwndOwner, REFIID riid, LPVOID * ppvOut)
424 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
425 LPSHELLVIEW pShellView;
426 HRESULT hr = E_INVALIDARG;
428 TRACE("(%p)->(hwnd=%p,%s,%p)\n", This,
429 hwndOwner, shdebugstr_guid (riid), ppvOut);
431 if (!ppvOut)
432 return hr;
434 *ppvOut = NULL;
436 if (IsEqualIID (riid, &IID_IDropTarget))
438 WARN ("IDropTarget not implemented\n");
439 hr = E_NOTIMPL;
441 else if (IsEqualIID (riid, &IID_IContextMenu))
443 WARN ("IContextMenu not implemented\n");
444 hr = E_NOTIMPL;
446 else if (IsEqualIID (riid, &IID_IShellView))
448 pShellView = IShellView_Constructor ((IShellFolder *) iface);
449 if (pShellView)
451 hr = IShellView_QueryInterface (pShellView, riid, ppvOut);
452 IShellView_Release (pShellView);
455 TRACE ("-- (%p)->(interface=%p)\n", This, ppvOut);
456 return hr;
459 /**************************************************************************
460 * ISF_MyComputer_fnGetAttributesOf
462 static HRESULT WINAPI ISF_MyComputer_fnGetAttributesOf (IShellFolder2 * iface,
463 UINT cidl, LPCITEMIDLIST * apidl, DWORD * rgfInOut)
465 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
466 HRESULT hr = S_OK;
468 TRACE ("(%p)->(cidl=%d apidl=%p mask=%p (0x%08x))\n",
469 This, cidl, apidl, rgfInOut, rgfInOut ? *rgfInOut : 0);
471 if (!rgfInOut)
472 return E_INVALIDARG;
473 if (cidl && !apidl)
474 return E_INVALIDARG;
476 if (*rgfInOut == 0)
477 *rgfInOut = ~0;
479 if(cidl == 0){
480 IShellFolder *psfParent = NULL;
481 LPCITEMIDLIST rpidl = NULL;
483 hr = SHBindToParent(This->pidlRoot, &IID_IShellFolder, (LPVOID*)&psfParent, &rpidl);
484 if(SUCCEEDED(hr)) {
485 SHELL32_GetItemAttributes (psfParent, rpidl, rgfInOut);
486 IShellFolder_Release(psfParent);
488 } else {
489 while (cidl > 0 && *apidl) {
490 pdump (*apidl);
491 SHELL32_GetItemAttributes ((IShellFolder*)&This->IShellFolder2_iface, *apidl, rgfInOut);
492 apidl++;
493 cidl--;
496 /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
497 *rgfInOut &= ~SFGAO_VALIDATE;
499 TRACE ("-- result=0x%08x\n", *rgfInOut);
500 return hr;
503 /**************************************************************************
504 * ISF_MyComputer_fnGetUIObjectOf
506 * PARAMETERS
507 * hwndOwner [in] Parent window for any output
508 * cidl [in] array size
509 * apidl [in] simple pidl array
510 * riid [in] Requested Interface
511 * prgfInOut [ ] reserved
512 * ppvObject [out] Resulting Interface
515 static HRESULT WINAPI ISF_MyComputer_fnGetUIObjectOf (IShellFolder2 * iface,
516 HWND hwndOwner, UINT cidl, LPCITEMIDLIST * apidl, REFIID riid,
517 UINT * prgfInOut, LPVOID * ppvOut)
519 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
521 LPITEMIDLIST pidl;
522 IUnknown *pObj = NULL;
523 HRESULT hr = E_INVALIDARG;
525 TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n", This,
526 hwndOwner, cidl, apidl, shdebugstr_guid (riid), prgfInOut, ppvOut);
528 if (!ppvOut)
529 return hr;
531 *ppvOut = NULL;
533 if (IsEqualIID (riid, &IID_IContextMenu) && (cidl >= 1))
535 pObj = (LPUNKNOWN) ItemMenu_Constructor ((IShellFolder *) iface,
536 This->pidlRoot, apidl, cidl);
537 hr = S_OK;
539 else if (IsEqualIID (riid, &IID_IDataObject) && (cidl >= 1))
541 pObj = (LPUNKNOWN) IDataObject_Constructor (hwndOwner,
542 This->pidlRoot, apidl, cidl);
543 hr = S_OK;
545 else if (IsEqualIID (riid, &IID_IExtractIconA) && (cidl == 1))
547 pidl = ILCombine (This->pidlRoot, apidl[0]);
548 pObj = (LPUNKNOWN) IExtractIconA_Constructor (pidl);
549 SHFree (pidl);
550 hr = S_OK;
552 else if (IsEqualIID (riid, &IID_IExtractIconW) && (cidl == 1))
554 pidl = ILCombine (This->pidlRoot, apidl[0]);
555 pObj = (LPUNKNOWN) IExtractIconW_Constructor (pidl);
556 SHFree (pidl);
557 hr = S_OK;
559 else if (IsEqualIID (riid, &IID_IDropTarget) && (cidl >= 1))
561 hr = IShellFolder_QueryInterface (iface, &IID_IDropTarget,
562 (LPVOID *) &pObj);
564 else if ((IsEqualIID(riid,&IID_IShellLinkW) ||
565 IsEqualIID(riid,&IID_IShellLinkA)) && (cidl == 1))
567 pidl = ILCombine (This->pidlRoot, apidl[0]);
568 hr = IShellLink_ConstructFromFile(NULL, riid, pidl, (LPVOID*) &pObj);
569 SHFree (pidl);
571 else
572 hr = E_NOINTERFACE;
574 if (SUCCEEDED(hr) && !pObj)
575 hr = E_OUTOFMEMORY;
577 *ppvOut = pObj;
578 TRACE ("(%p)->hr=0x%08x\n", This, hr);
579 return hr;
582 /**************************************************************************
583 * ISF_MyComputer_fnGetDisplayNameOf
585 static HRESULT WINAPI ISF_MyComputer_fnGetDisplayNameOf (IShellFolder2 *iface,
586 LPCITEMIDLIST pidl, DWORD dwFlags, LPSTRRET strRet)
588 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
590 LPWSTR pszPath;
591 HRESULT hr = S_OK;
593 TRACE ("(%p)->(pidl=%p,0x%08x,%p)\n", This, pidl, dwFlags, strRet);
594 pdump (pidl);
596 if (!strRet)
597 return E_INVALIDARG;
599 pszPath = CoTaskMemAlloc((MAX_PATH +1) * sizeof(WCHAR));
600 if (!pszPath)
601 return E_OUTOFMEMORY;
603 pszPath[0] = 0;
605 if (!pidl->mkid.cb)
607 /* parsing name like ::{...} */
608 pszPath[0] = ':';
609 pszPath[1] = ':';
610 SHELL32_GUIDToStringW(&CLSID_MyComputer, &pszPath[2]);
612 else if (_ILIsPidlSimple(pidl))
614 /* take names of special folders only if its only this folder */
615 if (_ILIsSpecialFolder(pidl))
617 GUID const *clsid;
619 clsid = _ILGetGUIDPointer (pidl);
620 if (clsid)
622 if (GET_SHGDN_FOR (dwFlags) & SHGDN_FORPARSING)
624 static const WCHAR clsidW[] =
625 { 'C','L','S','I','D','\\',0 };
626 static const WCHAR shellfolderW[] =
627 { '\\','s','h','e','l','l','f','o','l','d','e','r',0 };
628 static const WCHAR wantsForParsingW[] =
629 { 'W','a','n','t','s','F','o','r','P','a','r','s','i','n',
630 'g',0 };
631 int bWantsForParsing = FALSE;
632 WCHAR szRegPath[100];
633 LONG r;
636 * We can only get a filesystem path from a shellfolder
637 * if the value WantsFORPARSING exists in
638 * CLSID\\{...}\\shellfolder
639 * exception: the MyComputer folder has this keys not
640 * but like any filesystem backed
641 * folder it needs these behaviour
643 * Get the "WantsFORPARSING" flag from the registry
646 lstrcpyW (szRegPath, clsidW);
647 SHELL32_GUIDToStringW (clsid, &szRegPath[6]);
648 lstrcatW (szRegPath, shellfolderW);
649 r = SHGetValueW (HKEY_CLASSES_ROOT, szRegPath,
650 wantsForParsingW, NULL, NULL, NULL);
651 if (r == ERROR_SUCCESS)
652 bWantsForParsing = TRUE;
654 if ((GET_SHGDN_RELATION (dwFlags) == SHGDN_NORMAL) &&
655 bWantsForParsing)
658 * We need the filesystem path to the destination folder
659 * Only the folder itself can know it
661 hr = SHELL32_GetDisplayNameOfChild (iface, pidl,
662 dwFlags, pszPath, MAX_PATH);
664 else
666 LPWSTR p = pszPath;
668 /* parsing name like ::{...} */
669 p[0] = ':';
670 p[1] = ':';
671 p += 2;
672 p += SHELL32_GUIDToStringW(&CLSID_MyComputer, p);
674 /* \:: */
675 p[0] = '\\';
676 p[1] = ':';
677 p[2] = ':';
678 p += 3;
679 SHELL32_GUIDToStringW(clsid, p);
682 else
684 /* user friendly name */
685 HCR_GetClassNameW (clsid, pszPath, MAX_PATH);
688 else
690 /* append my own path */
691 _ILSimpleGetTextW (pidl, pszPath, MAX_PATH);
694 else if (_ILIsDrive(pidl))
696 _ILSimpleGetTextW (pidl, pszPath, MAX_PATH); /* append my own path */
698 /* long view "lw_name (C:)" */
699 if (!(dwFlags & SHGDN_FORPARSING))
701 DWORD dwVolumeSerialNumber, dwMaximumComponetLength, dwFileSystemFlags;
702 WCHAR wszDrive[18] = {0};
703 static const WCHAR wszOpenBracket[] = {' ','(',0};
704 static const WCHAR wszCloseBracket[] = {')',0};
706 GetVolumeInformationW (pszPath, wszDrive,
707 sizeof(wszDrive)/sizeof(wszDrive[0]) - 6,
708 &dwVolumeSerialNumber,
709 &dwMaximumComponetLength, &dwFileSystemFlags, NULL, 0);
710 strcatW (wszDrive, wszOpenBracket);
711 lstrcpynW (wszDrive + strlenW(wszDrive), pszPath, 3);
712 strcatW (wszDrive, wszCloseBracket);
713 strcpyW (pszPath, wszDrive);
716 else
718 /* Neither a shell namespace extension nor a drive letter. */
719 ERR("Wrong pidl type\n");
720 CoTaskMemFree(pszPath);
721 return E_INVALIDARG;
724 else
726 /* Complex pidl. Let the child folder do the work */
727 hr = SHELL32_GetDisplayNameOfChild(iface, pidl, dwFlags, pszPath, MAX_PATH);
730 if (SUCCEEDED (hr))
732 /* Win9x always returns ANSI strings, NT always returns Unicode strings */
733 if (GetVersion() & 0x80000000)
735 strRet->uType = STRRET_CSTR;
736 if (!WideCharToMultiByte(CP_ACP, 0, pszPath, -1, strRet->u.cStr, MAX_PATH,
737 NULL, NULL))
738 strRet->u.cStr[0] = '\0';
739 CoTaskMemFree(pszPath);
741 else
743 strRet->uType = STRRET_WSTR;
744 strRet->u.pOleStr = pszPath;
747 else
748 CoTaskMemFree(pszPath);
750 TRACE ("-- (%p)->(%s)\n", This, strRet->uType == STRRET_CSTR ? strRet->u.cStr : debugstr_w(strRet->u.pOleStr));
751 return hr;
754 /**************************************************************************
755 * ISF_MyComputer_fnSetNameOf
756 * Changes the name of a file object or subfolder, possibly changing its item
757 * identifier in the process.
759 * PARAMETERS
760 * hwndOwner [in] Owner window for output
761 * pidl [in] simple pidl of item to change
762 * lpszName [in] the items new display name
763 * dwFlags [in] SHGNO formatting flags
764 * ppidlOut [out] simple pidl returned
766 static HRESULT WINAPI ISF_MyComputer_fnSetNameOf (
767 IShellFolder2 * iface, HWND hwndOwner, LPCITEMIDLIST pidl,
768 LPCOLESTR lpName, DWORD dwFlags, LPITEMIDLIST * pPidlOut)
770 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
771 FIXME ("(%p)->(%p,pidl=%p,%s,%u,%p)\n", This,
772 hwndOwner, pidl, debugstr_w (lpName), dwFlags, pPidlOut);
773 return E_FAIL;
776 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultSearchGUID (
777 IShellFolder2 * iface, GUID * pguid)
779 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
780 FIXME ("(%p)\n", This);
781 return E_NOTIMPL;
783 static HRESULT WINAPI ISF_MyComputer_fnEnumSearches (
784 IShellFolder2 * iface, IEnumExtraSearch ** ppenum)
786 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
787 FIXME ("(%p)\n", This);
788 return E_NOTIMPL;
790 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumn (
791 IShellFolder2 *iface, DWORD dwRes, ULONG *pSort, ULONG *pDisplay)
793 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
795 TRACE ("(%p)\n", This);
797 if (pSort)
798 *pSort = 0;
799 if (pDisplay)
800 *pDisplay = 0;
801 return S_OK;
803 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumnState (
804 IShellFolder2 * iface, UINT iColumn, DWORD * pcsFlags)
806 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
808 TRACE ("(%p)->(%d %p)\n", This, iColumn, pcsFlags);
810 if (!pcsFlags || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS)
811 return E_INVALIDARG;
813 *pcsFlags = mycomputer_header[iColumn].pcsFlags;
815 return S_OK;
818 static HRESULT WINAPI ISF_MyComputer_fnGetDetailsEx (IShellFolder2 * iface,
819 LPCITEMIDLIST pidl, const SHCOLUMNID * pscid, VARIANT * pv)
821 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
822 FIXME ("(%p)\n", This);
823 return E_NOTIMPL;
826 /* FIXME: drive size >4GB is rolling over */
827 static HRESULT WINAPI ISF_MyComputer_fnGetDetailsOf (IShellFolder2 *iface,
828 LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS *psd)
830 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
831 char szPath[MAX_PATH];
832 ULARGE_INTEGER ulBytes;
833 HRESULT hr = S_OK;
835 TRACE ("(%p)->(%p %i %p)\n", This, pidl, iColumn, psd);
837 if (!psd || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS)
838 return E_INVALIDARG;
840 if (!pidl)
841 return SHELL32_GetColumnDetails(mycomputer_header, iColumn, psd);
843 psd->str.u.cStr[0] = 0;
844 psd->str.uType = STRRET_CSTR;
846 switch (iColumn)
848 case 0: /* name */
849 hr = IShellFolder_GetDisplayNameOf (iface, pidl,
850 SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str);
851 break;
852 case 1: /* type */
853 _ILGetFileType (pidl, psd->str.u.cStr, MAX_PATH);
854 break;
855 case 2: /* total size */
856 if (_ILIsDrive (pidl))
858 _ILSimpleGetText (pidl, szPath, MAX_PATH);
859 GetDiskFreeSpaceExA (szPath, NULL, &ulBytes, NULL);
860 StrFormatByteSizeA (ulBytes.u.LowPart, psd->str.u.cStr, MAX_PATH);
862 break;
863 case 3: /* free size */
864 if (_ILIsDrive (pidl))
866 _ILSimpleGetText (pidl, szPath, MAX_PATH);
867 GetDiskFreeSpaceExA (szPath, &ulBytes, NULL, NULL);
868 StrFormatByteSizeA (ulBytes.u.LowPart, psd->str.u.cStr, MAX_PATH);
870 break;
873 return hr;
876 static HRESULT WINAPI ISF_MyComputer_fnMapColumnToSCID (
877 IShellFolder2 * iface, UINT column, SHCOLUMNID * pscid)
879 IMyComputerFolderImpl *This = impl_from_IShellFolder2(iface);
880 FIXME ("(%p)\n", This);
881 return E_NOTIMPL;
884 static const IShellFolder2Vtbl vt_ShellFolder2 =
886 ISF_MyComputer_fnQueryInterface,
887 ISF_MyComputer_fnAddRef,
888 ISF_MyComputer_fnRelease,
889 ISF_MyComputer_fnParseDisplayName,
890 ISF_MyComputer_fnEnumObjects,
891 ISF_MyComputer_fnBindToObject,
892 ISF_MyComputer_fnBindToStorage,
893 ISF_MyComputer_fnCompareIDs,
894 ISF_MyComputer_fnCreateViewObject,
895 ISF_MyComputer_fnGetAttributesOf,
896 ISF_MyComputer_fnGetUIObjectOf,
897 ISF_MyComputer_fnGetDisplayNameOf,
898 ISF_MyComputer_fnSetNameOf,
899 /* ShellFolder2 */
900 ISF_MyComputer_fnGetDefaultSearchGUID,
901 ISF_MyComputer_fnEnumSearches,
902 ISF_MyComputer_fnGetDefaultColumn,
903 ISF_MyComputer_fnGetDefaultColumnState,
904 ISF_MyComputer_fnGetDetailsEx,
905 ISF_MyComputer_fnGetDetailsOf,
906 ISF_MyComputer_fnMapColumnToSCID
909 /************************************************************************
910 * IMCFldr_PersistFolder2_QueryInterface
912 static HRESULT WINAPI IMCFldr_PersistFolder2_QueryInterface (
913 IPersistFolder2 * iface, REFIID iid, LPVOID * ppvObj)
915 IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
916 TRACE ("(%p)\n", This);
917 return IUnknown_QueryInterface (&This->IShellFolder2_iface, iid, ppvObj);
920 /************************************************************************
921 * IMCFldr_PersistFolder2_AddRef
923 static ULONG WINAPI IMCFldr_PersistFolder2_AddRef (IPersistFolder2 * iface)
925 IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
926 TRACE ("(%p)->(count=%u)\n", This, This->ref);
927 return IUnknown_AddRef (&This->IShellFolder2_iface);
930 /************************************************************************
931 * ISFPersistFolder_Release
933 static ULONG WINAPI IMCFldr_PersistFolder2_Release (IPersistFolder2 * iface)
935 IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
936 TRACE ("(%p)->(count=%u)\n", This, This->ref);
937 return IUnknown_Release (&This->IShellFolder2_iface);
940 /************************************************************************
941 * IMCFldr_PersistFolder2_GetClassID
943 static HRESULT WINAPI IMCFldr_PersistFolder2_GetClassID (
944 IPersistFolder2 * iface, CLSID * lpClassId)
946 IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
948 TRACE ("(%p)\n", This);
950 if (!lpClassId)
951 return E_POINTER;
952 *lpClassId = CLSID_MyComputer;
954 return S_OK;
957 /************************************************************************
958 * IMCFldr_PersistFolder2_Initialize
960 * NOTES: it makes no sense to change the pidl
962 static HRESULT WINAPI IMCFldr_PersistFolder2_Initialize (
963 IPersistFolder2 * iface, LPCITEMIDLIST pidl)
965 IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
966 TRACE ("(%p)->(%p)\n", This, pidl);
967 return E_NOTIMPL;
970 /**************************************************************************
971 * IPersistFolder2_fnGetCurFolder
973 static HRESULT WINAPI IMCFldr_PersistFolder2_GetCurFolder (
974 IPersistFolder2 * iface, LPITEMIDLIST * pidl)
976 IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
978 TRACE ("(%p)->(%p)\n", This, pidl);
980 if (!pidl)
981 return E_POINTER;
982 *pidl = ILClone (This->pidlRoot);
983 return S_OK;
986 static const IPersistFolder2Vtbl vt_PersistFolder2 =
988 IMCFldr_PersistFolder2_QueryInterface,
989 IMCFldr_PersistFolder2_AddRef,
990 IMCFldr_PersistFolder2_Release,
991 IMCFldr_PersistFolder2_GetClassID,
992 IMCFldr_PersistFolder2_Initialize,
993 IMCFldr_PersistFolder2_GetCurFolder