dlls/shell32/shfldr_mycomp.c

   1 /*
   2  *    Virtual Workplace folder
   3  *
   4  *    Copyright 1997            Marcus Meissner
   5  *    Copyright 1998, 1999, 2002    Juergen Schmied
   6  *
   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.
  11  *
  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.
  16  *
  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
  20  */
  21
  22 #include "config.h"
  23 #include "wine/port.h"
  24
  25 #include <stdlib.h>
  26 #include <string.h>
  27 #include <stdarg.h>
  28 #include <stdio.h>
  29
  30 #define COBJMACROS
  31 #define NONAMELESSUNION
  32 #define NONAMELESSSTRUCT
  33
  34 #include "winerror.h"
  35 #include "windef.h"
  36 #include "winbase.h"
  37 #include "winreg.h"
  38
  39 #include "wingdi.h"
  40 #include "pidl.h"
  41 #include "shlguid.h"
  42 #include "enumidlist.h"
  43 #include "undocshell.h"
  44 #include "shell32_main.h"
  45 #include "shresdef.h"
  46 #include "shlwapi.h"
  47 #include "wine/debug.h"
  48 #include "debughlp.h"
  49 #include "shfldr.h"
  50
  51 WINE_DEFAULT_DEBUG_CHANNEL (shell);
  52
  53 /***********************************************************************
  54 *   IShellFolder implementation
  55 */
  56
  57 typedef struct {
  58     const IShellFolder2Vtbl   *lpVtbl;
  59     LONG                ref;
  60     const IPersistFolder2Vtbl *lpVtblPersistFolder2;
  61
  62     /* both paths are parsible from the desktop */
  63     LPITEMIDLIST pidlRoot;    /* absolute pidl */
  64 } IGenericSFImpl;
  65
  66 static const IShellFolder2Vtbl vt_ShellFolder2;
  67 static const IPersistFolder2Vtbl vt_PersistFolder2;
  68
  69 static inline IGenericSFImpl *impl_from_IPersistFolder2( IPersistFolder2 *iface )
  70 {
  71     return (IGenericSFImpl *)((char*)iface - FIELD_OFFSET(IGenericSFImpl, lpVtblPersistFolder2));
  72 }
  73
  74
  75 /*
  76   converts This to an interface pointer
  77 */
  78 #define _IUnknown_(This)    (IUnknown*)&(This->lpVtbl)
  79 #define _IShellFolder_(This)    (IShellFolder*)&(This->lpVtbl)
  80 #define _IShellFolder2_(This)    (IShellFolder2*)&(This->lpVtbl)
  81
  82 #define _IPersist_(This)    (IPersist*)&(This->lpVtblPersistFolder2)
  83 #define _IPersistFolder_(This)    (IPersistFolder*)&(This->lpVtblPersistFolder2)
  84 #define _IPersistFolder2_(This)    (IPersistFolder2*)&(This->lpVtblPersistFolder2)
  85
  86 /***********************************************************************
  87 *   IShellFolder [MyComputer] implementation
  88 */
  89
  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},
  95 };
  96
  97 #define MYCOMPUTERSHELLVIEWCOLUMNS 4
  98
  99 /**************************************************************************
 100 *    ISF_MyComputer_Constructor
 101 */
 102 HRESULT WINAPI ISF_MyComputer_Constructor (IUnknown * pUnkOuter, REFIID riid, LPVOID * ppv)
 103 {
 104     IGenericSFImpl *sf;
 105
 106     TRACE ("unkOut=%p %s\n", pUnkOuter, shdebugstr_guid (riid));
 107
 108     if (!ppv)
 109         return E_POINTER;
 110     if (pUnkOuter)
 111         return CLASS_E_NOAGGREGATION;
 112
 113     sf = LocalAlloc (LMEM_ZEROINIT, sizeof (IGenericSFImpl));
 114     if (!sf)
 115         return E_OUTOFMEMORY;
 116
 117     sf->ref = 0;
 118     sf->lpVtbl = &vt_ShellFolder2;
 119     sf->lpVtblPersistFolder2 = &vt_PersistFolder2;
 120     sf->pidlRoot = _ILCreateMyComputer ();    /* my qualified pidl */
 121
 122     if (!SUCCEEDED (IUnknown_QueryInterface (_IUnknown_ (sf), riid, ppv)))
 123     {
 124         IUnknown_Release (_IUnknown_ (sf));
 125         return E_NOINTERFACE;
 126     }
 127
 128     TRACE ("--(%p)\n", sf);
 129     return S_OK;
 130 }
 131
 132 /**************************************************************************
 133  *    ISF_MyComputer_fnQueryInterface
 134  *
 135  * NOTES supports not IPersist/IPersistFolder
 136  */
 137 static HRESULT WINAPI ISF_MyComputer_fnQueryInterface (IShellFolder2 *iface,
 138                REFIID riid, LPVOID *ppvObj)
 139 {
 140     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 141
 142     TRACE ("(%p)->(%s,%p)\n", This, shdebugstr_guid (riid), ppvObj);
 143
 144     *ppvObj = NULL;
 145
 146     if (IsEqualIID (riid, &IID_IUnknown) ||
 147         IsEqualIID (riid, &IID_IShellFolder) ||
 148         IsEqualIID (riid, &IID_IShellFolder2))
 149     {
 150         *ppvObj = This;
 151     }
 152     else if (IsEqualIID (riid, &IID_IPersist) ||
 153              IsEqualIID (riid, &IID_IPersistFolder) ||
 154              IsEqualIID (riid, &IID_IPersistFolder2))
 155     {
 156         *ppvObj = _IPersistFolder2_ (This);
 157     }
 158
 159     if (*ppvObj)
 160     {
 161         IUnknown_AddRef ((IUnknown *) (*ppvObj));
 162         TRACE ("-- Interface: (%p)->(%p)\n", ppvObj, *ppvObj);
 163         return S_OK;
 164     }
 165     TRACE ("-- Interface: E_NOINTERFACE\n");
 166     return E_NOINTERFACE;
 167 }
 168
 169 static ULONG WINAPI ISF_MyComputer_fnAddRef (IShellFolder2 * iface)
 170 {
 171     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 172     ULONG refCount = InterlockedIncrement(&This->ref);
 173
 174     TRACE ("(%p)->(count=%u)\n", This, refCount - 1);
 175
 176     return refCount;
 177 }
 178
 179 static ULONG WINAPI ISF_MyComputer_fnRelease (IShellFolder2 * iface)
 180 {
 181     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 182     ULONG refCount = InterlockedDecrement(&This->ref);
 183
 184     TRACE ("(%p)->(count=%u)\n", This, refCount + 1);
 185
 186     if (!refCount)
 187     {
 188         TRACE ("-- destroying IShellFolder(%p)\n", This);
 189         SHFree (This->pidlRoot);
 190         LocalFree ((HLOCAL) This);
 191     }
 192     return refCount;
 193 }
 194
 195 /**************************************************************************
 196 *    ISF_MyComputer_fnParseDisplayName
 197 */
 198 static HRESULT WINAPI ISF_MyComputer_fnParseDisplayName (IShellFolder2 *iface,
 199                HWND hwndOwner, LPBC pbc, LPOLESTR lpszDisplayName,
 200                DWORD * pchEaten, LPITEMIDLIST * ppidl, DWORD * pdwAttributes)
 201 {
 202     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 203     HRESULT hr = E_INVALIDARG;
 204     LPCWSTR szNext = NULL;
 205     WCHAR szElement[MAX_PATH];
 206     LPITEMIDLIST pidlTemp = NULL;
 207     CLSID clsid;
 208
 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);
 212
 213     *ppidl = 0;
 214     if (pchEaten)
 215         *pchEaten = 0;        /* strange but like the original */
 216
 217     /* handle CLSID paths */
 218     if (lpszDisplayName[0] == ':' && lpszDisplayName[1] == ':')
 219     {
 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);
 224     }
 225     /* do we have an absolute path name ? */
 226     else if (PathGetDriveNumberW (lpszDisplayName) >= 0 &&
 227               lpszDisplayName[2] == (WCHAR) '\\')
 228     {
 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);
 233     }
 234
 235     if (szNext && *szNext)
 236     {
 237         hr = SHELL32_ParseNextElement (iface, hwndOwner, pbc, &pidlTemp,
 238                               (LPOLESTR) szNext, pchEaten, pdwAttributes);
 239     }
 240     else
 241     {
 242         if (pdwAttributes && *pdwAttributes)
 243             SHELL32_GetItemAttributes (_IShellFolder_ (This),
 244                                        pidlTemp, pdwAttributes);
 245         hr = S_OK;
 246     }
 247
 248     *ppidl = pidlTemp;
 249
 250     TRACE ("(%p)->(-- ret=0x%08x)\n", This, hr);
 251
 252     return hr;
 253 }
 254
 255 /**************************************************************************
 256  *  CreateMyCompEnumList()
 257  */
 258 static const WCHAR MyComputer_NameSpaceW[] = { 'S','O','F','T','W','A','R','E',
 259  '\\','M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\',
 260  'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\','E','x','p','l',
 261  'o','r','e','r','\\','M','y','C','o','m','p','u','t','e','r','\\','N','a','m',
 262  'e','s','p','a','c','e','\0' };
 263
 264 static BOOL CreateMyCompEnumList(IEnumIDList *list, DWORD dwFlags)
 265 {
 266     BOOL ret = TRUE;
 267
 268     TRACE("(%p)->(flags=0x%08x)\n", list, dwFlags);
 269
 270     /* enumerate the folders */
 271     if (dwFlags & SHCONTF_FOLDERS)
 272     {
 273         WCHAR wszDriveName[] = {'A', ':', '\\', '\0'};
 274         DWORD dwDrivemap = GetLogicalDrives();
 275         HKEY hkey;
 276         UINT i;
 277
 278         while (ret && wszDriveName[0]<='Z')
 279         {
 280             if(dwDrivemap & 0x00000001L)
 281                 ret = AddToEnumList(list, _ILCreateDrive(wszDriveName));
 282             wszDriveName[0]++;
 283             dwDrivemap = dwDrivemap >> 1;
 284         }
 285
 286         TRACE("-- (%p)-> enumerate (mycomputer shell extensions)\n",list);
 287         for (i=0; i<2; i++) {
 288             if (ret && !RegOpenKeyExW(i == 0 ? HKEY_LOCAL_MACHINE : HKEY_CURRENT_USER,
 289                                       MyComputer_NameSpaceW, 0, KEY_READ, &hkey))
 290             {
 291                 WCHAR iid[50];
 292                 int i=0;
 293
 294                 while (ret)
 295                 {
 296                     DWORD size;
 297                     LONG r;
 298
 299                     size = sizeof(iid) / sizeof(iid[0]);
 300                     r = RegEnumKeyExW(hkey, i, iid, &size, 0, NULL, NULL, NULL);
 301                     if (ERROR_SUCCESS == r)
 302                     {
 303                         /* FIXME: shell extensions, shouldn't the type be
 304                          * PT_SHELLEXT? */
 305                         ret = AddToEnumList(list, _ILCreateGuidFromStrW(iid));
 306                         i++;
 307                     }
 308                     else if (ERROR_NO_MORE_ITEMS == r)
 309                         break;
 310                     else
 311                         ret = FALSE;
 312                 }
 313                 RegCloseKey(hkey);
 314             }
 315         }
 316     }
 317     return ret;
 318 }
 319
 320 /**************************************************************************
 321 *        ISF_MyComputer_fnEnumObjects
 322 */
 323 static HRESULT WINAPI ISF_MyComputer_fnEnumObjects (IShellFolder2 *iface,
 324                HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST *ppEnumIDList)
 325 {
 326     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 327
 328     TRACE("(%p)->(HWND=%p flags=0x%08x pplist=%p)\n", This,
 329           hwndOwner, dwFlags, ppEnumIDList);
 330
 331     *ppEnumIDList = IEnumIDList_Constructor();
 332     if (*ppEnumIDList)
 333         CreateMyCompEnumList(*ppEnumIDList, dwFlags);
 334
 335     TRACE ("-- (%p)->(new ID List: %p)\n", This, *ppEnumIDList);
 336
 337     return (*ppEnumIDList) ? S_OK : E_OUTOFMEMORY;
 338 }
 339
 340 /**************************************************************************
 341 *        ISF_MyComputer_fnBindToObject
 342 */
 343 static HRESULT WINAPI ISF_MyComputer_fnBindToObject (IShellFolder2 *iface,
 344                LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID *ppvOut)
 345 {
 346     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 347
 348     TRACE("(%p)->(pidl=%p,%p,%s,%p)\n", This,
 349           pidl, pbcReserved, shdebugstr_guid (riid), ppvOut);
 350
 351     return SHELL32_BindToChild (This->pidlRoot, NULL, pidl, riid, ppvOut);
 352 }
 353
 354 /**************************************************************************
 355 *    ISF_MyComputer_fnBindToStorage
 356 */
 357 static HRESULT WINAPI ISF_MyComputer_fnBindToStorage (IShellFolder2 * iface,
 358                LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID *ppvOut)
 359 {
 360     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 361
 362     FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", This,
 363           pidl, pbcReserved, shdebugstr_guid (riid), ppvOut);
 364
 365     *ppvOut = NULL;
 366     return E_NOTIMPL;
 367 }
 368
 369 /**************************************************************************
 370 *     ISF_MyComputer_fnCompareIDs
 371 */
 372
 373 static HRESULT WINAPI ISF_MyComputer_fnCompareIDs (IShellFolder2 *iface,
 374                LPARAM lParam, LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2)
 375 {
 376     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 377     int nReturn;
 378
 379     TRACE ("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This, lParam, pidl1, pidl2);
 380     nReturn = SHELL32_CompareIDs (_IShellFolder_ (This), lParam, pidl1, pidl2);
 381     TRACE ("-- %i\n", nReturn);
 382     return nReturn;
 383 }
 384
 385 /**************************************************************************
 386 *    ISF_MyComputer_fnCreateViewObject
 387 */
 388 static HRESULT WINAPI ISF_MyComputer_fnCreateViewObject (IShellFolder2 *iface,
 389                HWND hwndOwner, REFIID riid, LPVOID * ppvOut)
 390 {
 391     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 392     LPSHELLVIEW pShellView;
 393     HRESULT hr = E_INVALIDARG;
 394
 395     TRACE("(%p)->(hwnd=%p,%s,%p)\n", This,
 396           hwndOwner, shdebugstr_guid (riid), ppvOut);
 397
 398     if (!ppvOut)
 399         return hr;
 400
 401     *ppvOut = NULL;
 402
 403     if (IsEqualIID (riid, &IID_IDropTarget))
 404     {
 405         WARN ("IDropTarget not implemented\n");
 406         hr = E_NOTIMPL;
 407     }
 408     else if (IsEqualIID (riid, &IID_IContextMenu))
 409     {
 410         WARN ("IContextMenu not implemented\n");
 411         hr = E_NOTIMPL;
 412     }
 413     else if (IsEqualIID (riid, &IID_IShellView))
 414     {
 415         pShellView = IShellView_Constructor ((IShellFolder *) iface);
 416         if (pShellView)
 417         {
 418             hr = IShellView_QueryInterface (pShellView, riid, ppvOut);
 419             IShellView_Release (pShellView);
 420         }
 421     }
 422     TRACE ("-- (%p)->(interface=%p)\n", This, ppvOut);
 423     return hr;
 424 }
 425
 426 /**************************************************************************
 427 *  ISF_MyComputer_fnGetAttributesOf
 428 */
 429 static HRESULT WINAPI ISF_MyComputer_fnGetAttributesOf (IShellFolder2 * iface,
 430                 UINT cidl, LPCITEMIDLIST * apidl, DWORD * rgfInOut)
 431 {
 432     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 433     HRESULT hr = S_OK;
 434
 435     TRACE ("(%p)->(cidl=%d apidl=%p mask=%p (0x%08x))\n",
 436            This, cidl, apidl, rgfInOut, rgfInOut ? *rgfInOut : 0);
 437
 438     if (!rgfInOut)
 439         return E_INVALIDARG;
 440     if (cidl && !apidl)
 441         return E_INVALIDARG;
 442
 443     if (*rgfInOut == 0)
 444         *rgfInOut = ~0;
 445
 446     if(cidl == 0){
 447         IShellFolder *psfParent = NULL;
 448         LPCITEMIDLIST rpidl = NULL;
 449
 450         hr = SHBindToParent(This->pidlRoot, &IID_IShellFolder, (LPVOID*)&psfParent, (LPCITEMIDLIST*)&rpidl);
 451         if(SUCCEEDED(hr)) {
 452             SHELL32_GetItemAttributes (psfParent, rpidl, rgfInOut);
 453             IShellFolder_Release(psfParent);
 454         }
 455     } else {
 456         while (cidl > 0 && *apidl) {
 457             pdump (*apidl);
 458             SHELL32_GetItemAttributes (_IShellFolder_ (This), *apidl, rgfInOut);
 459             apidl++;
 460             cidl--;
 461         }
 462     }
 463     /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
 464     *rgfInOut &= ~SFGAO_VALIDATE;
 465
 466     TRACE ("-- result=0x%08x\n", *rgfInOut);
 467     return hr;
 468 }
 469
 470 /**************************************************************************
 471 *    ISF_MyComputer_fnGetUIObjectOf
 472 *
 473 * PARAMETERS
 474 *  hwndOwner [in]  Parent window for any output
 475 *  cidl      [in]  array size
 476 *  apidl     [in]  simple pidl array
 477 *  riid      [in]  Requested Interface
 478 *  prgfInOut [   ] reserved
 479 *  ppvObject [out] Resulting Interface
 480 *
 481 */
 482 static HRESULT WINAPI ISF_MyComputer_fnGetUIObjectOf (IShellFolder2 * iface,
 483                 HWND hwndOwner, UINT cidl, LPCITEMIDLIST * apidl, REFIID riid,
 484                 UINT * prgfInOut, LPVOID * ppvOut)
 485 {
 486     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 487
 488     LPITEMIDLIST pidl;
 489     IUnknown *pObj = NULL;
 490     HRESULT hr = E_INVALIDARG;
 491
 492     TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n", This,
 493           hwndOwner, cidl, apidl, shdebugstr_guid (riid), prgfInOut, ppvOut);
 494
 495     if (!ppvOut)
 496         return hr;
 497
 498     *ppvOut = NULL;
 499
 500     if (IsEqualIID (riid, &IID_IContextMenu) && (cidl >= 1))
 501     {
 502         pObj = (LPUNKNOWN) ISvItemCm_Constructor ((IShellFolder *) iface,
 503                                               This->pidlRoot, apidl, cidl);
 504         hr = S_OK;
 505     }
 506     else if (IsEqualIID (riid, &IID_IDataObject) && (cidl >= 1))
 507     {
 508         pObj = (LPUNKNOWN) IDataObject_Constructor (hwndOwner,
 509                                               This->pidlRoot, apidl, cidl);
 510         hr = S_OK;
 511     }
 512     else if (IsEqualIID (riid, &IID_IExtractIconA) && (cidl == 1))
 513     {
 514         pidl = ILCombine (This->pidlRoot, apidl[0]);
 515         pObj = (LPUNKNOWN) IExtractIconA_Constructor (pidl);
 516         SHFree (pidl);
 517         hr = S_OK;
 518     }
 519     else if (IsEqualIID (riid, &IID_IExtractIconW) && (cidl == 1))
 520     {
 521         pidl = ILCombine (This->pidlRoot, apidl[0]);
 522         pObj = (LPUNKNOWN) IExtractIconW_Constructor (pidl);
 523         SHFree (pidl);
 524         hr = S_OK;
 525     }
 526     else if (IsEqualIID (riid, &IID_IDropTarget) && (cidl >= 1))
 527     {
 528         hr = IShellFolder_QueryInterface (iface, &IID_IDropTarget,
 529                                           (LPVOID *) &pObj);
 530     }
 531     else if ((IsEqualIID(riid,&IID_IShellLinkW) ||
 532               IsEqualIID(riid,&IID_IShellLinkA)) && (cidl == 1))
 533     {
 534         pidl = ILCombine (This->pidlRoot, apidl[0]);
 535         hr = IShellLink_ConstructFromFile(NULL, riid, pidl, (LPVOID*) &pObj);
 536         SHFree (pidl);
 537     }
 538     else
 539         hr = E_NOINTERFACE;
 540
 541     if (SUCCEEDED(hr) && !pObj)
 542         hr = E_OUTOFMEMORY;
 543
 544     *ppvOut = pObj;
 545     TRACE ("(%p)->hr=0x%08x\n", This, hr);
 546     return hr;
 547 }
 548
 549 /**************************************************************************
 550 *    ISF_MyComputer_fnGetDisplayNameOf
 551 */
 552 static HRESULT WINAPI ISF_MyComputer_fnGetDisplayNameOf (IShellFolder2 *iface,
 553                LPCITEMIDLIST pidl, DWORD dwFlags, LPSTRRET strRet)
 554 {
 555     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 556
 557     WCHAR wszPath[MAX_PATH];
 558     HRESULT hr = S_OK;
 559
 560     TRACE ("(%p)->(pidl=%p,0x%08x,%p)\n", This, pidl, dwFlags, strRet);
 561     pdump (pidl);
 562
 563     if (!strRet)
 564         return E_INVALIDARG;
 565
 566     wszPath[0] = 0;
 567
 568     if (!pidl->mkid.cb)
 569     {
 570         /* parsing name like ::{...} */
 571         wszPath[0] = ':';
 572         wszPath[1] = ':';
 573         SHELL32_GUIDToStringW(&CLSID_MyComputer, &wszPath[2]);
 574     }
 575     else if (_ILIsPidlSimple(pidl))
 576     {
 577         /* take names of special folders only if its only this folder */
 578         if (_ILIsSpecialFolder(pidl))
 579         {
 580             GUID const *clsid;
 581
 582             clsid = _ILGetGUIDPointer (pidl);
 583             if (clsid)
 584             {
 585                 if (GET_SHGDN_FOR (dwFlags) & SHGDN_FORPARSING)
 586                 {
 587                     static const WCHAR clsidW[] =
 588                      { 'C','L','S','I','D','\\',0 };
 589                     static const WCHAR shellfolderW[] =
 590                      { '\\','s','h','e','l','l','f','o','l','d','e','r',0 };
 591                     static const WCHAR wantsForParsingW[] =
 592                      { 'W','a','n','t','s','F','o','r','P','a','r','s','i','n',
 593                      'g',0 };
 594                     int bWantsForParsing = FALSE;
 595                     WCHAR szRegPath[100];
 596                     LONG r;
 597
 598                     /*
 599                      * We can only get a filesystem path from a shellfolder
 600                      * if the value WantsFORPARSING exists in
 601                      *      CLSID\\{...}\\shellfolder
 602                      * exception: the MyComputer folder has this keys not
 603                      *            but like any filesystem backed
 604                      *            folder it needs these behaviour
 605                      *
 606                      * Get the "WantsFORPARSING" flag from the registry
 607                      */
 608
 609                     lstrcpyW (szRegPath, clsidW);
 610                     SHELL32_GUIDToStringW (clsid, &szRegPath[6]);
 611                     lstrcatW (szRegPath, shellfolderW);
 612                     r = SHGetValueW (HKEY_CLASSES_ROOT, szRegPath,
 613                                      wantsForParsingW, NULL, NULL, NULL);
 614                     if (r == ERROR_SUCCESS)
 615                         bWantsForParsing = TRUE;
 616
 617                     if ((GET_SHGDN_RELATION (dwFlags) == SHGDN_NORMAL) &&
 618                         bWantsForParsing)
 619                     {
 620                         /*
 621                          * We need the filesystem path to the destination folder
 622                          * Only the folder itself can know it
 623                          */
 624                         hr = SHELL32_GetDisplayNameOfChild (iface, pidl,
 625                                                 dwFlags, wszPath, MAX_PATH);
 626                     }
 627                     else
 628                     {
 629                         LPWSTR p = wszPath;
 630
 631                         /* parsing name like ::{...} */
 632                         p[0] = ':';
 633                         p[1] = ':';
 634                         p += 2;
 635                         p += SHELL32_GUIDToStringW(&CLSID_MyComputer, p);
 636
 637                         /* \:: */
 638                         p[0] = '\\';
 639                         p[1] = ':';
 640                         p[2] = ':';
 641                         p += 3;
 642                         SHELL32_GUIDToStringW(clsid, p);
 643                     }
 644                 }
 645                 else
 646                 {
 647                     /* user friendly name */
 648                     HCR_GetClassNameW (clsid, wszPath, MAX_PATH);
 649                 }
 650             }
 651             else
 652             {
 653                 /* append my own path */
 654                 _ILSimpleGetTextW (pidl, wszPath, MAX_PATH);
 655             }
 656         }
 657         else if (_ILIsDrive(pidl))
 658         {
 659             _ILSimpleGetTextW (pidl, wszPath, MAX_PATH);    /* append my own path */
 660
 661             /* long view "lw_name (C:)" */
 662             if (!(dwFlags & SHGDN_FORPARSING))
 663             {
 664                 DWORD dwVolumeSerialNumber, dwMaximumComponetLength, dwFileSystemFlags;
 665                 WCHAR wszDrive[18] = {0};
 666                 static const WCHAR wszOpenBracket[] = {' ','(',0};
 667                 static const WCHAR wszCloseBracket[] = {')',0};
 668
 669                 GetVolumeInformationW (wszPath, wszDrive,
 670                            sizeof(wszDrive)/sizeof(wszDrive[0]) - 6,
 671                            &dwVolumeSerialNumber,
 672                            &dwMaximumComponetLength, &dwFileSystemFlags, NULL, 0);
 673                 strcatW (wszDrive, wszOpenBracket);
 674                 lstrcpynW (wszDrive + strlenW(wszDrive), wszPath, 3);
 675                 strcatW (wszDrive, wszCloseBracket);
 676                 strcpyW (wszPath, wszDrive);
 677             }
 678         }
 679         else
 680         {
 681             /* Neither a shell namespace extension nor a drive letter. */
 682             ERR("Wrong pidl type\n");
 683             return E_INVALIDARG;
 684         }
 685     }
 686     else
 687     {
 688         /* Complex pidl. Let the child folder do the work */
 689         hr = SHELL32_GetDisplayNameOfChild(iface, pidl, dwFlags, wszPath, MAX_PATH);
 690     }
 691
 692     if (SUCCEEDED (hr))
 693     {
 694         strRet->uType = STRRET_CSTR;
 695         if (!WideCharToMultiByte(CP_ACP, 0, wszPath, -1, strRet->u.cStr, MAX_PATH,
 696                 NULL, NULL))
 697             strRet->u.cStr[0] = '\0';
 698     }
 699
 700     TRACE ("-- (%p)->(%s)\n", This, debugstr_w(wszPath));
 701     return hr;
 702 }
 703
 704 /**************************************************************************
 705 *  ISF_MyComputer_fnSetNameOf
 706 *  Changes the name of a file object or subfolder, possibly changing its item
 707 *  identifier in the process.
 708 *
 709 * PARAMETERS
 710 *  hwndOwner  [in]   Owner window for output
 711 *  pidl       [in]   simple pidl of item to change
 712 *  lpszName   [in]   the items new display name
 713 *  dwFlags    [in]   SHGNO formatting flags
 714 *  ppidlOut   [out]  simple pidl returned
 715 */
 716 static HRESULT WINAPI ISF_MyComputer_fnSetNameOf (
 717                IShellFolder2 * iface, HWND hwndOwner, LPCITEMIDLIST pidl,
 718                LPCOLESTR lpName, DWORD dwFlags, LPITEMIDLIST * pPidlOut)
 719 {
 720     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 721     FIXME ("(%p)->(%p,pidl=%p,%s,%u,%p)\n", This,
 722            hwndOwner, pidl, debugstr_w (lpName), dwFlags, pPidlOut);
 723     return E_FAIL;
 724 }
 725
 726 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultSearchGUID (
 727                IShellFolder2 * iface, GUID * pguid)
 728 {
 729     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 730     FIXME ("(%p)\n", This);
 731     return E_NOTIMPL;
 732 }
 733 static HRESULT WINAPI ISF_MyComputer_fnEnumSearches (
 734                IShellFolder2 * iface, IEnumExtraSearch ** ppenum)
 735 {
 736     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 737     FIXME ("(%p)\n", This);
 738     return E_NOTIMPL;
 739 }
 740 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumn (
 741                IShellFolder2 *iface, DWORD dwRes, ULONG *pSort, ULONG *pDisplay)
 742 {
 743     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 744
 745     TRACE ("(%p)\n", This);
 746
 747     if (pSort)
 748          *pSort = 0;
 749     if (pDisplay)
 750         *pDisplay = 0;
 751     return S_OK;
 752 }
 753 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumnState (
 754                IShellFolder2 * iface, UINT iColumn, DWORD * pcsFlags)
 755 {
 756     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 757
 758     TRACE ("(%p)\n", This);
 759
 760     if (!pcsFlags || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS)
 761         return E_INVALIDARG;
 762     *pcsFlags = MyComputerSFHeader[iColumn].pcsFlags;
 763     return S_OK;
 764 }
 765
 766 static HRESULT WINAPI ISF_MyComputer_fnGetDetailsEx (IShellFolder2 * iface,
 767                LPCITEMIDLIST pidl, const SHCOLUMNID * pscid, VARIANT * pv)
 768 {
 769     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 770     FIXME ("(%p)\n", This);
 771     return E_NOTIMPL;
 772 }
 773
 774 /* FIXME: drive size >4GB is rolling over */
 775 static HRESULT WINAPI ISF_MyComputer_fnGetDetailsOf (IShellFolder2 * iface,
 776                LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS * psd)
 777 {
 778     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 779     HRESULT hr;
 780
 781     TRACE ("(%p)->(%p %i %p)\n", This, pidl, iColumn, psd);
 782
 783     if (!psd || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS)
 784         return E_INVALIDARG;
 785
 786     if (!pidl)
 787     {
 788         psd->fmt = MyComputerSFHeader[iColumn].fmt;
 789         psd->cxChar = MyComputerSFHeader[iColumn].cxChar;
 790         psd->str.uType = STRRET_CSTR;
 791         LoadStringA (shell32_hInstance, MyComputerSFHeader[iColumn].colnameid,
 792                      psd->str.u.cStr, MAX_PATH);
 793         return S_OK;
 794     }
 795     else
 796     {
 797         char szPath[MAX_PATH];
 798         ULARGE_INTEGER ulBytes;
 799
 800         psd->str.u.cStr[0] = 0x00;
 801         psd->str.uType = STRRET_CSTR;
 802         switch (iColumn)
 803         {
 804         case 0:        /* name */
 805             hr = IShellFolder_GetDisplayNameOf (iface, pidl,
 806                        SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str);
 807             break;
 808         case 1:        /* type */
 809             _ILGetFileType (pidl, psd->str.u.cStr, MAX_PATH);
 810             break;
 811         case 2:        /* total size */
 812             if (_ILIsDrive (pidl))
 813             {
 814                 _ILSimpleGetText (pidl, szPath, MAX_PATH);
 815                 GetDiskFreeSpaceExA (szPath, NULL, &ulBytes, NULL);
 816                 StrFormatByteSizeA (ulBytes.u.LowPart, psd->str.u.cStr, MAX_PATH);
 817             }
 818             break;
 819         case 3:        /* free size */
 820             if (_ILIsDrive (pidl))
 821             {
 822                 _ILSimpleGetText (pidl, szPath, MAX_PATH);
 823                 GetDiskFreeSpaceExA (szPath, &ulBytes, NULL, NULL);
 824                 StrFormatByteSizeA (ulBytes.u.LowPart, psd->str.u.cStr, MAX_PATH);
 825             }
 826             break;
 827         }
 828         hr = S_OK;
 829     }
 830
 831     return hr;
 832 }
 833
 834 static HRESULT WINAPI ISF_MyComputer_fnMapColumnToSCID (
 835                IShellFolder2 * iface, UINT column, SHCOLUMNID * pscid)
 836 {
 837     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 838     FIXME ("(%p)\n", This);
 839     return E_NOTIMPL;
 840 }
 841
 842 static const IShellFolder2Vtbl vt_ShellFolder2 =
 843 {
 844     ISF_MyComputer_fnQueryInterface,
 845     ISF_MyComputer_fnAddRef,
 846     ISF_MyComputer_fnRelease,
 847     ISF_MyComputer_fnParseDisplayName,
 848     ISF_MyComputer_fnEnumObjects,
 849     ISF_MyComputer_fnBindToObject,
 850     ISF_MyComputer_fnBindToStorage,
 851     ISF_MyComputer_fnCompareIDs,
 852     ISF_MyComputer_fnCreateViewObject,
 853     ISF_MyComputer_fnGetAttributesOf,
 854     ISF_MyComputer_fnGetUIObjectOf,
 855     ISF_MyComputer_fnGetDisplayNameOf,
 856     ISF_MyComputer_fnSetNameOf,
 857     /* ShellFolder2 */
 858     ISF_MyComputer_fnGetDefaultSearchGUID,
 859     ISF_MyComputer_fnEnumSearches,
 860     ISF_MyComputer_fnGetDefaultColumn,
 861     ISF_MyComputer_fnGetDefaultColumnState,
 862     ISF_MyComputer_fnGetDetailsEx,
 863     ISF_MyComputer_fnGetDetailsOf,
 864     ISF_MyComputer_fnMapColumnToSCID
 865 };
 866
 867 /************************************************************************
 868  *    IMCFldr_PersistFolder2_QueryInterface
 869  */
 870 static HRESULT WINAPI IMCFldr_PersistFolder2_QueryInterface (
 871                IPersistFolder2 * iface, REFIID iid, LPVOID * ppvObj)
 872 {
 873     IGenericSFImpl *This = impl_from_IPersistFolder2(iface);
 874
 875     TRACE ("(%p)\n", This);
 876
 877     return IUnknown_QueryInterface (_IUnknown_ (This), iid, ppvObj);
 878 }
 879
 880 /************************************************************************
 881  *    IMCFldr_PersistFolder2_AddRef
 882  */
 883 static ULONG WINAPI IMCFldr_PersistFolder2_AddRef (IPersistFolder2 * iface)
 884 {
 885     IGenericSFImpl *This = impl_from_IPersistFolder2(iface);
 886
 887     TRACE ("(%p)->(count=%u)\n", This, This->ref);
 888
 889     return IUnknown_AddRef (_IUnknown_ (This));
 890 }
 891
 892 /************************************************************************
 893  *    ISFPersistFolder_Release
 894  */
 895 static ULONG WINAPI IMCFldr_PersistFolder2_Release (IPersistFolder2 * iface)
 896 {
 897     IGenericSFImpl *This = impl_from_IPersistFolder2(iface);
 898
 899     TRACE ("(%p)->(count=%u)\n", This, This->ref);
 900
 901     return IUnknown_Release (_IUnknown_ (This));
 902 }
 903
 904 /************************************************************************
 905  *    IMCFldr_PersistFolder2_GetClassID
 906  */
 907 static HRESULT WINAPI IMCFldr_PersistFolder2_GetClassID (
 908                IPersistFolder2 * iface, CLSID * lpClassId)
 909 {
 910     IGenericSFImpl *This = impl_from_IPersistFolder2(iface);
 911
 912     TRACE ("(%p)\n", This);
 913
 914     if (!lpClassId)
 915     return E_POINTER;
 916     *lpClassId = CLSID_MyComputer;
 917
 918     return S_OK;
 919 }
 920
 921 /************************************************************************
 922  *    IMCFldr_PersistFolder2_Initialize
 923  *
 924  * NOTES: it makes no sense to change the pidl
 925  */
 926 static HRESULT WINAPI IMCFldr_PersistFolder2_Initialize (
 927                IPersistFolder2 * iface, LPCITEMIDLIST pidl)
 928 {
 929     IGenericSFImpl *This = impl_from_IPersistFolder2(iface);
 930     TRACE ("(%p)->(%p)\n", This, pidl);
 931     return E_NOTIMPL;
 932 }
 933
 934 /**************************************************************************
 935  *    IPersistFolder2_fnGetCurFolder
 936  */
 937 static HRESULT WINAPI IMCFldr_PersistFolder2_GetCurFolder (
 938                IPersistFolder2 * iface, LPITEMIDLIST * pidl)
 939 {
 940     IGenericSFImpl *This = impl_from_IPersistFolder2(iface);
 941
 942     TRACE ("(%p)->(%p)\n", This, pidl);
 943
 944     if (!pidl)
 945         return E_POINTER;
 946     *pidl = ILClone (This->pidlRoot);
 947     return S_OK;
 948 }
 949
 950 static const IPersistFolder2Vtbl vt_PersistFolder2 =
 951 {
 952     IMCFldr_PersistFolder2_QueryInterface,
 953     IMCFldr_PersistFolder2_AddRef,
 954     IMCFldr_PersistFolder2_Release,
 955     IMCFldr_PersistFolder2_GetClassID,
 956     IMCFldr_PersistFolder2_Initialize,
 957     IMCFldr_PersistFolder2_GetCurFolder
 958 };