2 * Copyright 2006 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
28 #include "wine/debug.h"
29 #include "wine/unicode.h"
31 #include "mshtml_private.h"
32 #include "htmlevent.h"
35 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
37 static struct list window_list = LIST_INIT(window_list);
39 static void window_set_docnode(HTMLWindow *window, HTMLDocumentNode *doc_node)
42 abort_document_bindings(window->doc);
43 window->doc->basedoc.window = NULL;
44 htmldoc_release(&window->doc->basedoc);
46 window->doc = doc_node;
48 htmldoc_addref(&doc_node->basedoc);
50 if(window->doc_obj && window->doc_obj->basedoc.window == window) {
51 if(window->doc_obj->basedoc.doc_node)
52 htmldoc_release(&window->doc_obj->basedoc.doc_node->basedoc);
53 window->doc_obj->basedoc.doc_node = doc_node;
55 htmldoc_addref(&doc_node->basedoc);
59 nsIDOMWindow *get_nsdoc_window(nsIDOMDocument *nsdoc)
61 nsIDOMDocumentView *nsdocview;
62 nsIDOMAbstractView *nsview;
63 nsIDOMWindow *nswindow;
66 nsres = nsIDOMDocument_QueryInterface(nsdoc, &IID_nsIDOMDocumentView, (void**)&nsdocview);
67 nsIDOMDocument_Release(nsdoc);
68 if(NS_FAILED(nsres)) {
69 ERR("Could not get nsIDOMDocumentView iface: %08x\n", nsres);
73 nsres = nsIDOMDocumentView_GetDefaultView(nsdocview, &nsview);
74 nsIDOMDocumentView_Release(nsview);
75 if(NS_FAILED(nsres)) {
76 ERR("GetDefaultView failed: %08x\n", nsres);
80 nsres = nsIDOMAbstractView_QueryInterface(nsview, &IID_nsIDOMWindow, (void**)&nswindow);
81 nsIDOMAbstractView_Release(nsview);
82 if(NS_FAILED(nsres)) {
83 ERR("Coult not get nsIDOMWindow iface: %08x\n", nsres);
90 static void release_children(HTMLWindow *This)
94 while(!list_empty(&This->children)) {
95 child = LIST_ENTRY(list_tail(&This->children), HTMLWindow, sibling_entry);
97 list_remove(&child->sibling_entry);
99 IHTMLWindow2_Release(HTMLWINDOW2(child));
103 #define HTMLWINDOW2_THIS(iface) DEFINE_THIS(HTMLWindow, HTMLWindow2, iface)
105 static HRESULT WINAPI HTMLWindow2_QueryInterface(IHTMLWindow2 *iface, REFIID riid, void **ppv)
107 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
111 if(IsEqualGUID(&IID_IUnknown, riid)) {
112 TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
113 *ppv = HTMLWINDOW2(This);
114 }else if(IsEqualGUID(&IID_IDispatch, riid)) {
115 TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
116 *ppv = HTMLWINDOW2(This);
117 }else if(IsEqualGUID(&IID_IDispatchEx, riid)) {
118 TRACE("(%p)->(IID_IDispatchEx %p)\n", This, ppv);
119 *ppv = DISPATCHEX(This);
120 }else if(IsEqualGUID(&IID_IHTMLFramesCollection2, riid)) {
121 TRACE("(%p)->(IID_IHTMLFramesCollection2 %p)\n", This, ppv);
122 *ppv = HTMLWINDOW2(This);
123 }else if(IsEqualGUID(&IID_IHTMLWindow2, riid)) {
124 TRACE("(%p)->(IID_IHTMLWindow2 %p)\n", This, ppv);
125 *ppv = HTMLWINDOW2(This);
126 }else if(IsEqualGUID(&IID_IHTMLWindow3, riid)) {
127 TRACE("(%p)->(IID_IHTMLWindow3 %p)\n", This, ppv);
128 *ppv = HTMLWINDOW3(This);
129 }else if(IsEqualGUID(&IID_IHTMLWindow4, riid)) {
130 TRACE("(%p)->(IID_IHTMLWindow4 %p)\n", This, ppv);
131 *ppv = HTMLWINDOW4(This);
132 }else if(dispex_query_interface(&This->dispex, riid, ppv)) {
133 return *ppv ? S_OK : E_NOINTERFACE;
137 IUnknown_AddRef((IUnknown*)*ppv);
141 WARN("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
142 return E_NOINTERFACE;
145 static ULONG WINAPI HTMLWindow2_AddRef(IHTMLWindow2 *iface)
147 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
148 LONG ref = InterlockedIncrement(&This->ref);
150 TRACE("(%p) ref=%d\n", This, ref);
155 static ULONG WINAPI HTMLWindow2_Release(IHTMLWindow2 *iface)
157 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
158 LONG ref = InterlockedDecrement(&This->ref);
160 TRACE("(%p) ref=%d\n", This, ref);
165 remove_target_tasks(This->task_magic);
166 set_window_bscallback(This, NULL);
167 set_current_mon(This, NULL);
168 window_set_docnode(This, NULL);
169 release_children(This);
171 if(This->option_factory) {
172 This->option_factory->window = NULL;
173 IHTMLOptionElementFactory_Release(HTMLOPTFACTORY(This->option_factory));
176 if(This->image_factory) {
177 This->image_factory->window = NULL;
178 IHTMLImageElementFactory_Release(HTMLIMGFACTORY(This->image_factory));
182 This->location->window = NULL;
183 IHTMLLocation_Release(HTMLLOCATION(This->location));
186 if(This->event_target)
187 release_event_target(This->event_target);
188 for(i=0; i < This->global_prop_cnt; i++)
189 heap_free(This->global_props[i].name);
191 This->window_ref->window = NULL;
192 windowref_release(This->window_ref);
194 heap_free(This->global_props);
195 release_script_hosts(This);
196 list_remove(&This->entry);
197 release_dispex(&This->dispex);
204 static HRESULT WINAPI HTMLWindow2_GetTypeInfoCount(IHTMLWindow2 *iface, UINT *pctinfo)
206 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
208 return IDispatchEx_GetTypeInfoCount(DISPATCHEX(This), pctinfo);
211 static HRESULT WINAPI HTMLWindow2_GetTypeInfo(IHTMLWindow2 *iface, UINT iTInfo,
212 LCID lcid, ITypeInfo **ppTInfo)
214 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
216 return IDispatchEx_GetTypeInfo(DISPATCHEX(This), iTInfo, lcid, ppTInfo);
219 static HRESULT WINAPI HTMLWindow2_GetIDsOfNames(IHTMLWindow2 *iface, REFIID riid,
220 LPOLESTR *rgszNames, UINT cNames,
221 LCID lcid, DISPID *rgDispId)
223 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
225 return IDispatchEx_GetIDsOfNames(DISPATCHEX(This), riid, rgszNames, cNames, lcid, rgDispId);
228 static HRESULT WINAPI HTMLWindow2_Invoke(IHTMLWindow2 *iface, DISPID dispIdMember,
229 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
230 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
232 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
234 return IDispatchEx_Invoke(DISPATCHEX(This), dispIdMember, riid, lcid, wFlags, pDispParams,
235 pVarResult, pExcepInfo, puArgErr);
238 static HRESULT get_frame_by_index(nsIDOMWindowCollection *nsFrames, PRUint32 index, HTMLWindow **ret)
241 nsIDOMWindow *nsWindow;
244 nsres = nsIDOMWindowCollection_GetLength(nsFrames, &length);
245 if(NS_FAILED(nsres)) {
246 FIXME("nsIDOMWindowCollection_GetLength failed: 0x%08x\n", nsres);
251 return DISP_E_MEMBERNOTFOUND;
253 nsres = nsIDOMWindowCollection_Item(nsFrames, index, &nsWindow);
254 if(NS_FAILED(nsres)) {
255 FIXME("nsIDOMWindowCollection_Item failed: 0x%08x\n", nsres);
259 *ret = nswindow_to_window(nsWindow);
261 nsIDOMWindow_Release(nsWindow);
266 static HRESULT WINAPI HTMLWindow2_item(IHTMLWindow2 *iface, VARIANT *pvarIndex, VARIANT *pvarResult)
268 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
269 nsIDOMWindowCollection *nsFrames;
274 TRACE("(%p)->(%p %p)\n", This, pvarIndex, pvarResult);
276 nsres = nsIDOMWindow_GetFrames(This->nswindow, &nsFrames);
277 if(NS_FAILED(nsres)) {
278 FIXME("nsIDOMWindow_GetFrames failed: 0x%08x\n", nsres);
282 if(V_VT(pvarIndex) == VT_I4) {
283 int index = V_I4(pvarIndex);
284 TRACE("Getting index %d\n", index);
286 hres = DISP_E_MEMBERNOTFOUND;
289 hres = get_frame_by_index(nsFrames, index, &window);
292 }else if(V_VT(pvarIndex) == VT_UINT) {
293 unsigned int index = V_UINT(pvarIndex);
294 TRACE("Getting index %u\n", index);
295 hres = get_frame_by_index(nsFrames, index, &window);
298 }else if(V_VT(pvarIndex) == VT_BSTR) {
299 BSTR str = V_BSTR(pvarIndex);
302 TRACE("Getting name %s\n", wine_dbgstr_w(str));
304 nsres = nsIDOMWindowCollection_GetLength(nsFrames, &length);
307 for(i = 0; i < length && !window; ++i) {
308 HTMLWindow *cur_window;
309 nsIDOMWindow *nsWindow;
312 nsres = nsIDOMWindowCollection_Item(nsFrames, i, &nsWindow);
313 if(NS_FAILED(nsres)) {
314 FIXME("nsIDOMWindowCollection_Item failed: 0x%08x\n", nsres);
319 cur_window = nswindow_to_window(nsWindow);
321 nsIDOMWindow_Release(nsWindow);
323 hres = IHTMLElement_get_id(HTMLELEM(&cur_window->frame_element->element), &id);
325 FIXME("IHTMLElement_get_id failed: 0x%08x\n", hres);
329 if(!strcmpW(id, str))
336 hres = DISP_E_MEMBERNOTFOUND;
344 IHTMLWindow2_AddRef(HTMLWINDOW2(window));
345 V_VT(pvarResult) = VT_DISPATCH;
346 V_DISPATCH(pvarResult) = (IDispatch*)window;
351 nsIDOMWindowCollection_Release(nsFrames);
356 static HRESULT WINAPI HTMLWindow2_get_length(IHTMLWindow2 *iface, LONG *p)
358 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
359 nsIDOMWindowCollection *nscollection;
363 TRACE("(%p)->(%p)\n", This, p);
365 nsres = nsIDOMWindow_GetFrames(This->nswindow, &nscollection);
366 if(NS_FAILED(nsres)) {
367 ERR("GetFrames failed: %08x\n", nsres);
371 nsres = nsIDOMWindowCollection_GetLength(nscollection, &length);
372 nsIDOMWindowCollection_Release(nscollection);
373 if(NS_FAILED(nsres)) {
374 ERR("GetLength failed: %08x\n", nsres);
382 static HRESULT WINAPI HTMLWindow2_get_frames(IHTMLWindow2 *iface, IHTMLFramesCollection2 **p)
384 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
385 FIXME("(%p)->(%p): semi-stub\n", This, p);
387 /* FIXME: Should return a separate Window object */
388 *p = (IHTMLFramesCollection2*)HTMLWINDOW2(This);
389 HTMLWindow2_AddRef(iface);
393 static HRESULT WINAPI HTMLWindow2_put_defaultStatus(IHTMLWindow2 *iface, BSTR v)
395 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
396 FIXME("(%p)->(%s)\n", This, debugstr_w(v));
400 static HRESULT WINAPI HTMLWindow2_get_defaultStatus(IHTMLWindow2 *iface, BSTR *p)
402 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
403 FIXME("(%p)->(%p)\n", This, p);
407 static HRESULT WINAPI HTMLWindow2_put_status(IHTMLWindow2 *iface, BSTR v)
409 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
410 FIXME("(%p)->(%s)\n", This, debugstr_w(v));
414 static HRESULT WINAPI HTMLWindow2_get_status(IHTMLWindow2 *iface, BSTR *p)
416 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
417 FIXME("(%p)->(%p)\n", This, p);
421 static HRESULT WINAPI HTMLWindow2_setTimeout(IHTMLWindow2 *iface, BSTR expression,
422 LONG msec, VARIANT *language, LONG *timerID)
424 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
427 TRACE("(%p)->(%s %d %p %p)\n", This, debugstr_w(expression), msec, language, timerID);
429 V_VT(&expr_var) = VT_BSTR;
430 V_BSTR(&expr_var) = expression;
432 return IHTMLWindow3_setTimeout(HTMLWINDOW3(This), &expr_var, msec, language, timerID);
435 static HRESULT WINAPI HTMLWindow2_clearTimeout(IHTMLWindow2 *iface, LONG timerID)
437 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
439 TRACE("(%p)->(%d)\n", This, timerID);
441 return clear_task_timer(&This->doc->basedoc, FALSE, timerID);
444 static HRESULT WINAPI HTMLWindow2_alert(IHTMLWindow2 *iface, BSTR message)
446 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
449 TRACE("(%p)->(%s)\n", This, debugstr_w(message));
451 if(!LoadStringW(get_shdoclc(), IDS_MESSAGE_BOX_TITLE, wszTitle,
452 sizeof(wszTitle)/sizeof(WCHAR))) {
453 WARN("Could not load message box title: %d\n", GetLastError());
457 MessageBoxW(This->doc_obj->hwnd, message, wszTitle, MB_ICONWARNING);
461 static HRESULT WINAPI HTMLWindow2_confirm(IHTMLWindow2 *iface, BSTR message,
462 VARIANT_BOOL *confirmed)
464 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
467 TRACE("(%p)->(%s %p)\n", This, debugstr_w(message), confirmed);
469 if(!confirmed) return E_INVALIDARG;
471 if(!LoadStringW(get_shdoclc(), IDS_MESSAGE_BOX_TITLE, wszTitle,
472 sizeof(wszTitle)/sizeof(WCHAR))) {
473 WARN("Could not load message box title: %d\n", GetLastError());
474 *confirmed = VARIANT_TRUE;
478 if(MessageBoxW(This->doc_obj->hwnd, message, wszTitle,
479 MB_OKCANCEL|MB_ICONQUESTION)==IDOK)
480 *confirmed = VARIANT_TRUE;
481 else *confirmed = VARIANT_FALSE;
493 static INT_PTR CALLBACK prompt_dlgproc(HWND hwnd, UINT msg,
494 WPARAM wparam, LPARAM lparam)
500 prompt_arg *arg = (prompt_arg*)lparam;
503 if(!LoadStringW(get_shdoclc(), IDS_MESSAGE_BOX_TITLE, wszTitle,
504 sizeof(wszTitle)/sizeof(WCHAR))) {
505 WARN("Could not load message box title: %d\n", GetLastError());
506 EndDialog(hwnd, wparam);
510 SetWindowLongPtrW(hwnd, DWLP_USER, lparam);
511 SetWindowTextW(hwnd, wszTitle);
512 SetWindowTextW(GetDlgItem(hwnd, ID_PROMPT_PROMPT), arg->message);
513 SetWindowTextW(GetDlgItem(hwnd, ID_PROMPT_EDIT), arg->dststr);
519 case MAKEWPARAM(IDCANCEL, BN_CLICKED):
520 EndDialog(hwnd, wparam);
522 case MAKEWPARAM(IDOK, BN_CLICKED):
525 (prompt_arg*)GetWindowLongPtrW(hwnd, DWLP_USER);
526 HWND hwndPrompt = GetDlgItem(hwnd, ID_PROMPT_EDIT);
527 INT len = GetWindowTextLengthW(hwndPrompt);
531 EndDialog(hwnd, wparam);
535 V_VT(arg->textdata) = VT_BSTR;
536 if(!len && !arg->dststr)
537 V_BSTR(arg->textdata) = NULL;
540 V_BSTR(arg->textdata) = SysAllocStringLen(NULL, len);
541 GetWindowTextW(hwndPrompt, V_BSTR(arg->textdata), len+1);
543 EndDialog(hwnd, wparam);
549 EndDialog(hwnd, IDCANCEL);
556 static HRESULT WINAPI HTMLWindow2_prompt(IHTMLWindow2 *iface, BSTR message,
557 BSTR dststr, VARIANT *textdata)
559 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
562 TRACE("(%p)->(%s %s %p)\n", This, debugstr_w(message), debugstr_w(dststr), textdata);
564 if(textdata) V_VT(textdata) = VT_NULL;
566 arg.message = message;
568 arg.textdata = textdata;
570 DialogBoxParamW(hInst, MAKEINTRESOURCEW(ID_PROMPT_DIALOG),
571 This->doc_obj->hwnd, prompt_dlgproc, (LPARAM)&arg);
575 static HRESULT WINAPI HTMLWindow2_get_Image(IHTMLWindow2 *iface, IHTMLImageElementFactory **p)
577 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
579 TRACE("(%p)->(%p)\n", This, p);
581 if(!This->image_factory)
582 This->image_factory = HTMLImageElementFactory_Create(This);
584 *p = HTMLIMGFACTORY(This->image_factory);
585 IHTMLImageElementFactory_AddRef(*p);
590 static HRESULT WINAPI HTMLWindow2_get_location(IHTMLWindow2 *iface, IHTMLLocation **p)
592 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
594 TRACE("(%p)->(%p)\n", This, p);
597 IHTMLLocation_AddRef(HTMLLOCATION(This->location));
601 hres = HTMLLocation_Create(This, &This->location);
606 *p = HTMLLOCATION(This->location);
610 static HRESULT WINAPI HTMLWindow2_get_history(IHTMLWindow2 *iface, IOmHistory **p)
612 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
613 FIXME("(%p)->(%p)\n", This, p);
617 static HRESULT WINAPI HTMLWindow2_close(IHTMLWindow2 *iface)
619 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
620 FIXME("(%p)->()\n", This);
624 static HRESULT WINAPI HTMLWindow2_put_opener(IHTMLWindow2 *iface, VARIANT v)
626 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
627 FIXME("(%p)->(v(%d))\n", This, V_VT(&v));
631 static HRESULT WINAPI HTMLWindow2_get_opener(IHTMLWindow2 *iface, VARIANT *p)
633 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
634 FIXME("(%p)->(%p)\n", This, p);
638 static HRESULT WINAPI HTMLWindow2_get_navigator(IHTMLWindow2 *iface, IOmNavigator **p)
640 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
642 TRACE("(%p)->(%p)\n", This, p);
644 *p = OmNavigator_Create();
648 static HRESULT WINAPI HTMLWindow2_put_name(IHTMLWindow2 *iface, BSTR v)
650 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
654 TRACE("(%p)->(%s)\n", This, debugstr_w(v));
656 nsAString_Init(&name_str, v);
657 nsres = nsIDOMWindow_SetName(This->nswindow, &name_str);
658 nsAString_Finish(&name_str);
660 ERR("SetName failed: %08x\n", nsres);
665 static HRESULT WINAPI HTMLWindow2_get_name(IHTMLWindow2 *iface, BSTR *p)
667 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
672 TRACE("(%p)->(%p)\n", This, p);
674 nsAString_Init(&name_str, NULL);
675 nsres = nsIDOMWindow_GetName(This->nswindow, &name_str);
676 if(NS_SUCCEEDED(nsres)) {
677 const PRUnichar *name;
679 nsAString_GetData(&name_str, &name);
681 *p = SysAllocString(name);
682 hres = *p ? S_OK : E_OUTOFMEMORY;
688 ERR("GetName failed: %08x\n", nsres);
691 nsAString_Finish(&name_str);
696 static HRESULT WINAPI HTMLWindow2_get_parent(IHTMLWindow2 *iface, IHTMLWindow2 **p)
698 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
699 TRACE("(%p)->(%p)\n", This, p);
702 *p = HTMLWINDOW2(This->parent);
703 IHTMLWindow2_AddRef(*p);
710 static HRESULT WINAPI HTMLWindow2_open(IHTMLWindow2 *iface, BSTR url, BSTR name,
711 BSTR features, VARIANT_BOOL replace, IHTMLWindow2 **pomWindowResult)
713 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
714 FIXME("(%p)->(%s %s %s %x %p)\n", This, debugstr_w(url), debugstr_w(name),
715 debugstr_w(features), replace, pomWindowResult);
719 static HRESULT WINAPI HTMLWindow2_get_self(IHTMLWindow2 *iface, IHTMLWindow2 **p)
721 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
723 TRACE("(%p)->(%p)\n", This, p);
725 /* FIXME: We should return kind of proxy window here. */
726 IHTMLWindow2_AddRef(HTMLWINDOW2(This));
727 *p = HTMLWINDOW2(This);
731 static HRESULT WINAPI HTMLWindow2_get_top(IHTMLWindow2 *iface, IHTMLWindow2 **p)
733 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
734 FIXME("(%p)->(%p)\n", This, p);
738 static HRESULT WINAPI HTMLWindow2_get_window(IHTMLWindow2 *iface, IHTMLWindow2 **p)
740 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
742 TRACE("(%p)->(%p)\n", This, p);
744 /* FIXME: We should return kind of proxy window here. */
745 IHTMLWindow2_AddRef(HTMLWINDOW2(This));
746 *p = HTMLWINDOW2(This);
750 static HRESULT WINAPI HTMLWindow2_navigate(IHTMLWindow2 *iface, BSTR url)
752 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
753 FIXME("(%p)->(%s)\n", This, debugstr_w(url));
757 static HRESULT WINAPI HTMLWindow2_put_onfocus(IHTMLWindow2 *iface, VARIANT v)
759 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
760 FIXME("(%p)->(v(%d))\n", This, V_VT(&v));
764 static HRESULT WINAPI HTMLWindow2_get_onfocus(IHTMLWindow2 *iface, VARIANT *p)
766 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
767 FIXME("(%p)->(%p)\n", This, p);
771 static HRESULT WINAPI HTMLWindow2_put_onblur(IHTMLWindow2 *iface, VARIANT v)
773 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
774 FIXME("(%p)->(v(%d))\n", This, V_VT(&v));
778 static HRESULT WINAPI HTMLWindow2_get_onblur(IHTMLWindow2 *iface, VARIANT *p)
780 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
781 FIXME("(%p)->(%p)\n", This, p);
785 static HRESULT WINAPI HTMLWindow2_put_onload(IHTMLWindow2 *iface, VARIANT v)
787 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
789 TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
791 return set_window_event(This, EVENTID_LOAD, &v);
794 static HRESULT WINAPI HTMLWindow2_get_onload(IHTMLWindow2 *iface, VARIANT *p)
796 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
798 TRACE("(%p)->(%p)\n", This, p);
800 return get_window_event(This, EVENTID_LOAD, p);
803 static HRESULT WINAPI HTMLWindow2_put_onbeforeunload(IHTMLWindow2 *iface, VARIANT v)
805 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
807 TRACE("(%p)->(v(%d))\n", This, V_VT(&v));
809 return set_window_event(This, EVENTID_BEFOREUNLOAD, &v);
812 static HRESULT WINAPI HTMLWindow2_get_onbeforeunload(IHTMLWindow2 *iface, VARIANT *p)
814 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
816 TRACE("(%p)->(%p)\n", This, p);
818 return get_window_event(This, EVENTID_BEFOREUNLOAD, p);
821 static HRESULT WINAPI HTMLWindow2_put_onunload(IHTMLWindow2 *iface, VARIANT v)
823 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
824 FIXME("(%p)->(v(%d))\n", This, V_VT(&v));
828 static HRESULT WINAPI HTMLWindow2_get_onunload(IHTMLWindow2 *iface, VARIANT *p)
830 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
831 FIXME("(%p)->(%p)\n", This, p);
835 static HRESULT WINAPI HTMLWindow2_put_onhelp(IHTMLWindow2 *iface, VARIANT v)
837 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
838 FIXME("(%p)->(v(%d))\n", This, V_VT(&v));
842 static HRESULT WINAPI HTMLWindow2_get_onhelp(IHTMLWindow2 *iface, VARIANT *p)
844 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
845 FIXME("(%p)->(%p)\n", This, p);
849 static HRESULT WINAPI HTMLWindow2_put_onerror(IHTMLWindow2 *iface, VARIANT v)
851 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
852 FIXME("(%p)->(v(%d))\n", This, V_VT(&v));
856 static HRESULT WINAPI HTMLWindow2_get_onerror(IHTMLWindow2 *iface, VARIANT *p)
858 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
859 FIXME("(%p)->(%p)\n", This, p);
863 static HRESULT WINAPI HTMLWindow2_put_onresize(IHTMLWindow2 *iface, VARIANT v)
865 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
866 FIXME("(%p)->(v(%d))\n", This, V_VT(&v));
870 static HRESULT WINAPI HTMLWindow2_get_onresize(IHTMLWindow2 *iface, VARIANT *p)
872 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
873 FIXME("(%p)->(%p)\n", This, p);
877 static HRESULT WINAPI HTMLWindow2_put_onscroll(IHTMLWindow2 *iface, VARIANT v)
879 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
880 FIXME("(%p)->(v(%d))\n", This, V_VT(&v));
884 static HRESULT WINAPI HTMLWindow2_get_onscroll(IHTMLWindow2 *iface, VARIANT *p)
886 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
887 FIXME("(%p)->(%p)\n", This, p);
891 static HRESULT WINAPI HTMLWindow2_get_document(IHTMLWindow2 *iface, IHTMLDocument2 **p)
893 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
895 TRACE("(%p)->(%p)\n", This, p);
898 /* FIXME: We should return a wrapper object here */
899 *p = HTMLDOC(&This->doc->basedoc);
900 IHTMLDocument2_AddRef(*p);
908 static HRESULT WINAPI HTMLWindow2_get_event(IHTMLWindow2 *iface, IHTMLEventObj **p)
910 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
912 TRACE("(%p)->(%p)\n", This, p);
915 IHTMLEventObj_AddRef(This->event);
920 static HRESULT WINAPI HTMLWindow2_get__newEnum(IHTMLWindow2 *iface, IUnknown **p)
922 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
923 FIXME("(%p)->(%p)\n", This, p);
927 static HRESULT WINAPI HTMLWindow2_showModalDialog(IHTMLWindow2 *iface, BSTR dialog,
928 VARIANT *varArgIn, VARIANT *varOptions, VARIANT *varArgOut)
930 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
931 FIXME("(%p)->(%s %p %p %p)\n", This, debugstr_w(dialog), varArgIn, varOptions, varArgOut);
935 static HRESULT WINAPI HTMLWindow2_showHelp(IHTMLWindow2 *iface, BSTR helpURL, VARIANT helpArg,
938 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
939 FIXME("(%p)->(%s v(%d) %s)\n", This, debugstr_w(helpURL), V_VT(&helpArg), debugstr_w(features));
943 static HRESULT WINAPI HTMLWindow2_get_screen(IHTMLWindow2 *iface, IHTMLScreen **p)
945 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
946 FIXME("(%p)->(%p)\n", This, p);
950 static HRESULT WINAPI HTMLWindow2_get_Option(IHTMLWindow2 *iface, IHTMLOptionElementFactory **p)
952 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
954 TRACE("(%p)->(%p)\n", This, p);
956 if(!This->option_factory)
957 This->option_factory = HTMLOptionElementFactory_Create(This);
959 *p = HTMLOPTFACTORY(This->option_factory);
960 IHTMLOptionElementFactory_AddRef(*p);
965 static HRESULT WINAPI HTMLWindow2_focus(IHTMLWindow2 *iface)
967 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
968 FIXME("(%p)->()\n", This);
972 static HRESULT WINAPI HTMLWindow2_get_closed(IHTMLWindow2 *iface, VARIANT_BOOL *p)
974 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
975 FIXME("(%p)->(%p)\n", This, p);
979 static HRESULT WINAPI HTMLWindow2_blur(IHTMLWindow2 *iface)
981 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
982 FIXME("(%p)->()\n", This);
986 static HRESULT WINAPI HTMLWindow2_scroll(IHTMLWindow2 *iface, LONG x, LONG y)
988 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
989 FIXME("(%p)->(%d %d)\n", This, x, y);
993 static HRESULT WINAPI HTMLWindow2_get_clientInformation(IHTMLWindow2 *iface, IOmNavigator **p)
995 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
996 FIXME("(%p)->(%p)\n", This, p);
1000 static HRESULT WINAPI HTMLWindow2_setInterval(IHTMLWindow2 *iface, BSTR expression,
1001 LONG msec, VARIANT *language, LONG *timerID)
1003 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1006 TRACE("(%p)->(%s %d %p %p)\n", This, debugstr_w(expression), msec, language, timerID);
1008 V_VT(&expr) = VT_BSTR;
1009 V_BSTR(&expr) = expression;
1010 return IHTMLWindow3_setInterval(HTMLWINDOW3(This), &expr, msec, language, timerID);
1013 static HRESULT WINAPI HTMLWindow2_clearInterval(IHTMLWindow2 *iface, LONG timerID)
1015 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1017 TRACE("(%p)->(%d)\n", This, timerID);
1019 return clear_task_timer(&This->doc->basedoc, TRUE, timerID);
1022 static HRESULT WINAPI HTMLWindow2_put_offscreenBuffering(IHTMLWindow2 *iface, VARIANT v)
1024 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1025 FIXME("(%p)->(v(%d))\n", This, V_VT(&v));
1029 static HRESULT WINAPI HTMLWindow2_get_offscreenBuffering(IHTMLWindow2 *iface, VARIANT *p)
1031 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1032 FIXME("(%p)->(%p)\n", This, p);
1036 static HRESULT WINAPI HTMLWindow2_execScript(IHTMLWindow2 *iface, BSTR scode, BSTR language,
1039 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1040 FIXME("(%p)->(%s %s %p)\n", This, debugstr_w(scode), debugstr_w(language), pvarRet);
1044 static HRESULT WINAPI HTMLWindow2_toString(IHTMLWindow2 *iface, BSTR *String)
1046 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1048 static const WCHAR objectW[] = {'[','o','b','j','e','c','t',']',0};
1050 TRACE("(%p)->(%p)\n", This, String);
1053 return E_INVALIDARG;
1055 *String = SysAllocString(objectW);
1056 return *String ? S_OK : E_OUTOFMEMORY;
1059 static HRESULT WINAPI HTMLWindow2_scrollBy(IHTMLWindow2 *iface, LONG x, LONG y)
1061 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1064 TRACE("(%p)->(%d %d)\n", This, x, y);
1066 nsres = nsIDOMWindow_ScrollBy(This->nswindow, x, y);
1067 if(NS_FAILED(nsres))
1068 ERR("ScrollBy failed: %08x\n", nsres);
1073 static HRESULT WINAPI HTMLWindow2_scrollTo(IHTMLWindow2 *iface, LONG x, LONG y)
1075 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1078 TRACE("(%p)->(%d %d)\n", This, x, y);
1080 nsres = nsIDOMWindow_ScrollTo(This->nswindow, x, y);
1081 if(NS_FAILED(nsres))
1082 ERR("ScrollTo failed: %08x\n", nsres);
1087 static HRESULT WINAPI HTMLWindow2_moveTo(IHTMLWindow2 *iface, LONG x, LONG y)
1089 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1090 FIXME("(%p)->(%d %d)\n", This, x, y);
1094 static HRESULT WINAPI HTMLWindow2_moveBy(IHTMLWindow2 *iface, LONG x, LONG y)
1096 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1097 FIXME("(%p)->(%d %d)\n", This, x, y);
1101 static HRESULT WINAPI HTMLWindow2_resizeTo(IHTMLWindow2 *iface, LONG x, LONG y)
1103 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1104 FIXME("(%p)->(%d %d)\n", This, x, y);
1108 static HRESULT WINAPI HTMLWindow2_resizeBy(IHTMLWindow2 *iface, LONG x, LONG y)
1110 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1111 FIXME("(%p)->(%d %d)\n", This, x, y);
1115 static HRESULT WINAPI HTMLWindow2_get_external(IHTMLWindow2 *iface, IDispatch **p)
1117 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1119 TRACE("(%p)->(%p)\n", This, p);
1123 if(!This->doc_obj->hostui)
1126 return IDocHostUIHandler_GetExternal(This->doc_obj->hostui, p);
1129 static HRESULT HTMLWindow_invoke(IUnknown *iface, DISPID id, LCID lcid, WORD flags, DISPPARAMS *params,
1130 VARIANT *res, EXCEPINFO *ei, IServiceProvider *caller)
1132 HTMLWindow *This = HTMLWINDOW2_THIS(iface);
1133 global_prop_t *prop;
1137 idx = id - MSHTML_DISPID_CUSTOM_MIN;
1138 if(idx >= This->global_prop_cnt)
1139 return DISP_E_MEMBERNOTFOUND;
1141 prop = This->global_props+idx;
1143 switch(prop->type) {
1144 case GLOBAL_SCRIPTVAR: {
1145 IDispatchEx *dispex;
1148 disp = get_script_disp(prop->script_host);
1150 return E_UNEXPECTED;
1152 hres = IDispatch_QueryInterface(disp, &IID_IDispatchEx, (void**)&dispex);
1153 if(SUCCEEDED(hres)) {
1154 TRACE("%s >>>\n", debugstr_w(prop->name));
1155 hres = IDispatchEx_InvokeEx(dispex, prop->id, lcid, flags, params, res, ei, caller);
1157 TRACE("%s <<<\n", debugstr_w(prop->name));
1159 WARN("%s <<< %08x\n", debugstr_w(prop->name), hres);
1160 IDispatchEx_Release(dispex);
1162 FIXME("No IDispatchEx\n");
1164 IDispatch_Release(disp);
1167 case GLOBAL_ELEMENTVAR: {
1170 hres = IHTMLDocument3_getElementById(HTMLDOC3(&This->doc->basedoc), prop->name, &elem);
1175 return DISP_E_MEMBERNOTFOUND;
1177 V_VT(res) = VT_DISPATCH;
1178 V_DISPATCH(res) = (IDispatch*)elem;
1182 ERR("invalid type %d\n", prop->type);
1183 hres = DISP_E_MEMBERNOTFOUND;
1189 #undef HTMLWINDOW2_THIS
1191 static const IHTMLWindow2Vtbl HTMLWindow2Vtbl = {
1192 HTMLWindow2_QueryInterface,
1194 HTMLWindow2_Release,
1195 HTMLWindow2_GetTypeInfoCount,
1196 HTMLWindow2_GetTypeInfo,
1197 HTMLWindow2_GetIDsOfNames,
1200 HTMLWindow2_get_length,
1201 HTMLWindow2_get_frames,
1202 HTMLWindow2_put_defaultStatus,
1203 HTMLWindow2_get_defaultStatus,
1204 HTMLWindow2_put_status,
1205 HTMLWindow2_get_status,
1206 HTMLWindow2_setTimeout,
1207 HTMLWindow2_clearTimeout,
1209 HTMLWindow2_confirm,
1211 HTMLWindow2_get_Image,
1212 HTMLWindow2_get_location,
1213 HTMLWindow2_get_history,
1215 HTMLWindow2_put_opener,
1216 HTMLWindow2_get_opener,
1217 HTMLWindow2_get_navigator,
1218 HTMLWindow2_put_name,
1219 HTMLWindow2_get_name,
1220 HTMLWindow2_get_parent,
1222 HTMLWindow2_get_self,
1223 HTMLWindow2_get_top,
1224 HTMLWindow2_get_window,
1225 HTMLWindow2_navigate,
1226 HTMLWindow2_put_onfocus,
1227 HTMLWindow2_get_onfocus,
1228 HTMLWindow2_put_onblur,
1229 HTMLWindow2_get_onblur,
1230 HTMLWindow2_put_onload,
1231 HTMLWindow2_get_onload,
1232 HTMLWindow2_put_onbeforeunload,
1233 HTMLWindow2_get_onbeforeunload,
1234 HTMLWindow2_put_onunload,
1235 HTMLWindow2_get_onunload,
1236 HTMLWindow2_put_onhelp,
1237 HTMLWindow2_get_onhelp,
1238 HTMLWindow2_put_onerror,
1239 HTMLWindow2_get_onerror,
1240 HTMLWindow2_put_onresize,
1241 HTMLWindow2_get_onresize,
1242 HTMLWindow2_put_onscroll,
1243 HTMLWindow2_get_onscroll,
1244 HTMLWindow2_get_document,
1245 HTMLWindow2_get_event,
1246 HTMLWindow2_get__newEnum,
1247 HTMLWindow2_showModalDialog,
1248 HTMLWindow2_showHelp,
1249 HTMLWindow2_get_screen,
1250 HTMLWindow2_get_Option,
1252 HTMLWindow2_get_closed,
1255 HTMLWindow2_get_clientInformation,
1256 HTMLWindow2_setInterval,
1257 HTMLWindow2_clearInterval,
1258 HTMLWindow2_put_offscreenBuffering,
1259 HTMLWindow2_get_offscreenBuffering,
1260 HTMLWindow2_execScript,
1261 HTMLWindow2_toString,
1262 HTMLWindow2_scrollBy,
1263 HTMLWindow2_scrollTo,
1266 HTMLWindow2_resizeTo,
1267 HTMLWindow2_resizeBy,
1268 HTMLWindow2_get_external
1271 #define HTMLWINDOW3_THIS(iface) DEFINE_THIS(HTMLWindow, HTMLWindow3, iface)
1273 static HRESULT WINAPI HTMLWindow3_QueryInterface(IHTMLWindow3 *iface, REFIID riid, void **ppv)
1275 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1277 return IHTMLWindow2_QueryInterface(HTMLWINDOW2(This), riid, ppv);
1280 static ULONG WINAPI HTMLWindow3_AddRef(IHTMLWindow3 *iface)
1282 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1284 return IHTMLWindow2_AddRef(HTMLWINDOW2(This));
1287 static ULONG WINAPI HTMLWindow3_Release(IHTMLWindow3 *iface)
1289 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1291 return IHTMLWindow2_Release(HTMLWINDOW2(This));
1294 static HRESULT WINAPI HTMLWindow3_GetTypeInfoCount(IHTMLWindow3 *iface, UINT *pctinfo)
1296 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1298 return IDispatchEx_GetTypeInfoCount(DISPATCHEX(This), pctinfo);
1301 static HRESULT WINAPI HTMLWindow3_GetTypeInfo(IHTMLWindow3 *iface, UINT iTInfo,
1302 LCID lcid, ITypeInfo **ppTInfo)
1304 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1306 return IDispatchEx_GetTypeInfo(DISPATCHEX(This), iTInfo, lcid, ppTInfo);
1309 static HRESULT WINAPI HTMLWindow3_GetIDsOfNames(IHTMLWindow3 *iface, REFIID riid,
1310 LPOLESTR *rgszNames, UINT cNames,
1311 LCID lcid, DISPID *rgDispId)
1313 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1315 return IDispatchEx_GetIDsOfNames(DISPATCHEX(This), riid, rgszNames, cNames, lcid, rgDispId);
1318 static HRESULT WINAPI HTMLWindow3_Invoke(IHTMLWindow3 *iface, DISPID dispIdMember,
1319 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
1320 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
1322 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1324 return IDispatchEx_Invoke(DISPATCHEX(This), dispIdMember, riid, lcid, wFlags, pDispParams,
1325 pVarResult, pExcepInfo, puArgErr);
1328 static HRESULT WINAPI HTMLWindow3_get_screenLeft(IHTMLWindow3 *iface, LONG *p)
1330 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1331 FIXME("(%p)->(%p)\n", This, p);
1335 static HRESULT WINAPI HTMLWindow3_get_screenTop(IHTMLWindow3 *iface, LONG *p)
1337 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1338 FIXME("(%p)->(%p)\n", This, p);
1342 static HRESULT WINAPI HTMLWindow3_attachEvent(IHTMLWindow3 *iface, BSTR event, IDispatch *pDisp, VARIANT_BOOL *pfResult)
1344 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1346 TRACE("(%p)->(%s %p %p)\n", This, debugstr_w(event), pDisp, pfResult);
1348 return attach_event(&This->event_target, &This->doc_obj->basedoc, event, pDisp, pfResult);
1351 static HRESULT WINAPI HTMLWindow3_detachEvent(IHTMLWindow3 *iface, BSTR event, IDispatch *pDisp)
1353 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1354 FIXME("(%p)->()\n", This);
1358 static HRESULT window_set_timer(HTMLWindow *This, VARIANT *expr, LONG msec, VARIANT *language,
1359 BOOL interval, LONG *timer_id)
1361 IDispatch *disp = NULL;
1363 switch(V_VT(expr)) {
1365 disp = V_DISPATCH(expr);
1366 IDispatch_AddRef(disp);
1370 disp = script_parse_event(This, V_BSTR(expr));
1374 FIXME("unimplemented vt=%d\n", V_VT(expr));
1381 *timer_id = set_task_timer(&This->doc->basedoc, msec, interval, disp);
1382 IDispatch_Release(disp);
1387 static HRESULT WINAPI HTMLWindow3_setTimeout(IHTMLWindow3 *iface, VARIANT *expression, LONG msec,
1388 VARIANT *language, LONG *timerID)
1390 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1392 TRACE("(%p)->(%p(%d) %d %p %p)\n", This, expression, V_VT(expression), msec, language, timerID);
1394 return window_set_timer(This, expression, msec, language, FALSE, timerID);
1397 static HRESULT WINAPI HTMLWindow3_setInterval(IHTMLWindow3 *iface, VARIANT *expression, LONG msec,
1398 VARIANT *language, LONG *timerID)
1400 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1402 TRACE("(%p)->(%p %d %p %p)\n", This, expression, msec, language, timerID);
1404 return window_set_timer(This, expression, msec, language, TRUE, timerID);
1407 static HRESULT WINAPI HTMLWindow3_print(IHTMLWindow3 *iface)
1409 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1410 FIXME("(%p)\n", This);
1414 static HRESULT WINAPI HTMLWindow3_put_onbeforeprint(IHTMLWindow3 *iface, VARIANT v)
1416 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1417 FIXME("(%p)->()\n", This);
1421 static HRESULT WINAPI HTMLWindow3_get_onbeforeprint(IHTMLWindow3 *iface, VARIANT *p)
1423 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1424 FIXME("(%p)->(%p)\n", This, p);
1428 static HRESULT WINAPI HTMLWindow3_put_onafterprint(IHTMLWindow3 *iface, VARIANT v)
1430 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1431 FIXME("(%p)->()\n", This);
1435 static HRESULT WINAPI HTMLWindow3_get_onafterprint(IHTMLWindow3 *iface, VARIANT *p)
1437 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1438 FIXME("(%p)->(%p)\n", This, p);
1442 static HRESULT WINAPI HTMLWindow3_get_clipboardData(IHTMLWindow3 *iface, IHTMLDataTransfer **p)
1444 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1445 FIXME("(%p)->(%p)\n", This, p);
1449 static HRESULT WINAPI HTMLWindow3_showModelessDialog(IHTMLWindow3 *iface, BSTR url,
1450 VARIANT *varArgIn, VARIANT *options, IHTMLWindow2 **pDialog)
1452 HTMLWindow *This = HTMLWINDOW3_THIS(iface);
1453 FIXME("(%p)->(%s %p %p %p)\n", This, debugstr_w(url), varArgIn, options, pDialog);
1457 #undef HTMLWINDOW3_THIS
1459 static const IHTMLWindow3Vtbl HTMLWindow3Vtbl = {
1460 HTMLWindow3_QueryInterface,
1462 HTMLWindow3_Release,
1463 HTMLWindow3_GetTypeInfoCount,
1464 HTMLWindow3_GetTypeInfo,
1465 HTMLWindow3_GetIDsOfNames,
1467 HTMLWindow3_get_screenLeft,
1468 HTMLWindow3_get_screenTop,
1469 HTMLWindow3_attachEvent,
1470 HTMLWindow3_detachEvent,
1471 HTMLWindow3_setTimeout,
1472 HTMLWindow3_setInterval,
1474 HTMLWindow3_put_onbeforeprint,
1475 HTMLWindow3_get_onbeforeprint,
1476 HTMLWindow3_put_onafterprint,
1477 HTMLWindow3_get_onafterprint,
1478 HTMLWindow3_get_clipboardData,
1479 HTMLWindow3_showModelessDialog
1482 #define HTMLWINDOW4_THIS(iface) DEFINE_THIS(HTMLWindow, HTMLWindow4, iface)
1484 static HRESULT WINAPI HTMLWindow4_QueryInterface(IHTMLWindow4 *iface, REFIID riid, void **ppv)
1486 HTMLWindow *This = HTMLWINDOW4_THIS(iface);
1488 return IHTMLWindow2_QueryInterface(HTMLWINDOW2(This), riid, ppv);
1491 static ULONG WINAPI HTMLWindow4_AddRef(IHTMLWindow4 *iface)
1493 HTMLWindow *This = HTMLWINDOW4_THIS(iface);
1495 return IHTMLWindow2_AddRef(HTMLWINDOW2(This));
1498 static ULONG WINAPI HTMLWindow4_Release(IHTMLWindow4 *iface)
1500 HTMLWindow *This = HTMLWINDOW4_THIS(iface);
1502 return IHTMLWindow2_Release(HTMLWINDOW2(This));
1505 static HRESULT WINAPI HTMLWindow4_GetTypeInfoCount(IHTMLWindow4 *iface, UINT *pctinfo)
1507 HTMLWindow *This = HTMLWINDOW4_THIS(iface);
1509 return IDispatchEx_GetTypeInfoCount(DISPATCHEX(This), pctinfo);
1512 static HRESULT WINAPI HTMLWindow4_GetTypeInfo(IHTMLWindow4 *iface, UINT iTInfo,
1513 LCID lcid, ITypeInfo **ppTInfo)
1515 HTMLWindow *This = HTMLWINDOW4_THIS(iface);
1517 return IDispatchEx_GetTypeInfo(DISPATCHEX(This), iTInfo, lcid, ppTInfo);
1520 static HRESULT WINAPI HTMLWindow4_GetIDsOfNames(IHTMLWindow4 *iface, REFIID riid,
1521 LPOLESTR *rgszNames, UINT cNames,
1522 LCID lcid, DISPID *rgDispId)
1524 HTMLWindow *This = HTMLWINDOW4_THIS(iface);
1526 return IDispatchEx_GetIDsOfNames(DISPATCHEX(This), riid, rgszNames, cNames, lcid, rgDispId);
1529 static HRESULT WINAPI HTMLWindow4_Invoke(IHTMLWindow4 *iface, DISPID dispIdMember,
1530 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
1531 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
1533 HTMLWindow *This = HTMLWINDOW4_THIS(iface);
1535 return IDispatchEx_Invoke(DISPATCHEX(This), dispIdMember, riid, lcid, wFlags, pDispParams,
1536 pVarResult, pExcepInfo, puArgErr);
1539 static HRESULT WINAPI HTMLWindow4_createPopup(IHTMLWindow4 *iface, VARIANT *varArgIn,
1540 IDispatch **ppPopup)
1542 HTMLWindow *This = HTMLWINDOW4_THIS(iface);
1543 FIXME("(%p)->(%p %p)\n", This, varArgIn, ppPopup);
1547 static HRESULT WINAPI HTMLWindow4_get_frameElement(IHTMLWindow4 *iface, IHTMLFrameBase **p)
1549 HTMLWindow *This = HTMLWINDOW4_THIS(iface);
1550 TRACE("(%p)->(%p)\n", This, p);
1552 if(This->frame_element) {
1553 *p = HTMLFRAMEBASE(This->frame_element);
1554 IHTMLFrameBase_AddRef(*p);
1561 #undef HTMLWINDOW4_THIS
1563 static const IHTMLWindow4Vtbl HTMLWindow4Vtbl = {
1564 HTMLWindow4_QueryInterface,
1566 HTMLWindow4_Release,
1567 HTMLWindow4_GetTypeInfoCount,
1568 HTMLWindow4_GetTypeInfo,
1569 HTMLWindow4_GetIDsOfNames,
1571 HTMLWindow4_createPopup,
1572 HTMLWindow4_get_frameElement
1575 #define DISPEX_THIS(iface) DEFINE_THIS(HTMLWindow, IDispatchEx, iface)
1577 static HRESULT WINAPI WindowDispEx_QueryInterface(IDispatchEx *iface, REFIID riid, void **ppv)
1579 HTMLWindow *This = DISPEX_THIS(iface);
1581 return IHTMLWindow2_QueryInterface(HTMLWINDOW2(This), riid, ppv);
1584 static ULONG WINAPI WindowDispEx_AddRef(IDispatchEx *iface)
1586 HTMLWindow *This = DISPEX_THIS(iface);
1588 return IHTMLWindow2_AddRef(HTMLWINDOW2(This));
1591 static ULONG WINAPI WindowDispEx_Release(IDispatchEx *iface)
1593 HTMLWindow *This = DISPEX_THIS(iface);
1595 return IHTMLWindow2_Release(HTMLWINDOW2(This));
1598 static HRESULT WINAPI WindowDispEx_GetTypeInfoCount(IDispatchEx *iface, UINT *pctinfo)
1600 HTMLWindow *This = DISPEX_THIS(iface);
1602 TRACE("(%p)->(%p)\n", This, pctinfo);
1604 return IDispatchEx_GetTypeInfoCount(DISPATCHEX(&This->dispex), pctinfo);
1607 static HRESULT WINAPI WindowDispEx_GetTypeInfo(IDispatchEx *iface, UINT iTInfo,
1608 LCID lcid, ITypeInfo **ppTInfo)
1610 HTMLWindow *This = DISPEX_THIS(iface);
1612 TRACE("(%p)->(%u %u %p)\n", This, iTInfo, lcid, ppTInfo);
1614 return IDispatchEx_GetTypeInfo(DISPATCHEX(&This->dispex), iTInfo, lcid, ppTInfo);
1617 static HRESULT WINAPI WindowDispEx_GetIDsOfNames(IDispatchEx *iface, REFIID riid,
1618 LPOLESTR *rgszNames, UINT cNames,
1619 LCID lcid, DISPID *rgDispId)
1621 HTMLWindow *This = DISPEX_THIS(iface);
1623 TRACE("(%p)->(%s %p %u %u %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
1626 /* FIXME: Use script dispatch */
1628 return IDispatchEx_GetIDsOfNames(DISPATCHEX(&This->dispex), riid, rgszNames, cNames, lcid, rgDispId);
1631 static HRESULT WINAPI WindowDispEx_Invoke(IDispatchEx *iface, DISPID dispIdMember,
1632 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
1633 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
1635 HTMLWindow *This = DISPEX_THIS(iface);
1637 TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
1638 lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
1640 /* FIXME: Use script dispatch */
1642 return IDispatchEx_Invoke(DISPATCHEX(&This->dispex), dispIdMember, riid, lcid, wFlags, pDispParams,
1643 pVarResult, pExcepInfo, puArgErr);
1646 static global_prop_t *alloc_global_prop(HTMLWindow *This, global_prop_type_t type, BSTR name)
1648 if(This->global_prop_cnt == This->global_prop_size) {
1649 global_prop_t *new_props;
1652 if(This->global_props) {
1653 new_size = This->global_prop_size*2;
1654 new_props = heap_realloc(This->global_props, new_size*sizeof(global_prop_t));
1657 new_props = heap_alloc(new_size*sizeof(global_prop_t));
1661 This->global_props = new_props;
1662 This->global_prop_size = new_size;
1665 This->global_props[This->global_prop_cnt].name = heap_strdupW(name);
1666 if(!This->global_props[This->global_prop_cnt].name)
1669 This->global_props[This->global_prop_cnt].type = type;
1670 return This->global_props + This->global_prop_cnt++;
1673 static inline DWORD prop_to_dispid(HTMLWindow *This, global_prop_t *prop)
1675 return MSHTML_DISPID_CUSTOM_MIN + (prop-This->global_props);
1678 static HRESULT WINAPI WindowDispEx_GetDispID(IDispatchEx *iface, BSTR bstrName, DWORD grfdex, DISPID *pid)
1680 HTMLWindow *This = DISPEX_THIS(iface);
1681 ScriptHost *script_host;
1686 TRACE("(%p)->(%s %x %p)\n", This, debugstr_w(bstrName), grfdex, pid);
1688 for(i=0; i < This->global_prop_cnt; i++) {
1689 /* FIXME: case sensitivity */
1690 if(!strcmpW(This->global_props[i].name, bstrName)) {
1691 *pid = MSHTML_DISPID_CUSTOM_MIN+i;
1696 if(find_global_prop(This, bstrName, grfdex, &script_host, &id)) {
1697 global_prop_t *prop;
1699 prop = alloc_global_prop(This, GLOBAL_SCRIPTVAR, bstrName);
1701 return E_OUTOFMEMORY;
1703 prop->script_host = script_host;
1706 *pid = prop_to_dispid(This, prop);
1710 hres = IDispatchEx_GetDispID(DISPATCHEX(&This->dispex), bstrName, grfdex, pid);
1711 if(hres != DISP_E_UNKNOWNNAME)
1715 global_prop_t *prop;
1718 hres = IHTMLDocument3_getElementById(HTMLDOC3(&This->doc->basedoc), bstrName, &elem);
1719 if(SUCCEEDED(hres) && elem) {
1720 IHTMLElement_Release(elem);
1722 prop = alloc_global_prop(This, GLOBAL_ELEMENTVAR, bstrName);
1724 return E_OUTOFMEMORY;
1726 *pid = prop_to_dispid(This, prop);
1731 return DISP_E_UNKNOWNNAME;
1734 static HRESULT WINAPI WindowDispEx_InvokeEx(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1735 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
1737 HTMLWindow *This = DISPEX_THIS(iface);
1739 TRACE("(%p)->(%x %x %x %p %p %p %p)\n", This, id, lcid, wFlags, pdp, pvarRes, pei, pspCaller);
1741 return IDispatchEx_InvokeEx(DISPATCHEX(&This->dispex), id, lcid, wFlags, pdp, pvarRes, pei, pspCaller);
1744 static HRESULT WINAPI WindowDispEx_DeleteMemberByName(IDispatchEx *iface, BSTR bstrName, DWORD grfdex)
1746 HTMLWindow *This = DISPEX_THIS(iface);
1748 TRACE("(%p)->(%s %x)\n", This, debugstr_w(bstrName), grfdex);
1750 return IDispatchEx_DeleteMemberByName(DISPATCHEX(&This->dispex), bstrName, grfdex);
1753 static HRESULT WINAPI WindowDispEx_DeleteMemberByDispID(IDispatchEx *iface, DISPID id)
1755 HTMLWindow *This = DISPEX_THIS(iface);
1757 TRACE("(%p)->(%x)\n", This, id);
1759 return IDispatchEx_DeleteMemberByDispID(DISPATCHEX(&This->dispex), id);
1762 static HRESULT WINAPI WindowDispEx_GetMemberProperties(IDispatchEx *iface, DISPID id, DWORD grfdexFetch, DWORD *pgrfdex)
1764 HTMLWindow *This = DISPEX_THIS(iface);
1766 TRACE("(%p)->(%x %x %p)\n", This, id, grfdexFetch, pgrfdex);
1768 return IDispatchEx_GetMemberProperties(DISPATCHEX(&This->dispex), id, grfdexFetch, pgrfdex);
1771 static HRESULT WINAPI WindowDispEx_GetMemberName(IDispatchEx *iface, DISPID id, BSTR *pbstrName)
1773 HTMLWindow *This = DISPEX_THIS(iface);
1775 TRACE("(%p)->(%x %p)\n", This, id, pbstrName);
1777 return IDispatchEx_GetMemberName(DISPATCHEX(&This->dispex), id, pbstrName);
1780 static HRESULT WINAPI WindowDispEx_GetNextDispID(IDispatchEx *iface, DWORD grfdex, DISPID id, DISPID *pid)
1782 HTMLWindow *This = DISPEX_THIS(iface);
1784 TRACE("(%p)->(%x %x %p)\n", This, grfdex, id, pid);
1786 return IDispatchEx_GetNextDispID(DISPATCHEX(&This->dispex), grfdex, id, pid);
1789 static HRESULT WINAPI WindowDispEx_GetNameSpaceParent(IDispatchEx *iface, IUnknown **ppunk)
1791 HTMLWindow *This = DISPEX_THIS(iface);
1793 TRACE("(%p)->(%p)\n", This, ppunk);
1801 static const IDispatchExVtbl WindowDispExVtbl = {
1802 WindowDispEx_QueryInterface,
1803 WindowDispEx_AddRef,
1804 WindowDispEx_Release,
1805 WindowDispEx_GetTypeInfoCount,
1806 WindowDispEx_GetTypeInfo,
1807 WindowDispEx_GetIDsOfNames,
1808 WindowDispEx_Invoke,
1809 WindowDispEx_GetDispID,
1810 WindowDispEx_InvokeEx,
1811 WindowDispEx_DeleteMemberByName,
1812 WindowDispEx_DeleteMemberByDispID,
1813 WindowDispEx_GetMemberProperties,
1814 WindowDispEx_GetMemberName,
1815 WindowDispEx_GetNextDispID,
1816 WindowDispEx_GetNameSpaceParent
1819 static const tid_t HTMLWindow_iface_tids[] = {
1826 static const dispex_static_data_vtbl_t HTMLWindow_dispex_vtbl = {
1832 static dispex_static_data_t HTMLWindow_dispex = {
1833 &HTMLWindow_dispex_vtbl,
1834 DispHTMLWindow2_tid,
1836 HTMLWindow_iface_tids
1839 HRESULT HTMLWindow_Create(HTMLDocumentObj *doc_obj, nsIDOMWindow *nswindow, HTMLWindow *parent, HTMLWindow **ret)
1843 window = heap_alloc_zero(sizeof(HTMLWindow));
1845 return E_OUTOFMEMORY;
1847 window->window_ref = heap_alloc(sizeof(windowref_t));
1848 if(!window->window_ref) {
1850 return E_OUTOFMEMORY;
1853 window->lpHTMLWindow2Vtbl = &HTMLWindow2Vtbl;
1854 window->lpHTMLWindow3Vtbl = &HTMLWindow3Vtbl;
1855 window->lpHTMLWindow4Vtbl = &HTMLWindow4Vtbl;
1856 window->lpIDispatchExVtbl = &WindowDispExVtbl;
1858 window->doc_obj = doc_obj;
1860 window->window_ref->window = window;
1861 window->window_ref->ref = 1;
1863 init_dispex(&window->dispex, (IUnknown*)HTMLWINDOW2(window), &HTMLWindow_dispex);
1866 nsIDOMWindow_AddRef(nswindow);
1867 window->nswindow = nswindow;
1870 window->scriptmode = parent ? parent->scriptmode : SCRIPTMODE_GECKO;
1871 window->readystate = READYSTATE_UNINITIALIZED;
1872 list_init(&window->script_hosts);
1874 window->task_magic = get_task_target_magic();
1875 update_window_doc(window);
1877 list_init(&window->children);
1878 list_add_head(&window_list, &window->entry);
1881 IHTMLWindow2_AddRef(HTMLWINDOW2(window));
1883 window->parent = parent;
1884 list_add_tail(&parent->children, &window->sibling_entry);
1891 void update_window_doc(HTMLWindow *window)
1893 nsIDOMHTMLDocument *nshtmldoc;
1894 nsIDOMDocument *nsdoc;
1897 nsres = nsIDOMWindow_GetDocument(window->nswindow, &nsdoc);
1898 if(NS_FAILED(nsres) || !nsdoc) {
1899 ERR("GetDocument failed: %08x\n", nsres);
1903 nsres = nsIDOMDocument_QueryInterface(nsdoc, &IID_nsIDOMHTMLDocument, (void**)&nshtmldoc);
1904 nsIDOMDocument_Release(nsdoc);
1905 if(NS_FAILED(nsres)) {
1906 ERR("Could not get nsIDOMHTMLDocument iface: %08x\n", nsres);
1910 if(!window->doc || window->doc->nsdoc != nshtmldoc) {
1911 HTMLDocumentNode *doc;
1914 hres = create_doc_from_nsdoc(nshtmldoc, window->doc_obj, window, &doc);
1915 if(SUCCEEDED(hres)) {
1916 window_set_docnode(window, doc);
1917 htmldoc_release(&doc->basedoc);
1919 ERR("create_doc_from_nsdoc failed: %08x\n", hres);
1923 nsIDOMHTMLDocument_Release(nshtmldoc);
1926 HTMLWindow *nswindow_to_window(const nsIDOMWindow *nswindow)
1930 LIST_FOR_EACH_ENTRY(iter, &window_list, HTMLWindow, entry) {
1931 if(iter->nswindow == nswindow)