dlls/shell32/ebrowser.c

   1 /*
   2  * ExplorerBrowser Control implementation.
   3  *
   4  * Copyright 2010 David Hedberg
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include <stdarg.h>
  22
  23 #define COBJMACROS
  24 #define NONAMELESSUNION
  25
  26 #include "winerror.h"
  27 #include "windef.h"
  28 #include "winbase.h"
  29
  30 #include "wine/list.h"
  31 #include "wine/debug.h"
  32 #include "debughlp.h"
  33
  34 #include "shell32_main.h"
  35 #include "pidl.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(shell);
  38
  39 #define SPLITTER_WIDTH 2
  40 #define NP_MIN_WIDTH 60
  41 #define NP_DEFAULT_WIDTH 150
  42 #define SV_MIN_WIDTH 150
  43
  44 typedef struct _event_client {
  45     struct list entry;
  46     IExplorerBrowserEvents *pebe;
  47     DWORD cookie;
  48 } event_client;
  49
  50 typedef struct _travellog_entry {
  51     struct list entry;
  52     LPITEMIDLIST pidl;
  53 } travellog_entry;
  54
  55 typedef struct _ExplorerBrowserImpl {
  56     IExplorerBrowser  IExplorerBrowser_iface;
  57     IShellBrowser     IShellBrowser_iface;
  58     ICommDlgBrowser3  ICommDlgBrowser3_iface;
  59     IObjectWithSite   IObjectWithSite_iface;
  60     INameSpaceTreeControlEvents INameSpaceTreeControlEvents_iface;
  61     IInputObject      IInputObject_iface;
  62     LONG ref;
  63     BOOL destroyed;
  64
  65     HWND hwnd_main;
  66     HWND hwnd_sv;
  67
  68     RECT splitter_rc;
  69     struct {
  70         INameSpaceTreeControl2 *pnstc2;
  71         HWND hwnd_splitter, hwnd_nstc;
  72         DWORD nstc_cookie;
  73         UINT width;
  74         BOOL show;
  75         RECT rc;
  76     } navpane;
  77
  78     EXPLORER_BROWSER_OPTIONS eb_options;
  79     FOLDERSETTINGS fs;
  80
  81     struct list event_clients;
  82     DWORD events_next_cookie;
  83     struct list travellog;
  84     travellog_entry *travellog_cursor;
  85     int travellog_count;
  86
  87     int dpix;
  88
  89     IShellView *psv;
  90     RECT sv_rc;
  91     LPITEMIDLIST current_pidl;
  92
  93     IUnknown *punk_site;
  94     ICommDlgBrowser *pcdb_site;
  95     ICommDlgBrowser2 *pcdb2_site;
  96     ICommDlgBrowser3 *pcdb3_site;
  97     IExplorerPaneVisibility *pepv_site;
  98 } ExplorerBrowserImpl;
  99
 100 static void initialize_navpane(ExplorerBrowserImpl *This, HWND hwnd_parent, RECT *rc);
 101
 102 /**************************************************************************
 103  * Event functions.
 104  */
 105 static void events_unadvise_all(ExplorerBrowserImpl *This)
 106 {
 107     event_client *client, *curs;
 108     TRACE("%p\n", This);
 109
 110     LIST_FOR_EACH_ENTRY_SAFE(client, curs, &This->event_clients, event_client, entry)
 111     {
 112         TRACE("Removing %p\n", client);
 113         list_remove(&client->entry);
 114         IExplorerBrowserEvents_Release(client->pebe);
 115         heap_free(client);
 116     }
 117 }
 118
 119 static HRESULT events_NavigationPending(ExplorerBrowserImpl *This, PCIDLIST_ABSOLUTE pidl)
 120 {
 121     event_client *cursor;
 122     HRESULT hres = S_OK;
 123
 124     TRACE("%p\n", This);
 125
 126     LIST_FOR_EACH_ENTRY(cursor, &This->event_clients, event_client, entry)
 127     {
 128         TRACE("Notifying %p\n", cursor);
 129         hres = IExplorerBrowserEvents_OnNavigationPending(cursor->pebe, pidl);
 130
 131         /* If this failed for any reason, the browsing is supposed to be aborted. */
 132         if(FAILED(hres))
 133             break;
 134     }
 135
 136     return hres;
 137 }
 138
 139 static void events_NavigationComplete(ExplorerBrowserImpl *This, PCIDLIST_ABSOLUTE pidl)
 140 {
 141     event_client *cursor;
 142
 143     TRACE("%p\n", This);
 144
 145     LIST_FOR_EACH_ENTRY(cursor, &This->event_clients, event_client, entry)
 146     {
 147         TRACE("Notifying %p\n", cursor);
 148         IExplorerBrowserEvents_OnNavigationComplete(cursor->pebe, pidl);
 149     }
 150 }
 151
 152 static void events_NavigationFailed(ExplorerBrowserImpl *This, PCIDLIST_ABSOLUTE pidl)
 153 {
 154     event_client *cursor;
 155
 156     TRACE("%p\n", This);
 157
 158     LIST_FOR_EACH_ENTRY(cursor, &This->event_clients, event_client, entry)
 159     {
 160         TRACE("Notifying %p\n", cursor);
 161         IExplorerBrowserEvents_OnNavigationFailed(cursor->pebe, pidl);
 162     }
 163 }
 164
 165 static void events_ViewCreated(ExplorerBrowserImpl *This, IShellView *psv)
 166 {
 167     event_client *cursor;
 168
 169     TRACE("%p\n", This);
 170
 171     LIST_FOR_EACH_ENTRY(cursor, &This->event_clients, event_client, entry)
 172     {
 173         TRACE("Notifying %p\n", cursor);
 174         IExplorerBrowserEvents_OnViewCreated(cursor->pebe, psv);
 175     }
 176 }
 177
 178 /**************************************************************************
 179  * Travellog functions.
 180  */
 181 static void travellog_remove_entry(ExplorerBrowserImpl *This, travellog_entry *entry)
 182 {
 183     TRACE("Removing %p\n", entry);
 184
 185     list_remove(&entry->entry);
 186     ILFree(entry->pidl);
 187     heap_free(entry);
 188     This->travellog_count--;
 189 }
 190
 191 static void travellog_remove_all_entries(ExplorerBrowserImpl *This)
 192 {
 193     travellog_entry *cursor, *cursor2;
 194     TRACE("%p\n", This);
 195
 196     LIST_FOR_EACH_ENTRY_SAFE(cursor, cursor2, &This->travellog, travellog_entry, entry)
 197         travellog_remove_entry(This, cursor);
 198
 199     This->travellog_cursor = NULL;
 200 }
 201
 202 static void travellog_add_entry(ExplorerBrowserImpl *This, LPITEMIDLIST pidl)
 203 {
 204     travellog_entry *new, *cursor, *cursor2;
 205     TRACE("%p (old count %d)\n", pidl, This->travellog_count);
 206
 207     /* Replace the old tail, if any, with the new entry */
 208     if(This->travellog_cursor)
 209     {
 210         LIST_FOR_EACH_ENTRY_SAFE_REV(cursor, cursor2, &This->travellog, travellog_entry, entry)
 211         {
 212             if(cursor == This->travellog_cursor)
 213                 break;
 214             travellog_remove_entry(This, cursor);
 215         }
 216     }
 217
 218     /* Create and add the new entry */
 219     new = heap_alloc(sizeof(*new));
 220     new->pidl = ILClone(pidl);
 221     list_add_tail(&This->travellog, &new->entry);
 222     This->travellog_cursor = new;
 223     This->travellog_count++;
 224
 225     /* Remove the first few entries if the size limit is reached. */
 226     if(This->travellog_count > 200)
 227     {
 228         UINT i = 0;
 229         LIST_FOR_EACH_ENTRY_SAFE(cursor, cursor2, &This->travellog, travellog_entry, entry)
 230         {
 231             if(i++ > 10)
 232                 break;
 233             travellog_remove_entry(This, cursor);
 234         }
 235     }
 236 }
 237
 238 static LPCITEMIDLIST travellog_go_back(ExplorerBrowserImpl *This)
 239 {
 240     travellog_entry *prev;
 241     TRACE("%p, %p\n", This, This->travellog_cursor);
 242
 243     if(!This->travellog_cursor)
 244         return NULL;
 245
 246     prev = LIST_ENTRY(list_prev(&This->travellog, &This->travellog_cursor->entry),
 247                       travellog_entry, entry);
 248     if(!prev)
 249         return NULL;
 250
 251     This->travellog_cursor = prev;
 252     return prev->pidl;
 253 }
 254
 255 static LPCITEMIDLIST travellog_go_forward(ExplorerBrowserImpl *This)
 256 {
 257     travellog_entry *next;
 258     TRACE("%p, %p\n", This, This->travellog_cursor);
 259
 260     if(!This->travellog_cursor)
 261         return NULL;
 262
 263     next = LIST_ENTRY(list_next(&This->travellog, &This->travellog_cursor->entry),
 264                       travellog_entry, entry);
 265     if(!next)
 266         return NULL;
 267
 268     This->travellog_cursor = next;
 269     return next->pidl;
 270 }
 271
 272 /**************************************************************************
 273  * Helper functions
 274  */
 275 static void update_layout(ExplorerBrowserImpl *This)
 276 {
 277     RECT rc;
 278     INT navpane_width_actual;
 279     INT shellview_width_actual;
 280     int np_min_width = MulDiv(NP_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 281     int sv_min_width = MulDiv(SV_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 282     TRACE("%p (navpane: %d, EBO_SHOWFRAMES: %d)\n",
 283           This, This->navpane.show, This->eb_options & EBO_SHOWFRAMES);
 284
 285     GetClientRect(This->hwnd_main, &rc);
 286
 287     if((This->eb_options & EBO_SHOWFRAMES) && This->navpane.show)
 288         navpane_width_actual = This->navpane.width;
 289     else
 290         navpane_width_actual = 0;
 291
 292     shellview_width_actual = rc.right - navpane_width_actual;
 293     if(shellview_width_actual < sv_min_width && navpane_width_actual)
 294     {
 295         INT missing_width = sv_min_width - shellview_width_actual;
 296         if(missing_width < (navpane_width_actual - np_min_width))
 297         {
 298             /* Shrink the navpane */
 299             navpane_width_actual -= missing_width;
 300             shellview_width_actual += missing_width;
 301         }
 302         else
 303         {
 304             /* Hide the navpane */
 305             shellview_width_actual += navpane_width_actual;
 306             navpane_width_actual = 0;
 307         }
 308     }
 309
 310     /**************************************************************
 311      *  Calculate rectangles for the panes. All rectangles contain
 312      *  the position of the panes relative to hwnd_main.
 313      */
 314
 315     if(navpane_width_actual)
 316     {
 317         This->navpane.rc.left = This->navpane.rc.top = 0;
 318         This->navpane.rc.right = navpane_width_actual;
 319         This->navpane.rc.bottom = rc.bottom;
 320
 321         if(!This->navpane.hwnd_splitter)
 322             initialize_navpane(This, This->hwnd_main, &This->navpane.rc);
 323     }
 324     else
 325         ZeroMemory(&This->navpane.rc, sizeof(RECT));
 326
 327     This->sv_rc.left   = navpane_width_actual;
 328     This->sv_rc.top    = 0;
 329     This->sv_rc.right  = This->sv_rc.left + shellview_width_actual;
 330     This->sv_rc.bottom = rc.bottom;
 331 }
 332
 333 static void size_panes(ExplorerBrowserImpl *This)
 334 {
 335     int splitter_width = MulDiv(SPLITTER_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 336     MoveWindow(This->navpane.hwnd_splitter,
 337                This->navpane.rc.right - splitter_width, This->navpane.rc.top,
 338                splitter_width, This->navpane.rc.bottom - This->navpane.rc.top,
 339                TRUE);
 340
 341     MoveWindow(This->hwnd_sv,
 342                This->sv_rc.left, This->sv_rc.top,
 343                This->sv_rc.right - This->sv_rc.left, This->sv_rc.bottom - This->sv_rc.top,
 344                TRUE);
 345 }
 346
 347 static HRESULT change_viewmode(ExplorerBrowserImpl *This, UINT viewmode)
 348 {
 349     IFolderView *pfv;
 350     HRESULT hr;
 351
 352     if(!This->psv)
 353         return E_FAIL;
 354
 355     hr = IShellView_QueryInterface(This->psv, &IID_IFolderView, (void*)&pfv);
 356     if(SUCCEEDED(hr))
 357     {
 358         hr = IFolderView_SetCurrentViewMode(pfv, This->fs.ViewMode);
 359         IFolderView_Release(pfv);
 360     }
 361
 362     return hr;
 363 }
 364
 365 static HRESULT create_new_shellview(ExplorerBrowserImpl *This, IShellItem *psi)
 366 {
 367     IShellBrowser *psb = &This->IShellBrowser_iface;
 368     IShellFolder *psf;
 369     IShellView *psv;
 370     HWND hwnd_new;
 371     HRESULT hr;
 372
 373     TRACE("%p, %p\n", This, psi);
 374
 375     hr = IShellItem_BindToHandler(psi, NULL, &BHID_SFObject, &IID_IShellFolder, (void**)&psf);
 376     if(SUCCEEDED(hr))
 377     {
 378         hr = IShellFolder_CreateViewObject(psf, This->hwnd_main, &IID_IShellView, (void**)&psv);
 379         if(SUCCEEDED(hr))
 380         {
 381             if(This->hwnd_sv)
 382             {
 383                 IShellView_DestroyViewWindow(This->psv);
 384                 This->hwnd_sv = NULL;
 385             }
 386
 387             hr = IShellView_CreateViewWindow(psv, This->psv, &This->fs, psb, &This->sv_rc, &hwnd_new);
 388             if(SUCCEEDED(hr))
 389             {
 390                 /* Replace the old shellview */
 391                 if(This->psv) IShellView_Release(This->psv);
 392
 393                 This->psv = psv;
 394                 This->hwnd_sv = hwnd_new;
 395                 events_ViewCreated(This, psv);
 396             }
 397             else
 398             {
 399                 ERR("CreateViewWindow failed (0x%x)\n", hr);
 400                 IShellView_Release(psv);
 401             }
 402         }
 403         else
 404             ERR("CreateViewObject failed (0x%x)\n", hr);
 405
 406         IShellFolder_Release(psf);
 407     }
 408     else
 409         ERR("SI::BindToHandler failed (0x%x)\n", hr);
 410
 411     return hr;
 412 }
 413
 414 static void get_interfaces_from_site(ExplorerBrowserImpl *This)
 415 {
 416     IServiceProvider *psp;
 417     HRESULT hr;
 418
 419     /* Calling this with This->punk_site set to NULL should properly
 420      * release any previously fetched interfaces.
 421      */
 422
 423     if(This->pcdb_site)
 424     {
 425         ICommDlgBrowser_Release(This->pcdb_site);
 426         if(This->pcdb2_site) ICommDlgBrowser2_Release(This->pcdb2_site);
 427         if(This->pcdb3_site) ICommDlgBrowser3_Release(This->pcdb3_site);
 428
 429         This->pcdb_site = NULL;
 430         This->pcdb2_site = NULL;
 431         This->pcdb3_site = NULL;
 432     }
 433
 434     if(This->pepv_site)
 435     {
 436         IExplorerPaneVisibility_Release(This->pepv_site);
 437         This->pepv_site = NULL;
 438     }
 439
 440     if(!This->punk_site)
 441         return;
 442
 443     hr = IUnknown_QueryInterface(This->punk_site, &IID_IServiceProvider, (void**)&psp);
 444     if(FAILED(hr))
 445     {
 446         ERR("Failed to get IServiceProvider from site.\n");
 447         return;
 448     }
 449
 450     /* ICommDlgBrowser */
 451     IServiceProvider_QueryService(psp, &SID_SExplorerBrowserFrame, &IID_ICommDlgBrowser,
 452                                   (void**)&This->pcdb_site);
 453     IServiceProvider_QueryService(psp, &SID_SExplorerBrowserFrame, &IID_ICommDlgBrowser2,
 454                                   (void**)&This->pcdb2_site);
 455     IServiceProvider_QueryService(psp, &SID_SExplorerBrowserFrame, &IID_ICommDlgBrowser3,
 456                                   (void**)&This->pcdb3_site);
 457
 458     /* IExplorerPaneVisibility */
 459     IServiceProvider_QueryService(psp, &SID_ExplorerPaneVisibility, &IID_IExplorerPaneVisibility,
 460                                   (void**)&This->pepv_site);
 461
 462     IServiceProvider_Release(psp);
 463 }
 464
 465 /**************************************************************************
 466  * General pane functionality.
 467  */
 468 static void update_panestate(ExplorerBrowserImpl *This)
 469 {
 470     EXPLORERPANESTATE eps = EPS_DONTCARE;
 471     BOOL show_navpane;
 472     TRACE("%p\n", This);
 473
 474     if(!This->pepv_site) return;
 475
 476     IExplorerPaneVisibility_GetPaneState(This->pepv_site, (REFEXPLORERPANE) &EP_NavPane, &eps);
 477     if( !(eps & EPS_DEFAULT_OFF) )
 478         show_navpane = TRUE;
 479     else
 480         show_navpane = FALSE;
 481
 482     if(This->navpane.show != show_navpane)
 483     {
 484         update_layout(This);
 485         size_panes(This);
 486     }
 487
 488     This->navpane.show = show_navpane;
 489 }
 490
 491 static void splitter_draw(HWND hwnd, RECT *rc)
 492 {
 493     HDC hdc = GetDC(hwnd);
 494     InvertRect(hdc, rc);
 495     ReleaseDC(hwnd, hdc);
 496 }
 497
 498 /**************************************************************************
 499  * The Navigation Pane.
 500  */
 501 static LRESULT navpane_splitter_beginresize(ExplorerBrowserImpl *This, HWND hwnd, LPARAM lParam)
 502 {
 503     int splitter_width = MulDiv(SPLITTER_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 504
 505     TRACE("\n");
 506
 507     SetCapture(hwnd);
 508
 509     This->splitter_rc = This->navpane.rc;
 510     This->splitter_rc.left = This->splitter_rc.right - splitter_width;
 511
 512     splitter_draw(GetParent(hwnd), &This->splitter_rc);
 513
 514     return TRUE;
 515 }
 516
 517 static LRESULT navpane_splitter_resizing(ExplorerBrowserImpl *This, HWND hwnd, LPARAM lParam)
 518 {
 519     int new_width, dx;
 520     RECT rc;
 521     int splitter_width = MulDiv(SPLITTER_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 522     int np_min_width = MulDiv(NP_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 523     int sv_min_width = MulDiv(SV_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 524
 525     if(GetCapture() != hwnd) return FALSE;
 526
 527     dx = (SHORT)LOWORD(lParam);
 528     TRACE("%d.\n", dx);
 529
 530     rc = This->navpane.rc;
 531     new_width = This->navpane.width + dx;
 532     if(new_width > np_min_width && This->sv_rc.right - new_width > sv_min_width)
 533     {
 534         rc.right = new_width;
 535         rc.left = rc.right - splitter_width;
 536         splitter_draw(GetParent(hwnd), &This->splitter_rc);
 537         splitter_draw(GetParent(hwnd), &rc);
 538         This->splitter_rc = rc;
 539     }
 540
 541     return TRUE;
 542 }
 543
 544 static LRESULT navpane_splitter_endresize(ExplorerBrowserImpl *This, HWND hwnd, LPARAM lParam)
 545 {
 546     int new_width, dx;
 547     int np_min_width = MulDiv(NP_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 548     int sv_min_width = MulDiv(SV_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 549
 550     if(GetCapture() != hwnd) return FALSE;
 551
 552     dx = (SHORT)LOWORD(lParam);
 553     TRACE("%d.\n", dx);
 554
 555     splitter_draw(GetParent(hwnd), &This->splitter_rc);
 556
 557     new_width = This->navpane.width + dx;
 558     if(new_width < np_min_width)
 559         new_width = np_min_width;
 560     else if(This->sv_rc.right - new_width < sv_min_width)
 561         new_width = This->sv_rc.right - sv_min_width;
 562
 563     This->navpane.width = new_width;
 564
 565     update_layout(This);
 566     size_panes(This);
 567
 568     ReleaseCapture();
 569
 570     return TRUE;
 571 }
 572
 573 static LRESULT navpane_on_wm_create(HWND hwnd, CREATESTRUCTW *crs)
 574 {
 575     ExplorerBrowserImpl *This = crs->lpCreateParams;
 576     INameSpaceTreeControl2 *pnstc2;
 577     DWORD style;
 578     HRESULT hr;
 579
 580     TRACE("%p\n", This);
 581     SetWindowLongPtrW(hwnd, GWLP_USERDATA, (LPARAM)This);
 582     This->navpane.hwnd_splitter = hwnd;
 583
 584     hr = CoCreateInstance(&CLSID_NamespaceTreeControl, NULL, CLSCTX_INPROC_SERVER,
 585                           &IID_INameSpaceTreeControl2, (void**)&pnstc2);
 586
 587     if(SUCCEEDED(hr))
 588     {
 589         style = NSTCS_HASEXPANDOS | NSTCS_ROOTHASEXPANDO | NSTCS_SHOWSELECTIONALWAYS;
 590         hr = INameSpaceTreeControl2_Initialize(pnstc2, GetParent(hwnd), NULL, style);
 591         if(SUCCEEDED(hr))
 592         {
 593             INameSpaceTreeControlEvents *pnstce;
 594             IShellFolder *psfdesktop;
 595             IShellItem *psi;
 596             IOleWindow *pow;
 597             LPITEMIDLIST pidl;
 598             DWORD cookie, style2 = NSTCS2_DISPLAYPADDING;
 599
 600             hr = INameSpaceTreeControl2_SetControlStyle2(pnstc2, 0xFF, style2);
 601             if(FAILED(hr))
 602                 ERR("SetControlStyle2 failed (0x%08x)\n", hr);
 603
 604             hr = INameSpaceTreeControl2_QueryInterface(pnstc2, &IID_IOleWindow, (void**)&pow);
 605             if(SUCCEEDED(hr))
 606             {
 607                 IOleWindow_GetWindow(pow, &This->navpane.hwnd_nstc);
 608                 IOleWindow_Release(pow);
 609             }
 610             else
 611                 ERR("QueryInterface(IOleWindow) failed (0x%08x)\n", hr);
 612
 613             pnstce = &This->INameSpaceTreeControlEvents_iface;
 614             hr = INameSpaceTreeControl2_TreeAdvise(pnstc2, (IUnknown*)pnstce, &cookie);
 615             if(FAILED(hr))
 616                 ERR("TreeAdvise failed. (0x%08x).\n", hr);
 617
 618             /*
 619              * Add the default roots
 620              */
 621
 622             /* TODO: This should be FOLDERID_Links */
 623             hr = SHGetSpecialFolderLocation(NULL, CSIDL_FAVORITES, &pidl);
 624             if(SUCCEEDED(hr))
 625             {
 626                 hr = SHCreateShellItem(NULL, NULL, pidl, &psi);
 627                 if(SUCCEEDED(hr))
 628                 {
 629                     hr = INameSpaceTreeControl2_AppendRoot(pnstc2, psi, SHCONTF_NONFOLDERS, NSTCRS_VISIBLE, NULL);
 630                     IShellItem_Release(psi);
 631                 }
 632                 ILFree(pidl);
 633             }
 634
 635             SHGetDesktopFolder(&psfdesktop);
 636             hr = SHGetItemFromObject((IUnknown*)psfdesktop, &IID_IShellItem, (void**)&psi);
 637             IShellFolder_Release(psfdesktop);
 638             if(SUCCEEDED(hr))
 639             {
 640                 hr = INameSpaceTreeControl2_AppendRoot(pnstc2, psi, SHCONTF_FOLDERS, NSTCRS_EXPANDED, NULL);
 641                 IShellItem_Release(psi);
 642             }
 643
 644             /* TODO:
 645              * We should advertise IID_INameSpaceTreeControl to the site of the
 646              * host through its IProfferService interface, if any.
 647              */
 648
 649             This->navpane.pnstc2 = pnstc2;
 650             This->navpane.nstc_cookie = cookie;
 651
 652             return TRUE;
 653         }
 654     }
 655
 656     This->navpane.pnstc2 = NULL;
 657     ERR("Failed (0x%08x)\n", hr);
 658
 659     return FALSE;
 660 }
 661
 662 static LRESULT navpane_on_wm_size_move(ExplorerBrowserImpl *This)
 663 {
 664     UINT height, width;
 665     int splitter_width = MulDiv(SPLITTER_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 666
 667     TRACE("%p\n", This);
 668
 669     width = This->navpane.rc.right - This->navpane.rc.left - splitter_width;
 670     height = This->navpane.rc.bottom - This->navpane.rc.top;
 671
 672     MoveWindow(This->navpane.hwnd_nstc,
 673                This->navpane.rc.left, This->navpane.rc.top,
 674                width, height,
 675                TRUE);
 676
 677     return FALSE;
 678 }
 679
 680 static LRESULT navpane_on_wm_destroy(ExplorerBrowserImpl *This)
 681 {
 682     INameSpaceTreeControl2_TreeUnadvise(This->navpane.pnstc2, This->navpane.nstc_cookie);
 683     INameSpaceTreeControl2_Release(This->navpane.pnstc2);
 684     This->navpane.pnstc2 = NULL;
 685     return TRUE;
 686 }
 687
 688 static LRESULT CALLBACK navpane_wndproc(HWND hWnd, UINT uMessage, WPARAM wParam, LPARAM lParam)
 689 {
 690     ExplorerBrowserImpl *This = (ExplorerBrowserImpl*)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
 691
 692     switch(uMessage) {
 693     case WM_CREATE:           return navpane_on_wm_create(hWnd, (CREATESTRUCTW*)lParam);
 694     case WM_MOVE:             /* Fall through */
 695     case WM_SIZE:             return navpane_on_wm_size_move(This);
 696     case WM_DESTROY:          return navpane_on_wm_destroy(This);
 697     case WM_LBUTTONDOWN:      return navpane_splitter_beginresize(This, hWnd, lParam);
 698     case WM_MOUSEMOVE:        return navpane_splitter_resizing(This, hWnd, lParam);
 699     case WM_LBUTTONUP:        return navpane_splitter_endresize(This, hWnd, lParam);
 700     default:
 701         return DefWindowProcW(hWnd, uMessage, wParam, lParam);
 702     }
 703     return 0;
 704 }
 705
 706 static void initialize_navpane(ExplorerBrowserImpl *This, HWND hwnd_parent, RECT *rc)
 707 {
 708     WNDCLASSW wc;
 709     HWND splitter;
 710     int splitter_width = MulDiv(SPLITTER_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 711     static const WCHAR navpane_classname[] = {'e','b','_','n','a','v','p','a','n','e',0};
 712
 713     if( !GetClassInfoW(shell32_hInstance, navpane_classname, &wc) )
 714     {
 715         wc.style            = CS_HREDRAW | CS_VREDRAW;
 716         wc.lpfnWndProc      = navpane_wndproc;
 717         wc.cbClsExtra       = 0;
 718         wc.cbWndExtra       = 0;
 719         wc.hInstance        = shell32_hInstance;
 720         wc.hIcon            = 0;
 721         wc.hCursor          = LoadCursorW(0, (LPWSTR)IDC_SIZEWE);
 722         wc.hbrBackground    = (HBRUSH)(COLOR_3DFACE + 1);
 723         wc.lpszMenuName     = NULL;
 724         wc.lpszClassName    = navpane_classname;
 725
 726         if (!RegisterClassW(&wc)) return;
 727     }
 728
 729     splitter = CreateWindowExW(0, navpane_classname, NULL,
 730                                WS_CHILD | WS_TABSTOP | WS_VISIBLE,
 731                                rc->right - splitter_width, rc->top,
 732                                splitter_width, rc->bottom - rc->top,
 733                                hwnd_parent, 0, shell32_hInstance, This);
 734     if(!splitter)
 735         ERR("Failed to create navpane : %d.\n", GetLastError());
 736 }
 737
 738 /**************************************************************************
 739  * Main window related functions.
 740  */
 741 static LRESULT main_on_wm_create(HWND hWnd, CREATESTRUCTW *crs)
 742 {
 743     ExplorerBrowserImpl *This = crs->lpCreateParams;
 744     TRACE("%p\n", This);
 745
 746     SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LPARAM)This);
 747     This->hwnd_main = hWnd;
 748
 749     return TRUE;
 750 }
 751
 752 static LRESULT main_on_wm_size(ExplorerBrowserImpl *This)
 753 {
 754     update_layout(This);
 755     size_panes(This);
 756
 757     return TRUE;
 758 }
 759
 760 static LRESULT main_on_cwm_getishellbrowser(ExplorerBrowserImpl *This)
 761 {
 762     return (LRESULT)&This->IShellBrowser_iface;
 763 }
 764
 765 static LRESULT CALLBACK main_wndproc(HWND hWnd, UINT uMessage, WPARAM wParam, LPARAM lParam)
 766 {
 767     ExplorerBrowserImpl *This = (ExplorerBrowserImpl*)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
 768
 769     switch(uMessage)
 770     {
 771     case WM_CREATE:           return main_on_wm_create(hWnd, (CREATESTRUCTW*)lParam);
 772     case WM_SIZE:             return main_on_wm_size(This);
 773     case CWM_GETISHELLBROWSER: return main_on_cwm_getishellbrowser(This);
 774     default:                  return DefWindowProcW(hWnd, uMessage, wParam, lParam);
 775     }
 776
 777     return 0;
 778 }
 779
 780 /**************************************************************************
 781  * IExplorerBrowser Implementation
 782  */
 783
 784 static inline ExplorerBrowserImpl *impl_from_IExplorerBrowser(IExplorerBrowser *iface)
 785 {
 786     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IExplorerBrowser_iface);
 787 }
 788
 789 static HRESULT WINAPI IExplorerBrowser_fnQueryInterface(IExplorerBrowser *iface,
 790                                                         REFIID riid, void **ppvObject)
 791 {
 792     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 793     TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppvObject);
 794
 795     *ppvObject = NULL;
 796     if(IsEqualIID(riid, &IID_IExplorerBrowser) ||
 797        IsEqualIID(riid, &IID_IUnknown))
 798     {
 799         *ppvObject = &This->IExplorerBrowser_iface;
 800     }
 801     else if(IsEqualIID(riid, &IID_IShellBrowser) ||
 802             IsEqualIID(riid, &IID_IOleWindow))
 803     {
 804         *ppvObject = &This->IShellBrowser_iface;
 805     }
 806     else if(IsEqualIID(riid, &IID_ICommDlgBrowser) ||
 807             IsEqualIID(riid, &IID_ICommDlgBrowser2) ||
 808             IsEqualIID(riid, &IID_ICommDlgBrowser3))
 809     {
 810         *ppvObject = &This->ICommDlgBrowser3_iface;
 811     }
 812     else if(IsEqualIID(riid, &IID_IObjectWithSite))
 813     {
 814         *ppvObject = &This->IObjectWithSite_iface;
 815     }
 816     else if(IsEqualIID(riid, &IID_IInputObject))
 817     {
 818         *ppvObject = &This->IInputObject_iface;
 819     }
 820
 821     if(*ppvObject)
 822     {
 823         IUnknown_AddRef((IUnknown*)*ppvObject);
 824         return S_OK;
 825     }
 826
 827     return E_NOINTERFACE;
 828 }
 829
 830 static ULONG WINAPI IExplorerBrowser_fnAddRef(IExplorerBrowser *iface)
 831 {
 832     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 833     LONG ref = InterlockedIncrement(&This->ref);
 834     TRACE("%p - ref %d\n", This, ref);
 835
 836     return ref;
 837 }
 838
 839 static ULONG WINAPI IExplorerBrowser_fnRelease(IExplorerBrowser *iface)
 840 {
 841     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 842     LONG ref = InterlockedDecrement(&This->ref);
 843     TRACE("%p - ref %d\n", This, ref);
 844
 845     if(!ref)
 846     {
 847         TRACE("Freeing.\n");
 848
 849         if(!This->destroyed)
 850             IExplorerBrowser_Destroy(iface);
 851
 852         IObjectWithSite_SetSite(&This->IObjectWithSite_iface, NULL);
 853
 854         heap_free(This);
 855     }
 856
 857     return ref;
 858 }
 859
 860 static HRESULT WINAPI IExplorerBrowser_fnInitialize(IExplorerBrowser *iface,
 861                                                     HWND hwndParent, const RECT *prc,
 862                                                     const FOLDERSETTINGS *pfs)
 863 {
 864     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 865     WNDCLASSW wc;
 866     LONG style;
 867     HDC parent_dc;
 868     static const WCHAR EB_CLASS_NAME[] =
 869         {'E','x','p','l','o','r','e','r','B','r','o','w','s','e','r','C','o','n','t','r','o','l',0};
 870
 871     TRACE("%p (%p, %p, %p)\n", This, hwndParent, prc, pfs);
 872
 873     if(This->hwnd_main)
 874         return E_UNEXPECTED;
 875
 876     if(!hwndParent)
 877         return E_INVALIDARG;
 878
 879     if( !GetClassInfoW(shell32_hInstance, EB_CLASS_NAME, &wc) )
 880     {
 881         wc.style            = CS_HREDRAW | CS_VREDRAW;
 882         wc.lpfnWndProc      = main_wndproc;
 883         wc.cbClsExtra       = 0;
 884         wc.cbWndExtra       = 0;
 885         wc.hInstance        = shell32_hInstance;
 886         wc.hIcon            = 0;
 887         wc.hCursor          = LoadCursorW(0, (LPWSTR)IDC_ARROW);
 888         wc.hbrBackground    = (HBRUSH)(COLOR_WINDOW + 1);
 889         wc.lpszMenuName     = NULL;
 890         wc.lpszClassName    = EB_CLASS_NAME;
 891
 892         if (!RegisterClassW(&wc)) return E_FAIL;
 893     }
 894
 895     parent_dc = GetDC(hwndParent);
 896     This->dpix = GetDeviceCaps(parent_dc, LOGPIXELSX);
 897     ReleaseDC(hwndParent, parent_dc);
 898
 899     This->navpane.width = MulDiv(NP_DEFAULT_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
 900
 901     style = WS_CHILD | WS_VISIBLE | WS_CLIPSIBLINGS;
 902     if (!(This->eb_options & EBO_NOBORDER))
 903         style |= WS_BORDER;
 904     This->hwnd_main = CreateWindowExW(WS_EX_CONTROLPARENT, EB_CLASS_NAME, NULL, style,
 905                                       prc->left, prc->top,
 906                                       prc->right - prc->left, prc->bottom - prc->top,
 907                                       hwndParent, 0, shell32_hInstance, This);
 908
 909     if(!This->hwnd_main)
 910     {
 911         ERR("Failed to create the window.\n");
 912         return E_FAIL;
 913     }
 914
 915     This->fs.ViewMode = pfs ? pfs->ViewMode : FVM_DETAILS;
 916     This->fs.fFlags = pfs ? (pfs->fFlags | FWF_NOCLIENTEDGE) : FWF_NOCLIENTEDGE;
 917
 918     return S_OK;
 919 }
 920
 921 static HRESULT WINAPI IExplorerBrowser_fnDestroy(IExplorerBrowser *iface)
 922 {
 923     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 924     TRACE("%p\n", This);
 925
 926     if(This->psv)
 927     {
 928         IShellView_DestroyViewWindow(This->psv);
 929         IShellView_Release(This->psv);
 930         This->psv = NULL;
 931         This->hwnd_sv = NULL;
 932     }
 933
 934     events_unadvise_all(This);
 935     travellog_remove_all_entries(This);
 936
 937     ILFree(This->current_pidl);
 938     This->current_pidl = NULL;
 939
 940     DestroyWindow(This->hwnd_main);
 941     This->destroyed = TRUE;
 942
 943     return S_OK;
 944 }
 945
 946 static HRESULT WINAPI IExplorerBrowser_fnSetRect(IExplorerBrowser *iface,
 947                                                  HDWP *phdwp, RECT rcBrowser)
 948 {
 949     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 950     TRACE("%p (%p, %s)\n", This, phdwp, wine_dbgstr_rect(&rcBrowser));
 951
 952     if(phdwp && *phdwp)
 953     {
 954         *phdwp = DeferWindowPos(*phdwp, This->hwnd_main, NULL, rcBrowser.left, rcBrowser.top,
 955                                 rcBrowser.right - rcBrowser.left, rcBrowser.bottom - rcBrowser.top,
 956                                 SWP_NOZORDER | SWP_NOACTIVATE);
 957         if(!*phdwp)
 958             return E_FAIL;
 959     }
 960     else
 961     {
 962         MoveWindow(This->hwnd_main, rcBrowser.left, rcBrowser.top,
 963                    rcBrowser.right - rcBrowser.left, rcBrowser.bottom - rcBrowser.top, TRUE);
 964     }
 965
 966     return S_OK;
 967 }
 968
 969 static HRESULT WINAPI IExplorerBrowser_fnSetPropertyBag(IExplorerBrowser *iface,
 970                                                         LPCWSTR pszPropertyBag)
 971 {
 972     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 973     FIXME("stub, %p (%s)\n", This, debugstr_w(pszPropertyBag));
 974
 975     if(!pszPropertyBag)
 976         return E_INVALIDARG;
 977
 978     /* FIXME: This method is currently useless as we don't save any
 979      * settings anywhere, but at least one application breaks if we
 980      * return E_NOTIMPL.
 981      */
 982
 983     return S_OK;
 984 }
 985
 986 static HRESULT WINAPI IExplorerBrowser_fnSetEmptyText(IExplorerBrowser *iface,
 987                                                       LPCWSTR pszEmptyText)
 988 {
 989     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 990     FIXME("stub, %p (%s)\n", This, debugstr_w(pszEmptyText));
 991
 992     return E_NOTIMPL;
 993 }
 994
 995 static HRESULT WINAPI IExplorerBrowser_fnSetFolderSettings(IExplorerBrowser *iface,
 996                                                            const FOLDERSETTINGS *pfs)
 997 {
 998     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 999     TRACE("%p (%p)\n", This, pfs);
1000
1001     if(!pfs)
1002         return E_INVALIDARG;
1003
1004     This->fs.ViewMode = pfs->ViewMode;
1005     This->fs.fFlags = pfs->fFlags | FWF_NOCLIENTEDGE;
1006
1007     /* Change the settings of the current view, if any. */
1008     return change_viewmode(This, This->fs.ViewMode);
1009 }
1010
1011 static HRESULT WINAPI IExplorerBrowser_fnAdvise(IExplorerBrowser *iface,
1012                                                 IExplorerBrowserEvents *psbe,
1013                                                 DWORD *pdwCookie)
1014 {
1015     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1016     event_client *client;
1017     TRACE("%p (%p, %p)\n", This, psbe, pdwCookie);
1018
1019     client = heap_alloc(sizeof(*client));
1020     client->pebe = psbe;
1021     client->cookie = ++This->events_next_cookie;
1022
1023     IExplorerBrowserEvents_AddRef(psbe);
1024     *pdwCookie = client->cookie;
1025
1026     list_add_tail(&This->event_clients, &client->entry);
1027
1028     return S_OK;
1029 }
1030
1031 static HRESULT WINAPI IExplorerBrowser_fnUnadvise(IExplorerBrowser *iface,
1032                                                   DWORD dwCookie)
1033 {
1034     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1035     event_client *client;
1036     TRACE("%p (0x%x)\n", This, dwCookie);
1037
1038     LIST_FOR_EACH_ENTRY(client, &This->event_clients, event_client, entry)
1039     {
1040         if(client->cookie == dwCookie)
1041         {
1042             list_remove(&client->entry);
1043             IExplorerBrowserEvents_Release(client->pebe);
1044             heap_free(client);
1045             return S_OK;
1046         }
1047     }
1048
1049     return E_INVALIDARG;
1050 }
1051
1052 static HRESULT WINAPI IExplorerBrowser_fnSetOptions(IExplorerBrowser *iface,
1053                                                     EXPLORER_BROWSER_OPTIONS dwFlag)
1054 {
1055     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1056     static const EXPLORER_BROWSER_OPTIONS unsupported_options =
1057         EBO_ALWAYSNAVIGATE | EBO_NOWRAPPERWINDOW | EBO_HTMLSHAREPOINTVIEW | EBO_NOPERSISTVIEWSTATE;
1058
1059     TRACE("%p (0x%x)\n", This, dwFlag);
1060
1061     if(dwFlag & unsupported_options)
1062         FIXME("Flags 0x%08x contains unsupported options.\n", dwFlag);
1063
1064     This->eb_options = dwFlag;
1065
1066     return S_OK;
1067 }
1068
1069 static HRESULT WINAPI IExplorerBrowser_fnGetOptions(IExplorerBrowser *iface,
1070                                                     EXPLORER_BROWSER_OPTIONS *pdwFlag)
1071 {
1072     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1073     TRACE("%p (%p)\n", This, pdwFlag);
1074
1075     *pdwFlag = This->eb_options;
1076
1077     return S_OK;
1078 }
1079
1080 static HRESULT WINAPI IExplorerBrowser_fnBrowseToIDList(IExplorerBrowser *iface,
1081                                                         PCUIDLIST_RELATIVE pidl,
1082                                                         UINT uFlags)
1083 {
1084     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1085     LPITEMIDLIST absolute_pidl = NULL;
1086     HRESULT hr;
1087     static const UINT unsupported_browse_flags =
1088         SBSP_NEWBROWSER | EBF_SELECTFROMDATAOBJECT | EBF_NODROPTARGET;
1089     TRACE("%p (%p, 0x%x)\n", This, pidl, uFlags);
1090
1091     if(!This->hwnd_main)
1092         return E_FAIL;
1093
1094     if(This->destroyed)
1095         return HRESULT_FROM_WIN32(ERROR_BUSY);
1096
1097     if(This->current_pidl && (This->eb_options & EBO_NAVIGATEONCE))
1098         return E_FAIL;
1099
1100     if(uFlags & SBSP_EXPLOREMODE)
1101         return E_INVALIDARG;
1102
1103     if(uFlags & unsupported_browse_flags)
1104         FIXME("Argument 0x%x contains unsupported flags.\n", uFlags);
1105
1106     if(uFlags & SBSP_NAVIGATEBACK)
1107     {
1108         TRACE("SBSP_NAVIGATEBACK\n");
1109         absolute_pidl = ILClone(travellog_go_back(This));
1110         if(!absolute_pidl && !This->current_pidl)
1111             return E_FAIL;
1112         else if(!absolute_pidl)
1113             return S_OK;
1114
1115     }
1116     else if(uFlags & SBSP_NAVIGATEFORWARD)
1117     {
1118         TRACE("SBSP_NAVIGATEFORWARD\n");
1119         absolute_pidl = ILClone(travellog_go_forward(This));
1120         if(!absolute_pidl && !This->current_pidl)
1121             return E_FAIL;
1122         else if(!absolute_pidl)
1123             return S_OK;
1124
1125     }
1126     else if(uFlags & SBSP_PARENT)
1127     {
1128         if(This->current_pidl)
1129         {
1130             if(_ILIsPidlSimple(This->current_pidl))
1131             {
1132                 absolute_pidl = _ILCreateDesktop();
1133             }
1134             else
1135             {
1136                 absolute_pidl = ILClone(This->current_pidl);
1137                 ILRemoveLastID(absolute_pidl);
1138             }
1139         }
1140         if(!absolute_pidl)
1141         {
1142             ERR("Failed to get parent pidl.\n");
1143             return E_FAIL;
1144         }
1145
1146     }
1147     else if(uFlags & SBSP_RELATIVE)
1148     {
1149         /* SBSP_RELATIVE has precedence over SBSP_ABSOLUTE */
1150         TRACE("SBSP_RELATIVE\n");
1151         if(This->current_pidl)
1152         {
1153             absolute_pidl = ILCombine(This->current_pidl, pidl);
1154         }
1155         if(!absolute_pidl)
1156         {
1157             ERR("Failed to get absolute pidl.\n");
1158             return E_FAIL;
1159         }
1160     }
1161     else
1162     {
1163         TRACE("SBSP_ABSOLUTE\n");
1164         absolute_pidl = ILClone(pidl);
1165         if(!absolute_pidl && !This->current_pidl)
1166             return E_INVALIDARG;
1167         else if(!absolute_pidl)
1168             return S_OK;
1169     }
1170
1171     /* TODO: Asynchronous browsing. Return S_OK here and finish in
1172      * another thread. */
1173
1174     hr = events_NavigationPending(This, absolute_pidl);
1175     if(FAILED(hr))
1176     {
1177         TRACE("Browsing aborted.\n");
1178         ILFree(absolute_pidl);
1179         return E_FAIL;
1180     }
1181
1182     get_interfaces_from_site(This);
1183     update_panestate(This);
1184
1185     /* Only browse if the new pidl differs from the old */
1186     if(!ILIsEqual(This->current_pidl, absolute_pidl))
1187     {
1188         IShellItem *psi;
1189         hr = SHCreateItemFromIDList(absolute_pidl, &IID_IShellItem, (void**)&psi);
1190         if(SUCCEEDED(hr))
1191         {
1192             hr = create_new_shellview(This, psi);
1193             if(FAILED(hr))
1194             {
1195                 events_NavigationFailed(This, absolute_pidl);
1196                 ILFree(absolute_pidl);
1197                 IShellItem_Release(psi);
1198                 return E_FAIL;
1199             }
1200
1201             /* Add to travellog */
1202             if( !(This->eb_options & EBO_NOTRAVELLOG) &&
1203                 !(uFlags & (SBSP_NAVIGATEFORWARD|SBSP_NAVIGATEBACK)) )
1204             {
1205                 travellog_add_entry(This, absolute_pidl);
1206             }
1207
1208             IShellItem_Release(psi);
1209         }
1210     }
1211
1212     events_NavigationComplete(This, absolute_pidl);
1213     ILFree(This->current_pidl);
1214     This->current_pidl = absolute_pidl;
1215
1216     /* Expand the NameSpaceTree to the current location. */
1217     if(This->navpane.show && This->navpane.pnstc2)
1218     {
1219         IShellItem *psi;
1220         hr = SHCreateItemFromIDList(This->current_pidl, &IID_IShellItem, (void**)&psi);
1221         if(SUCCEEDED(hr))
1222         {
1223             INameSpaceTreeControl2_EnsureItemVisible(This->navpane.pnstc2, psi);
1224             IShellItem_Release(psi);
1225         }
1226     }
1227
1228     return S_OK;
1229 }
1230
1231 static HRESULT WINAPI IExplorerBrowser_fnBrowseToObject(IExplorerBrowser *iface,
1232                                                         IUnknown *punk, UINT uFlags)
1233 {
1234     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1235     LPITEMIDLIST pidl;
1236     HRESULT hr;
1237     TRACE("%p (%p, 0x%x)\n", This, punk, uFlags);
1238
1239     if(!punk)
1240         return IExplorerBrowser_BrowseToIDList(iface, NULL, uFlags);
1241
1242     hr = SHGetIDListFromObject(punk, &pidl);
1243     if(SUCCEEDED(hr))
1244     {
1245         hr = IExplorerBrowser_BrowseToIDList(iface, pidl, uFlags);
1246         ILFree(pidl);
1247     }
1248
1249     return hr;
1250 }
1251
1252 static HRESULT WINAPI IExplorerBrowser_fnFillFromObject(IExplorerBrowser *iface,
1253                                                         IUnknown *punk,
1254                                                         EXPLORER_BROWSER_FILL_FLAGS dwFlags)
1255 {
1256     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1257     FIXME("stub, %p (%p, 0x%x)\n", This, punk, dwFlags);
1258
1259     return E_NOTIMPL;
1260 }
1261
1262 static HRESULT WINAPI IExplorerBrowser_fnRemoveAll(IExplorerBrowser *iface)
1263 {
1264     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1265     FIXME("stub, %p\n", This);
1266
1267     return E_NOTIMPL;
1268 }
1269
1270 static HRESULT WINAPI IExplorerBrowser_fnGetCurrentView(IExplorerBrowser *iface,
1271                                                         REFIID riid, void **ppv)
1272 {
1273     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1274     TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppv);
1275
1276     if(!This->psv)
1277         return E_FAIL;
1278
1279     return IShellView_QueryInterface(This->psv, riid, ppv);
1280 }
1281
1282 static const IExplorerBrowserVtbl vt_IExplorerBrowser =
1283 {
1284     IExplorerBrowser_fnQueryInterface,
1285     IExplorerBrowser_fnAddRef,
1286     IExplorerBrowser_fnRelease,
1287     IExplorerBrowser_fnInitialize,
1288     IExplorerBrowser_fnDestroy,
1289     IExplorerBrowser_fnSetRect,
1290     IExplorerBrowser_fnSetPropertyBag,
1291     IExplorerBrowser_fnSetEmptyText,
1292     IExplorerBrowser_fnSetFolderSettings,
1293     IExplorerBrowser_fnAdvise,
1294     IExplorerBrowser_fnUnadvise,
1295     IExplorerBrowser_fnSetOptions,
1296     IExplorerBrowser_fnGetOptions,
1297     IExplorerBrowser_fnBrowseToIDList,
1298     IExplorerBrowser_fnBrowseToObject,
1299     IExplorerBrowser_fnFillFromObject,
1300     IExplorerBrowser_fnRemoveAll,
1301     IExplorerBrowser_fnGetCurrentView
1302 };
1303
1304 /**************************************************************************
1305  * IShellBrowser Implementation
1306  */
1307
1308 static inline ExplorerBrowserImpl *impl_from_IShellBrowser(IShellBrowser *iface)
1309 {
1310     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IShellBrowser_iface);
1311 }
1312
1313 static HRESULT WINAPI IShellBrowser_fnQueryInterface(IShellBrowser *iface,
1314                                                      REFIID riid, void **ppvObject)
1315 {
1316     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1317     TRACE("%p\n", This);
1318     return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
1319 }
1320
1321 static ULONG WINAPI IShellBrowser_fnAddRef(IShellBrowser *iface)
1322 {
1323     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1324     TRACE("%p\n", This);
1325     return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1326 }
1327
1328 static ULONG WINAPI IShellBrowser_fnRelease(IShellBrowser *iface)
1329 {
1330     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1331     TRACE("%p\n", This);
1332     return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1333 }
1334
1335 static HRESULT WINAPI IShellBrowser_fnGetWindow(IShellBrowser *iface, HWND *phwnd)
1336 {
1337     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1338     TRACE("%p (%p)\n", This, phwnd);
1339
1340     if(!This->hwnd_main)
1341         return E_FAIL;
1342
1343     *phwnd = This->hwnd_main;
1344     return S_OK;
1345 }
1346
1347 static HRESULT WINAPI IShellBrowser_fnContextSensitiveHelp(IShellBrowser *iface,
1348                                                            BOOL fEnterMode)
1349 {
1350     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1351     FIXME("stub, %p (%d)\n", This, fEnterMode);
1352
1353     return E_NOTIMPL;
1354 }
1355
1356 static HRESULT WINAPI IShellBrowser_fnInsertMenusSB(IShellBrowser *iface,
1357                                                     HMENU hmenuShared,
1358                                                     LPOLEMENUGROUPWIDTHS lpMenuWidths)
1359 {
1360     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1361     TRACE("%p (%p, %p)\n", This, hmenuShared, lpMenuWidths);
1362
1363     /* Not implemented. */
1364     return E_NOTIMPL;
1365 }
1366
1367 static HRESULT WINAPI IShellBrowser_fnSetMenuSB(IShellBrowser *iface,
1368                                                 HMENU hmenuShared,
1369                                                 HOLEMENU holemenuReserved,
1370                                                 HWND hwndActiveObject)
1371 {
1372     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1373     TRACE("%p (%p, %p, %p)\n", This, hmenuShared, holemenuReserved, hwndActiveObject);
1374
1375     /* Not implemented. */
1376     return E_NOTIMPL;
1377 }
1378
1379 static HRESULT WINAPI IShellBrowser_fnRemoveMenusSB(IShellBrowser *iface,
1380                                                     HMENU hmenuShared)
1381 {
1382     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1383     TRACE("%p (%p)\n", This, hmenuShared);
1384
1385     /* Not implemented. */
1386     return E_NOTIMPL;
1387 }
1388
1389 static HRESULT WINAPI IShellBrowser_fnSetStatusTextSB(IShellBrowser *iface,
1390                                                       LPCOLESTR pszStatusText)
1391 {
1392     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1393     FIXME("stub, %p (%s)\n", This, debugstr_w(pszStatusText));
1394
1395     return E_NOTIMPL;
1396 }
1397
1398 static HRESULT WINAPI IShellBrowser_fnEnableModelessSB(IShellBrowser *iface,
1399                                                        BOOL fEnable)
1400 {
1401     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1402     FIXME("stub, %p (%d)\n", This, fEnable);
1403
1404     return E_NOTIMPL;
1405 }
1406
1407 static HRESULT WINAPI IShellBrowser_fnTranslateAcceleratorSB(IShellBrowser *iface,
1408                                                              MSG *pmsg, WORD wID)
1409 {
1410     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1411     FIXME("stub, %p (%p, 0x%x)\n", This, pmsg, wID);
1412
1413     return E_NOTIMPL;
1414 }
1415
1416 static HRESULT WINAPI IShellBrowser_fnBrowseObject(IShellBrowser *iface,
1417                                                    LPCITEMIDLIST pidl, UINT wFlags)
1418 {
1419     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1420     TRACE("%p (%p, %x)\n", This, pidl, wFlags);
1421
1422     return IExplorerBrowser_BrowseToIDList(&This->IExplorerBrowser_iface, pidl, wFlags);
1423 }
1424
1425 static HRESULT WINAPI IShellBrowser_fnGetViewStateStream(IShellBrowser *iface,
1426                                                          DWORD grfMode,
1427                                                          IStream **ppStrm)
1428 {
1429     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1430     FIXME("stub, %p (0x%x, %p)\n", This, grfMode, ppStrm);
1431
1432     *ppStrm = NULL;
1433     return E_FAIL;
1434 }
1435
1436 static HRESULT WINAPI IShellBrowser_fnGetControlWindow(IShellBrowser *iface,
1437                                                        UINT id, HWND *phwnd)
1438 {
1439     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1440     TRACE("(%p)->(%d, %p)\n", This, id, phwnd);
1441     if (phwnd) *phwnd = NULL;
1442     return E_NOTIMPL;
1443 }
1444
1445 static HRESULT WINAPI IShellBrowser_fnSendControlMsg(IShellBrowser *iface,
1446                                                      UINT id, UINT uMsg,
1447                                                      WPARAM wParam, LPARAM lParam,
1448                                                      LRESULT *pret)
1449 {
1450     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1451     FIXME("stub, %p (%d, %d, %lx, %lx, %p)\n", This, id, uMsg, wParam, lParam, pret);
1452
1453     return E_NOTIMPL;
1454 }
1455
1456 static HRESULT WINAPI IShellBrowser_fnQueryActiveShellView(IShellBrowser *iface,
1457                                                            IShellView **ppshv)
1458 {
1459     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1460     TRACE("%p (%p)\n", This, ppshv);
1461
1462     if(!This->psv)
1463         return E_FAIL;
1464
1465     *ppshv = This->psv;
1466     IShellView_AddRef(This->psv);
1467
1468     return S_OK;
1469 }
1470
1471 static HRESULT WINAPI IShellBrowser_fnOnViewWindowActive(IShellBrowser *iface,
1472                                                          IShellView *pshv)
1473 {
1474     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1475     FIXME("stub, %p (%p)\n", This, pshv);
1476
1477     return E_NOTIMPL;
1478 }
1479
1480 static HRESULT WINAPI IShellBrowser_fnSetToolbarItems(IShellBrowser *iface,
1481                                                       LPTBBUTTONSB lpButtons,
1482                                                       UINT nButtons, UINT uFlags)
1483 {
1484     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1485     FIXME("stub, %p (%p, %d, 0x%x)\n", This, lpButtons, nButtons, uFlags);
1486
1487     return E_NOTIMPL;
1488 }
1489
1490 static const IShellBrowserVtbl vt_IShellBrowser = {
1491     IShellBrowser_fnQueryInterface,
1492     IShellBrowser_fnAddRef,
1493     IShellBrowser_fnRelease,
1494     IShellBrowser_fnGetWindow,
1495     IShellBrowser_fnContextSensitiveHelp,
1496     IShellBrowser_fnInsertMenusSB,
1497     IShellBrowser_fnSetMenuSB,
1498     IShellBrowser_fnRemoveMenusSB,
1499     IShellBrowser_fnSetStatusTextSB,
1500     IShellBrowser_fnEnableModelessSB,
1501     IShellBrowser_fnTranslateAcceleratorSB,
1502     IShellBrowser_fnBrowseObject,
1503     IShellBrowser_fnGetViewStateStream,
1504     IShellBrowser_fnGetControlWindow,
1505     IShellBrowser_fnSendControlMsg,
1506     IShellBrowser_fnQueryActiveShellView,
1507     IShellBrowser_fnOnViewWindowActive,
1508     IShellBrowser_fnSetToolbarItems
1509 };
1510
1511 /**************************************************************************
1512  * ICommDlgBrowser3 Implementation
1513  */
1514
1515 static inline ExplorerBrowserImpl *impl_from_ICommDlgBrowser3(ICommDlgBrowser3 *iface)
1516 {
1517     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, ICommDlgBrowser3_iface);
1518 }
1519
1520 static HRESULT WINAPI ICommDlgBrowser3_fnQueryInterface(ICommDlgBrowser3 *iface,
1521                                                         REFIID riid,
1522                                                         void **ppvObject)
1523 {
1524     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1525     TRACE("%p\n", This);
1526     return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
1527 }
1528
1529 static ULONG WINAPI ICommDlgBrowser3_fnAddRef(ICommDlgBrowser3 *iface)
1530 {
1531     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1532     TRACE("%p\n", This);
1533     return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1534 }
1535
1536 static ULONG WINAPI ICommDlgBrowser3_fnRelease(ICommDlgBrowser3 *iface)
1537 {
1538     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1539     TRACE("%p\n", This);
1540     return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1541 }
1542
1543 static HRESULT WINAPI ICommDlgBrowser3_fnOnDefaultCommand(ICommDlgBrowser3 *iface,
1544                                                           IShellView *shv)
1545 {
1546     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1547     IDataObject *pdo;
1548     HRESULT hr;
1549     HRESULT ret = S_FALSE;
1550
1551     TRACE("%p (%p)\n", This, shv);
1552
1553     hr = IShellView_GetItemObject(shv, SVGIO_SELECTION, &IID_IDataObject, (void**)&pdo);
1554     if(SUCCEEDED(hr))
1555     {
1556         FORMATETC fmt;
1557         STGMEDIUM medium;
1558
1559         fmt.cfFormat = RegisterClipboardFormatW(CFSTR_SHELLIDLISTW);
1560         fmt.ptd = NULL;
1561         fmt.dwAspect = DVASPECT_CONTENT;
1562         fmt.lindex = -1;
1563         fmt.tymed = TYMED_HGLOBAL;
1564
1565         hr = IDataObject_GetData(pdo, &fmt ,&medium);
1566         IDataObject_Release(pdo);
1567         if(SUCCEEDED(hr))
1568         {
1569             LPIDA pida = GlobalLock(medium.u.hGlobal);
1570             LPCITEMIDLIST pidl_child = (LPCITEMIDLIST) ((LPBYTE)pida+pida->aoffset[1]);
1571
1572             /* Handle folders by browsing to them. */
1573             if(_ILIsFolder(pidl_child) || _ILIsDrive(pidl_child) || _ILIsSpecialFolder(pidl_child))
1574             {
1575                 IExplorerBrowser_BrowseToIDList(&This->IExplorerBrowser_iface, pidl_child, SBSP_RELATIVE);
1576                 ret = S_OK;
1577             }
1578             GlobalUnlock(medium.u.hGlobal);
1579             GlobalFree(medium.u.hGlobal);
1580         }
1581         else
1582             ERR("Failed to get data from IDataObject.\n");
1583     } else
1584         ERR("Failed to get IDataObject.\n");
1585
1586     /* If we didn't handle the default command, check if we have a
1587      * client that does */
1588     if(ret == S_FALSE && This->pcdb_site)
1589         return ICommDlgBrowser_OnDefaultCommand(This->pcdb_site, shv);
1590
1591     return ret;
1592 }
1593 static HRESULT WINAPI ICommDlgBrowser3_fnOnStateChange(ICommDlgBrowser3 *iface,
1594                                                        IShellView *shv, ULONG uChange)
1595 {
1596     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1597     TRACE("%p (%p, %d)\n", This, shv, uChange);
1598
1599     if(This->pcdb_site)
1600         return ICommDlgBrowser_OnStateChange(This->pcdb_site, shv, uChange);
1601
1602     return E_NOTIMPL;
1603 }
1604 static HRESULT WINAPI ICommDlgBrowser3_fnIncludeObject(ICommDlgBrowser3 *iface,
1605                                                        IShellView *pshv, LPCITEMIDLIST pidl)
1606 {
1607     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1608     TRACE("%p (%p, %p)\n", This, pshv, pidl);
1609
1610     if(This->pcdb_site)
1611         return ICommDlgBrowser_IncludeObject(This->pcdb_site, pshv, pidl);
1612
1613     return S_OK;
1614 }
1615
1616 static HRESULT WINAPI ICommDlgBrowser3_fnNotify(ICommDlgBrowser3 *iface,
1617                                                 IShellView *pshv,
1618                                                 DWORD dwNotifyType)
1619 {
1620     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1621     TRACE("%p (%p, 0x%x)\n", This, pshv, dwNotifyType);
1622
1623     if(This->pcdb2_site)
1624         return ICommDlgBrowser2_Notify(This->pcdb2_site, pshv, dwNotifyType);
1625
1626     return S_OK;
1627 }
1628
1629 static HRESULT WINAPI ICommDlgBrowser3_fnGetDefaultMenuText(ICommDlgBrowser3 *iface,
1630                                                             IShellView *pshv,
1631                                                             LPWSTR pszText, int cchMax)
1632 {
1633     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1634     TRACE("%p (%p, %s, %d)\n", This, pshv, debugstr_w(pszText), cchMax);
1635
1636     if(This->pcdb2_site)
1637         return ICommDlgBrowser2_GetDefaultMenuText(This->pcdb2_site, pshv, pszText, cchMax);
1638
1639     return S_OK;
1640 }
1641
1642 static HRESULT WINAPI ICommDlgBrowser3_fnGetViewFlags(ICommDlgBrowser3 *iface,
1643                                                       DWORD *pdwFlags)
1644 {
1645     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1646     TRACE("%p (%p)\n", This, pdwFlags);
1647
1648     if(This->pcdb2_site)
1649         return ICommDlgBrowser2_GetViewFlags(This->pcdb2_site, pdwFlags);
1650
1651     return S_OK;
1652 }
1653
1654 static HRESULT WINAPI ICommDlgBrowser3_fnOnColumnClicked(ICommDlgBrowser3 *iface,
1655                                                          IShellView *pshv, int iColumn)
1656 {
1657     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1658     TRACE("%p (%p, %d)\n", This, pshv, iColumn);
1659
1660     if(This->pcdb3_site)
1661         return ICommDlgBrowser3_OnColumnClicked(This->pcdb3_site, pshv, iColumn);
1662
1663     return S_OK;
1664 }
1665
1666 static HRESULT WINAPI ICommDlgBrowser3_fnGetCurrentFilter(ICommDlgBrowser3 *iface,
1667                                                           LPWSTR pszFileSpec,
1668                                                           int cchFileSpec)
1669 {
1670     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1671     TRACE("%p (%s, %d)\n", This, debugstr_w(pszFileSpec), cchFileSpec);
1672
1673     if(This->pcdb3_site)
1674         return ICommDlgBrowser3_GetCurrentFilter(This->pcdb3_site, pszFileSpec, cchFileSpec);
1675
1676     return S_OK;
1677 }
1678
1679 static HRESULT WINAPI ICommDlgBrowser3_fnOnPreViewCreated(ICommDlgBrowser3 *iface,
1680                                                           IShellView *pshv)
1681 {
1682     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1683     TRACE("%p (%p)\n", This, pshv);
1684
1685     if(This->pcdb3_site)
1686         return ICommDlgBrowser3_OnPreViewCreated(This->pcdb3_site, pshv);
1687
1688     return S_OK;
1689 }
1690
1691 static const ICommDlgBrowser3Vtbl vt_ICommDlgBrowser3 = {
1692     ICommDlgBrowser3_fnQueryInterface,
1693     ICommDlgBrowser3_fnAddRef,
1694     ICommDlgBrowser3_fnRelease,
1695     ICommDlgBrowser3_fnOnDefaultCommand,
1696     ICommDlgBrowser3_fnOnStateChange,
1697     ICommDlgBrowser3_fnIncludeObject,
1698     ICommDlgBrowser3_fnNotify,
1699     ICommDlgBrowser3_fnGetDefaultMenuText,
1700     ICommDlgBrowser3_fnGetViewFlags,
1701     ICommDlgBrowser3_fnOnColumnClicked,
1702     ICommDlgBrowser3_fnGetCurrentFilter,
1703     ICommDlgBrowser3_fnOnPreViewCreated
1704 };
1705
1706 /**************************************************************************
1707  * IObjectWithSite Implementation
1708  */
1709
1710 static inline ExplorerBrowserImpl *impl_from_IObjectWithSite(IObjectWithSite *iface)
1711 {
1712     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IObjectWithSite_iface);
1713 }
1714
1715 static HRESULT WINAPI IObjectWithSite_fnQueryInterface(IObjectWithSite *iface,
1716                                                        REFIID riid, void **ppvObject)
1717 {
1718     ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1719     TRACE("%p\n", This);
1720     return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
1721 }
1722
1723 static ULONG WINAPI IObjectWithSite_fnAddRef(IObjectWithSite *iface)
1724 {
1725     ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1726     TRACE("%p\n", This);
1727     return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1728 }
1729
1730 static ULONG WINAPI IObjectWithSite_fnRelease(IObjectWithSite *iface)
1731 {
1732     ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1733     TRACE("%p\n", This);
1734     return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1735 }
1736
1737 static HRESULT WINAPI IObjectWithSite_fnSetSite(IObjectWithSite *iface, IUnknown *punk_site)
1738 {
1739     ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1740     TRACE("%p (%p)\n", This, punk_site);
1741
1742     if(This->punk_site)
1743     {
1744         IUnknown_Release(This->punk_site);
1745         This->punk_site = NULL;
1746         get_interfaces_from_site(This);
1747     }
1748
1749     This->punk_site = punk_site;
1750
1751     if(This->punk_site)
1752         IUnknown_AddRef(This->punk_site);
1753
1754     return S_OK;
1755 }
1756
1757 static HRESULT WINAPI IObjectWithSite_fnGetSite(IObjectWithSite *iface, REFIID riid, void **ppvSite)
1758 {
1759     ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1760     TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppvSite);
1761
1762     if(!This->punk_site)
1763         return E_FAIL;
1764
1765     return IUnknown_QueryInterface(This->punk_site, riid, ppvSite);
1766 }
1767
1768 static const IObjectWithSiteVtbl vt_IObjectWithSite = {
1769     IObjectWithSite_fnQueryInterface,
1770     IObjectWithSite_fnAddRef,
1771     IObjectWithSite_fnRelease,
1772     IObjectWithSite_fnSetSite,
1773     IObjectWithSite_fnGetSite
1774 };
1775
1776 /**************************************************************************
1777  * INameSpaceTreeControlEvents Implementation
1778  */
1779 static inline ExplorerBrowserImpl *impl_from_INameSpaceTreeControlEvents(INameSpaceTreeControlEvents *iface)
1780 {
1781     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, INameSpaceTreeControlEvents_iface);
1782 }
1783
1784 static HRESULT WINAPI NSTCEvents_fnQueryInterface(INameSpaceTreeControlEvents *iface,
1785                                                   REFIID riid, void **ppvObject)
1786 {
1787     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1788     TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppvObject);
1789
1790     *ppvObject = NULL;
1791     if(IsEqualIID(riid, &IID_INameSpaceTreeControlEvents) ||
1792        IsEqualIID(riid, &IID_IUnknown))
1793     {
1794         *ppvObject = iface;
1795     }
1796
1797     if(*ppvObject)
1798     {
1799         IUnknown_AddRef((IUnknown*)*ppvObject);
1800         return S_OK;
1801     }
1802
1803     return E_NOINTERFACE;
1804 }
1805
1806 static ULONG WINAPI NSTCEvents_fnAddRef(INameSpaceTreeControlEvents *iface)
1807 {
1808     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1809     TRACE("%p\n", This);
1810     return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1811 }
1812
1813 static ULONG WINAPI NSTCEvents_fnRelease(INameSpaceTreeControlEvents *iface)
1814 {
1815     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1816     TRACE("%p\n", This);
1817     return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1818 }
1819
1820 static HRESULT WINAPI NSTCEvents_fnOnItemClick(INameSpaceTreeControlEvents *iface,
1821                                                IShellItem *psi,
1822                                                NSTCEHITTEST nstceHitTest,
1823                                                NSTCECLICKTYPE nstceClickType)
1824 {
1825     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1826     TRACE("%p (%p, 0x%x, 0x%x)\n", This, psi, nstceHitTest, nstceClickType);
1827     return S_OK;
1828 }
1829
1830 static HRESULT WINAPI NSTCEvents_fnOnPropertyItemCommit(INameSpaceTreeControlEvents *iface,
1831                                                         IShellItem *psi)
1832 {
1833     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1834     TRACE("%p (%p)\n", This, psi);
1835     return E_NOTIMPL;
1836 }
1837
1838 static HRESULT WINAPI NSTCEvents_fnOnItemStateChanging(INameSpaceTreeControlEvents *iface,
1839                                                        IShellItem *psi,
1840                                                        NSTCITEMSTATE nstcisMask,
1841                                                        NSTCITEMSTATE nstcisState)
1842 {
1843     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1844     TRACE("%p (%p, 0x%x, 0x%x)\n", This, psi, nstcisMask, nstcisState);
1845     return E_NOTIMPL;
1846 }
1847
1848 static HRESULT WINAPI NSTCEvents_fnOnItemStateChanged(INameSpaceTreeControlEvents *iface,
1849                                                       IShellItem *psi,
1850                                                       NSTCITEMSTATE nstcisMask,
1851                                                       NSTCITEMSTATE nstcisState)
1852 {
1853     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1854     TRACE("%p (%p, 0x%x, 0x%x)\n", This, psi, nstcisMask, nstcisState);
1855     return E_NOTIMPL;
1856 }
1857
1858 static HRESULT WINAPI NSTCEvents_fnOnSelectionChanged(INameSpaceTreeControlEvents *iface,
1859                                                       IShellItemArray *psiaSelection)
1860 {
1861     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1862     IShellItem *psi;
1863     HRESULT hr;
1864     TRACE("%p (%p)\n", This, psiaSelection);
1865
1866     hr = IShellItemArray_GetItemAt(psiaSelection, 0, &psi);
1867     if(SUCCEEDED(hr))
1868     {
1869         hr = IExplorerBrowser_BrowseToObject(&This->IExplorerBrowser_iface,
1870                                              (IUnknown*)psi, SBSP_DEFBROWSER);
1871         IShellItem_Release(psi);
1872     }
1873
1874     return hr;
1875 }
1876
1877 static HRESULT WINAPI NSTCEvents_fnOnKeyboardInput(INameSpaceTreeControlEvents *iface,
1878                                                    UINT uMsg, WPARAM wParam, LPARAM lParam)
1879 {
1880     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1881     TRACE("%p (%d, 0x%lx, 0x%lx)\n", This, uMsg, wParam, lParam);
1882     return S_OK;
1883 }
1884
1885 static HRESULT WINAPI NSTCEvents_fnOnBeforeExpand(INameSpaceTreeControlEvents *iface,
1886                                                   IShellItem *psi)
1887 {
1888     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1889     TRACE("%p (%p)\n", This, psi);
1890     return E_NOTIMPL;
1891 }
1892
1893 static HRESULT WINAPI NSTCEvents_fnOnAfterExpand(INameSpaceTreeControlEvents *iface,
1894                                                  IShellItem *psi)
1895 {
1896     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1897     TRACE("%p (%p)\n", This, psi);
1898     return E_NOTIMPL;
1899 }
1900
1901 static HRESULT WINAPI NSTCEvents_fnOnBeginLabelEdit(INameSpaceTreeControlEvents *iface,
1902                                                     IShellItem *psi)
1903 {
1904     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1905     TRACE("%p (%p)\n", This, psi);
1906     return E_NOTIMPL;
1907 }
1908
1909 static HRESULT WINAPI NSTCEvents_fnOnEndLabelEdit(INameSpaceTreeControlEvents *iface,
1910                                                   IShellItem *psi)
1911 {
1912     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1913     TRACE("%p (%p)\n", This, psi);
1914     return E_NOTIMPL;
1915 }
1916
1917 static HRESULT WINAPI NSTCEvents_fnOnGetToolTip(INameSpaceTreeControlEvents *iface,
1918                                                 IShellItem *psi, LPWSTR pszTip, int cchTip)
1919 {
1920     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1921     TRACE("%p (%p, %p, %d)\n", This, psi, pszTip, cchTip);
1922     return E_NOTIMPL;
1923 }
1924
1925 static HRESULT WINAPI NSTCEvents_fnOnBeforeItemDelete(INameSpaceTreeControlEvents *iface,
1926                                                       IShellItem *psi)
1927 {
1928     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1929     TRACE("%p (%p)\n", This, psi);
1930     return E_NOTIMPL;
1931 }
1932
1933 static HRESULT WINAPI NSTCEvents_fnOnItemAdded(INameSpaceTreeControlEvents *iface,
1934                                                IShellItem *psi, BOOL fIsRoot)
1935 {
1936     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1937     TRACE("%p (%p, %d)\n", This, psi, fIsRoot);
1938     return E_NOTIMPL;
1939 }
1940
1941 static HRESULT WINAPI NSTCEvents_fnOnItemDeleted(INameSpaceTreeControlEvents *iface,
1942                                                  IShellItem *psi, BOOL fIsRoot)
1943 {
1944     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1945     TRACE("%p (%p, %d)\n", This, psi, fIsRoot);
1946     return E_NOTIMPL;
1947 }
1948
1949 static HRESULT WINAPI NSTCEvents_fnOnBeforeContextMenu(INameSpaceTreeControlEvents *iface,
1950                                                        IShellItem *psi, REFIID riid, void **ppv)
1951 {
1952     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1953     TRACE("%p (%p, %s, %p)\n", This, psi, shdebugstr_guid(riid), ppv);
1954     return E_NOTIMPL;
1955 }
1956
1957 static HRESULT WINAPI NSTCEvents_fnOnAfterContextMenu(INameSpaceTreeControlEvents *iface,
1958                                                       IShellItem *psi, IContextMenu *pcmIn,
1959                                                       REFIID riid, void **ppv)
1960 {
1961     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1962     TRACE("%p (%p, %p, %s, %p)\n", This, psi, pcmIn, shdebugstr_guid(riid), ppv);
1963     return E_NOTIMPL;
1964 }
1965
1966 static HRESULT WINAPI NSTCEvents_fnOnBeforeStateImageChange(INameSpaceTreeControlEvents *iface,
1967                                                             IShellItem *psi)
1968 {
1969     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1970     TRACE("%p (%p)\n", This, psi);
1971     return E_NOTIMPL;
1972 }
1973
1974 static HRESULT WINAPI NSTCEvents_fnOnGetDefaultIconIndex(INameSpaceTreeControlEvents* iface,
1975                                                          IShellItem *psi,
1976                                                          int *piDefaultIcon, int *piOpenIcon)
1977 {
1978     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1979     TRACE("%p (%p, %p, %p)\n", This, psi, piDefaultIcon, piOpenIcon);
1980     return E_NOTIMPL;
1981 }
1982
1983
1984 static const INameSpaceTreeControlEventsVtbl vt_INameSpaceTreeControlEvents =  {
1985     NSTCEvents_fnQueryInterface,
1986     NSTCEvents_fnAddRef,
1987     NSTCEvents_fnRelease,
1988     NSTCEvents_fnOnItemClick,
1989     NSTCEvents_fnOnPropertyItemCommit,
1990     NSTCEvents_fnOnItemStateChanging,
1991     NSTCEvents_fnOnItemStateChanged,
1992     NSTCEvents_fnOnSelectionChanged,
1993     NSTCEvents_fnOnKeyboardInput,
1994     NSTCEvents_fnOnBeforeExpand,
1995     NSTCEvents_fnOnAfterExpand,
1996     NSTCEvents_fnOnBeginLabelEdit,
1997     NSTCEvents_fnOnEndLabelEdit,
1998     NSTCEvents_fnOnGetToolTip,
1999     NSTCEvents_fnOnBeforeItemDelete,
2000     NSTCEvents_fnOnItemAdded,
2001     NSTCEvents_fnOnItemDeleted,
2002     NSTCEvents_fnOnBeforeContextMenu,
2003     NSTCEvents_fnOnAfterContextMenu,
2004     NSTCEvents_fnOnBeforeStateImageChange,
2005     NSTCEvents_fnOnGetDefaultIconIndex
2006 };
2007
2008 /**************************************************************************
2009  * IInputObject Implementation
2010  */
2011
2012 static inline ExplorerBrowserImpl *impl_from_IInputObject(IInputObject *iface)
2013 {
2014     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IInputObject_iface);
2015 }
2016
2017 static HRESULT WINAPI IInputObject_fnQueryInterface(IInputObject *iface,
2018                                                     REFIID riid, void **ppvObject)
2019 {
2020     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2021     TRACE("%p\n", This);
2022     return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
2023 }
2024
2025 static ULONG WINAPI IInputObject_fnAddRef(IInputObject *iface)
2026 {
2027     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2028     TRACE("%p\n", This);
2029     return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
2030 }
2031
2032 static ULONG WINAPI IInputObject_fnRelease(IInputObject *iface)
2033 {
2034     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2035     TRACE("%p\n", This);
2036     return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
2037 }
2038
2039 static HRESULT WINAPI IInputObject_fnUIActivateIO(IInputObject *iface, BOOL fActivate, MSG *pMsg)
2040 {
2041     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2042     FIXME("stub, %p (%d, %p)\n", This, fActivate, pMsg);
2043     return E_NOTIMPL;
2044 }
2045
2046 static HRESULT WINAPI IInputObject_fnHasFocusIO(IInputObject *iface)
2047 {
2048     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2049     FIXME("stub, %p\n", This);
2050     return E_NOTIMPL;
2051 }
2052
2053 static HRESULT WINAPI IInputObject_fnTranslateAcceleratorIO(IInputObject *iface, MSG *pMsg)
2054 {
2055     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2056     FIXME("stub, %p (%p)\n", This, pMsg);
2057     return E_NOTIMPL;
2058 }
2059
2060 static IInputObjectVtbl vt_IInputObject = {
2061     IInputObject_fnQueryInterface,
2062     IInputObject_fnAddRef,
2063     IInputObject_fnRelease,
2064     IInputObject_fnUIActivateIO,
2065     IInputObject_fnHasFocusIO,
2066     IInputObject_fnTranslateAcceleratorIO
2067 };
2068
2069 HRESULT WINAPI ExplorerBrowser_Constructor(IUnknown *pUnkOuter, REFIID riid, void **ppv)
2070 {
2071     ExplorerBrowserImpl *eb;
2072     HRESULT ret;
2073
2074     TRACE("%p %s %p\n", pUnkOuter, shdebugstr_guid (riid), ppv);
2075
2076     if(!ppv)
2077         return E_POINTER;
2078     if(pUnkOuter)
2079         return CLASS_E_NOAGGREGATION;
2080
2081     eb = heap_alloc_zero(sizeof(*eb));
2082     eb->ref = 1;
2083     eb->IExplorerBrowser_iface.lpVtbl = &vt_IExplorerBrowser;
2084     eb->IShellBrowser_iface.lpVtbl    = &vt_IShellBrowser;
2085     eb->ICommDlgBrowser3_iface.lpVtbl = &vt_ICommDlgBrowser3;
2086     eb->IObjectWithSite_iface.lpVtbl  = &vt_IObjectWithSite;
2087     eb->INameSpaceTreeControlEvents_iface.lpVtbl = &vt_INameSpaceTreeControlEvents;
2088     eb->IInputObject_iface.lpVtbl     = &vt_IInputObject;
2089
2090     /* Default settings */
2091     eb->navpane.show = TRUE;
2092
2093     list_init(&eb->event_clients);
2094     list_init(&eb->travellog);
2095
2096     ret = IExplorerBrowser_QueryInterface(&eb->IExplorerBrowser_iface, riid, ppv);
2097     IExplorerBrowser_Release(&eb->IExplorerBrowser_iface);
2098
2099     TRACE("--(%p)\n", ppv);
2100     return ret;
2101 }