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_IPersistStreamInit
, riid
)) {
76 TRACE("(%p)->(IID_IPersistStreamInit %p)\n", This
, ppv
);
77 *ppv
= PERSTRINIT(This
);
78 }else if(IsEqualGUID(&IID_IProvideClassInfo
, riid
)) {
79 TRACE("(%p)->(IID_IProvideClassInfo %p)\n", This
, ppv
);
80 *ppv
= CLASSINFO(This
);
81 }else if(IsEqualGUID(&IID_IProvideClassInfo2
, riid
)) {
82 TRACE("(%p)->(IID_IProvideClassInfo2 %p)\n", This
, ppv
);
83 *ppv
= CLASSINFO(This
);
84 }else if(IsEqualGUID(&IID_IConnectionPointContainer
, riid
)) {
85 TRACE("(%p)->(IID_IConnectionPointContainer %p)\n", This
, ppv
);
86 *ppv
= CONPTCONT(&This
->doc_host
.cps
);
87 }else if(IsEqualGUID(&IID_IViewObject
, riid
)) {
88 TRACE("(%p)->(IID_IViewObject %p)\n", This
, ppv
);
90 }else if(IsEqualGUID(&IID_IViewObject2
, riid
)) {
91 TRACE("(%p)->(IID_IViewObject2 %p)\n", This
, ppv
);
92 *ppv
= VIEWOBJ2(This
);
93 }else if(IsEqualGUID(&IID_IOleInPlaceActiveObject
, riid
)) {
94 TRACE("(%p)->(IID_IOleInPlaceActiveObject %p)\n", This
, ppv
);
95 *ppv
= ACTIVEOBJ(This
);
96 }else if(IsEqualGUID(&IID_IOleCommandTarget
, riid
)) {
97 TRACE("(%p)->(IID_IOleCommandTarget %p)\n", This
, ppv
);
99 }else if(IsEqualGUID(&IID_IHlinkFrame
, riid
)) {
100 TRACE("(%p)->(IID_IHlinkFrame %p)\n", This
, ppv
);
101 *ppv
= HLINKFRAME(This
);
105 IUnknown_AddRef((IUnknown
*)*ppv
);
109 FIXME("(%p)->(%s %p) interface not supported\n", This
, debugstr_guid(riid
), ppv
);
110 return E_NOINTERFACE
;
113 static ULONG WINAPI
WebBrowser_AddRef(IWebBrowser2
*iface
)
115 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
116 LONG ref
= InterlockedIncrement(&This
->ref
);
117 TRACE("(%p) ref=%ld\n", This
, ref
);
121 static ULONG WINAPI
WebBrowser_Release(IWebBrowser2
*iface
)
123 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
124 LONG ref
= InterlockedDecrement(&This
->ref
);
126 TRACE("(%p) ref=%ld\n", This
, ref
);
129 if(This
->doc_host
.document
)
130 IUnknown_Release(This
->doc_host
.document
);
132 DocHost_Release(&This
->doc_host
);
134 WebBrowser_OleObject_Destroy(This
);
137 SHDOCVW_UnlockModule();
143 /* IDispatch methods */
144 static HRESULT WINAPI
WebBrowser_GetTypeInfoCount(IWebBrowser2
*iface
, UINT
*pctinfo
)
146 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
147 FIXME("(%p)->(%p)\n", This
, pctinfo
);
151 static HRESULT WINAPI
WebBrowser_GetTypeInfo(IWebBrowser2
*iface
, UINT iTInfo
, LCID lcid
,
154 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
155 FIXME("(%p)->(%d %ld %p)\n", This
, iTInfo
, lcid
, ppTInfo
);
159 static HRESULT WINAPI
WebBrowser_GetIDsOfNames(IWebBrowser2
*iface
, REFIID riid
,
160 LPOLESTR
*rgszNames
, UINT cNames
,
161 LCID lcid
, DISPID
*rgDispId
)
163 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
164 FIXME("(%p)->(%s %p %d %ld %p)\n", This
, debugstr_guid(riid
), rgszNames
, cNames
,
169 static HRESULT WINAPI
WebBrowser_Invoke(IWebBrowser2
*iface
, DISPID dispIdMember
,
170 REFIID riid
, LCID lcid
, WORD wFlags
,
171 DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
,
172 EXCEPINFO
*pExepInfo
, UINT
*puArgErr
)
174 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
178 TRACE("(%p)->(%ld %s %ld %08x %p %p %p %p)\n", This
, dispIdMember
, debugstr_guid(riid
),
179 lcid
, wFlags
, pDispParams
, pVarResult
, pExepInfo
, puArgErr
);
181 hres
= get_typeinfo(&typeinfo
);
185 return ITypeInfo_Invoke(typeinfo
, WEBBROWSER2(This
), dispIdMember
, wFlags
, pDispParams
,
186 pVarResult
, pExepInfo
, puArgErr
);
189 /* IWebBrowser methods */
190 static HRESULT WINAPI
WebBrowser_GoBack(IWebBrowser2
*iface
)
192 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
193 FIXME("(%p)\n", This
);
197 static HRESULT WINAPI
WebBrowser_GoForward(IWebBrowser2
*iface
)
199 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
200 FIXME("(%p)\n", This
);
204 static HRESULT WINAPI
WebBrowser_GoHome(IWebBrowser2
*iface
)
206 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
207 FIXME("(%p)\n", This
);
211 static HRESULT WINAPI
WebBrowser_GoSearch(IWebBrowser2
*iface
)
213 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
214 FIXME("(%p)\n", This
);
218 static HRESULT WINAPI
WebBrowser_Navigate(IWebBrowser2
*iface
, BSTR szUrl
,
219 VARIANT
*Flags
, VARIANT
*TargetFrameName
,
220 VARIANT
*PostData
, VARIANT
*Headers
)
222 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
226 FIXME("(%p)->(%s %p %p %p %p)\n", This
, debugstr_w(szUrl
), Flags
, TargetFrameName
,
229 V_VT(&url
) = VT_BSTR
;
230 V_BSTR(&url
) = szUrl
;
231 r
= IWebBrowser2_Navigate2(iface
, &url
, Flags
,
232 TargetFrameName
, PostData
, Headers
);
237 static HRESULT WINAPI
WebBrowser_Refresh(IWebBrowser2
*iface
)
239 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
240 FIXME("(%p)\n", This
);
244 static HRESULT WINAPI
WebBrowser_Refresh2(IWebBrowser2
*iface
, VARIANT
*Level
)
246 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
247 FIXME("(%p)->(%p)\n", This
, Level
);
251 static HRESULT WINAPI
WebBrowser_Stop(IWebBrowser2
*iface
)
253 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
254 FIXME("(%p)\n", This
);
258 static HRESULT WINAPI
WebBrowser_get_Application(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
260 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
261 FIXME("(%p)->(%p)\n", This
, ppDisp
);
265 static HRESULT WINAPI
WebBrowser_get_Parent(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
267 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
268 FIXME("(%p)->(%p)\n", This
, ppDisp
);
272 static HRESULT WINAPI
WebBrowser_get_Container(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
274 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
275 FIXME("(%p)->(%p)\n", This
, ppDisp
);
279 static HRESULT WINAPI
WebBrowser_get_Document(IWebBrowser2
*iface
, IDispatch
**ppDisp
)
281 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
283 TRACE("(%p)->(%p)\n", This
, ppDisp
);
286 if(This
->doc_host
.document
)
287 IUnknown_QueryInterface(This
->doc_host
.document
, &IID_IDispatch
, (void**)ppDisp
);
292 static HRESULT WINAPI
WebBrowser_get_TopLevelContainer(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
294 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
295 FIXME("(%p)->(%p)\n", This
, pBool
);
299 static HRESULT WINAPI
WebBrowser_get_Type(IWebBrowser2
*iface
, BSTR
*Type
)
301 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
302 FIXME("(%p)->(%p)\n", This
, Type
);
306 static HRESULT WINAPI
WebBrowser_get_Left(IWebBrowser2
*iface
, long *pl
)
308 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
310 TRACE("(%p)->(%p)\n", This
, pl
);
312 *pl
= This
->pos_rect
.left
;
316 static HRESULT WINAPI
WebBrowser_put_Left(IWebBrowser2
*iface
, long Left
)
318 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
321 TRACE("(%p)->(%ld)\n", This
, Left
);
326 memcpy(&rect
, &This
->pos_rect
, sizeof(RECT
));
329 /* We don't really change the window position here.
330 * We just notify the embedder that he should do so. */
331 return IOleInPlaceSite_OnPosRectChange(This
->inplace
, &rect
);
334 static HRESULT WINAPI
WebBrowser_get_Top(IWebBrowser2
*iface
, long *pl
)
336 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
338 TRACE("(%p)->(%p)\n", This
, pl
);
340 *pl
= This
->pos_rect
.top
;
344 static HRESULT WINAPI
WebBrowser_put_Top(IWebBrowser2
*iface
, long Top
)
346 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
349 TRACE("(%p)->(%ld)\n", This
, Top
);
354 memcpy(&rect
, &This
->pos_rect
, sizeof(RECT
));
357 /* We don't really change the window position here.
358 * We just notify the embedder that he should do so. */
359 return IOleInPlaceSite_OnPosRectChange(This
->inplace
, &rect
);
362 static HRESULT WINAPI
WebBrowser_get_Width(IWebBrowser2
*iface
, long *pl
)
364 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
366 TRACE("(%p)->(%p)\n", This
, pl
);
368 *pl
= This
->pos_rect
.right
- This
->pos_rect
.left
;
372 static HRESULT WINAPI
WebBrowser_put_Width(IWebBrowser2
*iface
, long Width
)
374 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
377 TRACE("(%p)->(%ld)\n", This
, Width
);
382 memcpy(&rect
, &This
->pos_rect
, sizeof(RECT
));
383 rect
.right
= rect
.left
+Width
;
385 /* We don't really change the window size here.
386 * We just notify the embedder that he should do so. */
387 return IOleInPlaceSite_OnPosRectChange(This
->inplace
, &rect
);
390 static HRESULT WINAPI
WebBrowser_get_Height(IWebBrowser2
*iface
, long *pl
)
392 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
394 TRACE("(%p)->(%p)\n", This
, pl
);
396 *pl
= This
->pos_rect
.bottom
- This
->pos_rect
.top
;
400 static HRESULT WINAPI
WebBrowser_put_Height(IWebBrowser2
*iface
, long Height
)
402 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
405 TRACE("(%p)->(%ld)\n", This
, Height
);
410 memcpy(&rect
, &This
->pos_rect
, sizeof(RECT
));
411 rect
.bottom
= rect
.top
+Height
;
413 /* We don't really change the window size here.
414 * We just notify the embedder that he should do so. */
415 return IOleInPlaceSite_OnPosRectChange(This
->inplace
, &rect
);
418 static HRESULT WINAPI
WebBrowser_get_LocationName(IWebBrowser2
*iface
, BSTR
*LocationName
)
420 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
421 FIXME("(%p)->(%p)\n", This
, LocationName
);
425 static HRESULT WINAPI
WebBrowser_get_LocationURL(IWebBrowser2
*iface
, BSTR
*LocationURL
)
427 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
429 FIXME("(%p)->(%p)\n", This
, LocationURL
);
431 if(!This
->doc_host
.url
) {
432 static const WCHAR null_char
= 0;
433 *LocationURL
= SysAllocString(&null_char
);
437 *LocationURL
= SysAllocString(This
->doc_host
.url
);
441 static HRESULT WINAPI
WebBrowser_get_Busy(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
443 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
444 FIXME("(%p)->(%p)\n", This
, pBool
);
448 static HRESULT WINAPI
WebBrowser_Quit(IWebBrowser2
*iface
)
450 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
451 FIXME("(%p)\n", This
);
455 static HRESULT WINAPI
WebBrowser_ClientToWindow(IWebBrowser2
*iface
, int *pcx
, int *pcy
)
457 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
458 FIXME("(%p)->(%p %p)\n", This
, pcx
, pcy
);
462 static HRESULT WINAPI
WebBrowser_PutProperty(IWebBrowser2
*iface
, BSTR szProperty
, VARIANT vtValue
)
464 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
465 FIXME("(%p)->(%s)\n", This
, debugstr_w(szProperty
));
469 static HRESULT WINAPI
WebBrowser_GetProperty(IWebBrowser2
*iface
, BSTR szProperty
, VARIANT
*pvtValue
)
471 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
472 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(szProperty
), pvtValue
);
476 static HRESULT WINAPI
WebBrowser_get_Name(IWebBrowser2
*iface
, BSTR
*Name
)
478 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
479 FIXME("(%p)->(%p)\n", This
, Name
);
483 static HRESULT WINAPI
WebBrowser_get_HWND(IWebBrowser2
*iface
, long *pHWND
)
485 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
487 TRACE("(%p)->(%p)\n", This
, pHWND
);
489 /* WebBrowser control never has a frame window (in opposition to InternetExplorer) */
494 static HRESULT WINAPI
WebBrowser_get_FullName(IWebBrowser2
*iface
, BSTR
*FullName
)
496 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
497 FIXME("(%p)->(%p)\n", This
, FullName
);
501 static HRESULT WINAPI
WebBrowser_get_Path(IWebBrowser2
*iface
, BSTR
*Path
)
503 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
504 FIXME("(%p)->(%p)\n", This
, Path
);
508 static HRESULT WINAPI
WebBrowser_get_Visible(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
510 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
512 TRACE("(%p)->(%p)\n", This
, pBool
);
514 *pBool
= This
->visible
;
518 static HRESULT WINAPI
WebBrowser_put_Visible(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
520 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
522 DISPPARAMS dispparams
= {&arg
, NULL
, 1, 0};
524 TRACE("(%p)->(%x)\n", This
, Value
);
526 This
->visible
= Value
;
528 V_VT(&arg
) = VT_BOOL
;
529 V_BOOL(&arg
) = Value
;
530 call_sink(This
->doc_host
.cps
.wbe2
, DISPID_ONVISIBLE
, &dispparams
);
535 static HRESULT WINAPI
WebBrowser_get_StatusBar(IWebBrowser2
*iface
, VARIANT_BOOL
*pBool
)
537 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
539 TRACE("(%p)->(%p)\n", This
, pBool
);
541 *pBool
= This
->status_bar
;
545 static HRESULT WINAPI
WebBrowser_put_StatusBar(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
547 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
549 DISPPARAMS dispparams
= {&arg
, NULL
, 1, 0};
551 TRACE("(%p)->(%x)\n", This
, Value
);
553 This
->status_bar
= Value
? VARIANT_TRUE
: VARIANT_FALSE
;
555 /* In opposition to InternetExplorer, all we should do here is
556 * inform the embedder about the status bar change. */
558 V_VT(&arg
) = VT_BOOL
;
559 V_BOOL(&arg
) = Value
;
560 call_sink(This
->doc_host
.cps
.wbe2
, DISPID_ONSTATUSBAR
, &dispparams
);
565 static HRESULT WINAPI
WebBrowser_get_StatusText(IWebBrowser2
*iface
, BSTR
*StatusText
)
567 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
568 FIXME("(%p)->(%p)\n", This
, StatusText
);
572 static HRESULT WINAPI
WebBrowser_put_StatusText(IWebBrowser2
*iface
, BSTR StatusText
)
574 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
575 FIXME("(%p)->(%s)\n", This
, debugstr_w(StatusText
));
579 static HRESULT WINAPI
WebBrowser_get_ToolBar(IWebBrowser2
*iface
, int *Value
)
581 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
583 TRACE("(%p)->(%p)\n", This
, Value
);
585 *Value
= This
->tool_bar
;
589 static HRESULT WINAPI
WebBrowser_put_ToolBar(IWebBrowser2
*iface
, int Value
)
591 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
593 DISPPARAMS dispparams
= {&arg
, NULL
, 1, 0};
595 TRACE("(%p)->(%x)\n", This
, Value
);
597 This
->tool_bar
= Value
? VARIANT_TRUE
: VARIANT_FALSE
;
599 /* In opposition to InternetExplorer, all we should do here is
600 * inform the embedder about the tool bar change. */
602 V_VT(&arg
) = VT_BOOL
;
603 V_BOOL(&arg
) = Value
;
604 call_sink(This
->doc_host
.cps
.wbe2
, DISPID_ONTOOLBAR
, &dispparams
);
609 static HRESULT WINAPI
WebBrowser_get_MenuBar(IWebBrowser2
*iface
, VARIANT_BOOL
*Value
)
611 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
613 TRACE("(%p)->(%p)\n", This
, Value
);
615 *Value
= This
->menu_bar
;
619 static HRESULT WINAPI
WebBrowser_put_MenuBar(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
621 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
623 DISPPARAMS dispparams
= {&arg
, NULL
, 1, 0};
625 TRACE("(%p)->(%x)\n", This
, Value
);
627 This
->menu_bar
= Value
? VARIANT_TRUE
: VARIANT_FALSE
;
629 /* In opposition to InternetExplorer, all we should do here is
630 * inform the embedder about the menu bar change. */
632 V_VT(&arg
) = VT_BOOL
;
633 V_BOOL(&arg
) = Value
;
634 call_sink(This
->doc_host
.cps
.wbe2
, DISPID_ONMENUBAR
, &dispparams
);
639 static HRESULT WINAPI
WebBrowser_get_FullScreen(IWebBrowser2
*iface
, VARIANT_BOOL
*pbFullScreen
)
641 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
642 FIXME("(%p)->(%p)\n", This
, pbFullScreen
);
646 static HRESULT WINAPI
WebBrowser_put_FullScreen(IWebBrowser2
*iface
, VARIANT_BOOL bFullScreen
)
648 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
649 FIXME("(%p)->(%x)\n", This
, bFullScreen
);
653 static HRESULT WINAPI
WebBrowser_Navigate2(IWebBrowser2
*iface
, VARIANT
*URL
, VARIANT
*Flags
,
654 VARIANT
*TargetFrameName
, VARIANT
*PostData
, VARIANT
*Headers
)
656 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
657 PBYTE post_data
= NULL
;
658 ULONG post_data_len
= 0;
659 LPWSTR headers
= NULL
;
662 TRACE("(%p)->(%p %p %p %p %p)\n", This
, URL
, Flags
, TargetFrameName
, PostData
, Headers
);
667 if((Flags
&& V_VT(Flags
) != VT_EMPTY
)
668 || (TargetFrameName
&& V_VT(TargetFrameName
) != VT_EMPTY
))
669 FIXME("Unsupported arguments\n");
675 if(V_VT(URL
) != VT_BSTR
)
678 if(PostData
&& V_VT(PostData
) != VT_EMPTY
) {
679 if(V_VT(PostData
) != (VT_ARRAY
| VT_UI1
)
680 || V_ARRAY(PostData
)->cDims
!= 1) {
681 WARN("Invalid PostData\n");
685 SafeArrayAccessData(V_ARRAY(PostData
), (void**)&post_data
);
686 post_data_len
= V_ARRAY(PostData
)->rgsabound
[0].cElements
;
689 if(Headers
&& V_VT(Headers
) != VT_EMPTY
) {
690 if(V_VT(Headers
) != VT_BSTR
)
693 headers
= V_BSTR(Headers
);
694 TRACE("Headers: %s\n", debugstr_w(headers
));
697 hres
= navigate_url(&This
->doc_host
, V_BSTR(URL
), post_data
, post_data_len
, headers
);
700 SafeArrayUnaccessData(V_ARRAY(PostData
));
705 static HRESULT WINAPI
WebBrowser_QueryStatusWB(IWebBrowser2
*iface
, OLECMDID cmdID
, OLECMDF
*pcmdf
)
707 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
708 FIXME("(%p)->(%d %p)\n", This
, cmdID
, pcmdf
);
712 static HRESULT WINAPI
WebBrowser_ExecWB(IWebBrowser2
*iface
, OLECMDID cmdID
,
713 OLECMDEXECOPT cmdexecopt
, VARIANT
*pvaIn
, VARIANT
*pvaOut
)
715 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
716 FIXME("(%p)->(%d %d %p %p)\n", This
, cmdID
, cmdexecopt
, pvaIn
, pvaOut
);
720 static HRESULT WINAPI
WebBrowser_ShowBrowserBar(IWebBrowser2
*iface
, VARIANT
*pvaClsid
,
721 VARIANT
*pvarShow
, VARIANT
*pvarSize
)
723 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
724 FIXME("(%p)->(%p %p %p)\n", This
, pvaClsid
, pvarShow
, pvarSize
);
728 static HRESULT WINAPI
WebBrowser_get_ReadyState(IWebBrowser2
*iface
, READYSTATE
*lpReadyState
)
730 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
731 FIXME("(%p)->(%p)\n", This
, lpReadyState
);
735 static HRESULT WINAPI
WebBrowser_get_Offline(IWebBrowser2
*iface
, VARIANT_BOOL
*pbOffline
)
737 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
738 FIXME("(%p)->(%p)\n", This
, pbOffline
);
742 static HRESULT WINAPI
WebBrowser_put_Offline(IWebBrowser2
*iface
, VARIANT_BOOL bOffline
)
744 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
745 FIXME("(%p)->(%x)\n", This
, bOffline
);
749 static HRESULT WINAPI
WebBrowser_get_Silent(IWebBrowser2
*iface
, VARIANT_BOOL
*pbSilent
)
751 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
752 FIXME("(%p)->(%p)\n", This
, pbSilent
);
756 static HRESULT WINAPI
WebBrowser_put_Silent(IWebBrowser2
*iface
, VARIANT_BOOL bSilent
)
758 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
759 FIXME("(%p)->(%x)\n", This
, bSilent
);
763 static HRESULT WINAPI
WebBrowser_get_RegisterAsBrowser(IWebBrowser2
*iface
,
764 VARIANT_BOOL
*pbRegister
)
766 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
767 FIXME("(%p)->(%p)\n", This
, pbRegister
);
771 static HRESULT WINAPI
WebBrowser_put_RegisterAsBrowser(IWebBrowser2
*iface
,
772 VARIANT_BOOL bRegister
)
774 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
775 FIXME("(%p)->(%x)\n", This
, bRegister
);
779 static HRESULT WINAPI
WebBrowser_get_RegisterAsDropTarget(IWebBrowser2
*iface
,
780 VARIANT_BOOL
*pbRegister
)
782 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
783 FIXME("(%p)->(%p)\n", This
, pbRegister
);
787 static HRESULT WINAPI
WebBrowser_put_RegisterAsDropTarget(IWebBrowser2
*iface
,
788 VARIANT_BOOL bRegister
)
790 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
791 FIXME("(%p)->(%x)\n", This
, bRegister
);
795 static HRESULT WINAPI
WebBrowser_get_TheaterMode(IWebBrowser2
*iface
, VARIANT_BOOL
*pbRegister
)
797 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
798 FIXME("(%p)->(%p)\n", This
, pbRegister
);
802 static HRESULT WINAPI
WebBrowser_put_TheaterMode(IWebBrowser2
*iface
, VARIANT_BOOL bRegister
)
804 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
805 FIXME("(%p)->(%x)\n", This
, bRegister
);
809 static HRESULT WINAPI
WebBrowser_get_AddressBar(IWebBrowser2
*iface
, VARIANT_BOOL
*Value
)
811 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
813 TRACE("(%p)->(%p)\n", This
, Value
);
815 *Value
= This
->address_bar
;
819 static HRESULT WINAPI
WebBrowser_put_AddressBar(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
821 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
823 DISPPARAMS dispparams
= {&arg
, NULL
, 1, 0};
825 TRACE("(%p)->(%x)\n", This
, Value
);
827 This
->address_bar
= Value
? VARIANT_TRUE
: VARIANT_FALSE
;
829 /* In opposition to InternetExplorer, all we should do here is
830 * inform the embedder about the address bar change. */
832 V_VT(&arg
) = VT_BOOL
;
833 V_BOOL(&arg
) = Value
;
834 call_sink(This
->doc_host
.cps
.wbe2
, DISPID_ONADDRESSBAR
, &dispparams
);
839 static HRESULT WINAPI
WebBrowser_get_Resizable(IWebBrowser2
*iface
, VARIANT_BOOL
*Value
)
841 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
842 FIXME("(%p)->(%p)\n", This
, Value
);
846 static HRESULT WINAPI
WebBrowser_put_Resizable(IWebBrowser2
*iface
, VARIANT_BOOL Value
)
848 WebBrowser
*This
= WEBBROWSER_THIS(iface
);
849 FIXME("(%p)->(%x)\n", This
, Value
);
853 #undef WEBBROWSER_THIS
855 static const IWebBrowser2Vtbl WebBrowser2Vtbl
=
857 WebBrowser_QueryInterface
,
860 WebBrowser_GetTypeInfoCount
,
861 WebBrowser_GetTypeInfo
,
862 WebBrowser_GetIDsOfNames
,
865 WebBrowser_GoForward
,
872 WebBrowser_get_Application
,
873 WebBrowser_get_Parent
,
874 WebBrowser_get_Container
,
875 WebBrowser_get_Document
,
876 WebBrowser_get_TopLevelContainer
,
882 WebBrowser_get_Width
,
883 WebBrowser_put_Width
,
884 WebBrowser_get_Height
,
885 WebBrowser_put_Height
,
886 WebBrowser_get_LocationName
,
887 WebBrowser_get_LocationURL
,
890 WebBrowser_ClientToWindow
,
891 WebBrowser_PutProperty
,
892 WebBrowser_GetProperty
,
895 WebBrowser_get_FullName
,
897 WebBrowser_get_Visible
,
898 WebBrowser_put_Visible
,
899 WebBrowser_get_StatusBar
,
900 WebBrowser_put_StatusBar
,
901 WebBrowser_get_StatusText
,
902 WebBrowser_put_StatusText
,
903 WebBrowser_get_ToolBar
,
904 WebBrowser_put_ToolBar
,
905 WebBrowser_get_MenuBar
,
906 WebBrowser_put_MenuBar
,
907 WebBrowser_get_FullScreen
,
908 WebBrowser_put_FullScreen
,
909 WebBrowser_Navigate2
,
910 WebBrowser_QueryStatusWB
,
912 WebBrowser_ShowBrowserBar
,
913 WebBrowser_get_ReadyState
,
914 WebBrowser_get_Offline
,
915 WebBrowser_put_Offline
,
916 WebBrowser_get_Silent
,
917 WebBrowser_put_Silent
,
918 WebBrowser_get_RegisterAsBrowser
,
919 WebBrowser_put_RegisterAsBrowser
,
920 WebBrowser_get_RegisterAsDropTarget
,
921 WebBrowser_put_RegisterAsDropTarget
,
922 WebBrowser_get_TheaterMode
,
923 WebBrowser_put_TheaterMode
,
924 WebBrowser_get_AddressBar
,
925 WebBrowser_put_AddressBar
,
926 WebBrowser_get_Resizable
,
927 WebBrowser_put_Resizable
930 static HRESULT
WebBrowser_Create(INT version
, IUnknown
*pOuter
, REFIID riid
, void **ppv
)
935 TRACE("(%p %s %p) version=%d\n", pOuter
, debugstr_guid(riid
), ppv
, version
);
937 ret
= shdocvw_alloc(sizeof(WebBrowser
));
939 ret
->lpWebBrowser2Vtbl
= &WebBrowser2Vtbl
;
941 ret
->version
= version
;
943 DocHost_Init(&ret
->doc_host
, (IDispatch
*)WEBBROWSER2(ret
));
945 ret
->visible
= VARIANT_TRUE
;
946 ret
->menu_bar
= VARIANT_TRUE
;
947 ret
->address_bar
= VARIANT_TRUE
;
948 ret
->status_bar
= VARIANT_TRUE
;
949 ret
->tool_bar
= VARIANT_TRUE
;
951 WebBrowser_OleObject_Init(ret
);
952 WebBrowser_ViewObject_Init(ret
);
953 WebBrowser_Persist_Init(ret
);
954 WebBrowser_ClassInfo_Init(ret
);
955 WebBrowser_HlinkFrame_Init(ret
);
957 hres
= IWebBrowser_QueryInterface(WEBBROWSER(ret
), riid
, ppv
);
958 if(SUCCEEDED(hres
)) {
959 SHDOCVW_LockModule();
968 HRESULT
WebBrowserV1_Create(IUnknown
*pOuter
, REFIID riid
, void **ppv
)
970 return WebBrowser_Create(1, pOuter
, riid
, ppv
);
973 HRESULT
WebBrowserV2_Create(IUnknown
*pOuter
, REFIID riid
, void **ppv
)
975 return WebBrowser_Create(2, pOuter
, riid
, ppv
);