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