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