dlls/shell32/shfldr_desktop.c

   1
   2 /*
   3  *    Virtual Desktop 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, 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
  34 #include "winerror.h"
  35 #include "windef.h"
  36 #include "winbase.h"
  37 #include "winreg.h"
  38 #include "wingdi.h"
  39 #include "winuser.h"
  40
  41 #include "ole2.h"
  42 #include "shlguid.h"
  43
  44 #include "pidl.h"
  45 #include "undocshell.h"
  46 #include "shell32_main.h"
  47 #include "shresdef.h"
  48 #include "shlwapi.h"
  49 #include "shellfolder.h"
  50 #include "wine/debug.h"
  51 #include "debughlp.h"
  52 #include "shfldr.h"
  53
  54 WINE_DEFAULT_DEBUG_CHANNEL (shell);
  55
  56 /* Undocumented functions from shdocvw */
  57 extern HRESULT WINAPI IEParseDisplayNameWithBCW(DWORD codepage, LPCWSTR lpszDisplayName, LPBC pbc, LPITEMIDLIST *ppidl);
  58
  59 /***********************************************************************
  60 *     Desktopfolder implementation
  61 */
  62
  63 typedef struct {
  64     IShellFolder2 IShellFolder2_iface;
  65     IPersistFolder2 IPersistFolder2_iface;
  66     LONG ref;
  67
  68     /* both paths are parsible from the desktop */
  69     LPWSTR sPathTarget;     /* complete path to target used for enumeration and ChangeNotify */
  70     LPITEMIDLIST pidlRoot;  /* absolute pidl */
  71
  72     UINT cfShellIDList;        /* clipboardformat for IDropTarget */
  73     BOOL fAcceptFmt;        /* flag for pending Drop */
  74 } IDesktopFolderImpl;
  75
  76 static IDesktopFolderImpl *cached_sf;
  77
  78 static inline IDesktopFolderImpl *impl_from_IShellFolder2(IShellFolder2 *iface)
  79 {
  80     return CONTAINING_RECORD(iface, IDesktopFolderImpl, IShellFolder2_iface);
  81 }
  82
  83 static inline IDesktopFolderImpl *impl_from_IPersistFolder2( IPersistFolder2 *iface )
  84 {
  85     return CONTAINING_RECORD(iface, IDesktopFolderImpl, IPersistFolder2_iface);
  86 }
  87
  88 static const shvheader desktop_header[] =
  89 {
  90     { &FMTID_Storage, PID_STG_NAME, IDS_SHV_COLUMN1, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT,  LVCFMT_RIGHT, 15 },
  91     { &FMTID_Storage, PID_STG_SIZE, IDS_SHV_COLUMN2, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT,  LVCFMT_RIGHT, 10 },
  92     { &FMTID_Storage, PID_STG_STORAGETYPE, IDS_SHV_COLUMN3, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT,  LVCFMT_RIGHT, 10 },
  93     { &FMTID_Storage, PID_STG_WRITETIME, IDS_SHV_COLUMN4, SHCOLSTATE_TYPE_DATE | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 12 },
  94     { &FMTID_Storage, PID_STG_ATTRIBUTES, IDS_SHV_COLUMN5, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT,  LVCFMT_RIGHT, 5  },
  95 };
  96
  97 /**************************************************************************
  98  *    ISF_Desktop_fnQueryInterface
  99  *
 100  */
 101 static HRESULT WINAPI ISF_Desktop_fnQueryInterface(
 102                 IShellFolder2 * iface, REFIID riid, LPVOID * ppvObj)
 103 {
 104     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 105
 106     TRACE ("(%p)->(%s,%p)\n", This, shdebugstr_guid (riid), ppvObj);
 107
 108     if (!ppvObj) return E_POINTER;
 109
 110     *ppvObj = NULL;
 111
 112     if (IsEqualIID (riid, &IID_IUnknown) ||
 113         IsEqualIID (riid, &IID_IShellFolder) ||
 114         IsEqualIID (riid, &IID_IShellFolder2))
 115     {
 116         *ppvObj = &This->IShellFolder2_iface;
 117     }
 118     else if (IsEqualIID (riid, &IID_IPersist) ||
 119              IsEqualIID (riid, &IID_IPersistFolder) ||
 120              IsEqualIID (riid, &IID_IPersistFolder2))
 121     {
 122         *ppvObj = &This->IPersistFolder2_iface;
 123     }
 124
 125     if (*ppvObj)
 126     {
 127         IUnknown_AddRef ((IUnknown *) (*ppvObj));
 128         TRACE ("-- Interface: (%p)->(%p)\n", ppvObj, *ppvObj);
 129         return S_OK;
 130     }
 131     TRACE ("-- Interface: E_NOINTERFACE\n");
 132     return E_NOINTERFACE;
 133 }
 134
 135 static ULONG WINAPI ISF_Desktop_fnAddRef (IShellFolder2 * iface)
 136 {
 137     return 2; /* non-heap based object */
 138 }
 139
 140 static ULONG WINAPI ISF_Desktop_fnRelease (IShellFolder2 * iface)
 141 {
 142     return 1; /* non-heap based object */
 143 }
 144
 145 /**************************************************************************
 146  *    ISF_Desktop_fnParseDisplayName
 147  *
 148  * NOTES
 149  *    "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}" and "" binds
 150  *    to MyComputer
 151  */
 152 static HRESULT WINAPI ISF_Desktop_fnParseDisplayName (IShellFolder2 * iface,
 153                 HWND hwndOwner, LPBC pbc, LPOLESTR lpszDisplayName,
 154                 DWORD * pchEaten, LPITEMIDLIST * ppidl, DWORD * pdwAttributes)
 155 {
 156     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 157     WCHAR szElement[MAX_PATH];
 158     LPCWSTR szNext = NULL;
 159     LPITEMIDLIST pidlTemp = NULL;
 160     PARSEDURLW urldata;
 161     HRESULT hr = S_OK;
 162     CLSID clsid;
 163
 164     TRACE ("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n",
 165            This, hwndOwner, pbc, lpszDisplayName, debugstr_w(lpszDisplayName),
 166            pchEaten, ppidl, pdwAttributes);
 167
 168     if (!ppidl) return E_INVALIDARG;
 169     *ppidl = 0;
 170
 171     if (!lpszDisplayName) return E_INVALIDARG;
 172
 173     if (pchEaten)
 174         *pchEaten = 0;        /* strange but like the original */
 175
 176     urldata.cbSize = sizeof(urldata);
 177
 178     if (lpszDisplayName[0] == ':' && lpszDisplayName[1] == ':')
 179     {
 180         szNext = GetNextElementW (lpszDisplayName, szElement, MAX_PATH);
 181         TRACE ("-- element: %s\n", debugstr_w (szElement));
 182         SHCLSIDFromStringW (szElement + 2, &clsid);
 183         pidlTemp = _ILCreateGuid (PT_GUID, &clsid);
 184     }
 185     else if (PathGetDriveNumberW (lpszDisplayName) >= 0)
 186     {
 187         /* it's a filesystem path with a drive. Let MyComputer/UnixDosFolder parse it */
 188         if (UNIXFS_is_rooted_at_desktop())
 189             pidlTemp = _ILCreateGuid(PT_GUID, &CLSID_UnixDosFolder);
 190         else
 191             pidlTemp = _ILCreateMyComputer ();
 192         szNext = lpszDisplayName;
 193     }
 194     else if (PathIsUNCW(lpszDisplayName))
 195     {
 196         pidlTemp = _ILCreateNetwork();
 197         szNext = lpszDisplayName;
 198     }
 199     else if( (pidlTemp = SHELL32_CreatePidlFromBindCtx(pbc, lpszDisplayName)) )
 200     {
 201         *ppidl = pidlTemp;
 202         return S_OK;
 203     }
 204     else if (SUCCEEDED(ParseURLW(lpszDisplayName, &urldata)))
 205     {
 206         if (urldata.nScheme == URL_SCHEME_SHELL) /* handle shell: urls */
 207         {
 208             TRACE ("-- shell url: %s\n", debugstr_w(urldata.pszSuffix));
 209             SHCLSIDFromStringW (urldata.pszSuffix+2, &clsid);
 210             pidlTemp = _ILCreateGuid (PT_GUID, &clsid);
 211         }
 212         else
 213             return IEParseDisplayNameWithBCW(CP_ACP,lpszDisplayName,pbc,ppidl);
 214     }
 215     else
 216     {
 217         /* it's a filesystem path on the desktop. Let a FSFolder parse it */
 218
 219         if (*lpszDisplayName)
 220         {
 221             if (*lpszDisplayName == '/')
 222             {
 223                 /* UNIX paths should be parsed by unixfs */
 224                 IShellFolder *unixFS;
 225                 hr = UnixFolder_Constructor(NULL, &IID_IShellFolder, (LPVOID*)&unixFS);
 226                 if (SUCCEEDED(hr))
 227                 {
 228                     hr = IShellFolder_ParseDisplayName(unixFS, NULL, NULL,
 229                             lpszDisplayName, NULL, &pidlTemp, NULL);
 230                     IShellFolder_Release(unixFS);
 231                 }
 232             }
 233             else
 234             {
 235                 /* build a complete path to create a simple pidl */
 236                 WCHAR szPath[MAX_PATH];
 237                 LPWSTR pathPtr;
 238
 239                 lstrcpynW(szPath, This->sPathTarget, MAX_PATH);
 240                 pathPtr = PathAddBackslashW(szPath);
 241                 if (pathPtr)
 242                 {
 243                     lstrcpynW(pathPtr, lpszDisplayName, MAX_PATH - (pathPtr - szPath));
 244                     hr = _ILCreateFromPathW(szPath, &pidlTemp);
 245                 }
 246                 else
 247                 {
 248                     /* should never reach here, but for completeness */
 249                     hr = E_NOT_SUFFICIENT_BUFFER;
 250                 }
 251             }
 252         }
 253         else
 254             pidlTemp = _ILCreateMyComputer();
 255
 256         szNext = NULL;
 257     }
 258
 259     if (SUCCEEDED(hr) && pidlTemp)
 260     {
 261         if (szNext && *szNext)
 262         {
 263             hr = SHELL32_ParseNextElement(iface, hwndOwner, pbc,
 264                     &pidlTemp, (LPOLESTR) szNext, pchEaten, pdwAttributes);
 265         }
 266         else
 267         {
 268             if (pdwAttributes && *pdwAttributes)
 269                 hr = SHELL32_GetItemAttributes(iface, pidlTemp, pdwAttributes);
 270         }
 271     }
 272
 273     *ppidl = pidlTemp;
 274
 275     TRACE ("(%p)->(-- ret=0x%08x)\n", This, hr);
 276
 277     return hr;
 278 }
 279
 280 static void add_shell_namespace_extensions(IEnumIDListImpl *list, HKEY root)
 281 {
 282     static const WCHAR Desktop_NameSpaceW[] = { 'S','O','F','T','W','A','R','E','\\',
 283         'M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\',
 284         'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
 285         'E','x','p','l','o','r','e','r','\\','D','e','s','k','t','o','p','\\',
 286         'N','a','m','e','s','p','a','c','e','\0' };
 287     static const WCHAR clsidfmtW[] = {'C','L','S','I','D','\\','%','s','\\',
 288         'S','h','e','l','l','F','o','l','d','e','r',0};
 289     static const WCHAR attributesW[] = {'A','t','t','r','i','b','u','t','e','s',0};
 290     WCHAR guid[39], clsidkeyW[ARRAY_SIZE(clsidfmtW) + 39];
 291     DWORD size, i = 0;
 292     HKEY hkey;
 293
 294     if (RegOpenKeyExW(root, Desktop_NameSpaceW, 0, KEY_READ, &hkey))
 295         return;
 296
 297     size = ARRAY_SIZE(guid);
 298     while (!RegEnumKeyExW(hkey, i++, guid, &size, 0, NULL, NULL, NULL))
 299     {
 300         DWORD attributes, value_size = sizeof(attributes);
 301
 302         /* Check if extension is configured as nonenumerable */
 303         sprintfW(clsidkeyW, clsidfmtW, guid);
 304         RegGetValueW(HKEY_CLASSES_ROOT, clsidkeyW, attributesW, RRF_RT_REG_DWORD | RRF_ZEROONFAILURE,
 305             NULL, &attributes, &value_size);
 306
 307         if (!(attributes & SFGAO_NONENUMERATED))
 308             AddToEnumList(list, _ILCreateGuidFromStrW(guid));
 309         size = ARRAY_SIZE(guid);
 310     }
 311
 312     RegCloseKey(hkey);
 313 }
 314
 315 /**************************************************************************
 316  *  CreateDesktopEnumList()
 317  */
 318 static BOOL CreateDesktopEnumList(IEnumIDListImpl *list, DWORD dwFlags)
 319 {
 320     BOOL ret = TRUE;
 321     WCHAR szPath[MAX_PATH];
 322
 323     TRACE("(%p)->(flags=0x%08x)\n", list, dwFlags);
 324
 325     /* enumerate the root folders */
 326     if (dwFlags & SHCONTF_FOLDERS)
 327     {
 328         ret = AddToEnumList(list, _ILCreateMyComputer());
 329         add_shell_namespace_extensions(list, HKEY_LOCAL_MACHINE);
 330         add_shell_namespace_extensions(list, HKEY_CURRENT_USER);
 331     }
 332
 333     /* enumerate the elements in %windir%\desktop */
 334     ret = ret && SHGetSpecialFolderPathW(0, szPath, CSIDL_DESKTOPDIRECTORY, FALSE);
 335     ret = ret && CreateFolderEnumList(list, szPath, dwFlags);
 336
 337     return ret;
 338 }
 339
 340 /**************************************************************************
 341  *        ISF_Desktop_fnEnumObjects
 342  */
 343 static HRESULT WINAPI ISF_Desktop_fnEnumObjects (IShellFolder2 * iface,
 344                 HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST * ppEnumIDList)
 345 {
 346     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 347     IEnumIDListImpl *list;
 348
 349     TRACE ("(%p)->(HWND=%p flags=0x%08x pplist=%p)\n",
 350            This, hwndOwner, dwFlags, ppEnumIDList);
 351
 352     if (!(list = IEnumIDList_Constructor()))
 353         return E_OUTOFMEMORY;
 354     CreateDesktopEnumList(list, dwFlags);
 355     *ppEnumIDList = &list->IEnumIDList_iface;
 356
 357     TRACE ("-- (%p)->(new ID List: %p)\n", This, *ppEnumIDList);
 358
 359     return S_OK;
 360 }
 361
 362 /**************************************************************************
 363  *        ISF_Desktop_fnBindToObject
 364  */
 365 static HRESULT WINAPI ISF_Desktop_fnBindToObject (IShellFolder2 * iface,
 366                 LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID * ppvOut)
 367 {
 368     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 369
 370     TRACE ("(%p)->(pidl=%p,%p,%s,%p)\n",
 371            This, pidl, pbcReserved, shdebugstr_guid (riid), ppvOut);
 372
 373     return SHELL32_BindToChild( This->pidlRoot, This->sPathTarget, pidl, riid, ppvOut );
 374 }
 375
 376 /**************************************************************************
 377  *    ISF_Desktop_fnBindToStorage
 378  */
 379 static HRESULT WINAPI ISF_Desktop_fnBindToStorage (IShellFolder2 * iface,
 380                 LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID * ppvOut)
 381 {
 382     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 383
 384     FIXME ("(%p)->(pidl=%p,%p,%s,%p) stub\n",
 385            This, pidl, pbcReserved, shdebugstr_guid (riid), ppvOut);
 386
 387     *ppvOut = NULL;
 388     return E_NOTIMPL;
 389 }
 390
 391 /**************************************************************************
 392  *     ISF_Desktop_fnCompareIDs
 393  */
 394 static HRESULT WINAPI ISF_Desktop_fnCompareIDs (IShellFolder2 *iface,
 395                         LPARAM lParam, LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2)
 396 {
 397     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 398     HRESULT hr;
 399
 400     TRACE ("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This, lParam, pidl1, pidl2);
 401     hr = SHELL32_CompareIDs(iface, lParam, pidl1, pidl2);
 402     TRACE ("-- 0x%08x\n", hr);
 403     return hr;
 404 }
 405
 406 /**************************************************************************
 407  *    ISF_Desktop_fnCreateViewObject
 408  */
 409 static HRESULT WINAPI ISF_Desktop_fnCreateViewObject (IShellFolder2 * iface,
 410                               HWND hwndOwner, REFIID riid, LPVOID * ppvOut)
 411 {
 412     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 413     LPSHELLVIEW pShellView;
 414     HRESULT hr = E_INVALIDARG;
 415
 416     TRACE ("(%p)->(hwnd=%p,%s,%p)\n",
 417            This, hwndOwner, shdebugstr_guid (riid), ppvOut);
 418
 419     if (!ppvOut)
 420         return E_INVALIDARG;
 421
 422     *ppvOut = NULL;
 423
 424     if (IsEqualIID (riid, &IID_IDropTarget))
 425     {
 426         WARN ("IDropTarget not implemented\n");
 427         hr = E_NOTIMPL;
 428     }
 429     else if (IsEqualIID (riid, &IID_IContextMenu))
 430     {
 431         hr = BackgroundMenu_Constructor((IShellFolder*)iface, TRUE, riid, ppvOut);
 432     }
 433     else if (IsEqualIID (riid, &IID_IShellView))
 434     {
 435         pShellView = IShellView_Constructor ((IShellFolder *) iface);
 436         if (pShellView)
 437         {
 438             hr = IShellView_QueryInterface (pShellView, riid, ppvOut);
 439             IShellView_Release (pShellView);
 440         }
 441     }
 442     TRACE ("-- (%p)->(interface=%p)\n", This, ppvOut);
 443     return hr;
 444 }
 445
 446 /**************************************************************************
 447  *  ISF_Desktop_fnGetAttributesOf
 448  */
 449 static HRESULT WINAPI ISF_Desktop_fnGetAttributesOf (IShellFolder2 * iface,
 450                 UINT cidl, LPCITEMIDLIST * apidl, DWORD * rgfInOut)
 451 {
 452     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 453
 454     static const DWORD dwDesktopAttributes =
 455         SFGAO_STORAGE | SFGAO_HASPROPSHEET | SFGAO_STORAGEANCESTOR |
 456         SFGAO_FILESYSANCESTOR | SFGAO_FOLDER | SFGAO_FILESYSTEM | SFGAO_HASSUBFOLDER;
 457     static const DWORD dwMyComputerAttributes =
 458         SFGAO_CANRENAME | SFGAO_CANDELETE | SFGAO_HASPROPSHEET |
 459         SFGAO_DROPTARGET | SFGAO_FILESYSANCESTOR | SFGAO_FOLDER | SFGAO_HASSUBFOLDER;
 460
 461     TRACE ("(%p)->(cidl=%d apidl=%p mask=%p (0x%08x))\n",
 462            This, cidl, apidl, rgfInOut, rgfInOut ? *rgfInOut : 0);
 463
 464     if (!rgfInOut)
 465         return E_INVALIDARG;
 466     if (cidl && !apidl)
 467         return E_INVALIDARG;
 468
 469     if (*rgfInOut == 0)
 470         *rgfInOut = ~0;
 471
 472     if(cidl == 0) {
 473         *rgfInOut &= dwDesktopAttributes;
 474     } else {
 475         while (cidl > 0 && *apidl) {
 476             pdump (*apidl);
 477             if (_ILIsDesktop(*apidl)) {
 478                 *rgfInOut &= dwDesktopAttributes;
 479             } else if (_ILIsMyComputer(*apidl)) {
 480                 *rgfInOut &= dwMyComputerAttributes;
 481             } else {
 482                 SHELL32_GetItemAttributes(iface, *apidl, rgfInOut);
 483             }
 484             apidl++;
 485             cidl--;
 486         }
 487     }
 488     /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
 489     *rgfInOut &= ~SFGAO_VALIDATE;
 490
 491     TRACE ("-- result=0x%08x\n", *rgfInOut);
 492
 493     return S_OK;
 494 }
 495
 496 /**************************************************************************
 497  *    ISF_Desktop_fnGetUIObjectOf
 498  *
 499  * PARAMETERS
 500  *  HWND           hwndOwner, //[in ] Parent window for any output
 501  *  UINT           cidl,      //[in ] array size
 502  *  LPCITEMIDLIST* apidl,     //[in ] simple pidl array
 503  *  REFIID         riid,      //[in ] Requested Interface
 504  *  UINT*          prgfInOut, //[   ] reserved
 505  *  LPVOID*        ppvObject) //[out] Resulting Interface
 506  *
 507  */
 508 static HRESULT WINAPI ISF_Desktop_fnGetUIObjectOf (IShellFolder2 * iface,
 509                 HWND hwndOwner, UINT cidl, LPCITEMIDLIST * apidl,
 510                 REFIID riid, UINT * prgfInOut, LPVOID * ppvOut)
 511 {
 512     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 513
 514     LPITEMIDLIST pidl;
 515     IUnknown *pObj = NULL;
 516     HRESULT hr = E_INVALIDARG;
 517
 518     TRACE ("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n",
 519        This, hwndOwner, cidl, apidl, shdebugstr_guid (riid), prgfInOut, ppvOut);
 520
 521     if (!ppvOut)
 522         return E_INVALIDARG;
 523
 524     *ppvOut = NULL;
 525
 526     if (IsEqualIID (riid, &IID_IContextMenu))
 527     {
 528         if (cidl > 0)
 529             return ItemMenu_Constructor((IShellFolder*)iface, This->pidlRoot, apidl, cidl, riid, ppvOut);
 530         else
 531             return BackgroundMenu_Constructor((IShellFolder*)iface, TRUE, riid, ppvOut);
 532     }
 533     else if (IsEqualIID (riid, &IID_IDataObject) && (cidl >= 1))
 534     {
 535         pObj = (LPUNKNOWN) IDataObject_Constructor( hwndOwner,
 536                                                   This->pidlRoot, apidl, cidl);
 537         hr = S_OK;
 538     }
 539     else if (IsEqualIID (riid, &IID_IExtractIconA) && (cidl == 1))
 540     {
 541         pidl = ILCombine (This->pidlRoot, apidl[0]);
 542         pObj = (LPUNKNOWN) IExtractIconA_Constructor (pidl);
 543         SHFree (pidl);
 544         hr = S_OK;
 545     }
 546     else if (IsEqualIID (riid, &IID_IExtractIconW) && (cidl == 1))
 547     {
 548         pidl = ILCombine (This->pidlRoot, apidl[0]);
 549         pObj = (LPUNKNOWN) IExtractIconW_Constructor (pidl);
 550         SHFree (pidl);
 551         hr = S_OK;
 552     }
 553     else if (IsEqualIID (riid, &IID_IDropTarget) && (cidl >= 1))
 554     {
 555         hr = IShellFolder2_QueryInterface (iface,
 556                                           &IID_IDropTarget, (LPVOID *) & pObj);
 557     }
 558     else if ((IsEqualIID(riid,&IID_IShellLinkW) ||
 559               IsEqualIID(riid,&IID_IShellLinkA)) && (cidl == 1))
 560     {
 561         pidl = ILCombine (This->pidlRoot, apidl[0]);
 562         hr = IShellLink_ConstructFromFile(NULL, riid, pidl, &pObj);
 563         SHFree (pidl);
 564     }
 565     else
 566         hr = E_NOINTERFACE;
 567
 568     if (SUCCEEDED(hr) && !pObj)
 569         hr = E_OUTOFMEMORY;
 570
 571     *ppvOut = pObj;
 572     TRACE ("(%p)->hr=0x%08x\n", This, hr);
 573     return hr;
 574 }
 575
 576 /**************************************************************************
 577  *    ISF_Desktop_fnGetDisplayNameOf
 578  *
 579  * NOTES
 580  *    special case: pidl = null gives desktop-name back
 581  */
 582 static HRESULT WINAPI ISF_Desktop_fnGetDisplayNameOf (IShellFolder2 * iface,
 583                 LPCITEMIDLIST pidl, DWORD dwFlags, LPSTRRET strRet)
 584 {
 585     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 586     HRESULT hr = S_OK;
 587     LPWSTR pszPath;
 588
 589     TRACE ("(%p)->(pidl=%p,0x%08x,%p)\n", This, pidl, dwFlags, strRet);
 590     pdump (pidl);
 591
 592     if (!strRet)
 593         return E_INVALIDARG;
 594
 595     pszPath = CoTaskMemAlloc((MAX_PATH +1) * sizeof(WCHAR));
 596     if (!pszPath)
 597         return E_OUTOFMEMORY;
 598
 599     if (_ILIsDesktop (pidl))
 600     {
 601         if ((GET_SHGDN_RELATION (dwFlags) == SHGDN_NORMAL) &&
 602             (GET_SHGDN_FOR (dwFlags) & SHGDN_FORPARSING))
 603             strcpyW(pszPath, This->sPathTarget);
 604         else
 605             HCR_GetClassNameW(&CLSID_ShellDesktop, pszPath, MAX_PATH);
 606     }
 607     else if (_ILIsPidlSimple (pidl))
 608     {
 609         GUID const *clsid;
 610
 611         if ((clsid = _ILGetGUIDPointer (pidl)))
 612         {
 613             if ((GET_SHGDN_FOR (dwFlags) & (SHGDN_FORPARSING | SHGDN_FORADDRESSBAR)) == SHGDN_FORPARSING)
 614             {
 615                 BOOL bWantsForParsing;
 616
 617                 /*
 618                  * We can only get a filesystem path from a shellfolder if the
 619                  *  value WantsFORPARSING in CLSID\\{...}\\shellfolder exists.
 620                  *
 621                  * Exception: The MyComputer folder doesn't have this key,
 622                  *   but any other filesystem backed folder it needs it.
 623                  */
 624                 if (IsEqualIID (clsid, &CLSID_MyComputer))
 625                 {
 626                     bWantsForParsing = TRUE;
 627                 }
 628                 else
 629                 {
 630                     /* get the "WantsFORPARSING" flag from the registry */
 631                     static const WCHAR clsidW[] =
 632                      { 'C','L','S','I','D','\\',0 };
 633                     static const WCHAR shellfolderW[] =
 634                      { '\\','s','h','e','l','l','f','o','l','d','e','r',0 };
 635                     static const WCHAR wantsForParsingW[] =
 636                      { 'W','a','n','t','s','F','o','r','P','a','r','s','i','n',
 637                      'g',0 };
 638                     WCHAR szRegPath[100];
 639                     LONG r;
 640
 641                     lstrcpyW (szRegPath, clsidW);
 642                     SHELL32_GUIDToStringW (clsid, &szRegPath[6]);
 643                     lstrcatW (szRegPath, shellfolderW);
 644                     r = SHGetValueW(HKEY_CLASSES_ROOT, szRegPath,
 645                                     wantsForParsingW, NULL, NULL, NULL);
 646                     if (r == ERROR_SUCCESS)
 647                         bWantsForParsing = TRUE;
 648                     else
 649                         bWantsForParsing = FALSE;
 650                 }
 651
 652                 if ((GET_SHGDN_RELATION (dwFlags) == SHGDN_NORMAL) &&
 653                      bWantsForParsing)
 654                 {
 655                     /*
 656                      * we need the filesystem path to the destination folder.
 657                      * Only the folder itself can know it
 658                      */
 659                     hr = SHELL32_GetDisplayNameOfChild (iface, pidl, dwFlags,
 660                                                         pszPath,
 661                                                         MAX_PATH);
 662                 }
 663                 else
 664                 {
 665                     /* parsing name like ::{...} */
 666                     pszPath[0] = ':';
 667                     pszPath[1] = ':';
 668                     SHELL32_GUIDToStringW (clsid, &pszPath[2]);
 669                 }
 670             }
 671             else
 672             {
 673                 /* user friendly name */
 674                 HCR_GetClassNameW (clsid, pszPath, MAX_PATH);
 675             }
 676         }
 677         else
 678         {
 679             int cLen = 0;
 680
 681             /* file system folder or file rooted at the desktop */
 682             if ((GET_SHGDN_FOR(dwFlags) == SHGDN_FORPARSING) &&
 683                 (GET_SHGDN_RELATION(dwFlags) != SHGDN_INFOLDER))
 684             {
 685                 lstrcpynW(pszPath, This->sPathTarget, MAX_PATH - 1);
 686                 PathAddBackslashW(pszPath);
 687                 cLen = lstrlenW(pszPath);
 688             }
 689
 690             _ILSimpleGetTextW(pidl, pszPath + cLen, MAX_PATH - cLen);
 691
 692             if (!_ILIsFolder(pidl))
 693                 SHELL_FS_ProcessDisplayFilename(pszPath, dwFlags);
 694         }
 695     }
 696     else
 697     {
 698         /* a complex pidl, let the subfolder do the work */
 699         hr = SHELL32_GetDisplayNameOfChild (iface, pidl, dwFlags,
 700                                             pszPath, MAX_PATH);
 701     }
 702
 703     if (SUCCEEDED(hr))
 704     {
 705         /* Win9x always returns ANSI strings, NT always returns Unicode strings */
 706         if (GetVersion() & 0x80000000)
 707         {
 708             strRet->uType = STRRET_CSTR;
 709             if (!WideCharToMultiByte(CP_ACP, 0, pszPath, -1, strRet->u.cStr, MAX_PATH,
 710                                      NULL, NULL))
 711                 strRet->u.cStr[0] = '\0';
 712             CoTaskMemFree(pszPath);
 713         }
 714         else
 715         {
 716             strRet->uType = STRRET_WSTR;
 717             strRet->u.pOleStr = pszPath;
 718         }
 719     }
 720     else
 721         CoTaskMemFree(pszPath);
 722
 723     TRACE ("-- (%p)->(%s,0x%08x)\n", This,
 724     strRet->uType == STRRET_CSTR ? strRet->u.cStr :
 725     debugstr_w(strRet->u.pOleStr), hr);
 726     return hr;
 727 }
 728
 729 /**************************************************************************
 730  *  ISF_Desktop_fnSetNameOf
 731  *  Changes the name of a file object or subfolder, possibly changing its item
 732  *  identifier in the process.
 733  *
 734  * PARAMETERS
 735  *  HWND          hwndOwner,  //[in ] Owner window for output
 736  *  LPCITEMIDLIST pidl,       //[in ] simple pidl of item to change
 737  *  LPCOLESTR     lpszName,   //[in ] the items new display name
 738  *  DWORD         dwFlags,    //[in ] SHGNO formatting flags
 739  *  LPITEMIDLIST* ppidlOut)   //[out] simple pidl returned
 740  */
 741 static HRESULT WINAPI ISF_Desktop_fnSetNameOf (IShellFolder2 * iface,
 742                 HWND hwndOwner, LPCITEMIDLIST pidl,    /* simple pidl */
 743                 LPCOLESTR lpName, DWORD dwFlags, LPITEMIDLIST * pPidlOut)
 744 {
 745     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 746
 747     FIXME ("(%p)->(%p,pidl=%p,%s,%u,%p) stub\n", This, hwndOwner, pidl,
 748            debugstr_w (lpName), dwFlags, pPidlOut);
 749
 750     return E_FAIL;
 751 }
 752
 753 static HRESULT WINAPI ISF_Desktop_fnGetDefaultSearchGUID(IShellFolder2 *iface, GUID *guid)
 754 {
 755     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 756     TRACE("(%p)->(%p)\n", This, guid);
 757     return E_NOTIMPL;
 758 }
 759
 760 static HRESULT WINAPI ISF_Desktop_fnEnumSearches (IShellFolder2 *iface,
 761                 IEnumExtraSearch ** ppenum)
 762 {
 763     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 764     FIXME ("(%p)->(%p) stub\n", This, ppenum);
 765     return E_NOTIMPL;
 766 }
 767
 768 static HRESULT WINAPI ISF_Desktop_fnGetDefaultColumn(IShellFolder2 *iface, DWORD reserved, ULONG *sort, ULONG *display)
 769 {
 770     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 771
 772     TRACE ("(%p)->(%#x, %p, %p)\n", This, reserved, sort, display);
 773
 774     return E_NOTIMPL;
 775 }
 776
 777 static HRESULT WINAPI ISF_Desktop_fnGetDefaultColumnState (
 778                 IShellFolder2 * iface, UINT iColumn, DWORD * pcsFlags)
 779 {
 780     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 781
 782     TRACE ("(%p)->(%d %p)\n", This, iColumn, pcsFlags);
 783
 784     if (!pcsFlags || iColumn >= ARRAY_SIZE(desktop_header))
 785         return E_INVALIDARG;
 786
 787     *pcsFlags = desktop_header[iColumn].pcsFlags;
 788
 789     return S_OK;
 790 }
 791
 792 static HRESULT WINAPI ISF_Desktop_fnGetDetailsEx (IShellFolder2 * iface,
 793                 LPCITEMIDLIST pidl, const SHCOLUMNID * pscid, VARIANT * pv)
 794 {
 795     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 796     FIXME ("(%p)->(%p %p %p) stub\n", This, pidl, pscid, pv);
 797     return E_NOTIMPL;
 798 }
 799
 800 static HRESULT WINAPI ISF_Desktop_fnGetDetailsOf (IShellFolder2 * iface,
 801                 LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS * psd)
 802 {
 803     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 804
 805     HRESULT hr = S_OK;
 806
 807     TRACE ("(%p)->(%p %i %p)\n", This, pidl, iColumn, psd);
 808
 809     if (!psd || iColumn >= ARRAY_SIZE(desktop_header))
 810         return E_INVALIDARG;
 811
 812     if (!pidl)
 813         return SHELL32_GetColumnDetails(desktop_header, iColumn, psd);
 814
 815     /* the data from the pidl */
 816     psd->str.uType = STRRET_CSTR;
 817     switch (iColumn)
 818     {
 819     case 0:        /* name */
 820         hr = IShellFolder2_GetDisplayNameOf(iface, pidl,
 821                    SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str);
 822         break;
 823     case 1:        /* size */
 824         _ILGetFileSize (pidl, psd->str.u.cStr, MAX_PATH);
 825         break;
 826     case 2:        /* type */
 827         _ILGetFileType (pidl, psd->str.u.cStr, MAX_PATH);
 828         break;
 829     case 3:        /* date */
 830         _ILGetFileDate (pidl, psd->str.u.cStr, MAX_PATH);
 831         break;
 832     case 4:        /* attributes */
 833         _ILGetFileAttributes (pidl, psd->str.u.cStr, MAX_PATH);
 834         break;
 835     }
 836
 837     return hr;
 838 }
 839
 840 static HRESULT WINAPI ISF_Desktop_fnMapColumnToSCID(IShellFolder2 *iface, UINT column, SHCOLUMNID *scid)
 841 {
 842     IDesktopFolderImpl *This = impl_from_IShellFolder2(iface);
 843
 844     TRACE("(%p)->(%u %p)\n", This, column, scid);
 845
 846     if (column >= ARRAY_SIZE(desktop_header))
 847         return E_INVALIDARG;
 848
 849     return shellfolder_map_column_to_scid(desktop_header, column, scid);
 850 }
 851
 852 static const IShellFolder2Vtbl vt_MCFldr_ShellFolder2 =
 853 {
 854     ISF_Desktop_fnQueryInterface,
 855     ISF_Desktop_fnAddRef,
 856     ISF_Desktop_fnRelease,
 857     ISF_Desktop_fnParseDisplayName,
 858     ISF_Desktop_fnEnumObjects,
 859     ISF_Desktop_fnBindToObject,
 860     ISF_Desktop_fnBindToStorage,
 861     ISF_Desktop_fnCompareIDs,
 862     ISF_Desktop_fnCreateViewObject,
 863     ISF_Desktop_fnGetAttributesOf,
 864     ISF_Desktop_fnGetUIObjectOf,
 865     ISF_Desktop_fnGetDisplayNameOf,
 866     ISF_Desktop_fnSetNameOf,
 867     /* ShellFolder2 */
 868     ISF_Desktop_fnGetDefaultSearchGUID,
 869     ISF_Desktop_fnEnumSearches,
 870     ISF_Desktop_fnGetDefaultColumn,
 871     ISF_Desktop_fnGetDefaultColumnState,
 872     ISF_Desktop_fnGetDetailsEx,
 873     ISF_Desktop_fnGetDetailsOf,
 874     ISF_Desktop_fnMapColumnToSCID
 875 };
 876
 877 /**************************************************************************
 878  *    IPersist
 879  */
 880 static HRESULT WINAPI ISF_Desktop_IPersistFolder2_fnQueryInterface(
 881     IPersistFolder2 *iface, REFIID riid, LPVOID *ppvObj)
 882 {
 883     IDesktopFolderImpl *This = impl_from_IPersistFolder2( iface );
 884     return IShellFolder2_QueryInterface(&This->IShellFolder2_iface, riid, ppvObj);
 885 }
 886
 887 static ULONG WINAPI ISF_Desktop_IPersistFolder2_fnAddRef(
 888     IPersistFolder2 *iface)
 889 {
 890     IDesktopFolderImpl *This = impl_from_IPersistFolder2( iface );
 891     return IShellFolder2_AddRef(&This->IShellFolder2_iface);
 892 }
 893
 894 static ULONG WINAPI ISF_Desktop_IPersistFolder2_fnRelease(
 895     IPersistFolder2 *iface)
 896 {
 897     IDesktopFolderImpl *This = impl_from_IPersistFolder2( iface );
 898     return IShellFolder2_Release(&This->IShellFolder2_iface);
 899 }
 900
 901 static HRESULT WINAPI ISF_Desktop_IPersistFolder2_fnGetClassID(
 902     IPersistFolder2 *iface, CLSID *clsid)
 903 {
 904     *clsid = CLSID_ShellDesktop;
 905     return S_OK;
 906 }
 907 static HRESULT WINAPI ISF_Desktop_IPersistFolder2_fnInitialize(
 908     IPersistFolder2 *iface, LPCITEMIDLIST pidl)
 909 {
 910     IDesktopFolderImpl *This = impl_from_IPersistFolder2( iface );
 911     FIXME ("(%p)->(%p) stub\n", This, pidl);
 912     return E_NOTIMPL;
 913 }
 914 static HRESULT WINAPI ISF_Desktop_IPersistFolder2_fnGetCurFolder(
 915     IPersistFolder2 *iface, LPITEMIDLIST *ppidl)
 916 {
 917     IDesktopFolderImpl *This = impl_from_IPersistFolder2( iface );
 918     *ppidl = ILClone(This->pidlRoot);
 919     return S_OK;
 920 }
 921
 922 static const IPersistFolder2Vtbl vt_IPersistFolder2 =
 923 {
 924     ISF_Desktop_IPersistFolder2_fnQueryInterface,
 925     ISF_Desktop_IPersistFolder2_fnAddRef,
 926     ISF_Desktop_IPersistFolder2_fnRelease,
 927     ISF_Desktop_IPersistFolder2_fnGetClassID,
 928     ISF_Desktop_IPersistFolder2_fnInitialize,
 929     ISF_Desktop_IPersistFolder2_fnGetCurFolder
 930 };
 931
 932 void release_desktop_folder(void)
 933 {
 934     if (!cached_sf) return;
 935     SHFree(cached_sf->pidlRoot);
 936     SHFree(cached_sf->sPathTarget);
 937     LocalFree(cached_sf);
 938 }
 939
 940 /**************************************************************************
 941  *    ISF_Desktop_Constructor
 942  */
 943 HRESULT WINAPI ISF_Desktop_Constructor (
 944                 IUnknown * pUnkOuter, REFIID riid, LPVOID * ppv)
 945 {
 946     WCHAR szMyPath[MAX_PATH];
 947
 948     TRACE ("unkOut=%p %s\n", pUnkOuter, shdebugstr_guid (riid));
 949
 950     if (!ppv)
 951         return E_POINTER;
 952     if (pUnkOuter)
 953         return CLASS_E_NOAGGREGATION;
 954
 955     if (!cached_sf)
 956     {
 957         IDesktopFolderImpl *sf;
 958
 959         if (!SHGetSpecialFolderPathW( 0, szMyPath, CSIDL_DESKTOPDIRECTORY, TRUE ))
 960             return E_UNEXPECTED;
 961
 962         sf = LocalAlloc( LMEM_ZEROINIT, sizeof (IDesktopFolderImpl) );
 963         if (!sf)
 964             return E_OUTOFMEMORY;
 965
 966         sf->ref = 1;
 967         sf->IShellFolder2_iface.lpVtbl = &vt_MCFldr_ShellFolder2;
 968         sf->IPersistFolder2_iface.lpVtbl = &vt_IPersistFolder2;
 969         sf->pidlRoot = _ILCreateDesktop();    /* my qualified pidl */
 970         sf->sPathTarget = SHAlloc( (lstrlenW(szMyPath) + 1)*sizeof(WCHAR) );
 971         lstrcpyW( sf->sPathTarget, szMyPath );
 972
 973         if (InterlockedCompareExchangePointer((void *)&cached_sf, sf, NULL) != NULL)
 974         {
 975             /* some other thread already been here */
 976             SHFree( sf->pidlRoot );
 977             SHFree( sf->sPathTarget );
 978             LocalFree( sf );
 979         }
 980     }
 981
 982     return IShellFolder2_QueryInterface( &cached_sf->IShellFolder2_iface, riid, ppv );
 983 }