2 * Copyright 2006-2010 Jacek Caban for CodeWeavers
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
30 #define NO_SHLWAPI_REG
33 #include "wine/debug.h"
35 #include "mshtml_private.h"
36 #include "htmlevent.h"
40 WINE_DEFAULT_DEBUG_CHANNEL(mshtml
);
42 static struct list window_list
= LIST_INIT(window_list
);
44 static void window_set_docnode(HTMLWindow
*window
, HTMLDocumentNode
*doc_node
)
47 if(window
->doc_obj
&& window
== window
->doc_obj
->basedoc
.window
)
48 window
->doc
->basedoc
.cp_container
.forward_container
= NULL
;
49 abort_document_bindings(window
->doc
);
50 window
->doc
->basedoc
.window
= NULL
;
51 htmldoc_release(&window
->doc
->basedoc
);
53 window
->doc
= doc_node
;
55 htmldoc_addref(&doc_node
->basedoc
);
57 if(window
->doc_obj
&& window
->doc_obj
->basedoc
.window
== window
) {
58 if(window
->doc_obj
->basedoc
.doc_node
)
59 htmldoc_release(&window
->doc_obj
->basedoc
.doc_node
->basedoc
);
60 window
->doc_obj
->basedoc
.doc_node
= doc_node
;
62 htmldoc_addref(&doc_node
->basedoc
);
65 if(doc_node
&& window
->doc_obj
&& window
->doc_obj
->usermode
== EDITMODE
) {
66 nsIDOMNSHTMLDocument
*nshtmldoc
;
70 static const PRUnichar onW
[] = {'o','n',0};
72 nsres
= nsIDOMHTMLDocument_QueryInterface(doc_node
->nsdoc
, &IID_nsIDOMNSHTMLDocument
, (void**)&nshtmldoc
);
73 if(NS_SUCCEEDED(nsres
)) {
74 nsAString_Init(&mode_str
, onW
);
75 nsres
= nsIDOMNSHTMLDocument_SetDesignMode(nshtmldoc
, &mode_str
);
76 nsAString_Finish(&mode_str
);
77 nsIDOMNSHTMLDocument_Release(nshtmldoc
);
79 ERR("SetDesignMode failed: %08x\n", nsres
);
81 ERR("Could not get nsIDOMNSHTMLDocument interface: %08x\n", nsres
);
86 nsIDOMWindow
*get_nsdoc_window(nsIDOMDocument
*nsdoc
)
88 nsIDOMDocumentView
*nsdocview
;
89 nsIDOMAbstractView
*nsview
;
90 nsIDOMWindow
*nswindow
;
93 nsres
= nsIDOMDocument_QueryInterface(nsdoc
, &IID_nsIDOMDocumentView
, (void**)&nsdocview
);
94 nsIDOMDocument_Release(nsdoc
);
95 if(NS_FAILED(nsres
)) {
96 ERR("Could not get nsIDOMDocumentView iface: %08x\n", nsres
);
100 nsres
= nsIDOMDocumentView_GetDefaultView(nsdocview
, &nsview
);
101 nsIDOMDocumentView_Release(nsdocview
);
102 if(NS_FAILED(nsres
)) {
103 ERR("GetDefaultView failed: %08x\n", nsres
);
107 nsres
= nsIDOMAbstractView_QueryInterface(nsview
, &IID_nsIDOMWindow
, (void**)&nswindow
);
108 nsIDOMAbstractView_Release(nsview
);
109 if(NS_FAILED(nsres
)) {
110 ERR("Coult not get nsIDOMWindow iface: %08x\n", nsres
);
117 static void release_children(HTMLWindow
*This
)
121 while(!list_empty(&This
->children
)) {
122 child
= LIST_ENTRY(list_tail(&This
->children
), HTMLWindow
, sibling_entry
);
124 list_remove(&child
->sibling_entry
);
125 child
->parent
= NULL
;
126 IHTMLWindow2_Release(&child
->IHTMLWindow2_iface
);
130 static HRESULT
get_location(HTMLWindow
*This
, HTMLLocation
**ret
)
133 IHTMLLocation_AddRef(&This
->location
->IHTMLLocation_iface
);
137 hres
= HTMLLocation_Create(This
, &This
->location
);
142 *ret
= This
->location
;
146 static inline HRESULT
set_window_event(HTMLWindow
*window
, eventid_t eid
, VARIANT
*var
)
149 FIXME("No document\n");
153 return set_event_handler(&window
->doc
->body_event_target
, NULL
, window
->doc
, eid
, var
);
156 static inline HRESULT
get_window_event(HTMLWindow
*window
, eventid_t eid
, VARIANT
*var
)
159 FIXME("No document\n");
163 return get_event_handler(&window
->doc
->body_event_target
, eid
, var
);
166 static inline HTMLWindow
*impl_from_IHTMLWindow2(IHTMLWindow2
*iface
)
168 return CONTAINING_RECORD(iface
, HTMLWindow
, IHTMLWindow2_iface
);
171 static HRESULT WINAPI
HTMLWindow2_QueryInterface(IHTMLWindow2
*iface
, REFIID riid
, void **ppv
)
173 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
177 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
178 TRACE("(%p)->(IID_IUnknown %p)\n", This
, ppv
);
179 *ppv
= &This
->IHTMLWindow2_iface
;
180 }else if(IsEqualGUID(&IID_IDispatch
, riid
)) {
181 TRACE("(%p)->(IID_IDispatch %p)\n", This
, ppv
);
182 *ppv
= &This
->IHTMLWindow2_iface
;
183 }else if(IsEqualGUID(&IID_IDispatchEx
, riid
)) {
184 TRACE("(%p)->(IID_IDispatchEx %p)\n", This
, ppv
);
185 *ppv
= &This
->IDispatchEx_iface
;
186 }else if(IsEqualGUID(&IID_IHTMLFramesCollection2
, riid
)) {
187 TRACE("(%p)->(IID_IHTMLFramesCollection2 %p)\n", This
, ppv
);
188 *ppv
= &This
->IHTMLWindow2_iface
;
189 }else if(IsEqualGUID(&IID_IHTMLWindow2
, riid
)) {
190 TRACE("(%p)->(IID_IHTMLWindow2 %p)\n", This
, ppv
);
191 *ppv
= &This
->IHTMLWindow2_iface
;
192 }else if(IsEqualGUID(&IID_IHTMLWindow3
, riid
)) {
193 TRACE("(%p)->(IID_IHTMLWindow3 %p)\n", This
, ppv
);
194 *ppv
= &This
->IHTMLWindow3_iface
;
195 }else if(IsEqualGUID(&IID_IHTMLWindow4
, riid
)) {
196 TRACE("(%p)->(IID_IHTMLWindow4 %p)\n", This
, ppv
);
197 *ppv
= &This
->IHTMLWindow4_iface
;
198 }else if(IsEqualGUID(&IID_IHTMLPrivateWindow
, riid
)) {
199 TRACE("(%p)->(IID_IHTMLPrivateWindow %p)\n", This
, ppv
);
200 *ppv
= &This
->IHTMLPrivateWindow_iface
;
201 }else if(IsEqualGUID(&IID_IServiceProvider
, riid
)) {
202 TRACE("(%p)->(IID_IServiceProvider %p)\n", This
, ppv
);
203 *ppv
= &This
->IServiceProvider_iface
;
204 }else if(dispex_query_interface(&This
->dispex
, riid
, ppv
)) {
205 return *ppv
? S_OK
: E_NOINTERFACE
;
209 IUnknown_AddRef((IUnknown
*)*ppv
);
213 WARN("(%p)->(%s %p)\n", This
, debugstr_guid(riid
), ppv
);
214 return E_NOINTERFACE
;
217 static ULONG WINAPI
HTMLWindow2_AddRef(IHTMLWindow2
*iface
)
219 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
220 LONG ref
= InterlockedIncrement(&This
->ref
);
222 TRACE("(%p) ref=%d\n", This
, ref
);
227 static ULONG WINAPI
HTMLWindow2_Release(IHTMLWindow2
*iface
)
229 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
230 LONG ref
= InterlockedDecrement(&This
->ref
);
232 TRACE("(%p) ref=%d\n", This
, ref
);
237 remove_target_tasks(This
->task_magic
);
238 set_window_bscallback(This
, NULL
);
239 set_current_mon(This
, NULL
);
240 window_set_docnode(This
, NULL
);
241 release_children(This
);
244 IInternetSecurityManager_Release(This
->secmgr
);
246 if(This
->frame_element
)
247 This
->frame_element
->content_window
= NULL
;
249 if(This
->option_factory
) {
250 This
->option_factory
->window
= NULL
;
251 IHTMLOptionElementFactory_Release(&This
->option_factory
->IHTMLOptionElementFactory_iface
);
254 if(This
->image_factory
) {
255 This
->image_factory
->window
= NULL
;
256 IHTMLImageElementFactory_Release(&This
->image_factory
->IHTMLImageElementFactory_iface
);
260 This
->location
->window
= NULL
;
261 IHTMLLocation_Release(&This
->location
->IHTMLLocation_iface
);
265 IHTMLScreen_Release(This
->screen
);
267 for(i
=0; i
< This
->global_prop_cnt
; i
++)
268 heap_free(This
->global_props
[i
].name
);
270 This
->window_ref
->window
= NULL
;
271 windowref_release(This
->window_ref
);
273 heap_free(This
->global_props
);
274 release_script_hosts(This
);
277 nsIDOMWindow_Release(This
->nswindow
);
279 list_remove(&This
->entry
);
280 release_dispex(&This
->dispex
);
287 static HRESULT WINAPI
HTMLWindow2_GetTypeInfoCount(IHTMLWindow2
*iface
, UINT
*pctinfo
)
289 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
291 return IDispatchEx_GetTypeInfoCount(&This
->IDispatchEx_iface
, pctinfo
);
294 static HRESULT WINAPI
HTMLWindow2_GetTypeInfo(IHTMLWindow2
*iface
, UINT iTInfo
,
295 LCID lcid
, ITypeInfo
**ppTInfo
)
297 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
299 return IDispatchEx_GetTypeInfo(&This
->IDispatchEx_iface
, iTInfo
, lcid
, ppTInfo
);
302 static HRESULT WINAPI
HTMLWindow2_GetIDsOfNames(IHTMLWindow2
*iface
, REFIID riid
,
303 LPOLESTR
*rgszNames
, UINT cNames
,
304 LCID lcid
, DISPID
*rgDispId
)
306 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
308 return IDispatchEx_GetIDsOfNames(&This
->IDispatchEx_iface
, riid
, rgszNames
, cNames
, lcid
,
312 static HRESULT WINAPI
HTMLWindow2_Invoke(IHTMLWindow2
*iface
, DISPID dispIdMember
,
313 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
314 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
316 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
318 return IDispatchEx_Invoke(&This
->IDispatchEx_iface
, dispIdMember
, riid
, lcid
, wFlags
,
319 pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
322 static HRESULT
get_frame_by_index(nsIDOMWindowCollection
*nsFrames
, PRUint32 index
, HTMLWindow
**ret
)
325 nsIDOMWindow
*nsWindow
;
328 nsres
= nsIDOMWindowCollection_GetLength(nsFrames
, &length
);
329 if(NS_FAILED(nsres
)) {
330 FIXME("nsIDOMWindowCollection_GetLength failed: 0x%08x\n", nsres
);
335 return DISP_E_MEMBERNOTFOUND
;
337 nsres
= nsIDOMWindowCollection_Item(nsFrames
, index
, &nsWindow
);
338 if(NS_FAILED(nsres
)) {
339 FIXME("nsIDOMWindowCollection_Item failed: 0x%08x\n", nsres
);
343 *ret
= nswindow_to_window(nsWindow
);
345 nsIDOMWindow_Release(nsWindow
);
350 static HRESULT WINAPI
HTMLWindow2_item(IHTMLWindow2
*iface
, VARIANT
*pvarIndex
, VARIANT
*pvarResult
)
352 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
353 nsIDOMWindowCollection
*nsFrames
;
358 TRACE("(%p)->(%p %p)\n", This
, pvarIndex
, pvarResult
);
360 nsres
= nsIDOMWindow_GetFrames(This
->nswindow
, &nsFrames
);
361 if(NS_FAILED(nsres
)) {
362 FIXME("nsIDOMWindow_GetFrames failed: 0x%08x\n", nsres
);
366 if(V_VT(pvarIndex
) == VT_I4
) {
367 int index
= V_I4(pvarIndex
);
368 TRACE("Getting index %d\n", index
);
370 hres
= DISP_E_MEMBERNOTFOUND
;
373 hres
= get_frame_by_index(nsFrames
, index
, &window
);
376 }else if(V_VT(pvarIndex
) == VT_UINT
) {
377 unsigned int index
= V_UINT(pvarIndex
);
378 TRACE("Getting index %u\n", index
);
379 hres
= get_frame_by_index(nsFrames
, index
, &window
);
382 }else if(V_VT(pvarIndex
) == VT_BSTR
) {
383 BSTR str
= V_BSTR(pvarIndex
);
386 TRACE("Getting name %s\n", wine_dbgstr_w(str
));
388 nsres
= nsIDOMWindowCollection_GetLength(nsFrames
, &length
);
391 for(i
= 0; i
< length
&& !window
; ++i
) {
392 HTMLWindow
*cur_window
;
393 nsIDOMWindow
*nsWindow
;
396 nsres
= nsIDOMWindowCollection_Item(nsFrames
, i
, &nsWindow
);
397 if(NS_FAILED(nsres
)) {
398 FIXME("nsIDOMWindowCollection_Item failed: 0x%08x\n", nsres
);
403 cur_window
= nswindow_to_window(nsWindow
);
405 nsIDOMWindow_Release(nsWindow
);
407 hres
= IHTMLElement_get_id(&cur_window
->frame_element
->element
.IHTMLElement_iface
, &id
);
409 FIXME("IHTMLElement_get_id failed: 0x%08x\n", hres
);
413 if(!strcmpW(id
, str
))
420 hres
= DISP_E_MEMBERNOTFOUND
;
428 IHTMLWindow2_AddRef(&window
->IHTMLWindow2_iface
);
429 V_VT(pvarResult
) = VT_DISPATCH
;
430 V_DISPATCH(pvarResult
) = (IDispatch
*)window
;
435 nsIDOMWindowCollection_Release(nsFrames
);
440 static HRESULT WINAPI
HTMLWindow2_get_length(IHTMLWindow2
*iface
, LONG
*p
)
442 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
443 nsIDOMWindowCollection
*nscollection
;
447 TRACE("(%p)->(%p)\n", This
, p
);
449 nsres
= nsIDOMWindow_GetFrames(This
->nswindow
, &nscollection
);
450 if(NS_FAILED(nsres
)) {
451 ERR("GetFrames failed: %08x\n", nsres
);
455 nsres
= nsIDOMWindowCollection_GetLength(nscollection
, &length
);
456 nsIDOMWindowCollection_Release(nscollection
);
457 if(NS_FAILED(nsres
)) {
458 ERR("GetLength failed: %08x\n", nsres
);
466 static HRESULT WINAPI
HTMLWindow2_get_frames(IHTMLWindow2
*iface
, IHTMLFramesCollection2
**p
)
468 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
469 FIXME("(%p)->(%p): semi-stub\n", This
, p
);
471 /* FIXME: Should return a separate Window object */
472 *p
= (IHTMLFramesCollection2
*)&This
->IHTMLWindow2_iface
;
473 HTMLWindow2_AddRef(iface
);
477 static HRESULT WINAPI
HTMLWindow2_put_defaultStatus(IHTMLWindow2
*iface
, BSTR v
)
479 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
480 FIXME("(%p)->(%s)\n", This
, debugstr_w(v
));
484 static HRESULT WINAPI
HTMLWindow2_get_defaultStatus(IHTMLWindow2
*iface
, BSTR
*p
)
486 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
487 FIXME("(%p)->(%p)\n", This
, p
);
491 static HRESULT WINAPI
HTMLWindow2_put_status(IHTMLWindow2
*iface
, BSTR v
)
493 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
494 FIXME("(%p)->(%s)\n", This
, debugstr_w(v
));
498 static HRESULT WINAPI
HTMLWindow2_get_status(IHTMLWindow2
*iface
, BSTR
*p
)
500 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
501 FIXME("(%p)->(%p)\n", This
, p
);
505 static HRESULT WINAPI
HTMLWindow2_setTimeout(IHTMLWindow2
*iface
, BSTR expression
,
506 LONG msec
, VARIANT
*language
, LONG
*timerID
)
508 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
511 TRACE("(%p)->(%s %d %p %p)\n", This
, debugstr_w(expression
), msec
, language
, timerID
);
513 V_VT(&expr_var
) = VT_BSTR
;
514 V_BSTR(&expr_var
) = expression
;
516 return IHTMLWindow3_setTimeout(&This
->IHTMLWindow3_iface
, &expr_var
, msec
, language
, timerID
);
519 static HRESULT WINAPI
HTMLWindow2_clearTimeout(IHTMLWindow2
*iface
, LONG timerID
)
521 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
523 TRACE("(%p)->(%d)\n", This
, timerID
);
525 return clear_task_timer(&This
->doc
->basedoc
, FALSE
, timerID
);
528 #define MAX_MESSAGE_LEN 2000
530 static HRESULT WINAPI
HTMLWindow2_alert(IHTMLWindow2
*iface
, BSTR message
)
532 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
533 WCHAR title
[100], *msg
= message
;
536 TRACE("(%p)->(%s)\n", This
, debugstr_w(message
));
538 if(!LoadStringW(get_shdoclc(), IDS_MESSAGE_BOX_TITLE
, title
,
539 sizeof(title
)/sizeof(WCHAR
))) {
540 WARN("Could not load message box title: %d\n", GetLastError());
544 len
= SysStringLen(message
);
545 if(len
> MAX_MESSAGE_LEN
) {
546 msg
= heap_alloc((MAX_MESSAGE_LEN
+1)*sizeof(WCHAR
));
548 return E_OUTOFMEMORY
;
549 memcpy(msg
, message
, MAX_MESSAGE_LEN
*sizeof(WCHAR
));
550 msg
[MAX_MESSAGE_LEN
] = 0;
553 MessageBoxW(This
->doc_obj
->hwnd
, msg
, title
, MB_ICONWARNING
);
559 static HRESULT WINAPI
HTMLWindow2_confirm(IHTMLWindow2
*iface
, BSTR message
,
560 VARIANT_BOOL
*confirmed
)
562 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
565 TRACE("(%p)->(%s %p)\n", This
, debugstr_w(message
), confirmed
);
567 if(!confirmed
) return E_INVALIDARG
;
569 if(!LoadStringW(get_shdoclc(), IDS_MESSAGE_BOX_TITLE
, wszTitle
,
570 sizeof(wszTitle
)/sizeof(WCHAR
))) {
571 WARN("Could not load message box title: %d\n", GetLastError());
572 *confirmed
= VARIANT_TRUE
;
576 if(MessageBoxW(This
->doc_obj
->hwnd
, message
, wszTitle
,
577 MB_OKCANCEL
|MB_ICONQUESTION
)==IDOK
)
578 *confirmed
= VARIANT_TRUE
;
579 else *confirmed
= VARIANT_FALSE
;
591 static INT_PTR CALLBACK
prompt_dlgproc(HWND hwnd
, UINT msg
,
592 WPARAM wparam
, LPARAM lparam
)
598 prompt_arg
*arg
= (prompt_arg
*)lparam
;
601 if(!LoadStringW(get_shdoclc(), IDS_MESSAGE_BOX_TITLE
, wszTitle
,
602 sizeof(wszTitle
)/sizeof(WCHAR
))) {
603 WARN("Could not load message box title: %d\n", GetLastError());
604 EndDialog(hwnd
, wparam
);
608 SetWindowLongPtrW(hwnd
, DWLP_USER
, lparam
);
609 SetWindowTextW(hwnd
, wszTitle
);
610 SetWindowTextW(GetDlgItem(hwnd
, ID_PROMPT_PROMPT
), arg
->message
);
611 SetWindowTextW(GetDlgItem(hwnd
, ID_PROMPT_EDIT
), arg
->dststr
);
617 case MAKEWPARAM(IDCANCEL
, BN_CLICKED
):
618 EndDialog(hwnd
, wparam
);
620 case MAKEWPARAM(IDOK
, BN_CLICKED
):
623 (prompt_arg
*)GetWindowLongPtrW(hwnd
, DWLP_USER
);
624 HWND hwndPrompt
= GetDlgItem(hwnd
, ID_PROMPT_EDIT
);
625 INT len
= GetWindowTextLengthW(hwndPrompt
);
629 EndDialog(hwnd
, wparam
);
633 V_VT(arg
->textdata
) = VT_BSTR
;
634 if(!len
&& !arg
->dststr
)
635 V_BSTR(arg
->textdata
) = NULL
;
638 V_BSTR(arg
->textdata
) = SysAllocStringLen(NULL
, len
);
639 GetWindowTextW(hwndPrompt
, V_BSTR(arg
->textdata
), len
+1);
641 EndDialog(hwnd
, wparam
);
647 EndDialog(hwnd
, IDCANCEL
);
654 static HRESULT WINAPI
HTMLWindow2_prompt(IHTMLWindow2
*iface
, BSTR message
,
655 BSTR dststr
, VARIANT
*textdata
)
657 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
660 TRACE("(%p)->(%s %s %p)\n", This
, debugstr_w(message
), debugstr_w(dststr
), textdata
);
662 if(textdata
) V_VT(textdata
) = VT_NULL
;
664 arg
.message
= message
;
666 arg
.textdata
= textdata
;
668 DialogBoxParamW(hInst
, MAKEINTRESOURCEW(ID_PROMPT_DIALOG
),
669 This
->doc_obj
->hwnd
, prompt_dlgproc
, (LPARAM
)&arg
);
673 static HRESULT WINAPI
HTMLWindow2_get_Image(IHTMLWindow2
*iface
, IHTMLImageElementFactory
**p
)
675 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
677 TRACE("(%p)->(%p)\n", This
, p
);
679 if(!This
->image_factory
)
680 This
->image_factory
= HTMLImageElementFactory_Create(This
);
682 *p
= &This
->image_factory
->IHTMLImageElementFactory_iface
;
683 IHTMLImageElementFactory_AddRef(*p
);
688 static HRESULT WINAPI
HTMLWindow2_get_location(IHTMLWindow2
*iface
, IHTMLLocation
**p
)
690 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
691 HTMLLocation
*location
;
694 TRACE("(%p)->(%p)\n", This
, p
);
696 hres
= get_location(This
, &location
);
700 *p
= &location
->IHTMLLocation_iface
;
704 static HRESULT WINAPI
HTMLWindow2_get_history(IHTMLWindow2
*iface
, IOmHistory
**p
)
706 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
707 FIXME("(%p)->(%p)\n", This
, p
);
711 static HRESULT WINAPI
HTMLWindow2_close(IHTMLWindow2
*iface
)
713 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
714 FIXME("(%p)->()\n", This
);
718 static HRESULT WINAPI
HTMLWindow2_put_opener(IHTMLWindow2
*iface
, VARIANT v
)
720 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
721 FIXME("(%p)->(v(%d))\n", This
, V_VT(&v
));
725 static HRESULT WINAPI
HTMLWindow2_get_opener(IHTMLWindow2
*iface
, VARIANT
*p
)
727 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
728 FIXME("(%p)->(%p)\n", This
, p
);
732 static HRESULT WINAPI
HTMLWindow2_get_navigator(IHTMLWindow2
*iface
, IOmNavigator
**p
)
734 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
736 TRACE("(%p)->(%p)\n", This
, p
);
738 *p
= OmNavigator_Create();
742 static HRESULT WINAPI
HTMLWindow2_put_name(IHTMLWindow2
*iface
, BSTR v
)
744 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
748 TRACE("(%p)->(%s)\n", This
, debugstr_w(v
));
750 nsAString_InitDepend(&name_str
, v
);
751 nsres
= nsIDOMWindow_SetName(This
->nswindow
, &name_str
);
752 nsAString_Finish(&name_str
);
754 ERR("SetName failed: %08x\n", nsres
);
759 static HRESULT WINAPI
HTMLWindow2_get_name(IHTMLWindow2
*iface
, BSTR
*p
)
761 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
766 TRACE("(%p)->(%p)\n", This
, p
);
768 nsAString_Init(&name_str
, NULL
);
769 nsres
= nsIDOMWindow_GetName(This
->nswindow
, &name_str
);
770 if(NS_SUCCEEDED(nsres
)) {
771 const PRUnichar
*name
;
773 nsAString_GetData(&name_str
, &name
);
775 *p
= SysAllocString(name
);
776 hres
= *p
? S_OK
: E_OUTOFMEMORY
;
782 ERR("GetName failed: %08x\n", nsres
);
785 nsAString_Finish(&name_str
);
790 static HRESULT WINAPI
HTMLWindow2_get_parent(IHTMLWindow2
*iface
, IHTMLWindow2
**p
)
792 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
793 TRACE("(%p)->(%p)\n", This
, p
);
796 *p
= &This
->parent
->IHTMLWindow2_iface
;
797 IHTMLWindow2_AddRef(*p
);
804 static HRESULT WINAPI
HTMLWindow2_open(IHTMLWindow2
*iface
, BSTR url
, BSTR name
,
805 BSTR features
, VARIANT_BOOL replace
, IHTMLWindow2
**pomWindowResult
)
807 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
808 FIXME("(%p)->(%s %s %s %x %p)\n", This
, debugstr_w(url
), debugstr_w(name
),
809 debugstr_w(features
), replace
, pomWindowResult
);
813 static HRESULT WINAPI
HTMLWindow2_get_self(IHTMLWindow2
*iface
, IHTMLWindow2
**p
)
815 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
817 TRACE("(%p)->(%p)\n", This
, p
);
819 /* FIXME: We should return kind of proxy window here. */
820 IHTMLWindow2_AddRef(&This
->IHTMLWindow2_iface
);
821 *p
= &This
->IHTMLWindow2_iface
;
825 static HRESULT WINAPI
HTMLWindow2_get_top(IHTMLWindow2
*iface
, IHTMLWindow2
**p
)
827 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
829 TRACE("(%p)->(%p)\n", This
, p
);
834 *p
= &curr
->IHTMLWindow2_iface
;
835 IHTMLWindow2_AddRef(*p
);
840 static HRESULT WINAPI
HTMLWindow2_get_window(IHTMLWindow2
*iface
, IHTMLWindow2
**p
)
842 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
844 TRACE("(%p)->(%p)\n", This
, p
);
846 /* FIXME: We should return kind of proxy window here. */
847 IHTMLWindow2_AddRef(&This
->IHTMLWindow2_iface
);
848 *p
= &This
->IHTMLWindow2_iface
;
852 static HRESULT WINAPI
HTMLWindow2_navigate(IHTMLWindow2
*iface
, BSTR url
)
854 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
855 FIXME("(%p)->(%s)\n", This
, debugstr_w(url
));
859 static HRESULT WINAPI
HTMLWindow2_put_onfocus(IHTMLWindow2
*iface
, VARIANT v
)
861 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
862 FIXME("(%p)->(v(%d))\n", This
, V_VT(&v
));
866 static HRESULT WINAPI
HTMLWindow2_get_onfocus(IHTMLWindow2
*iface
, VARIANT
*p
)
868 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
869 FIXME("(%p)->(%p)\n", This
, p
);
873 static HRESULT WINAPI
HTMLWindow2_put_onblur(IHTMLWindow2
*iface
, VARIANT v
)
875 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
876 FIXME("(%p)->(v(%d))\n", This
, V_VT(&v
));
880 static HRESULT WINAPI
HTMLWindow2_get_onblur(IHTMLWindow2
*iface
, VARIANT
*p
)
882 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
883 FIXME("(%p)->(%p)\n", This
, p
);
887 static HRESULT WINAPI
HTMLWindow2_put_onload(IHTMLWindow2
*iface
, VARIANT v
)
889 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
891 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&v
));
893 return set_window_event(This
, EVENTID_LOAD
, &v
);
896 static HRESULT WINAPI
HTMLWindow2_get_onload(IHTMLWindow2
*iface
, VARIANT
*p
)
898 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
900 TRACE("(%p)->(%p)\n", This
, p
);
902 return get_window_event(This
, EVENTID_LOAD
, p
);
905 static HRESULT WINAPI
HTMLWindow2_put_onbeforeunload(IHTMLWindow2
*iface
, VARIANT v
)
907 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
909 TRACE("(%p)->(v(%d))\n", This
, V_VT(&v
));
911 return set_window_event(This
, EVENTID_BEFOREUNLOAD
, &v
);
914 static HRESULT WINAPI
HTMLWindow2_get_onbeforeunload(IHTMLWindow2
*iface
, VARIANT
*p
)
916 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
918 TRACE("(%p)->(%p)\n", This
, p
);
920 return get_window_event(This
, EVENTID_BEFOREUNLOAD
, p
);
923 static HRESULT WINAPI
HTMLWindow2_put_onunload(IHTMLWindow2
*iface
, VARIANT v
)
925 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
926 FIXME("(%p)->(v(%d))\n", This
, V_VT(&v
));
930 static HRESULT WINAPI
HTMLWindow2_get_onunload(IHTMLWindow2
*iface
, VARIANT
*p
)
932 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
933 FIXME("(%p)->(%p)\n", This
, p
);
937 static HRESULT WINAPI
HTMLWindow2_put_onhelp(IHTMLWindow2
*iface
, VARIANT v
)
939 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
940 FIXME("(%p)->(v(%d))\n", This
, V_VT(&v
));
944 static HRESULT WINAPI
HTMLWindow2_get_onhelp(IHTMLWindow2
*iface
, VARIANT
*p
)
946 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
947 FIXME("(%p)->(%p)\n", This
, p
);
951 static HRESULT WINAPI
HTMLWindow2_put_onerror(IHTMLWindow2
*iface
, VARIANT v
)
953 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
954 FIXME("(%p)->(v(%d))\n", This
, V_VT(&v
));
958 static HRESULT WINAPI
HTMLWindow2_get_onerror(IHTMLWindow2
*iface
, VARIANT
*p
)
960 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
961 FIXME("(%p)->(%p)\n", This
, p
);
965 static HRESULT WINAPI
HTMLWindow2_put_onresize(IHTMLWindow2
*iface
, VARIANT v
)
967 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
969 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&v
));
971 return set_window_event(This
, EVENTID_RESIZE
, &v
);
974 static HRESULT WINAPI
HTMLWindow2_get_onresize(IHTMLWindow2
*iface
, VARIANT
*p
)
976 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
978 TRACE("(%p)->(%p)\n", This
, p
);
980 return get_window_event(This
, EVENTID_RESIZE
, p
);
983 static HRESULT WINAPI
HTMLWindow2_put_onscroll(IHTMLWindow2
*iface
, VARIANT v
)
985 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
986 FIXME("(%p)->(v(%d))\n", This
, V_VT(&v
));
990 static HRESULT WINAPI
HTMLWindow2_get_onscroll(IHTMLWindow2
*iface
, VARIANT
*p
)
992 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
993 FIXME("(%p)->(%p)\n", This
, p
);
997 static HRESULT WINAPI
HTMLWindow2_get_document(IHTMLWindow2
*iface
, IHTMLDocument2
**p
)
999 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1001 TRACE("(%p)->(%p)\n", This
, p
);
1004 /* FIXME: We should return a wrapper object here */
1005 *p
= &This
->doc
->basedoc
.IHTMLDocument2_iface
;
1006 IHTMLDocument2_AddRef(*p
);
1014 static HRESULT WINAPI
HTMLWindow2_get_event(IHTMLWindow2
*iface
, IHTMLEventObj
**p
)
1016 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1018 TRACE("(%p)->(%p)\n", This
, p
);
1021 IHTMLEventObj_AddRef(This
->event
);
1026 static HRESULT WINAPI
HTMLWindow2_get__newEnum(IHTMLWindow2
*iface
, IUnknown
**p
)
1028 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1029 FIXME("(%p)->(%p)\n", This
, p
);
1033 static HRESULT WINAPI
HTMLWindow2_showModalDialog(IHTMLWindow2
*iface
, BSTR dialog
,
1034 VARIANT
*varArgIn
, VARIANT
*varOptions
, VARIANT
*varArgOut
)
1036 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1037 FIXME("(%p)->(%s %p %p %p)\n", This
, debugstr_w(dialog
), varArgIn
, varOptions
, varArgOut
);
1041 static HRESULT WINAPI
HTMLWindow2_showHelp(IHTMLWindow2
*iface
, BSTR helpURL
, VARIANT helpArg
,
1044 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1045 FIXME("(%p)->(%s v(%d) %s)\n", This
, debugstr_w(helpURL
), V_VT(&helpArg
), debugstr_w(features
));
1049 static HRESULT WINAPI
HTMLWindow2_get_screen(IHTMLWindow2
*iface
, IHTMLScreen
**p
)
1051 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1053 TRACE("(%p)->(%p)\n", This
, p
);
1058 hres
= HTMLScreen_Create(&This
->screen
);
1064 IHTMLScreen_AddRef(This
->screen
);
1068 static HRESULT WINAPI
HTMLWindow2_get_Option(IHTMLWindow2
*iface
, IHTMLOptionElementFactory
**p
)
1070 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1072 TRACE("(%p)->(%p)\n", This
, p
);
1074 if(!This
->option_factory
)
1075 This
->option_factory
= HTMLOptionElementFactory_Create(This
);
1077 *p
= &This
->option_factory
->IHTMLOptionElementFactory_iface
;
1078 IHTMLOptionElementFactory_AddRef(*p
);
1083 static HRESULT WINAPI
HTMLWindow2_focus(IHTMLWindow2
*iface
)
1085 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1087 TRACE("(%p)->()\n", This
);
1090 SetFocus(This
->doc_obj
->hwnd
);
1094 static HRESULT WINAPI
HTMLWindow2_get_closed(IHTMLWindow2
*iface
, VARIANT_BOOL
*p
)
1096 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1097 FIXME("(%p)->(%p)\n", This
, p
);
1101 static HRESULT WINAPI
HTMLWindow2_blur(IHTMLWindow2
*iface
)
1103 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1104 FIXME("(%p)->()\n", This
);
1108 static HRESULT WINAPI
HTMLWindow2_scroll(IHTMLWindow2
*iface
, LONG x
, LONG y
)
1110 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1111 FIXME("(%p)->(%d %d)\n", This
, x
, y
);
1115 static HRESULT WINAPI
HTMLWindow2_get_clientInformation(IHTMLWindow2
*iface
, IOmNavigator
**p
)
1117 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1118 FIXME("(%p)->(%p)\n", This
, p
);
1122 static HRESULT WINAPI
HTMLWindow2_setInterval(IHTMLWindow2
*iface
, BSTR expression
,
1123 LONG msec
, VARIANT
*language
, LONG
*timerID
)
1125 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1128 TRACE("(%p)->(%s %d %p %p)\n", This
, debugstr_w(expression
), msec
, language
, timerID
);
1130 V_VT(&expr
) = VT_BSTR
;
1131 V_BSTR(&expr
) = expression
;
1132 return IHTMLWindow3_setInterval(&This
->IHTMLWindow3_iface
, &expr
, msec
, language
, timerID
);
1135 static HRESULT WINAPI
HTMLWindow2_clearInterval(IHTMLWindow2
*iface
, LONG timerID
)
1137 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1139 TRACE("(%p)->(%d)\n", This
, timerID
);
1141 return clear_task_timer(&This
->doc
->basedoc
, TRUE
, timerID
);
1144 static HRESULT WINAPI
HTMLWindow2_put_offscreenBuffering(IHTMLWindow2
*iface
, VARIANT v
)
1146 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1147 FIXME("(%p)->(v(%d))\n", This
, V_VT(&v
));
1151 static HRESULT WINAPI
HTMLWindow2_get_offscreenBuffering(IHTMLWindow2
*iface
, VARIANT
*p
)
1153 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1154 FIXME("(%p)->(%p)\n", This
, p
);
1158 static HRESULT WINAPI
HTMLWindow2_execScript(IHTMLWindow2
*iface
, BSTR scode
, BSTR language
,
1161 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1163 TRACE("(%p)->(%s %s %p)\n", This
, debugstr_w(scode
), debugstr_w(language
), pvarRet
);
1165 return exec_script(This
, scode
, language
, pvarRet
);
1168 static HRESULT WINAPI
HTMLWindow2_toString(IHTMLWindow2
*iface
, BSTR
*String
)
1170 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1172 static const WCHAR objectW
[] = {'[','o','b','j','e','c','t',']',0};
1174 TRACE("(%p)->(%p)\n", This
, String
);
1177 return E_INVALIDARG
;
1179 *String
= SysAllocString(objectW
);
1180 return *String
? S_OK
: E_OUTOFMEMORY
;
1183 static HRESULT WINAPI
HTMLWindow2_scrollBy(IHTMLWindow2
*iface
, LONG x
, LONG y
)
1185 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1188 TRACE("(%p)->(%d %d)\n", This
, x
, y
);
1190 nsres
= nsIDOMWindow_ScrollBy(This
->nswindow
, x
, y
);
1191 if(NS_FAILED(nsres
))
1192 ERR("ScrollBy failed: %08x\n", nsres
);
1197 static HRESULT WINAPI
HTMLWindow2_scrollTo(IHTMLWindow2
*iface
, LONG x
, LONG y
)
1199 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1202 TRACE("(%p)->(%d %d)\n", This
, x
, y
);
1204 nsres
= nsIDOMWindow_ScrollTo(This
->nswindow
, x
, y
);
1205 if(NS_FAILED(nsres
))
1206 ERR("ScrollTo failed: %08x\n", nsres
);
1211 static HRESULT WINAPI
HTMLWindow2_moveTo(IHTMLWindow2
*iface
, LONG x
, LONG y
)
1213 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1214 FIXME("(%p)->(%d %d)\n", This
, x
, y
);
1218 static HRESULT WINAPI
HTMLWindow2_moveBy(IHTMLWindow2
*iface
, LONG x
, LONG y
)
1220 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1221 FIXME("(%p)->(%d %d)\n", This
, x
, y
);
1225 static HRESULT WINAPI
HTMLWindow2_resizeTo(IHTMLWindow2
*iface
, LONG x
, LONG y
)
1227 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1228 FIXME("(%p)->(%d %d)\n", This
, x
, y
);
1232 static HRESULT WINAPI
HTMLWindow2_resizeBy(IHTMLWindow2
*iface
, LONG x
, LONG y
)
1234 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1235 FIXME("(%p)->(%d %d)\n", This
, x
, y
);
1239 static HRESULT WINAPI
HTMLWindow2_get_external(IHTMLWindow2
*iface
, IDispatch
**p
)
1241 HTMLWindow
*This
= impl_from_IHTMLWindow2(iface
);
1243 TRACE("(%p)->(%p)\n", This
, p
);
1247 if(!This
->doc_obj
->hostui
)
1250 return IDocHostUIHandler_GetExternal(This
->doc_obj
->hostui
, p
);
1253 static const IHTMLWindow2Vtbl HTMLWindow2Vtbl
= {
1254 HTMLWindow2_QueryInterface
,
1256 HTMLWindow2_Release
,
1257 HTMLWindow2_GetTypeInfoCount
,
1258 HTMLWindow2_GetTypeInfo
,
1259 HTMLWindow2_GetIDsOfNames
,
1262 HTMLWindow2_get_length
,
1263 HTMLWindow2_get_frames
,
1264 HTMLWindow2_put_defaultStatus
,
1265 HTMLWindow2_get_defaultStatus
,
1266 HTMLWindow2_put_status
,
1267 HTMLWindow2_get_status
,
1268 HTMLWindow2_setTimeout
,
1269 HTMLWindow2_clearTimeout
,
1271 HTMLWindow2_confirm
,
1273 HTMLWindow2_get_Image
,
1274 HTMLWindow2_get_location
,
1275 HTMLWindow2_get_history
,
1277 HTMLWindow2_put_opener
,
1278 HTMLWindow2_get_opener
,
1279 HTMLWindow2_get_navigator
,
1280 HTMLWindow2_put_name
,
1281 HTMLWindow2_get_name
,
1282 HTMLWindow2_get_parent
,
1284 HTMLWindow2_get_self
,
1285 HTMLWindow2_get_top
,
1286 HTMLWindow2_get_window
,
1287 HTMLWindow2_navigate
,
1288 HTMLWindow2_put_onfocus
,
1289 HTMLWindow2_get_onfocus
,
1290 HTMLWindow2_put_onblur
,
1291 HTMLWindow2_get_onblur
,
1292 HTMLWindow2_put_onload
,
1293 HTMLWindow2_get_onload
,
1294 HTMLWindow2_put_onbeforeunload
,
1295 HTMLWindow2_get_onbeforeunload
,
1296 HTMLWindow2_put_onunload
,
1297 HTMLWindow2_get_onunload
,
1298 HTMLWindow2_put_onhelp
,
1299 HTMLWindow2_get_onhelp
,
1300 HTMLWindow2_put_onerror
,
1301 HTMLWindow2_get_onerror
,
1302 HTMLWindow2_put_onresize
,
1303 HTMLWindow2_get_onresize
,
1304 HTMLWindow2_put_onscroll
,
1305 HTMLWindow2_get_onscroll
,
1306 HTMLWindow2_get_document
,
1307 HTMLWindow2_get_event
,
1308 HTMLWindow2_get__newEnum
,
1309 HTMLWindow2_showModalDialog
,
1310 HTMLWindow2_showHelp
,
1311 HTMLWindow2_get_screen
,
1312 HTMLWindow2_get_Option
,
1314 HTMLWindow2_get_closed
,
1317 HTMLWindow2_get_clientInformation
,
1318 HTMLWindow2_setInterval
,
1319 HTMLWindow2_clearInterval
,
1320 HTMLWindow2_put_offscreenBuffering
,
1321 HTMLWindow2_get_offscreenBuffering
,
1322 HTMLWindow2_execScript
,
1323 HTMLWindow2_toString
,
1324 HTMLWindow2_scrollBy
,
1325 HTMLWindow2_scrollTo
,
1328 HTMLWindow2_resizeTo
,
1329 HTMLWindow2_resizeBy
,
1330 HTMLWindow2_get_external
1333 static inline HTMLWindow
*impl_from_IHTMLWindow3(IHTMLWindow3
*iface
)
1335 return CONTAINING_RECORD(iface
, HTMLWindow
, IHTMLWindow3_iface
);
1338 static HRESULT WINAPI
HTMLWindow3_QueryInterface(IHTMLWindow3
*iface
, REFIID riid
, void **ppv
)
1340 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1342 return IHTMLWindow2_QueryInterface(&This
->IHTMLWindow2_iface
, riid
, ppv
);
1345 static ULONG WINAPI
HTMLWindow3_AddRef(IHTMLWindow3
*iface
)
1347 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1349 return IHTMLWindow2_AddRef(&This
->IHTMLWindow2_iface
);
1352 static ULONG WINAPI
HTMLWindow3_Release(IHTMLWindow3
*iface
)
1354 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1356 return IHTMLWindow2_Release(&This
->IHTMLWindow2_iface
);
1359 static HRESULT WINAPI
HTMLWindow3_GetTypeInfoCount(IHTMLWindow3
*iface
, UINT
*pctinfo
)
1361 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1363 return IDispatchEx_GetTypeInfoCount(&This
->IDispatchEx_iface
, pctinfo
);
1366 static HRESULT WINAPI
HTMLWindow3_GetTypeInfo(IHTMLWindow3
*iface
, UINT iTInfo
,
1367 LCID lcid
, ITypeInfo
**ppTInfo
)
1369 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1371 return IDispatchEx_GetTypeInfo(&This
->IDispatchEx_iface
, iTInfo
, lcid
, ppTInfo
);
1374 static HRESULT WINAPI
HTMLWindow3_GetIDsOfNames(IHTMLWindow3
*iface
, REFIID riid
,
1375 LPOLESTR
*rgszNames
, UINT cNames
,
1376 LCID lcid
, DISPID
*rgDispId
)
1378 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1380 return IDispatchEx_GetIDsOfNames(&This
->IDispatchEx_iface
, riid
, rgszNames
, cNames
, lcid
,
1384 static HRESULT WINAPI
HTMLWindow3_Invoke(IHTMLWindow3
*iface
, DISPID dispIdMember
,
1385 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
1386 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
1388 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1390 return IDispatchEx_Invoke(&This
->IDispatchEx_iface
, dispIdMember
, riid
, lcid
, wFlags
,
1391 pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
1394 static HRESULT WINAPI
HTMLWindow3_get_screenLeft(IHTMLWindow3
*iface
, LONG
*p
)
1396 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1397 FIXME("(%p)->(%p)\n", This
, p
);
1401 static HRESULT WINAPI
HTMLWindow3_get_screenTop(IHTMLWindow3
*iface
, LONG
*p
)
1403 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1404 FIXME("(%p)->(%p)\n", This
, p
);
1408 static HRESULT WINAPI
HTMLWindow3_attachEvent(IHTMLWindow3
*iface
, BSTR event
, IDispatch
*pDisp
, VARIANT_BOOL
*pfResult
)
1410 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1412 TRACE("(%p)->(%s %p %p)\n", This
, debugstr_w(event
), pDisp
, pfResult
);
1415 FIXME("No document\n");
1419 return attach_event(&This
->doc
->body_event_target
, NULL
, &This
->doc
->basedoc
, event
, pDisp
, pfResult
);
1422 static HRESULT WINAPI
HTMLWindow3_detachEvent(IHTMLWindow3
*iface
, BSTR event
, IDispatch
*pDisp
)
1424 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1425 FIXME("(%p)->()\n", This
);
1429 static HRESULT
window_set_timer(HTMLWindow
*This
, VARIANT
*expr
, LONG msec
, VARIANT
*language
,
1430 BOOL interval
, LONG
*timer_id
)
1432 IDispatch
*disp
= NULL
;
1434 switch(V_VT(expr
)) {
1436 disp
= V_DISPATCH(expr
);
1437 IDispatch_AddRef(disp
);
1441 disp
= script_parse_event(This
, V_BSTR(expr
));
1445 FIXME("unimplemented vt=%d\n", V_VT(expr
));
1452 *timer_id
= set_task_timer(&This
->doc
->basedoc
, msec
, interval
, disp
);
1453 IDispatch_Release(disp
);
1458 static HRESULT WINAPI
HTMLWindow3_setTimeout(IHTMLWindow3
*iface
, VARIANT
*expression
, LONG msec
,
1459 VARIANT
*language
, LONG
*timerID
)
1461 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1463 TRACE("(%p)->(%p(%d) %d %p %p)\n", This
, expression
, V_VT(expression
), msec
, language
, timerID
);
1465 return window_set_timer(This
, expression
, msec
, language
, FALSE
, timerID
);
1468 static HRESULT WINAPI
HTMLWindow3_setInterval(IHTMLWindow3
*iface
, VARIANT
*expression
, LONG msec
,
1469 VARIANT
*language
, LONG
*timerID
)
1471 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1473 TRACE("(%p)->(%p %d %p %p)\n", This
, expression
, msec
, language
, timerID
);
1475 return window_set_timer(This
, expression
, msec
, language
, TRUE
, timerID
);
1478 static HRESULT WINAPI
HTMLWindow3_print(IHTMLWindow3
*iface
)
1480 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1481 FIXME("(%p)\n", This
);
1485 static HRESULT WINAPI
HTMLWindow3_put_onbeforeprint(IHTMLWindow3
*iface
, VARIANT v
)
1487 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1488 FIXME("(%p)->()\n", This
);
1492 static HRESULT WINAPI
HTMLWindow3_get_onbeforeprint(IHTMLWindow3
*iface
, VARIANT
*p
)
1494 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1495 FIXME("(%p)->(%p)\n", This
, p
);
1499 static HRESULT WINAPI
HTMLWindow3_put_onafterprint(IHTMLWindow3
*iface
, VARIANT v
)
1501 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1502 FIXME("(%p)->()\n", This
);
1506 static HRESULT WINAPI
HTMLWindow3_get_onafterprint(IHTMLWindow3
*iface
, VARIANT
*p
)
1508 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1509 FIXME("(%p)->(%p)\n", This
, p
);
1513 static HRESULT WINAPI
HTMLWindow3_get_clipboardData(IHTMLWindow3
*iface
, IHTMLDataTransfer
**p
)
1515 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1516 FIXME("(%p)->(%p)\n", This
, p
);
1520 static HRESULT WINAPI
HTMLWindow3_showModelessDialog(IHTMLWindow3
*iface
, BSTR url
,
1521 VARIANT
*varArgIn
, VARIANT
*options
, IHTMLWindow2
**pDialog
)
1523 HTMLWindow
*This
= impl_from_IHTMLWindow3(iface
);
1524 FIXME("(%p)->(%s %p %p %p)\n", This
, debugstr_w(url
), varArgIn
, options
, pDialog
);
1528 static const IHTMLWindow3Vtbl HTMLWindow3Vtbl
= {
1529 HTMLWindow3_QueryInterface
,
1531 HTMLWindow3_Release
,
1532 HTMLWindow3_GetTypeInfoCount
,
1533 HTMLWindow3_GetTypeInfo
,
1534 HTMLWindow3_GetIDsOfNames
,
1536 HTMLWindow3_get_screenLeft
,
1537 HTMLWindow3_get_screenTop
,
1538 HTMLWindow3_attachEvent
,
1539 HTMLWindow3_detachEvent
,
1540 HTMLWindow3_setTimeout
,
1541 HTMLWindow3_setInterval
,
1543 HTMLWindow3_put_onbeforeprint
,
1544 HTMLWindow3_get_onbeforeprint
,
1545 HTMLWindow3_put_onafterprint
,
1546 HTMLWindow3_get_onafterprint
,
1547 HTMLWindow3_get_clipboardData
,
1548 HTMLWindow3_showModelessDialog
1551 static inline HTMLWindow
*impl_from_IHTMLWindow4(IHTMLWindow4
*iface
)
1553 return CONTAINING_RECORD(iface
, HTMLWindow
, IHTMLWindow4_iface
);
1556 static HRESULT WINAPI
HTMLWindow4_QueryInterface(IHTMLWindow4
*iface
, REFIID riid
, void **ppv
)
1558 HTMLWindow
*This
= impl_from_IHTMLWindow4(iface
);
1560 return IHTMLWindow2_QueryInterface(&This
->IHTMLWindow2_iface
, riid
, ppv
);
1563 static ULONG WINAPI
HTMLWindow4_AddRef(IHTMLWindow4
*iface
)
1565 HTMLWindow
*This
= impl_from_IHTMLWindow4(iface
);
1567 return IHTMLWindow2_AddRef(&This
->IHTMLWindow2_iface
);
1570 static ULONG WINAPI
HTMLWindow4_Release(IHTMLWindow4
*iface
)
1572 HTMLWindow
*This
= impl_from_IHTMLWindow4(iface
);
1574 return IHTMLWindow2_Release(&This
->IHTMLWindow2_iface
);
1577 static HRESULT WINAPI
HTMLWindow4_GetTypeInfoCount(IHTMLWindow4
*iface
, UINT
*pctinfo
)
1579 HTMLWindow
*This
= impl_from_IHTMLWindow4(iface
);
1581 return IDispatchEx_GetTypeInfoCount(&This
->IDispatchEx_iface
, pctinfo
);
1584 static HRESULT WINAPI
HTMLWindow4_GetTypeInfo(IHTMLWindow4
*iface
, UINT iTInfo
,
1585 LCID lcid
, ITypeInfo
**ppTInfo
)
1587 HTMLWindow
*This
= impl_from_IHTMLWindow4(iface
);
1589 return IDispatchEx_GetTypeInfo(&This
->IDispatchEx_iface
, iTInfo
, lcid
, ppTInfo
);
1592 static HRESULT WINAPI
HTMLWindow4_GetIDsOfNames(IHTMLWindow4
*iface
, REFIID riid
,
1593 LPOLESTR
*rgszNames
, UINT cNames
,
1594 LCID lcid
, DISPID
*rgDispId
)
1596 HTMLWindow
*This
= impl_from_IHTMLWindow4(iface
);
1598 return IDispatchEx_GetIDsOfNames(&This
->IDispatchEx_iface
, riid
, rgszNames
, cNames
, lcid
,
1602 static HRESULT WINAPI
HTMLWindow4_Invoke(IHTMLWindow4
*iface
, DISPID dispIdMember
,
1603 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
1604 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
1606 HTMLWindow
*This
= impl_from_IHTMLWindow4(iface
);
1608 return IDispatchEx_Invoke(&This
->IDispatchEx_iface
, dispIdMember
, riid
, lcid
, wFlags
,
1609 pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
1612 static HRESULT WINAPI
HTMLWindow4_createPopup(IHTMLWindow4
*iface
, VARIANT
*varArgIn
,
1613 IDispatch
**ppPopup
)
1615 HTMLWindow
*This
= impl_from_IHTMLWindow4(iface
);
1616 FIXME("(%p)->(%p %p)\n", This
, varArgIn
, ppPopup
);
1620 static HRESULT WINAPI
HTMLWindow4_get_frameElement(IHTMLWindow4
*iface
, IHTMLFrameBase
**p
)
1622 HTMLWindow
*This
= impl_from_IHTMLWindow4(iface
);
1623 TRACE("(%p)->(%p)\n", This
, p
);
1625 if(This
->frame_element
) {
1626 *p
= &This
->frame_element
->IHTMLFrameBase_iface
;
1627 IHTMLFrameBase_AddRef(*p
);
1634 static const IHTMLWindow4Vtbl HTMLWindow4Vtbl
= {
1635 HTMLWindow4_QueryInterface
,
1637 HTMLWindow4_Release
,
1638 HTMLWindow4_GetTypeInfoCount
,
1639 HTMLWindow4_GetTypeInfo
,
1640 HTMLWindow4_GetIDsOfNames
,
1642 HTMLWindow4_createPopup
,
1643 HTMLWindow4_get_frameElement
1646 static inline HTMLWindow
*impl_from_IHTMLPrivateWindow(IHTMLPrivateWindow
*iface
)
1648 return CONTAINING_RECORD(iface
, HTMLWindow
, IHTMLPrivateWindow_iface
);
1651 static HRESULT WINAPI
HTMLPrivateWindow_QueryInterface(IHTMLPrivateWindow
*iface
, REFIID riid
, void **ppv
)
1653 HTMLWindow
*This
= impl_from_IHTMLPrivateWindow(iface
);
1655 return IHTMLWindow2_QueryInterface(&This
->IHTMLWindow2_iface
, riid
, ppv
);
1658 static ULONG WINAPI
HTMLPrivateWindow_AddRef(IHTMLPrivateWindow
*iface
)
1660 HTMLWindow
*This
= impl_from_IHTMLPrivateWindow(iface
);
1662 return IHTMLWindow2_AddRef(&This
->IHTMLWindow2_iface
);
1665 static ULONG WINAPI
HTMLPrivateWindow_Release(IHTMLPrivateWindow
*iface
)
1667 HTMLWindow
*This
= impl_from_IHTMLPrivateWindow(iface
);
1669 return IHTMLWindow2_Release(&This
->IHTMLWindow2_iface
);
1672 static void handle_javascript(HTMLWindow
*window
, const WCHAR
*code
)
1677 static const WCHAR jscriptW
[] = {'j','s','c','r','i','p','t',0};
1679 set_download_state(window
->doc_obj
, 1);
1681 V_VT(&v
) = VT_EMPTY
;
1682 hres
= exec_script(window
, code
, jscriptW
, &v
);
1683 if(SUCCEEDED(hres
) && V_VT(&v
) != VT_EMPTY
) {
1684 FIXME("javascirpt URL returned %s\n", debugstr_variant(&v
));
1688 if(window
->doc_obj
->view_sink
)
1689 IAdviseSink_OnViewChange(window
->doc_obj
->view_sink
, DVASPECT_CONTENT
, -1);
1691 set_download_state(window
->doc_obj
, 0);
1698 } navigate_javascript_task_t
;
1700 static void navigate_javascript_proc(task_t
*_task
)
1702 navigate_javascript_task_t
*task
= (navigate_javascript_task_t
*)_task
;
1706 task
->window
->readystate
= READYSTATE_COMPLETE
;
1708 hres
= IUri_GetPath(task
->uri
, &code
);
1709 if(SUCCEEDED(hres
)) {
1710 handle_javascript(task
->window
, code
);
1711 SysFreeString(code
);
1714 IHTMLWindow2_Release(&task
->window
->IHTMLWindow2_iface
);
1715 IUri_Release(task
->uri
);
1721 nsChannelBSC
*bscallback
;
1725 static void navigate_proc(task_t
*_task
)
1727 navigate_task_t
*task
= (navigate_task_t
*)_task
;
1730 hres
= set_moniker(&task
->window
->doc_obj
->basedoc
, task
->mon
, NULL
, task
->bscallback
, TRUE
);
1732 hres
= start_binding(task
->window
, NULL
, (BSCallback
*)task
->bscallback
, NULL
);
1734 IUnknown_Release((IUnknown
*)task
->bscallback
);
1735 IHTMLWindow2_Release(&task
->window
->IHTMLWindow2_iface
);
1736 IMoniker_Release(task
->mon
);
1739 static HRESULT WINAPI
HTMLPrivateWindow_SuperNavigate(IHTMLPrivateWindow
*iface
, BSTR url
, BSTR arg2
, BSTR arg3
,
1740 BSTR arg4
, VARIANT
*post_data_var
, VARIANT
*headers_var
, ULONG flags
)
1742 HTMLWindow
*This
= impl_from_IHTMLPrivateWindow(iface
);
1743 DWORD post_data_size
= 0;
1744 BYTE
*post_data
= NULL
;
1745 WCHAR
*headers
= NULL
;
1753 TRACE("(%p)->(%s %s %s %s %s %s %x)\n", This
, debugstr_w(url
), debugstr_w(arg2
), debugstr_w(arg3
), debugstr_w(arg4
),
1754 debugstr_variant(post_data_var
), debugstr_variant(headers_var
), flags
);
1757 if(This
->doc_obj
->hostui
) {
1758 OLECHAR
*translated_url
= NULL
;
1760 hres
= IDocHostUIHandler_TranslateUrl(This
->doc_obj
->hostui
, 0, url
, &translated_url
);
1761 if(hres
== S_OK
&& translated_url
) {
1762 new_url
= SysAllocString(translated_url
);
1763 CoTaskMemFree(translated_url
);
1767 if(This
->doc_obj
->client
) {
1768 IOleCommandTarget
*cmdtrg
;
1770 hres
= IOleClientSite_QueryInterface(This
->doc_obj
->client
, &IID_IOleCommandTarget
, (void**)&cmdtrg
);
1771 if(SUCCEEDED(hres
)) {
1774 V_VT(&in
) = VT_BSTR
;
1775 V_BSTR(&in
) = new_url
;
1776 V_VT(&out
) = VT_BOOL
;
1777 V_BOOL(&out
) = VARIANT_TRUE
;
1778 hres
= IOleCommandTarget_Exec(cmdtrg
, &CGID_ShellDocView
, 67, 0, &in
, &out
);
1779 IOleCommandTarget_Release(cmdtrg
);
1785 hres
= CreateUri(new_url
, 0, 0, &uri
);
1787 SysFreeString(new_url
);
1791 hres
= CreateURLMonikerEx2(NULL
, uri
, &mon
, URL_MK_UNIFORM
);
1795 /* FIXME: Why not set_ready_state? */
1796 This
->readystate
= READYSTATE_UNINITIALIZED
;
1799 if(V_VT(post_data_var
) == (VT_ARRAY
|VT_UI1
)) {
1800 SafeArrayAccessData(V_ARRAY(post_data_var
), (void**)&post_data
);
1801 post_data_size
= V_ARRAY(post_data_var
)->rgsabound
[0].cElements
;
1805 if(headers_var
&& V_VT(headers_var
) != VT_EMPTY
&& V_VT(headers_var
) != VT_ERROR
) {
1806 if(V_VT(headers_var
) != VT_BSTR
)
1807 return E_INVALIDARG
;
1809 headers
= V_BSTR(headers_var
);
1812 hres
= create_channelbsc(mon
, headers
, post_data
, post_data_size
, &bsc
);
1814 SafeArrayUnaccessData(V_ARRAY(post_data_var
));
1816 IMoniker_Release(mon
);
1820 prepare_for_binding(&This
->doc_obj
->basedoc
, mon
, NULL
, TRUE
);
1822 hres
= IUri_GetScheme(uri
, &scheme
);
1824 if(scheme
!= URL_SCHEME_JAVASCRIPT
) {
1825 navigate_task_t
*task
;
1829 task
= heap_alloc(sizeof(*task
));
1831 IUnknown_Release((IUnknown
*)bsc
);
1832 IMoniker_Release(mon
);
1833 return E_OUTOFMEMORY
;
1836 IHTMLWindow2_AddRef(&This
->IHTMLWindow2_iface
);
1837 task
->window
= This
;
1838 task
->bscallback
= bsc
;
1840 push_task(&task
->header
, navigate_proc
, This
->task_magic
);
1842 /* Silently and repeated when real loading starts? */
1843 This
->readystate
= READYSTATE_LOADING
;
1845 navigate_javascript_task_t
*task
;
1847 IUnknown_Release((IUnknown
*)bsc
);
1848 IMoniker_Release(mon
);
1850 task
= heap_alloc(sizeof(*task
));
1853 return E_OUTOFMEMORY
;
1856 IHTMLWindow2_AddRef(&This
->IHTMLWindow2_iface
);
1857 task
->window
= This
;
1859 push_task(&task
->header
, navigate_javascript_proc
, This
->task_magic
);
1862 This
->readystate
= READYSTATE_COMPLETE
;
1868 static HRESULT WINAPI
HTMLPrivateWindow_GetPendingUrl(IHTMLPrivateWindow
*iface
, BSTR
*url
)
1870 HTMLWindow
*This
= impl_from_IHTMLPrivateWindow(iface
);
1871 FIXME("(%p)->(%p)\n", This
, url
);
1875 static HRESULT WINAPI
HTMLPrivateWindow_SetPICSTarget(IHTMLPrivateWindow
*iface
, IOleCommandTarget
*cmdtrg
)
1877 HTMLWindow
*This
= impl_from_IHTMLPrivateWindow(iface
);
1878 FIXME("(%p)->(%p)\n", This
, cmdtrg
);
1882 static HRESULT WINAPI
HTMLPrivateWindow_PICSComplete(IHTMLPrivateWindow
*iface
, int arg
)
1884 HTMLWindow
*This
= impl_from_IHTMLPrivateWindow(iface
);
1885 FIXME("(%p)->(%x)\n", This
, arg
);
1889 static HRESULT WINAPI
HTMLPrivateWindow_FindWindowByName(IHTMLPrivateWindow
*iface
, LPCWSTR name
, IHTMLWindow2
**ret
)
1891 HTMLWindow
*This
= impl_from_IHTMLPrivateWindow(iface
);
1892 FIXME("(%p)->(%s %p)\n", This
, debugstr_w(name
), ret
);
1896 static HRESULT WINAPI
HTMLPrivateWindow_GetAddressBar(IHTMLPrivateWindow
*iface
, BSTR
*url
)
1898 HTMLWindow
*This
= impl_from_IHTMLPrivateWindow(iface
);
1899 TRACE("(%p)->(%p)\n", This
, url
);
1902 return E_INVALIDARG
;
1904 *url
= SysAllocString(This
->url
);
1908 static const IHTMLPrivateWindowVtbl HTMLPrivateWindowVtbl
= {
1909 HTMLPrivateWindow_QueryInterface
,
1910 HTMLPrivateWindow_AddRef
,
1911 HTMLPrivateWindow_Release
,
1912 HTMLPrivateWindow_SuperNavigate
,
1913 HTMLPrivateWindow_GetPendingUrl
,
1914 HTMLPrivateWindow_SetPICSTarget
,
1915 HTMLPrivateWindow_PICSComplete
,
1916 HTMLPrivateWindow_FindWindowByName
,
1917 HTMLPrivateWindow_GetAddressBar
1920 static inline HTMLWindow
*impl_from_IDispatchEx(IDispatchEx
*iface
)
1922 return CONTAINING_RECORD(iface
, HTMLWindow
, IDispatchEx_iface
);
1925 static HRESULT WINAPI
WindowDispEx_QueryInterface(IDispatchEx
*iface
, REFIID riid
, void **ppv
)
1927 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
1929 return IHTMLWindow2_QueryInterface(&This
->IHTMLWindow2_iface
, riid
, ppv
);
1932 static ULONG WINAPI
WindowDispEx_AddRef(IDispatchEx
*iface
)
1934 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
1936 return IHTMLWindow2_AddRef(&This
->IHTMLWindow2_iface
);
1939 static ULONG WINAPI
WindowDispEx_Release(IDispatchEx
*iface
)
1941 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
1943 return IHTMLWindow2_Release(&This
->IHTMLWindow2_iface
);
1946 static HRESULT WINAPI
WindowDispEx_GetTypeInfoCount(IDispatchEx
*iface
, UINT
*pctinfo
)
1948 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
1950 TRACE("(%p)->(%p)\n", This
, pctinfo
);
1952 return IDispatchEx_GetTypeInfoCount(&This
->dispex
.IDispatchEx_iface
, pctinfo
);
1955 static HRESULT WINAPI
WindowDispEx_GetTypeInfo(IDispatchEx
*iface
, UINT iTInfo
,
1956 LCID lcid
, ITypeInfo
**ppTInfo
)
1958 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
1960 TRACE("(%p)->(%u %u %p)\n", This
, iTInfo
, lcid
, ppTInfo
);
1962 return IDispatchEx_GetTypeInfo(&This
->dispex
.IDispatchEx_iface
, iTInfo
, lcid
, ppTInfo
);
1965 static HRESULT WINAPI
WindowDispEx_GetIDsOfNames(IDispatchEx
*iface
, REFIID riid
,
1966 LPOLESTR
*rgszNames
, UINT cNames
,
1967 LCID lcid
, DISPID
*rgDispId
)
1969 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
1973 WARN("(%p)->(%s %p %u %u %p)\n", This
, debugstr_guid(riid
), rgszNames
, cNames
,
1976 for(i
=0; i
< cNames
; i
++) {
1977 /* We shouldn't use script's IDispatchEx here, so we shouldn't use GetDispID */
1978 hres
= IDispatchEx_GetDispID(&This
->IDispatchEx_iface
, rgszNames
[i
], 0, rgDispId
+i
);
1986 static HRESULT WINAPI
WindowDispEx_Invoke(IDispatchEx
*iface
, DISPID dispIdMember
,
1987 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
1988 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
1990 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
1992 TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This
, dispIdMember
, debugstr_guid(riid
),
1993 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
1995 /* FIXME: Use script dispatch */
1997 return IDispatchEx_Invoke(&This
->dispex
.IDispatchEx_iface
, dispIdMember
, riid
, lcid
, wFlags
,
1998 pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
2001 static global_prop_t
*alloc_global_prop(HTMLWindow
*This
, global_prop_type_t type
, BSTR name
)
2003 if(This
->global_prop_cnt
== This
->global_prop_size
) {
2004 global_prop_t
*new_props
;
2007 if(This
->global_props
) {
2008 new_size
= This
->global_prop_size
*2;
2009 new_props
= heap_realloc(This
->global_props
, new_size
*sizeof(global_prop_t
));
2012 new_props
= heap_alloc(new_size
*sizeof(global_prop_t
));
2016 This
->global_props
= new_props
;
2017 This
->global_prop_size
= new_size
;
2020 This
->global_props
[This
->global_prop_cnt
].name
= heap_strdupW(name
);
2021 if(!This
->global_props
[This
->global_prop_cnt
].name
)
2024 This
->global_props
[This
->global_prop_cnt
].type
= type
;
2025 return This
->global_props
+ This
->global_prop_cnt
++;
2028 static inline DWORD
prop_to_dispid(HTMLWindow
*This
, global_prop_t
*prop
)
2030 return MSHTML_DISPID_CUSTOM_MIN
+ (prop
-This
->global_props
);
2033 HRESULT
search_window_props(HTMLWindow
*This
, BSTR bstrName
, DWORD grfdex
, DISPID
*pid
)
2036 ScriptHost
*script_host
;
2039 for(i
=0; i
< This
->global_prop_cnt
; i
++) {
2040 /* FIXME: case sensitivity */
2041 if(!strcmpW(This
->global_props
[i
].name
, bstrName
)) {
2042 *pid
= MSHTML_DISPID_CUSTOM_MIN
+i
;
2047 if(find_global_prop(This
, bstrName
, grfdex
, &script_host
, &id
)) {
2048 global_prop_t
*prop
;
2050 prop
= alloc_global_prop(This
, GLOBAL_SCRIPTVAR
, bstrName
);
2052 return E_OUTOFMEMORY
;
2054 prop
->script_host
= script_host
;
2057 *pid
= prop_to_dispid(This
, prop
);
2061 return DISP_E_UNKNOWNNAME
;
2064 static HRESULT WINAPI
WindowDispEx_GetDispID(IDispatchEx
*iface
, BSTR bstrName
, DWORD grfdex
, DISPID
*pid
)
2066 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
2069 TRACE("(%p)->(%s %x %p)\n", This
, debugstr_w(bstrName
), grfdex
, pid
);
2071 hres
= search_window_props(This
, bstrName
, grfdex
, pid
);
2072 if(hres
!= DISP_E_UNKNOWNNAME
)
2075 hres
= IDispatchEx_GetDispID(&This
->dispex
.IDispatchEx_iface
, bstrName
, grfdex
, pid
);
2076 if(hres
!= DISP_E_UNKNOWNNAME
)
2080 global_prop_t
*prop
;
2083 hres
= IHTMLDocument3_getElementById(&This
->doc
->basedoc
.IHTMLDocument3_iface
,
2085 if(SUCCEEDED(hres
) && elem
) {
2086 IHTMLElement_Release(elem
);
2088 prop
= alloc_global_prop(This
, GLOBAL_ELEMENTVAR
, bstrName
);
2090 return E_OUTOFMEMORY
;
2092 *pid
= prop_to_dispid(This
, prop
);
2097 return DISP_E_UNKNOWNNAME
;
2100 static HRESULT WINAPI
WindowDispEx_InvokeEx(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
2101 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
2103 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
2105 TRACE("(%p)->(%x %x %x %p %p %p %p)\n", This
, id
, lcid
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
2107 if(id
== DISPID_IHTMLWINDOW2_LOCATION
&& (wFlags
& DISPATCH_PROPERTYPUT
)) {
2108 HTMLLocation
*location
;
2111 TRACE("forwarding to location.href\n");
2113 hres
= get_location(This
, &location
);
2117 hres
= IDispatchEx_InvokeEx(&location
->dispex
.IDispatchEx_iface
, DISPID_VALUE
, lcid
,
2118 wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
2119 IHTMLLocation_Release(&location
->IHTMLLocation_iface
);
2123 return IDispatchEx_InvokeEx(&This
->dispex
.IDispatchEx_iface
, id
, lcid
, wFlags
, pdp
, pvarRes
,
2127 static HRESULT WINAPI
WindowDispEx_DeleteMemberByName(IDispatchEx
*iface
, BSTR bstrName
, DWORD grfdex
)
2129 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
2131 TRACE("(%p)->(%s %x)\n", This
, debugstr_w(bstrName
), grfdex
);
2133 return IDispatchEx_DeleteMemberByName(&This
->dispex
.IDispatchEx_iface
, bstrName
, grfdex
);
2136 static HRESULT WINAPI
WindowDispEx_DeleteMemberByDispID(IDispatchEx
*iface
, DISPID id
)
2138 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
2140 TRACE("(%p)->(%x)\n", This
, id
);
2142 return IDispatchEx_DeleteMemberByDispID(&This
->dispex
.IDispatchEx_iface
, id
);
2145 static HRESULT WINAPI
WindowDispEx_GetMemberProperties(IDispatchEx
*iface
, DISPID id
, DWORD grfdexFetch
, DWORD
*pgrfdex
)
2147 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
2149 TRACE("(%p)->(%x %x %p)\n", This
, id
, grfdexFetch
, pgrfdex
);
2151 return IDispatchEx_GetMemberProperties(&This
->dispex
.IDispatchEx_iface
, id
, grfdexFetch
,
2155 static HRESULT WINAPI
WindowDispEx_GetMemberName(IDispatchEx
*iface
, DISPID id
, BSTR
*pbstrName
)
2157 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
2159 TRACE("(%p)->(%x %p)\n", This
, id
, pbstrName
);
2161 return IDispatchEx_GetMemberName(&This
->dispex
.IDispatchEx_iface
, id
, pbstrName
);
2164 static HRESULT WINAPI
WindowDispEx_GetNextDispID(IDispatchEx
*iface
, DWORD grfdex
, DISPID id
, DISPID
*pid
)
2166 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
2168 TRACE("(%p)->(%x %x %p)\n", This
, grfdex
, id
, pid
);
2170 return IDispatchEx_GetNextDispID(&This
->dispex
.IDispatchEx_iface
, grfdex
, id
, pid
);
2173 static HRESULT WINAPI
WindowDispEx_GetNameSpaceParent(IDispatchEx
*iface
, IUnknown
**ppunk
)
2175 HTMLWindow
*This
= impl_from_IDispatchEx(iface
);
2177 TRACE("(%p)->(%p)\n", This
, ppunk
);
2183 static const IDispatchExVtbl WindowDispExVtbl
= {
2184 WindowDispEx_QueryInterface
,
2185 WindowDispEx_AddRef
,
2186 WindowDispEx_Release
,
2187 WindowDispEx_GetTypeInfoCount
,
2188 WindowDispEx_GetTypeInfo
,
2189 WindowDispEx_GetIDsOfNames
,
2190 WindowDispEx_Invoke
,
2191 WindowDispEx_GetDispID
,
2192 WindowDispEx_InvokeEx
,
2193 WindowDispEx_DeleteMemberByName
,
2194 WindowDispEx_DeleteMemberByDispID
,
2195 WindowDispEx_GetMemberProperties
,
2196 WindowDispEx_GetMemberName
,
2197 WindowDispEx_GetNextDispID
,
2198 WindowDispEx_GetNameSpaceParent
2201 static inline HTMLWindow
*impl_from_IServiceProvider(IServiceProvider
*iface
)
2203 return CONTAINING_RECORD(iface
, HTMLWindow
, IServiceProvider_iface
);
2206 static HRESULT WINAPI
HTMLWindowSP_QueryInterface(IServiceProvider
*iface
, REFIID riid
, void **ppv
)
2208 HTMLWindow
*This
= impl_from_IServiceProvider(iface
);
2209 return IHTMLWindow2_QueryInterface(&This
->IHTMLWindow2_iface
, riid
, ppv
);
2212 static ULONG WINAPI
HTMLWindowSP_AddRef(IServiceProvider
*iface
)
2214 HTMLWindow
*This
= impl_from_IServiceProvider(iface
);
2215 return IHTMLWindow2_AddRef(&This
->IHTMLWindow2_iface
);
2218 static ULONG WINAPI
HTMLWindowSP_Release(IServiceProvider
*iface
)
2220 HTMLWindow
*This
= impl_from_IServiceProvider(iface
);
2221 return IHTMLWindow2_Release(&This
->IHTMLWindow2_iface
);
2224 static HRESULT WINAPI
HTMLWindowSP_QueryService(IServiceProvider
*iface
, REFGUID guidService
, REFIID riid
, void **ppv
)
2226 HTMLWindow
*This
= impl_from_IServiceProvider(iface
);
2228 if(IsEqualGUID(guidService
, &IID_IHTMLWindow2
)) {
2229 TRACE("IID_IHTMLWindow2\n");
2230 return IHTMLWindow2_QueryInterface(&This
->IHTMLWindow2_iface
, riid
, ppv
);
2233 TRACE("(%p)->(%s %s %p)\n", This
, debugstr_guid(guidService
), debugstr_guid(riid
), ppv
);
2236 return E_NOINTERFACE
;
2238 return IServiceProvider_QueryService(&This
->doc_obj
->basedoc
.IServiceProvider_iface
,
2239 guidService
, riid
, ppv
);
2242 static const IServiceProviderVtbl ServiceProviderVtbl
= {
2243 HTMLWindowSP_QueryInterface
,
2244 HTMLWindowSP_AddRef
,
2245 HTMLWindowSP_Release
,
2246 HTMLWindowSP_QueryService
2249 static inline HTMLWindow
*impl_from_DispatchEx(DispatchEx
*iface
)
2251 return CONTAINING_RECORD(iface
, HTMLWindow
, dispex
);
2254 static HRESULT
HTMLWindow_invoke(DispatchEx
*dispex
, DISPID id
, LCID lcid
, WORD flags
, DISPPARAMS
*params
,
2255 VARIANT
*res
, EXCEPINFO
*ei
, IServiceProvider
*caller
)
2257 HTMLWindow
*This
= impl_from_DispatchEx(dispex
);
2258 global_prop_t
*prop
;
2262 idx
= id
- MSHTML_DISPID_CUSTOM_MIN
;
2263 if(idx
>= This
->global_prop_cnt
)
2264 return DISP_E_MEMBERNOTFOUND
;
2266 prop
= This
->global_props
+idx
;
2268 switch(prop
->type
) {
2269 case GLOBAL_SCRIPTVAR
: {
2273 disp
= get_script_disp(prop
->script_host
);
2275 return E_UNEXPECTED
;
2277 hres
= IDispatch_QueryInterface(disp
, &IID_IDispatchEx
, (void**)&iface
);
2278 if(SUCCEEDED(hres
)) {
2279 TRACE("%s >>>\n", debugstr_w(prop
->name
));
2280 hres
= IDispatchEx_InvokeEx(iface
, prop
->id
, lcid
, flags
, params
, res
, ei
, caller
);
2282 TRACE("%s <<<\n", debugstr_w(prop
->name
));
2284 WARN("%s <<< %08x\n", debugstr_w(prop
->name
), hres
);
2285 IDispatchEx_Release(iface
);
2287 FIXME("No IDispatchEx\n");
2289 IDispatch_Release(disp
);
2292 case GLOBAL_ELEMENTVAR
: {
2295 hres
= IHTMLDocument3_getElementById(&This
->doc
->basedoc
.IHTMLDocument3_iface
,
2301 return DISP_E_MEMBERNOTFOUND
;
2303 V_VT(res
) = VT_DISPATCH
;
2304 V_DISPATCH(res
) = (IDispatch
*)elem
;
2308 ERR("invalid type %d\n", prop
->type
);
2309 hres
= DISP_E_MEMBERNOTFOUND
;
2316 static const dispex_static_data_vtbl_t HTMLWindow_dispex_vtbl
= {
2322 static const tid_t HTMLWindow_iface_tids
[] = {
2329 static dispex_static_data_t HTMLWindow_dispex
= {
2330 &HTMLWindow_dispex_vtbl
,
2331 DispHTMLWindow2_tid
,
2333 HTMLWindow_iface_tids
2336 HRESULT
HTMLWindow_Create(HTMLDocumentObj
*doc_obj
, nsIDOMWindow
*nswindow
, HTMLWindow
*parent
, HTMLWindow
**ret
)
2341 window
= heap_alloc_zero(sizeof(HTMLWindow
));
2343 return E_OUTOFMEMORY
;
2345 window
->window_ref
= heap_alloc(sizeof(windowref_t
));
2346 if(!window
->window_ref
) {
2348 return E_OUTOFMEMORY
;
2351 window
->IHTMLWindow2_iface
.lpVtbl
= &HTMLWindow2Vtbl
;
2352 window
->IHTMLWindow3_iface
.lpVtbl
= &HTMLWindow3Vtbl
;
2353 window
->IHTMLWindow4_iface
.lpVtbl
= &HTMLWindow4Vtbl
;
2354 window
->IHTMLPrivateWindow_iface
.lpVtbl
= &HTMLPrivateWindowVtbl
;
2355 window
->IDispatchEx_iface
.lpVtbl
= &WindowDispExVtbl
;
2356 window
->IServiceProvider_iface
.lpVtbl
= &ServiceProviderVtbl
;
2358 window
->doc_obj
= doc_obj
;
2360 window
->window_ref
->window
= window
;
2361 window
->window_ref
->ref
= 1;
2363 init_dispex(&window
->dispex
, (IUnknown
*)&window
->IHTMLWindow2_iface
, &HTMLWindow_dispex
);
2366 nsIDOMWindow_AddRef(nswindow
);
2367 window
->nswindow
= nswindow
;
2370 window
->scriptmode
= parent
? parent
->scriptmode
: SCRIPTMODE_GECKO
;
2371 window
->readystate
= READYSTATE_UNINITIALIZED
;
2372 list_init(&window
->script_hosts
);
2374 hres
= CoInternetCreateSecurityManager(NULL
, &window
->secmgr
, 0);
2376 IHTMLWindow2_Release(&window
->IHTMLWindow2_iface
);
2380 window
->task_magic
= get_task_target_magic();
2381 update_window_doc(window
);
2383 list_init(&window
->children
);
2384 list_add_head(&window_list
, &window
->entry
);
2387 IHTMLWindow2_AddRef(&window
->IHTMLWindow2_iface
);
2389 window
->parent
= parent
;
2390 list_add_tail(&parent
->children
, &window
->sibling_entry
);
2397 void update_window_doc(HTMLWindow
*window
)
2399 nsIDOMHTMLDocument
*nshtmldoc
;
2400 nsIDOMDocument
*nsdoc
;
2403 nsres
= nsIDOMWindow_GetDocument(window
->nswindow
, &nsdoc
);
2404 if(NS_FAILED(nsres
) || !nsdoc
) {
2405 ERR("GetDocument failed: %08x\n", nsres
);
2409 nsres
= nsIDOMDocument_QueryInterface(nsdoc
, &IID_nsIDOMHTMLDocument
, (void**)&nshtmldoc
);
2410 nsIDOMDocument_Release(nsdoc
);
2411 if(NS_FAILED(nsres
)) {
2412 ERR("Could not get nsIDOMHTMLDocument iface: %08x\n", nsres
);
2416 if(!window
->doc
|| window
->doc
->nsdoc
!= nshtmldoc
) {
2417 HTMLDocumentNode
*doc
;
2420 hres
= create_doc_from_nsdoc(nshtmldoc
, window
->doc_obj
, window
, &doc
);
2421 if(SUCCEEDED(hres
)) {
2422 window_set_docnode(window
, doc
);
2423 htmldoc_release(&doc
->basedoc
);
2425 ERR("create_doc_from_nsdoc failed: %08x\n", hres
);
2429 nsIDOMHTMLDocument_Release(nshtmldoc
);
2432 HTMLWindow
*nswindow_to_window(const nsIDOMWindow
*nswindow
)
2436 LIST_FOR_EACH_ENTRY(iter
, &window_list
, HTMLWindow
, entry
) {
2437 if(iter
->nswindow
== nswindow
)