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     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     rc = This->navpane.rc;
 520     new_width = This->navpane.width + dx;
 521     if(new_width > NP_MIN_WIDTH && This->sv_rc.right - new_width > SV_MIN_WIDTH)
 522     {
 523         rc.right = new_width;
 524         rc.left = rc.right - SPLITTER_WIDTH;
 525         splitter_draw(GetParent(hwnd), &This->splitter_rc);
 526         splitter_draw(GetParent(hwnd), &rc);
 527         This->splitter_rc = rc;
 528     }
 529
 530     return TRUE;
 531 }
 532
 533 static LRESULT navpane_splitter_endresize(ExplorerBrowserImpl *This, HWND hwnd, LPARAM lParam)
 534 {
 535     int new_width, dx;
 536
 537     if(GetCapture() != hwnd) return FALSE;
 538
 539     dx = (SHORT)LOWORD(lParam);
 540     TRACE("%d.\n", dx);
 541
 542     splitter_draw(GetParent(hwnd), &This->splitter_rc);
 543
 544     new_width = This->navpane.width + dx;
 545     if(new_width < NP_MIN_WIDTH)
 546         new_width = NP_MIN_WIDTH;
 547     else if(This->sv_rc.right - new_width < SV_MIN_WIDTH)
 548         new_width = This->sv_rc.right - SV_MIN_WIDTH;
 549
 550     This->navpane.width = new_width;
 551
 552     update_layout(This);
 553     size_panes(This);
 554
 555     ReleaseCapture();
 556
 557     return TRUE;
 558 }
 559
 560 static LRESULT navpane_on_wm_create(HWND hwnd, CREATESTRUCTW *crs)
 561 {
 562     ExplorerBrowserImpl *This = crs->lpCreateParams;
 563     INameSpaceTreeControl2 *pnstc2;
 564     DWORD style;
 565     HRESULT hr;
 566
 567     TRACE("%p\n", This);
 568     SetWindowLongPtrW(hwnd, GWLP_USERDATA, (LPARAM)This);
 569     This->navpane.hwnd_splitter = hwnd;
 570
 571     hr = CoCreateInstance(&CLSID_NamespaceTreeControl, NULL, CLSCTX_INPROC_SERVER,
 572                           &IID_INameSpaceTreeControl2, (void**)&pnstc2);
 573
 574     if(SUCCEEDED(hr))
 575     {
 576         style = NSTCS_HASEXPANDOS | NSTCS_ROOTHASEXPANDO | NSTCS_SHOWSELECTIONALWAYS;
 577         hr = INameSpaceTreeControl2_Initialize(pnstc2, GetParent(hwnd), NULL, style);
 578         if(SUCCEEDED(hr))
 579         {
 580             INameSpaceTreeControlEvents *pnstce;
 581             IShellFolder *psfdesktop;
 582             IShellItem *psi;
 583             IOleWindow *pow;
 584             LPITEMIDLIST pidl;
 585             DWORD cookie, style2 = NSTCS2_DISPLAYPADDING;
 586
 587             hr = INameSpaceTreeControl2_SetControlStyle2(pnstc2, 0xFF, style2);
 588             if(FAILED(hr))
 589                 ERR("SetControlStyle2 failed (0x%08x)\n", hr);
 590
 591             hr = INameSpaceTreeControl2_QueryInterface(pnstc2, &IID_IOleWindow, (void**)&pow);
 592             if(SUCCEEDED(hr))
 593             {
 594                 IOleWindow_GetWindow(pow, &This->navpane.hwnd_nstc);
 595                 IOleWindow_Release(pow);
 596             }
 597             else
 598                 ERR("QueryInterface(IOleWindow) failed (0x%08x)\n", hr);
 599
 600             pnstce = &This->INameSpaceTreeControlEvents_iface;
 601             hr = INameSpaceTreeControl2_TreeAdvise(pnstc2, (IUnknown*)pnstce, &cookie);
 602             if(FAILED(hr))
 603                 ERR("TreeAdvise failed. (0x%08x).\n", hr);
 604
 605             /*
 606              * Add the default roots
 607              */
 608
 609             /* TODO: This should be FOLDERID_Links */
 610             hr = SHGetSpecialFolderLocation(NULL, CSIDL_FAVORITES, &pidl);
 611             if(SUCCEEDED(hr))
 612             {
 613                 hr = SHCreateShellItem(NULL, NULL, pidl, &psi);
 614                 if(SUCCEEDED(hr))
 615                 {
 616                     hr = INameSpaceTreeControl2_AppendRoot(pnstc2, psi, SHCONTF_NONFOLDERS, NSTCRS_VISIBLE, NULL);
 617                     IShellItem_Release(psi);
 618                 }
 619                 ILFree(pidl);
 620             }
 621
 622             SHGetDesktopFolder(&psfdesktop);
 623             hr = SHGetItemFromObject((IUnknown*)psfdesktop, &IID_IShellItem, (void**)&psi);
 624             IShellFolder_Release(psfdesktop);
 625             if(SUCCEEDED(hr))
 626             {
 627                 hr = INameSpaceTreeControl2_AppendRoot(pnstc2, psi, SHCONTF_FOLDERS, NSTCRS_EXPANDED, NULL);
 628                 IShellItem_Release(psi);
 629             }
 630
 631             /* TODO:
 632              * We should advertise IID_INameSpaceTreeControl to the site of the
 633              * host through its IProfferService interface, if any.
 634              */
 635
 636             This->navpane.pnstc2 = pnstc2;
 637             This->navpane.nstc_cookie = cookie;
 638
 639             return TRUE;
 640         }
 641     }
 642
 643     This->navpane.pnstc2 = NULL;
 644     ERR("Failed (0x%08x)\n", hr);
 645
 646     return FALSE;
 647 }
 648
 649 static LRESULT navpane_on_wm_size_move(ExplorerBrowserImpl *This)
 650 {
 651     UINT height, width;
 652     TRACE("%p\n", This);
 653
 654     width = This->navpane.rc.right - This->navpane.rc.left - SPLITTER_WIDTH;
 655     height = This->navpane.rc.bottom - This->navpane.rc.top;
 656
 657     MoveWindow(This->navpane.hwnd_nstc,
 658                This->navpane.rc.left, This->navpane.rc.top,
 659                width, height,
 660                TRUE);
 661
 662     return FALSE;
 663 }
 664
 665 static LRESULT navpane_on_wm_destroy(ExplorerBrowserImpl *This)
 666 {
 667     INameSpaceTreeControl2_TreeUnadvise(This->navpane.pnstc2, This->navpane.nstc_cookie);
 668     INameSpaceTreeControl2_Release(This->navpane.pnstc2);
 669     This->navpane.pnstc2 = NULL;
 670     return TRUE;
 671 }
 672
 673 static LRESULT CALLBACK navpane_wndproc(HWND hWnd, UINT uMessage, WPARAM wParam, LPARAM lParam)
 674 {
 675     ExplorerBrowserImpl *This = (ExplorerBrowserImpl*)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
 676
 677     switch(uMessage) {
 678     case WM_CREATE:           return navpane_on_wm_create(hWnd, (CREATESTRUCTW*)lParam);
 679     case WM_MOVE:             /* Fall through */
 680     case WM_SIZE:             return navpane_on_wm_size_move(This);
 681     case WM_DESTROY:          return navpane_on_wm_destroy(This);
 682     case WM_LBUTTONDOWN:      return navpane_splitter_beginresize(This, hWnd, lParam);
 683     case WM_MOUSEMOVE:        return navpane_splitter_resizing(This, hWnd, lParam);
 684     case WM_LBUTTONUP:        return navpane_splitter_endresize(This, hWnd, lParam);
 685     default:
 686         return DefWindowProcW(hWnd, uMessage, wParam, lParam);
 687     }
 688     return 0;
 689 }
 690
 691 static void initialize_navpane(ExplorerBrowserImpl *This, HWND hwnd_parent, RECT *rc)
 692 {
 693     WNDCLASSW wc;
 694     HWND splitter;
 695     static const WCHAR navpane_classname[] = {'e','b','_','n','a','v','p','a','n','e',0};
 696
 697     if( !GetClassInfoW(shell32_hInstance, navpane_classname, &wc) )
 698     {
 699         wc.style            = CS_HREDRAW | CS_VREDRAW;
 700         wc.lpfnWndProc      = navpane_wndproc;
 701         wc.cbClsExtra       = 0;
 702         wc.cbWndExtra       = 0;
 703         wc.hInstance        = shell32_hInstance;
 704         wc.hIcon            = 0;
 705         wc.hCursor          = LoadCursorW(0, (LPWSTR)IDC_SIZEWE);
 706         wc.hbrBackground    = (HBRUSH)(COLOR_3DFACE + 1);
 707         wc.lpszMenuName     = NULL;
 708         wc.lpszClassName    = navpane_classname;
 709
 710         if (!RegisterClassW(&wc)) return;
 711     }
 712
 713     splitter = CreateWindowExW(0, navpane_classname, NULL,
 714                                WS_CHILD | WS_TABSTOP | WS_VISIBLE,
 715                                rc->right - SPLITTER_WIDTH, rc->top,
 716                                SPLITTER_WIDTH, rc->bottom - rc->top,
 717                                hwnd_parent, 0, shell32_hInstance, This);
 718     if(!splitter)
 719         ERR("Failed to create navpane : %d.\n", GetLastError());
 720 }
 721
 722 /**************************************************************************
 723  * Main window related functions.
 724  */
 725 static LRESULT main_on_wm_create(HWND hWnd, CREATESTRUCTW *crs)
 726 {
 727     ExplorerBrowserImpl *This = crs->lpCreateParams;
 728     TRACE("%p\n", This);
 729
 730     SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LPARAM)This);
 731     This->hwnd_main = hWnd;
 732
 733     return TRUE;
 734 }
 735
 736 static LRESULT main_on_wm_size(ExplorerBrowserImpl *This)
 737 {
 738     update_layout(This);
 739     size_panes(This);
 740
 741     return TRUE;
 742 }
 743
 744 static LRESULT main_on_cwm_getishellbrowser(ExplorerBrowserImpl *This)
 745 {
 746     return (LRESULT)&This->IShellBrowser_iface;
 747 }
 748
 749 static LRESULT CALLBACK main_wndproc(HWND hWnd, UINT uMessage, WPARAM wParam, LPARAM lParam)
 750 {
 751     ExplorerBrowserImpl *This = (ExplorerBrowserImpl*)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
 752
 753     switch(uMessage)
 754     {
 755     case WM_CREATE:           return main_on_wm_create(hWnd, (CREATESTRUCTW*)lParam);
 756     case WM_SIZE:             return main_on_wm_size(This);
 757     case CWM_GETISHELLBROWSER: return main_on_cwm_getishellbrowser(This);
 758     default:                  return DefWindowProcW(hWnd, uMessage, wParam, lParam);
 759     }
 760
 761     return 0;
 762 }
 763
 764 /**************************************************************************
 765  * IExplorerBrowser Implementation
 766  */
 767
 768 static inline ExplorerBrowserImpl *impl_from_IExplorerBrowser(IExplorerBrowser *iface)
 769 {
 770     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IExplorerBrowser_iface);
 771 }
 772
 773 static HRESULT WINAPI IExplorerBrowser_fnQueryInterface(IExplorerBrowser *iface,
 774                                                         REFIID riid, void **ppvObject)
 775 {
 776     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 777     TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppvObject);
 778
 779     *ppvObject = NULL;
 780     if(IsEqualIID(riid, &IID_IExplorerBrowser) ||
 781        IsEqualIID(riid, &IID_IUnknown))
 782     {
 783         *ppvObject = &This->IExplorerBrowser_iface;
 784     }
 785     else if(IsEqualIID(riid, &IID_IShellBrowser) ||
 786             IsEqualIID(riid, &IID_IOleWindow))
 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;
 880     if (!(This->eb_options & EBO_NOBORDER))
 881         style |= WS_BORDER;
 882     This->hwnd_main = CreateWindowExW(WS_EX_CONTROLPARENT, EB_CLASS_NAME, NULL, style,
 883                                       prc->left, prc->top,
 884                                       prc->right - prc->left, prc->bottom - prc->top,
 885                                       hwndParent, 0, shell32_hInstance, This);
 886
 887     if(!This->hwnd_main)
 888     {
 889         ERR("Failed to create the window.\n");
 890         return E_FAIL;
 891     }
 892
 893     This->fs.ViewMode = pfs ? pfs->ViewMode : FVM_DETAILS;
 894     This->fs.fFlags = pfs ? (pfs->fFlags | FWF_NOCLIENTEDGE) : FWF_NOCLIENTEDGE;
 895
 896     return S_OK;
 897 }
 898
 899 static HRESULT WINAPI IExplorerBrowser_fnDestroy(IExplorerBrowser *iface)
 900 {
 901     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 902     TRACE("%p\n", This);
 903
 904     if(This->psv)
 905     {
 906         IShellView_DestroyViewWindow(This->psv);
 907         IShellView_Release(This->psv);
 908         This->psv = NULL;
 909         This->hwnd_sv = NULL;
 910     }
 911
 912     events_unadvise_all(This);
 913     travellog_remove_all_entries(This);
 914
 915     ILFree(This->current_pidl);
 916     This->current_pidl = NULL;
 917
 918     DestroyWindow(This->hwnd_main);
 919     This->destroyed = TRUE;
 920
 921     return S_OK;
 922 }
 923
 924 static HRESULT WINAPI IExplorerBrowser_fnSetRect(IExplorerBrowser *iface,
 925                                                  HDWP *phdwp, RECT rcBrowser)
 926 {
 927     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 928     TRACE("%p (%p, %s)\n", This, phdwp, wine_dbgstr_rect(&rcBrowser));
 929
 930     if(phdwp && *phdwp)
 931     {
 932         *phdwp = DeferWindowPos(*phdwp, This->hwnd_main, NULL, rcBrowser.left, rcBrowser.top,
 933                                 rcBrowser.right - rcBrowser.left, rcBrowser.bottom - rcBrowser.top,
 934                                 SWP_NOZORDER | SWP_NOACTIVATE);
 935         if(!*phdwp)
 936             return E_FAIL;
 937     }
 938     else
 939     {
 940         MoveWindow(This->hwnd_main, rcBrowser.left, rcBrowser.top,
 941                    rcBrowser.right - rcBrowser.left, rcBrowser.bottom - rcBrowser.top, TRUE);
 942     }
 943
 944     return S_OK;
 945 }
 946
 947 static HRESULT WINAPI IExplorerBrowser_fnSetPropertyBag(IExplorerBrowser *iface,
 948                                                         LPCWSTR pszPropertyBag)
 949 {
 950     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 951     FIXME("stub, %p (%s)\n", This, debugstr_w(pszPropertyBag));
 952
 953     if(!pszPropertyBag)
 954         return E_INVALIDARG;
 955
 956     /* FIXME: This method is currently useless as we don't save any
 957      * settings anywhere, but at least one application breaks if we
 958      * return E_NOTIMPL.
 959      */
 960
 961     return S_OK;
 962 }
 963
 964 static HRESULT WINAPI IExplorerBrowser_fnSetEmptyText(IExplorerBrowser *iface,
 965                                                       LPCWSTR pszEmptyText)
 966 {
 967     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 968     FIXME("stub, %p (%s)\n", This, debugstr_w(pszEmptyText));
 969
 970     return E_NOTIMPL;
 971 }
 972
 973 static HRESULT WINAPI IExplorerBrowser_fnSetFolderSettings(IExplorerBrowser *iface,
 974                                                            const FOLDERSETTINGS *pfs)
 975 {
 976     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 977     TRACE("%p (%p)\n", This, pfs);
 978
 979     if(!pfs)
 980         return E_INVALIDARG;
 981
 982     This->fs.ViewMode = pfs->ViewMode;
 983     This->fs.fFlags = pfs->fFlags | FWF_NOCLIENTEDGE;
 984
 985     /* Change the settings of the current view, if any. */
 986     return change_viewmode(This, This->fs.ViewMode);
 987 }
 988
 989 static HRESULT WINAPI IExplorerBrowser_fnAdvise(IExplorerBrowser *iface,
 990                                                 IExplorerBrowserEvents *psbe,
 991                                                 DWORD *pdwCookie)
 992 {
 993     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
 994     event_client *client;
 995     TRACE("%p (%p, %p)\n", This, psbe, pdwCookie);
 996
 997     client = HeapAlloc(GetProcessHeap(), 0, sizeof(event_client));
 998     client->pebe = psbe;
 999     client->cookie = ++This->events_next_cookie;
1000
1001     IExplorerBrowserEvents_AddRef(psbe);
1002     *pdwCookie = client->cookie;
1003
1004     list_add_tail(&This->event_clients, &client->entry);
1005
1006     return S_OK;
1007 }
1008
1009 static HRESULT WINAPI IExplorerBrowser_fnUnadvise(IExplorerBrowser *iface,
1010                                                   DWORD dwCookie)
1011 {
1012     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1013     event_client *client;
1014     TRACE("%p (0x%x)\n", This, dwCookie);
1015
1016     LIST_FOR_EACH_ENTRY(client, &This->event_clients, event_client, entry)
1017     {
1018         if(client->cookie == dwCookie)
1019         {
1020             list_remove(&client->entry);
1021             IExplorerBrowserEvents_Release(client->pebe);
1022             HeapFree(GetProcessHeap(), 0, client);
1023             return S_OK;
1024         }
1025     }
1026
1027     return E_INVALIDARG;
1028 }
1029
1030 static HRESULT WINAPI IExplorerBrowser_fnSetOptions(IExplorerBrowser *iface,
1031                                                     EXPLORER_BROWSER_OPTIONS dwFlag)
1032 {
1033     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1034     static const EXPLORER_BROWSER_OPTIONS unsupported_options =
1035         EBO_ALWAYSNAVIGATE | EBO_NOWRAPPERWINDOW | EBO_HTMLSHAREPOINTVIEW | EBO_NOPERSISTVIEWSTATE;
1036
1037     TRACE("%p (0x%x)\n", This, dwFlag);
1038
1039     if(dwFlag & unsupported_options)
1040         FIXME("Flags 0x%08x contains unsupported options.\n", dwFlag);
1041
1042     This->eb_options = dwFlag;
1043
1044     return S_OK;
1045 }
1046
1047 static HRESULT WINAPI IExplorerBrowser_fnGetOptions(IExplorerBrowser *iface,
1048                                                     EXPLORER_BROWSER_OPTIONS *pdwFlag)
1049 {
1050     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1051     TRACE("%p (%p)\n", This, pdwFlag);
1052
1053     *pdwFlag = This->eb_options;
1054
1055     return S_OK;
1056 }
1057
1058 static HRESULT WINAPI IExplorerBrowser_fnBrowseToIDList(IExplorerBrowser *iface,
1059                                                         PCUIDLIST_RELATIVE pidl,
1060                                                         UINT uFlags)
1061 {
1062     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1063     LPITEMIDLIST absolute_pidl = NULL;
1064     HRESULT hr;
1065     static const UINT unsupported_browse_flags =
1066         SBSP_NEWBROWSER | EBF_SELECTFROMDATAOBJECT | EBF_NODROPTARGET;
1067     TRACE("%p (%p, 0x%x)\n", This, pidl, uFlags);
1068
1069     if(!This->hwnd_main)
1070         return E_FAIL;
1071
1072     if(This->destroyed)
1073         return HRESULT_FROM_WIN32(ERROR_BUSY);
1074
1075     if(This->current_pidl && (This->eb_options & EBO_NAVIGATEONCE))
1076         return E_FAIL;
1077
1078     if(uFlags & SBSP_EXPLOREMODE)
1079         return E_INVALIDARG;
1080
1081     if(uFlags & unsupported_browse_flags)
1082         FIXME("Argument 0x%x contains unsupported flags.\n", uFlags);
1083
1084     if(uFlags & SBSP_NAVIGATEBACK)
1085     {
1086         TRACE("SBSP_NAVIGATEBACK\n");
1087         absolute_pidl = ILClone(travellog_go_back(This));
1088         if(!absolute_pidl && !This->current_pidl)
1089             return E_FAIL;
1090         else if(!absolute_pidl)
1091             return S_OK;
1092
1093     }
1094     else if(uFlags & SBSP_NAVIGATEFORWARD)
1095     {
1096         TRACE("SBSP_NAVIGATEFORWARD\n");
1097         absolute_pidl = ILClone(travellog_go_forward(This));
1098         if(!absolute_pidl && !This->current_pidl)
1099             return E_FAIL;
1100         else if(!absolute_pidl)
1101             return S_OK;
1102
1103     }
1104     else if(uFlags & SBSP_PARENT)
1105     {
1106         if(This->current_pidl)
1107         {
1108             if(_ILIsPidlSimple(This->current_pidl))
1109             {
1110                 absolute_pidl = _ILCreateDesktop();
1111             }
1112             else
1113             {
1114                 absolute_pidl = ILClone(This->current_pidl);
1115                 ILRemoveLastID(absolute_pidl);
1116             }
1117         }
1118         if(!absolute_pidl)
1119         {
1120             ERR("Failed to get parent pidl.\n");
1121             return E_FAIL;
1122         }
1123
1124     }
1125     else if(uFlags & SBSP_RELATIVE)
1126     {
1127         /* SBSP_RELATIVE has precedence over SBSP_ABSOLUTE */
1128         TRACE("SBSP_RELATIVE\n");
1129         if(This->current_pidl)
1130         {
1131             absolute_pidl = ILCombine(This->current_pidl, pidl);
1132         }
1133         if(!absolute_pidl)
1134         {
1135             ERR("Failed to get absolute pidl.\n");
1136             return E_FAIL;
1137         }
1138     }
1139     else
1140     {
1141         TRACE("SBSP_ABSOLUTE\n");
1142         absolute_pidl = ILClone(pidl);
1143         if(!absolute_pidl && !This->current_pidl)
1144             return E_INVALIDARG;
1145         else if(!absolute_pidl)
1146             return S_OK;
1147     }
1148
1149     /* TODO: Asynchronous browsing. Return S_OK here and finish in
1150      * another thread. */
1151
1152     hr = events_NavigationPending(This, absolute_pidl);
1153     if(FAILED(hr))
1154     {
1155         TRACE("Browsing aborted.\n");
1156         ILFree(absolute_pidl);
1157         return E_FAIL;
1158     }
1159
1160     get_interfaces_from_site(This);
1161     update_panestate(This);
1162
1163     /* Only browse if the new pidl differs from the old */
1164     if(!ILIsEqual(This->current_pidl, absolute_pidl))
1165     {
1166         IShellItem *psi;
1167         hr = SHCreateItemFromIDList(absolute_pidl, &IID_IShellItem, (void**)&psi);
1168         if(SUCCEEDED(hr))
1169         {
1170             hr = create_new_shellview(This, psi);
1171             if(FAILED(hr))
1172             {
1173                 events_NavigationFailed(This, absolute_pidl);
1174                 ILFree(absolute_pidl);
1175                 IShellItem_Release(psi);
1176                 return E_FAIL;
1177             }
1178
1179             /* Add to travellog */
1180             if( !(This->eb_options & EBO_NOTRAVELLOG) &&
1181                 !(uFlags & (SBSP_NAVIGATEFORWARD|SBSP_NAVIGATEBACK)) )
1182             {
1183                 travellog_add_entry(This, absolute_pidl);
1184             }
1185
1186             IShellItem_Release(psi);
1187         }
1188     }
1189
1190     events_NavigationComplete(This, absolute_pidl);
1191     ILFree(This->current_pidl);
1192     This->current_pidl = absolute_pidl;
1193
1194     /* Expand the NameSpaceTree to the current location. */
1195     if(This->navpane.show && This->navpane.pnstc2)
1196     {
1197         IShellItem *psi;
1198         hr = SHCreateItemFromIDList(This->current_pidl, &IID_IShellItem, (void**)&psi);
1199         if(SUCCEEDED(hr))
1200         {
1201             INameSpaceTreeControl2_EnsureItemVisible(This->navpane.pnstc2, psi);
1202             IShellItem_Release(psi);
1203         }
1204     }
1205
1206     return S_OK;
1207 }
1208
1209 static HRESULT WINAPI IExplorerBrowser_fnBrowseToObject(IExplorerBrowser *iface,
1210                                                         IUnknown *punk, UINT uFlags)
1211 {
1212     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1213     LPITEMIDLIST pidl;
1214     HRESULT hr;
1215     TRACE("%p (%p, 0x%x)\n", This, punk, uFlags);
1216
1217     if(!punk)
1218         return IExplorerBrowser_BrowseToIDList(iface, NULL, uFlags);
1219
1220     hr = SHGetIDListFromObject(punk, &pidl);
1221     if(SUCCEEDED(hr))
1222     {
1223         hr = IExplorerBrowser_BrowseToIDList(iface, pidl, uFlags);
1224         ILFree(pidl);
1225     }
1226
1227     return hr;
1228 }
1229
1230 static HRESULT WINAPI IExplorerBrowser_fnFillFromObject(IExplorerBrowser *iface,
1231                                                         IUnknown *punk,
1232                                                         EXPLORER_BROWSER_FILL_FLAGS dwFlags)
1233 {
1234     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1235     FIXME("stub, %p (%p, 0x%x)\n", This, punk, dwFlags);
1236
1237     return E_NOTIMPL;
1238 }
1239
1240 static HRESULT WINAPI IExplorerBrowser_fnRemoveAll(IExplorerBrowser *iface)
1241 {
1242     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1243     FIXME("stub, %p\n", This);
1244
1245     return E_NOTIMPL;
1246 }
1247
1248 static HRESULT WINAPI IExplorerBrowser_fnGetCurrentView(IExplorerBrowser *iface,
1249                                                         REFIID riid, void **ppv)
1250 {
1251     ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1252     TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppv);
1253
1254     if(!This->psv)
1255         return E_FAIL;
1256
1257     return IShellView_QueryInterface(This->psv, riid, ppv);
1258 }
1259
1260 static const IExplorerBrowserVtbl vt_IExplorerBrowser =
1261 {
1262     IExplorerBrowser_fnQueryInterface,
1263     IExplorerBrowser_fnAddRef,
1264     IExplorerBrowser_fnRelease,
1265     IExplorerBrowser_fnInitialize,
1266     IExplorerBrowser_fnDestroy,
1267     IExplorerBrowser_fnSetRect,
1268     IExplorerBrowser_fnSetPropertyBag,
1269     IExplorerBrowser_fnSetEmptyText,
1270     IExplorerBrowser_fnSetFolderSettings,
1271     IExplorerBrowser_fnAdvise,
1272     IExplorerBrowser_fnUnadvise,
1273     IExplorerBrowser_fnSetOptions,
1274     IExplorerBrowser_fnGetOptions,
1275     IExplorerBrowser_fnBrowseToIDList,
1276     IExplorerBrowser_fnBrowseToObject,
1277     IExplorerBrowser_fnFillFromObject,
1278     IExplorerBrowser_fnRemoveAll,
1279     IExplorerBrowser_fnGetCurrentView
1280 };
1281
1282 /**************************************************************************
1283  * IShellBrowser Implementation
1284  */
1285
1286 static inline ExplorerBrowserImpl *impl_from_IShellBrowser(IShellBrowser *iface)
1287 {
1288     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IShellBrowser_iface);
1289 }
1290
1291 static HRESULT WINAPI IShellBrowser_fnQueryInterface(IShellBrowser *iface,
1292                                                      REFIID riid, void **ppvObject)
1293 {
1294     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1295     TRACE("%p\n", This);
1296     return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
1297 }
1298
1299 static ULONG WINAPI IShellBrowser_fnAddRef(IShellBrowser *iface)
1300 {
1301     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1302     TRACE("%p\n", This);
1303     return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1304 }
1305
1306 static ULONG WINAPI IShellBrowser_fnRelease(IShellBrowser *iface)
1307 {
1308     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1309     TRACE("%p\n", This);
1310     return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1311 }
1312
1313 static HRESULT WINAPI IShellBrowser_fnGetWindow(IShellBrowser *iface, HWND *phwnd)
1314 {
1315     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1316     TRACE("%p (%p)\n", This, phwnd);
1317
1318     if(!This->hwnd_main)
1319         return E_FAIL;
1320
1321     *phwnd = This->hwnd_main;
1322     return S_OK;
1323 }
1324
1325 static HRESULT WINAPI IShellBrowser_fnContextSensitiveHelp(IShellBrowser *iface,
1326                                                            BOOL fEnterMode)
1327 {
1328     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1329     FIXME("stub, %p (%d)\n", This, fEnterMode);
1330
1331     return E_NOTIMPL;
1332 }
1333
1334 static HRESULT WINAPI IShellBrowser_fnInsertMenusSB(IShellBrowser *iface,
1335                                                     HMENU hmenuShared,
1336                                                     LPOLEMENUGROUPWIDTHS lpMenuWidths)
1337 {
1338     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1339     TRACE("%p (%p, %p)\n", This, hmenuShared, lpMenuWidths);
1340
1341     /* Not implemented. */
1342     return E_NOTIMPL;
1343 }
1344
1345 static HRESULT WINAPI IShellBrowser_fnSetMenuSB(IShellBrowser *iface,
1346                                                 HMENU hmenuShared,
1347                                                 HOLEMENU holemenuReserved,
1348                                                 HWND hwndActiveObject)
1349 {
1350     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1351     TRACE("%p (%p, %p, %p)\n", This, hmenuShared, holemenuReserved, hwndActiveObject);
1352
1353     /* Not implemented. */
1354     return E_NOTIMPL;
1355 }
1356
1357 static HRESULT WINAPI IShellBrowser_fnRemoveMenusSB(IShellBrowser *iface,
1358                                                     HMENU hmenuShared)
1359 {
1360     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1361     TRACE("%p (%p)\n", This, hmenuShared);
1362
1363     /* Not implemented. */
1364     return E_NOTIMPL;
1365 }
1366
1367 static HRESULT WINAPI IShellBrowser_fnSetStatusTextSB(IShellBrowser *iface,
1368                                                       LPCOLESTR pszStatusText)
1369 {
1370     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1371     FIXME("stub, %p (%s)\n", This, debugstr_w(pszStatusText));
1372
1373     return E_NOTIMPL;
1374 }
1375
1376 static HRESULT WINAPI IShellBrowser_fnEnableModelessSB(IShellBrowser *iface,
1377                                                        BOOL fEnable)
1378 {
1379     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1380     FIXME("stub, %p (%d)\n", This, fEnable);
1381
1382     return E_NOTIMPL;
1383 }
1384
1385 static HRESULT WINAPI IShellBrowser_fnTranslateAcceleratorSB(IShellBrowser *iface,
1386                                                              MSG *pmsg, WORD wID)
1387 {
1388     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1389     FIXME("stub, %p (%p, 0x%x)\n", This, pmsg, wID);
1390
1391     return E_NOTIMPL;
1392 }
1393
1394 static HRESULT WINAPI IShellBrowser_fnBrowseObject(IShellBrowser *iface,
1395                                                    LPCITEMIDLIST pidl, UINT wFlags)
1396 {
1397     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1398     TRACE("%p (%p, %x)\n", This, pidl, wFlags);
1399
1400     return IExplorerBrowser_BrowseToIDList(&This->IExplorerBrowser_iface, pidl, wFlags);
1401 }
1402
1403 static HRESULT WINAPI IShellBrowser_fnGetViewStateStream(IShellBrowser *iface,
1404                                                          DWORD grfMode,
1405                                                          IStream **ppStrm)
1406 {
1407     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1408     FIXME("stub, %p (0x%x, %p)\n", This, grfMode, ppStrm);
1409
1410     *ppStrm = NULL;
1411     return E_FAIL;
1412 }
1413
1414 static HRESULT WINAPI IShellBrowser_fnGetControlWindow(IShellBrowser *iface,
1415                                                        UINT id, HWND *phwnd)
1416 {
1417     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1418     TRACE("(%p)->(%d, %p)\n", This, id, phwnd);
1419     if (phwnd) *phwnd = NULL;
1420     return E_NOTIMPL;
1421 }
1422
1423 static HRESULT WINAPI IShellBrowser_fnSendControlMsg(IShellBrowser *iface,
1424                                                      UINT id, UINT uMsg,
1425                                                      WPARAM wParam, LPARAM lParam,
1426                                                      LRESULT *pret)
1427 {
1428     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1429     FIXME("stub, %p (%d, %d, %lx, %lx, %p)\n", This, id, uMsg, wParam, lParam, pret);
1430
1431     return E_NOTIMPL;
1432 }
1433
1434 static HRESULT WINAPI IShellBrowser_fnQueryActiveShellView(IShellBrowser *iface,
1435                                                            IShellView **ppshv)
1436 {
1437     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1438     TRACE("%p (%p)\n", This, ppshv);
1439
1440     if(!This->psv)
1441         return E_FAIL;
1442
1443     *ppshv = This->psv;
1444     IShellView_AddRef(This->psv);
1445
1446     return S_OK;
1447 }
1448
1449 static HRESULT WINAPI IShellBrowser_fnOnViewWindowActive(IShellBrowser *iface,
1450                                                          IShellView *pshv)
1451 {
1452     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1453     FIXME("stub, %p (%p)\n", This, pshv);
1454
1455     return E_NOTIMPL;
1456 }
1457
1458 static HRESULT WINAPI IShellBrowser_fnSetToolbarItems(IShellBrowser *iface,
1459                                                       LPTBBUTTONSB lpButtons,
1460                                                       UINT nButtons, UINT uFlags)
1461 {
1462     ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1463     FIXME("stub, %p (%p, %d, 0x%x)\n", This, lpButtons, nButtons, uFlags);
1464
1465     return E_NOTIMPL;
1466 }
1467
1468 static const IShellBrowserVtbl vt_IShellBrowser = {
1469     IShellBrowser_fnQueryInterface,
1470     IShellBrowser_fnAddRef,
1471     IShellBrowser_fnRelease,
1472     IShellBrowser_fnGetWindow,
1473     IShellBrowser_fnContextSensitiveHelp,
1474     IShellBrowser_fnInsertMenusSB,
1475     IShellBrowser_fnSetMenuSB,
1476     IShellBrowser_fnRemoveMenusSB,
1477     IShellBrowser_fnSetStatusTextSB,
1478     IShellBrowser_fnEnableModelessSB,
1479     IShellBrowser_fnTranslateAcceleratorSB,
1480     IShellBrowser_fnBrowseObject,
1481     IShellBrowser_fnGetViewStateStream,
1482     IShellBrowser_fnGetControlWindow,
1483     IShellBrowser_fnSendControlMsg,
1484     IShellBrowser_fnQueryActiveShellView,
1485     IShellBrowser_fnOnViewWindowActive,
1486     IShellBrowser_fnSetToolbarItems
1487 };
1488
1489 /**************************************************************************
1490  * ICommDlgBrowser3 Implementation
1491  */
1492
1493 static inline ExplorerBrowserImpl *impl_from_ICommDlgBrowser3(ICommDlgBrowser3 *iface)
1494 {
1495     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, ICommDlgBrowser3_iface);
1496 }
1497
1498 static HRESULT WINAPI ICommDlgBrowser3_fnQueryInterface(ICommDlgBrowser3 *iface,
1499                                                         REFIID riid,
1500                                                         void **ppvObject)
1501 {
1502     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1503     TRACE("%p\n", This);
1504     return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
1505 }
1506
1507 static ULONG WINAPI ICommDlgBrowser3_fnAddRef(ICommDlgBrowser3 *iface)
1508 {
1509     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1510     TRACE("%p\n", This);
1511     return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1512 }
1513
1514 static ULONG WINAPI ICommDlgBrowser3_fnRelease(ICommDlgBrowser3 *iface)
1515 {
1516     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1517     TRACE("%p\n", This);
1518     return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1519 }
1520
1521 static HRESULT WINAPI ICommDlgBrowser3_fnOnDefaultCommand(ICommDlgBrowser3 *iface,
1522                                                           IShellView *shv)
1523 {
1524     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1525     IDataObject *pdo;
1526     HRESULT hr;
1527     HRESULT ret = S_FALSE;
1528
1529     TRACE("%p (%p)\n", This, shv);
1530
1531     hr = IShellView_GetItemObject(shv, SVGIO_SELECTION, &IID_IDataObject, (void**)&pdo);
1532     if(SUCCEEDED(hr))
1533     {
1534         FORMATETC fmt;
1535         STGMEDIUM medium;
1536
1537         fmt.cfFormat = RegisterClipboardFormatW(CFSTR_SHELLIDLISTW);
1538         fmt.ptd = NULL;
1539         fmt.dwAspect = DVASPECT_CONTENT;
1540         fmt.lindex = -1;
1541         fmt.tymed = TYMED_HGLOBAL;
1542
1543         hr = IDataObject_GetData(pdo, &fmt ,&medium);
1544         IDataObject_Release(pdo);
1545         if(SUCCEEDED(hr))
1546         {
1547             LPIDA pida = GlobalLock(medium.u.hGlobal);
1548             LPCITEMIDLIST pidl_child = (LPCITEMIDLIST) ((LPBYTE)pida+pida->aoffset[1]);
1549
1550             /* Handle folders by browsing to them. */
1551             if(_ILIsFolder(pidl_child) || _ILIsDrive(pidl_child) || _ILIsSpecialFolder(pidl_child))
1552             {
1553                 IExplorerBrowser_BrowseToIDList(&This->IExplorerBrowser_iface, pidl_child, SBSP_RELATIVE);
1554                 ret = S_OK;
1555             }
1556             GlobalUnlock(medium.u.hGlobal);
1557             GlobalFree(medium.u.hGlobal);
1558         }
1559         else
1560             ERR("Failed to get data from IDataObject.\n");
1561     } else
1562         ERR("Failed to get IDataObject.\n");
1563
1564     /* If we didn't handle the default command, check if we have a
1565      * client that does */
1566     if(ret == S_FALSE && This->pcdb_site)
1567         return ICommDlgBrowser_OnDefaultCommand(This->pcdb_site, shv);
1568
1569     return ret;
1570 }
1571 static HRESULT WINAPI ICommDlgBrowser3_fnOnStateChange(ICommDlgBrowser3 *iface,
1572                                                        IShellView *shv, ULONG uChange)
1573 {
1574     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1575     TRACE("%p (%p, %d)\n", This, shv, uChange);
1576
1577     if(This->pcdb_site)
1578         return ICommDlgBrowser_OnStateChange(This->pcdb_site, shv, uChange);
1579
1580     return E_NOTIMPL;
1581 }
1582 static HRESULT WINAPI ICommDlgBrowser3_fnIncludeObject(ICommDlgBrowser3 *iface,
1583                                                        IShellView *pshv, LPCITEMIDLIST pidl)
1584 {
1585     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1586     TRACE("%p (%p, %p)\n", This, pshv, pidl);
1587
1588     if(This->pcdb_site)
1589         return ICommDlgBrowser_IncludeObject(This->pcdb_site, pshv, pidl);
1590
1591     return S_OK;
1592 }
1593
1594 static HRESULT WINAPI ICommDlgBrowser3_fnNotify(ICommDlgBrowser3 *iface,
1595                                                 IShellView *pshv,
1596                                                 DWORD dwNotifyType)
1597 {
1598     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1599     TRACE("%p (%p, 0x%x)\n", This, pshv, dwNotifyType);
1600
1601     if(This->pcdb2_site)
1602         return ICommDlgBrowser2_Notify(This->pcdb2_site, pshv, dwNotifyType);
1603
1604     return S_OK;
1605 }
1606
1607 static HRESULT WINAPI ICommDlgBrowser3_fnGetDefaultMenuText(ICommDlgBrowser3 *iface,
1608                                                             IShellView *pshv,
1609                                                             LPWSTR pszText, int cchMax)
1610 {
1611     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1612     TRACE("%p (%p, %s, %d)\n", This, pshv, debugstr_w(pszText), cchMax);
1613
1614     if(This->pcdb2_site)
1615         return ICommDlgBrowser2_GetDefaultMenuText(This->pcdb2_site, pshv, pszText, cchMax);
1616
1617     return S_OK;
1618 }
1619
1620 static HRESULT WINAPI ICommDlgBrowser3_fnGetViewFlags(ICommDlgBrowser3 *iface,
1621                                                       DWORD *pdwFlags)
1622 {
1623     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1624     TRACE("%p (%p)\n", This, pdwFlags);
1625
1626     if(This->pcdb2_site)
1627         return ICommDlgBrowser2_GetViewFlags(This->pcdb2_site, pdwFlags);
1628
1629     return S_OK;
1630 }
1631
1632 static HRESULT WINAPI ICommDlgBrowser3_fnOnColumnClicked(ICommDlgBrowser3 *iface,
1633                                                          IShellView *pshv, int iColumn)
1634 {
1635     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1636     TRACE("%p (%p, %d)\n", This, pshv, iColumn);
1637
1638     if(This->pcdb3_site)
1639         return ICommDlgBrowser3_OnColumnClicked(This->pcdb3_site, pshv, iColumn);
1640
1641     return S_OK;
1642 }
1643
1644 static HRESULT WINAPI ICommDlgBrowser3_fnGetCurrentFilter(ICommDlgBrowser3 *iface,
1645                                                           LPWSTR pszFileSpec,
1646                                                           int cchFileSpec)
1647 {
1648     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1649     TRACE("%p (%s, %d)\n", This, debugstr_w(pszFileSpec), cchFileSpec);
1650
1651     if(This->pcdb3_site)
1652         return ICommDlgBrowser3_GetCurrentFilter(This->pcdb3_site, pszFileSpec, cchFileSpec);
1653
1654     return S_OK;
1655 }
1656
1657 static HRESULT WINAPI ICommDlgBrowser3_fnOnPreviewCreated(ICommDlgBrowser3 *iface,
1658                                                           IShellView *pshv)
1659 {
1660     ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1661     TRACE("%p (%p)\n", This, pshv);
1662
1663     if(This->pcdb3_site)
1664         return ICommDlgBrowser3_OnPreviewCreated(This->pcdb3_site, pshv);
1665
1666     return S_OK;
1667 }
1668
1669 static const ICommDlgBrowser3Vtbl vt_ICommDlgBrowser3 = {
1670     ICommDlgBrowser3_fnQueryInterface,
1671     ICommDlgBrowser3_fnAddRef,
1672     ICommDlgBrowser3_fnRelease,
1673     ICommDlgBrowser3_fnOnDefaultCommand,
1674     ICommDlgBrowser3_fnOnStateChange,
1675     ICommDlgBrowser3_fnIncludeObject,
1676     ICommDlgBrowser3_fnNotify,
1677     ICommDlgBrowser3_fnGetDefaultMenuText,
1678     ICommDlgBrowser3_fnGetViewFlags,
1679     ICommDlgBrowser3_fnOnColumnClicked,
1680     ICommDlgBrowser3_fnGetCurrentFilter,
1681     ICommDlgBrowser3_fnOnPreviewCreated
1682 };
1683
1684 /**************************************************************************
1685  * IObjectWithSite Implementation
1686  */
1687
1688 static inline ExplorerBrowserImpl *impl_from_IObjectWithSite(IObjectWithSite *iface)
1689 {
1690     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IObjectWithSite_iface);
1691 }
1692
1693 static HRESULT WINAPI IObjectWithSite_fnQueryInterface(IObjectWithSite *iface,
1694                                                        REFIID riid, void **ppvObject)
1695 {
1696     ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1697     TRACE("%p\n", This);
1698     return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
1699 }
1700
1701 static ULONG WINAPI IObjectWithSite_fnAddRef(IObjectWithSite *iface)
1702 {
1703     ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1704     TRACE("%p\n", This);
1705     return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1706 }
1707
1708 static ULONG WINAPI IObjectWithSite_fnRelease(IObjectWithSite *iface)
1709 {
1710     ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1711     TRACE("%p\n", This);
1712     return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1713 }
1714
1715 static HRESULT WINAPI IObjectWithSite_fnSetSite(IObjectWithSite *iface, IUnknown *punk_site)
1716 {
1717     ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1718     TRACE("%p (%p)\n", This, punk_site);
1719
1720     if(This->punk_site)
1721     {
1722         IUnknown_Release(This->punk_site);
1723         This->punk_site = NULL;
1724         get_interfaces_from_site(This);
1725     }
1726
1727     This->punk_site = punk_site;
1728
1729     if(This->punk_site)
1730         IUnknown_AddRef(This->punk_site);
1731
1732     return S_OK;
1733 }
1734
1735 static HRESULT WINAPI IObjectWithSite_fnGetSite(IObjectWithSite *iface, REFIID riid, void **ppvSite)
1736 {
1737     ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1738     TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppvSite);
1739
1740     if(!This->punk_site)
1741         return E_FAIL;
1742
1743     return IUnknown_QueryInterface(This->punk_site, riid, ppvSite);
1744 }
1745
1746 static const IObjectWithSiteVtbl vt_IObjectWithSite = {
1747     IObjectWithSite_fnQueryInterface,
1748     IObjectWithSite_fnAddRef,
1749     IObjectWithSite_fnRelease,
1750     IObjectWithSite_fnSetSite,
1751     IObjectWithSite_fnGetSite
1752 };
1753
1754 /**************************************************************************
1755  * INameSpaceTreeControlEvents Implementation
1756  */
1757 static inline ExplorerBrowserImpl *impl_from_INameSpaceTreeControlEvents(INameSpaceTreeControlEvents *iface)
1758 {
1759     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, INameSpaceTreeControlEvents_iface);
1760 }
1761
1762 static HRESULT WINAPI NSTCEvents_fnQueryInterface(INameSpaceTreeControlEvents *iface,
1763                                                   REFIID riid, void **ppvObject)
1764 {
1765     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1766     TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppvObject);
1767
1768     *ppvObject = NULL;
1769     if(IsEqualIID(riid, &IID_INameSpaceTreeControlEvents) ||
1770        IsEqualIID(riid, &IID_IUnknown))
1771     {
1772         *ppvObject = iface;
1773     }
1774
1775     if(*ppvObject)
1776     {
1777         IUnknown_AddRef((IUnknown*)*ppvObject);
1778         return S_OK;
1779     }
1780
1781     return E_NOINTERFACE;
1782 }
1783
1784 static ULONG WINAPI NSTCEvents_fnAddRef(INameSpaceTreeControlEvents *iface)
1785 {
1786     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1787     TRACE("%p\n", This);
1788     return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1789 }
1790
1791 static ULONG WINAPI NSTCEvents_fnRelease(INameSpaceTreeControlEvents *iface)
1792 {
1793     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1794     TRACE("%p\n", This);
1795     return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1796 }
1797
1798 static HRESULT WINAPI NSTCEvents_fnOnItemClick(INameSpaceTreeControlEvents *iface,
1799                                                IShellItem *psi,
1800                                                NSTCEHITTEST nstceHitTest,
1801                                                NSTCECLICKTYPE nstceClickType)
1802 {
1803     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1804     TRACE("%p (%p, 0x%x, 0x%x)\n", This, psi, nstceHitTest, nstceClickType);
1805     return S_OK;
1806 }
1807
1808 static HRESULT WINAPI NSTCEvents_fnOnPropertyItemCommit(INameSpaceTreeControlEvents *iface,
1809                                                         IShellItem *psi)
1810 {
1811     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1812     TRACE("%p (%p)\n", This, psi);
1813     return E_NOTIMPL;
1814 }
1815
1816 static HRESULT WINAPI NSTCEvents_fnOnItemStateChanging(INameSpaceTreeControlEvents *iface,
1817                                                        IShellItem *psi,
1818                                                        NSTCITEMSTATE nstcisMask,
1819                                                        NSTCITEMSTATE nstcisState)
1820 {
1821     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1822     TRACE("%p (%p, 0x%x, 0x%x)\n", This, psi, nstcisMask, nstcisState);
1823     return E_NOTIMPL;
1824 }
1825
1826 static HRESULT WINAPI NSTCEvents_fnOnItemStateChanged(INameSpaceTreeControlEvents *iface,
1827                                                       IShellItem *psi,
1828                                                       NSTCITEMSTATE nstcisMask,
1829                                                       NSTCITEMSTATE nstcisState)
1830 {
1831     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1832     TRACE("%p (%p, 0x%x, 0x%x)\n", This, psi, nstcisMask, nstcisState);
1833     return E_NOTIMPL;
1834 }
1835
1836 static HRESULT WINAPI NSTCEvents_fnOnSelectionChanged(INameSpaceTreeControlEvents *iface,
1837                                                       IShellItemArray *psiaSelection)
1838 {
1839     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1840     IShellItem *psi;
1841     HRESULT hr;
1842     TRACE("%p (%p)\n", This, psiaSelection);
1843
1844     hr = IShellItemArray_GetItemAt(psiaSelection, 0, &psi);
1845     if(SUCCEEDED(hr))
1846     {
1847         hr = IExplorerBrowser_BrowseToObject(&This->IExplorerBrowser_iface,
1848                                              (IUnknown*)psi, SBSP_DEFBROWSER);
1849         IShellItem_Release(psi);
1850     }
1851
1852     return hr;
1853 }
1854
1855 static HRESULT WINAPI NSTCEvents_fnOnKeyboardInput(INameSpaceTreeControlEvents *iface,
1856                                                    UINT uMsg, WPARAM wParam, LPARAM lParam)
1857 {
1858     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1859     TRACE("%p (%d, 0x%lx, 0x%lx)\n", This, uMsg, wParam, lParam);
1860     return S_OK;
1861 }
1862
1863 static HRESULT WINAPI NSTCEvents_fnOnBeforeExpand(INameSpaceTreeControlEvents *iface,
1864                                                   IShellItem *psi)
1865 {
1866     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1867     TRACE("%p (%p)\n", This, psi);
1868     return E_NOTIMPL;
1869 }
1870
1871 static HRESULT WINAPI NSTCEvents_fnOnAfterExpand(INameSpaceTreeControlEvents *iface,
1872                                                  IShellItem *psi)
1873 {
1874     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1875     TRACE("%p (%p)\n", This, psi);
1876     return E_NOTIMPL;
1877 }
1878
1879 static HRESULT WINAPI NSTCEvents_fnOnBeginLabelEdit(INameSpaceTreeControlEvents *iface,
1880                                                     IShellItem *psi)
1881 {
1882     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1883     TRACE("%p (%p)\n", This, psi);
1884     return E_NOTIMPL;
1885 }
1886
1887 static HRESULT WINAPI NSTCEvents_fnOnEndLabelEdit(INameSpaceTreeControlEvents *iface,
1888                                                   IShellItem *psi)
1889 {
1890     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1891     TRACE("%p (%p)\n", This, psi);
1892     return E_NOTIMPL;
1893 }
1894
1895 static HRESULT WINAPI NSTCEvents_fnOnGetToolTip(INameSpaceTreeControlEvents *iface,
1896                                                 IShellItem *psi, LPWSTR pszTip, int cchTip)
1897 {
1898     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1899     TRACE("%p (%p, %p, %d)\n", This, psi, pszTip, cchTip);
1900     return E_NOTIMPL;
1901 }
1902
1903 static HRESULT WINAPI NSTCEvents_fnOnBeforeItemDelete(INameSpaceTreeControlEvents *iface,
1904                                                       IShellItem *psi)
1905 {
1906     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1907     TRACE("%p (%p)\n", This, psi);
1908     return E_NOTIMPL;
1909 }
1910
1911 static HRESULT WINAPI NSTCEvents_fnOnItemAdded(INameSpaceTreeControlEvents *iface,
1912                                                IShellItem *psi, BOOL fIsRoot)
1913 {
1914     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1915     TRACE("%p (%p, %d)\n", This, psi, fIsRoot);
1916     return E_NOTIMPL;
1917 }
1918
1919 static HRESULT WINAPI NSTCEvents_fnOnItemDeleted(INameSpaceTreeControlEvents *iface,
1920                                                  IShellItem *psi, BOOL fIsRoot)
1921 {
1922     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1923     TRACE("%p (%p, %d)\n", This, psi, fIsRoot);
1924     return E_NOTIMPL;
1925 }
1926
1927 static HRESULT WINAPI NSTCEvents_fnOnBeforeContextMenu(INameSpaceTreeControlEvents *iface,
1928                                                        IShellItem *psi, REFIID riid, void **ppv)
1929 {
1930     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1931     TRACE("%p (%p, %s, %p)\n", This, psi, shdebugstr_guid(riid), ppv);
1932     return E_NOTIMPL;
1933 }
1934
1935 static HRESULT WINAPI NSTCEvents_fnOnAfterContextMenu(INameSpaceTreeControlEvents *iface,
1936                                                       IShellItem *psi, IContextMenu *pcmIn,
1937                                                       REFIID riid, void **ppv)
1938 {
1939     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1940     TRACE("%p (%p, %p, %s, %p)\n", This, psi, pcmIn, shdebugstr_guid(riid), ppv);
1941     return E_NOTIMPL;
1942 }
1943
1944 static HRESULT WINAPI NSTCEvents_fnOnBeforeStateImageChange(INameSpaceTreeControlEvents *iface,
1945                                                             IShellItem *psi)
1946 {
1947     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1948     TRACE("%p (%p)\n", This, psi);
1949     return E_NOTIMPL;
1950 }
1951
1952 static HRESULT WINAPI NSTCEvents_fnOnGetDefaultIconIndex(INameSpaceTreeControlEvents* iface,
1953                                                          IShellItem *psi,
1954                                                          int *piDefaultIcon, int *piOpenIcon)
1955 {
1956     ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1957     TRACE("%p (%p, %p, %p)\n", This, psi, piDefaultIcon, piOpenIcon);
1958     return E_NOTIMPL;
1959 }
1960
1961
1962 static const INameSpaceTreeControlEventsVtbl vt_INameSpaceTreeControlEvents =  {
1963     NSTCEvents_fnQueryInterface,
1964     NSTCEvents_fnAddRef,
1965     NSTCEvents_fnRelease,
1966     NSTCEvents_fnOnItemClick,
1967     NSTCEvents_fnOnPropertyItemCommit,
1968     NSTCEvents_fnOnItemStateChanging,
1969     NSTCEvents_fnOnItemStateChanged,
1970     NSTCEvents_fnOnSelectionChanged,
1971     NSTCEvents_fnOnKeyboardInput,
1972     NSTCEvents_fnOnBeforeExpand,
1973     NSTCEvents_fnOnAfterExpand,
1974     NSTCEvents_fnOnBeginLabelEdit,
1975     NSTCEvents_fnOnEndLabelEdit,
1976     NSTCEvents_fnOnGetToolTip,
1977     NSTCEvents_fnOnBeforeItemDelete,
1978     NSTCEvents_fnOnItemAdded,
1979     NSTCEvents_fnOnItemDeleted,
1980     NSTCEvents_fnOnBeforeContextMenu,
1981     NSTCEvents_fnOnAfterContextMenu,
1982     NSTCEvents_fnOnBeforeStateImageChange,
1983     NSTCEvents_fnOnGetDefaultIconIndex
1984 };
1985
1986 /**************************************************************************
1987  * IInputObject Implementation
1988  */
1989
1990 static inline ExplorerBrowserImpl *impl_from_IInputObject(IInputObject *iface)
1991 {
1992     return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IInputObject_iface);
1993 }
1994
1995 static HRESULT WINAPI IInputObject_fnQueryInterface(IInputObject *iface,
1996                                                     REFIID riid, void **ppvObject)
1997 {
1998     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
1999     TRACE("%p\n", This);
2000     return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
2001 }
2002
2003 static ULONG WINAPI IInputObject_fnAddRef(IInputObject *iface)
2004 {
2005     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2006     TRACE("%p\n", This);
2007     return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
2008 }
2009
2010 static ULONG WINAPI IInputObject_fnRelease(IInputObject *iface)
2011 {
2012     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2013     TRACE("%p\n", This);
2014     return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
2015 }
2016
2017 static HRESULT WINAPI IInputObject_fnUIActivateIO(IInputObject *iface, BOOL fActivate, MSG *pMsg)
2018 {
2019     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2020     FIXME("stub, %p (%d, %p)\n", This, fActivate, pMsg);
2021     return E_NOTIMPL;
2022 }
2023
2024 static HRESULT WINAPI IInputObject_fnHasFocusIO(IInputObject *iface)
2025 {
2026     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2027     FIXME("stub, %p\n", This);
2028     return E_NOTIMPL;
2029 }
2030
2031 static HRESULT WINAPI IInputObject_fnTranslateAcceleratorIO(IInputObject *iface, MSG *pMsg)
2032 {
2033     ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2034     FIXME("stub, %p (%p)\n", This, pMsg);
2035     return E_NOTIMPL;
2036 }
2037
2038 static IInputObjectVtbl vt_IInputObject = {
2039     IInputObject_fnQueryInterface,
2040     IInputObject_fnAddRef,
2041     IInputObject_fnRelease,
2042     IInputObject_fnUIActivateIO,
2043     IInputObject_fnHasFocusIO,
2044     IInputObject_fnTranslateAcceleratorIO
2045 };
2046
2047 HRESULT WINAPI ExplorerBrowser_Constructor(IUnknown *pUnkOuter, REFIID riid, void **ppv)
2048 {
2049     ExplorerBrowserImpl *eb;
2050     HRESULT ret;
2051
2052     TRACE("%p %s %p\n", pUnkOuter, shdebugstr_guid (riid), ppv);
2053
2054     if(!ppv)
2055         return E_POINTER;
2056     if(pUnkOuter)
2057         return CLASS_E_NOAGGREGATION;
2058
2059     eb = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(ExplorerBrowserImpl));
2060     eb->ref = 1;
2061     eb->IExplorerBrowser_iface.lpVtbl = &vt_IExplorerBrowser;
2062     eb->IShellBrowser_iface.lpVtbl    = &vt_IShellBrowser;
2063     eb->ICommDlgBrowser3_iface.lpVtbl = &vt_ICommDlgBrowser3;
2064     eb->IObjectWithSite_iface.lpVtbl  = &vt_IObjectWithSite;
2065     eb->INameSpaceTreeControlEvents_iface.lpVtbl = &vt_INameSpaceTreeControlEvents;
2066     eb->IInputObject_iface.lpVtbl     = &vt_IInputObject;
2067
2068     /* Default settings */
2069     eb->navpane.width = 150;
2070     eb->navpane.show = TRUE;
2071
2072     list_init(&eb->event_clients);
2073     list_init(&eb->travellog);
2074
2075     ret = IExplorerBrowser_QueryInterface(&eb->IExplorerBrowser_iface, riid, ppv);
2076     IExplorerBrowser_Release(&eb->IExplorerBrowser_iface);
2077
2078     TRACE("--(%p)\n", ppv);
2079     return ret;
2080 }