git.oblomov.eu Git - wine/blob - dlls/hhctrl.ocx/webbrowser.c

   1 /*
   2  * WebBrowser Implementation
   3  *
   4  * Copyright 2005 James Hawkins
   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 "hhctrl.h"
  22
  23 #include "wine/debug.h"
  24
  25 WINE_DEFAULT_DEBUG_CHANNEL(htmlhelp);
  26
  27 #define ICOM_THIS_MULTI(impl,field,iface) impl* const This=(impl*)((char*)(iface) - offsetof(impl,field))
  28
  29 typedef struct IOleClientSiteImpl
  30 {
  31     const IOleClientSiteVtbl *lpVtbl;
  32     const IOleInPlaceSiteVtbl *lpvtblOleInPlaceSite;
  33     const IOleInPlaceFrameVtbl *lpvtblOleInPlaceFrame;
  34     const IDocHostUIHandlerVtbl *lpvtblDocHostUIHandler;
  35
  36     /* IOleClientSiteImpl data */
  37     IOleObject *pBrowserObject;
  38     LONG ref;
  39
  40     /* IOleInPlaceFrame data */
  41     HWND hwndWindow;
  42 } IOleClientSiteImpl;
  43
  44 #define CLIENTSITE(x)    ((IOleClientSite*)     &(x)->lpVtbl)
  45 #define DOCHOSTUI(x)     ((IDocHostUIHandler*)  &(x)->lpvtblDocHostUIHandler)
  46 #define INPLACESITE(x)   ((IOleInPlaceSite*)    &(x)->lpvtblOleInPlaceSite)
  47 #define INPLACEFRAME(x)  ((IOleInPlaceFrame*)   &(x)->lpvtblOleInPlaceFrame)
  48
  49 static HRESULT STDMETHODCALLTYPE Site_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppvObj)
  50 {
  51     ICOM_THIS_MULTI(IOleClientSiteImpl, lpVtbl, iface);
  52
  53     *ppvObj = NULL;
  54
  55     if (IsEqualIID(riid, &IID_IUnknown)) {
  56         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppvObj);
  57         *ppvObj = CLIENTSITE(This);
  58     }else if(IsEqualIID(riid, &IID_IOleClientSite)) {
  59         TRACE("(%p)->(IID_IOleClientSite %p)\n", This, ppvObj);
  60         *ppvObj = CLIENTSITE(This);
  61     }else if (IsEqualIID(riid, &IID_IOleInPlaceSite)) {
  62         TRACE("(%p)->(IID_IOleInPlaceSite %p)\n", This, ppvObj);
  63         *ppvObj = &(This->lpvtblOleInPlaceSite);
  64     }else if (IsEqualIID(riid, &IID_IOleInPlaceFrame)) {
  65         TRACE("(%p)->(IID_IOleInPlaceFrame %p)\n", This, ppvObj);
  66         *ppvObj = &(This->lpvtblOleInPlaceSite);
  67     }else if (IsEqualIID(riid, &IID_IDocHostUIHandler)) {
  68         TRACE("(%p)->(IID_IDocHostUIHandler %p)\n", This, ppvObj);
  69         *ppvObj = &(This->lpvtblDocHostUIHandler);
  70     }else {
  71         TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppvObj);
  72         return E_NOINTERFACE;
  73     }
  74
  75     IUnknown_AddRef((IUnknown*)*ppvObj);
  76     return S_OK;
  77 }
  78
  79 static ULONG STDMETHODCALLTYPE Site_AddRef(IOleClientSite *iface)
  80 {
  81     ICOM_THIS_MULTI(IOleClientSiteImpl, lpVtbl, iface);
  82     LONG ref = InterlockedIncrement(&This->ref);
  83
  84     TRACE("(%p) ref=%d\n", This, ref);
  85
  86     return ref;
  87 }
  88
  89 static ULONG STDMETHODCALLTYPE Site_Release(IOleClientSite *iface)
  90 {
  91     ICOM_THIS_MULTI(IOleClientSiteImpl, lpVtbl, iface);
  92     LONG ref = InterlockedDecrement(&This->ref);
  93
  94     TRACE("(%p) ref=%d\n", This, ref);
  95
  96     if(!ref)
  97         heap_free(This);
  98
  99     return ref;
 100 }
 101
 102 static HRESULT STDMETHODCALLTYPE Site_SaveObject(IOleClientSite *iface)
 103 {
 104     return E_NOTIMPL;
 105 }
 106
 107 static HRESULT STDMETHODCALLTYPE Site_GetMoniker(IOleClientSite *iface, DWORD dwAssign, DWORD dwWhichMoniker, IMoniker **ppmk)
 108 {
 109     return E_NOTIMPL;
 110 }
 111
 112 static HRESULT STDMETHODCALLTYPE Site_GetContainer(IOleClientSite *iface, LPOLECONTAINER *ppContainer)
 113 {
 114     *ppContainer = NULL;
 115
 116     return E_NOINTERFACE;
 117 }
 118
 119 static HRESULT STDMETHODCALLTYPE Site_ShowObject(IOleClientSite *iface)
 120 {
 121     return NOERROR;
 122 }
 123
 124 static HRESULT STDMETHODCALLTYPE Site_OnShowWindow(IOleClientSite *iface, BOOL fShow)
 125 {
 126     return E_NOTIMPL;
 127 }
 128
 129 static HRESULT STDMETHODCALLTYPE Site_RequestNewObjectLayout(IOleClientSite *iface)
 130 {
 131     return E_NOTIMPL;
 132 }
 133
 134 static const IOleClientSiteVtbl MyIOleClientSiteTable =
 135 {
 136     Site_QueryInterface,
 137     Site_AddRef,
 138     Site_Release,
 139     Site_SaveObject,
 140     Site_GetMoniker,
 141     Site_GetContainer,
 142     Site_ShowObject,
 143     Site_OnShowWindow,
 144     Site_RequestNewObjectLayout
 145 };
 146
 147 static HRESULT STDMETHODCALLTYPE UI_QueryInterface(IDocHostUIHandler *iface, REFIID riid, LPVOID *ppvObj)
 148 {
 149     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblDocHostUIHandler, iface);
 150
 151     return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppvObj);
 152 }
 153
 154 static ULONG STDMETHODCALLTYPE UI_AddRef(IDocHostUIHandler *iface)
 155 {
 156     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblDocHostUIHandler, iface);
 157
 158     return IOleClientSite_AddRef(CLIENTSITE(This));
 159 }
 160
 161 static ULONG STDMETHODCALLTYPE UI_Release(IDocHostUIHandler * iface)
 162 {
 163     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblDocHostUIHandler, iface);
 164
 165     return IOleClientSite_Release(CLIENTSITE(This));
 166 }
 167
 168 static HRESULT STDMETHODCALLTYPE UI_ShowContextMenu(IDocHostUIHandler *iface, DWORD dwID, POINT *ppt, IUnknown *pcmdtReserved, IDispatch *pdispReserved)
 169 {
 170     return S_OK;
 171 }
 172
 173 static HRESULT STDMETHODCALLTYPE UI_GetHostInfo(IDocHostUIHandler *iface, DOCHOSTUIINFO *pInfo)
 174 {
 175     pInfo->cbSize = sizeof(DOCHOSTUIINFO);
 176     pInfo->dwFlags = DOCHOSTUIFLAG_NO3DBORDER;
 177     pInfo->dwDoubleClick = DOCHOSTUIDBLCLK_DEFAULT;
 178
 179     return S_OK;
 180 }
 181
 182 static HRESULT STDMETHODCALLTYPE UI_ShowUI(IDocHostUIHandler *iface, DWORD dwID, IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget, IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
 183 {
 184     return S_OK;
 185 }
 186
 187 static HRESULT STDMETHODCALLTYPE UI_HideUI(IDocHostUIHandler *iface)
 188 {
 189     return S_OK;
 190 }
 191
 192 static HRESULT STDMETHODCALLTYPE UI_UpdateUI(IDocHostUIHandler *iface)
 193 {
 194     return S_OK;
 195 }
 196
 197 static HRESULT STDMETHODCALLTYPE UI_EnableModeless(IDocHostUIHandler *iface, BOOL fEnable)
 198 {
 199     return S_OK;
 200 }
 201
 202 static HRESULT STDMETHODCALLTYPE UI_OnDocWindowActivate(IDocHostUIHandler *iface, BOOL fActivate)
 203 {
 204     return S_OK;
 205 }
 206
 207 static HRESULT STDMETHODCALLTYPE UI_OnFrameWindowActivate(IDocHostUIHandler *iface, BOOL fActivate)
 208 {
 209     return S_OK;
 210 }
 211
 212 static HRESULT STDMETHODCALLTYPE UI_ResizeBorder(IDocHostUIHandler *iface, LPCRECT prcBorder, IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
 213 {
 214     return S_OK;
 215 }
 216
 217 static HRESULT STDMETHODCALLTYPE UI_TranslateAccelerator(IDocHostUIHandler *iface, LPMSG lpMsg, const GUID *pguidCmdGroup, DWORD nCmdID)
 218 {
 219     return S_FALSE;
 220 }
 221
 222 static HRESULT STDMETHODCALLTYPE UI_GetOptionKeyPath(IDocHostUIHandler *iface, LPOLESTR *pchKey, DWORD dw)
 223 {
 224     return S_FALSE;
 225 }
 226
 227 static HRESULT STDMETHODCALLTYPE UI_GetDropTarget(IDocHostUIHandler *iface, IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
 228 {
 229     return S_FALSE;
 230 }
 231
 232 static HRESULT STDMETHODCALLTYPE UI_GetExternal(IDocHostUIHandler *iface, IDispatch **ppDispatch)
 233 {
 234     *ppDispatch = NULL;
 235     return S_FALSE;
 236 }
 237
 238 static HRESULT STDMETHODCALLTYPE UI_TranslateUrl(IDocHostUIHandler *iface, DWORD dwTranslate, OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
 239 {
 240     *ppchURLOut = NULL;
 241     return S_FALSE;
 242 }
 243
 244 static HRESULT STDMETHODCALLTYPE UI_FilterDataObject(IDocHostUIHandler *iface, IDataObject *pDO, IDataObject **ppDORet)
 245 {
 246     *ppDORet = NULL;
 247     return S_FALSE;
 248 }
 249
 250 static const IDocHostUIHandlerVtbl MyIDocHostUIHandlerTable =
 251 {
 252     UI_QueryInterface,
 253     UI_AddRef,
 254     UI_Release,
 255     UI_ShowContextMenu,
 256     UI_GetHostInfo,
 257     UI_ShowUI,
 258     UI_HideUI,
 259     UI_UpdateUI,
 260     UI_EnableModeless,
 261     UI_OnDocWindowActivate,
 262     UI_OnFrameWindowActivate,
 263     UI_ResizeBorder,
 264     UI_TranslateAccelerator,
 265     UI_GetOptionKeyPath,
 266     UI_GetDropTarget,
 267     UI_GetExternal,
 268     UI_TranslateUrl,
 269     UI_FilterDataObject
 270 };
 271
 272 static HRESULT STDMETHODCALLTYPE InPlace_QueryInterface(IOleInPlaceSite *iface, REFIID riid, LPVOID *ppvObj)
 273 {
 274     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblOleInPlaceSite, iface);
 275
 276     return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppvObj);
 277 }
 278
 279 static ULONG STDMETHODCALLTYPE InPlace_AddRef(IOleInPlaceSite *iface)
 280 {
 281     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblOleInPlaceSite, iface);
 282
 283     return IOleClientSite_AddRef(CLIENTSITE(This));
 284 }
 285
 286 static ULONG STDMETHODCALLTYPE InPlace_Release(IOleInPlaceSite *iface)
 287 {
 288     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblOleInPlaceSite, iface);
 289
 290     return IOleClientSite_Release(CLIENTSITE(This));
 291 }
 292
 293 static HRESULT STDMETHODCALLTYPE InPlace_GetWindow(IOleInPlaceSite *iface, HWND *lphwnd)
 294 {
 295     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblOleInPlaceSite, iface);
 296     *lphwnd = This->hwndWindow;
 297
 298     return S_OK;
 299 }
 300
 301 static HRESULT STDMETHODCALLTYPE InPlace_ContextSensitiveHelp(IOleInPlaceSite *iface, BOOL fEnterMode)
 302 {
 303     return E_NOTIMPL;
 304 }
 305
 306 static HRESULT STDMETHODCALLTYPE InPlace_CanInPlaceActivate(IOleInPlaceSite *iface)
 307 {
 308     return S_OK;
 309 }
 310
 311 static HRESULT STDMETHODCALLTYPE InPlace_OnInPlaceActivate(IOleInPlaceSite *iface)
 312 {
 313     return S_OK;
 314 }
 315
 316 static HRESULT STDMETHODCALLTYPE InPlace_OnUIActivate(IOleInPlaceSite *iface)
 317 {
 318     return S_OK;
 319 }
 320
 321 static HRESULT STDMETHODCALLTYPE InPlace_GetWindowContext(IOleInPlaceSite *iface, LPOLEINPLACEFRAME *lplpFrame, LPOLEINPLACEUIWINDOW *lplpDoc, LPRECT lprcPosRect, LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
 322 {
 323     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblOleInPlaceSite, iface);
 324
 325     *lplpFrame = INPLACEFRAME(This);
 326     IOleInPlaceFrame_AddRef(INPLACEFRAME(This));
 327
 328     *lplpDoc = NULL;
 329
 330     lpFrameInfo->fMDIApp = FALSE;
 331     lpFrameInfo->hwndFrame = This->hwndWindow;
 332     lpFrameInfo->haccel = NULL;
 333     lpFrameInfo->cAccelEntries = 0;
 334
 335     return S_OK;
 336 }
 337
 338 static HRESULT STDMETHODCALLTYPE InPlace_Scroll(IOleInPlaceSite *iface, SIZE scrollExtent)
 339 {
 340     return E_NOTIMPL;
 341 }
 342
 343 static HRESULT STDMETHODCALLTYPE InPlace_OnUIDeactivate(IOleInPlaceSite *iface, BOOL fUndoable)
 344 {
 345     return S_OK;
 346 }
 347
 348 static HRESULT STDMETHODCALLTYPE InPlace_OnInPlaceDeactivate(IOleInPlaceSite *iface)
 349 {
 350     return S_OK;
 351 }
 352
 353 static HRESULT STDMETHODCALLTYPE InPlace_DiscardUndoState(IOleInPlaceSite *iface)
 354 {
 355     return E_NOTIMPL;
 356 }
 357
 358 static HRESULT STDMETHODCALLTYPE InPlace_DeactivateAndUndo(IOleInPlaceSite *iface)
 359 {
 360     return E_NOTIMPL;
 361 }
 362
 363 static HRESULT STDMETHODCALLTYPE InPlace_OnPosRectChange(IOleInPlaceSite *iface, LPCRECT lprcPosRect)
 364 {
 365     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblOleInPlaceSite, iface);
 366     IOleInPlaceObject *inplace;
 367
 368     if (!IOleObject_QueryInterface(This->pBrowserObject, &IID_IOleInPlaceObject, (void **)&inplace))
 369         IOleInPlaceObject_SetObjectRects(inplace, lprcPosRect, lprcPosRect);
 370
 371     return S_OK;
 372 }
 373
 374 static const IOleInPlaceSiteVtbl MyIOleInPlaceSiteTable =
 375 {
 376     InPlace_QueryInterface,
 377     InPlace_AddRef,
 378     InPlace_Release,
 379     InPlace_GetWindow,
 380     InPlace_ContextSensitiveHelp,
 381     InPlace_CanInPlaceActivate,
 382     InPlace_OnInPlaceActivate,
 383     InPlace_OnUIActivate,
 384     InPlace_GetWindowContext,
 385     InPlace_Scroll,
 386     InPlace_OnUIDeactivate,
 387     InPlace_OnInPlaceDeactivate,
 388     InPlace_DiscardUndoState,
 389     InPlace_DeactivateAndUndo,
 390     InPlace_OnPosRectChange
 391 };
 392
 393 static HRESULT STDMETHODCALLTYPE Frame_QueryInterface(IOleInPlaceFrame *iface, REFIID riid, LPVOID *ppvObj)
 394 {
 395     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblOleInPlaceFrame, iface);
 396
 397     return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppvObj);
 398 }
 399
 400 static ULONG STDMETHODCALLTYPE Frame_AddRef(IOleInPlaceFrame *iface)
 401 {
 402     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblOleInPlaceFrame, iface);
 403
 404     return IOleClientSite_AddRef(CLIENTSITE(This));
 405 }
 406
 407 static ULONG STDMETHODCALLTYPE Frame_Release(IOleInPlaceFrame *iface)
 408 {
 409     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblOleInPlaceFrame, iface);
 410
 411     return IOleClientSite_Release(CLIENTSITE(This));
 412 }
 413
 414 static HRESULT STDMETHODCALLTYPE Frame_GetWindow(IOleInPlaceFrame *iface, HWND *lphwnd)
 415 {
 416     ICOM_THIS_MULTI(IOleClientSiteImpl, lpvtblOleInPlaceFrame, iface);
 417     *lphwnd = This->hwndWindow;
 418
 419     return S_OK;
 420 }
 421
 422 static HRESULT STDMETHODCALLTYPE Frame_ContextSensitiveHelp(IOleInPlaceFrame *iface, BOOL fEnterMode)
 423 {
 424     return E_NOTIMPL;
 425 }
 426
 427 static HRESULT STDMETHODCALLTYPE Frame_GetBorder(IOleInPlaceFrame *iface, LPRECT lprectBorder)
 428 {
 429     return E_NOTIMPL;
 430 }
 431
 432 static HRESULT STDMETHODCALLTYPE Frame_RequestBorderSpace(IOleInPlaceFrame *iface, LPCBORDERWIDTHS pborderwidths)
 433 {
 434     return E_NOTIMPL;
 435 }
 436
 437 static HRESULT STDMETHODCALLTYPE Frame_SetBorderSpace(IOleInPlaceFrame *iface, LPCBORDERWIDTHS pborderwidths)
 438 {
 439     return E_NOTIMPL;
 440 }
 441
 442 static HRESULT STDMETHODCALLTYPE Frame_SetActiveObject(IOleInPlaceFrame *iface, IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
 443 {
 444     return S_OK;
 445 }
 446
 447 static HRESULT STDMETHODCALLTYPE Frame_InsertMenus(IOleInPlaceFrame *iface, HMENU hmenuShared, LPOLEMENUGROUPWIDTHS lpMenuWidths)
 448 {
 449     return E_NOTIMPL;
 450 }
 451
 452 static HRESULT STDMETHODCALLTYPE Frame_SetMenu(IOleInPlaceFrame *iface, HMENU hmenuShared, HOLEMENU holemenu, HWND hwndActiveObject)
 453 {
 454     return S_OK;
 455 }
 456
 457 static HRESULT STDMETHODCALLTYPE Frame_RemoveMenus(IOleInPlaceFrame *iface, HMENU hmenuShared)
 458 {
 459     return E_NOTIMPL;
 460 }
 461
 462 static HRESULT STDMETHODCALLTYPE Frame_SetStatusText(IOleInPlaceFrame *iface, LPCOLESTR pszStatusText)
 463 {
 464     return S_OK;
 465 }
 466
 467 static HRESULT STDMETHODCALLTYPE Frame_EnableModeless(IOleInPlaceFrame *iface, BOOL fEnable)
 468 {
 469     return S_OK;
 470 }
 471
 472 static HRESULT STDMETHODCALLTYPE Frame_TranslateAccelerator(IOleInPlaceFrame *iface, LPMSG lpmsg, WORD wID)
 473 {
 474     return E_NOTIMPL;
 475 }
 476
 477 static const IOleInPlaceFrameVtbl MyIOleInPlaceFrameTable =
 478 {
 479     Frame_QueryInterface,
 480     Frame_AddRef,
 481     Frame_Release,
 482     Frame_GetWindow,
 483     Frame_ContextSensitiveHelp,
 484     Frame_GetBorder,
 485     Frame_RequestBorderSpace,
 486     Frame_SetBorderSpace,
 487     Frame_SetActiveObject,
 488     Frame_InsertMenus,
 489     Frame_SetMenu,
 490     Frame_RemoveMenus,
 491     Frame_SetStatusText,
 492     Frame_EnableModeless,
 493     Frame_TranslateAccelerator
 494 };
 495
 496 static HRESULT STDMETHODCALLTYPE Storage_QueryInterface(IStorage *This, REFIID riid, LPVOID *ppvObj)
 497 {
 498     return E_NOTIMPL;
 499 }
 500
 501 static ULONG STDMETHODCALLTYPE Storage_AddRef(IStorage *This)
 502 {
 503     return 1;
 504 }
 505
 506 static ULONG STDMETHODCALLTYPE Storage_Release(IStorage *This)
 507 {
 508     return 2;
 509 }
 510
 511 static HRESULT STDMETHODCALLTYPE Storage_CreateStream(IStorage *This, const WCHAR *pwcsName, DWORD grfMode, DWORD reserved1, DWORD reserved2, IStream **ppstm)
 512 {
 513     return E_NOTIMPL;
 514 }
 515
 516 static HRESULT STDMETHODCALLTYPE Storage_OpenStream(IStorage *This, const WCHAR * pwcsName, void *reserved1, DWORD grfMode, DWORD reserved2, IStream **ppstm)
 517 {
 518     return E_NOTIMPL;
 519 }
 520
 521 static HRESULT STDMETHODCALLTYPE Storage_CreateStorage(IStorage *This, const WCHAR *pwcsName, DWORD grfMode, DWORD reserved1, DWORD reserved2, IStorage **ppstg)
 522 {
 523     return E_NOTIMPL;
 524 }
 525
 526 static HRESULT STDMETHODCALLTYPE Storage_OpenStorage(IStorage *This, const WCHAR * pwcsName, IStorage * pstgPriority, DWORD grfMode, SNB snbExclude, DWORD reserved, IStorage **ppstg)
 527 {
 528     return E_NOTIMPL;
 529 }
 530
 531 static HRESULT STDMETHODCALLTYPE Storage_CopyTo(IStorage *This, DWORD ciidExclude, IID const *rgiidExclude, SNB snbExclude,IStorage *pstgDest)
 532 {
 533     return E_NOTIMPL;
 534 }
 535
 536 static HRESULT STDMETHODCALLTYPE Storage_MoveElementTo(IStorage *This, const OLECHAR *pwcsName,IStorage * pstgDest, const OLECHAR *pwcsNewName, DWORD grfFlags)
 537 {
 538     return E_NOTIMPL;
 539 }
 540
 541 static HRESULT STDMETHODCALLTYPE Storage_Commit(IStorage *This, DWORD grfCommitFlags)
 542 {
 543     return E_NOTIMPL;
 544 }
 545
 546 static HRESULT STDMETHODCALLTYPE Storage_Revert(IStorage *This)
 547 {
 548     return E_NOTIMPL;
 549 }
 550
 551 static HRESULT STDMETHODCALLTYPE Storage_EnumElements(IStorage *This, DWORD reserved1, void *reserved2, DWORD reserved3, IEnumSTATSTG **ppenum)
 552 {
 553     return E_NOTIMPL;
 554 }
 555
 556 static HRESULT STDMETHODCALLTYPE Storage_DestroyElement(IStorage *This, const OLECHAR *pwcsName)
 557 {
 558     return E_NOTIMPL;
 559 }
 560
 561 static HRESULT STDMETHODCALLTYPE Storage_RenameElement(IStorage *This, const WCHAR *pwcsOldName, const WCHAR *pwcsNewName)
 562 {
 563     return E_NOTIMPL;
 564 }
 565
 566 static HRESULT STDMETHODCALLTYPE Storage_SetElementTimes(IStorage *This, const WCHAR *pwcsName, FILETIME const *pctime, FILETIME const *patime, FILETIME const *pmtime)
 567 {
 568     return E_NOTIMPL;
 569 }
 570
 571 static HRESULT STDMETHODCALLTYPE Storage_SetClass(IStorage *This, REFCLSID clsid)
 572 {
 573     return S_OK;
 574 }
 575
 576 static HRESULT STDMETHODCALLTYPE Storage_SetStateBits(IStorage *This, DWORD grfStateBits, DWORD grfMask)
 577 {
 578     return E_NOTIMPL;
 579 }
 580
 581 static HRESULT STDMETHODCALLTYPE Storage_Stat(IStorage *This, STATSTG *pstatstg, DWORD grfStatFlag)
 582 {
 583     return E_NOTIMPL;
 584 }
 585
 586 static const IStorageVtbl MyIStorageTable =
 587 {
 588     Storage_QueryInterface,
 589     Storage_AddRef,
 590     Storage_Release,
 591     Storage_CreateStream,
 592     Storage_OpenStream,
 593     Storage_CreateStorage,
 594     Storage_OpenStorage,
 595     Storage_CopyTo,
 596     Storage_MoveElementTo,
 597     Storage_Commit,
 598     Storage_Revert,
 599     Storage_EnumElements,
 600     Storage_DestroyElement,
 601     Storage_RenameElement,
 602     Storage_SetElementTimes,
 603     Storage_SetClass,
 604     Storage_SetStateBits,
 605     Storage_Stat
 606 };
 607
 608 static IStorage MyIStorage = { &MyIStorageTable };
 609
 610 BOOL InitWebBrowser(HHInfo *info, HWND hwndParent)
 611 {
 612     IOleClientSiteImpl *iOleClientSiteImpl;
 613     IOleInPlaceObject *inplace;
 614     IOleObject *browserObject;
 615     IWebBrowser2 *webBrowser2;
 616     HRESULT hr;
 617     RECT rc;
 618
 619     iOleClientSiteImpl = heap_alloc_zero(sizeof(IOleClientSiteImpl));
 620     if (!iOleClientSiteImpl)
 621         return FALSE;
 622
 623     iOleClientSiteImpl->ref = 1;
 624     iOleClientSiteImpl->lpVtbl = &MyIOleClientSiteTable;
 625     iOleClientSiteImpl->lpvtblOleInPlaceSite = &MyIOleInPlaceSiteTable;
 626     iOleClientSiteImpl->lpvtblOleInPlaceFrame = &MyIOleInPlaceFrameTable;
 627     iOleClientSiteImpl->hwndWindow = hwndParent;
 628     iOleClientSiteImpl->lpvtblDocHostUIHandler = &MyIDocHostUIHandlerTable;
 629
 630     hr = OleCreate(&CLSID_WebBrowser, &IID_IOleObject, OLERENDER_DRAW, 0,
 631                    (IOleClientSite *)iOleClientSiteImpl, &MyIStorage,
 632                    (void **)&browserObject);
 633
 634     info->client_site = (IOleClientSite *)iOleClientSiteImpl;
 635     info->wb_object = browserObject;
 636
 637     if (FAILED(hr)) goto error;
 638
 639     /* make the browser object accessible to the IOleClientSite implementation */
 640     iOleClientSiteImpl->pBrowserObject = browserObject;
 641
 642     GetClientRect(hwndParent, &rc);
 643
 644     hr = OleSetContainedObject((struct IUnknown *)browserObject, TRUE);
 645     if (FAILED(hr)) goto error;
 646
 647     hr = IOleObject_DoVerb(browserObject, OLEIVERB_SHOW, NULL,
 648                            (IOleClientSite *)iOleClientSiteImpl,
 649                            -1, hwndParent, &rc);
 650     if (FAILED(hr)) goto error;
 651
 652     hr = IOleObject_QueryInterface(browserObject, &IID_IOleInPlaceObject, (void**)&inplace);
 653     if (FAILED(hr)) goto error;
 654
 655     IOleInPlaceObject_SetObjectRects(inplace, &rc, &rc);
 656     IOleInPlaceObject_Release(inplace);
 657
 658     hr = IOleObject_QueryInterface(browserObject, &IID_IWebBrowser2,
 659                                    (void **)&webBrowser2);
 660     if (SUCCEEDED(hr))
 661     {
 662         info->web_browser = webBrowser2;
 663         return TRUE;
 664     }
 665
 666 error:
 667     ReleaseWebBrowser(info);
 668     heap_free(iOleClientSiteImpl);
 669
 670     return FALSE;
 671 }
 672
 673 void ReleaseWebBrowser(HHInfo *info)
 674 {
 675     HRESULT hres;
 676
 677     if (info->web_browser)
 678     {
 679         IWebBrowser2_Release(info->web_browser);
 680         info->web_browser = NULL;
 681     }
 682
 683     if (info->client_site)
 684     {
 685         IOleClientSite_Release(info->client_site);
 686         info->client_site = NULL;
 687     }
 688
 689     if(info->wb_object) {
 690         IOleInPlaceSite *inplace;
 691
 692         hres = IOleObject_QueryInterface(info->wb_object, &IID_IOleInPlaceSite, (void**)&inplace);
 693         if(SUCCEEDED(hres)) {
 694             IOleInPlaceSite_OnInPlaceDeactivate(inplace);
 695             IOleInPlaceSite_Release(inplace);
 696         }
 697
 698         IOleObject_SetClientSite(info->wb_object, NULL);
 699
 700         IOleObject_Release(info->wb_object);
 701         info->wb_object = NULL;
 702     }
 703 }
 704
 705 void ResizeWebBrowser(HHInfo *info, DWORD dwWidth, DWORD dwHeight)
 706 {
 707     if (!info->web_browser)
 708         return;
 709
 710     IWebBrowser2_put_Width(info->web_browser, dwWidth);
 711     IWebBrowser2_put_Height(info->web_browser, dwHeight);
 712 }
 713
 714 void DoPageAction(HHInfo *info, DWORD dwAction)
 715 {
 716     IWebBrowser2 *pWebBrowser2 = info->web_browser;
 717
 718     if (!pWebBrowser2)
 719         return;
 720
 721     switch (dwAction)
 722     {
 723         case WB_GOBACK:
 724             IWebBrowser2_GoBack(pWebBrowser2);
 725             break;
 726         case WB_GOFORWARD:
 727             IWebBrowser2_GoForward(pWebBrowser2);
 728             break;
 729         case WB_GOHOME:
 730             IWebBrowser2_GoHome(pWebBrowser2);
 731             break;
 732         case WB_SEARCH:
 733             IWebBrowser2_GoSearch(pWebBrowser2);
 734             break;
 735         case WB_REFRESH:
 736             IWebBrowser2_Refresh(pWebBrowser2);
 737         case WB_STOP:
 738             IWebBrowser2_Stop(pWebBrowser2);
 739     }
 740 }