wined3d: Pass a wined3d_device_context to wined3d_cs_emit_blt_sub_resource().
[wine/zf.git] / dlls / hhctrl.ocx / webbrowser.c
blobe44c4ecd9de95213e688acf8878065ebc6fc8686
1 /*
2 * WebBrowser Implementation
4 * Copyright 2005 James Hawkins
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.
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.
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
21 #include "hhctrl.h"
22 #include "resource.h"
24 #include "wine/debug.h"
26 WINE_DEFAULT_DEBUG_CHANNEL(htmlhelp);
28 static inline WebBrowserContainer *impl_from_IOleClientSite(IOleClientSite *iface)
30 return CONTAINING_RECORD(iface, WebBrowserContainer, IOleClientSite_iface);
33 static HRESULT STDMETHODCALLTYPE Site_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppvObj)
35 WebBrowserContainer *This = impl_from_IOleClientSite(iface);
37 if (IsEqualIID(riid, &IID_IUnknown)) {
38 TRACE("(%p)->(IID_IUnknown %p)\n", This, ppvObj);
39 *ppvObj = &This->IOleClientSite_iface;
40 }else if(IsEqualIID(riid, &IID_IOleClientSite)) {
41 TRACE("(%p)->(IID_IOleClientSite %p)\n", This, ppvObj);
42 *ppvObj = &This->IOleClientSite_iface;
43 }else if (IsEqualIID(riid, &IID_IOleInPlaceSite)) {
44 TRACE("(%p)->(IID_IOleInPlaceSite %p)\n", This, ppvObj);
45 *ppvObj = &This->IOleInPlaceSite_iface;
46 }else if (IsEqualIID(riid, &IID_IOleInPlaceFrame)) {
47 TRACE("(%p)->(IID_IOleInPlaceFrame %p)\n", This, ppvObj);
48 *ppvObj = &This->IOleInPlaceSite_iface;
49 }else if (IsEqualIID(riid, &IID_IDocHostUIHandler)) {
50 TRACE("(%p)->(IID_IDocHostUIHandler %p)\n", This, ppvObj);
51 *ppvObj = &This->IDocHostUIHandler_iface;
52 }else {
53 TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppvObj);
54 *ppvObj = NULL;
55 return E_NOINTERFACE;
58 IUnknown_AddRef((IUnknown*)*ppvObj);
59 return S_OK;
62 static ULONG STDMETHODCALLTYPE Site_AddRef(IOleClientSite *iface)
64 WebBrowserContainer *This = impl_from_IOleClientSite(iface);
65 LONG ref = InterlockedIncrement(&This->ref);
67 TRACE("(%p) ref=%d\n", This, ref);
69 return ref;
72 static ULONG STDMETHODCALLTYPE Site_Release(IOleClientSite *iface)
74 WebBrowserContainer *This = impl_from_IOleClientSite(iface);
75 LONG ref = InterlockedDecrement(&This->ref);
77 TRACE("(%p) ref=%d\n", This, ref);
79 if(!ref) {
80 if(This->ole_obj)
81 IOleObject_Release(This->ole_obj);
82 if(This->web_browser)
83 IWebBrowser2_Release(This->web_browser);
84 heap_free(This);
87 return ref;
90 static HRESULT STDMETHODCALLTYPE Site_SaveObject(IOleClientSite *iface)
92 return E_NOTIMPL;
95 static HRESULT STDMETHODCALLTYPE Site_GetMoniker(IOleClientSite *iface, DWORD dwAssign, DWORD dwWhichMoniker, IMoniker **ppmk)
97 return E_NOTIMPL;
100 static HRESULT STDMETHODCALLTYPE Site_GetContainer(IOleClientSite *iface, LPOLECONTAINER *ppContainer)
102 *ppContainer = NULL;
104 return E_NOINTERFACE;
107 static HRESULT STDMETHODCALLTYPE Site_ShowObject(IOleClientSite *iface)
109 return NOERROR;
112 static HRESULT STDMETHODCALLTYPE Site_OnShowWindow(IOleClientSite *iface, BOOL fShow)
114 return E_NOTIMPL;
117 static HRESULT STDMETHODCALLTYPE Site_RequestNewObjectLayout(IOleClientSite *iface)
119 return E_NOTIMPL;
122 static const IOleClientSiteVtbl OleClientSiteVtbl =
124 Site_QueryInterface,
125 Site_AddRef,
126 Site_Release,
127 Site_SaveObject,
128 Site_GetMoniker,
129 Site_GetContainer,
130 Site_ShowObject,
131 Site_OnShowWindow,
132 Site_RequestNewObjectLayout
135 static inline WebBrowserContainer *impl_from_IDocHostUIHandler(IDocHostUIHandler *iface)
137 return CONTAINING_RECORD(iface, WebBrowserContainer, IDocHostUIHandler_iface);
140 static HRESULT STDMETHODCALLTYPE UI_QueryInterface(IDocHostUIHandler *iface, REFIID riid, LPVOID *ppvObj)
142 WebBrowserContainer *This = impl_from_IDocHostUIHandler(iface);
144 return IOleClientSite_QueryInterface(&This->IOleClientSite_iface, riid, ppvObj);
147 static ULONG STDMETHODCALLTYPE UI_AddRef(IDocHostUIHandler *iface)
149 WebBrowserContainer *This = impl_from_IDocHostUIHandler(iface);
151 return IOleClientSite_AddRef(&This->IOleClientSite_iface);
154 static ULONG STDMETHODCALLTYPE UI_Release(IDocHostUIHandler * iface)
156 WebBrowserContainer *This = impl_from_IDocHostUIHandler(iface);
158 return IOleClientSite_Release(&This->IOleClientSite_iface);
161 static HRESULT STDMETHODCALLTYPE UI_ShowContextMenu(IDocHostUIHandler *iface, DWORD dwID, POINT *ppt, IUnknown *pcmdtReserved, IDispatch *pdispReserved)
163 WebBrowserContainer *This = impl_from_IDocHostUIHandler(iface);
164 DWORD cmdid, menu_id = 0;
165 HMENU menu, submenu;
167 TRACE("(%p)->(%d %s)\n", This, dwID, wine_dbgstr_point(ppt));
169 menu = LoadMenuW(hhctrl_hinstance, MAKEINTRESOURCEW(MENU_WEBBROWSER));
170 if (!menu)
171 return S_OK;
173 /* FIXME: Support more menu types. */
174 if(dwID == CONTEXT_MENU_TEXTSELECT)
175 menu_id = 1;
177 submenu = GetSubMenu(menu, menu_id);
179 cmdid = TrackPopupMenu(submenu, TPM_LEFTALIGN | TPM_RIGHTBUTTON | TPM_RETURNCMD,
180 ppt->x, ppt->y, 0, This->hwndWindow, NULL);
181 DestroyMenu(menu);
183 switch(cmdid) {
184 case IDTB_BACK:
185 DoPageAction(This, WB_GOBACK);
186 break;
187 case IDTB_FORWARD:
188 DoPageAction(This, WB_GOFORWARD);
189 break;
190 case MIID_SELECTALL:
191 IWebBrowser2_ExecWB(This->web_browser, OLECMDID_SELECTALL, 0, NULL, NULL);
192 break;
193 case MIID_VIEWSOURCE:
194 FIXME("View source\n");
195 break;
196 case IDTB_PRINT:
197 DoPageAction(This, WB_PRINT);
198 break;
199 case IDTB_REFRESH:
200 DoPageAction(This, WB_REFRESH);
201 break;
202 case MIID_PROPERTIES:
203 FIXME("Properties\n");
204 break;
205 case MIID_COPY:
206 IWebBrowser2_ExecWB(This->web_browser, OLECMDID_COPY, 0, NULL, NULL);
207 break;
208 case MIID_PASTE:
209 IWebBrowser2_ExecWB(This->web_browser, OLECMDID_PASTE, 0, NULL, NULL);
210 break;
211 case MIID_CUT:
212 IWebBrowser2_ExecWB(This->web_browser, OLECMDID_CUT, 0, NULL, NULL);
213 break;
216 return S_OK;
219 static HRESULT STDMETHODCALLTYPE UI_GetHostInfo(IDocHostUIHandler *iface, DOCHOSTUIINFO *pInfo)
221 pInfo->cbSize = sizeof(DOCHOSTUIINFO);
222 pInfo->dwFlags = DOCHOSTUIFLAG_NO3DBORDER;
223 pInfo->dwDoubleClick = DOCHOSTUIDBLCLK_DEFAULT;
225 return S_OK;
228 static HRESULT STDMETHODCALLTYPE UI_ShowUI(IDocHostUIHandler *iface, DWORD dwID, IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget, IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
230 return S_OK;
233 static HRESULT STDMETHODCALLTYPE UI_HideUI(IDocHostUIHandler *iface)
235 return S_OK;
238 static HRESULT STDMETHODCALLTYPE UI_UpdateUI(IDocHostUIHandler *iface)
240 return S_OK;
243 static HRESULT STDMETHODCALLTYPE UI_EnableModeless(IDocHostUIHandler *iface, BOOL fEnable)
245 return S_OK;
248 static HRESULT STDMETHODCALLTYPE UI_OnDocWindowActivate(IDocHostUIHandler *iface, BOOL fActivate)
250 return S_OK;
253 static HRESULT STDMETHODCALLTYPE UI_OnFrameWindowActivate(IDocHostUIHandler *iface, BOOL fActivate)
255 return S_OK;
258 static HRESULT STDMETHODCALLTYPE UI_ResizeBorder(IDocHostUIHandler *iface, LPCRECT prcBorder, IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
260 return S_OK;
263 static HRESULT STDMETHODCALLTYPE UI_TranslateAccelerator(IDocHostUIHandler *iface, LPMSG lpMsg, const GUID *pguidCmdGroup, DWORD nCmdID)
265 return S_FALSE;
268 static HRESULT STDMETHODCALLTYPE UI_GetOptionKeyPath(IDocHostUIHandler *iface, LPOLESTR *pchKey, DWORD dw)
270 return S_FALSE;
273 static HRESULT STDMETHODCALLTYPE UI_GetDropTarget(IDocHostUIHandler *iface, IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
275 return S_FALSE;
278 static HRESULT STDMETHODCALLTYPE UI_GetExternal(IDocHostUIHandler *iface, IDispatch **ppDispatch)
280 *ppDispatch = NULL;
281 return S_FALSE;
284 static HRESULT STDMETHODCALLTYPE UI_TranslateUrl(IDocHostUIHandler *iface, DWORD dwTranslate, OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
286 *ppchURLOut = NULL;
287 return S_FALSE;
290 static HRESULT STDMETHODCALLTYPE UI_FilterDataObject(IDocHostUIHandler *iface, IDataObject *pDO, IDataObject **ppDORet)
292 *ppDORet = NULL;
293 return S_FALSE;
296 static const IDocHostUIHandlerVtbl DocHostUIHandlerVtbl =
298 UI_QueryInterface,
299 UI_AddRef,
300 UI_Release,
301 UI_ShowContextMenu,
302 UI_GetHostInfo,
303 UI_ShowUI,
304 UI_HideUI,
305 UI_UpdateUI,
306 UI_EnableModeless,
307 UI_OnDocWindowActivate,
308 UI_OnFrameWindowActivate,
309 UI_ResizeBorder,
310 UI_TranslateAccelerator,
311 UI_GetOptionKeyPath,
312 UI_GetDropTarget,
313 UI_GetExternal,
314 UI_TranslateUrl,
315 UI_FilterDataObject
318 static inline WebBrowserContainer *impl_from_IOleInPlaceSite(IOleInPlaceSite *iface)
320 return CONTAINING_RECORD(iface, WebBrowserContainer, IOleInPlaceSite_iface);
323 static HRESULT STDMETHODCALLTYPE InPlace_QueryInterface(IOleInPlaceSite *iface, REFIID riid, LPVOID *ppvObj)
325 WebBrowserContainer *This = impl_from_IOleInPlaceSite(iface);
327 return IOleClientSite_QueryInterface(&This->IOleClientSite_iface, riid, ppvObj);
330 static ULONG STDMETHODCALLTYPE InPlace_AddRef(IOleInPlaceSite *iface)
332 WebBrowserContainer *This = impl_from_IOleInPlaceSite(iface);
334 return IOleClientSite_AddRef(&This->IOleClientSite_iface);
337 static ULONG STDMETHODCALLTYPE InPlace_Release(IOleInPlaceSite *iface)
339 WebBrowserContainer *This = impl_from_IOleInPlaceSite(iface);
341 return IOleClientSite_Release(&This->IOleClientSite_iface);
344 static HRESULT STDMETHODCALLTYPE InPlace_GetWindow(IOleInPlaceSite *iface, HWND *lphwnd)
346 WebBrowserContainer *This = impl_from_IOleInPlaceSite(iface);
348 *lphwnd = This->hwndWindow;
349 return S_OK;
352 static HRESULT STDMETHODCALLTYPE InPlace_ContextSensitiveHelp(IOleInPlaceSite *iface, BOOL fEnterMode)
354 return E_NOTIMPL;
357 static HRESULT STDMETHODCALLTYPE InPlace_CanInPlaceActivate(IOleInPlaceSite *iface)
359 return S_OK;
362 static HRESULT STDMETHODCALLTYPE InPlace_OnInPlaceActivate(IOleInPlaceSite *iface)
364 return S_OK;
367 static HRESULT STDMETHODCALLTYPE InPlace_OnUIActivate(IOleInPlaceSite *iface)
369 return S_OK;
372 static HRESULT STDMETHODCALLTYPE InPlace_GetWindowContext(IOleInPlaceSite *iface, LPOLEINPLACEFRAME *lplpFrame, LPOLEINPLACEUIWINDOW *lplpDoc, LPRECT lprcPosRect, LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
374 WebBrowserContainer *This = impl_from_IOleInPlaceSite(iface);
376 *lplpFrame = &This->IOleInPlaceFrame_iface;
377 IOleInPlaceFrame_AddRef(&This->IOleInPlaceFrame_iface);
379 *lplpDoc = NULL;
381 lpFrameInfo->fMDIApp = FALSE;
382 lpFrameInfo->hwndFrame = This->hwndWindow;
383 lpFrameInfo->haccel = NULL;
384 lpFrameInfo->cAccelEntries = 0;
386 return S_OK;
389 static HRESULT STDMETHODCALLTYPE InPlace_Scroll(IOleInPlaceSite *iface, SIZE scrollExtent)
391 return E_NOTIMPL;
394 static HRESULT STDMETHODCALLTYPE InPlace_OnUIDeactivate(IOleInPlaceSite *iface, BOOL fUndoable)
396 return S_OK;
399 static HRESULT STDMETHODCALLTYPE InPlace_OnInPlaceDeactivate(IOleInPlaceSite *iface)
401 return S_OK;
404 static HRESULT STDMETHODCALLTYPE InPlace_DiscardUndoState(IOleInPlaceSite *iface)
406 return E_NOTIMPL;
409 static HRESULT STDMETHODCALLTYPE InPlace_DeactivateAndUndo(IOleInPlaceSite *iface)
411 return E_NOTIMPL;
414 static HRESULT STDMETHODCALLTYPE InPlace_OnPosRectChange(IOleInPlaceSite *iface, LPCRECT lprcPosRect)
416 WebBrowserContainer *This = impl_from_IOleInPlaceSite(iface);
417 IOleInPlaceObject *inplace;
419 if (IOleObject_QueryInterface(This->ole_obj, &IID_IOleInPlaceObject,
420 (void **)&inplace) == S_OK)
422 IOleInPlaceObject_SetObjectRects(inplace, lprcPosRect, lprcPosRect);
423 IOleInPlaceObject_Release(inplace);
426 return S_OK;
429 static const IOleInPlaceSiteVtbl OleInPlaceSiteVtbl =
431 InPlace_QueryInterface,
432 InPlace_AddRef,
433 InPlace_Release,
434 InPlace_GetWindow,
435 InPlace_ContextSensitiveHelp,
436 InPlace_CanInPlaceActivate,
437 InPlace_OnInPlaceActivate,
438 InPlace_OnUIActivate,
439 InPlace_GetWindowContext,
440 InPlace_Scroll,
441 InPlace_OnUIDeactivate,
442 InPlace_OnInPlaceDeactivate,
443 InPlace_DiscardUndoState,
444 InPlace_DeactivateAndUndo,
445 InPlace_OnPosRectChange
448 static inline WebBrowserContainer *impl_from_IOleInPlaceFrame(IOleInPlaceFrame *iface)
450 return CONTAINING_RECORD(iface, WebBrowserContainer, IOleInPlaceFrame_iface);
453 static HRESULT STDMETHODCALLTYPE Frame_QueryInterface(IOleInPlaceFrame *iface, REFIID riid, LPVOID *ppvObj)
455 WebBrowserContainer *This = impl_from_IOleInPlaceFrame(iface);
457 return IOleClientSite_QueryInterface(&This->IOleClientSite_iface, riid, ppvObj);
460 static ULONG STDMETHODCALLTYPE Frame_AddRef(IOleInPlaceFrame *iface)
462 WebBrowserContainer *This = impl_from_IOleInPlaceFrame(iface);
464 return IOleClientSite_AddRef(&This->IOleClientSite_iface);
467 static ULONG STDMETHODCALLTYPE Frame_Release(IOleInPlaceFrame *iface)
469 WebBrowserContainer *This = impl_from_IOleInPlaceFrame(iface);
471 return IOleClientSite_Release(&This->IOleClientSite_iface);
474 static HRESULT STDMETHODCALLTYPE Frame_GetWindow(IOleInPlaceFrame *iface, HWND *lphwnd)
476 WebBrowserContainer *This = impl_from_IOleInPlaceFrame(iface);
478 *lphwnd = This->hwndWindow;
479 return S_OK;
482 static HRESULT STDMETHODCALLTYPE Frame_ContextSensitiveHelp(IOleInPlaceFrame *iface, BOOL fEnterMode)
484 return E_NOTIMPL;
487 static HRESULT STDMETHODCALLTYPE Frame_GetBorder(IOleInPlaceFrame *iface, LPRECT lprectBorder)
489 return E_NOTIMPL;
492 static HRESULT STDMETHODCALLTYPE Frame_RequestBorderSpace(IOleInPlaceFrame *iface, LPCBORDERWIDTHS pborderwidths)
494 return E_NOTIMPL;
497 static HRESULT STDMETHODCALLTYPE Frame_SetBorderSpace(IOleInPlaceFrame *iface, LPCBORDERWIDTHS pborderwidths)
499 return E_NOTIMPL;
502 static HRESULT STDMETHODCALLTYPE Frame_SetActiveObject(IOleInPlaceFrame *iface, IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
504 return S_OK;
507 static HRESULT STDMETHODCALLTYPE Frame_InsertMenus(IOleInPlaceFrame *iface, HMENU hmenuShared, LPOLEMENUGROUPWIDTHS lpMenuWidths)
509 return E_NOTIMPL;
512 static HRESULT STDMETHODCALLTYPE Frame_SetMenu(IOleInPlaceFrame *iface, HMENU hmenuShared, HOLEMENU holemenu, HWND hwndActiveObject)
514 return S_OK;
517 static HRESULT STDMETHODCALLTYPE Frame_RemoveMenus(IOleInPlaceFrame *iface, HMENU hmenuShared)
519 return E_NOTIMPL;
522 static HRESULT STDMETHODCALLTYPE Frame_SetStatusText(IOleInPlaceFrame *iface, LPCOLESTR pszStatusText)
524 return S_OK;
527 static HRESULT STDMETHODCALLTYPE Frame_EnableModeless(IOleInPlaceFrame *iface, BOOL fEnable)
529 return S_OK;
532 static HRESULT STDMETHODCALLTYPE Frame_TranslateAccelerator(IOleInPlaceFrame *iface, LPMSG lpmsg, WORD wID)
534 return E_NOTIMPL;
537 static const IOleInPlaceFrameVtbl OleInPlaceFrameVtbl =
539 Frame_QueryInterface,
540 Frame_AddRef,
541 Frame_Release,
542 Frame_GetWindow,
543 Frame_ContextSensitiveHelp,
544 Frame_GetBorder,
545 Frame_RequestBorderSpace,
546 Frame_SetBorderSpace,
547 Frame_SetActiveObject,
548 Frame_InsertMenus,
549 Frame_SetMenu,
550 Frame_RemoveMenus,
551 Frame_SetStatusText,
552 Frame_EnableModeless,
553 Frame_TranslateAccelerator
556 static HRESULT STDMETHODCALLTYPE Storage_QueryInterface(IStorage *This, REFIID riid, LPVOID *ppvObj)
558 return E_NOTIMPL;
561 static ULONG STDMETHODCALLTYPE Storage_AddRef(IStorage *This)
563 return 1;
566 static ULONG STDMETHODCALLTYPE Storage_Release(IStorage *This)
568 return 2;
571 static HRESULT STDMETHODCALLTYPE Storage_CreateStream(IStorage *This, const WCHAR *pwcsName, DWORD grfMode, DWORD reserved1, DWORD reserved2, IStream **ppstm)
573 return E_NOTIMPL;
576 static HRESULT STDMETHODCALLTYPE Storage_OpenStream(IStorage *This, const WCHAR * pwcsName, void *reserved1, DWORD grfMode, DWORD reserved2, IStream **ppstm)
578 return E_NOTIMPL;
581 static HRESULT STDMETHODCALLTYPE Storage_CreateStorage(IStorage *This, const WCHAR *pwcsName, DWORD grfMode, DWORD reserved1, DWORD reserved2, IStorage **ppstg)
583 return E_NOTIMPL;
586 static HRESULT STDMETHODCALLTYPE Storage_OpenStorage(IStorage *This, const WCHAR * pwcsName, IStorage * pstgPriority, DWORD grfMode, SNB snbExclude, DWORD reserved, IStorage **ppstg)
588 return E_NOTIMPL;
591 static HRESULT STDMETHODCALLTYPE Storage_CopyTo(IStorage *This, DWORD ciidExclude, IID const *rgiidExclude, SNB snbExclude,IStorage *pstgDest)
593 return E_NOTIMPL;
596 static HRESULT STDMETHODCALLTYPE Storage_MoveElementTo(IStorage *This, const OLECHAR *pwcsName,IStorage * pstgDest, const OLECHAR *pwcsNewName, DWORD grfFlags)
598 return E_NOTIMPL;
601 static HRESULT STDMETHODCALLTYPE Storage_Commit(IStorage *This, DWORD grfCommitFlags)
603 return E_NOTIMPL;
606 static HRESULT STDMETHODCALLTYPE Storage_Revert(IStorage *This)
608 return E_NOTIMPL;
611 static HRESULT STDMETHODCALLTYPE Storage_EnumElements(IStorage *This, DWORD reserved1, void *reserved2, DWORD reserved3, IEnumSTATSTG **ppenum)
613 return E_NOTIMPL;
616 static HRESULT STDMETHODCALLTYPE Storage_DestroyElement(IStorage *This, const OLECHAR *pwcsName)
618 return E_NOTIMPL;
621 static HRESULT STDMETHODCALLTYPE Storage_RenameElement(IStorage *This, const WCHAR *pwcsOldName, const WCHAR *pwcsNewName)
623 return E_NOTIMPL;
626 static HRESULT STDMETHODCALLTYPE Storage_SetElementTimes(IStorage *This, const WCHAR *pwcsName, FILETIME const *pctime, FILETIME const *patime, FILETIME const *pmtime)
628 return E_NOTIMPL;
631 static HRESULT STDMETHODCALLTYPE Storage_SetClass(IStorage *This, REFCLSID clsid)
633 return S_OK;
636 static HRESULT STDMETHODCALLTYPE Storage_SetStateBits(IStorage *This, DWORD grfStateBits, DWORD grfMask)
638 return E_NOTIMPL;
641 static HRESULT STDMETHODCALLTYPE Storage_Stat(IStorage *This, STATSTG *pstatstg, DWORD grfStatFlag)
643 return E_NOTIMPL;
646 static const IStorageVtbl MyIStorageTable =
648 Storage_QueryInterface,
649 Storage_AddRef,
650 Storage_Release,
651 Storage_CreateStream,
652 Storage_OpenStream,
653 Storage_CreateStorage,
654 Storage_OpenStorage,
655 Storage_CopyTo,
656 Storage_MoveElementTo,
657 Storage_Commit,
658 Storage_Revert,
659 Storage_EnumElements,
660 Storage_DestroyElement,
661 Storage_RenameElement,
662 Storage_SetElementTimes,
663 Storage_SetClass,
664 Storage_SetStateBits,
665 Storage_Stat
668 static IStorage MyIStorage = { &MyIStorageTable };
670 BOOL InitWebBrowser(HHInfo *info, HWND hwndParent)
672 WebBrowserContainer *container;
673 IOleInPlaceObject *inplace;
674 HRESULT hr;
675 RECT rc;
677 container = heap_alloc_zero(sizeof(*container));
678 if (!container)
679 return FALSE;
681 container->IOleClientSite_iface.lpVtbl = &OleClientSiteVtbl;
682 container->IOleInPlaceSite_iface.lpVtbl = &OleInPlaceSiteVtbl;
683 container->IOleInPlaceFrame_iface.lpVtbl = &OleInPlaceFrameVtbl;
684 container->IDocHostUIHandler_iface.lpVtbl = &DocHostUIHandlerVtbl;
685 container->ref = 1;
686 container->hwndWindow = hwndParent;
688 info->web_browser = container;
690 hr = OleCreate(&CLSID_WebBrowser, &IID_IOleObject, OLERENDER_DRAW, 0,
691 &container->IOleClientSite_iface, &MyIStorage,
692 (void **)&container->ole_obj);
694 if (FAILED(hr)) goto error;
696 GetClientRect(hwndParent, &rc);
698 hr = OleSetContainedObject((struct IUnknown *)container->ole_obj, TRUE);
699 if (FAILED(hr)) goto error;
701 hr = IOleObject_DoVerb(container->ole_obj, OLEIVERB_SHOW, NULL,
702 &container->IOleClientSite_iface, -1, hwndParent, &rc);
703 if (FAILED(hr)) goto error;
705 hr = IOleObject_QueryInterface(container->ole_obj, &IID_IOleInPlaceObject, (void**)&inplace);
706 if (FAILED(hr)) goto error;
708 IOleInPlaceObject_SetObjectRects(inplace, &rc, &rc);
709 IOleInPlaceObject_Release(inplace);
711 hr = IOleObject_QueryInterface(container->ole_obj, &IID_IWebBrowser2, (void **)&container->web_browser);
712 if (SUCCEEDED(hr))
713 return TRUE;
715 error:
716 ReleaseWebBrowser(info);
717 return FALSE;
720 void ReleaseWebBrowser(HHInfo *info)
722 WebBrowserContainer *container = info->web_browser;
723 HRESULT hres;
725 if(!container)
726 return;
728 if(container->ole_obj) {
729 IOleInPlaceSite *inplace;
731 hres = IOleObject_QueryInterface(container->ole_obj, &IID_IOleInPlaceSite, (void**)&inplace);
732 if(SUCCEEDED(hres)) {
733 IOleInPlaceSite_OnInPlaceDeactivate(inplace);
734 IOleInPlaceSite_Release(inplace);
737 IOleObject_SetClientSite(container->ole_obj, NULL);
740 info->web_browser = NULL;
741 IOleClientSite_Release(&container->IOleClientSite_iface);
744 void ResizeWebBrowser(HHInfo *info, DWORD dwWidth, DWORD dwHeight)
746 if (!info->web_browser)
747 return;
749 IWebBrowser2_put_Width(info->web_browser->web_browser, dwWidth);
750 IWebBrowser2_put_Height(info->web_browser->web_browser, dwHeight);
753 void DoPageAction(WebBrowserContainer *container, DWORD dwAction)
755 if (!container || !container->web_browser)
756 return;
758 switch (dwAction)
760 case WB_GOBACK:
761 IWebBrowser2_GoBack(container->web_browser);
762 break;
763 case WB_GOFORWARD:
764 IWebBrowser2_GoForward(container->web_browser);
765 break;
766 case WB_GOHOME:
767 IWebBrowser2_GoHome(container->web_browser);
768 break;
769 case WB_SEARCH:
770 IWebBrowser2_GoSearch(container->web_browser);
771 break;
772 case WB_REFRESH:
773 IWebBrowser2_Refresh(container->web_browser);
774 break;
775 case WB_STOP:
776 IWebBrowser2_Stop(container->web_browser);
777 break;
778 case WB_PRINT:
779 IWebBrowser2_ExecWB(container->web_browser, OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER, 0, 0);
780 break;