reactos/dll/win32/shell32/folders/CRecycleBin.cpp

   1 /*
   2  * Trash virtual folder support. The trashing engine is implemented in trash.c
   3  *
   4  * Copyright (C) 2006 Mikolaj Zalewski
   5  * Copyright (C) 2009 Andrew Hill
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include <precomp.h>
  23
  24 #include <mmsystem.h>
  25 #include <ntquery.h>
  26
  27 #define MAX_PROPERTY_SHEET_PAGE 32
  28
  29 WINE_DEFAULT_DEBUG_CHANNEL(CRecycleBin);
  30
  31 typedef struct
  32 {
  33     int column_name_id;
  34     const GUID *fmtId;
  35     DWORD pid;
  36     int pcsFlags;
  37     int fmt;
  38     int cxChars;
  39 } columninfo;
  40
  41 static const columninfo RecycleBinColumns[] =
  42 {
  43     {IDS_SHV_COLUMN_NAME,        &FMTID_Storage,   PID_STG_NAME,       SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT,  LVCFMT_LEFT,  30},
  44     {IDS_SHV_COLUMN_DELFROM, &FMTID_Displaced, PID_DISPLACED_FROM, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT,  LVCFMT_LEFT,  30},
  45     {IDS_SHV_COLUMN_DELDATE, &FMTID_Displaced, PID_DISPLACED_DATE, SHCOLSTATE_TYPE_DATE | SHCOLSTATE_ONBYDEFAULT, LVCFMT_LEFT,  20},
  46     {IDS_SHV_COLUMN_SIZE,        &FMTID_Storage,   PID_STG_SIZE,       SHCOLSTATE_TYPE_INT | SHCOLSTATE_ONBYDEFAULT,  LVCFMT_RIGHT, 20},
  47     {IDS_SHV_COLUMN_TYPE,        &FMTID_Storage,   PID_STG_STORAGETYPE, SHCOLSTATE_TYPE_INT | SHCOLSTATE_ONBYDEFAULT,  LVCFMT_LEFT,  20},
  48     {IDS_SHV_COLUMN_MODIFIED,        &FMTID_Storage,   PID_STG_WRITETIME,  SHCOLSTATE_TYPE_DATE | SHCOLSTATE_ONBYDEFAULT, LVCFMT_LEFT,  20},
  49     /*    {"creation time",  &FMTID_Storage,   PID_STG_CREATETIME, SHCOLSTATE_TYPE_DATE,                        LVCFMT_LEFT,  20}, */
  50     /*    {"attribs",        &FMTID_Storage,   PID_STG_ATTRIBUTES, SHCOLSTATE_TYPE_STR,                         LVCFMT_LEFT,  20},       */
  51 };
  52
  53 #define COLUMN_NAME    0
  54 #define COLUMN_DELFROM 1
  55 #define COLUMN_DATEDEL 2
  56 #define COLUMN_SIZE    3
  57 #define COLUMN_TYPE    4
  58 #define COLUMN_MTIME   5
  59
  60 #define COLUMNS_COUNT  6
  61
  62 /*
  63  * Recycle Bin folder
  64  */
  65
  66 HRESULT CRecyclerExtractIcon_CreateInstance(LPCITEMIDLIST pidl, REFIID riid, LPVOID * ppvOut)
  67 {
  68     CComPtr<IDefaultExtractIconInit> initIcon;
  69     HRESULT hr = SHCreateDefaultExtractIcon(IID_PPV_ARG(IDefaultExtractIconInit, &initIcon));
  70     if (FAILED_UNEXPECTEDLY(hr))
  71         return hr;
  72
  73     /* FIXME: This is completely unimplemented */
  74     initIcon->SetNormalIcon(swShell32Name, 0);
  75
  76     return initIcon->QueryInterface(riid, ppvOut);
  77 }
  78
  79 class CRecycleBinEnum :
  80     public CEnumIDListBase
  81 {
  82     private:
  83     public:
  84         CRecycleBinEnum();
  85         ~CRecycleBinEnum();
  86         HRESULT WINAPI Initialize(DWORD dwFlags);
  87         static BOOL WINAPI CBEnumRecycleBin(IN PVOID Context, IN HANDLE hDeletedFile);
  88         BOOL WINAPI CBEnumRecycleBin(IN HANDLE hDeletedFile);
  89
  90         BEGIN_COM_MAP(CRecycleBinEnum)
  91         COM_INTERFACE_ENTRY_IID(IID_IEnumIDList, IEnumIDList)
  92         END_COM_MAP()
  93 };
  94
  95 class CRecycleBinItemContextMenu :
  96     public CComObjectRootEx<CComMultiThreadModelNoCS>,
  97     public IContextMenu2
  98 {
  99     private:
 100         LPITEMIDLIST                        apidl;
 101     public:
 102         CRecycleBinItemContextMenu();
 103         ~CRecycleBinItemContextMenu();
 104         HRESULT WINAPI Initialize(LPCITEMIDLIST pidl);
 105
 106         // IContextMenu
 107         virtual HRESULT WINAPI QueryContextMenu(HMENU hMenu, UINT indexMenu, UINT idCmdFirst, UINT idCmdLast, UINT uFlags);
 108         virtual HRESULT WINAPI InvokeCommand(LPCMINVOKECOMMANDINFO lpcmi);
 109         virtual HRESULT WINAPI GetCommandString(UINT_PTR idCommand, UINT uFlags, UINT *lpReserved, LPSTR lpszName, UINT uMaxNameLen);
 110
 111         // IContextMenu2
 112         virtual HRESULT WINAPI HandleMenuMsg(UINT uMsg, WPARAM wParam, LPARAM lParam);
 113
 114         BEGIN_COM_MAP(CRecycleBinItemContextMenu)
 115         COM_INTERFACE_ENTRY_IID(IID_IContextMenu, IContextMenu)
 116         COM_INTERFACE_ENTRY_IID(IID_IContextMenu2, IContextMenu2)
 117         END_COM_MAP()
 118 };
 119
 120 typedef struct
 121 {
 122     PIDLRecycleStruct *pFileDetails;
 123     HANDLE hDeletedFile;
 124     BOOL bFound;
 125 } SEARCH_CONTEXT, *PSEARCH_CONTEXT;
 126
 127 BOOL WINAPI CBSearchRecycleBin(IN PVOID Context, IN HANDLE hDeletedFile)
 128 {
 129     PSEARCH_CONTEXT pContext = (PSEARCH_CONTEXT)Context;
 130
 131     PDELETED_FILE_DETAILS_W pFileDetails;
 132     DWORD dwSize;
 133     BOOL ret;
 134
 135     if (!GetDeletedFileDetailsW(hDeletedFile,
 136                                 0,
 137                                 NULL,
 138                                 &dwSize) &&
 139             GetLastError() != ERROR_INSUFFICIENT_BUFFER)
 140     {
 141         ERR("GetDeletedFileDetailsW failed\n");
 142         return FALSE;
 143     }
 144
 145     pFileDetails = (DELETED_FILE_DETAILS_W *)SHAlloc(dwSize);
 146     if (!pFileDetails)
 147     {
 148         ERR("No memory\n");
 149         return FALSE;
 150     }
 151
 152     if (!GetDeletedFileDetailsW(hDeletedFile,
 153                                 dwSize,
 154                                 pFileDetails,
 155                                 NULL))
 156     {
 157         ERR("GetDeletedFileDetailsW failed\n");
 158         SHFree(pFileDetails);
 159         return FALSE;
 160     }
 161
 162     ret = memcmp(pFileDetails, pContext->pFileDetails, dwSize);
 163     if (!ret)
 164     {
 165         pContext->hDeletedFile = hDeletedFile;
 166         pContext->bFound = TRUE;
 167     }
 168     else
 169         CloseRecycleBinHandle(hDeletedFile);
 170
 171     SHFree(pFileDetails);
 172     return ret;
 173 }
 174
 175 static PIDLRecycleStruct * _ILGetRecycleStruct(LPCITEMIDLIST pidl)
 176 {
 177     LPPIDLDATA pdata = _ILGetDataPointer(pidl);
 178
 179     if (pdata && pdata->type == 0x00)
 180         return (PIDLRecycleStruct*) & (pdata->u.crecycle);
 181
 182     return NULL;
 183 }
 184
 185 CRecycleBinEnum::CRecycleBinEnum()
 186 {
 187 }
 188
 189 CRecycleBinEnum::~CRecycleBinEnum()
 190 {
 191 }
 192
 193 HRESULT WINAPI CRecycleBinEnum::Initialize(DWORD dwFlags)
 194 {
 195     static LPCWSTR szDrive = L"C:\\";
 196
 197     if (dwFlags & SHCONTF_NONFOLDERS)
 198     {
 199         TRACE("Starting Enumeration\n");
 200
 201         if (!EnumerateRecycleBinW(szDrive /* FIXME */ , CBEnumRecycleBin, (PVOID)this))
 202         {
 203             WARN("Error: EnumerateCRecycleBinW failed\n");
 204             return E_FAIL;
 205         }
 206     }
 207     else
 208     {
 209         // do nothing
 210     }
 211     return S_OK;
 212 }
 213
 214 static LPITEMIDLIST _ILCreateRecycleItem(PDELETED_FILE_DETAILS_W pFileDetails)
 215 {
 216     PIDLDATA tmp;
 217     LPITEMIDLIST pidl;
 218     PIDLRecycleStruct * p;
 219     int size0 = (char*)&tmp.u.crecycle.szName - (char*)&tmp.u.crecycle;
 220     int size = size0;
 221
 222     tmp.type = 0x00;
 223     size += (wcslen(pFileDetails->FileName) + 1) * sizeof(WCHAR);
 224
 225     pidl = (LPITEMIDLIST)SHAlloc(size + 4);
 226     if (!pidl)
 227         return pidl;
 228
 229     pidl->mkid.cb = size + 2;
 230     memcpy(pidl->mkid.abID, &tmp, 2 + size0);
 231
 232     p = &((PIDLDATA*)pidl->mkid.abID)->u.crecycle;
 233     RtlCopyMemory(p, pFileDetails, sizeof(DELETED_FILE_DETAILS_W));
 234     wcscpy(p->szName, pFileDetails->FileName);
 235     *(WORD*)((char*)pidl + (size + 2)) = 0;
 236     return pidl;
 237 }
 238
 239 BOOL WINAPI CRecycleBinEnum::CBEnumRecycleBin(IN PVOID Context, IN HANDLE hDeletedFile)
 240 {
 241     return static_cast<CRecycleBinEnum *>(Context)->CBEnumRecycleBin(hDeletedFile);
 242 }
 243
 244 BOOL WINAPI CRecycleBinEnum::CBEnumRecycleBin(IN HANDLE hDeletedFile)
 245 {
 246     PDELETED_FILE_DETAILS_W pFileDetails;
 247     DWORD dwSize;
 248     LPITEMIDLIST pidl = NULL;
 249     BOOL ret;
 250
 251     if (!GetDeletedFileDetailsW(hDeletedFile,
 252                                 0,
 253                                 NULL,
 254                                 &dwSize) &&
 255             GetLastError() != ERROR_INSUFFICIENT_BUFFER)
 256     {
 257         ERR("GetDeletedFileDetailsW failed\n");
 258         return FALSE;
 259     }
 260
 261     pFileDetails = (DELETED_FILE_DETAILS_W *)SHAlloc(dwSize);
 262     if (!pFileDetails)
 263     {
 264         ERR("No memory\n");
 265         return FALSE;
 266     }
 267
 268     if (!GetDeletedFileDetailsW(hDeletedFile,
 269                                 dwSize,
 270                                 pFileDetails,
 271                                 NULL))
 272     {
 273         ERR("GetDeletedFileDetailsW failed\n");
 274         SHFree(pFileDetails);
 275         return FALSE;
 276     }
 277
 278     pidl = _ILCreateRecycleItem(pFileDetails);
 279     if (!pidl)
 280     {
 281         SHFree(pFileDetails);
 282         return FALSE;
 283     }
 284
 285     ret = AddToEnumList(pidl);
 286
 287     if (!ret)
 288         SHFree(pidl);
 289     SHFree(pFileDetails);
 290     TRACE("Returning %d\n", ret);
 291     CloseRecycleBinHandle(hDeletedFile);
 292     return ret;
 293 }
 294
 295 /**************************************************************************
 296 * IContextMenu2 Bitbucket Item Implementation
 297 */
 298
 299 CRecycleBinItemContextMenu::CRecycleBinItemContextMenu()
 300 {
 301     apidl = NULL;
 302 }
 303
 304 CRecycleBinItemContextMenu::~CRecycleBinItemContextMenu()
 305 {
 306     ILFree(apidl);
 307 }
 308
 309 HRESULT WINAPI CRecycleBinItemContextMenu::Initialize(LPCITEMIDLIST pidl)
 310 {
 311     apidl = ILClone(pidl);
 312     if (apidl == NULL)
 313         return E_OUTOFMEMORY;
 314     return S_OK;
 315 }
 316
 317 HRESULT WINAPI CRecycleBinItemContextMenu::QueryContextMenu(HMENU hMenu, UINT indexMenu, UINT idCmdFirst, UINT idCmdLast, UINT uFlags)
 318 {
 319     WCHAR szBuffer[30] = {0};
 320     ULONG Count = 1;
 321
 322     TRACE("(%p)->(hmenu=%p indexmenu=%x cmdfirst=%x cmdlast=%x flags=%x )\n", this, hMenu, indexMenu, idCmdFirst, idCmdLast, uFlags);
 323
 324     if (LoadStringW(shell32_hInstance, IDS_RESTORE, szBuffer, sizeof(szBuffer) / sizeof(WCHAR)))
 325     {
 326         szBuffer[(sizeof(szBuffer)/sizeof(WCHAR))-1] = L'\0';
 327         _InsertMenuItemW(hMenu, indexMenu++, TRUE, idCmdFirst + Count, MFT_STRING, szBuffer, MFS_ENABLED);
 328         Count++;
 329     }
 330
 331     if (LoadStringW(shell32_hInstance, IDS_CUT, szBuffer, sizeof(szBuffer) / sizeof(WCHAR)))
 332     {
 333         _InsertMenuItemW(hMenu, indexMenu++, TRUE, idCmdFirst + Count++, MFT_SEPARATOR, NULL, MFS_ENABLED);
 334         szBuffer[(sizeof(szBuffer)/sizeof(WCHAR))-1] = L'\0';
 335         _InsertMenuItemW(hMenu, indexMenu++, TRUE, idCmdFirst + Count++, MFT_STRING, szBuffer, MFS_ENABLED);
 336     }
 337
 338     if (LoadStringW(shell32_hInstance, IDS_DELETE, szBuffer, sizeof(szBuffer) / sizeof(WCHAR)))
 339     {
 340         szBuffer[(sizeof(szBuffer)/sizeof(WCHAR))-1] = L'\0';
 341         _InsertMenuItemW(hMenu, indexMenu++, TRUE, idCmdFirst + Count++, MFT_SEPARATOR, NULL, MFS_ENABLED);
 342         _InsertMenuItemW(hMenu, indexMenu++, TRUE, idCmdFirst + Count++, MFT_STRING, szBuffer, MFS_ENABLED);
 343     }
 344
 345     if (LoadStringW(shell32_hInstance, IDS_PROPERTIES, szBuffer, sizeof(szBuffer) / sizeof(WCHAR)))
 346     {
 347         szBuffer[(sizeof(szBuffer)/sizeof(WCHAR))-1] = L'\0';
 348         _InsertMenuItemW(hMenu, indexMenu++, TRUE, idCmdFirst + Count++, MFT_SEPARATOR, NULL, MFS_ENABLED);
 349         _InsertMenuItemW(hMenu, indexMenu++, TRUE, idCmdFirst + Count, MFT_STRING, szBuffer, MFS_DEFAULT);
 350     }
 351
 352     return MAKE_HRESULT(SEVERITY_SUCCESS, 0, Count);
 353 }
 354
 355 HRESULT WINAPI CRecycleBinItemContextMenu::InvokeCommand(LPCMINVOKECOMMANDINFO lpcmi)
 356 {
 357     SEARCH_CONTEXT Context;
 358     static LPCWSTR szDrive = L"C:\\";
 359
 360     TRACE("(%p)->(invcom=%p verb=%p wnd=%p)\n", this, lpcmi, lpcmi->lpVerb, lpcmi->hwnd);
 361
 362     if (lpcmi->lpVerb == MAKEINTRESOURCEA(1) || lpcmi->lpVerb == MAKEINTRESOURCEA(5))
 363     {
 364         Context.pFileDetails = _ILGetRecycleStruct(apidl);
 365         Context.bFound = FALSE;
 366
 367         EnumerateRecycleBinW(szDrive, CBSearchRecycleBin, (PVOID)&Context);
 368         if (!Context.bFound)
 369             return E_FAIL;
 370
 371         if (lpcmi->lpVerb == MAKEINTRESOURCEA(1))
 372         {
 373             /* restore file */
 374             if (RestoreFile(Context.hDeletedFile))
 375                 return S_OK;
 376             else
 377                 return E_FAIL;
 378         }
 379         else
 380         {
 381             DeleteFileHandleToRecycleBin(Context.hDeletedFile);
 382             return E_NOTIMPL;
 383         }
 384     }
 385     else if (lpcmi->lpVerb == MAKEINTRESOURCEA(3))
 386     {
 387         FIXME("implement cut\n");
 388         return E_NOTIMPL;
 389     }
 390     else if (lpcmi->lpVerb == MAKEINTRESOURCEA(7))
 391     {
 392         FIXME("implement properties\n");
 393         return E_NOTIMPL;
 394     }
 395
 396     return S_OK;
 397 }
 398
 399 HRESULT WINAPI CRecycleBinItemContextMenu::GetCommandString(UINT_PTR idCommand, UINT uFlags, UINT *lpReserved, LPSTR lpszName, UINT uMaxNameLen)
 400 {
 401     TRACE("(%p)->(idcom=%lx flags=%x %p name=%p len=%x)\n", this, idCommand, uFlags, lpReserved, lpszName, uMaxNameLen);
 402
 403     return E_FAIL;
 404 }
 405
 406 HRESULT WINAPI CRecycleBinItemContextMenu::HandleMenuMsg(UINT uMsg, WPARAM wParam, LPARAM lParam)
 407 {
 408     TRACE("CRecycleBin_IContextMenu2Item_HandleMenuMsg (%p)->(msg=%x wp=%lx lp=%lx)\n", this, uMsg, wParam, lParam);
 409
 410     return E_NOTIMPL;
 411 }
 412
 413 /**************************************************************************
 414 * registers clipboardformat once
 415 */
 416 void CRecycleBin::SF_RegisterClipFmt()
 417 {
 418     TRACE ("(%p)\n", this);
 419
 420     if (!cfShellIDList)
 421         cfShellIDList = RegisterClipboardFormatW(CFSTR_SHELLIDLIST);
 422 }
 423
 424 CRecycleBin::CRecycleBin()
 425 {
 426     pidl = NULL;
 427     iIdEmpty = 0;
 428     cfShellIDList = 0;
 429     SF_RegisterClipFmt();
 430     fAcceptFmt = FALSE;
 431 }
 432
 433 CRecycleBin::~CRecycleBin()
 434 {
 435     /*    InterlockedDecrement(&objCount);*/
 436     SHFree(pidl);
 437 }
 438
 439 /*************************************************************************
 440  * RecycleBin IPersistFolder2 interface
 441  */
 442
 443 HRESULT WINAPI CRecycleBin::GetClassID(CLSID *pClassID)
 444 {
 445     TRACE("(%p, %p)\n", this, pClassID);
 446     if (pClassID == NULL)
 447         return E_INVALIDARG;
 448     memcpy(pClassID, &CLSID_RecycleBin, sizeof(CLSID));
 449     return S_OK;
 450 }
 451
 452 HRESULT WINAPI CRecycleBin::Initialize(LPCITEMIDLIST pidl)
 453 {
 454     TRACE("(%p, %p)\n", this, pidl);
 455
 456     SHFree((LPVOID)this->pidl);
 457     this->pidl = ILClone(pidl);
 458     if (this->pidl == NULL)
 459         return E_OUTOFMEMORY;
 460     return S_OK;
 461 }
 462
 463 HRESULT WINAPI CRecycleBin::GetCurFolder(LPITEMIDLIST *ppidl)
 464 {
 465     TRACE("\n");
 466     *ppidl = ILClone(pidl);
 467     return S_OK;
 468 }
 469
 470 /*************************************************************************
 471  * RecycleBin IShellFolder2 interface
 472  */
 473
 474 HRESULT WINAPI CRecycleBin::ParseDisplayName(HWND hwnd, LPBC pbc,
 475         LPOLESTR pszDisplayName, ULONG *pchEaten, PIDLIST_RELATIVE *ppidl,
 476         ULONG *pdwAttributes)
 477 {
 478     FIXME("stub\n");
 479     return E_NOTIMPL;
 480 }
 481
 482
 483 PDELETED_FILE_DETAILS_W
 484 UnpackDetailsFromPidl(LPCITEMIDLIST pidl)
 485 {
 486     return (PDELETED_FILE_DETAILS_W)&pidl->mkid.abID;
 487 }
 488
 489 HRESULT WINAPI CRecycleBin::EnumObjects(HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST *ppEnumIDList)
 490 {
 491     return ShellObjectCreatorInit<CRecycleBinEnum>(dwFlags, IID_PPV_ARG(IEnumIDList, ppEnumIDList));
 492 }
 493
 494 HRESULT WINAPI CRecycleBin::BindToObject(PCUIDLIST_RELATIVE pidl, LPBC pbc, REFIID riid, void **ppv)
 495 {
 496     FIXME("(%p, %p, %p, %s, %p) - stub\n", this, pidl, pbc, debugstr_guid(&riid), ppv);
 497     return E_NOTIMPL;
 498 }
 499
 500 HRESULT WINAPI CRecycleBin::BindToStorage(PCUIDLIST_RELATIVE pidl, LPBC pbc, REFIID riid, void **ppv)
 501 {
 502     FIXME("(%p, %p, %p, %s, %p) - stub\n", this, pidl, pbc, debugstr_guid(&riid), ppv);
 503     return E_NOTIMPL;
 504 }
 505
 506 HRESULT WINAPI CRecycleBin::CompareIDs(LPARAM lParam, PCUIDLIST_RELATIVE pidl1, PCUIDLIST_RELATIVE pidl2)
 507 {
 508     PIDLRecycleStruct* pData1 = _ILGetRecycleStruct(pidl1);
 509     PIDLRecycleStruct* pData2 = _ILGetRecycleStruct(pidl2);
 510     LPWSTR pName1, pName2;
 511
 512     if(!pData1 || !pData2 || LOWORD(lParam) >= COLUMNS_COUNT)
 513         return E_INVALIDARG;
 514
 515     SHORT result;
 516     LONGLONG diff;
 517     switch (LOWORD(lParam))
 518     {
 519         case 0: /* Name */
 520             pName1 = PathFindFileNameW(pData1->szName);
 521             pName2 = PathFindFileNameW(pData2->szName);
 522             result = wcsicmp(pName1, pName2);
 523             break;
 524         case 1: /* Orig. Location */
 525             result = wcsicmp(pData1->szName, pData2->szName);
 526             break;
 527         case 2: /* Date Deleted */
 528             result = CompareFileTime(&pData1->DeletionTime, &pData2->DeletionTime);
 529             break;
 530         case 3: /* Size */
 531             diff = pData1->FileSize.QuadPart - pData2->FileSize.QuadPart;
 532             return MAKE_COMPARE_HRESULT(diff);
 533         case 4: /* Type */
 534             pName1 = PathFindExtensionW(pData1->szName);
 535             pName2 = PathFindExtensionW(pData2->szName);
 536             result = wcsicmp(pName1, pName2);
 537             break;
 538         case 5: /* Modified */
 539             result = CompareFileTime(&pData1->LastModification, &pData2->LastModification);
 540             break;
 541     }
 542     return MAKE_COMPARE_HRESULT(result);
 543 }
 544
 545 HRESULT WINAPI CRecycleBin::CreateViewObject(HWND hwndOwner, REFIID riid, void **ppv)
 546 {
 547     CComPtr<IShellView> pShellView;
 548     HRESULT hr = E_NOINTERFACE;
 549
 550     TRACE("(%p, %p, %s, %p)\n", this, hwndOwner, debugstr_guid(&riid), ppv);
 551
 552     if (!ppv)
 553         return hr;
 554
 555     *ppv = NULL;
 556
 557     if (IsEqualIID (riid, IID_IDropTarget))
 558     {
 559         hr = this->QueryInterface (IID_IDropTarget, ppv);
 560     }
 561     else if (IsEqualIID (riid, IID_IContextMenu) || IsEqualIID (riid, IID_IContextMenu2))
 562     {
 563         hr = this->QueryInterface(riid, ppv);
 564     }
 565     else if (IsEqualIID (riid, IID_IShellView))
 566     {
 567         hr = CDefView_Constructor(this, riid, ppv);
 568     }
 569     else
 570         return hr;
 571     TRACE ("-- (%p)->(interface=%p)\n", this, ppv);
 572     return hr;
 573
 574 }
 575
 576 HRESULT WINAPI CRecycleBin::GetAttributesOf(UINT cidl, PCUITEMID_CHILD_ARRAY apidl,
 577         SFGAOF *rgfInOut)
 578 {
 579     TRACE("(%p, %d, {%p, ...}, {%x})\n", this, cidl, apidl ? apidl[0] : NULL, (unsigned int)*rgfInOut);
 580     *rgfInOut &= SFGAO_FOLDER|SFGAO_DROPTARGET|SFGAO_HASPROPSHEET|SFGAO_CANLINK;
 581     return S_OK;
 582 }
 583
 584 HRESULT WINAPI CRecycleBin::GetUIObjectOf(HWND hwndOwner, UINT cidl, PCUITEMID_CHILD_ARRAY apidl,
 585         REFIID riid, UINT *prgfInOut, void **ppv)
 586 {
 587     LPVOID pObj = NULL;
 588     HRESULT hr = E_INVALIDARG;
 589
 590     TRACE ("(%p)->(%p,%u,apidl=%p, %p %p)\n", this,
 591            hwndOwner, cidl, apidl, prgfInOut, ppv);
 592
 593     if (!ppv)
 594         return hr;
 595
 596     *ppv = NULL;
 597
 598     if ((IsEqualIID (riid, IID_IContextMenu) || IsEqualIID(riid, IID_IContextMenu2)) && (cidl >= 1))
 599     {
 600         hr = ShellObjectCreatorInit<CRecycleBinItemContextMenu>(apidl[0], riid, &pObj);
 601     }
 602     else if (IsEqualIID (riid, IID_IDropTarget) && (cidl == 1))
 603     {
 604         IDropTarget * pDt = NULL;
 605         hr = QueryInterface(IID_PPV_ARG(IDropTarget, &pDt));
 606         pObj = pDt;
 607     }
 608     else if((IsEqualIID(riid, IID_IExtractIconA) || IsEqualIID(riid, IID_IExtractIconW)) && (cidl == 1))
 609     {
 610         hr = CRecyclerExtractIcon_CreateInstance(apidl[0], riid, &pObj);
 611     }
 612     else
 613         hr = E_NOINTERFACE;
 614
 615     if (SUCCEEDED(hr) && !pObj)
 616         hr = E_OUTOFMEMORY;
 617
 618     *ppv = pObj;
 619     TRACE ("(%p)->hr=0x%08x\n", this, hr);
 620     return hr;
 621 }
 622
 623 HRESULT WINAPI CRecycleBin::GetDisplayNameOf(PCUITEMID_CHILD pidl, SHGDNF uFlags, STRRET *pName)
 624 {
 625     PIDLRecycleStruct *pFileDetails;
 626     LPWSTR pFileName;
 627
 628     TRACE("(%p, %p, %x, %p)\n", this, pidl, (unsigned int)uFlags, pName);
 629
 630     pFileDetails = _ILGetRecycleStruct(pidl);
 631     if (!pFileDetails)
 632     {
 633         pName->cStr[0] = 0;
 634         pName->uType = STRRET_CSTR;
 635         return E_INVALIDARG;
 636     }
 637
 638     pFileName = wcsrchr(pFileDetails->szName, L'\\');
 639     if (!pFileName)
 640     {
 641         pName->cStr[0] = 0;
 642         pName->uType = STRRET_CSTR;
 643         return E_UNEXPECTED;
 644     }
 645
 646     pName->pOleStr = StrDupW(pFileName + 1);
 647     if (pName->pOleStr == NULL)
 648         return E_OUTOFMEMORY;
 649
 650     pName->uType = STRRET_WSTR;
 651     return S_OK;
 652 }
 653
 654 HRESULT WINAPI CRecycleBin::SetNameOf(HWND hwnd, PCUITEMID_CHILD pidl, LPCOLESTR pszName,
 655                                       SHGDNF uFlags, PITEMID_CHILD *ppidlOut)
 656 {
 657     TRACE("\n");
 658     return E_FAIL; /* not supported */
 659 }
 660
 661 HRESULT WINAPI CRecycleBin::GetDefaultSearchGUID(GUID *pguid)
 662 {
 663     FIXME("stub\n");
 664     return E_NOTIMPL;
 665 }
 666
 667 HRESULT WINAPI CRecycleBin::EnumSearches(IEnumExtraSearch **ppEnum)
 668 {
 669     FIXME("stub\n");
 670     *ppEnum = NULL;
 671     return E_NOTIMPL;
 672 }
 673
 674 HRESULT WINAPI CRecycleBin::GetDefaultColumn(DWORD dwReserved, ULONG *pSort, ULONG *pDisplay)
 675 {
 676     TRACE("(%p, %x, %p, %p)\n", this, (unsigned int)dwReserved, pSort, pDisplay);
 677     if (pSort)
 678         *pSort = 0;
 679     if (pDisplay)
 680         *pDisplay = 0;
 681     return S_OK;
 682 }
 683
 684 HRESULT WINAPI CRecycleBin::GetDefaultColumnState(UINT iColumn, SHCOLSTATEF *pcsFlags)
 685 {
 686     TRACE("(%p, %d, %p)\n", this, iColumn, pcsFlags);
 687     if (iColumn >= COLUMNS_COUNT)
 688         return E_INVALIDARG;
 689     *pcsFlags = RecycleBinColumns[iColumn].pcsFlags;
 690     return S_OK;
 691 }
 692
 693 HRESULT WINAPI CRecycleBin::GetDetailsEx(PCUITEMID_CHILD pidl, const SHCOLUMNID *pscid, VARIANT *pv)
 694 {
 695     FIXME("stub\n");
 696     return E_NOTIMPL;
 697 }
 698
 699 static HRESULT FormatDateTime(LPWSTR buffer, int size, FILETIME * ft)
 700 {
 701     FILETIME lft;
 702     SYSTEMTIME time;
 703     int ret;
 704
 705     FileTimeToLocalFileTime(ft, &lft);
 706     FileTimeToSystemTime(&lft, &time);
 707
 708     ret = GetDateFormatW(LOCALE_USER_DEFAULT, DATE_SHORTDATE, &time, NULL, buffer, size);
 709     if (ret > 0 && ret < size)
 710     {
 711         /* Append space + time without seconds */
 712         buffer[ret-1] = ' ';
 713         GetTimeFormatW(LOCALE_USER_DEFAULT, TIME_NOSECONDS, &time, NULL, &buffer[ret], size - ret);
 714     }
 715
 716     return (ret != 0 ? E_FAIL : S_OK);
 717 }
 718
 719 HRESULT WINAPI CRecycleBin::GetDetailsOf(PCUITEMID_CHILD pidl, UINT iColumn, LPSHELLDETAILS pDetails)
 720 {
 721     PIDLRecycleStruct * pFileDetails;
 722     WCHAR buffer[MAX_PATH];
 723     WCHAR szTypeName[100];
 724     LPWSTR pszBackslash;
 725     UINT Length;
 726
 727     TRACE("(%p, %p, %d, %p)\n", this, pidl, iColumn, pDetails);
 728     if (iColumn >= COLUMNS_COUNT)
 729         return E_FAIL;
 730     pDetails->fmt = RecycleBinColumns[iColumn].fmt;
 731     pDetails->cxChar = RecycleBinColumns[iColumn].cxChars;
 732     if (pidl == NULL)
 733         return SHSetStrRet(&pDetails->str, RecycleBinColumns[iColumn].column_name_id);
 734
 735     if (iColumn == COLUMN_NAME)
 736         return GetDisplayNameOf(pidl, SHGDN_NORMAL, &pDetails->str);
 737
 738     pFileDetails = _ILGetRecycleStruct(pidl);
 739     switch (iColumn)
 740     {
 741         case COLUMN_DATEDEL:
 742             FormatDateTime(buffer, MAX_PATH, &pFileDetails->DeletionTime);
 743             break;
 744         case COLUMN_DELFROM:
 745             pszBackslash = wcsrchr(pFileDetails->szName, L'\\');
 746             Length = (pszBackslash - pFileDetails->szName);
 747             memcpy((LPVOID)buffer, pFileDetails->szName, Length * sizeof(WCHAR));
 748             buffer[Length] = L'\0';
 749             break;
 750         case COLUMN_SIZE:
 751             StrFormatKBSizeW(pFileDetails->FileSize.QuadPart, buffer, MAX_PATH);
 752             break;
 753         case COLUMN_MTIME:
 754             FormatDateTime(buffer, MAX_PATH, &pFileDetails->LastModification);
 755             break;
 756         case COLUMN_TYPE:
 757             // FIXME: We should in fact use a UNICODE version of _ILGetFileType
 758             szTypeName[0] = L'\0';
 759             wcscpy(buffer, PathFindExtensionW(pFileDetails->szName));
 760             if (!( HCR_MapTypeToValueW(buffer, buffer, _countof(buffer), TRUE) &&
 761                     HCR_MapTypeToValueW(buffer, szTypeName, _countof(szTypeName), FALSE )))
 762             {
 763                 /* load localized file string */
 764                 szTypeName[0] = '\0';
 765                 if(LoadStringW(shell32_hInstance, IDS_ANY_FILE, szTypeName, _countof(szTypeName)))
 766                 {
 767                     szTypeName[63] = '\0';
 768                     StringCchPrintfW(buffer, _countof(buffer), szTypeName, PathFindExtensionW(pFileDetails->szName));
 769                 }
 770             }
 771             return SHSetStrRet(&pDetails->str, szTypeName);
 772         default:
 773             return E_FAIL;
 774     }
 775
 776     return SHSetStrRet(&pDetails->str, buffer);
 777 }
 778
 779 HRESULT WINAPI CRecycleBin::MapColumnToSCID(UINT iColumn, SHCOLUMNID *pscid)
 780 {
 781     TRACE("(%p, %d, %p)\n", this, iColumn, pscid);
 782     if (iColumn >= COLUMNS_COUNT)
 783         return E_INVALIDARG;
 784     pscid->fmtid = *RecycleBinColumns[iColumn].fmtId;
 785     pscid->pid = RecycleBinColumns[iColumn].pid;
 786     return S_OK;
 787 }
 788
 789 BOOL CRecycleBin::RecycleBinIsEmpty()
 790 {
 791     CComPtr<IEnumIDList> spEnumFiles;
 792     HRESULT hr = EnumObjects(NULL, SHCONTF_FOLDERS | SHCONTF_NONFOLDERS, &spEnumFiles);
 793     if (FAILED(hr))
 794         return TRUE;
 795     CComHeapPtr<ITEMIDLIST> spPidl;
 796     ULONG itemcount;
 797     return spEnumFiles->Next(1, &spPidl, &itemcount) != S_OK;
 798     }
 799
 800 /*************************************************************************
 801  * RecycleBin IContextMenu interface
 802  */
 803
 804 HRESULT WINAPI CRecycleBin::QueryContextMenu(HMENU hMenu, UINT indexMenu, UINT idCmdFirst, UINT idCmdLast, UINT uFlags)
 805 {
 806     WCHAR szBuffer[100];
 807     MENUITEMINFOW mii;
 808     int id = 1;
 809
 810     TRACE("QueryContextMenu %p %p %u %u %u %u\n", this, hMenu, indexMenu, idCmdFirst, idCmdLast, uFlags );
 811
 812     if (!hMenu)
 813         return E_INVALIDARG;
 814
 815     memset(&mii, 0, sizeof(mii));
 816     mii.cbSize = sizeof(mii);
 817     mii.fMask = MIIM_TYPE | MIIM_ID | MIIM_STATE;
 818     mii.fState = RecycleBinIsEmpty() ? MFS_DISABLED : MFS_ENABLED;
 819     szBuffer[0] = L'\0';
 820     LoadStringW(shell32_hInstance, IDS_EMPTY_BITBUCKET, szBuffer, sizeof(szBuffer) / sizeof(WCHAR));
 821     mii.dwTypeData = szBuffer;
 822     mii.cch = wcslen(mii.dwTypeData);
 823     mii.wID = idCmdFirst + id++;
 824     mii.fType = MFT_STRING;
 825     iIdEmpty = 1;
 826
 827     if (!InsertMenuItemW(hMenu, indexMenu, TRUE, &mii))
 828         return E_FAIL;
 829
 830     return MAKE_HRESULT(SEVERITY_SUCCESS, 0, id);
 831 }
 832
 833 HRESULT WINAPI CRecycleBin::InvokeCommand(LPCMINVOKECOMMANDINFO lpcmi)
 834 {
 835     HRESULT hr;
 836     LPSHELLBROWSER lpSB;
 837     IShellView * lpSV = NULL;
 838
 839     TRACE("%p %p verb %p\n", this, lpcmi, lpcmi->lpVerb);
 840
 841     if (LOWORD(lpcmi->lpVerb) == iIdEmpty)
 842     {
 843         // FIXME
 844         // path & flags
 845         hr = SHEmptyRecycleBinW(lpcmi->hwnd, L"C:\\", 0);
 846         TRACE("result %x\n", hr);
 847         if (hr != S_OK)
 848             return hr;
 849
 850         lpSB = (LPSHELLBROWSER)SendMessageA(lpcmi->hwnd, CWM_GETISHELLBROWSER, 0, 0);
 851         if (lpSB && SUCCEEDED(lpSB->QueryActiveShellView(&lpSV)))
 852             lpSV->Refresh();
 853     }
 854     return S_OK;
 855 }
 856
 857 HRESULT WINAPI CRecycleBin::GetCommandString(UINT_PTR idCommand, UINT uFlags, UINT *lpReserved, LPSTR lpszName, UINT uMaxNameLen)
 858 {
 859     FIXME("%p %lu %u %p %p %u\n", this, idCommand, uFlags, lpReserved, lpszName, uMaxNameLen);
 860
 861     return E_NOTIMPL;
 862 }
 863
 864 /*************************************************************************
 865  * RecycleBin IShellPropSheetExt interface
 866  */
 867
 868 HRESULT WINAPI CRecycleBin::AddPages(LPFNSVADDPROPSHEETPAGE pfnAddPage, LPARAM lParam)
 869 {
 870     FIXME("%p %p %lu\n", this, pfnAddPage, lParam);
 871
 872     return E_NOTIMPL;
 873 }
 874
 875 HRESULT WINAPI CRecycleBin::ReplacePage(EXPPS uPageID, LPFNSVADDPROPSHEETPAGE pfnReplaceWith, LPARAM lParam)
 876 {
 877     FIXME("%p %lu %p %lu\n", this, uPageID, pfnReplaceWith, lParam);
 878
 879     return E_NOTIMPL;
 880 }
 881
 882 /*************************************************************************
 883  * RecycleBin IShellExtInit interface
 884  */
 885
 886 HRESULT WINAPI CRecycleBin::Initialize(LPCITEMIDLIST pidlFolder, IDataObject *pdtobj, HKEY hkeyProgID)
 887 {
 888     TRACE("%p %p %p %p\n", this, pidlFolder, pdtobj, hkeyProgID );
 889     return S_OK;
 890 }
 891
 892 BOOL
 893 TRASH_CanTrashFile(LPCWSTR wszPath)
 894 {
 895     LONG ret;
 896     DWORD dwNukeOnDelete, dwType, VolSerialNumber, MaxComponentLength;
 897     DWORD FileSystemFlags, dwSize, dwDisposition;
 898     HKEY hKey;
 899     WCHAR szBuffer[10];
 900     WCHAR szKey[150] = L"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Bitbucket\\Volume\\";
 901
 902     if (wszPath[1] != L':')
 903     {
 904         /* path is UNC */
 905         return FALSE;
 906     }
 907
 908     if (GetDriveTypeW(wszPath) != DRIVE_FIXED)
 909     {
 910         /* no bitbucket on removable media */
 911         return FALSE;
 912     }
 913
 914     if (!GetVolumeInformationW(wszPath, NULL, 0, &VolSerialNumber, &MaxComponentLength, &FileSystemFlags, NULL, 0))
 915     {
 916         ERR("GetVolumeInformationW failed with %u\n", GetLastError());
 917         return FALSE;
 918     }
 919
 920     swprintf(szBuffer, L"%04X-%04X", LOWORD(VolSerialNumber), HIWORD(VolSerialNumber));
 921     wcscat(szKey, szBuffer);
 922
 923     if (RegCreateKeyExW(HKEY_CURRENT_USER, szKey, 0, NULL, 0, KEY_WRITE, NULL, &hKey, &dwDisposition) != ERROR_SUCCESS)
 924     {
 925         ERR("RegCreateKeyExW failed\n");
 926         return FALSE;
 927     }
 928
 929     if (dwDisposition  & REG_CREATED_NEW_KEY)
 930     {
 931         /* per default move to bitbucket */
 932         dwNukeOnDelete = 0;
 933         RegSetValueExW(hKey, L"NukeOnDelete", 0, REG_DWORD, (LPBYTE)&dwNukeOnDelete, sizeof(DWORD));
 934         /* per default unlimited size */
 935         dwSize = -1;
 936         RegSetValueExW(hKey, L"MaxCapacity", 0, REG_DWORD, (LPBYTE)&dwSize, sizeof(DWORD));
 937         RegCloseKey(hKey);
 938         return TRUE;
 939     }
 940     else
 941     {
 942         dwSize = sizeof(dwNukeOnDelete);
 943         ret = RegQueryValueExW(hKey, L"NukeOnDelete", NULL, &dwType, (LPBYTE)&dwNukeOnDelete, &dwSize);
 944         if (ret != ERROR_SUCCESS)
 945         {
 946             if (ret ==  ERROR_FILE_NOT_FOUND)
 947             {
 948                 /* restore key and enable bitbucket */
 949                 dwNukeOnDelete = 0;
 950                 RegSetValueExW(hKey, L"NukeOnDelete", 0, REG_DWORD, (LPBYTE)&dwNukeOnDelete, sizeof(DWORD));
 951             }
 952             RegCloseKey(hKey);
 953             return TRUE;
 954         }
 955         else if (dwNukeOnDelete)
 956         {
 957             /* do not delete to bitbucket */
 958             RegCloseKey(hKey);
 959             return FALSE;
 960         }
 961         /* FIXME
 962          * check if bitbucket is full
 963          */
 964         RegCloseKey(hKey);
 965         return TRUE;
 966     }
 967 }
 968
 969 BOOL
 970 TRASH_TrashFile(LPCWSTR wszPath)
 971 {
 972     TRACE("(%s)\n", debugstr_w(wszPath));
 973     return DeleteFileToRecycleBin(wszPath);
 974 }
 975
 976 /*************************************************************************
 977  * SHUpdateCRecycleBinIcon                                [SHELL32.@]
 978  *
 979  * Undocumented
 980  */
 981 EXTERN_C HRESULT WINAPI SHUpdateRecycleBinIcon(void)
 982 {
 983     FIXME("stub\n");
 984
 985
 986
 987     return S_OK;
 988 }
 989
 990 /****************************************************************************
 991  * IDropTarget implementation
 992  */
 993 BOOL CRecycleBin::QueryDrop(DWORD dwKeyState, LPDWORD pdwEffect)
 994 {
 995     /* TODO on shift we should delete, we should update the cursor manager to show this. */
 996
 997     DWORD dwEffect = DROPEFFECT_COPY;
 998
 999     *pdwEffect = DROPEFFECT_NONE;
1000
1001     if (fAcceptFmt) { /* Does our interpretation of the keystate ... */
1002         *pdwEffect = KeyStateToDropEffect (dwKeyState);
1003
1004         if (*pdwEffect == DROPEFFECT_NONE)
1005             *pdwEffect = dwEffect;
1006
1007         /* ... matches the desired effect ? */
1008         if (dwEffect & *pdwEffect) {
1009             return TRUE;
1010         }
1011     }
1012     return FALSE;
1013 }
1014
1015 HRESULT WINAPI CRecycleBin::DragEnter(IDataObject *pDataObject,
1016                                     DWORD dwKeyState, POINTL pt, DWORD *pdwEffect)
1017 {
1018     TRACE("Recycle bin drag over (%p)\n", this);
1019     /* The recycle bin accepts pretty much everything, and sets a CSIDL flag. */
1020     fAcceptFmt = TRUE;
1021
1022     QueryDrop(dwKeyState, pdwEffect);
1023     return S_OK;
1024 }
1025
1026 HRESULT WINAPI CRecycleBin::DragOver(DWORD dwKeyState, POINTL pt,
1027                                    DWORD *pdwEffect)
1028 {
1029     TRACE("(%p)\n", this);
1030
1031     if (!pdwEffect)
1032         return E_INVALIDARG;
1033
1034     QueryDrop(dwKeyState, pdwEffect);
1035
1036     return S_OK;
1037 }
1038
1039 HRESULT WINAPI CRecycleBin::DragLeave()
1040 {
1041     TRACE("(%p)\n", this);
1042
1043     fAcceptFmt = FALSE;
1044
1045     return S_OK;
1046 }
1047
1048 HRESULT WINAPI CRecycleBin::Drop(IDataObject *pDataObject,
1049                                DWORD dwKeyState, POINTL pt, DWORD *pdwEffect)
1050 {
1051     TRACE("(%p) object dropped on recycle bin, effect %u\n", this, *pdwEffect);
1052
1053     /* TODO: pdwEffect should be read and make the drop object be permanently deleted in the move case (shift held) */
1054
1055     FORMATETC fmt;
1056     TRACE("(%p)->(DataObject=%p)\n", this, pDataObject);
1057     InitFormatEtc (fmt, cfShellIDList, TYMED_HGLOBAL);
1058
1059     /* Handle cfShellIDList Drop objects here, otherwise send the approriate message to other software */
1060     if (SUCCEEDED(pDataObject->QueryGetData(&fmt)))
1061     {
1062         DWORD fMask = 0;
1063
1064         if ((dwKeyState & MK_SHIFT) == MK_SHIFT)
1065             fMask |= CMIC_MASK_SHIFT_DOWN;
1066
1067         DoDeleteAsync(pDataObject, fMask);
1068     }
1069     else
1070     {
1071         /*
1072          * TODO call SetData on the data object with format CFSTR_TARGETCLSID
1073          * set to the Recycle Bin's class identifier CLSID_RecycleBin.
1074          */
1075     }
1076     return S_OK;
1077 }
1078
1079 HRESULT WINAPI DoDeleteDataObject(IDataObject *pda, DWORD fMask)
1080 {
1081     TRACE("performing delete");
1082     HRESULT hr;
1083
1084     STGMEDIUM medium;
1085     FORMATETC formatetc;
1086     InitFormatEtc(formatetc, RegisterClipboardFormatW(CFSTR_SHELLIDLIST), TYMED_HGLOBAL);
1087     hr = pda->GetData(&formatetc, &medium);
1088     if (FAILED(hr))
1089         return hr;
1090
1091     /* lock the handle */
1092     LPIDA lpcida = (LPIDA)GlobalLock(medium.hGlobal);
1093     if (!lpcida)
1094     {
1095         ReleaseStgMedium(&medium);
1096         return E_FAIL;
1097     }
1098
1099     /* convert the data into pidl */
1100     LPITEMIDLIST pidl;
1101     LPITEMIDLIST *apidl = _ILCopyCidaToaPidl(&pidl, lpcida);
1102     if (!apidl)
1103     {
1104         ReleaseStgMedium(&medium);
1105         return E_FAIL;
1106     }
1107
1108     CComPtr<IShellFolder> psfDesktop;
1109     CComPtr<IShellFolder> psfFrom = NULL;
1110
1111     /* Grab the desktop shell folder */
1112     hr = SHGetDesktopFolder(&psfDesktop);
1113     if (FAILED(hr))
1114     {
1115         ERR("SHGetDesktopFolder failed\n");
1116         SHFree(pidl);
1117         _ILFreeaPidl(apidl, lpcida->cidl);
1118         ReleaseStgMedium(&medium);
1119         return E_FAIL;
1120     }
1121
1122     /* Find source folder, this is where the clipboard data was copied from */
1123     if (_ILIsDesktop(pidl))
1124     {
1125         psfFrom = psfDesktop;
1126     }
1127     else
1128     {
1129         hr = psfDesktop->BindToObject(pidl, NULL, IID_PPV_ARG(IShellFolder, &psfFrom));
1130         if (FAILED(hr))
1131         {
1132             ERR("no IShellFolder\n");
1133             SHFree(pidl);
1134             _ILFreeaPidl(apidl, lpcida->cidl);
1135             ReleaseStgMedium(&medium);
1136             return E_FAIL;
1137         }
1138     }
1139
1140     STRRET strTemp;
1141     hr = psfFrom->GetDisplayNameOf(apidl[0], SHGDN_FORPARSING, &strTemp);
1142     if (FAILED(hr))
1143     {
1144         ERR("IShellFolder_GetDisplayNameOf failed with %x\n", hr);
1145         SHFree(pidl);
1146         _ILFreeaPidl(apidl, lpcida->cidl);
1147         ReleaseStgMedium(&medium);
1148         return hr;
1149     }
1150
1151     WCHAR wszPath[MAX_PATH];
1152     hr = StrRetToBufW(&strTemp, apidl[0], wszPath, _countof(wszPath));
1153     if (FAILED(hr))
1154     {
1155         ERR("StrRetToBufW failed with %x\n", hr);
1156         SHFree(pidl);
1157         _ILFreeaPidl(apidl, lpcida->cidl);
1158         ReleaseStgMedium(&medium);
1159         return hr;
1160     }
1161
1162     /* Only keep the base path */
1163     LPWSTR pwszFilename = PathFindFileNameW(wszPath);
1164     *pwszFilename = L'\0';
1165
1166     /* Build paths list */
1167     LPWSTR pwszPaths = BuildPathsList(wszPath, lpcida->cidl, (LPCITEMIDLIST*) apidl, FALSE);
1168     if (!pwszPaths)
1169     {
1170         SHFree(pidl);
1171         _ILFreeaPidl(apidl, lpcida->cidl);
1172         ReleaseStgMedium(&medium);
1173         return E_FAIL;
1174     }
1175
1176     /* Delete them */
1177     SHFILEOPSTRUCTW FileOp;
1178     ZeroMemory(&FileOp, sizeof(FileOp));
1179     FileOp.wFunc = FO_DELETE;
1180     FileOp.pFrom = pwszPaths;
1181     if ((fMask & CMIC_MASK_SHIFT_DOWN) == 0)
1182         FileOp.fFlags = FOF_ALLOWUNDO;
1183
1184     if (SHFileOperationW(&FileOp) != 0)
1185     {
1186         ERR("SHFileOperation failed with 0x%x for %s\n", GetLastError(), debugstr_w(pwszPaths));
1187         hr = E_FAIL;
1188     }
1189
1190     HeapFree(GetProcessHeap(), 0, pwszPaths);
1191     SHFree(pidl);
1192     _ILFreeaPidl(apidl, lpcida->cidl);
1193     ReleaseStgMedium(&medium);
1194
1195     return hr;
1196 }
1197
1198 struct DeleteThreadData {
1199     IStream *s;
1200     DWORD fMask;
1201 };
1202
1203 DWORD WINAPI DoDeleteThreadProc(LPVOID lpParameter)
1204 {
1205     DeleteThreadData *data = static_cast<DeleteThreadData*>(lpParameter);
1206     CoInitialize(NULL);
1207     IDataObject *pDataObject;
1208     HRESULT hr = CoGetInterfaceAndReleaseStream (data->s, IID_PPV_ARG(IDataObject, &pDataObject));
1209     if (SUCCEEDED(hr))
1210     {
1211         DoDeleteDataObject(pDataObject, data->fMask);
1212     }
1213     pDataObject->Release();
1214     CoUninitialize();
1215     HeapFree(GetProcessHeap(), 0, data);
1216     return 0;
1217 }
1218
1219 void DoDeleteAsync(IDataObject *pda, DWORD fMask)
1220 {
1221     DeleteThreadData *data = static_cast<DeleteThreadData*>(HeapAlloc(GetProcessHeap(), 0, sizeof(DeleteThreadData)));
1222     data->fMask = fMask;
1223     CoMarshalInterThreadInterfaceInStream(IID_IDataObject, pda, &data->s);
1224     SHCreateThread(DoDeleteThreadProc, data, NULL, NULL);
1225 }
1226
1227 /*************************************************************************
1228  *              SHEmptyRecycleBinA (SHELL32.@)
1229  */
1230 HRESULT WINAPI SHEmptyRecycleBinA(HWND hwnd, LPCSTR pszRootPath, DWORD dwFlags)
1231 {
1232     LPWSTR szRootPathW = NULL;
1233     int len;
1234     HRESULT hr;
1235
1236     TRACE("%p, %s, 0x%08x\n", hwnd, debugstr_a(pszRootPath), dwFlags);
1237
1238     if (pszRootPath)
1239     {
1240         len = MultiByteToWideChar(CP_ACP, 0, pszRootPath, -1, NULL, 0);
1241         if (len == 0)
1242             return HRESULT_FROM_WIN32(GetLastError());
1243         szRootPathW = (LPWSTR)HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
1244         if (!szRootPathW)
1245             return E_OUTOFMEMORY;
1246         if (MultiByteToWideChar(CP_ACP, 0, pszRootPath, -1, szRootPathW, len) == 0)
1247         {
1248             HeapFree(GetProcessHeap(), 0, szRootPathW);
1249             return HRESULT_FROM_WIN32(GetLastError());
1250         }
1251     }
1252
1253     hr = SHEmptyRecycleBinW(hwnd, szRootPathW, dwFlags);
1254     HeapFree(GetProcessHeap(), 0, szRootPathW);
1255
1256     return hr;
1257 }
1258
1259 HRESULT WINAPI SHEmptyRecycleBinW(HWND hwnd, LPCWSTR pszRootPath, DWORD dwFlags)
1260 {
1261     WCHAR szPath[MAX_PATH] = {0}, szBuffer[MAX_PATH];
1262     DWORD dwSize, dwType, count;
1263     LONG ret;
1264     IShellFolder *pDesktop, *pRecycleBin;
1265     PIDLIST_ABSOLUTE pidlRecycleBin;
1266     PITEMID_CHILD pidl;
1267     HRESULT hr = S_OK;
1268     LPENUMIDLIST penumFiles;
1269     STRRET StrRet;
1270
1271     TRACE("%p, %s, 0x%08x\n", hwnd, debugstr_w(pszRootPath), dwFlags);
1272
1273     if (!(dwFlags & SHERB_NOCONFIRMATION))
1274     {
1275         hr = SHGetDesktopFolder(&pDesktop);
1276         if (FAILED(hr))
1277             return hr;
1278         hr = SHGetFolderLocation(NULL, CSIDL_BITBUCKET, NULL, 0, &pidlRecycleBin);
1279         if (FAILED(hr))
1280         {
1281             pDesktop->Release();
1282             return hr;
1283         }
1284         hr = pDesktop->BindToObject(pidlRecycleBin, NULL, IID_PPV_ARG(IShellFolder, &pRecycleBin));
1285         CoTaskMemFree(pidlRecycleBin);
1286         pDesktop->Release();
1287         if (FAILED(hr))
1288             return hr;
1289         hr = pRecycleBin->EnumObjects(hwnd, SHCONTF_FOLDERS | SHCONTF_NONFOLDERS | SHCONTF_INCLUDEHIDDEN, &penumFiles);
1290         if (FAILED(hr))
1291         {
1292             pRecycleBin->Release();
1293             return hr;
1294         }
1295
1296         count = 0;
1297         if (hr != S_FALSE)
1298         {
1299             while (penumFiles->Next(1, &pidl, NULL) == S_OK)
1300             {
1301                 count++;
1302                 pRecycleBin->GetDisplayNameOf(pidl, SHGDN_NORMAL, &StrRet);
1303                 StrRetToBuf(&StrRet, pidl, szBuffer, _countof(szBuffer));
1304                 CoTaskMemFree(pidl);
1305             }
1306             penumFiles->Release();
1307         }
1308         pRecycleBin->Release();
1309
1310         switch (count)
1311         {
1312             case 0:
1313                 /* no files, don't need confirmation */
1314                 break;
1315
1316             case 1:
1317                 /* we have only one item inside the bin, so show a message box with its name */
1318                 if (ShellMessageBoxW(shell32_hInstance, hwnd, MAKEINTRESOURCEW(IDS_DELETEITEM_TEXT), MAKEINTRESOURCEW(IDS_EMPTY_BITBUCKET),
1319                                    MB_ICONEXCLAMATION | MB_YESNO | MB_DEFBUTTON2, szBuffer) == IDNO)
1320                 {
1321                     return S_OK;
1322                 }
1323                 break;
1324
1325             default:
1326                 /* we have more than one item, so show a message box with the count of the items */
1327                 StringCbPrintfW(szBuffer, sizeof(szBuffer), L"%u", count);
1328                 if (ShellMessageBoxW(shell32_hInstance, hwnd, MAKEINTRESOURCEW(IDS_DELETEMULTIPLE_TEXT), MAKEINTRESOURCEW(IDS_EMPTY_BITBUCKET),
1329                                    MB_ICONEXCLAMATION | MB_YESNO | MB_DEFBUTTON2, szBuffer) == IDNO)
1330                 {
1331                     return S_OK;
1332                 }
1333                 break;
1334         }
1335     }
1336
1337     if (dwFlags & SHERB_NOPROGRESSUI)
1338     {
1339         ret = EmptyRecycleBinW(pszRootPath);
1340     }
1341     else
1342     {
1343        /* FIXME
1344         * show a progress dialog
1345         */
1346         ret = EmptyRecycleBinW(pszRootPath);
1347     }
1348
1349     if (!ret)
1350         return HRESULT_FROM_WIN32(GetLastError());
1351
1352     if (!(dwFlags & SHERB_NOSOUND))
1353     {
1354         dwSize = sizeof(szPath);
1355         ret = RegGetValueW(HKEY_CURRENT_USER,
1356                            L"AppEvents\\Schemes\\Apps\\Explorer\\EmptyRecycleBin\\.Current",
1357                            NULL,
1358                            RRF_RT_REG_SZ,
1359                            &dwType,
1360                            (PVOID)szPath,
1361                            &dwSize);
1362         if (ret != ERROR_SUCCESS)
1363             return S_OK;
1364
1365         if (dwType != REG_EXPAND_SZ) /* type dismatch */
1366             return S_OK;
1367
1368         szPath[(sizeof(szPath)/sizeof(WCHAR))-1] = L'\0';
1369         PlaySoundW(szPath, NULL, SND_FILENAME);
1370     }
1371     return S_OK;
1372 }
1373
1374 HRESULT WINAPI SHQueryRecycleBinA(LPCSTR pszRootPath, LPSHQUERYRBINFO pSHQueryRBInfo)
1375 {
1376     LPWSTR szRootPathW = NULL;
1377     int len;
1378     HRESULT hr;
1379
1380     TRACE("%s, %p\n", debugstr_a(pszRootPath), pSHQueryRBInfo);
1381
1382     if (pszRootPath)
1383     {
1384         len = MultiByteToWideChar(CP_ACP, 0, pszRootPath, -1, NULL, 0);
1385         if (len == 0)
1386             return HRESULT_FROM_WIN32(GetLastError());
1387         szRootPathW = (LPWSTR)HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
1388         if (!szRootPathW)
1389             return E_OUTOFMEMORY;
1390         if (MultiByteToWideChar(CP_ACP, 0, pszRootPath, -1, szRootPathW, len) == 0)
1391         {
1392             HeapFree(GetProcessHeap(), 0, szRootPathW);
1393             return HRESULT_FROM_WIN32(GetLastError());
1394         }
1395     }
1396
1397     hr = SHQueryRecycleBinW(szRootPathW, pSHQueryRBInfo);
1398     HeapFree(GetProcessHeap(), 0, szRootPathW);
1399
1400     return hr;
1401 }
1402
1403 HRESULT WINAPI SHQueryRecycleBinW(LPCWSTR pszRootPath, LPSHQUERYRBINFO pSHQueryRBInfo)
1404 {
1405     FIXME("%s, %p - stub\n", debugstr_w(pszRootPath), pSHQueryRBInfo);
1406
1407     if (!(pszRootPath) || (pszRootPath[0] == 0) ||
1408         !(pSHQueryRBInfo) || (pSHQueryRBInfo->cbSize < sizeof(SHQUERYRBINFO)))
1409     {
1410         return E_INVALIDARG;
1411     }
1412
1413     pSHQueryRBInfo->i64Size = 0;
1414     pSHQueryRBInfo->i64NumItems = 0;
1415
1416     return S_OK;
1417 }