dll/win32/ieframe/shellbrowser.c

   1 /*
   2  * Implementation of IShellBrowser interface
   3  *
   4  * Copyright 2011 Piotr Caban for CodeWeavers
   5  * Copyright 2012 Jacek Caban for CodeWeavers
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include <assert.h>
  23
  24 #include "ieframe.h"
  25 #include "exdispid.h"
  26 #include "shlwapi.h"
  27
  28 #include "wine/debug.h"
  29
  30 WINE_DEFAULT_DEBUG_CHANNEL(ieframe);
  31
  32 static inline ShellBrowser *impl_from_IShellBrowser(IShellBrowser *iface)
  33 {
  34     return CONTAINING_RECORD(iface, ShellBrowser, IShellBrowser_iface);
  35 }
  36
  37 static HRESULT WINAPI ShellBrowser_QueryInterface(IShellBrowser* iface, REFIID riid, void **ppv)
  38 {
  39     ShellBrowser *This = impl_from_IShellBrowser(iface);
  40
  41     if(IsEqualGUID(&IID_IUnknown, riid)) {
  42         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
  43         *ppv = &This->IShellBrowser_iface;
  44     }else if(IsEqualGUID(&IID_IOleWindow, riid)) {
  45         TRACE("(%p)->(IID_IOleWindow %p)\n", This, ppv);
  46         *ppv = &This->IShellBrowser_iface;
  47     }else if(IsEqualGUID(&IID_IShellBrowser, riid)) {
  48         TRACE("(%p)->(IID_IShellBrowser %p)\n", This, ppv);
  49         *ppv = &This->IShellBrowser_iface;
  50     }else if(IsEqualGUID(&IID_IBrowserService, riid)) {
  51         TRACE("(%p)->(IID_IBrowserService %p)\n", This, ppv);
  52         *ppv = &This->IBrowserService_iface;
  53     }else if(IsEqualGUID(&IID_IDocObjectService, riid)) {
  54         TRACE("(%p)->(IID_IDocObjectService %p)\n", This, ppv);
  55         *ppv = &This->IDocObjectService_iface;
  56     }else {
  57         FIXME("%p %s %p\n", This, debugstr_guid(riid), ppv);
  58         *ppv = NULL;
  59         return E_NOINTERFACE;
  60     }
  61
  62     IUnknown_AddRef((IUnknown*)*ppv);
  63     return S_OK;
  64 }
  65
  66 static ULONG WINAPI ShellBrowser_AddRef(
  67         IShellBrowser* iface)
  68 {
  69     ShellBrowser *This = impl_from_IShellBrowser(iface);
  70     LONG ref = InterlockedIncrement(&This->ref);
  71
  72     TRACE("(%p) ref=%d\n", This, ref);
  73
  74     return ref;
  75 }
  76
  77 static ULONG WINAPI ShellBrowser_Release(IShellBrowser* iface)
  78 {
  79     ShellBrowser *This = impl_from_IShellBrowser(iface);
  80     LONG ref = InterlockedDecrement(&This->ref);
  81
  82     TRACE("(%p) ref=%d\n", This, ref);
  83
  84     if(!ref) {
  85         assert(!This->doc_host);
  86         heap_free(This);
  87     }
  88
  89     return ref;
  90 }
  91
  92 static HRESULT WINAPI ShellBrowser_GetWindow(
  93         IShellBrowser* iface,
  94         HWND *phwnd)
  95 {
  96     ShellBrowser *This = impl_from_IShellBrowser(iface);
  97     FIXME("%p %p\n", This, phwnd);
  98     return E_NOTIMPL;
  99 }
 100
 101 static HRESULT WINAPI ShellBrowser_ContextSensitiveHelp(
 102         IShellBrowser* iface,
 103         BOOL fEnterMode)
 104 {
 105     ShellBrowser *This = impl_from_IShellBrowser(iface);
 106     FIXME("%p %d\n", This, fEnterMode);
 107     return E_NOTIMPL;
 108 }
 109
 110 static HRESULT WINAPI ShellBrowser_InsertMenusSB(
 111         IShellBrowser* iface,
 112         HMENU hmenuShared,
 113         LPOLEMENUGROUPWIDTHS lpMenuWidths)
 114 {
 115     ShellBrowser *This = impl_from_IShellBrowser(iface);
 116     FIXME("%p %p %p\n", This, hmenuShared, lpMenuWidths);
 117     return E_NOTIMPL;
 118 }
 119
 120 static HRESULT WINAPI ShellBrowser_SetMenuSB(
 121         IShellBrowser* iface,
 122         HMENU hmenuShared,
 123         HOLEMENU holemenuReserved,
 124         HWND hwndActiveObject)
 125 {
 126     ShellBrowser *This = impl_from_IShellBrowser(iface);
 127     FIXME("%p %p %p %p\n", This, hmenuShared, holemenuReserved, hwndActiveObject);
 128     return E_NOTIMPL;
 129 }
 130
 131 static HRESULT WINAPI ShellBrowser_RemoveMenusSB(
 132         IShellBrowser* iface,
 133         HMENU hmenuShared)
 134 {
 135     ShellBrowser *This = impl_from_IShellBrowser(iface);
 136     FIXME("%p %p\n", This, hmenuShared);
 137     return E_NOTIMPL;
 138 }
 139
 140 static HRESULT WINAPI ShellBrowser_SetStatusTextSB(
 141         IShellBrowser* iface,
 142         LPCOLESTR pszStatusText)
 143 {
 144     ShellBrowser *This = impl_from_IShellBrowser(iface);
 145     FIXME("%p %s\n", This, debugstr_w(pszStatusText));
 146     return E_NOTIMPL;
 147 }
 148
 149 static HRESULT WINAPI ShellBrowser_EnableModelessSB(
 150         IShellBrowser* iface,
 151         BOOL fEnable)
 152 {
 153     ShellBrowser *This = impl_from_IShellBrowser(iface);
 154     FIXME("%p %d\n", This, fEnable);
 155     return E_NOTIMPL;
 156 }
 157
 158 static HRESULT WINAPI ShellBrowser_TranslateAcceleratorSB(
 159         IShellBrowser* iface,
 160         MSG *pmsg,
 161         WORD wID)
 162 {
 163     ShellBrowser *This = impl_from_IShellBrowser(iface);
 164     FIXME("%p %p %d\n", This, pmsg, (int)wID);
 165     return E_NOTIMPL;
 166 }
 167
 168 static HRESULT WINAPI ShellBrowser_BrowseObject(
 169         IShellBrowser* iface,
 170         LPCITEMIDLIST pidl,
 171         UINT wFlags)
 172 {
 173     ShellBrowser *This = impl_from_IShellBrowser(iface);
 174     FIXME("%p %p %u\n", This, pidl, wFlags);
 175     return E_NOTIMPL;
 176 }
 177
 178 static HRESULT WINAPI ShellBrowser_GetViewStateStream(
 179         IShellBrowser* iface,
 180         DWORD grfMode,
 181         IStream **ppStrm)
 182 {
 183     ShellBrowser *This = impl_from_IShellBrowser(iface);
 184     FIXME("%p %x %p\n", This, grfMode, ppStrm);
 185     return E_NOTIMPL;
 186 }
 187
 188 static HRESULT WINAPI ShellBrowser_GetControlWindow(
 189         IShellBrowser* iface,
 190         UINT id,
 191         HWND *phwnd)
 192 {
 193     ShellBrowser *This = impl_from_IShellBrowser(iface);
 194     FIXME("%p %u %p\n", This, id, phwnd);
 195     return E_NOTIMPL;
 196 }
 197
 198 static HRESULT WINAPI ShellBrowser_SendControlMsg(
 199         IShellBrowser* iface,
 200         UINT id,
 201         UINT uMsg,
 202         WPARAM wParam,
 203         LPARAM lParam,
 204         LRESULT *pret)
 205 {
 206     ShellBrowser *This = impl_from_IShellBrowser(iface);
 207     FIXME("%p %u %u %p\n", This, id, uMsg, pret);
 208     return E_NOTIMPL;
 209 }
 210
 211 static HRESULT WINAPI ShellBrowser_QueryActiveShellView(
 212         IShellBrowser* iface,
 213         IShellView **ppshv)
 214 {
 215     ShellBrowser *This = impl_from_IShellBrowser(iface);
 216     FIXME("%p %p\n", This, ppshv);
 217     return E_NOTIMPL;
 218 }
 219
 220 static HRESULT WINAPI ShellBrowser_OnViewWindowActive(
 221         IShellBrowser* iface,
 222         IShellView *pshv)
 223 {
 224     ShellBrowser *This = impl_from_IShellBrowser(iface);
 225     FIXME("%p %p\n", This, pshv);
 226     return E_NOTIMPL;
 227 }
 228
 229 static HRESULT WINAPI ShellBrowser_SetToolbarItems(
 230         IShellBrowser* iface,
 231         LPTBBUTTONSB lpButtons,
 232         UINT nButtons,
 233         UINT uFlags)
 234 {
 235     ShellBrowser *This = impl_from_IShellBrowser(iface);
 236     FIXME("%p %p %u %u\n", This, lpButtons, nButtons, uFlags);
 237     return E_NOTIMPL;
 238 }
 239
 240 static const IShellBrowserVtbl ShellBrowserVtbl = {
 241     ShellBrowser_QueryInterface,
 242     ShellBrowser_AddRef,
 243     ShellBrowser_Release,
 244     ShellBrowser_GetWindow,
 245     ShellBrowser_ContextSensitiveHelp,
 246     ShellBrowser_InsertMenusSB,
 247     ShellBrowser_SetMenuSB,
 248     ShellBrowser_RemoveMenusSB,
 249     ShellBrowser_SetStatusTextSB,
 250     ShellBrowser_EnableModelessSB,
 251     ShellBrowser_TranslateAcceleratorSB,
 252     ShellBrowser_BrowseObject,
 253     ShellBrowser_GetViewStateStream,
 254     ShellBrowser_GetControlWindow,
 255     ShellBrowser_SendControlMsg,
 256     ShellBrowser_QueryActiveShellView,
 257     ShellBrowser_OnViewWindowActive,
 258     ShellBrowser_SetToolbarItems
 259 };
 260
 261 static inline ShellBrowser *impl_from_IBrowserService(IBrowserService *iface)
 262 {
 263     return CONTAINING_RECORD(iface, ShellBrowser, IBrowserService_iface);
 264 }
 265
 266 static HRESULT WINAPI BrowserService_QueryInterface(
 267         IBrowserService* iface,
 268         REFIID riid,
 269         void **ppvObject)
 270 {
 271     ShellBrowser *This = impl_from_IBrowserService(iface);
 272     return IShellBrowser_QueryInterface(&This->IShellBrowser_iface, riid, ppvObject);
 273 }
 274
 275 static ULONG WINAPI BrowserService_AddRef(
 276         IBrowserService *iface)
 277 {
 278     ShellBrowser *This = impl_from_IBrowserService(iface);
 279     return IShellBrowser_AddRef(&This->IShellBrowser_iface);
 280 }
 281
 282 static ULONG WINAPI BrowserService_Release(
 283         IBrowserService* iface)
 284 {
 285     ShellBrowser *This = impl_from_IBrowserService(iface);
 286     return IShellBrowser_Release(&This->IShellBrowser_iface);
 287 }
 288
 289 static HRESULT WINAPI BrowserService_GetParentSite(
 290         IBrowserService* iface,
 291         IOleInPlaceSite **ppipsite)
 292 {
 293     ShellBrowser *This = impl_from_IBrowserService(iface);
 294     FIXME("%p %p\n", This, ppipsite);
 295     return E_NOTIMPL;
 296 }
 297
 298 static HRESULT WINAPI BrowserService_SetTitle(
 299         IBrowserService* iface,
 300         IShellView *psv,
 301         LPCWSTR pszName)
 302 {
 303     ShellBrowser *This = impl_from_IBrowserService(iface);
 304     FIXME("%p %p %s\n", This, psv, debugstr_w(pszName));
 305     return E_NOTIMPL;
 306 }
 307
 308 static HRESULT WINAPI BrowserService_GetTitle(
 309         IBrowserService* iface,
 310         IShellView *psv,
 311         LPWSTR pszName,
 312         DWORD cchName)
 313 {
 314     ShellBrowser *This = impl_from_IBrowserService(iface);
 315     FIXME("%p %p %p %d\n", This, psv, pszName, cchName);
 316     return E_NOTIMPL;
 317 }
 318
 319 static HRESULT WINAPI BrowserService_GetOleObject(
 320         IBrowserService* iface,
 321         IOleObject **ppobjv)
 322 {
 323     ShellBrowser *This = impl_from_IBrowserService(iface);
 324     FIXME("%p %p\n", This, ppobjv);
 325     return E_NOTIMPL;
 326 }
 327
 328 static HRESULT WINAPI BrowserService_GetTravelLog(
 329         IBrowserService* iface,
 330         ITravelLog **pptl)
 331 {
 332     ShellBrowser *This = impl_from_IBrowserService(iface);
 333     FIXME("%p %p\n", This, pptl);
 334     return E_NOTIMPL;
 335 }
 336
 337 static HRESULT WINAPI BrowserService_ShowControlWindow(
 338         IBrowserService* iface,
 339         UINT id,
 340         BOOL fShow)
 341 {
 342     ShellBrowser *This = impl_from_IBrowserService(iface);
 343     FIXME("%p %u %d\n", This, id, fShow);
 344     return E_NOTIMPL;
 345 }
 346
 347 static HRESULT WINAPI BrowserService_IsControlWindowShown(
 348         IBrowserService* iface,
 349         UINT id,
 350         BOOL *pfShown)
 351 {
 352     ShellBrowser *This = impl_from_IBrowserService(iface);
 353     FIXME("%p %u %p\n", This, id, pfShown);
 354     return E_NOTIMPL;
 355 }
 356
 357 static HRESULT WINAPI BrowserService_IEGetDisplayName(
 358         IBrowserService* iface,
 359         PCIDLIST_ABSOLUTE pidl,
 360         LPWSTR pwszName,
 361         UINT uFlags)
 362 {
 363     ShellBrowser *This = impl_from_IBrowserService(iface);
 364     FIXME("%p %p %p %u\n", This, pidl, pwszName, uFlags);
 365     return E_NOTIMPL;
 366 }
 367
 368 static HRESULT WINAPI BrowserService_IEParseDisplayName(
 369         IBrowserService* iface,
 370         UINT uiCP,
 371         LPCWSTR pwszPath,
 372         PIDLIST_ABSOLUTE *ppidlOut)
 373 {
 374     ShellBrowser *This = impl_from_IBrowserService(iface);
 375     FIXME("%p %u %s %p\n", This, uiCP, debugstr_w(pwszPath), ppidlOut);
 376     return E_NOTIMPL;
 377 }
 378
 379 static HRESULT WINAPI BrowserService_DisplayParseError(
 380         IBrowserService* iface,
 381         HRESULT hres,
 382         LPCWSTR pwszPath)
 383 {
 384     ShellBrowser *This = impl_from_IBrowserService(iface);
 385     FIXME("%p %x %s\n", This, hres, debugstr_w(pwszPath));
 386     return E_NOTIMPL;
 387 }
 388
 389 static HRESULT WINAPI BrowserService_NavigateToPidl(
 390         IBrowserService* iface,
 391         PCIDLIST_ABSOLUTE pidl,
 392         DWORD grfHLNF)
 393 {
 394     ShellBrowser *This = impl_from_IBrowserService(iface);
 395     FIXME("%p %p %d\n", This, pidl, grfHLNF);
 396     return E_NOTIMPL;
 397 }
 398
 399 static HRESULT WINAPI BrowserService_SetNavigateState(
 400         IBrowserService* iface,
 401         BNSTATE bnstate)
 402 {
 403     ShellBrowser *This = impl_from_IBrowserService(iface);
 404     FIXME("%p %d\n", This, bnstate);
 405     return E_NOTIMPL;
 406 }
 407
 408 static HRESULT WINAPI BrowserService_GetNavigateState(
 409         IBrowserService* iface,
 410         BNSTATE *pbnstate)
 411 {
 412     ShellBrowser *This = impl_from_IBrowserService(iface);
 413     FIXME("%p %p\n", This, pbnstate);
 414     return E_NOTIMPL;
 415 }
 416
 417 static HRESULT WINAPI BrowserService_NotifyRedirect(
 418         IBrowserService* iface,
 419         IShellView *psv,
 420         PCIDLIST_ABSOLUTE pidl,
 421         BOOL *pfDidBrowse)
 422 {
 423     ShellBrowser *This = impl_from_IBrowserService(iface);
 424     FIXME("%p %p %p %p\n", This, psv, pidl, pfDidBrowse);
 425     return E_NOTIMPL;
 426 }
 427
 428 static HRESULT WINAPI BrowserService_UpdateWindowList(
 429         IBrowserService* iface)
 430 {
 431     ShellBrowser *This = impl_from_IBrowserService(iface);
 432     FIXME("%p\n", This);
 433     return E_NOTIMPL;
 434 }
 435
 436 static HRESULT WINAPI BrowserService_UpdateBackForwardState(
 437         IBrowserService* iface)
 438 {
 439     ShellBrowser *This = impl_from_IBrowserService(iface);
 440     FIXME("%p\n", This);
 441     return E_NOTIMPL;
 442 }
 443
 444 static HRESULT WINAPI BrowserService_SetFlags(
 445         IBrowserService* iface,
 446         DWORD dwFlags,
 447         DWORD dwFlagMask)
 448 {
 449     ShellBrowser *This = impl_from_IBrowserService(iface);
 450     FIXME("%p %x %x\n", This, dwFlags, dwFlagMask);
 451     return E_NOTIMPL;
 452 }
 453
 454 static HRESULT WINAPI BrowserService_GetFlags(
 455         IBrowserService* iface,
 456         DWORD *pdwFlags)
 457 {
 458     ShellBrowser *This = impl_from_IBrowserService(iface);
 459     FIXME("%p %p\n", This, pdwFlags);
 460     return E_NOTIMPL;
 461 }
 462
 463 static HRESULT WINAPI BrowserService_CanNavigateNow(
 464         IBrowserService* iface)
 465 {
 466     ShellBrowser *This = impl_from_IBrowserService(iface);
 467     FIXME("%p\n", This);
 468     return E_NOTIMPL;
 469 }
 470
 471 static HRESULT WINAPI BrowserService_GetPidl(
 472         IBrowserService* iface,
 473         PIDLIST_ABSOLUTE *ppidl)
 474 {
 475     ShellBrowser *This = impl_from_IBrowserService(iface);
 476     FIXME("%p %p\n", This, ppidl);
 477     return E_NOTIMPL;
 478 }
 479
 480 static HRESULT WINAPI BrowserService_SetReferrer(
 481         IBrowserService* iface,
 482         PCIDLIST_ABSOLUTE pidl)
 483 {
 484     ShellBrowser *This = impl_from_IBrowserService(iface);
 485     FIXME("%p %p\n", This, pidl);
 486     return E_NOTIMPL;
 487 }
 488
 489 static DWORD WINAPI BrowserService_GetBrowserIndex(
 490         IBrowserService* iface)
 491 {
 492     ShellBrowser *This = impl_from_IBrowserService(iface);
 493     FIXME("%p\n", This);
 494     return E_NOTIMPL;
 495 }
 496
 497 static HRESULT WINAPI BrowserService_GetBrowserByIndex(
 498         IBrowserService* iface,
 499         DWORD dwID,
 500         IUnknown **ppunk)
 501 {
 502     ShellBrowser *This = impl_from_IBrowserService(iface);
 503     FIXME("%p %x %p\n", This, dwID, ppunk);
 504     return E_NOTIMPL;
 505 }
 506
 507 static HRESULT WINAPI BrowserService_GetHistoryObject(
 508         IBrowserService* iface,
 509         IOleObject **ppole,
 510         IStream **pstm,
 511         IBindCtx **ppbc)
 512 {
 513     ShellBrowser *This = impl_from_IBrowserService(iface);
 514     FIXME("%p %p %p %p\n", This, ppole, pstm, ppbc);
 515     return E_NOTIMPL;
 516 }
 517
 518 static HRESULT WINAPI BrowserService_SetHistoryObject(
 519         IBrowserService* iface,
 520         IOleObject *pole,
 521         BOOL fIsLocalAnchor)
 522 {
 523     ShellBrowser *This = impl_from_IBrowserService(iface);
 524     FIXME("%p %p %d\n", This, pole, fIsLocalAnchor);
 525     return E_NOTIMPL;
 526 }
 527
 528 static HRESULT WINAPI BrowserService_CacheOLEServer(
 529         IBrowserService* iface,
 530         IOleObject *pole)
 531 {
 532     ShellBrowser *This = impl_from_IBrowserService(iface);
 533     FIXME("%p %p\n", This, pole);
 534     return E_NOTIMPL;
 535 }
 536
 537 static HRESULT WINAPI BrowserService_GetSetCodePage(
 538         IBrowserService* iface,
 539         VARIANT *pvarIn,
 540         VARIANT *pvarOut)
 541 {
 542     ShellBrowser *This = impl_from_IBrowserService(iface);
 543     FIXME("%p %s %p\n", This, debugstr_variant(pvarIn), pvarOut);
 544     return E_NOTIMPL;
 545 }
 546
 547 static HRESULT WINAPI BrowserService_OnHttpEquiv(
 548         IBrowserService* iface,
 549         IShellView *psv,
 550         BOOL fDone,
 551         VARIANT *pvarargIn,
 552         VARIANT *pvarargOut)
 553 {
 554     ShellBrowser *This = impl_from_IBrowserService(iface);
 555     FIXME("%p %p %d %s %p\n", This, psv, fDone, debugstr_variant(pvarargIn), pvarargOut);
 556     return E_NOTIMPL;
 557 }
 558
 559 static HRESULT WINAPI BrowserService_GetPalette(
 560         IBrowserService* iface,
 561         HPALETTE *hpal)
 562 {
 563     ShellBrowser *This = impl_from_IBrowserService(iface);
 564     FIXME("%p %p\n", This, hpal);
 565     return E_NOTIMPL;
 566 }
 567
 568 static HRESULT WINAPI BrowserService_RegisterWindow(
 569         IBrowserService* iface,
 570         BOOL fForceRegister,
 571         int swc)
 572 {
 573     ShellBrowser *This = impl_from_IBrowserService(iface);
 574     FIXME("%p %d %d\n", This, fForceRegister, swc);
 575     return E_NOTIMPL;
 576 }
 577
 578 static const IBrowserServiceVtbl BrowserServiceVtbl = {
 579     BrowserService_QueryInterface,
 580     BrowserService_AddRef,
 581     BrowserService_Release,
 582     BrowserService_GetParentSite,
 583     BrowserService_SetTitle,
 584     BrowserService_GetTitle,
 585     BrowserService_GetOleObject,
 586     BrowserService_GetTravelLog,
 587     BrowserService_ShowControlWindow,
 588     BrowserService_IsControlWindowShown,
 589     BrowserService_IEGetDisplayName,
 590     BrowserService_IEParseDisplayName,
 591     BrowserService_DisplayParseError,
 592     BrowserService_NavigateToPidl,
 593     BrowserService_SetNavigateState,
 594     BrowserService_GetNavigateState,
 595     BrowserService_NotifyRedirect,
 596     BrowserService_UpdateWindowList,
 597     BrowserService_UpdateBackForwardState,
 598     BrowserService_SetFlags,
 599     BrowserService_GetFlags,
 600     BrowserService_CanNavigateNow,
 601     BrowserService_GetPidl,
 602     BrowserService_SetReferrer,
 603     BrowserService_GetBrowserIndex,
 604     BrowserService_GetBrowserByIndex,
 605     BrowserService_GetHistoryObject,
 606     BrowserService_SetHistoryObject,
 607     BrowserService_CacheOLEServer,
 608     BrowserService_GetSetCodePage,
 609     BrowserService_OnHttpEquiv,
 610     BrowserService_GetPalette,
 611     BrowserService_RegisterWindow
 612 };
 613
 614 static inline ShellBrowser *impl_from_IDocObjectService(IDocObjectService *iface)
 615 {
 616     return CONTAINING_RECORD(iface, ShellBrowser, IDocObjectService_iface);
 617 }
 618
 619 static HRESULT WINAPI DocObjectService_QueryInterface(
 620         IDocObjectService* iface,
 621         REFIID riid,
 622         void **ppvObject)
 623 {
 624     ShellBrowser *This = impl_from_IDocObjectService(iface);
 625     return IShellBrowser_QueryInterface(&This->IShellBrowser_iface, riid, ppvObject);
 626 }
 627
 628 static ULONG WINAPI DocObjectService_AddRef(
 629         IDocObjectService* iface)
 630 {
 631     ShellBrowser *This = impl_from_IDocObjectService(iface);
 632     return IShellBrowser_AddRef(&This->IShellBrowser_iface);
 633 }
 634
 635 static ULONG WINAPI DocObjectService_Release(
 636         IDocObjectService* iface)
 637 {
 638     ShellBrowser *This = impl_from_IDocObjectService(iface);
 639     return IShellBrowser_Release(&This->IShellBrowser_iface);
 640 }
 641
 642 static HRESULT WINAPI DocObjectService_FireBeforeNavigate2(
 643         IDocObjectService* iface,
 644         IDispatch *pDispatch,
 645         LPCWSTR lpszUrl,
 646         DWORD dwFlags,
 647         LPCWSTR lpszFrameName,
 648         BYTE *pPostData,
 649         DWORD cbPostData,
 650         LPCWSTR lpszHeaders,
 651         BOOL fPlayNavSound,
 652         BOOL *pfCancel)
 653 {
 654     ShellBrowser *This = impl_from_IDocObjectService(iface);
 655     VARIANT var_url, var_flags, var_frame_name, var_post_data, var_post_data2, var_headers;
 656     VARIANTARG params[7];
 657     DISPPARAMS dp = {params, NULL, 7, 0};
 658     VARIANT_BOOL cancel = VARIANT_FALSE;
 659     SAFEARRAY *post_data;
 660     WCHAR file_path[MAX_PATH];
 661     DWORD file_path_len = ARRAY_SIZE(file_path);
 662
 663     TRACE("%p %p %s %x %s %p %d %s %d %p\n", This, pDispatch, debugstr_w(lpszUrl),
 664             dwFlags, debugstr_w(lpszFrameName), pPostData, cbPostData,
 665             debugstr_w(lpszHeaders), fPlayNavSound, pfCancel);
 666
 667     if(cbPostData) {
 668         post_data = SafeArrayCreateVector(VT_UI1, 0, cbPostData);
 669         if(!post_data)
 670             return E_OUTOFMEMORY;
 671         memcpy(post_data->pvData, pPostData, cbPostData);
 672     }else {
 673         post_data = NULL;
 674     }
 675
 676     V_VT(params) = VT_BOOL|VT_BYREF;
 677     V_BOOLREF(params) = &cancel;
 678
 679     V_VT(params+1) = (VT_BYREF|VT_VARIANT);
 680     V_VARIANTREF(params+1) = &var_headers;
 681     V_VT(&var_headers) = VT_BSTR;
 682     V_BSTR(&var_headers) = lpszHeaders ? SysAllocString(lpszHeaders) : NULL;
 683
 684     V_VT(params+2) = (VT_BYREF|VT_VARIANT);
 685     V_VARIANTREF(params+2) = &var_post_data2;
 686     V_VT(&var_post_data2) = (VT_BYREF|VT_VARIANT);
 687     V_VARIANTREF(&var_post_data2) = &var_post_data;
 688
 689     if(post_data) {
 690         V_VT(&var_post_data) = VT_UI1|VT_ARRAY;
 691         V_ARRAY(&var_post_data) = post_data;
 692     }else {
 693         V_VT(&var_post_data) = VT_EMPTY;
 694     }
 695
 696     V_VT(params+3) = (VT_BYREF|VT_VARIANT);
 697     V_VARIANTREF(params+3) = &var_frame_name;
 698     V_VT(&var_frame_name) = VT_BSTR;
 699     V_BSTR(&var_frame_name) = lpszFrameName ? SysAllocString(lpszFrameName) : NULL;
 700
 701     V_VT(params+4) = (VT_BYREF|VT_VARIANT);
 702     V_VARIANTREF(params+4) = &var_flags;
 703     V_VT(&var_flags) = VT_I4;
 704     V_I4(&var_flags) = 0;
 705
 706     V_VT(params+5) = (VT_BYREF|VT_VARIANT);
 707     V_VARIANTREF(params+5) = &var_url;
 708     V_VT(&var_url) = VT_BSTR;
 709     if(PathCreateFromUrlW(lpszUrl, file_path, &file_path_len, 0) == S_OK)
 710         V_BSTR(&var_url) = SysAllocString(file_path);
 711     else
 712         V_BSTR(&var_url) = SysAllocString(lpszUrl);
 713
 714     V_VT(params+6) = (VT_DISPATCH);
 715     V_DISPATCH(params+6) = (IDispatch*)This->doc_host->wb;
 716
 717     /* Keep reference to This. It may be released in event handler. */
 718     IShellBrowser_AddRef(&This->IShellBrowser_iface);
 719
 720     TRACE(">>>\n");
 721     call_sink(This->doc_host->cps.wbe2, DISPID_BEFORENAVIGATE2, &dp);
 722     TRACE("<<<\n");
 723
 724     IShellBrowser_Release(&This->IShellBrowser_iface);
 725
 726     SysFreeString(V_BSTR(&var_url));
 727     SysFreeString(V_BSTR(&var_headers));
 728     SysFreeString(V_BSTR(&var_frame_name));
 729     SafeArrayDestroy(post_data);
 730
 731     *pfCancel = !!cancel;
 732     return S_OK;
 733 }
 734
 735 static HRESULT WINAPI DocObjectService_FireNavigateComplete2(
 736         IDocObjectService* iface,
 737         IHTMLWindow2 *pHTMLWindow2,
 738         DWORD dwFlags)
 739 {
 740     ShellBrowser *This = impl_from_IDocObjectService(iface);
 741     DocHost *doc_host = This->doc_host;
 742     IHTMLPrivateWindow *priv_window;
 743     VARIANTARG params[2];
 744     DISPPARAMS dp = {params, NULL, 2, 0};
 745     VARIANT url_var;
 746     BSTR url;
 747     HRESULT hres;
 748
 749     TRACE("%p %p %x\n", This, pHTMLWindow2, dwFlags);
 750
 751     update_navigation_commands(This->doc_host);
 752
 753     if(doc_host->travellog.loading_pos != -1) {
 754         WARN("histupdate not notified\n");
 755         doc_host->travellog.position = doc_host->travellog.loading_pos;
 756         doc_host->travellog.loading_pos = -1;
 757     }
 758
 759     hres = IHTMLWindow2_QueryInterface(pHTMLWindow2, &IID_IHTMLPrivateWindow, (void**)&priv_window);
 760     if(FAILED(hres))
 761         return hres;
 762
 763     hres = IHTMLPrivateWindow_GetAddressBarUrl(priv_window, &url);
 764     IHTMLPrivateWindow_Release(priv_window);
 765     if(FAILED(hres))
 766         return hres;
 767
 768     TRACE("got URL %s\n", debugstr_w(url));
 769     set_dochost_url(This->doc_host, url);
 770
 771     V_VT(params) = (VT_BYREF|VT_VARIANT);
 772     V_VARIANTREF(params) = &url_var;
 773
 774     V_VT(params+1) = VT_DISPATCH;
 775     V_DISPATCH(params+1) = (IDispatch*)doc_host->wb;
 776
 777     V_VT(&url_var) = VT_BSTR;
 778     V_BSTR(&url_var) = url;
 779
 780     /* Keep reference to This. It may be released in event handler. */
 781     IShellBrowser_AddRef(&This->IShellBrowser_iface);
 782
 783     TRACE(">>>\n");
 784     call_sink(This->doc_host->cps.wbe2, DISPID_NAVIGATECOMPLETE2, &dp);
 785     TRACE("<<<\n");
 786
 787     SysFreeString(url);
 788
 789     This->doc_host->busy = VARIANT_FALSE;
 790     IShellBrowser_Release(&This->IShellBrowser_iface);
 791     return S_OK;
 792 }
 793
 794 static HRESULT WINAPI DocObjectService_FireDownloadBegin(
 795         IDocObjectService* iface)
 796 {
 797     ShellBrowser *This = impl_from_IDocObjectService(iface);
 798     FIXME("%p\n", This);
 799     return E_NOTIMPL;
 800 }
 801
 802 static HRESULT WINAPI DocObjectService_FireDownloadComplete(
 803         IDocObjectService* iface)
 804 {
 805     ShellBrowser *This = impl_from_IDocObjectService(iface);
 806     FIXME("%p\n", This);
 807     return E_NOTIMPL;
 808 }
 809
 810 static HRESULT WINAPI DocObjectService_FireDocumentComplete(
 811         IDocObjectService* iface,
 812         IHTMLWindow2 *pHTMLWindow,
 813         DWORD dwFlags)
 814 {
 815     ShellBrowser *This = impl_from_IDocObjectService(iface);
 816     IHTMLPrivateWindow *priv_window;
 817     VARIANTARG params[2];
 818     DISPPARAMS dp = {params, NULL, 2, 0};
 819     VARIANT url_var;
 820     BSTR url;
 821     HRESULT hres;
 822
 823     TRACE("%p %p %x\n", This, pHTMLWindow, dwFlags);
 824
 825     hres = IHTMLWindow2_QueryInterface(pHTMLWindow, &IID_IHTMLPrivateWindow, (void**)&priv_window);
 826     if(FAILED(hres))
 827         return hres;
 828
 829     hres = IHTMLPrivateWindow_GetAddressBarUrl(priv_window, &url);
 830     IHTMLPrivateWindow_Release(priv_window);
 831     if(FAILED(hres))
 832         return hres;
 833
 834     TRACE("got URL %s\n", debugstr_w(url));
 835
 836     V_VT(params) = (VT_BYREF|VT_VARIANT);
 837     V_VARIANTREF(params) = &url_var;
 838
 839     V_VT(params+1) = VT_DISPATCH;
 840     V_DISPATCH(params+1) = (IDispatch*)This->doc_host->wb;
 841
 842     V_VT(&url_var) = VT_BSTR;
 843     V_BSTR(&url_var) = url;
 844
 845     /* Keep reference to This. It may be released in event handler. */
 846     IShellBrowser_AddRef(&This->IShellBrowser_iface);
 847
 848     TRACE(">>>\n");
 849     call_sink(This->doc_host->cps.wbe2, DISPID_DOCUMENTCOMPLETE, &dp);
 850     TRACE("<<<\n");
 851
 852     SysFreeString(url);
 853     if(This->doc_host)
 854         This->doc_host->busy = VARIANT_FALSE;
 855
 856     IShellBrowser_Release(&This->IShellBrowser_iface);
 857     return S_OK;
 858 }
 859
 860 static HRESULT WINAPI DocObjectService_UpdateDesktopComponent(
 861         IDocObjectService* iface,
 862         IHTMLWindow2 *pHTMLWindow)
 863 {
 864     ShellBrowser *This = impl_from_IDocObjectService(iface);
 865     FIXME("%p %p\n", This, pHTMLWindow);
 866     return E_NOTIMPL;
 867 }
 868
 869 static HRESULT WINAPI DocObjectService_GetPendingUrl(
 870         IDocObjectService* iface,
 871         BSTR *pbstrPendingUrl)
 872 {
 873     ShellBrowser *This = impl_from_IDocObjectService(iface);
 874     FIXME("%p %p\n", This, pbstrPendingUrl);
 875     return E_NOTIMPL;
 876 }
 877
 878 static HRESULT WINAPI DocObjectService_ActiveElementChanged(
 879         IDocObjectService* iface,
 880         IHTMLElement *pHTMLElement)
 881 {
 882     ShellBrowser *This = impl_from_IDocObjectService(iface);
 883     FIXME("%p %p\n", This, pHTMLElement);
 884     return E_NOTIMPL;
 885 }
 886
 887 static HRESULT WINAPI DocObjectService_GetUrlSearchComponent(
 888         IDocObjectService* iface,
 889         BSTR *pbstrSearch)
 890 {
 891     ShellBrowser *This = impl_from_IDocObjectService(iface);
 892     FIXME("%p %p\n", This, pbstrSearch);
 893     return E_NOTIMPL;
 894 }
 895
 896 static HRESULT WINAPI DocObjectService_IsErrorUrl(
 897         IDocObjectService* iface,
 898         LPCWSTR lpszUrl,
 899         BOOL *pfIsError)
 900 {
 901     ShellBrowser *This = impl_from_IDocObjectService(iface);
 902     FIXME("%p %s %p\n", This, debugstr_w(lpszUrl), pfIsError);
 903
 904     *pfIsError = FALSE;
 905     return S_OK;
 906 }
 907
 908 static const IDocObjectServiceVtbl DocObjectServiceVtbl = {
 909     DocObjectService_QueryInterface,
 910     DocObjectService_AddRef,
 911     DocObjectService_Release,
 912     DocObjectService_FireBeforeNavigate2,
 913     DocObjectService_FireNavigateComplete2,
 914     DocObjectService_FireDownloadBegin,
 915     DocObjectService_FireDownloadComplete,
 916     DocObjectService_FireDocumentComplete,
 917     DocObjectService_UpdateDesktopComponent,
 918     DocObjectService_GetPendingUrl,
 919     DocObjectService_ActiveElementChanged,
 920     DocObjectService_GetUrlSearchComponent,
 921     DocObjectService_IsErrorUrl
 922 };
 923
 924 HRESULT create_browser_service(DocHost *doc_host, ShellBrowser **ret)
 925 {
 926     ShellBrowser *sb;
 927
 928     sb = heap_alloc(sizeof(ShellBrowser));
 929     if(!sb)
 930         return E_OUTOFMEMORY;
 931
 932     sb->IShellBrowser_iface.lpVtbl = &ShellBrowserVtbl;
 933     sb->IBrowserService_iface.lpVtbl = &BrowserServiceVtbl;
 934     sb->IDocObjectService_iface.lpVtbl = &DocObjectServiceVtbl;
 935
 936     sb->ref = 1;
 937     sb->doc_host = doc_host;
 938
 939     *ret = sb;
 940     return S_OK;
 941 }
 942
 943 void detach_browser_service(ShellBrowser *sb)
 944 {
 945     sb->doc_host = NULL;
 946     IShellBrowser_Release(&sb->IShellBrowser_iface);
 947 }
 948
 949 static inline NewWindowManager *impl_from_INewWindowManager(INewWindowManager *iface)
 950 {
 951     return CONTAINING_RECORD(iface, NewWindowManager, INewWindowManager_iface);
 952 }
 953
 954 static HRESULT WINAPI NewWindowManager_QueryInterface(INewWindowManager *iface, REFIID riid, void **ppv)
 955 {
 956     NewWindowManager *This = impl_from_INewWindowManager(iface);
 957
 958     if(IsEqualGUID(&IID_IUnknown, riid)) {
 959         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 960         *ppv = &This->INewWindowManager_iface;
 961     }else if(IsEqualGUID(&IID_INewWindowManager, riid)) {
 962         TRACE("(%p)->(IID_INewWindowManager %p)\n", This, ppv);
 963         *ppv = &This->INewWindowManager_iface;
 964     }else {
 965         WARN("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
 966         *ppv = NULL;
 967         return E_NOINTERFACE;
 968     }
 969
 970     IUnknown_AddRef((IUnknown*)*ppv);
 971     return S_OK;
 972 }
 973
 974 static ULONG WINAPI NewWindowManager_AddRef(INewWindowManager *iface)
 975 {
 976     NewWindowManager *This = impl_from_INewWindowManager(iface);
 977
 978     TRACE("(%p)\n", This);
 979
 980     return IOleClientSite_AddRef(&This->doc_host->IOleClientSite_iface);
 981 }
 982
 983 static ULONG WINAPI NewWindowManager_Release(INewWindowManager *iface)
 984 {
 985     NewWindowManager *This = impl_from_INewWindowManager(iface);
 986
 987     TRACE("(%p)\n", This);
 988
 989     return IOleClientSite_Release(&This->doc_host->IOleClientSite_iface);
 990 }
 991
 992 static HRESULT WINAPI NewWindowManager_EvaluateNewWindow(INewWindowManager *iface, LPCWSTR pszUrl,
 993         LPCWSTR pszName, LPCWSTR pszUrlContext, LPCWSTR pszFeatures, BOOL fReplace, DWORD dwFlags,
 994         DWORD dwUserActionTime)
 995 {
 996     NewWindowManager *This = impl_from_INewWindowManager(iface);
 997     FIXME("(%p)->(%s %s %s %s %x %x %d)\n", This, debugstr_w(pszUrl), debugstr_w(pszName), debugstr_w(pszUrlContext),
 998           debugstr_w(pszFeatures), fReplace, dwFlags, dwUserActionTime);
 999     return S_OK;
1000 }
1001
1002 static const INewWindowManagerVtbl NewWindowManagerVtbl = {
1003     NewWindowManager_QueryInterface,
1004     NewWindowManager_AddRef,
1005     NewWindowManager_Release,
1006     NewWindowManager_EvaluateNewWindow
1007 };
1008
1009 void NewWindowManager_Init(DocHost *doc_host)
1010 {
1011     doc_host->nwm.INewWindowManager_iface.lpVtbl = &NewWindowManagerVtbl;
1012     doc_host->nwm.doc_host = doc_host;
1013 }