2 * Implementation of IWebBrowser interface for WebBrowser control
4 * Copyright 2001 John R. Sheets (for CodeWeavers)
5 * Copyright 2005 Jacek Caban
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.
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.
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
22 #include "wine/debug.h"
26 WINE_DEFAULT_DEBUG_CHANNEL(shdocvw
);
28 /**********************************************************************
29 * Implement the IWebBrowser interface
32 #define WEBBROWSER_THIS(iface) DEFINE_THIS(WebBrowser, WebBrowser2, iface)
34 static HRESULT WINAPI
WebBrowser_QueryInterface(IWebBrowser2
*iface
, REFIID riid
, LPVOID
*ppv
)
36 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
42 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
43 TRACE("(%p)->(IID_IUnknown %p)\n", This
, ppv
);
44 *ppv
= WEBBROWSER(This
);
45 }else if(IsEqualGUID(&IID_IDispatch
, riid
)) {
46 TRACE("(%p)->(IID_IDispatch %p)\n", This
, ppv
);
47 *ppv
= WEBBROWSER(This
);
48 }else if(IsEqualGUID(&IID_IWebBrowser
, riid
)) {
49 TRACE("(%p)->(IID_IWebBrowser %p)\n", This
, ppv
);
50 *ppv
= WEBBROWSER(This
);
51 }else if(IsEqualGUID(&IID_IWebBrowserApp
, riid
)) {
52 TRACE("(%p)->(IID_IWebBrowserApp %p)\n", This
, ppv
);
53 *ppv
= WEBBROWSER(This
);
54 }else if(IsEqualGUID(&IID_IWebBrowser2
, riid
)) {
55 TRACE("(%p)->(IID_IWebBrowser2 %p)\n", This
, ppv
);
56 *ppv
= WEBBROWSER(This
);
57 }else if(IsEqualGUID(&IID_IOleObject
, riid
)) {
58 TRACE("(%p)->(IID_IOleObject %p)\n", This
, ppv
);
60 }else if(IsEqualGUID(&IID_IOleWindow
, riid
)) {
61 TRACE("(%p)->(IID_IOleWindow %p)\n", This
, ppv
);
62 *ppv
= INPLACEOBJ(This
);
63 }else if(IsEqualGUID (&IID_IOleInPlaceObject
, riid
)) {
64 TRACE("(%p)->(IID_IOleInPlaceObject %p)\n", This
, ppv
);
65 *ppv
= INPLACEOBJ(This
);
66 }else if(IsEqualGUID(&IID_IOleControl
, riid
)) {
67 TRACE("(%p)->(IID_IOleControl %p)\n", This
, ppv
);
69 }else if(IsEqualGUID(&IID_IPersist
, riid
)) {
70 TRACE("(%p)->(IID_IPersist %p)\n", This
, ppv
);
71 *ppv
= PERSTORAGE(This
);
72 }else if(IsEqualGUID(&IID_IPersistStorage
, riid
)) {
73 TRACE("(%p)->(IID_IPersistStorage %p)\n", This
, ppv
);
74 *ppv
= PERSTORAGE(This
);
75 }else if(IsEqualGUID(&IID_IPersistMemory
, riid
)) {
76 TRACE("(%p)->(IID_IPersistStorage %p)\n", This
, ppv
);
77 *ppv
= PERMEMORY(This
);
78 }else if(IsEqualGUID (&IID_IPersistStreamInit
, riid
)) {
79 TRACE("(%p)->(IID_IPersistStreamInit %p)\n", This
, ppv
);
80 *ppv
= PERSTRINIT(This
);
81 }else if(IsEqualGUID(&IID_IProvideClassInfo
, riid
)) {
82 TRACE("(%p)->(IID_IProvideClassInfo %p)\n", This
, ppv
);
83 *ppv
= CLASSINFO(This
);
84 }else if(IsEqualGUID(&IID_IProvideClassInfo2
, riid
)) {
85 TRACE("(%p)->(IID_IProvideClassInfo2 %p)\n", This
, ppv
);
86 *ppv
= CLASSINFO(This
);
87 }else if(IsEqualGUID(&IID_IConnectionPointContainer
, riid
)) {
88 TRACE("(%p)->(IID_IConnectionPointContainer %p)\n", This
, ppv
);
89 *ppv
= CONPTCONT(&This
->doc_host
.cps
);
90 }else if(IsEqualGUID(&IID_IViewObject
, riid
)) {
91 TRACE("(%p)->(IID_IViewObject %p)\n", This
, ppv
);
93 }else if(IsEqualGUID(&IID_IViewObject2
, riid
)) {
94 TRACE("(%p)->(IID_IViewObject2 %p)\n", This
, ppv
);
95 *ppv
= VIEWOBJ2(This
);
96 }else if(IsEqualGUID(&IID_IOleInPlaceActiveObject
, riid
)) {
97 TRACE("(%p)->(IID_IOleInPlaceActiveObject %p)\n", This
, ppv
);
98 *ppv
= ACTIVEOBJ(This
);
99 }else if(IsEqualGUID(&IID_IOleCommandTarget
, riid
)) {
100 TRACE("(%p)->(IID_IOleCommandTarget %p)\n", This
, ppv
);
102 }else if(IsEqualGUID(&IID_IHlinkFrame
, riid
)) {
103 TRACE("(%p)->(IID_IHlinkFrame %p)\n", This
, ppv
);
104 *ppv
= HLINKFRAME(This
);
105 }else if(IsEqualGUID(&IID_IQuickActivate
, riid
)) {
106 TRACE("(%p)->(IID_IQuickActivate %p) returning NULL\n", This
, ppv
);
107 return E_NOINTERFACE
;
108 }else if(IsEqualGUID(&IID_IRunnableObject
, riid
)) {
109 TRACE("(%p)->(IID_IRunnableObject %p) returning NULL\n", This
, ppv
);
110 return E_NOINTERFACE
;
114 IUnknown_AddRef((IUnknown
*)*ppv
);
118 FIXME("(%p)->(%s %p) interface not supported\n", This
, debugstr_guid(riid
), ppv
);
119 return E_NOINTERFACE
;
122 static ULONG WINAPI
WebBrowser_AddRef(IWebBrowser2
*iface
)
124 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
125 LONG ref
= InterlockedIncrement(&This
->ref
);
126 TRACE("(%p) ref=%d\n", This
, ref
);
130 static ULONG WINAPI
WebBrowser_Release(IWebBrowser2
*iface
)
132 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
133 LONG ref
= InterlockedDecrement(&This
->ref
);
135 TRACE("(%p) ref=%d\n", This
, ref
);
138 if(This
->doc_host
.document
)
139 IUnknown_Release(This
->doc_host
.document
);
141 DocHost_Release(&This
->doc_host
);
143 WebBrowser_OleObject_Destroy(This
);
146 SHDOCVW_UnlockModule();
152 /* IDispatch methods */
153 static HRESULT WINAPI
WebBrowser_GetTypeInfoCount(IWebBrowser2
*iface
, UINT
*pctinfo
)
155 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
156 FIXME("(%p)->(%p)\n", This
, pctinfo
);
160 static HRESULT WINAPI
WebBrowser_GetTypeInfo(IWebBrowser2
*iface
, UINT iTInfo
, LCID lcid
,
163 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
164 FIXME("(%p)->(%d %d %p)\n", This
, iTInfo
, lcid
, ppTInfo
);
168 static HRESULT WINAPI
WebBrowser_GetIDsOfNames(IWebBrowser2
*iface
, REFIID riid
,
169 LPOLESTR
*rgszNames
, UINT cNames
,
170 LCID lcid
, DISPID
*rgDispId
)
172 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
173 FIXME("(%p)->(%s %p %d %d %p)\n", This
, debugstr_guid(riid
), rgszNames
, cNames
,
178 static HRESULT WINAPI
WebBrowser_Invoke(IWebBrowser2
*iface
, DISPID dispIdMember
,
179 REFIID riid
, LCID lcid
, WORD wFlags
,
180 DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
,
181 EXCEPINFO
*pExepInfo
, UINT
*puArgErr
)
183 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
187 TRACE("(%p)->(%d %s %d %08x %p %p %p %p)\n", This
, dispIdMember
, debugstr_guid(riid
),
188 lcid
, wFlags
, pDispParams
, pVarResult
, pExepInfo
, puArgErr
);
190 hres
= get_typeinfo(&typeinfo
);
194 return ITypeInfo_Invoke(typeinfo
, WEBBROWSER2(This
), dispIdMember
, wFlags
, pDispParams
,
195 pVarResult
, pExepInfo
, puArgErr
);
198 /* IWebBrowser methods */
199 static HRESULT WINAPI
WebBrowser_GoBack(IWebBrowser2
*iface
)
201 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
202 FIXME("(%p)\n", This
);
206 static HRESULT WINAPI
WebBrowser_GoForward(IWebBrowser2
*iface
)
208 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
209 FIXME("(%p)\n", This
);
213 static HRESULT WINAPI
WebBrowser_GoHome(IWebBrowser2
*iface
)
215 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
216 TRACE("(%p)\n", This
);
217 return go_home(&This
->doc_host
);
220 static HRESULT WINAPI
WebBrowser_GoSearch(IWebBrowser2
*iface
)
222 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
223 FIXME("(%p)\n", This
);
227 static HRESULT WINAPI
WebBrowser_Navigate(IWebBrowser2
*iface
, BSTR szUrl
,
228 VARIANT
*Flags
, VARIANT
*TargetFrameName
,
229 VARIANT
*PostData
, VARIANT
*Headers
)
231 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
233 TRACE("(%p)->(%s %p %p %p %p)\n", This
, debugstr_w(szUrl
), Flags
, TargetFrameName
,
236 return navigate_url(&This
->doc_host
, szUrl
, Flags
, TargetFrameName
, PostData
, Headers
);
239 static HRESULT WINAPI
WebBrowser_Refresh(IWebBrowser2
*iface
)
241 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
242 FIXME("(%p)\n", This
);
246 static HRESULT WINAPI
WebBrowser_Refresh2(IWebBrowser2
*iface
, VARIANT
*Level
)
248 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
249 FIXME("(%p)->(%p)\n", This
, Level
);
253 static HRESULT WINAPI
WebBrowser_Stop(IWebBrowser2
*iface
)
255 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
256 FIXME("(%p)\n", This
);
260 static HRESULT WINAPI
WebBrowser_get_Application(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
262 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
263 FIXME("(%p)->(%p)\n", This
, ppDisp
);
267 static HRESULT WINAPI
WebBrowser_get_Parent(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
269 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
270 FIXME("(%p)->(%p)\n", This
, ppDisp
);
274 static HRESULT WINAPI
WebBrowser_get_Container(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
276 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
277 FIXME("(%p)->(%p)\n", This
, ppDisp
);
281 static HRESULT WINAPI
WebBrowser_get_Document(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
283 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
285 TRACE("(%p)->(%p)\n", This
, ppDisp
);
288 if(This
->doc_host
.document
)
289 IUnknown_QueryInterface(This
->doc_host
.document
, &IID_IDispatch
, (void**)ppDisp
);
294 static HRESULT WINAPI
WebBrowser_get_TopLevelContainer(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
296 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
297 FIXME("(%p)->(%p)\n", This
, pBool
);
301 static HRESULT WINAPI
WebBrowser_get_Type(IWebBrowser2
*iface
, BSTR
*Type
)
303 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
304 FIXME("(%p)->(%p)\n", This
, Type
);
308 static HRESULT WINAPI
WebBrowser_get_Left(IWebBrowser2
*iface
, long *pl
)
310 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
312 TRACE("(%p)->(%p)\n", This
, pl
);
314 *pl
= This
->pos_rect
.left
;
318 static HRESULT WINAPI
WebBrowser_put_Left(IWebBrowser2
*iface
, long Left
)
320 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
323 TRACE("(%p)->(%ld)\n", This
, Left
);
328 memcpy(&rect
, &This
->pos_rect
, sizeof(RECT
));
331 /* We don't really change the window position here.
332 * We just notify the embedder that he should do so. */
333 return IOleInPlaceSite_OnPosRectChange(This
->inplace
, &rect
);
336 static HRESULT WINAPI
WebBrowser_get_Top(IWebBrowser2
*iface
, long *pl
)
338 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
340 TRACE("(%p)->(%p)\n", This
, pl
);
342 *pl
= This
->pos_rect
.top
;
346 static HRESULT WINAPI
WebBrowser_put_Top(IWebBrowser2
*iface
, long Top
)
348 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
351 TRACE("(%p)->(%ld)\n", This
, Top
);
356 memcpy(&rect
, &This
->pos_rect
, sizeof(RECT
));
359 /* We don't really change the window position here.
360 * We just notify the embedder that he should do so. */
361 return IOleInPlaceSite_OnPosRectChange(This
->inplace
, &rect
);
364 static HRESULT WINAPI
WebBrowser_get_Width(IWebBrowser2
*iface
, long *pl
)
366 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
368 TRACE("(%p)->(%p)\n", This
, pl
);
370 *pl
= This
->pos_rect
.right
- This
->pos_rect
.left
;
374 static HRESULT WINAPI
WebBrowser_put_Width(IWebBrowser2
*iface
, long Width
)
376 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
379 TRACE("(%p)->(%ld)\n", This
, Width
);
384 memcpy(&rect
, &This
->pos_rect
, sizeof(RECT
));
385 rect
.right
= rect
.left
+Width
;
387 /* We don't really change the window size here.
388 * We just notify the embedder that he should do so. */
389 return IOleInPlaceSite_OnPosRectChange(This
->inplace
, &rect
);
392 static HRESULT WINAPI
WebBrowser_get_Height(IWebBrowser2
*iface
, long *pl
)
394 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
396 TRACE("(%p)->(%p)\n", This
, pl
);
398 *pl
= This
->pos_rect
.bottom
- This
->pos_rect
.top
;
402 static HRESULT WINAPI
WebBrowser_put_Height(IWebBrowser2
*iface
, long Height
)
404 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
407 TRACE("(%p)->(%ld)\n", This
, Height
);
412 memcpy(&rect
, &This
->pos_rect
, sizeof(RECT
));
413 rect
.bottom
= rect
.top
+Height
;
415 /* We don't really change the window size here.
416 * We just notify the embedder that he should do so. */
417 return IOleInPlaceSite_OnPosRectChange(This
->inplace
, &rect
);
420 static HRESULT WINAPI
WebBrowser_get_LocationName(IWebBrowser2
*iface
, BSTR
*LocationName
)
422 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
423 FIXME("(%p)->(%p)\n", This
, LocationName
);
427 static HRESULT WINAPI
WebBrowser_get_LocationURL(IWebBrowser2
*iface
, BSTR
*LocationURL
)
429 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
431 FIXME("(%p)->(%p)\n", This
, LocationURL
);
433 if(!This
->doc_host
.url
) {
434 static const WCHAR null_char
= 0;
435 *LocationURL
= SysAllocString(&null_char
);
439 *LocationURL
= SysAllocString(This
->doc_host
.url
);
443 static HRESULT WINAPI
WebBrowser_get_Busy(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
445 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
446 FIXME("(%p)->(%p)\n", This
, pBool
);
450 static HRESULT WINAPI
WebBrowser_Quit(IWebBrowser2
*iface
)
452 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
453 FIXME("(%p)\n", This
);
457 static HRESULT WINAPI
WebBrowser_ClientToWindow(IWebBrowser2
*iface
, int *pcx
, int *pcy
)
459 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
460 FIXME("(%p)->(%p %p)\n", This
, pcx
, pcy
);
464 static HRESULT WINAPI
WebBrowser_PutProperty(IWebBrowser2
*iface
, BSTR szProperty
, VARIANT vtValue
)
466 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
467 FIXME("(%p)->(%s)\n", This
, debugstr_w(szProperty
));
471 static HRESULT WINAPI
WebBrowser_GetProperty(IWebBrowser2
*iface
, BSTR szProperty
, VARIANT
*pvtValue
)
473 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
474 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(szProperty
), pvtValue
);
478 static HRESULT WINAPI
WebBrowser_get_Name(IWebBrowser2
*iface
, BSTR
*Name
)
480 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
481 FIXME("(%p)->(%p)\n", This
, Name
);
485 static HRESULT WINAPI
WebBrowser_get_HWND(IWebBrowser2
*iface
, long *pHWND
)
487 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
489 TRACE("(%p)->(%p)\n", This
, pHWND
);
491 /* WebBrowser control never has a frame window (in opposition to InternetExplorer) */
496 static HRESULT WINAPI
WebBrowser_get_FullName(IWebBrowser2
*iface
, BSTR
*FullName
)
498 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
499 FIXME("(%p)->(%p)\n", This
, FullName
);
503 static HRESULT WINAPI
WebBrowser_get_Path(IWebBrowser2
*iface
, BSTR
*Path
)
505 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
506 FIXME("(%p)->(%p)\n", This
, Path
);
510 static HRESULT WINAPI
WebBrowser_get_Visible(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
512 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
514 TRACE("(%p)->(%p)\n", This
, pBool
);
516 *pBool
= This
->visible
;
520 static HRESULT WINAPI
WebBrowser_put_Visible(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
522 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
524 DISPPARAMS dispparams
= {&arg
, NULL
, 1, 0};
526 TRACE("(%p)->(%x)\n", This
, Value
);
528 This
->visible
= Value
;
530 V_VT(&arg
) = VT_BOOL
;
531 V_BOOL(&arg
) = Value
;
532 call_sink(This
->doc_host
.cps
.wbe2
, DISPID_ONVISIBLE
, &dispparams
);
537 static HRESULT WINAPI
WebBrowser_get_StatusBar(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
539 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
541 TRACE("(%p)->(%p)\n", This
, pBool
);
543 *pBool
= This
->status_bar
;
547 static HRESULT WINAPI
WebBrowser_put_StatusBar(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
549 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
551 DISPPARAMS dispparams
= {&arg
, NULL
, 1, 0};
553 TRACE("(%p)->(%x)\n", This
, Value
);
555 This
->status_bar
= Value
? VARIANT_TRUE
: VARIANT_FALSE
;
557 /* In opposition to InternetExplorer, all we should do here is
558 * inform the embedder about the status bar change. */
560 V_VT(&arg
) = VT_BOOL
;
561 V_BOOL(&arg
) = Value
;
562 call_sink(This
->doc_host
.cps
.wbe2
, DISPID_ONSTATUSBAR
, &dispparams
);
567 static HRESULT WINAPI
WebBrowser_get_StatusText(IWebBrowser2
*iface
, BSTR
*StatusText
)
569 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
570 FIXME("(%p)->(%p)\n", This
, StatusText
);
574 static HRESULT WINAPI
WebBrowser_put_StatusText(IWebBrowser2
*iface
, BSTR StatusText
)
576 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
577 FIXME("(%p)->(%s)\n", This
, debugstr_w(StatusText
));
581 static HRESULT WINAPI
WebBrowser_get_ToolBar(IWebBrowser2
*iface
, int *Value
)
583 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
585 TRACE("(%p)->(%p)\n", This
, Value
);
587 *Value
= This
->tool_bar
;
591 static HRESULT WINAPI
WebBrowser_put_ToolBar(IWebBrowser2
*iface
, int Value
)
593 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
595 DISPPARAMS dispparams
= {&arg
, NULL
, 1, 0};
597 TRACE("(%p)->(%x)\n", This
, Value
);
599 This
->tool_bar
= Value
? VARIANT_TRUE
: VARIANT_FALSE
;
601 /* In opposition to InternetExplorer, all we should do here is
602 * inform the embedder about the tool bar change. */
604 V_VT(&arg
) = VT_BOOL
;
605 V_BOOL(&arg
) = Value
;
606 call_sink(This
->doc_host
.cps
.wbe2
, DISPID_ONTOOLBAR
, &dispparams
);
611 static HRESULT WINAPI
WebBrowser_get_MenuBar(IWebBrowser2
*iface
, VARIANT_BOOL
*Value
)
613 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
615 TRACE("(%p)->(%p)\n", This
, Value
);
617 *Value
= This
->menu_bar
;
621 static HRESULT WINAPI
WebBrowser_put_MenuBar(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
623 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
625 DISPPARAMS dispparams
= {&arg
, NULL
, 1, 0};
627 TRACE("(%p)->(%x)\n", This
, Value
);
629 This
->menu_bar
= Value
? VARIANT_TRUE
: VARIANT_FALSE
;
631 /* In opposition to InternetExplorer, all we should do here is
632 * inform the embedder about the menu bar change. */
634 V_VT(&arg
) = VT_BOOL
;
635 V_BOOL(&arg
) = Value
;
636 call_sink(This
->doc_host
.cps
.wbe2
, DISPID_ONMENUBAR
, &dispparams
);
641 static HRESULT WINAPI
WebBrowser_get_FullScreen(IWebBrowser2
*iface
, VARIANT_BOOL
*pbFullScreen
)
643 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
645 TRACE("(%p)->(%p)\n", This
, pbFullScreen
);
647 *pbFullScreen
= This
->full_screen
;
651 static HRESULT WINAPI
WebBrowser_put_FullScreen(IWebBrowser2
*iface
, VARIANT_BOOL bFullScreen
)
653 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
655 TRACE("(%p)->(%x)\n", This
, bFullScreen
);
657 This
->full_screen
= bFullScreen
? VARIANT_TRUE
: VARIANT_FALSE
;
661 static HRESULT WINAPI
WebBrowser_Navigate2(IWebBrowser2
*iface
, VARIANT
*URL
, VARIANT
*Flags
,
662 VARIANT
*TargetFrameName
, VARIANT
*PostData
, VARIANT
*Headers
)
664 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
666 TRACE("(%p)->(%p %p %p %p %p)\n", This
, URL
, Flags
, TargetFrameName
, PostData
, Headers
);
674 if(V_VT(URL
) != VT_BSTR
) {
675 FIXME("Unsupported V_VT(URL) %d\n", V_VT(URL
));
679 return navigate_url(&This
->doc_host
, V_BSTR(URL
), Flags
, TargetFrameName
, PostData
, Headers
);
682 static HRESULT WINAPI
WebBrowser_QueryStatusWB(IWebBrowser2
*iface
, OLECMDID cmdID
, OLECMDF
*pcmdf
)
684 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
685 FIXME("(%p)->(%d %p)\n", This
, cmdID
, pcmdf
);
689 static HRESULT WINAPI
WebBrowser_ExecWB(IWebBrowser2
*iface
, OLECMDID cmdID
,
690 OLECMDEXECOPT cmdexecopt
, VARIANT
*pvaIn
, VARIANT
*pvaOut
)
692 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
693 FIXME("(%p)->(%d %d %p %p)\n", This
, cmdID
, cmdexecopt
, pvaIn
, pvaOut
);
697 static HRESULT WINAPI
WebBrowser_ShowBrowserBar(IWebBrowser2
*iface
, VARIANT
*pvaClsid
,
698 VARIANT
*pvarShow
, VARIANT
*pvarSize
)
700 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
701 FIXME("(%p)->(%p %p %p)\n", This
, pvaClsid
, pvarShow
, pvarSize
);
705 static HRESULT WINAPI
WebBrowser_get_ReadyState(IWebBrowser2
*iface
, READYSTATE
*lpReadyState
)
707 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
708 FIXME("(%p)->(%p)\n", This
, lpReadyState
);
712 static HRESULT WINAPI
WebBrowser_get_Offline(IWebBrowser2
*iface
, VARIANT_BOOL
*pbOffline
)
714 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
716 TRACE("(%p)->(%p)\n", This
, pbOffline
);
718 *pbOffline
= This
->doc_host
.offline
;
722 static HRESULT WINAPI
WebBrowser_put_Offline(IWebBrowser2
*iface
, VARIANT_BOOL bOffline
)
724 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
726 TRACE("(%p)->(%x)\n", This
, bOffline
);
728 This
->doc_host
.offline
= bOffline
? VARIANT_TRUE
: VARIANT_FALSE
;
732 static HRESULT WINAPI
WebBrowser_get_Silent(IWebBrowser2
*iface
, VARIANT_BOOL
*pbSilent
)
734 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
736 TRACE("(%p)->(%p)\n", This
, pbSilent
);
738 *pbSilent
= This
->doc_host
.silent
;
742 static HRESULT WINAPI
WebBrowser_put_Silent(IWebBrowser2
*iface
, VARIANT_BOOL bSilent
)
744 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
746 TRACE("(%p)->(%x)\n", This
, bSilent
);
748 This
->doc_host
.silent
= bSilent
? VARIANT_TRUE
: VARIANT_FALSE
;
752 static HRESULT WINAPI
WebBrowser_get_RegisterAsBrowser(IWebBrowser2
*iface
,
753 VARIANT_BOOL
*pbRegister
)
755 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
756 FIXME("(%p)->(%p)\n", This
, pbRegister
);
760 static HRESULT WINAPI
WebBrowser_put_RegisterAsBrowser(IWebBrowser2
*iface
,
761 VARIANT_BOOL bRegister
)
763 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
764 FIXME("(%p)->(%x)\n", This
, bRegister
);
768 static HRESULT WINAPI
WebBrowser_get_RegisterAsDropTarget(IWebBrowser2
*iface
,
769 VARIANT_BOOL
*pbRegister
)
771 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
772 FIXME("(%p)->(%p)\n", This
, pbRegister
);
776 static HRESULT WINAPI
WebBrowser_put_RegisterAsDropTarget(IWebBrowser2
*iface
,
777 VARIANT_BOOL bRegister
)
779 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
780 FIXME("(%p)->(%x)\n", This
, bRegister
);
784 static HRESULT WINAPI
WebBrowser_get_TheaterMode(IWebBrowser2
*iface
, VARIANT_BOOL
*pbRegister
)
786 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
787 FIXME("(%p)->(%p)\n", This
, pbRegister
);
791 static HRESULT WINAPI
WebBrowser_put_TheaterMode(IWebBrowser2
*iface
, VARIANT_BOOL bRegister
)
793 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
794 FIXME("(%p)->(%x)\n", This
, bRegister
);
798 static HRESULT WINAPI
WebBrowser_get_AddressBar(IWebBrowser2
*iface
, VARIANT_BOOL
*Value
)
800 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
802 TRACE("(%p)->(%p)\n", This
, Value
);
804 *Value
= This
->address_bar
;
808 static HRESULT WINAPI
WebBrowser_put_AddressBar(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
810 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
812 DISPPARAMS dispparams
= {&arg
, NULL
, 1, 0};
814 TRACE("(%p)->(%x)\n", This
, Value
);
816 This
->address_bar
= Value
? VARIANT_TRUE
: VARIANT_FALSE
;
818 /* In opposition to InternetExplorer, all we should do here is
819 * inform the embedder about the address bar change. */
821 V_VT(&arg
) = VT_BOOL
;
822 V_BOOL(&arg
) = Value
;
823 call_sink(This
->doc_host
.cps
.wbe2
, DISPID_ONADDRESSBAR
, &dispparams
);
828 static HRESULT WINAPI
WebBrowser_get_Resizable(IWebBrowser2
*iface
, VARIANT_BOOL
*Value
)
830 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
832 TRACE("(%p)->(%p)\n", This
, Value
);
834 /* It's InternetExplorer object's method. We have nothing to do here. */
838 static HRESULT WINAPI
WebBrowser_put_Resizable(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
840 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
842 TRACE("(%p)->(%x)\n", This
, Value
);
844 /* It's InternetExplorer object's method. We have nothing to do here. */
848 #undef WEBBROWSER_THIS
850 static const IWebBrowser2Vtbl WebBrowser2Vtbl
=
852 WebBrowser_QueryInterface
,
855 WebBrowser_GetTypeInfoCount
,
856 WebBrowser_GetTypeInfo
,
857 WebBrowser_GetIDsOfNames
,
860 WebBrowser_GoForward
,
867 WebBrowser_get_Application
,
868 WebBrowser_get_Parent
,
869 WebBrowser_get_Container
,
870 WebBrowser_get_Document
,
871 WebBrowser_get_TopLevelContainer
,
877 WebBrowser_get_Width
,
878 WebBrowser_put_Width
,
879 WebBrowser_get_Height
,
880 WebBrowser_put_Height
,
881 WebBrowser_get_LocationName
,
882 WebBrowser_get_LocationURL
,
885 WebBrowser_ClientToWindow
,
886 WebBrowser_PutProperty
,
887 WebBrowser_GetProperty
,
890 WebBrowser_get_FullName
,
892 WebBrowser_get_Visible
,
893 WebBrowser_put_Visible
,
894 WebBrowser_get_StatusBar
,
895 WebBrowser_put_StatusBar
,
896 WebBrowser_get_StatusText
,
897 WebBrowser_put_StatusText
,
898 WebBrowser_get_ToolBar
,
899 WebBrowser_put_ToolBar
,
900 WebBrowser_get_MenuBar
,
901 WebBrowser_put_MenuBar
,
902 WebBrowser_get_FullScreen
,
903 WebBrowser_put_FullScreen
,
904 WebBrowser_Navigate2
,
905 WebBrowser_QueryStatusWB
,
907 WebBrowser_ShowBrowserBar
,
908 WebBrowser_get_ReadyState
,
909 WebBrowser_get_Offline
,
910 WebBrowser_put_Offline
,
911 WebBrowser_get_Silent
,
912 WebBrowser_put_Silent
,
913 WebBrowser_get_RegisterAsBrowser
,
914 WebBrowser_put_RegisterAsBrowser
,
915 WebBrowser_get_RegisterAsDropTarget
,
916 WebBrowser_put_RegisterAsDropTarget
,
917 WebBrowser_get_TheaterMode
,
918 WebBrowser_put_TheaterMode
,
919 WebBrowser_get_AddressBar
,
920 WebBrowser_put_AddressBar
,
921 WebBrowser_get_Resizable
,
922 WebBrowser_put_Resizable
925 static HRESULT
WebBrowser_Create(INT version
, IUnknown
*pOuter
, REFIID riid
, void **ppv
)
930 TRACE("(%p %s %p) version=%d\n", pOuter
, debugstr_guid(riid
), ppv
, version
);
932 ret
= shdocvw_alloc(sizeof(WebBrowser
));
934 ret
->lpWebBrowser2Vtbl
= &WebBrowser2Vtbl
;
936 ret
->version
= version
;
938 DocHost_Init(&ret
->doc_host
, (IDispatch
*)WEBBROWSER2(ret
));
940 ret
->visible
= VARIANT_TRUE
;
941 ret
->menu_bar
= VARIANT_TRUE
;
942 ret
->address_bar
= VARIANT_TRUE
;
943 ret
->status_bar
= VARIANT_TRUE
;
944 ret
->tool_bar
= VARIANT_TRUE
;
945 ret
->full_screen
= VARIANT_FALSE
;
947 WebBrowser_OleObject_Init(ret
);
948 WebBrowser_ViewObject_Init(ret
);
949 WebBrowser_Persist_Init(ret
);
950 WebBrowser_ClassInfo_Init(ret
);
951 WebBrowser_HlinkFrame_Init(ret
);
953 hres
= IWebBrowser_QueryInterface(WEBBROWSER(ret
), riid
, ppv
);
954 if(SUCCEEDED(hres
)) {
955 SHDOCVW_LockModule();
964 HRESULT
WebBrowserV1_Create(IUnknown
*pOuter
, REFIID riid
, void **ppv
)
966 return WebBrowser_Create(1, pOuter
, riid
, ppv
);
969 HRESULT
WebBrowserV2_Create(IUnknown
*pOuter
, REFIID riid
, void **ppv
)
971 return WebBrowser_Create(2, pOuter
, riid
, ppv
);