dlls/shell32/shfldr_mycomp.c

   1
   2 /*
   3  *      Virtual Workplace folder
   4  *
   5  *      Copyright 1997                  Marcus Meissner
   6  *      Copyright 1998, 1999, 2002      Juergen Schmied
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Lesser General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2.1 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Lesser General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with this library; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  21  */
  22
  23 #include "config.h"
  24 #include "wine/port.h"
  25
  26 #include <stdlib.h>
  27 #include <string.h>
  28 #include <stdarg.h>
  29 #include <stdio.h>
  30
  31 #define COBJMACROS
  32 #define NONAMELESSUNION
  33 #define NONAMELESSSTRUCT
  34
  35 #include "winerror.h"
  36 #include "windef.h"
  37 #include "winbase.h"
  38 #include "winreg.h"
  39
  40 #include "wingdi.h"
  41 #include "pidl.h"
  42 #include "shlguid.h"
  43 #include "enumidlist.h"
  44 #include "undocshell.h"
  45 #include "shell32_main.h"
  46 #include "shresdef.h"
  47 #include "shlwapi.h"
  48 #include "wine/debug.h"
  49 #include "debughlp.h"
  50 #include "shfldr.h"
  51
  52 WINE_DEFAULT_DEBUG_CHANNEL (shell);
  53
  54 /***********************************************************************
  55 *   IShellFolder implementation
  56 */
  57
  58 typedef struct {
  59     IShellFolder2Vtbl   *lpVtbl;
  60     DWORD                ref;
  61     IPersistFolder2Vtbl *lpVtblPersistFolder2;
  62
  63     /* both paths are parsible from the desktop */
  64     LPITEMIDLIST pidlRoot;      /* absolute pidl */
  65     int dwAttributes;           /* attributes returned by GetAttributesOf FIXME: use it */
  66 } IGenericSFImpl;
  67
  68 static struct IShellFolder2Vtbl vt_ShellFolder2;
  69 static struct IPersistFolder2Vtbl vt_PersistFolder2;
  70
  71 #define _IPersistFolder2_Offset ((int)(&(((IGenericSFImpl*)0)->lpVtblPersistFolder2)))
  72 #define _ICOM_THIS_From_IPersistFolder2(class, name) class* This = (class*)(((char*)name)-_IPersistFolder2_Offset);
  73
  74 /*
  75   converts This to a interface pointer
  76 */
  77 #define _IUnknown_(This)        (IUnknown*)&(This->lpVtbl)
  78 #define _IShellFolder_(This)    (IShellFolder*)&(This->lpVtbl)
  79 #define _IShellFolder2_(This)   (IShellFolder2*)&(This->lpVtbl)
  80
  81 #define _IPersist_(This)        (IPersist*)&(This->lpVtblPersistFolder2)
  82 #define _IPersistFolder_(This)  (IPersistFolder*)&(This->lpVtblPersistFolder2)
  83 #define _IPersistFolder2_(This) (IPersistFolder2*)&(This->lpVtblPersistFolder2)
  84
  85 /***********************************************************************
  86 *   IShellFolder [MyComputer] implementation
  87 */
  88
  89 static shvheader MyComputerSFHeader[] = {
  90     {IDS_SHV_COLUMN1, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 15},
  91     {IDS_SHV_COLUMN3, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
  92     {IDS_SHV_COLUMN6, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
  93     {IDS_SHV_COLUMN7, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
  94 };
  95
  96 #define MYCOMPUTERSHELLVIEWCOLUMNS 4
  97
  98 /**************************************************************************
  99 *       ISF_MyComputer_Constructor
 100 */
 101 HRESULT WINAPI ISF_MyComputer_Constructor (IUnknown * pUnkOuter, REFIID riid, LPVOID * ppv)
 102 {
 103     IGenericSFImpl *sf;
 104
 105     TRACE ("unkOut=%p %s\n", pUnkOuter, shdebugstr_guid (riid));
 106
 107     if (!ppv)
 108         return E_POINTER;
 109     if (pUnkOuter)
 110         return CLASS_E_NOAGGREGATION;
 111
 112     sf = (IGenericSFImpl *) LocalAlloc (GMEM_ZEROINIT, sizeof (IGenericSFImpl));
 113     if (!sf)
 114         return E_OUTOFMEMORY;
 115
 116     sf->ref = 0;
 117     sf->lpVtbl = &vt_ShellFolder2;
 118     sf->lpVtblPersistFolder2 = &vt_PersistFolder2;
 119     sf->pidlRoot = _ILCreateMyComputer ();      /* my qualified pidl */
 120
 121     if (!SUCCEEDED (IUnknown_QueryInterface (_IUnknown_ (sf), riid, ppv))) {
 122         IUnknown_Release (_IUnknown_ (sf));
 123         return E_NOINTERFACE;
 124     }
 125
 126     TRACE ("--(%p)\n", sf);
 127     return S_OK;
 128 }
 129
 130 /**************************************************************************
 131  *      ISF_MyComputer_fnQueryInterface
 132  *
 133  * NOTES supports not IPersist/IPersistFolder
 134  */
 135 static HRESULT WINAPI ISF_MyComputer_fnQueryInterface (IShellFolder2 * iface, REFIID riid, LPVOID * ppvObj)
 136 {
 137     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 138
 139     TRACE ("(%p)->(%s,%p)\n", This, shdebugstr_guid (riid), ppvObj);
 140
 141     *ppvObj = NULL;
 142
 143     if (IsEqualIID (riid, &IID_IUnknown) ||
 144         IsEqualIID (riid, &IID_IShellFolder) || IsEqualIID (riid, &IID_IShellFolder2)) {
 145         *ppvObj = This;
 146     } else if (IsEqualIID (riid, &IID_IPersist) ||
 147                IsEqualIID (riid, &IID_IPersistFolder) || IsEqualIID (riid, &IID_IPersistFolder2)) {
 148         *ppvObj = _IPersistFolder2_ (This);
 149     }
 150
 151     if (*ppvObj) {
 152         IUnknown_AddRef ((IUnknown *) (*ppvObj));
 153         TRACE ("-- Interface: (%p)->(%p)\n", ppvObj, *ppvObj);
 154         return S_OK;
 155     }
 156     TRACE ("-- Interface: E_NOINTERFACE\n");
 157     return E_NOINTERFACE;
 158 }
 159
 160 static ULONG WINAPI ISF_MyComputer_fnAddRef (IShellFolder2 * iface)
 161 {
 162     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 163
 164     TRACE ("(%p)->(count=%lu)\n", This, This->ref);
 165
 166     return ++(This->ref);
 167 }
 168
 169 static ULONG WINAPI ISF_MyComputer_fnRelease (IShellFolder2 * iface)
 170 {
 171     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 172
 173     TRACE ("(%p)->(count=%lu)\n", This, This->ref);
 174
 175     if (!--(This->ref)) {
 176         TRACE ("-- destroying IShellFolder(%p)\n", This);
 177         if (This->pidlRoot)
 178             SHFree (This->pidlRoot);
 179         LocalFree ((HLOCAL) This);
 180         return 0;
 181     }
 182     return This->ref;
 183 }
 184
 185 /**************************************************************************
 186 *       ISF_MyComputer_fnParseDisplayName
 187 */
 188 static HRESULT WINAPI
 189 ISF_MyComputer_fnParseDisplayName (IShellFolder2 * iface,
 190                                    HWND hwndOwner,
 191                                    LPBC pbc,
 192                                    LPOLESTR lpszDisplayName,
 193                                    DWORD * pchEaten, LPITEMIDLIST * ppidl, DWORD * pdwAttributes)
 194 {
 195     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 196
 197     HRESULT hr = E_INVALIDARG;
 198     LPCWSTR szNext = NULL;
 199     WCHAR szElement[MAX_PATH];
 200     LPITEMIDLIST pidlTemp = NULL;
 201     CLSID clsid;
 202
 203     TRACE ("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n",
 204            This, hwndOwner, pbc, lpszDisplayName, debugstr_w (lpszDisplayName), pchEaten, ppidl, pdwAttributes);
 205
 206     *ppidl = 0;
 207     if (pchEaten)
 208         *pchEaten = 0;          /* strange but like the original */
 209
 210     /* handle CLSID paths */
 211     if (lpszDisplayName[0] == ':' && lpszDisplayName[1] == ':') {
 212         szNext = GetNextElementW (lpszDisplayName, szElement, MAX_PATH);
 213         TRACE ("-- element: %s\n", debugstr_w (szElement));
 214         SHCLSIDFromStringW (szElement + 2, &clsid);
 215         pidlTemp = _ILCreateGuid (PT_GUID, &clsid);
 216     }
 217     /* do we have an absolute path name ? */
 218     else if (PathGetDriveNumberW (lpszDisplayName) >= 0 && lpszDisplayName[2] == (WCHAR) '\\') {
 219         szNext = GetNextElementW (lpszDisplayName, szElement, MAX_PATH);
 220         szElement[0] = toupper(szElement[0]); /* make drive letter uppercase to enable PIDL comparison */
 221         pidlTemp = _ILCreateDrive (szElement);
 222     }
 223
 224     if (szNext && *szNext) {
 225         hr = SHELL32_ParseNextElement (iface, hwndOwner, pbc, &pidlTemp, (LPOLESTR) szNext, pchEaten, pdwAttributes);
 226     } else {
 227         if (pdwAttributes && *pdwAttributes) {
 228             SHELL32_GetItemAttributes (_IShellFolder_ (This), pidlTemp, pdwAttributes);
 229         }
 230         hr = S_OK;
 231     }
 232
 233     *ppidl = pidlTemp;
 234
 235     TRACE ("(%p)->(-- ret=0x%08lx)\n", This, hr);
 236
 237     return hr;
 238 }
 239
 240 /**************************************************************************
 241  *  CreateMyCompEnumList()
 242  */
 243 static BOOL CreateMyCompEnumList(IEnumIDList *list, DWORD dwFlags)
 244 {
 245     BOOL ret = TRUE;
 246
 247     TRACE("(%p)->(flags=0x%08lx) \n",list,dwFlags);
 248
 249     /*enumerate the folders*/
 250     if(dwFlags & SHCONTF_FOLDERS)
 251     {
 252         WCHAR wszDriveName[] = {'A', ':', '\\', '\0'};
 253         DWORD dwDrivemap = GetLogicalDrives();
 254         HKEY hkey;
 255
 256         while (ret && wszDriveName[0]<='Z')
 257         {
 258             if(dwDrivemap & 0x00000001L)
 259                 ret = AddToEnumList(list, _ILCreateDrive(wszDriveName));
 260             wszDriveName[0]++;
 261             dwDrivemap = dwDrivemap >> 1;
 262         }
 263
 264         TRACE("-- (%p)-> enumerate (mycomputer shell extensions)\n",list);
 265         if (ret && !RegOpenKeyExA(HKEY_LOCAL_MACHINE,
 266          "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\explorer\\mycomputer\\NameSpace",
 267          0, KEY_READ, &hkey))
 268         {
 269             char iid[50];
 270             int i=0;
 271
 272             while (ret)
 273             {
 274                 DWORD size = sizeof (iid);
 275                 LONG apiRet = RegEnumKeyExA(hkey, i, iid, &size, 0, NULL, NULL,
 276                  NULL);
 277
 278                 if (ERROR_SUCCESS == apiRet)
 279                 {
 280                     /* FIXME: shell extensions, shouldn't the type be
 281                      * PT_SHELLEXT? */
 282                     ret = AddToEnumList(list, _ILCreateGuidFromStrA(iid));
 283                     i++;
 284                 }
 285                 else if (ERROR_NO_MORE_ITEMS == apiRet)
 286                     break;
 287                 else
 288                     ret = FALSE;
 289             }
 290             RegCloseKey(hkey);
 291         }
 292     }
 293     return ret;
 294 }
 295
 296 /**************************************************************************
 297 *               ISF_MyComputer_fnEnumObjects
 298 */
 299 static HRESULT WINAPI
 300 ISF_MyComputer_fnEnumObjects (IShellFolder2 * iface, HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST * ppEnumIDList)
 301 {
 302     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 303
 304     TRACE ("(%p)->(HWND=%p flags=0x%08lx pplist=%p)\n", This, hwndOwner, dwFlags, ppEnumIDList);
 305
 306     *ppEnumIDList = IEnumIDList_Constructor();
 307     if (*ppEnumIDList)
 308         CreateMyCompEnumList(*ppEnumIDList, dwFlags);
 309
 310     TRACE ("-- (%p)->(new ID List: %p)\n", This, *ppEnumIDList);
 311
 312     return (*ppEnumIDList) ? S_OK : E_OUTOFMEMORY;
 313 }
 314
 315 /**************************************************************************
 316 *               ISF_MyComputer_fnBindToObject
 317 */
 318 static HRESULT WINAPI
 319 ISF_MyComputer_fnBindToObject (IShellFolder2 * iface, LPCITEMIDLIST pidl,
 320                                LPBC pbcReserved, REFIID riid, LPVOID * ppvOut)
 321 {
 322     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 323
 324     TRACE ("(%p)->(pidl=%p,%p,%s,%p)\n", This, pidl, pbcReserved, shdebugstr_guid (riid), ppvOut);
 325
 326     return SHELL32_BindToChild (This->pidlRoot, NULL, pidl, riid, ppvOut);
 327 }
 328
 329 /**************************************************************************
 330 *       ISF_MyComputer_fnBindToStorage
 331 */
 332 static HRESULT WINAPI
 333 ISF_MyComputer_fnBindToStorage (IShellFolder2 * iface,
 334                                 LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID * ppvOut)
 335 {
 336     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 337
 338     FIXME ("(%p)->(pidl=%p,%p,%s,%p) stub\n", This, pidl, pbcReserved, shdebugstr_guid (riid), ppvOut);
 339
 340     *ppvOut = NULL;
 341     return E_NOTIMPL;
 342 }
 343
 344 /**************************************************************************
 345 *       ISF_MyComputer_fnCompareIDs
 346 */
 347
 348 static HRESULT WINAPI
 349 ISF_MyComputer_fnCompareIDs (IShellFolder2 * iface, LPARAM lParam, LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2)
 350 {
 351     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 352
 353     int nReturn;
 354
 355     TRACE ("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This, lParam, pidl1, pidl2);
 356     nReturn = SHELL32_CompareIDs (_IShellFolder_ (This), lParam, pidl1, pidl2);
 357     TRACE ("-- %i\n", nReturn);
 358     return nReturn;
 359 }
 360
 361 /**************************************************************************
 362 *       ISF_MyComputer_fnCreateViewObject
 363 */
 364 static HRESULT WINAPI
 365 ISF_MyComputer_fnCreateViewObject (IShellFolder2 * iface, HWND hwndOwner, REFIID riid, LPVOID * ppvOut)
 366 {
 367     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 368
 369     LPSHELLVIEW pShellView;
 370     HRESULT hr = E_INVALIDARG;
 371
 372     TRACE ("(%p)->(hwnd=%p,%s,%p)\n", This, hwndOwner, shdebugstr_guid (riid), ppvOut);
 373
 374     if (ppvOut) {
 375         *ppvOut = NULL;
 376
 377         if (IsEqualIID (riid, &IID_IDropTarget)) {
 378             WARN ("IDropTarget not implemented\n");
 379             hr = E_NOTIMPL;
 380         } else if (IsEqualIID (riid, &IID_IContextMenu)) {
 381             WARN ("IContextMenu not implemented\n");
 382             hr = E_NOTIMPL;
 383         } else if (IsEqualIID (riid, &IID_IShellView)) {
 384             pShellView = IShellView_Constructor ((IShellFolder *) iface);
 385             if (pShellView) {
 386                 hr = IShellView_QueryInterface (pShellView, riid, ppvOut);
 387                 IShellView_Release (pShellView);
 388             }
 389         }
 390     }
 391     TRACE ("-- (%p)->(interface=%p)\n", This, ppvOut);
 392     return hr;
 393 }
 394
 395 /**************************************************************************
 396 *  ISF_MyComputer_fnGetAttributesOf
 397 */
 398 static HRESULT WINAPI
 399 ISF_MyComputer_fnGetAttributesOf (IShellFolder2 * iface, UINT cidl, LPCITEMIDLIST * apidl, DWORD * rgfInOut)
 400 {
 401     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 402
 403     HRESULT hr = S_OK;
 404
 405     TRACE ("(%p)->(cidl=%d apidl=%p mask=0x%08lx)\n", This, cidl, apidl, *rgfInOut);
 406
 407     if ((!cidl) || (!apidl) || (!rgfInOut))
 408         return E_INVALIDARG;
 409
 410     if (*rgfInOut == 0)
 411         *rgfInOut = ~0;
 412
 413     while (cidl > 0 && *apidl) {
 414         pdump (*apidl);
 415         SHELL32_GetItemAttributes (_IShellFolder_ (This), *apidl, rgfInOut);
 416         apidl++;
 417         cidl--;
 418     }
 419
 420     TRACE ("-- result=0x%08lx\n", *rgfInOut);
 421     return hr;
 422 }
 423
 424 /**************************************************************************
 425 *       ISF_MyComputer_fnGetUIObjectOf
 426 *
 427 * PARAMETERS
 428 *  HWND           hwndOwner, //[in ] Parent window for any output
 429 *  UINT           cidl,      //[in ] array size
 430 *  LPCITEMIDLIST* apidl,     //[in ] simple pidl array
 431 *  REFIID         riid,      //[in ] Requested Interface
 432 *  UINT*          prgfInOut, //[   ] reserved
 433 *  LPVOID*        ppvObject) //[out] Resulting Interface
 434 *
 435 */
 436 static HRESULT WINAPI
 437 ISF_MyComputer_fnGetUIObjectOf (IShellFolder2 * iface,
 438                                 HWND hwndOwner,
 439                                 UINT cidl, LPCITEMIDLIST * apidl, REFIID riid, UINT * prgfInOut, LPVOID * ppvOut)
 440 {
 441     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 442
 443     LPITEMIDLIST pidl;
 444     IUnknown *pObj = NULL;
 445     HRESULT hr = E_INVALIDARG;
 446
 447     TRACE ("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n",
 448            This, hwndOwner, cidl, apidl, shdebugstr_guid (riid), prgfInOut, ppvOut);
 449
 450     if (ppvOut) {
 451         *ppvOut = NULL;
 452
 453         if (IsEqualIID (riid, &IID_IContextMenu) && (cidl >= 1)) {
 454             pObj = (LPUNKNOWN) ISvItemCm_Constructor ((IShellFolder *) iface, This->pidlRoot, apidl, cidl);
 455             hr = S_OK;
 456         } else if (IsEqualIID (riid, &IID_IDataObject) && (cidl >= 1)) {
 457             pObj = (LPUNKNOWN) IDataObject_Constructor (hwndOwner, This->pidlRoot, apidl, cidl);
 458             hr = S_OK;
 459         } else if (IsEqualIID (riid, &IID_IExtractIconA) && (cidl == 1)) {
 460             pidl = ILCombine (This->pidlRoot, apidl[0]);
 461             pObj = (LPUNKNOWN) IExtractIconA_Constructor (pidl);
 462             SHFree (pidl);
 463             hr = S_OK;
 464         } else if (IsEqualIID (riid, &IID_IExtractIconW) && (cidl == 1)) {
 465             pidl = ILCombine (This->pidlRoot, apidl[0]);
 466             pObj = (LPUNKNOWN) IExtractIconW_Constructor (pidl);
 467             SHFree (pidl);
 468             hr = S_OK;
 469         } else if (IsEqualIID (riid, &IID_IDropTarget) && (cidl >= 1)) {
 470             hr = IShellFolder_QueryInterface (iface, &IID_IDropTarget, (LPVOID *) & pObj);
 471         } else if ((IsEqualIID(riid,&IID_IShellLinkW) || IsEqualIID(riid,&IID_IShellLinkA))
 472                                 && (cidl == 1)) {
 473             pidl = ILCombine (This->pidlRoot, apidl[0]);
 474             hr = IShellLink_ConstructFromFile(NULL, riid, pidl, (LPVOID*)&pObj);
 475             SHFree (pidl);
 476         } else {
 477             hr = E_NOINTERFACE;
 478         }
 479
 480         if (SUCCEEDED(hr) && !pObj)
 481             hr = E_OUTOFMEMORY;
 482
 483         *ppvOut = pObj;
 484     }
 485     TRACE ("(%p)->hr=0x%08lx\n", This, hr);
 486     return hr;
 487 }
 488
 489 /**************************************************************************
 490 *       ISF_MyComputer_fnGetDisplayNameOf
 491 */
 492 static HRESULT WINAPI ISF_MyComputer_fnGetDisplayNameOf (IShellFolder2 * iface, LPCITEMIDLIST pidl, DWORD dwFlags, LPSTRRET strRet)
 493 {
 494     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 495
 496     char szPath[MAX_PATH],
 497       szDrive[18];
 498     int len = 0;
 499     BOOL bSimplePidl;
 500     HRESULT hr = S_OK;
 501
 502     TRACE ("(%p)->(pidl=%p,0x%08lx,%p)\n", This, pidl, dwFlags, strRet);
 503     pdump (pidl);
 504
 505     if (!strRet)
 506         return E_INVALIDARG;
 507
 508     szPath[0] = 0x00;
 509     szDrive[0] = 0x00;
 510
 511     bSimplePidl = _ILIsPidlSimple (pidl);
 512
 513     if (!pidl->mkid.cb) {
 514         /* parsing name like ::{...} */
 515         lstrcpyA (szPath, "::");
 516         SHELL32_GUIDToStringA(&CLSID_MyComputer, &szPath[2]);
 517     } else if (_ILIsSpecialFolder (pidl)) {
 518         /* take names of special folders only if its only this folder */
 519         if (bSimplePidl) {
 520             GUID const *clsid;
 521
 522             if ((clsid = _ILGetGUIDPointer (pidl))) {
 523                 if (GET_SHGDN_FOR (dwFlags) == SHGDN_FORPARSING) {
 524                     int bWantsForParsing;
 525
 526                     /*
 527                      * we can only get a filesystem path from a shellfolder if the value WantsFORPARSING in
 528                      * CLSID\\{...}\\shellfolder exists
 529                      * exception: the MyComputer folder has this keys not but like any filesystem backed
 530                      *            folder it needs these behaviour
 531                      */
 532                     /* get the "WantsFORPARSING" flag from the registry */
 533                     char szRegPath[100];
 534
 535                     lstrcpyA (szRegPath, "CLSID\\");
 536                     SHELL32_GUIDToStringA (clsid, &szRegPath[6]);
 537                     lstrcatA (szRegPath, "\\shellfolder");
 538                     bWantsForParsing =
 539                         (ERROR_SUCCESS ==
 540                          SHGetValueA (HKEY_CLASSES_ROOT, szRegPath, "WantsFORPARSING", NULL, NULL, NULL));
 541
 542                     if ((GET_SHGDN_RELATION (dwFlags) == SHGDN_NORMAL) && bWantsForParsing) {
 543                         /* we need the filesystem path to the destination folder. Only the folder itself can know it */
 544                         hr = SHELL32_GetDisplayNameOfChild (iface, pidl, dwFlags, szPath, MAX_PATH);
 545                     } else {
 546                         LPSTR p;
 547
 548                         /* parsing name like ::{...} */
 549                         p = lstrcpyA(szPath, "::") + 2;
 550                         p += SHELL32_GUIDToStringA(&CLSID_MyComputer, p);
 551
 552                         lstrcatA(p, "\\::");
 553                         p += 3;
 554                         SHELL32_GUIDToStringA(clsid, p);
 555                     }
 556                 } else {
 557                     /* user friendly name */
 558                     HCR_GetClassNameA (clsid, szPath, MAX_PATH);
 559                 }
 560             } else
 561                 _ILSimpleGetText (pidl, szPath, MAX_PATH);      /* append my own path */
 562         } else {
 563             FIXME ("special folder\n");
 564         }
 565     } else {
 566         if (!_ILIsDrive (pidl)) {
 567             ERR ("Wrong pidl type\n");
 568             return E_INVALIDARG;
 569         }
 570
 571         _ILSimpleGetText (pidl, szPath, MAX_PATH);      /* append my own path */
 572
 573         /* long view "lw_name (C:)" */
 574         if (bSimplePidl && !(dwFlags & SHGDN_FORPARSING)) {
 575             DWORD dwVolumeSerialNumber,
 576               dwMaximumComponetLength,
 577               dwFileSystemFlags;
 578
 579             GetVolumeInformationA (szPath, szDrive, sizeof (szDrive) - 6, &dwVolumeSerialNumber,
 580                                    &dwMaximumComponetLength, &dwFileSystemFlags, NULL, 0);
 581             strcat (szDrive, " (");
 582             strncat (szDrive, szPath, 2);
 583             strcat (szDrive, ")");
 584             strcpy (szPath, szDrive);
 585         }
 586     }
 587
 588     if (!bSimplePidl) {         /* go deeper if needed */
 589         PathAddBackslashA (szPath);
 590         len = strlen (szPath);
 591
 592         hr = SHELL32_GetDisplayNameOfChild (iface, pidl, dwFlags | SHGDN_INFOLDER, szPath + len, MAX_PATH - len);
 593     }
 594
 595     if (SUCCEEDED (hr)) {
 596         strRet->uType = STRRET_CSTR;
 597         lstrcpynA (strRet->u.cStr, szPath, MAX_PATH);
 598     }
 599
 600     TRACE ("-- (%p)->(%s)\n", This, szPath);
 601     return hr;
 602 }
 603
 604 /**************************************************************************
 605 *  ISF_MyComputer_fnSetNameOf
 606 *  Changes the name of a file object or subfolder, possibly changing its item
 607 *  identifier in the process.
 608 *
 609 * PARAMETERS
 610 *  HWND          hwndOwner,  //[in ] Owner window for output
 611 *  LPCITEMIDLIST pidl,       //[in ] simple pidl of item to change
 612 *  LPCOLESTR     lpszName,   //[in ] the items new display name
 613 *  DWORD         dwFlags,    //[in ] SHGNO formatting flags
 614 *  LPITEMIDLIST* ppidlOut)   //[out] simple pidl returned
 615 */
 616 static HRESULT WINAPI ISF_MyComputer_fnSetNameOf (IShellFolder2 * iface, HWND hwndOwner, LPCITEMIDLIST pidl,    /*simple pidl */
 617                                                   LPCOLESTR lpName, DWORD dwFlags, LPITEMIDLIST * pPidlOut)
 618 {
 619     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 620     FIXME ("(%p)->(%p,pidl=%p,%s,%lu,%p)\n", This, hwndOwner, pidl, debugstr_w (lpName), dwFlags, pPidlOut);
 621     return E_FAIL;
 622 }
 623
 624 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultSearchGUID (IShellFolder2 * iface, GUID * pguid)
 625 {
 626     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 627     FIXME ("(%p)\n", This);
 628     return E_NOTIMPL;
 629 }
 630 static HRESULT WINAPI ISF_MyComputer_fnEnumSearches (IShellFolder2 * iface, IEnumExtraSearch ** ppenum)
 631 {
 632     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 633     FIXME ("(%p)\n", This);
 634     return E_NOTIMPL;
 635 }
 636 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumn (IShellFolder2 * iface, DWORD dwRes, ULONG * pSort, ULONG * pDisplay)
 637 {
 638     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 639
 640     TRACE ("(%p)\n", This);
 641
 642     if (pSort) *pSort = 0;
 643     if (pDisplay) *pDisplay = 0;
 644     return S_OK;
 645 }
 646 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumnState (IShellFolder2 * iface, UINT iColumn, DWORD * pcsFlags)
 647 {
 648     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 649
 650     TRACE ("(%p)\n", This);
 651
 652     if (!pcsFlags || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS) return E_INVALIDARG;
 653     *pcsFlags = MyComputerSFHeader[iColumn].pcsFlags;
 654     return S_OK;
 655 }
 656 static HRESULT WINAPI ISF_MyComputer_fnGetDetailsEx (IShellFolder2 * iface, LPCITEMIDLIST pidl, const SHCOLUMNID * pscid, VARIANT * pv)
 657 {
 658     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 659     FIXME ("(%p)\n", This);
 660     return E_NOTIMPL;
 661 }
 662
 663 /* FIXME: drive size >4GB is rolling over */
 664 static HRESULT WINAPI ISF_MyComputer_fnGetDetailsOf (IShellFolder2 * iface, LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS * psd)
 665 {
 666     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 667     HRESULT hr;
 668
 669     TRACE ("(%p)->(%p %i %p)\n", This, pidl, iColumn, psd);
 670
 671     if (!psd || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS)
 672         return E_INVALIDARG;
 673
 674     if (!pidl) {
 675         psd->fmt = MyComputerSFHeader[iColumn].fmt;
 676         psd->cxChar = MyComputerSFHeader[iColumn].cxChar;
 677         psd->str.uType = STRRET_CSTR;
 678         LoadStringA (shell32_hInstance, MyComputerSFHeader[iColumn].colnameid, psd->str.u.cStr, MAX_PATH);
 679         return S_OK;
 680     } else {
 681         char szPath[MAX_PATH];
 682         ULARGE_INTEGER ulBytes;
 683
 684         psd->str.u.cStr[0] = 0x00;
 685         psd->str.uType = STRRET_CSTR;
 686         switch (iColumn) {
 687         case 0:         /* name */
 688             hr = IShellFolder_GetDisplayNameOf (iface, pidl, SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str);
 689             break;
 690         case 1:         /* type */
 691             _ILGetFileType (pidl, psd->str.u.cStr, MAX_PATH);
 692             break;
 693         case 2:         /* total size */
 694             if (_ILIsDrive (pidl)) {
 695                 _ILSimpleGetText (pidl, szPath, MAX_PATH);
 696                 GetDiskFreeSpaceExA (szPath, NULL, &ulBytes, NULL);
 697                 StrFormatByteSizeA (ulBytes.u.LowPart, psd->str.u.cStr, MAX_PATH);
 698             }
 699             break;
 700         case 3:         /* free size */
 701             if (_ILIsDrive (pidl)) {
 702                 _ILSimpleGetText (pidl, szPath, MAX_PATH);
 703                 GetDiskFreeSpaceExA (szPath, &ulBytes, NULL, NULL);
 704                 StrFormatByteSizeA (ulBytes.u.LowPart, psd->str.u.cStr, MAX_PATH);
 705             }
 706             break;
 707         }
 708         hr = S_OK;
 709     }
 710
 711     return hr;
 712 }
 713 static HRESULT WINAPI ISF_MyComputer_fnMapColumnToSCID (IShellFolder2 * iface, UINT column, SHCOLUMNID * pscid)
 714 {
 715     IGenericSFImpl *This = (IGenericSFImpl *)iface;
 716     FIXME ("(%p)\n", This);
 717     return E_NOTIMPL;
 718 }
 719
 720 static IShellFolder2Vtbl vt_ShellFolder2 =
 721 {
 722         ISF_MyComputer_fnQueryInterface,
 723         ISF_MyComputer_fnAddRef,
 724         ISF_MyComputer_fnRelease,
 725         ISF_MyComputer_fnParseDisplayName,
 726         ISF_MyComputer_fnEnumObjects,
 727         ISF_MyComputer_fnBindToObject,
 728         ISF_MyComputer_fnBindToStorage,
 729         ISF_MyComputer_fnCompareIDs,
 730         ISF_MyComputer_fnCreateViewObject,
 731         ISF_MyComputer_fnGetAttributesOf,
 732         ISF_MyComputer_fnGetUIObjectOf,
 733         ISF_MyComputer_fnGetDisplayNameOf,
 734         ISF_MyComputer_fnSetNameOf,
 735         /* ShellFolder2 */
 736         ISF_MyComputer_fnGetDefaultSearchGUID,
 737         ISF_MyComputer_fnEnumSearches,
 738         ISF_MyComputer_fnGetDefaultColumn,
 739         ISF_MyComputer_fnGetDefaultColumnState,
 740         ISF_MyComputer_fnGetDetailsEx,
 741         ISF_MyComputer_fnGetDetailsOf,
 742         ISF_MyComputer_fnMapColumnToSCID
 743 };
 744
 745 /************************************************************************
 746  *      IMCFldr_PersistFolder2_QueryInterface
 747  */
 748 static HRESULT WINAPI IMCFldr_PersistFolder2_QueryInterface (IPersistFolder2 * iface, REFIID iid, LPVOID * ppvObj)
 749 {
 750     _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface);
 751
 752     TRACE ("(%p)\n", This);
 753
 754     return IUnknown_QueryInterface (_IUnknown_ (This), iid, ppvObj);
 755 }
 756
 757 /************************************************************************
 758  *      IMCFldr_PersistFolder2_AddRef
 759  */
 760 static ULONG WINAPI IMCFldr_PersistFolder2_AddRef (IPersistFolder2 * iface)
 761 {
 762     _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface);
 763
 764     TRACE ("(%p)->(count=%lu)\n", This, This->ref);
 765
 766     return IUnknown_AddRef (_IUnknown_ (This));
 767 }
 768
 769 /************************************************************************
 770  *      ISFPersistFolder_Release
 771  */
 772 static ULONG WINAPI IMCFldr_PersistFolder2_Release (IPersistFolder2 * iface)
 773 {
 774     _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface);
 775
 776     TRACE ("(%p)->(count=%lu)\n", This, This->ref);
 777
 778     return IUnknown_Release (_IUnknown_ (This));
 779 }
 780
 781 /************************************************************************
 782  *      IMCFldr_PersistFolder2_GetClassID
 783  */
 784 static HRESULT WINAPI IMCFldr_PersistFolder2_GetClassID (IPersistFolder2 * iface, CLSID * lpClassId)
 785 {
 786     _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface);
 787
 788     TRACE ("(%p)\n", This);
 789
 790     if (!lpClassId)
 791         return E_POINTER;
 792     *lpClassId = CLSID_MyComputer;
 793
 794     return S_OK;
 795 }
 796
 797 /************************************************************************
 798  *      IMCFldr_PersistFolder2_Initialize
 799  *
 800  * NOTES: it makes no sense to change the pidl
 801  */
 802 static HRESULT WINAPI IMCFldr_PersistFolder2_Initialize (IPersistFolder2 * iface, LPCITEMIDLIST pidl)
 803 {
 804     _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface);
 805     TRACE ("(%p)->(%p)\n", This, pidl);
 806     return E_NOTIMPL;
 807 }
 808
 809 /**************************************************************************
 810  *      IPersistFolder2_fnGetCurFolder
 811  */
 812 static HRESULT WINAPI IMCFldr_PersistFolder2_GetCurFolder (IPersistFolder2 * iface, LPITEMIDLIST * pidl)
 813 {
 814     _ICOM_THIS_From_IPersistFolder2 (IGenericSFImpl, iface);
 815
 816     TRACE ("(%p)->(%p)\n", This, pidl);
 817
 818     if (!pidl)
 819         return E_POINTER;
 820     *pidl = ILClone (This->pidlRoot);
 821     return S_OK;
 822 }
 823
 824 static IPersistFolder2Vtbl vt_PersistFolder2 =
 825 {
 826         IMCFldr_PersistFolder2_QueryInterface,
 827         IMCFldr_PersistFolder2_AddRef,
 828         IMCFldr_PersistFolder2_Release,
 829         IMCFldr_PersistFolder2_GetClassID,
 830         IMCFldr_PersistFolder2_Initialize,
 831         IMCFldr_PersistFolder2_GetCurFolder
 832 };