2 * Copyright 2008-2011 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
22 #include <wine/test.h>
35 #define DEFINE_EXPECT(func) \
36 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
38 #define SET_EXPECT(func) \
39 do { called_ ## func = FALSE; expect_ ## func = TRUE; } while(0)
41 #define CHECK_EXPECT2(func) \
44 ok(expect_ ##func, "unexpected call " #func "\n"); \
45 called_ ## func = TRUE; \
48 #define CHECK_EXPECT(func) \
50 CHECK_EXPECT2(func); \
51 expect_ ## func = FALSE; \
54 #define CHECK_CALLED(func) \
56 ok(called_ ## func, "expected " #func "\n"); \
57 expect_ ## func = called_ ## func = FALSE; \
60 DEFINE_EXPECT(document_onclick
);
61 DEFINE_EXPECT(body_onclick
);
62 DEFINE_EXPECT(doc_onclick_attached
);
63 DEFINE_EXPECT(div_onclick
);
64 DEFINE_EXPECT(div_onclick_attached
);
65 DEFINE_EXPECT(timeout
);
66 DEFINE_EXPECT(doccp_onclick
);
67 DEFINE_EXPECT(doccp_onclick_cancel
);
68 DEFINE_EXPECT(div_onclick_disp
);
69 DEFINE_EXPECT(invoke_onclick
);
70 DEFINE_EXPECT(iframe_onreadystatechange_loading
);
71 DEFINE_EXPECT(iframe_onreadystatechange_interactive
);
72 DEFINE_EXPECT(iframe_onreadystatechange_complete
);
73 DEFINE_EXPECT(iframedoc_onreadystatechange
);
74 DEFINE_EXPECT(img_onload
);
75 DEFINE_EXPECT(input_onfocus
);
76 DEFINE_EXPECT(form_onsubmit
);
77 DEFINE_EXPECT(form_onclick
);
78 DEFINE_EXPECT(submit_onclick
);
79 DEFINE_EXPECT(submit_onclick_attached
);
80 DEFINE_EXPECT(submit_onclick_setret
);
82 static HWND container_hwnd
= NULL
;
83 static IHTMLWindow2
*window
;
84 static IOleDocumentView
*view
;
94 static const xy_test_t no_xy
= {-10,-10,-10,-10};
95 static const xy_test_t zero_xy
= {0,0,0,0};
97 static const char empty_doc_str
[] =
100 static const char click_doc_str
[] =
102 "<div id=\"clickdiv\" style=\"text-align: center; background: red; font-size: 32\">click here</div>"
105 static const char readystate_doc_str
[] =
106 "<html><body><iframe id=\"iframe\"></iframe></body></html>";
108 static const char img_doc_str
[] =
109 "<html><body><img id=\"imgid\"></img></body></html>";
111 static const char input_doc_str
[] =
112 "<html><body><input id=\"inputid\"></input></body></html>";
114 static const char iframe_doc_str
[] =
115 "<html><body><iframe id=\"ifr\">Testing</iframe></body></html>";
117 static const char form_doc_str
[] =
118 "<html><body><form id=\"formid\" method=\"post\" action=\"about:blank\">"
119 "<input type=\"text\" value=\"test\" name=\"i\"/>"
120 "<input type=\"submit\" id=\"submitid\" />"
121 "</form></body></html>";
123 static const char *debugstr_guid(REFIID riid
)
127 sprintf(buf
, "{%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x}",
128 riid
->Data1
, riid
->Data2
, riid
->Data3
, riid
->Data4
[0],
129 riid
->Data4
[1], riid
->Data4
[2], riid
->Data4
[3], riid
->Data4
[4],
130 riid
->Data4
[5], riid
->Data4
[6], riid
->Data4
[7]);
135 static int strcmp_wa(LPCWSTR strw
, const char *stra
)
138 WideCharToMultiByte(CP_ACP
, 0, strw
, -1, buf
, sizeof(buf
), NULL
, NULL
);
139 return lstrcmpA(stra
, buf
);
142 static BSTR
a2bstr(const char *str
)
147 len
= MultiByteToWideChar(CP_ACP
, 0, str
, -1, NULL
, 0);
148 ret
= SysAllocStringLen(NULL
, len
-1);
149 MultiByteToWideChar(CP_ACP
, 0, str
, -1, ret
, len
);
154 static BOOL
iface_cmp(IUnknown
*iface1
, IUnknown
*iface2
)
156 IUnknown
*unk1
, *unk2
;
161 IUnknown_QueryInterface(iface1
, &IID_IUnknown
, (void**)&unk1
);
162 IUnknown_Release(unk1
);
163 IUnknown_QueryInterface(iface1
, &IID_IUnknown
, (void**)&unk2
);
164 IUnknown_Release(unk2
);
169 #define test_disp(u,id) _test_disp(__LINE__,u,id)
170 static void _test_disp(unsigned line
, IUnknown
*unk
, const IID
*diid
)
177 hres
= IUnknown_QueryInterface(unk
, &IID_IDispatchEx
, (void**)&dispex
);
178 ok_(__FILE__
,line
) (hres
== S_OK
, "Could not get IDispatch: %08x\n", hres
);
183 hres
= IDispatchEx_GetTypeInfoCount(dispex
, &ticnt
);
184 ok_(__FILE__
,line
) (hres
== S_OK
, "GetTypeInfoCount failed: %08x\n", hres
);
185 ok_(__FILE__
,line
) (ticnt
== 1, "ticnt=%u\n", ticnt
);
187 hres
= IDispatchEx_GetTypeInfo(dispex
, 0, 0, &typeinfo
);
188 ok_(__FILE__
,line
) (hres
== S_OK
, "GetTypeInfo failed: %08x\n", hres
);
190 if(SUCCEEDED(hres
)) {
193 hres
= ITypeInfo_GetTypeAttr(typeinfo
, &type_attr
);
194 ok_(__FILE__
,line
) (hres
== S_OK
, "GetTypeAttr failed: %08x\n", hres
);
195 ok_(__FILE__
,line
) (IsEqualGUID(&type_attr
->guid
, diid
), "unexpected guid %s\n",
196 debugstr_guid(&type_attr
->guid
));
198 ITypeInfo_ReleaseTypeAttr(typeinfo
, type_attr
);
199 ITypeInfo_Release(typeinfo
);
202 IDispatchEx_Release(dispex
);
205 #define get_doc3_iface(u) _get_doc3_iface(__LINE__,u)
206 static IHTMLDocument3
*_get_doc3_iface(unsigned line
, IUnknown
*unk
)
208 IHTMLDocument3
*doc3
;
211 hres
= IUnknown_QueryInterface(unk
, &IID_IHTMLDocument3
, (void**)&doc3
);
212 ok_(__FILE__
,line
) (hres
== S_OK
, "Could not get IHTMLDocument3 iface: %08x\n", hres
);
217 #define get_elem_iface(u) _get_elem_iface(__LINE__,u)
218 static IHTMLElement
*_get_elem_iface(unsigned line
, IUnknown
*unk
)
223 hres
= IUnknown_QueryInterface(unk
, &IID_IHTMLElement
, (void**)&elem
);
224 ok_(__FILE__
,line
) (hres
== S_OK
, "Could not get IHTMLElement iface: %08x\n", hres
);
229 #define get_elem2_iface(u) _get_elem2_iface(__LINE__,u)
230 static IHTMLElement2
*_get_elem2_iface(unsigned line
, IUnknown
*unk
)
232 IHTMLElement2
*elem2
;
235 hres
= IUnknown_QueryInterface(unk
, &IID_IHTMLElement2
, (void**)&elem2
);
236 ok_(__FILE__
,line
) (hres
== S_OK
, "Could not get IHTMLElement2 iface: %08x\n", hres
);
241 #define get_elem3_iface(u) _get_elem3_iface(__LINE__,u)
242 static IHTMLElement3
*_get_elem3_iface(unsigned line
, IUnknown
*unk
)
244 IHTMLElement3
*elem3
;
247 hres
= IUnknown_QueryInterface(unk
, &IID_IHTMLElement3
, (void**)&elem3
);
248 ok_(__FILE__
,line
) (hres
== S_OK
, "Could not get IHTMLElement3 iface: %08x\n", hres
);
253 #define doc_get_body(d) _doc_get_body(__LINE__,d)
254 static IHTMLElement
*_doc_get_body(unsigned line
, IHTMLDocument2
*doc
)
256 IHTMLElement
*body
= NULL
;
259 hres
= IHTMLDocument2_get_body(doc
, &body
);
260 ok_(__FILE__
,line
) (hres
== S_OK
, "get_body failed: %08x\n", hres
);
261 ok_(__FILE__
,line
) (body
!= NULL
, "body == NULL\n");
266 #define get_elem_id(d,i) _get_elem_id(__LINE__,d,i)
267 static IHTMLElement
*_get_elem_id(unsigned line
, IHTMLDocument2
*doc
, const char *id
)
269 IHTMLDocument3
*doc3
= _get_doc3_iface(line
, (IUnknown
*)doc
);
275 hres
= IHTMLDocument3_getElementById(doc3
, str
, &elem
);
277 IHTMLDocument3_Release(doc3
);
278 ok_(__FILE__
,line
) (hres
== S_OK
, "getElementById failed: %08x\n", hres
);
283 #define test_elem_tag(u,n) _test_elem_tag(__LINE__,u,n)
284 static void _test_elem_tag(unsigned line
, IUnknown
*unk
, const char *extag
)
286 IHTMLElement
*elem
= _get_elem_iface(line
, unk
);
290 hres
= IHTMLElement_get_tagName(elem
, &tag
);
291 IHTMLElement_Release(elem
);
292 ok_(__FILE__
, line
) (hres
== S_OK
, "get_tagName failed: %08x\n", hres
);
293 ok_(__FILE__
, line
) (!strcmp_wa(tag
, extag
), "got tag: %s, expected %s\n", wine_dbgstr_w(tag
), extag
);
298 #define get_event_obj() _get_event_obj(__LINE__)
299 static IHTMLEventObj
*_get_event_obj(unsigned line
)
301 IHTMLEventObj
*event
= NULL
;
304 hres
= IHTMLWindow2_get_event(window
, &event
);
305 ok_(__FILE__
,line
) (hres
== S_OK
, "get_event failed: %08x\n", hres
);
306 ok_(__FILE__
,line
) (event
!= NULL
, "event = NULL\n");
307 _test_disp(line
, (IUnknown
*)event
, &DIID_DispCEventObj
);
312 #define elem_fire_event(a,b,c) _elem_fire_event(__LINE__,a,b,c)
313 static void _elem_fire_event(unsigned line
, IUnknown
*unk
, const char *event
, VARIANT
*evobj
)
315 IHTMLElement3
*elem3
= _get_elem3_iface(line
, unk
);
322 hres
= IHTMLElement3_fireEvent(elem3
, str
, evobj
, &b
);
324 ok_(__FILE__
,line
)(hres
== S_OK
, "fireEvent failed: %08x\n", hres
);
325 ok_(__FILE__
,line
)(b
== VARIANT_TRUE
, "fireEvent returned %x\n", b
);
328 #define test_event_args(a,b,c,d,e,f,g) _test_event_args(__LINE__,a,b,c,d,e,f,g)
329 static void _test_event_args(unsigned line
, const IID
*dispiid
, DISPID id
, WORD wFlags
, DISPPARAMS
*pdp
,
330 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
332 ok_(__FILE__
,line
) (id
== DISPID_VALUE
, "id = %d\n", id
);
333 ok_(__FILE__
,line
) (wFlags
== DISPATCH_METHOD
, "wFlags = %x\n", wFlags
);
334 ok_(__FILE__
,line
) (pdp
!= NULL
, "pdp == NULL\n");
335 ok_(__FILE__
,line
) (pdp
->cArgs
== 1, "pdp->cArgs = %d\n", pdp
->cArgs
);
336 ok_(__FILE__
,line
) (pdp
->cNamedArgs
== 1, "pdp->cNamedArgs = %d\n", pdp
->cNamedArgs
);
337 ok_(__FILE__
,line
) (pdp
->rgdispidNamedArgs
[0] == DISPID_THIS
, "pdp->rgdispidNamedArgs[0] = %d\n",
338 pdp
->rgdispidNamedArgs
[0]);
339 ok_(__FILE__
,line
) (V_VT(pdp
->rgvarg
) == VT_DISPATCH
, "V_VT(rgvarg) = %d\n", V_VT(pdp
->rgvarg
));
340 ok_(__FILE__
,line
) (pvarRes
!= NULL
, "pvarRes == NULL\n");
341 ok_(__FILE__
,line
) (pei
!= NULL
, "pei == NULL");
342 ok_(__FILE__
,line
) (!pspCaller
, "pspCaller != NULL\n");
345 _test_disp(line
, (IUnknown
*)V_DISPATCH(pdp
->rgvarg
), dispiid
);
348 #define test_attached_event_args(a,b,c,d,e) _test_attached_event_args(__LINE__,a,b,c,d,e)
349 static void _test_attached_event_args(unsigned line
, DISPID id
, WORD wFlags
, DISPPARAMS
*pdp
,
350 VARIANT
*pvarRes
, EXCEPINFO
*pei
)
352 IHTMLEventObj
*event
;
354 ok(id
== DISPID_VALUE
, "id = %d\n", id
);
355 ok(wFlags
== DISPATCH_METHOD
, "wFlags = %x\n", wFlags
);
356 ok(pdp
!= NULL
, "pDispParams == NULL\n");
357 ok(pdp
->cArgs
== 1, "pdp->cArgs = %d\n", pdp
->cArgs
);
358 ok(!pdp
->cNamedArgs
, "pdp->cNamedArgs = %d\n", pdp
->cNamedArgs
);
359 ok(!pdp
->rgdispidNamedArgs
, "pdp->rgdispidNamedArgs = %p\n", pdp
->rgdispidNamedArgs
);
360 ok(pdp
->rgvarg
!= NULL
, "rgvarg = NULL\n");
361 ok(pvarRes
!= NULL
, "pvarRes = NULL\n");
362 ok(pei
!= NULL
, "pei = NULL\n");
363 ok(V_VT(pvarRes
) == VT_EMPTY
, "V_VT(pVarRes) = %d\n", V_VT(pvarRes
));
364 ok(V_VT(pdp
->rgvarg
) == VT_DISPATCH
, "V_VT(pdp->rgvarg) = %d\n", V_VT(pdp
->rgvarg
));
365 ok(V_DISPATCH(pdp
->rgvarg
) != NULL
, "V_DISPATCH(pdp->rgvarg) = %p\n", V_DISPATCH(pdp
->rgvarg
));
367 event
= _get_event_obj(line
);
368 ok(iface_cmp((IUnknown
*)event
, (IUnknown
*)V_DISPATCH(pdp
->rgvarg
)), "event != arg0\n");
369 IHTMLEventObj_Release(event
);
372 #define get_event_src() _get_event_src(__LINE__)
373 static IHTMLElement
*_get_event_src(unsigned line
)
375 IHTMLEventObj
*event
= _get_event_obj(line
);
376 IHTMLElement
*src_elem
= NULL
;
379 hres
= IHTMLEventObj_get_srcElement(event
, &src_elem
);
380 IHTMLEventObj_Release(event
);
381 ok_(__FILE__
,line
) (hres
== S_OK
, "get_srcElement failed: %08x\n", hres
);
386 #define test_event_src(t) _test_event_src(__LINE__,t)
387 static void _test_event_src(unsigned line
, const char *src_tag
)
389 IHTMLElement
*src_elem
= _get_event_src(line
);
392 ok_(__FILE__
,line
) (src_elem
!= NULL
, "src_elem = NULL\n");
393 _test_elem_tag(line
, (IUnknown
*)src_elem
, src_tag
);
394 IHTMLElement_Release(src_elem
);
396 ok_(__FILE__
,line
) (!src_elem
, "src_elem != NULL\n");
400 static void _test_event_altkey(unsigned line
, IHTMLEventObj
*event
, VARIANT_BOOL exval
)
405 hres
= IHTMLEventObj_get_altKey(event
, &b
);
406 ok_(__FILE__
,line
)(hres
== S_OK
, "get_altKey failed: %08x\n", hres
);
407 ok_(__FILE__
,line
)(b
== exval
, "altKey = %x, expected %x\n", b
, exval
);
410 static void _test_event_ctrlkey(unsigned line
, IHTMLEventObj
*event
, VARIANT_BOOL exval
)
415 hres
= IHTMLEventObj_get_ctrlKey(event
, &b
);
416 ok_(__FILE__
,line
)(hres
== S_OK
, "get_ctrlKey failed: %08x\n", hres
);
417 ok_(__FILE__
,line
)(b
== exval
, "ctrlKey = %x, expected %x\n", b
, exval
);
420 static void _test_event_shiftkey(unsigned line
, IHTMLEventObj
*event
, VARIANT_BOOL exval
)
425 hres
= IHTMLEventObj_get_shiftKey(event
, &b
);
426 ok_(__FILE__
,line
)(hres
== S_OK
, "get_shiftKey failed: %08x\n", hres
);
427 ok_(__FILE__
,line
)(b
== exval
, "shiftKey = %x, expected %x\n", b
, exval
);
430 static void _test_event_cancelbubble(unsigned line
, IHTMLEventObj
*event
, VARIANT_BOOL exval
)
435 hres
= IHTMLEventObj_get_cancelBubble(event
, &b
);
436 ok_(__FILE__
,line
)(hres
== S_OK
, "get_cancelBubble failed: %08x\n", hres
);
437 ok_(__FILE__
,line
)(b
== exval
, "cancelBubble = %x, expected %x\n", b
, exval
);
440 static void _test_event_fromelem(unsigned line
, IHTMLEventObj
*event
, const char *from_tag
)
445 hres
= IHTMLEventObj_get_fromElement(event
, &elem
);
446 ok_(__FILE__
,line
)(hres
== S_OK
, "get_fromElement failed: %08x\n", hres
);
448 _test_elem_tag(line
, (IUnknown
*)elem
, from_tag
);
450 ok_(__FILE__
,line
)(elem
== NULL
, "fromElement != NULL\n");
452 IHTMLElement_Release(elem
);
455 static void _test_event_toelem(unsigned line
, IHTMLEventObj
*event
, const char *to_tag
)
460 hres
= IHTMLEventObj_get_toElement(event
, &elem
);
461 ok_(__FILE__
,line
)(hres
== S_OK
, "get_toElement failed: %08x\n", hres
);
463 _test_elem_tag(line
, (IUnknown
*)elem
, to_tag
);
465 ok_(__FILE__
,line
)(elem
== NULL
, "toElement != NULL\n");
467 IHTMLElement_Release(elem
);
470 static void _test_event_keycode(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
475 hres
= IHTMLEventObj_get_keyCode(event
, &l
);
476 ok_(__FILE__
,line
)(hres
== S_OK
, "get_keyCode failed: %08x\n", hres
);
477 ok_(__FILE__
,line
)(l
== exl
, "keyCode = %x, expected %x\n", l
, exl
);
480 static void _test_event_button(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
485 hres
= IHTMLEventObj_get_button(event
, &l
);
486 ok_(__FILE__
,line
)(hres
== S_OK
, "get_button failed: %08x\n", hres
);
487 ok_(__FILE__
,line
)(l
== exl
, "button = %x, expected %x\n", l
, exl
);
490 static void _test_event_reason(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
495 hres
= IHTMLEventObj_get_reason(event
, &l
);
496 ok_(__FILE__
,line
)(hres
== S_OK
, "get_reason failed: %08x\n", hres
);
497 ok_(__FILE__
,line
)(l
== exl
, "reason = %x, expected %x\n", l
, exl
);
500 static void _test_event_x(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
505 hres
= IHTMLEventObj_get_x(event
, &l
);
506 ok_(__FILE__
,line
)(hres
== S_OK
, "get_x failed: %08x\n", hres
);
507 if(exl
!= -10) /* don't test the exact value */
508 ok_(__FILE__
,line
)(l
== exl
, "x = %d, expected %d\n", l
, exl
);
511 static void _test_event_y(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
516 hres
= IHTMLEventObj_get_y(event
, &l
);
517 ok_(__FILE__
,line
)(hres
== S_OK
, "get_y failed: %08x\n", hres
);
518 if(exl
!= -10) /* don't test the exact value */
519 ok_(__FILE__
,line
)(l
== exl
, "y = %d, expected %d\n", l
, exl
);
522 static void _test_event_clientx(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
527 hres
= IHTMLEventObj_get_clientX(event
, &l
);
528 ok_(__FILE__
,line
)(hres
== S_OK
, "get_clientX failed: %08x\n", hres
);
529 if(exl
!= -10) /* don't test the exact value */
530 ok_(__FILE__
,line
)(l
== exl
, "clientX = %d, expected %d\n", l
, exl
);
533 static void _test_event_clienty(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
538 hres
= IHTMLEventObj_get_clientY(event
, &l
);
539 ok_(__FILE__
,line
)(hres
== S_OK
, "get_clientY failed: %08x\n", hres
);
540 if(exl
!= -10) /* don't test the exact value */
541 ok_(__FILE__
,line
)(l
== exl
, "clientY = %d, expected %d\n", l
, exl
);
544 static void _test_event_offsetx(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
549 hres
= IHTMLEventObj_get_offsetX(event
, &l
);
550 ok_(__FILE__
,line
)(hres
== S_OK
, "get_offsetX failed: %08x\n", hres
);
551 if(exl
!= -10) /* don't test the exact value */
552 ok_(__FILE__
,line
)(l
== exl
, "offsetX = %d, expected %d\n", l
, exl
);
555 static void _test_event_offsety(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
560 hres
= IHTMLEventObj_get_offsetY(event
, &l
);
561 ok_(__FILE__
,line
)(hres
== S_OK
, "get_offsetY failed: %08x\n", hres
);
562 if(exl
!= -10) /* don't test the exact value */
563 ok_(__FILE__
,line
)(l
== exl
, "offsetY = %d, expected %d\n", l
, exl
);
566 static void _test_event_screenx(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
571 hres
= IHTMLEventObj_get_screenX(event
, &l
);
572 ok_(__FILE__
,line
)(hres
== S_OK
, "get_screenX failed: %08x\n", hres
);
573 if(exl
!= -10) /* don't test the exact value */
574 ok_(__FILE__
,line
)(l
== exl
, "screenX = %d, expected %d\n", l
, exl
);
577 static void _test_event_screeny(unsigned line
, IHTMLEventObj
*event
, LONG exl
)
582 hres
= IHTMLEventObj_get_screenY(event
, &l
);
583 ok_(__FILE__
,line
)(hres
== S_OK
, "get_screenY failed: %08x\n", hres
);
584 if(exl
!= -10) /* don't test the exact value for -10 */
585 ok_(__FILE__
,line
)(l
== exl
, "screenY = %d, expected %d\n", l
, exl
);
588 static void _test_event_type(unsigned line
, IHTMLEventObj
*event
, const char *exstr
)
593 hres
= IHTMLEventObj_get_type(event
, &str
);
594 ok_(__FILE__
,line
)(hres
== S_OK
, "get_type failed: %08x\n", hres
);
595 ok_(__FILE__
,line
)(!strcmp_wa(str
, exstr
), "type = %s, expected %s\n", wine_dbgstr_w(str
), exstr
);
598 static void _test_event_qualifier(unsigned line
, IHTMLEventObj
*event
, const char *exstr
)
603 hres
= IHTMLEventObj_get_qualifier(event
, &str
);
604 ok_(__FILE__
,line
)(hres
== S_OK
, "get_qualifier failed: %08x\n", hres
);
606 ok_(__FILE__
,line
)(!strcmp_wa(str
, exstr
), "qualifier = %s, expected %s\n", wine_dbgstr_w(str
), exstr
);
608 ok_(__FILE__
,line
)(!str
, "qualifier != NULL\n");
611 static void _test_event_srcfilter(unsigned line
, IHTMLEventObj
*event
)
616 hres
= IHTMLEventObj_get_srcFilter(event
, &disp
);
617 ok_(__FILE__
,line
)(hres
== S_OK
, "get_srcFilter failed: %08x\n", hres
);
618 ok_(__FILE__
,line
)(!disp
, "srcFilter != NULL\n");
621 #define test_event_obj(t,x) _test_event_obj(__LINE__,t,x)
622 static void _test_event_obj(unsigned line
, const char *type
, const xy_test_t
*xy
)
624 IHTMLEventObj
*event
= _get_event_obj(line
);
628 _test_event_altkey(line
, event
, VARIANT_FALSE
);
629 _test_event_ctrlkey(line
, event
, VARIANT_FALSE
);
630 _test_event_shiftkey(line
, event
, VARIANT_FALSE
);
631 _test_event_cancelbubble(line
, event
, VARIANT_FALSE
);
632 _test_event_fromelem(line
, event
, NULL
);
633 _test_event_toelem(line
, event
, NULL
);
634 _test_event_keycode(line
, event
, 0);
635 _test_event_button(line
, event
, 0);
636 _test_event_type(line
, event
, type
);
637 _test_event_qualifier(line
, event
, NULL
);
638 _test_event_reason(line
, event
, 0);
639 _test_event_srcfilter(line
, event
);
640 _test_event_x(line
, event
, xy
->x
);
641 _test_event_y(line
, event
, xy
->y
);
642 _test_event_clientx(line
, event
, -10);
643 _test_event_clienty(line
, event
, -10);
644 _test_event_offsetx(line
, event
, xy
->offset_x
);
645 _test_event_offsety(line
, event
, xy
->offset_y
);
646 _test_event_screenx(line
, event
, -10);
647 _test_event_screeny(line
, event
, -10);
650 hres
= IHTMLEventObj_get_returnValue(event
, &v
);
651 ok_(__FILE__
,line
)(hres
== S_OK
, "get_returnValue failed: %08x\n", hres
);
652 ok_(__FILE__
,line
)(V_VT(&v
) == VT_EMPTY
, "V_VT(returnValue) = %d\n", V_VT(&v
));
654 IHTMLEventObj_Release(event
);
657 #define elem_attach_event(a,b,c) _elem_attach_event(__LINE__,a,b,c)
658 static void _elem_attach_event(unsigned line
, IUnknown
*unk
, const char *namea
, IDispatch
*disp
)
660 IHTMLElement2
*elem
= _get_elem2_iface(line
, unk
);
665 name
= a2bstr(namea
);
666 hres
= IHTMLElement2_attachEvent(elem
, name
, disp
, &res
);
667 IHTMLElement2_Release(elem
);
669 ok_(__FILE__
,line
)(hres
== S_OK
, "attachEvent failed: %08x\n", hres
);
670 ok_(__FILE__
,line
)(res
== VARIANT_TRUE
, "attachEvent returned %x\n", res
);
673 #define elem_detach_event(a,b,c) _elem_detach_event(__LINE__,a,b,c)
674 static void _elem_detach_event(unsigned line
, IUnknown
*unk
, const char *namea
, IDispatch
*disp
)
676 IHTMLElement2
*elem
= _get_elem2_iface(line
, unk
);
680 name
= a2bstr(namea
);
681 hres
= IHTMLElement2_detachEvent(elem
, name
, disp
);
682 IHTMLElement2_Release(elem
);
684 ok_(__FILE__
,line
)(hres
== S_OK
, "detachEvent failed: %08x\n", hres
);
687 #define doc_attach_event(a,b,c) _doc_attach_event(__LINE__,a,b,c)
688 static void _doc_attach_event(unsigned line
, IHTMLDocument2
*doc
, const char *namea
, IDispatch
*disp
)
690 IHTMLDocument3
*doc3
= _get_doc3_iface(line
, (IUnknown
*)doc
);
695 name
= a2bstr(namea
);
696 hres
= IHTMLDocument3_attachEvent(doc3
, name
, disp
, &res
);
697 IHTMLDocument3_Release(doc3
);
699 ok_(__FILE__
,line
)(hres
== S_OK
, "attachEvent failed: %08x\n", hres
);
700 ok_(__FILE__
,line
)(res
== VARIANT_TRUE
, "attachEvent returned %x\n", res
);
703 #define doc_detach_event(a,b,c) _doc_detach_event(__LINE__,a,b,c)
704 static void _doc_detach_event(unsigned line
, IHTMLDocument2
*doc
, const char *namea
, IDispatch
*disp
)
706 IHTMLDocument3
*doc3
= _get_doc3_iface(line
, (IUnknown
*)doc
);
710 name
= a2bstr(namea
);
711 hres
= IHTMLDocument3_detachEvent(doc3
, name
, disp
);
712 IHTMLDocument3_Release(doc3
);
714 ok_(__FILE__
,line
)(hres
== S_OK
, "detachEvent failed: %08x\n", hres
);
717 static HRESULT WINAPI
DispatchEx_QueryInterface(IDispatchEx
*iface
, REFIID riid
, void **ppv
)
721 if(IsEqualGUID(riid
, &IID_IUnknown
)
722 || IsEqualGUID(riid
, &IID_IDispatch
)
723 || IsEqualGUID(riid
, &IID_IDispatchEx
))
726 ok(0, "unexpected riid %s\n", debugstr_guid(riid
));
727 return E_NOINTERFACE
;
733 static HRESULT WINAPI
Dispatch_QueryInterface(IDispatchEx
*iface
, REFIID riid
, void **ppv
)
737 if(IsEqualGUID(riid
, &IID_IUnknown
)
738 || IsEqualGUID(riid
, &IID_IDispatch
)) {
740 }else if(IsEqualGUID(riid
, &IID_IDispatchEx
)) {
741 return E_NOINTERFACE
;
743 ok(0, "unexpected riid %s\n", debugstr_guid(riid
));
744 return E_NOINTERFACE
;
750 static ULONG WINAPI
DispatchEx_AddRef(IDispatchEx
*iface
)
755 static ULONG WINAPI
DispatchEx_Release(IDispatchEx
*iface
)
760 static HRESULT WINAPI
DispatchEx_GetTypeInfoCount(IDispatchEx
*iface
, UINT
*pctinfo
)
762 ok(0, "unexpected call\n");
766 static HRESULT WINAPI
DispatchEx_GetTypeInfo(IDispatchEx
*iface
, UINT iTInfo
,
767 LCID lcid
, ITypeInfo
**ppTInfo
)
769 ok(0, "unexpected call\n");
773 static HRESULT WINAPI
DispatchEx_GetIDsOfNames(IDispatchEx
*iface
, REFIID riid
,
774 LPOLESTR
*rgszNames
, UINT cNames
,
775 LCID lcid
, DISPID
*rgDispId
)
777 ok(0, "unexpected call\n");
781 static HRESULT WINAPI
DispatchEx_Invoke(IDispatchEx
*iface
, DISPID dispIdMember
,
782 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
783 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
785 ok(0, "unexpected call\n");
789 static HRESULT WINAPI
DispatchEx_GetDispID(IDispatchEx
*iface
, BSTR bstrName
, DWORD grfdex
, DISPID
*pid
)
791 ok(0, "unexpected call\n");
795 static HRESULT WINAPI
DispatchEx_InvokeEx(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
796 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
798 ok(0, "unexpected call\n");
802 static HRESULT WINAPI
DispatchEx_DeleteMemberByName(IDispatchEx
*iface
, BSTR bstrName
, DWORD grfdex
)
804 ok(0, "unexpected call %s %x\n", wine_dbgstr_w(bstrName
), grfdex
);
808 static HRESULT WINAPI
DispatchEx_DeleteMemberByDispID(IDispatchEx
*iface
, DISPID id
)
810 ok(0, "unexpected call\n");
814 static HRESULT WINAPI
DispatchEx_GetMemberProperties(IDispatchEx
*iface
, DISPID id
, DWORD grfdexFetch
, DWORD
*pgrfdex
)
816 ok(0, "unexpected call\n");
820 static HRESULT WINAPI
DispatchEx_GetMemberName(IDispatchEx
*iface
, DISPID id
, BSTR
*pbstrName
)
822 ok(0, "unexpected call\n");
826 static HRESULT WINAPI
DispatchEx_GetNextDispID(IDispatchEx
*iface
, DWORD grfdex
, DISPID id
, DISPID
*pid
)
828 ok(0, "unexpected call\n");
832 static HRESULT WINAPI
DispatchEx_GetNameSpaceParent(IDispatchEx
*iface
, IUnknown
**ppunk
)
834 ok(0, "unexpected call\n");
838 #define EVENT_HANDLER_FUNC_OBJ(event) \
839 static IDispatchExVtbl event ## FuncVtbl = { \
840 DispatchEx_QueryInterface, \
842 DispatchEx_Release, \
843 DispatchEx_GetTypeInfoCount, \
844 DispatchEx_GetTypeInfo, \
845 DispatchEx_GetIDsOfNames, \
847 DispatchEx_GetDispID, \
849 DispatchEx_DeleteMemberByName, \
850 DispatchEx_DeleteMemberByDispID, \
851 DispatchEx_GetMemberProperties, \
852 DispatchEx_GetMemberName, \
853 DispatchEx_GetNextDispID, \
854 DispatchEx_GetNameSpaceParent \
856 static IDispatchEx event ## _obj = { &event ## FuncVtbl };
858 static HRESULT WINAPI
document_onclick(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
859 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
861 IHTMLDocument3
*doc3
;
862 CHECK_EXPECT(document_onclick
);
863 test_event_args(NULL
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
864 doc3
= get_doc3_iface((IUnknown
*)V_DISPATCH(pdp
->rgvarg
));
865 IHTMLDocument3_Release(doc3
);
866 test_event_src("DIV");
867 test_event_obj("click", &no_xy
);
871 EVENT_HANDLER_FUNC_OBJ(document_onclick
);
873 static HRESULT WINAPI
div_onclick(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
874 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
876 CHECK_EXPECT(div_onclick
);
877 test_event_args(NULL
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
878 test_event_src("DIV");
882 EVENT_HANDLER_FUNC_OBJ(div_onclick
);
884 static HRESULT WINAPI
div_onclick_attached(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
885 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
887 CHECK_EXPECT(div_onclick_attached
);
889 test_attached_event_args(id
, wFlags
, pdp
, pvarRes
, pei
);
890 test_event_src("DIV");
894 EVENT_HANDLER_FUNC_OBJ(div_onclick_attached
);
896 static HRESULT WINAPI
doc_onclick_attached(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
897 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
899 CHECK_EXPECT(doc_onclick_attached
);
901 test_attached_event_args(id
, wFlags
, pdp
, pvarRes
, pei
);
902 test_event_src("DIV");
906 EVENT_HANDLER_FUNC_OBJ(doc_onclick_attached
);
908 static HRESULT WINAPI
body_onclick(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
909 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
911 CHECK_EXPECT(body_onclick
);
912 test_event_args(&DIID_DispHTMLBody
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
913 test_event_src("DIV");
917 EVENT_HANDLER_FUNC_OBJ(body_onclick
);
919 static HRESULT WINAPI
img_onload(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
920 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
922 CHECK_EXPECT(img_onload
);
923 test_event_args(&DIID_DispHTMLImg
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
924 test_event_src("IMG");
928 EVENT_HANDLER_FUNC_OBJ(img_onload
);
930 static HRESULT WINAPI
input_onfocus(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
931 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
933 CHECK_EXPECT(input_onfocus
);
934 test_event_args(&DIID_DispHTMLInputElement
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
935 test_event_src("INPUT");
939 EVENT_HANDLER_FUNC_OBJ(input_onfocus
);
941 static HRESULT WINAPI
form_onsubmit(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
942 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
944 CHECK_EXPECT(form_onsubmit
);
945 test_event_args(NULL
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
946 test_event_src("FORM");
948 V_VT(pvarRes
) = VT_BOOL
;
949 V_BOOL(pvarRes
) = VARIANT_FALSE
;
953 EVENT_HANDLER_FUNC_OBJ(form_onsubmit
);
955 static HRESULT WINAPI
form_onclick(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
956 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
958 CHECK_EXPECT(form_onclick
);
959 test_event_args(NULL
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
964 EVENT_HANDLER_FUNC_OBJ(form_onclick
);
966 static HRESULT WINAPI
submit_onclick(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
967 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
969 CHECK_EXPECT(submit_onclick
);
970 test_event_args(NULL
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
971 test_event_src("INPUT");
973 V_VT(pvarRes
) = VT_BOOL
;
974 V_BOOL(pvarRes
) = VARIANT_FALSE
;
978 EVENT_HANDLER_FUNC_OBJ(submit_onclick
);
980 static HRESULT WINAPI
submit_onclick_attached(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
981 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
983 CHECK_EXPECT(submit_onclick_attached
);
984 test_attached_event_args(id
, wFlags
, pdp
, pvarRes
, pei
);
985 test_event_src("INPUT");
987 V_VT(pvarRes
) = VT_BOOL
;
988 V_BOOL(pvarRes
) = VARIANT_FALSE
;
992 EVENT_HANDLER_FUNC_OBJ(submit_onclick_attached
);
994 static VARIANT onclick_retval
, onclick_event_retval
;
996 static HRESULT WINAPI
submit_onclick_setret(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
997 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
999 IHTMLEventObj
*event
;
1002 CHECK_EXPECT(submit_onclick_setret
);
1003 test_event_args(NULL
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
1004 test_event_src("INPUT");
1007 hres
= IHTMLWindow2_get_event(window
, &event
);
1008 ok(hres
== S_OK
, "get_event failed: %08x\n", hres
);
1009 ok(event
!= NULL
, "event == NULL\n");
1011 hres
= IHTMLEventObj_put_returnValue(event
, onclick_event_retval
);
1012 ok(hres
== S_OK
, "put_returnValue failed: %08x\n", hres
);
1013 IHTMLEventObj_Release(event
);
1015 *pvarRes
= onclick_retval
;
1019 EVENT_HANDLER_FUNC_OBJ(submit_onclick_setret
);
1021 static HRESULT WINAPI
iframedoc_onreadystatechange(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
1022 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
1024 IHTMLEventObj
*event
= NULL
;
1027 CHECK_EXPECT2(iframedoc_onreadystatechange
);
1028 test_event_args(&DIID_DispHTMLDocument
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
1030 event
= (void*)0xdeadbeef;
1031 hres
= IHTMLWindow2_get_event(window
, &event
);
1032 ok(hres
== S_OK
, "get_event failed: %08x\n", hres
);
1033 ok(!event
, "event = %p\n", event
);
1038 EVENT_HANDLER_FUNC_OBJ(iframedoc_onreadystatechange
);
1040 static HRESULT WINAPI
iframe_onreadystatechange(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
1041 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
1043 IHTMLWindow2
*iframe_window
;
1044 IHTMLDocument2
*iframe_doc
;
1045 IHTMLFrameBase2
*iframe
;
1046 IHTMLElement2
*elem2
;
1052 test_event_args(&DIID_DispHTMLIFrame
, id
, wFlags
, pdp
, pvarRes
, pei
, pspCaller
);
1053 test_event_src("IFRAME");
1055 elem
= get_event_src();
1056 elem2
= get_elem2_iface((IUnknown
*)elem
);
1057 IHTMLElement_Release(elem
);
1059 V_VT(&v
) = VT_EMPTY
;
1060 hres
= IHTMLElement2_get_readyState(elem2
, &v
);
1061 ok(hres
== S_OK
, "get_readyState failed: %08x\n", hres
);
1062 ok(V_VT(&v
) == VT_BSTR
, "V_VT(readyState) = %d\n", V_VT(&v
));
1064 hres
= IHTMLElement2_QueryInterface(elem2
, &IID_IHTMLFrameBase2
, (void**)&iframe
);
1065 IHTMLElement2_Release(elem2
);
1066 ok(hres
== S_OK
, "Could not get IHTMLFrameBase2 iface: %08x\n", hres
);
1069 hres
= IHTMLFrameBase2_get_readyState(iframe
, &str
);
1070 ok(hres
== S_OK
, "get_readyState failed: %08x\n", hres
);
1071 ok(str
!= NULL
, "readyState == NULL\n");
1072 ok(!lstrcmpW(str
, V_BSTR(&v
)), "ready states differ\n");
1075 hres
= IHTMLFrameBase2_get_contentWindow(iframe
, &iframe_window
);
1076 ok(hres
== S_OK
, "get_contentDocument failed: %08x\n", hres
);
1078 hres
= IHTMLWindow2_get_document(iframe_window
, &iframe_doc
);
1079 IHTMLWindow2_Release(iframe_window
);
1080 ok(hres
== S_OK
, "get_document failed: %08x\n", hres
);
1082 hres
= IHTMLDocument2_get_readyState(iframe_doc
, &str2
);
1083 ok(hres
== S_OK
, "get_document failed: %08x\n", hres
);
1084 ok(!lstrcmpW(str
, str2
), "unexpected document readyState %s\n", wine_dbgstr_w(str2
));
1085 SysFreeString(str2
);
1087 if(!strcmp_wa(str
, "loading")) {
1088 CHECK_EXPECT(iframe_onreadystatechange_loading
);
1090 V_VT(&v
) = VT_DISPATCH
;
1091 V_DISPATCH(&v
) = (IDispatch
*)&iframedoc_onreadystatechange_obj
;
1092 hres
= IHTMLDocument2_put_onreadystatechange(iframe_doc
, v
);
1093 ok(hres
== S_OK
, "put_onreadystatechange: %08x\n", hres
);
1094 }else if(!strcmp_wa(str
, "interactive"))
1095 CHECK_EXPECT(iframe_onreadystatechange_interactive
);
1096 else if(!strcmp_wa(str
, "complete"))
1097 CHECK_EXPECT(iframe_onreadystatechange_complete
);
1099 ok(0, "unexpected state %s\n", wine_dbgstr_w(str
));
1102 IHTMLDocument2_Release(iframe_doc
);
1103 IHTMLFrameBase2_Release(iframe
);
1107 EVENT_HANDLER_FUNC_OBJ(iframe_onreadystatechange
);
1109 static HRESULT WINAPI
nocall(IDispatchEx
*iface
, DISPID id
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
1110 VARIANT
*pvarRes
, EXCEPINFO
*pei
, IServiceProvider
*pspCaller
)
1112 ok(0, "unexpected call\n");
1116 EVENT_HANDLER_FUNC_OBJ(nocall
);
1118 #define CONNECTION_POINT_OBJ(cpname, diid) \
1119 static HRESULT WINAPI cpname ## _QueryInterface(IDispatchEx *iface, REFIID riid, void **ppv) \
1122 if(IsEqualGUID(riid, &IID_IUnknown) \
1123 || IsEqualGUID(riid, &IID_IDispatch) \
1124 || IsEqualGUID(riid, &diid)) \
1127 ok(0, "unexpected riid %s\n", debugstr_guid(riid)); \
1128 return E_NOINTERFACE; \
1132 static IDispatchExVtbl cpname ## Vtbl = { \
1133 cpname ## _QueryInterface, \
1134 DispatchEx_AddRef, \
1135 DispatchEx_Release, \
1136 DispatchEx_GetTypeInfoCount, \
1137 DispatchEx_GetTypeInfo, \
1138 DispatchEx_GetIDsOfNames, \
1140 DispatchEx_GetDispID, \
1141 DispatchEx_InvokeEx, \
1142 DispatchEx_DeleteMemberByName, \
1143 DispatchEx_DeleteMemberByDispID, \
1144 DispatchEx_GetMemberProperties, \
1145 DispatchEx_GetMemberName, \
1146 DispatchEx_GetNextDispID, \
1147 DispatchEx_GetNameSpaceParent \
1149 static IDispatchEx cpname ## _obj = { &cpname ## Vtbl }
1151 #define test_cp_args(a,b,c,d,e,f) _test_cp_args(__LINE__,a,b,c,d,e,f)
1152 static void _test_cp_args(unsigned line
, REFIID riid
, WORD flags
, DISPPARAMS
*dp
, VARIANT
*vres
, EXCEPINFO
*ei
, UINT
*argerr
)
1154 ok_(__FILE__
,line
)(IsEqualGUID(&IID_NULL
, riid
), "riid = %s\n", debugstr_guid(riid
));
1155 ok_(__FILE__
,line
)(flags
== DISPATCH_METHOD
, "flags = %x\n", flags
);
1156 ok_(__FILE__
,line
)(dp
!= NULL
, "dp == NULL\n");
1157 ok_(__FILE__
,line
)(!dp
->cArgs
, "dp->cArgs = %d\n", dp
->cArgs
);
1158 ok_(__FILE__
,line
)(!dp
->rgvarg
, "dp->rgvarg = %p\n", dp
->rgvarg
);
1159 ok_(__FILE__
,line
)(!dp
->cNamedArgs
, "dp->cNamedArgs = %d\n", dp
->cNamedArgs
);
1160 ok_(__FILE__
,line
)(!dp
->rgdispidNamedArgs
, "dp->rgdispidNamedArgs = %p\n", dp
->rgdispidNamedArgs
);
1161 ok_(__FILE__
,line
)(vres
!= NULL
, "vres == NULL\n");
1162 ok_(__FILE__
,line
)(V_VT(vres
) == VT_EMPTY
, "V_VT(vres) = %d\n", V_VT(vres
));
1163 ok_(__FILE__
,line
)(ei
!= NULL
, "ei == NULL\n");
1164 ok_(__FILE__
,line
)(argerr
!= NULL
, "argerr == NULL\n");
1167 static HRESULT WINAPI
doccp(IDispatchEx
*iface
, DISPID dispIdMember
,
1168 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
1169 VARIANT
*pVarResult
, EXCEPINFO
*pei
, UINT
*puArgErr
)
1171 switch(dispIdMember
) {
1172 case DISPID_HTMLDOCUMENTEVENTS_ONCLICK
:
1173 CHECK_EXPECT(doccp_onclick
);
1174 test_cp_args(riid
, wFlags
, pdp
, pVarResult
, pei
, puArgErr
);
1177 ok(0, "unexpected call %d\n", dispIdMember
);
1184 CONNECTION_POINT_OBJ(doccp
, DIID_HTMLDocumentEvents
);
1186 static HRESULT WINAPI
doccp_onclick_cancel(IDispatchEx
*iface
, DISPID dispIdMember
,
1187 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
, VARIANT
*pVarResult
, EXCEPINFO
*pei
, UINT
*puArgErr
)
1189 switch(dispIdMember
) {
1190 case DISPID_HTMLDOCUMENTEVENTS_ONCLICK
:
1191 CHECK_EXPECT(doccp_onclick_cancel
);
1192 test_cp_args(riid
, wFlags
, pdp
, pVarResult
, pei
, puArgErr
);
1193 V_VT(pVarResult
) = VT_BOOL
;
1194 V_BOOL(pVarResult
) = VARIANT_FALSE
;
1197 ok(0, "unexpected call %d\n", dispIdMember
);
1204 CONNECTION_POINT_OBJ(doccp_onclick_cancel
, DIID_HTMLDocumentEvents
);
1206 static HRESULT WINAPI
timeoutFunc_Invoke(IDispatchEx
*iface
, DISPID dispIdMember
,
1207 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
1208 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
1210 CHECK_EXPECT(timeout
);
1212 ok(dispIdMember
== DISPID_VALUE
, "dispIdMember = %d\n", dispIdMember
);
1213 ok(IsEqualGUID(&IID_NULL
, riid
), "riid = %s\n", debugstr_guid(riid
));
1214 ok(wFlags
== DISPATCH_METHOD
, "wFlags = %x\n", wFlags
);
1215 ok(!lcid
, "lcid = %x\n", lcid
);
1216 ok(pDispParams
!= NULL
, "pDispParams == NULL\n");
1217 ok(!pDispParams
->cArgs
, "pdp->cArgs = %d\n", pDispParams
->cArgs
);
1218 ok(!pDispParams
->cNamedArgs
, "pdp->cNamedArgs = %d\n", pDispParams
->cNamedArgs
);
1219 ok(!pDispParams
->rgdispidNamedArgs
, "pdp->rgdispidNamedArgs = %p\n", pDispParams
->rgdispidNamedArgs
);
1220 ok(!pDispParams
->rgvarg
, "rgvarg = %p\n", pDispParams
->rgvarg
);
1221 ok(pVarResult
!= NULL
, "pVarResult = NULL\n");
1222 ok(pExcepInfo
!= NULL
, "pExcepInfo = NULL\n");
1223 ok(!puArgErr
, "puArgErr = %p\n", puArgErr
);
1224 ok(V_VT(pVarResult
) == VT_EMPTY
, "V_VT(pVarResult) = %d\n", V_VT(pVarResult
));
1229 static const IDispatchExVtbl timeoutFuncVtbl
= {
1230 DispatchEx_QueryInterface
,
1233 DispatchEx_GetTypeInfoCount
,
1234 DispatchEx_GetTypeInfo
,
1235 DispatchEx_GetIDsOfNames
,
1237 DispatchEx_GetDispID
,
1238 DispatchEx_InvokeEx
,
1239 DispatchEx_DeleteMemberByName
,
1240 DispatchEx_DeleteMemberByDispID
,
1241 DispatchEx_GetMemberProperties
,
1242 DispatchEx_GetMemberName
,
1243 DispatchEx_GetNextDispID
,
1244 DispatchEx_GetNameSpaceParent
1247 static IDispatchEx timeoutFunc
= { &timeoutFuncVtbl
};
1249 static HRESULT WINAPI
div_onclick_disp_Invoke(IDispatchEx
*iface
, DISPID id
,
1250 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pdp
,
1251 VARIANT
*pvarRes
, EXCEPINFO
*pei
, UINT
*puArgErr
)
1253 CHECK_EXPECT(div_onclick_disp
);
1255 test_attached_event_args(id
, wFlags
, pdp
, pvarRes
, pei
);
1257 ok(IsEqualGUID(&IID_NULL
, riid
), "riid = %s\n", debugstr_guid(riid
));
1258 ok(!puArgErr
, "puArgErr = %p\n", puArgErr
);
1263 static const IDispatchExVtbl div_onclick_dispVtbl
= {
1264 Dispatch_QueryInterface
,
1267 DispatchEx_GetTypeInfoCount
,
1268 DispatchEx_GetTypeInfo
,
1269 DispatchEx_GetIDsOfNames
,
1270 div_onclick_disp_Invoke
,
1273 static IDispatchEx div_onclick_disp
= { &div_onclick_dispVtbl
};
1275 static void pump_msgs(BOOL
*b
)
1280 while(!*b
&& GetMessageW(&msg
, NULL
, 0, 0)) {
1281 TranslateMessage(&msg
);
1282 DispatchMessage(&msg
);
1285 while(!b
&& PeekMessageW(&msg
, NULL
, 0, 0, PM_REMOVE
)) {
1286 TranslateMessage(&msg
);
1287 DispatchMessage(&msg
);
1292 static IConnectionPoint
*get_cp(IUnknown
*unk
, REFIID riid
)
1294 IConnectionPointContainer
*cp_container
;
1295 IConnectionPoint
*cp
;
1298 hres
= IUnknown_QueryInterface(unk
, &IID_IConnectionPointContainer
, (void**)&cp_container
);
1299 ok(hres
== S_OK
, "Could not get IConnectionPointContainer: %08x\n", hres
);
1301 hres
= IConnectionPointContainer_FindConnectionPoint(cp_container
, riid
, &cp
);
1302 IConnectionPointContainer_Release(cp_container
);
1303 ok(hres
== S_OK
, "FindConnectionPoint failed: %08x\n", hres
);
1308 static DWORD
register_cp(IUnknown
*unk
, REFIID riid
, IUnknown
*sink
)
1310 IConnectionPoint
*cp
;
1314 cp
= get_cp(unk
, riid
);
1315 hres
= IConnectionPoint_Advise(cp
, sink
, &cookie
);
1316 IConnectionPoint_Release(cp
);
1317 ok(hres
== S_OK
, "Advise failed: %08x\n", hres
);
1322 static void unregister_cp(IUnknown
*unk
, REFIID riid
, DWORD cookie
)
1324 IConnectionPoint
*cp
;
1327 cp
= get_cp(unk
, riid
);
1328 hres
= IConnectionPoint_Unadvise(cp
, cookie
);
1329 IConnectionPoint_Release(cp
);
1330 ok(hres
== S_OK
, "Unadvise failed: %08x\n", hres
);
1333 static HRESULT WINAPI
EventDispatch_QueryInterface(IDispatch
*iface
, REFIID riid
, void **ppv
)
1335 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IDispatch
, riid
)) {
1340 ok(0, "Unexpected call\n");
1341 return E_NOINTERFACE
;
1344 static DWORD WINAPI
EventDispatch_AddRef(IDispatch
*iface
)
1349 static DWORD WINAPI
EventDispatch_Release(IDispatch
*iface
)
1354 static HRESULT WINAPI
EventDispatch_GetTypeInfoCount(IDispatch
*iface
, UINT
*pctinfo
)
1356 ok(0, "Unexpected call\n");
1360 static HRESULT WINAPI
EventDispatch_GetTypeInfo(IDispatch
*iface
, UINT iTInfo
, LCID lcid
, ITypeInfo
**ppTInfo
)
1362 ok(0, "Unexpected call\n");
1366 static HRESULT WINAPI
EventDispatch_GetIDsOfNames(IDispatch
*iface
, REFIID riid
, LPOLESTR
*rgszNames
,
1367 UINT cNames
, LCID lcid
, DISPID
*rgDispId
)
1369 ok(0, "Unexpected call\n");
1373 static HRESULT WINAPI
EventDispatch_Invoke(IDispatch
*iface
, DISPID dispIdMember
, REFIID riid
,
1374 LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
, VARIANT
*pVarResult
,
1375 EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
1377 ok(IsEqualGUID(&IID_NULL
, riid
), "riid = %s\n", debugstr_guid(riid
));
1378 ok(pDispParams
!= NULL
, "pDispParams == NULL\n");
1379 ok(pExcepInfo
!= NULL
, "pExcepInfo == NULL\n");
1380 ok(puArgErr
!= NULL
, "puArgErr == NULL\n");
1381 ok(V_VT(pVarResult
) == 0, "V_VT(pVarResult) = %d\n", V_VT(pVarResult
));
1382 ok(wFlags
== DISPATCH_METHOD
, "wFlags = %d\n", wFlags
);
1384 switch(dispIdMember
) {
1385 case DISPID_HTMLDOCUMENTEVENTS_ONCLICK
:
1386 CHECK_EXPECT2(invoke_onclick
);
1388 case DISPID_HTMLDOCUMENTEVENTS2_ONPROPERTYCHANGE
:
1389 case DISPID_HTMLDOCUMENTEVENTS2_ONREADYSTATECHANGE
:
1400 ok(0, "Unexpected call: %d\n", dispIdMember
);
1406 static const IDispatchVtbl EventDispatchVtbl
= {
1407 EventDispatch_QueryInterface
,
1408 EventDispatch_AddRef
,
1409 EventDispatch_Release
,
1410 EventDispatch_GetTypeInfoCount
,
1411 EventDispatch_GetTypeInfo
,
1412 EventDispatch_GetIDsOfNames
,
1413 EventDispatch_Invoke
1416 static IDispatch EventDispatch
= { &EventDispatchVtbl
};
1418 static void test_onclick(IHTMLDocument2
*doc
)
1420 IHTMLElement
*div
, *body
;
1425 register_cp((IUnknown
*)doc
, &IID_IDispatch
, (IUnknown
*)&EventDispatch
);
1427 div
= get_elem_id(doc
, "clickdiv");
1429 elem_attach_event((IUnknown
*)div
, "abcde", (IDispatch
*)&nocall_obj
);
1430 elem_attach_event((IUnknown
*)div
, "onclick", (IDispatch
*)&div_onclick_attached_obj
);
1432 V_VT(&v
) = VT_EMPTY
;
1433 hres
= IHTMLElement_get_onclick(div
, &v
);
1434 ok(hres
== S_OK
, "get_onclick failed: %08x\n", hres
);
1435 ok(V_VT(&v
) == VT_NULL
, "V_VT(onclick) = %d\n", V_VT(&v
));
1437 V_VT(&v
) = VT_EMPTY
;
1438 hres
= IHTMLElement_put_onclick(div
, v
);
1439 ok(hres
== E_NOTIMPL
, "put_onclick failed: %08x\n", hres
);
1442 V_BSTR(&v
) = a2bstr("function();");
1443 hres
= IHTMLElement_put_onclick(div
, v
);
1444 todo_wine
ok(hres
== S_OK
, "put_onclick failed: %08x\n", hres
);
1447 V_VT(&v
) = VT_EMPTY
;
1448 hres
= IHTMLElement_get_onclick(div
, &v
);
1449 ok(hres
== S_OK
, "get_onclick failed: %08x\n", hres
);
1450 ok(V_VT(&v
) == VT_BSTR
, "V_VT(onclick) = %d\n", V_VT(&v
));
1451 ok(!strcmp_wa(V_BSTR(&v
), "function();"), "V_BSTR(onclick) = %s\n", wine_dbgstr_w(V_BSTR(&v
)));
1455 V_VT(&v
) = VT_DISPATCH
;
1456 V_DISPATCH(&v
) = (IDispatch
*)&div_onclick_obj
;
1457 hres
= IHTMLElement_put_onclick(div
, v
);
1458 ok(hres
== S_OK
, "put_onclick failed: %08x\n", hres
);
1461 hres
= IHTMLElement_put_ondblclick(div
, v
);
1462 ok(hres
== S_OK
, "put_ondblclick failed: %08x\n", hres
);
1464 V_VT(&v
) = VT_EMPTY
;
1465 hres
= IHTMLElement_get_onclick(div
, &v
);
1466 ok(hres
== S_OK
, "get_onclick failed: %08x\n", hres
);
1467 ok(V_VT(&v
) == VT_DISPATCH
, "V_VT(onclick) = %d\n", V_VT(&v
));
1468 ok(V_DISPATCH(&v
) == (IDispatch
*)&div_onclick_obj
, "V_DISPATCH(onclick) != onclickFunc\n");
1471 V_VT(&v
) = VT_EMPTY
;
1472 hres
= IHTMLDocument2_get_onclick(doc
, &v
);
1473 ok(hres
== S_OK
, "get_onclick failed: %08x\n", hres
);
1474 ok(V_VT(&v
) == VT_NULL
, "V_VT(onclick) = %d\n", V_VT(&v
));
1476 V_VT(&v
) = VT_DISPATCH
;
1477 V_DISPATCH(&v
) = (IDispatch
*)&document_onclick_obj
;
1478 hres
= IHTMLDocument2_put_onclick(doc
, v
);
1479 ok(hres
== S_OK
, "put_onclick failed: %08x\n", hres
);
1481 V_VT(&v
) = VT_EMPTY
;
1482 hres
= IHTMLDocument2_get_onclick(doc
, &v
);
1483 ok(hres
== S_OK
, "get_onclick failed: %08x\n", hres
);
1484 ok(V_VT(&v
) == VT_DISPATCH
, "V_VT(onclick) = %d\n", V_VT(&v
));
1485 ok(V_DISPATCH(&v
) == (IDispatch
*)&document_onclick_obj
, "V_DISPATCH(onclick) != onclickFunc\n");
1488 body
= doc_get_body(doc
);
1490 V_VT(&v
) = VT_DISPATCH
;
1491 V_DISPATCH(&v
) = (IDispatch
*)&body_onclick_obj
;
1492 hres
= IHTMLElement_put_onclick(body
, v
);
1493 ok(hres
== S_OK
, "put_onclick failed: %08x\n", hres
);
1495 if(winetest_interactive
) {
1496 SET_EXPECT(div_onclick
);
1497 SET_EXPECT(div_onclick_attached
);
1498 SET_EXPECT(body_onclick
);
1499 SET_EXPECT(document_onclick
);
1500 SET_EXPECT(invoke_onclick
);
1501 pump_msgs(&called_document_onclick
);
1502 CHECK_CALLED(div_onclick
);
1503 CHECK_CALLED(div_onclick_attached
);
1504 CHECK_CALLED(body_onclick
);
1505 CHECK_CALLED(document_onclick
);
1506 CHECK_CALLED(invoke_onclick
);
1511 SET_EXPECT(div_onclick
);
1512 SET_EXPECT(div_onclick_attached
);
1513 SET_EXPECT(body_onclick
);
1514 SET_EXPECT(document_onclick
);
1515 SET_EXPECT(invoke_onclick
);
1517 hres
= IHTMLElement_click(div
);
1518 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1520 CHECK_CALLED(div_onclick
);
1521 CHECK_CALLED(div_onclick_attached
);
1522 CHECK_CALLED(body_onclick
);
1523 CHECK_CALLED(document_onclick
);
1524 CHECK_CALLED(invoke_onclick
);
1526 SET_EXPECT(div_onclick
);
1527 SET_EXPECT(div_onclick_attached
);
1528 SET_EXPECT(body_onclick
);
1529 SET_EXPECT(document_onclick
);
1530 SET_EXPECT(invoke_onclick
);
1532 V_VT(&v
) = VT_EMPTY
;
1533 elem_fire_event((IUnknown
*)div
, "onclick", &v
);
1535 CHECK_CALLED(div_onclick
);
1536 CHECK_CALLED(div_onclick_attached
);
1537 CHECK_CALLED(body_onclick
);
1538 CHECK_CALLED(document_onclick
);
1539 CHECK_CALLED(invoke_onclick
);
1541 cp_cookie
= register_cp((IUnknown
*)doc
, &DIID_HTMLDocumentEvents
, (IUnknown
*)&doccp_obj
);
1542 elem_attach_event((IUnknown
*)div
, "onclick", (IDispatch
*)&div_onclick_disp
);
1543 doc_attach_event(doc
, "onclick", (IDispatch
*)&doc_onclick_attached_obj
);
1545 SET_EXPECT(div_onclick
);
1546 SET_EXPECT(div_onclick_disp
);
1547 SET_EXPECT(div_onclick_attached
);
1548 SET_EXPECT(body_onclick
);
1549 SET_EXPECT(document_onclick
);
1550 SET_EXPECT(doc_onclick_attached
);
1551 SET_EXPECT(doccp_onclick
);
1552 SET_EXPECT(invoke_onclick
);
1554 hres
= IHTMLElement_click(div
);
1555 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1557 CHECK_CALLED(div_onclick
);
1558 CHECK_CALLED(div_onclick_disp
);
1559 CHECK_CALLED(div_onclick_attached
);
1560 CHECK_CALLED(body_onclick
);
1561 CHECK_CALLED(document_onclick
);
1562 CHECK_CALLED(doc_onclick_attached
);
1563 CHECK_CALLED(doccp_onclick
);
1564 CHECK_CALLED(invoke_onclick
);
1566 unregister_cp((IUnknown
*)doc
, &DIID_HTMLDocumentEvents
, cp_cookie
);
1569 hres
= IHTMLElement_put_onclick(div
, v
);
1570 ok(hres
== S_OK
, "put_onclick failed: %08x\n", hres
);
1572 hres
= IHTMLElement_get_onclick(div
, &v
);
1573 ok(hres
== S_OK
, "get_onclick failed: %08x\n", hres
);
1574 ok(V_VT(&v
) == VT_NULL
, "get_onclick returned vt %d\n", V_VT(&v
));
1576 elem_detach_event((IUnknown
*)div
, "onclick", (IDispatch
*)&div_onclick_disp
);
1577 elem_detach_event((IUnknown
*)div
, "onclick", (IDispatch
*)&div_onclick_disp
);
1578 elem_detach_event((IUnknown
*)div
, "test", (IDispatch
*)&div_onclick_disp
);
1579 doc_detach_event(doc
, "onclick", (IDispatch
*)&doc_onclick_attached_obj
);
1581 SET_EXPECT(div_onclick_attached
);
1582 SET_EXPECT(body_onclick
);
1583 SET_EXPECT(document_onclick
);
1584 SET_EXPECT(invoke_onclick
);
1586 hres
= IHTMLElement_click(div
);
1587 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1589 CHECK_CALLED(div_onclick_attached
);
1590 CHECK_CALLED(body_onclick
);
1591 CHECK_CALLED(document_onclick
);
1592 CHECK_CALLED(invoke_onclick
);
1594 IHTMLElement_Release(div
);
1595 IHTMLElement_Release(body
);
1598 static void test_onreadystatechange(IHTMLDocument2
*doc
)
1600 IHTMLFrameBase
*iframe
;
1601 IHTMLElement2
*elem2
;
1607 elem
= get_elem_id(doc
, "iframe");
1608 elem2
= get_elem2_iface((IUnknown
*)elem
);
1609 IHTMLElement_Release(elem
);
1611 V_VT(&v
) = VT_EMPTY
;
1612 hres
= IHTMLElement2_get_onreadystatechange(elem2
, &v
);
1613 ok(hres
== S_OK
, "get_onreadystatechange failed: %08x\n", hres
);
1614 ok(V_VT(&v
) == VT_NULL
, "V_VT(onreadystatechange) = %d\n", V_VT(&v
));
1616 V_VT(&v
) = VT_DISPATCH
;
1617 V_DISPATCH(&v
) = (IDispatch
*)&iframe_onreadystatechange_obj
;
1618 hres
= IHTMLElement2_put_onreadystatechange(elem2
, v
);
1619 ok(hres
== S_OK
, "put_onreadystatechange failed: %08x\n", hres
);
1621 V_VT(&v
) = VT_EMPTY
;
1622 hres
= IHTMLElement2_get_onreadystatechange(elem2
, &v
);
1623 ok(hres
== S_OK
, "get_onreadystatechange failed: %08x\n", hres
);
1624 ok(V_VT(&v
) == VT_DISPATCH
, "V_VT(onreadystatechange) = %d\n", V_VT(&v
));
1625 ok(V_DISPATCH(&v
) == (IDispatch
*)&iframe_onreadystatechange_obj
, "unexpected onreadystatechange value\n");
1627 hres
= IHTMLElement2_QueryInterface(elem2
, &IID_IHTMLFrameBase
, (void**)&iframe
);
1628 IHTMLElement2_Release(elem2
);
1629 ok(hres
== S_OK
, "Could not get IHTMLFrameBase iface: %08x\n", hres
);
1631 hres
= IHTMLFrameBase_put_src(iframe
, (str
= a2bstr("about:blank")));
1633 ok(hres
== S_OK
, "put_src failed: %08x\n", hres
);
1635 SET_EXPECT(iframe_onreadystatechange_loading
);
1636 SET_EXPECT(iframedoc_onreadystatechange
);
1637 SET_EXPECT(iframe_onreadystatechange_interactive
);
1638 SET_EXPECT(iframe_onreadystatechange_complete
);
1639 pump_msgs(&called_iframe_onreadystatechange_complete
);
1640 CHECK_CALLED(iframe_onreadystatechange_loading
);
1641 CHECK_CALLED(iframedoc_onreadystatechange
);
1642 CHECK_CALLED(iframe_onreadystatechange_interactive
);
1643 CHECK_CALLED(iframe_onreadystatechange_complete
);
1645 IHTMLFrameBase_Release(iframe
);
1648 static void test_imgload(IHTMLDocument2
*doc
)
1650 IHTMLImgElement
*img
;
1656 elem
= get_elem_id(doc
, "imgid");
1657 hres
= IHTMLElement_QueryInterface(elem
, &IID_IHTMLImgElement
, (void**)&img
);
1658 IHTMLElement_Release(elem
);
1659 ok(hres
== S_OK
, "Could not get IHTMLImgElement iface: %08x\n", hres
);
1661 V_VT(&v
) = VT_EMPTY
;
1662 hres
= IHTMLImgElement_get_onload(img
, &v
);
1663 ok(hres
== S_OK
, "get_onload failed: %08x\n", hres
);
1664 ok(V_VT(&v
) == VT_NULL
, "V_VT(onload) = %d\n", V_VT(&v
));
1666 V_VT(&v
) = VT_DISPATCH
;
1667 V_DISPATCH(&v
) = (IDispatch
*)&img_onload_obj
;
1668 hres
= IHTMLImgElement_put_onload(img
, v
);
1669 ok(hres
== S_OK
, "put_onload failed: %08x\n", hres
);
1671 V_VT(&v
) = VT_EMPTY
;
1672 hres
= IHTMLImgElement_get_onload(img
, &v
);
1673 ok(hres
== S_OK
, "get_onload failed: %08x\n", hres
);
1674 ok(V_VT(&v
) == VT_DISPATCH
, "V_VT(onload) = %d\n", V_VT(&v
));
1675 ok(V_DISPATCH(&v
) == (IDispatch
*)&img_onload_obj
, "V_DISPATCH(onload) != onloadkFunc\n");
1678 str
= a2bstr("http://www.winehq.org/images/winehq_logo_text.png");
1679 hres
= IHTMLImgElement_put_src(img
, str
);
1680 ok(hres
== S_OK
, "put_src failed: %08x\n", hres
);
1683 SET_EXPECT(img_onload
);
1684 pump_msgs(&called_img_onload
);
1685 CHECK_CALLED(img_onload
);
1687 IHTMLImgElement_Release(img
);
1690 static void test_focus(IHTMLDocument2
*doc
)
1692 IHTMLElement2
*elem2
;
1697 elem
= get_elem_id(doc
, "inputid");
1698 elem2
= get_elem2_iface((IUnknown
*)elem
);
1699 IHTMLElement_Release(elem
);
1701 V_VT(&v
) = VT_EMPTY
;
1702 hres
= IHTMLElement2_get_onfocus(elem2
, &v
);
1703 ok(hres
== S_OK
, "get_onfocus failed: %08x\n", hres
);
1704 ok(V_VT(&v
) == VT_NULL
, "V_VT(onfocus) = %d\n", V_VT(&v
));
1706 V_VT(&v
) = VT_DISPATCH
;
1707 V_DISPATCH(&v
) = (IDispatch
*)&input_onfocus_obj
;
1708 hres
= IHTMLElement2_put_onfocus(elem2
, v
);
1709 ok(hres
== S_OK
, "put_onfocus failed: %08x\n", hres
);
1711 V_VT(&v
) = VT_EMPTY
;
1712 hres
= IHTMLElement2_get_onfocus(elem2
, &v
);
1713 ok(hres
== S_OK
, "get_onfocus failed: %08x\n", hres
);
1714 ok(V_VT(&v
) == VT_DISPATCH
, "V_VT(onfocus) = %d\n", V_VT(&v
));
1715 ok(V_DISPATCH(&v
) == (IDispatch
*)&input_onfocus_obj
, "V_DISPATCH(onfocus) != onfocusFunc\n");
1718 if(!winetest_interactive
)
1719 ShowWindow(container_hwnd
, SW_SHOW
);
1722 ok(!IsChild(container_hwnd
, GetFocus()), "focus belongs to document window\n");
1724 hres
= IHTMLWindow2_focus(window
);
1725 ok(hres
== S_OK
, "focus failed: %08x\n", hres
);
1727 ok(IsChild(container_hwnd
, GetFocus()), "focus does not belong to document window\n");
1730 SET_EXPECT(input_onfocus
);
1731 hres
= IHTMLElement2_focus(elem2
);
1733 CHECK_CALLED(input_onfocus
);
1734 ok(hres
== S_OK
, "focus failed: %08x\n", hres
);
1736 if(!winetest_interactive
)
1737 ShowWindow(container_hwnd
, SW_HIDE
);
1739 IHTMLElement2_Release(elem2
);
1742 static void test_submit(IHTMLDocument2
*doc
)
1744 IHTMLElement
*elem
, *submit
;
1745 IHTMLFormElement
*form
;
1750 elem
= get_elem_id(doc
, "formid");
1752 V_VT(&v
) = VT_DISPATCH
;
1753 V_DISPATCH(&v
) = (IDispatch
*)&form_onclick_obj
;
1754 hres
= IHTMLElement_put_onclick(elem
, v
);
1755 ok(hres
== S_OK
, "put_onclick failed: %08x\n", hres
);
1757 hres
= IHTMLElement_QueryInterface(elem
, &IID_IHTMLFormElement
, (void**)&form
);
1758 IHTMLElement_Release(elem
);
1759 ok(hres
== S_OK
, "Could not get IHTMLFormElement iface: %08x\n", hres
);
1761 V_VT(&v
) = VT_DISPATCH
;
1762 V_DISPATCH(&v
) = (IDispatch
*)&form_onsubmit_obj
;
1763 hres
= IHTMLFormElement_put_onsubmit(form
, v
);
1764 ok(hres
== S_OK
, "put_onsubmit failed: %08x\n", hres
);
1766 IHTMLFormElement_Release(form
);
1768 submit
= get_elem_id(doc
, "submitid");
1770 SET_EXPECT(form_onclick
);
1771 SET_EXPECT(form_onsubmit
);
1772 hres
= IHTMLElement_click(submit
);
1773 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1774 CHECK_CALLED(form_onclick
);
1775 CHECK_CALLED(form_onsubmit
);
1777 V_VT(&v
) = VT_DISPATCH
;
1778 V_DISPATCH(&v
) = (IDispatch
*)&submit_onclick_obj
;
1779 hres
= IHTMLElement_put_onclick(submit
, v
);
1780 ok(hres
== S_OK
, "put_onclick failed: %08x\n", hres
);
1782 SET_EXPECT(form_onclick
);
1783 SET_EXPECT(submit_onclick
);
1784 hres
= IHTMLElement_click(submit
);
1785 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1786 CHECK_CALLED(form_onclick
);
1787 CHECK_CALLED(submit_onclick
);
1789 elem_attach_event((IUnknown
*)submit
, "onclick", (IDispatch
*)&submit_onclick_attached_obj
);
1791 SET_EXPECT(form_onclick
);
1792 SET_EXPECT(submit_onclick
);
1793 SET_EXPECT(submit_onclick_attached
);
1794 hres
= IHTMLElement_click(submit
);
1795 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1796 CHECK_CALLED(form_onclick
);
1797 CHECK_CALLED(submit_onclick
);
1798 CHECK_CALLED(submit_onclick_attached
);
1801 hres
= IHTMLElement_put_onclick(submit
, v
);
1802 ok(hres
== S_OK
, "put_onclick failed: %08x\n", hres
);
1804 SET_EXPECT(form_onclick
);
1805 SET_EXPECT(submit_onclick_attached
);
1806 hres
= IHTMLElement_click(submit
);
1807 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1808 CHECK_CALLED(form_onclick
);
1809 CHECK_CALLED(submit_onclick_attached
);
1811 elem_detach_event((IUnknown
*)submit
, "onclick", (IDispatch
*)&submit_onclick_attached_obj
);
1813 cp_cookie
= register_cp((IUnknown
*)doc
, &DIID_HTMLDocumentEvents
, (IUnknown
*)&doccp_onclick_cancel_obj
);
1815 SET_EXPECT(form_onclick
);
1816 SET_EXPECT(doccp_onclick_cancel
);
1817 hres
= IHTMLElement_click(submit
);
1818 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1819 CHECK_CALLED(form_onclick
);
1820 CHECK_CALLED(doccp_onclick_cancel
);
1822 unregister_cp((IUnknown
*)doc
, &DIID_HTMLDocumentEvents
, cp_cookie
);
1824 V_VT(&v
) = VT_DISPATCH
;
1825 V_DISPATCH(&v
) = (IDispatch
*)&submit_onclick_setret_obj
;
1826 hres
= IHTMLElement_put_onclick(submit
, v
);
1827 ok(hres
== S_OK
, "put_onclick failed: %08x\n", hres
);
1829 V_VT(&onclick_retval
) = VT_BOOL
;
1830 V_BOOL(&onclick_retval
) = VARIANT_TRUE
;
1831 V_VT(&onclick_event_retval
) = VT_BOOL
;
1832 V_BOOL(&onclick_event_retval
) = VARIANT_TRUE
;
1834 SET_EXPECT(submit_onclick_setret
);
1835 SET_EXPECT(form_onclick
);
1836 SET_EXPECT(form_onsubmit
);
1837 hres
= IHTMLElement_click(submit
);
1838 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1839 CHECK_CALLED(submit_onclick_setret
);
1840 CHECK_CALLED(form_onclick
);
1841 CHECK_CALLED(form_onsubmit
);
1843 V_VT(&onclick_event_retval
) = VT_BOOL
;
1844 V_BOOL(&onclick_event_retval
) = VARIANT_FALSE
;
1846 SET_EXPECT(submit_onclick_setret
);
1847 SET_EXPECT(form_onclick
);
1848 hres
= IHTMLElement_click(submit
);
1849 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1850 CHECK_CALLED(submit_onclick_setret
);
1851 CHECK_CALLED(form_onclick
);
1853 V_VT(&onclick_retval
) = VT_BOOL
;
1854 V_BOOL(&onclick_retval
) = VARIANT_FALSE
;
1855 V_VT(&onclick_event_retval
) = VT_BOOL
;
1856 V_BOOL(&onclick_event_retval
) = VARIANT_TRUE
;
1858 SET_EXPECT(submit_onclick_setret
);
1859 SET_EXPECT(form_onclick
);
1860 hres
= IHTMLElement_click(submit
);
1861 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1862 CHECK_CALLED(submit_onclick_setret
);
1863 CHECK_CALLED(form_onclick
);
1865 V_VT(&onclick_event_retval
) = VT_BOOL
;
1866 V_BOOL(&onclick_event_retval
) = VARIANT_FALSE
;
1868 SET_EXPECT(submit_onclick_setret
);
1869 SET_EXPECT(form_onclick
);
1870 hres
= IHTMLElement_click(submit
);
1871 ok(hres
== S_OK
, "click failed: %08x\n", hres
);
1872 CHECK_CALLED(submit_onclick_setret
);
1873 CHECK_CALLED(form_onclick
);
1875 IHTMLElement_Release(submit
);
1878 static void test_timeout(IHTMLDocument2
*doc
)
1885 hres
= IHTMLWindow2_QueryInterface(window
, &IID_IHTMLWindow3
, (void**)&win3
);
1886 ok(hres
== S_OK
, "Could not get IHTMLWindow3 iface: %08x\n", hres
);
1888 V_VT(&expr
) = VT_DISPATCH
;
1889 V_DISPATCH(&expr
) = (IDispatch
*)&timeoutFunc
;
1890 V_VT(&var
) = VT_EMPTY
;
1892 hres
= IHTMLWindow3_setTimeout(win3
, &expr
, 0, &var
, &id
);
1893 ok(hres
== S_OK
, "setTimeout failed: %08x\n", hres
);
1896 SET_EXPECT(timeout
);
1897 pump_msgs(&called_timeout
);
1898 CHECK_CALLED(timeout
);
1900 V_VT(&expr
) = VT_DISPATCH
;
1901 V_DISPATCH(&expr
) = (IDispatch
*)&timeoutFunc
;
1902 V_VT(&var
) = VT_EMPTY
;
1904 hres
= IHTMLWindow3_setTimeout(win3
, &expr
, 0, &var
, &id
);
1905 ok(hres
== S_OK
, "setTimeout failed: %08x\n", hres
);
1908 hres
= IHTMLWindow2_clearTimeout(window
, id
);
1909 ok(hres
== S_OK
, "clearTimeout failed: %08x\n", hres
);
1911 IHTMLWindow3_Release(win3
);
1914 static IHTMLElement
* find_element_by_id(IHTMLDocument2
*doc
, const char *id
)
1917 IHTMLDocument3
*doc3
;
1918 IHTMLElement
*result
;
1919 BSTR idW
= a2bstr(id
);
1921 hres
= IHTMLDocument2_QueryInterface(doc
, &IID_IHTMLDocument3
, (void**)&doc3
);
1922 ok(hres
== S_OK
, "QueryInterface(IID_IHTMLDocument3) failed: %08x\n", hres
);
1924 hres
= IHTMLDocument3_getElementById(doc3
, idW
, &result
);
1925 ok(hres
== S_OK
, "getElementById failed: %08x\n", hres
);
1926 ok(result
!= NULL
, "result == NULL\n");
1929 IHTMLDocument3_Release(doc3
);
1933 static IHTMLDocument2
* get_iframe_doc(IHTMLIFrameElement
*iframe
)
1936 IHTMLFrameBase2
*base
;
1937 IHTMLDocument2
*result
= NULL
;
1939 hres
= IHTMLIFrameElement_QueryInterface(iframe
, &IID_IHTMLFrameBase2
, (void**)&base
);
1940 ok(hres
== S_OK
, "QueryInterface(IID_IHTMLFrameBase2) failed: %08x\n", hres
);
1942 IHTMLWindow2
*window
;
1944 hres
= IHTMLFrameBase2_get_contentWindow(base
, &window
);
1945 ok(hres
== S_OK
, "get_contentWindow failed: %08x\n", hres
);
1946 ok(window
!= NULL
, "window == NULL\n");
1948 hres
= IHTMLWindow2_get_document(window
, &result
);
1949 ok(hres
== S_OK
, "get_document failed: %08x\n", hres
);
1950 ok(result
!= NULL
, "result == NULL\n");
1951 IHTMLWindow2_Release(window
);
1954 if(base
) IHTMLFrameBase2_Release(base
);
1959 static void test_iframe_connections(IHTMLDocument2
*doc
)
1962 IHTMLIFrameElement
*iframe
;
1963 IHTMLDocument2
*iframes_doc
;
1965 IConnectionPoint
*cp
;
1966 IHTMLElement
*element
= find_element_by_id(doc
, "ifr");
1968 hres
= IHTMLElement_QueryInterface(element
, &IID_IHTMLIFrameElement
, (void**)&iframe
);
1969 IHTMLElement_Release(element
);
1970 ok(hres
== S_OK
, "QueryInterface(IID_IHTMLIFrameElement) failed: %08x\n", hres
);
1972 iframes_doc
= get_iframe_doc(iframe
);
1973 IHTMLIFrameElement_Release(iframe
);
1975 cookie
= register_cp((IUnknown
*)iframes_doc
, &IID_IDispatch
, (IUnknown
*)&div_onclick_disp
);
1977 cp
= get_cp((IUnknown
*)doc
, &IID_IDispatch
);
1978 hres
= IConnectionPoint_Unadvise(cp
, cookie
);
1979 IConnectionPoint_Release(cp
);
1980 ok(hres
== CONNECT_E_NOCONNECTION
, "Unadvise returned %08x, expected CONNECT_E_NOCONNECTION\n", hres
);
1982 IHTMLDocument2_Release(iframes_doc
);
1985 static HRESULT
QueryInterface(REFIID
,void**);
1987 static HRESULT WINAPI
InPlaceFrame_QueryInterface(IOleInPlaceFrame
*iface
, REFIID riid
, void **ppv
)
1989 return E_NOINTERFACE
;
1992 static ULONG WINAPI
InPlaceFrame_AddRef(IOleInPlaceFrame
*iface
)
1997 static ULONG WINAPI
InPlaceFrame_Release(IOleInPlaceFrame
*iface
)
2002 static HRESULT WINAPI
InPlaceFrame_GetWindow(IOleInPlaceFrame
*iface
, HWND
*phwnd
)
2007 static HRESULT WINAPI
InPlaceFrame_ContextSensitiveHelp(IOleInPlaceFrame
*iface
, BOOL fEnterMode
)
2012 static HRESULT WINAPI
InPlaceFrame_GetBorder(IOleInPlaceFrame
*iface
, LPRECT lprectBorder
)
2017 static HRESULT WINAPI
InPlaceFrame_RequestBorderSpace(IOleInPlaceFrame
*iface
,
2018 LPCBORDERWIDTHS pborderwidths
)
2023 static HRESULT WINAPI
InPlaceFrame_SetBorderSpace(IOleInPlaceFrame
*iface
,
2024 LPCBORDERWIDTHS pborderwidths
)
2029 static HRESULT WINAPI
InPlaceUIWindow_SetActiveObject(IOleInPlaceFrame
*iface
,
2030 IOleInPlaceActiveObject
*pActiveObject
, LPCOLESTR pszObjName
)
2035 static HRESULT WINAPI
InPlaceFrame_SetActiveObject(IOleInPlaceFrame
*iface
,
2036 IOleInPlaceActiveObject
*pActiveObject
, LPCOLESTR pszObjName
)
2041 static HRESULT WINAPI
InPlaceFrame_InsertMenus(IOleInPlaceFrame
*iface
, HMENU hmenuShared
,
2042 LPOLEMENUGROUPWIDTHS lpMenuWidths
)
2047 static HRESULT WINAPI
InPlaceFrame_SetMenu(IOleInPlaceFrame
*iface
, HMENU hmenuShared
,
2048 HOLEMENU holemenu
, HWND hwndActiveObject
)
2050 ok(0, "unexpected call\n");
2054 static HRESULT WINAPI
InPlaceFrame_RemoveMenus(IOleInPlaceFrame
*iface
, HMENU hmenuShared
)
2056 ok(0, "unexpected call\n");
2060 static HRESULT WINAPI
InPlaceFrame_SetStatusText(IOleInPlaceFrame
*iface
, LPCOLESTR pszStatusText
)
2065 static HRESULT WINAPI
InPlaceFrame_EnableModeless(IOleInPlaceFrame
*iface
, BOOL fEnable
)
2070 static HRESULT WINAPI
InPlaceFrame_TranslateAccelerator(IOleInPlaceFrame
*iface
, LPMSG lpmsg
, WORD wID
)
2072 ok(0, "unexpected call\n");
2076 static const IOleInPlaceFrameVtbl InPlaceFrameVtbl
= {
2077 InPlaceFrame_QueryInterface
,
2078 InPlaceFrame_AddRef
,
2079 InPlaceFrame_Release
,
2080 InPlaceFrame_GetWindow
,
2081 InPlaceFrame_ContextSensitiveHelp
,
2082 InPlaceFrame_GetBorder
,
2083 InPlaceFrame_RequestBorderSpace
,
2084 InPlaceFrame_SetBorderSpace
,
2085 InPlaceFrame_SetActiveObject
,
2086 InPlaceFrame_InsertMenus
,
2087 InPlaceFrame_SetMenu
,
2088 InPlaceFrame_RemoveMenus
,
2089 InPlaceFrame_SetStatusText
,
2090 InPlaceFrame_EnableModeless
,
2091 InPlaceFrame_TranslateAccelerator
2094 static IOleInPlaceFrame InPlaceFrame
= { &InPlaceFrameVtbl
};
2096 static const IOleInPlaceFrameVtbl InPlaceUIWindowVtbl
= {
2097 InPlaceFrame_QueryInterface
,
2098 InPlaceFrame_AddRef
,
2099 InPlaceFrame_Release
,
2100 InPlaceFrame_GetWindow
,
2101 InPlaceFrame_ContextSensitiveHelp
,
2102 InPlaceFrame_GetBorder
,
2103 InPlaceFrame_RequestBorderSpace
,
2104 InPlaceFrame_SetBorderSpace
,
2105 InPlaceUIWindow_SetActiveObject
,
2108 static IOleInPlaceFrame InPlaceUIWindow
= { &InPlaceUIWindowVtbl
};
2110 static HRESULT WINAPI
InPlaceSite_QueryInterface(IOleInPlaceSite
*iface
, REFIID riid
, void **ppv
)
2112 return QueryInterface(riid
, ppv
);
2115 static ULONG WINAPI
InPlaceSite_AddRef(IOleInPlaceSite
*iface
)
2120 static ULONG WINAPI
InPlaceSite_Release(IOleInPlaceSite
*iface
)
2125 static HRESULT WINAPI
InPlaceSite_GetWindow(IOleInPlaceSite
*iface
, HWND
*phwnd
)
2127 *phwnd
= container_hwnd
;
2131 static HRESULT WINAPI
InPlaceSite_ContextSensitiveHelp(IOleInPlaceSite
*iface
, BOOL fEnterMode
)
2133 ok(0, "unexpected call\n");
2137 static HRESULT WINAPI
InPlaceSite_CanInPlaceActivate(IOleInPlaceSite
*iface
)
2142 static HRESULT WINAPI
InPlaceSite_OnInPlaceActivate(IOleInPlaceSite
*iface
)
2147 static HRESULT WINAPI
InPlaceSite_OnUIActivate(IOleInPlaceSite
*iface
)
2152 static HRESULT WINAPI
InPlaceSite_GetWindowContext(IOleInPlaceSite
*iface
,
2153 IOleInPlaceFrame
**ppFrame
, IOleInPlaceUIWindow
**ppDoc
, LPRECT lprcPosRect
,
2154 LPRECT lprcClipRect
, LPOLEINPLACEFRAMEINFO lpFrameInfo
)
2156 static const RECT rect
= {0,0,300,300};
2158 *ppFrame
= &InPlaceFrame
;
2159 *ppDoc
= (IOleInPlaceUIWindow
*)&InPlaceUIWindow
;
2160 *lprcPosRect
= rect
;
2161 *lprcClipRect
= rect
;
2163 ok(lpFrameInfo
->cb
== sizeof(*lpFrameInfo
), "lpFrameInfo->cb = %u, expected %u\n", lpFrameInfo
->cb
, (unsigned)sizeof(*lpFrameInfo
));
2164 lpFrameInfo
->fMDIApp
= FALSE
;
2165 lpFrameInfo
->hwndFrame
= container_hwnd
;
2166 lpFrameInfo
->haccel
= NULL
;
2167 lpFrameInfo
->cAccelEntries
= 0;
2172 static HRESULT WINAPI
InPlaceSite_Scroll(IOleInPlaceSite
*iface
, SIZE scrollExtant
)
2177 static HRESULT WINAPI
InPlaceSite_OnUIDeactivate(IOleInPlaceSite
*iface
, BOOL fUndoable
)
2182 static HRESULT WINAPI
InPlaceSite_OnInPlaceDeactivate(IOleInPlaceSite
*iface
)
2187 static HRESULT WINAPI
InPlaceSite_DiscardUndoState(IOleInPlaceSite
*iface
)
2192 static HRESULT WINAPI
InPlaceSite_DeactivateAndUndo(IOleInPlaceSite
*iface
)
2197 static HRESULT WINAPI
InPlaceSite_OnPosRectChange(IOleInPlaceSite
*iface
, LPCRECT lprcPosRect
)
2202 static const IOleInPlaceSiteVtbl InPlaceSiteVtbl
= {
2203 InPlaceSite_QueryInterface
,
2205 InPlaceSite_Release
,
2206 InPlaceSite_GetWindow
,
2207 InPlaceSite_ContextSensitiveHelp
,
2208 InPlaceSite_CanInPlaceActivate
,
2209 InPlaceSite_OnInPlaceActivate
,
2210 InPlaceSite_OnUIActivate
,
2211 InPlaceSite_GetWindowContext
,
2213 InPlaceSite_OnUIDeactivate
,
2214 InPlaceSite_OnInPlaceDeactivate
,
2215 InPlaceSite_DiscardUndoState
,
2216 InPlaceSite_DeactivateAndUndo
,
2217 InPlaceSite_OnPosRectChange
,
2220 static IOleInPlaceSite InPlaceSite
= { &InPlaceSiteVtbl
};
2222 static HRESULT WINAPI
ClientSite_QueryInterface(IOleClientSite
*iface
, REFIID riid
, void **ppv
)
2224 return QueryInterface(riid
, ppv
);
2227 static ULONG WINAPI
ClientSite_AddRef(IOleClientSite
*iface
)
2232 static ULONG WINAPI
ClientSite_Release(IOleClientSite
*iface
)
2237 static HRESULT WINAPI
ClientSite_SaveObject(IOleClientSite
*iface
)
2239 ok(0, "unexpected call\n");
2243 static HRESULT WINAPI
ClientSite_GetMoniker(IOleClientSite
*iface
, DWORD dwAssign
, DWORD dwWhichMoniker
,
2246 ok(0, "unexpected call\n");
2250 static HRESULT WINAPI
ClientSite_GetContainer(IOleClientSite
*iface
, IOleContainer
**ppContainer
)
2255 static HRESULT WINAPI
ClientSite_ShowObject(IOleClientSite
*iface
)
2257 ok(0, "unexpected call\n");
2261 static HRESULT WINAPI
ClientSite_OnShowWindow(IOleClientSite
*iface
, BOOL fShow
)
2263 ok(0, "unexpected call\n");
2267 static HRESULT WINAPI
ClientSite_RequestNewObjectLayout(IOleClientSite
*iface
)
2269 ok(0, "unexpected call\n");
2273 static const IOleClientSiteVtbl ClientSiteVtbl
= {
2274 ClientSite_QueryInterface
,
2277 ClientSite_SaveObject
,
2278 ClientSite_GetMoniker
,
2279 ClientSite_GetContainer
,
2280 ClientSite_ShowObject
,
2281 ClientSite_OnShowWindow
,
2282 ClientSite_RequestNewObjectLayout
2285 static IOleClientSite ClientSite
= { &ClientSiteVtbl
};
2287 static HRESULT WINAPI
DocumentSite_QueryInterface(IOleDocumentSite
*iface
, REFIID riid
, void **ppv
)
2289 return QueryInterface(riid
, ppv
);
2292 static ULONG WINAPI
DocumentSite_AddRef(IOleDocumentSite
*iface
)
2297 static ULONG WINAPI
DocumentSite_Release(IOleDocumentSite
*iface
)
2302 static HRESULT WINAPI
DocumentSite_ActivateMe(IOleDocumentSite
*iface
, IOleDocumentView
*pViewToActivate
)
2304 RECT rect
= {0,0,300,300};
2305 IOleDocument
*document
;
2308 hres
= IOleDocumentView_QueryInterface(pViewToActivate
, &IID_IOleDocument
, (void**)&document
);
2309 ok(hres
== S_OK
, "could not get IOleDocument: %08x\n", hres
);
2311 hres
= IOleDocument_CreateView(document
, &InPlaceSite
, NULL
, 0, &view
);
2312 IOleDocument_Release(document
);
2313 ok(hres
== S_OK
, "CreateView failed: %08x\n", hres
);
2315 hres
= IOleDocumentView_SetInPlaceSite(view
, &InPlaceSite
);
2316 ok(hres
== S_OK
, "SetInPlaceSite failed: %08x\n", hres
);
2318 hres
= IOleDocumentView_UIActivate(view
, TRUE
);
2319 ok(hres
== S_OK
, "UIActivate failed: %08x\n", hres
);
2321 hres
= IOleDocumentView_SetRect(view
, &rect
);
2322 ok(hres
== S_OK
, "SetRect failed: %08x\n", hres
);
2324 hres
= IOleDocumentView_Show(view
, TRUE
);
2325 ok(hres
== S_OK
, "Show failed: %08x\n", hres
);
2330 static const IOleDocumentSiteVtbl DocumentSiteVtbl
= {
2331 DocumentSite_QueryInterface
,
2332 DocumentSite_AddRef
,
2333 DocumentSite_Release
,
2334 DocumentSite_ActivateMe
2337 static IOleDocumentSite DocumentSite
= { &DocumentSiteVtbl
};
2339 static HRESULT
QueryInterface(REFIID riid
, void **ppv
)
2343 if(IsEqualGUID(&IID_IUnknown
, riid
) || IsEqualGUID(&IID_IOleClientSite
, riid
))
2345 else if(IsEqualGUID(&IID_IOleDocumentSite
, riid
))
2346 *ppv
= &DocumentSite
;
2347 else if(IsEqualGUID(&IID_IOleWindow
, riid
) || IsEqualGUID(&IID_IOleInPlaceSite
, riid
))
2348 *ppv
= &InPlaceSite
;
2350 return *ppv
? S_OK
: E_NOINTERFACE
;
2353 static IHTMLDocument2
*notif_doc
;
2354 static BOOL doc_complete
;
2356 static HRESULT WINAPI
PropertyNotifySink_QueryInterface(IPropertyNotifySink
*iface
,
2357 REFIID riid
, void**ppv
)
2359 if(IsEqualGUID(&IID_IPropertyNotifySink
, riid
)) {
2364 ok(0, "unexpected call\n");
2365 return E_NOINTERFACE
;
2368 static ULONG WINAPI
PropertyNotifySink_AddRef(IPropertyNotifySink
*iface
)
2373 static ULONG WINAPI
PropertyNotifySink_Release(IPropertyNotifySink
*iface
)
2378 static HRESULT WINAPI
PropertyNotifySink_OnChanged(IPropertyNotifySink
*iface
, DISPID dispID
)
2380 if(dispID
== DISPID_READYSTATE
){
2384 hres
= IHTMLDocument2_get_readyState(notif_doc
, &state
);
2385 ok(hres
== S_OK
, "get_readyState failed: %08x\n", hres
);
2387 if(!strcmp_wa(state
, "complete"))
2388 doc_complete
= TRUE
;
2390 SysFreeString(state
);
2396 static HRESULT WINAPI
PropertyNotifySink_OnRequestEdit(IPropertyNotifySink
*iface
, DISPID dispID
)
2398 ok(0, "unexpected call\n");
2402 static const IPropertyNotifySinkVtbl PropertyNotifySinkVtbl
= {
2403 PropertyNotifySink_QueryInterface
,
2404 PropertyNotifySink_AddRef
,
2405 PropertyNotifySink_Release
,
2406 PropertyNotifySink_OnChanged
,
2407 PropertyNotifySink_OnRequestEdit
2410 static IPropertyNotifySink PropertyNotifySink
= { &PropertyNotifySinkVtbl
};
2412 static void doc_load_string(IHTMLDocument2
*doc
, const char *str
)
2414 IPersistStreamInit
*init
;
2421 doc_complete
= FALSE
;
2423 mem
= GlobalAlloc(0, len
);
2424 memcpy(mem
, str
, len
);
2425 CreateStreamOnHGlobal(mem
, TRUE
, &stream
);
2427 IHTMLDocument2_QueryInterface(doc
, &IID_IPersistStreamInit
, (void**)&init
);
2429 IPersistStreamInit_Load(init
, stream
);
2430 IPersistStreamInit_Release(init
);
2431 IStream_Release(stream
);
2434 static void do_advise(IUnknown
*unk
, REFIID riid
, IUnknown
*unk_advise
)
2436 IConnectionPointContainer
*container
;
2437 IConnectionPoint
*cp
;
2441 hres
= IUnknown_QueryInterface(unk
, &IID_IConnectionPointContainer
, (void**)&container
);
2442 ok(hres
== S_OK
, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres
);
2444 hres
= IConnectionPointContainer_FindConnectionPoint(container
, riid
, &cp
);
2445 IConnectionPointContainer_Release(container
);
2446 ok(hres
== S_OK
, "FindConnectionPoint failed: %08x\n", hres
);
2448 hres
= IConnectionPoint_Advise(cp
, unk_advise
, &cookie
);
2449 IConnectionPoint_Release(cp
);
2450 ok(hres
== S_OK
, "Advise failed: %08x\n", hres
);
2453 static void set_client_site(IHTMLDocument2
*doc
, BOOL set
)
2459 IOleDocumentView_Show(view
, FALSE
);
2460 IOleDocumentView_CloseView(view
, 0);
2461 IOleDocumentView_SetInPlaceSite(view
, NULL
);
2462 IOleDocumentView_Release(view
);
2466 hres
= IHTMLDocument2_QueryInterface(doc
, &IID_IOleObject
, (void**)&oleobj
);
2467 ok(hres
== S_OK
, "Could not et IOleObject: %08x\n", hres
);
2469 hres
= IOleObject_SetClientSite(oleobj
, set
? &ClientSite
: NULL
);
2470 ok(hres
== S_OK
, "SetClientSite failed: %08x\n", hres
);
2473 IHlinkTarget
*hlink
;
2475 hres
= IOleObject_QueryInterface(oleobj
, &IID_IHlinkTarget
, (void**)&hlink
);
2476 ok(hres
== S_OK
, "Could not get IHlinkTarget iface: %08x\n", hres
);
2478 hres
= IHlinkTarget_Navigate(hlink
, 0, NULL
);
2479 ok(hres
== S_OK
, "Navgate failed: %08x\n", hres
);
2481 IHlinkTarget_Release(hlink
);
2484 IOleObject_Release(oleobj
);
2486 static IHTMLDocument2
*create_document(void)
2488 IHTMLDocument2
*doc
;
2489 IHTMLDocument5
*doc5
;
2492 hres
= CoCreateInstance(&CLSID_HTMLDocument
, NULL
, CLSCTX_INPROC_SERVER
|CLSCTX_INPROC_HANDLER
,
2493 &IID_IHTMLDocument2
, (void**)&doc
);
2494 ok(hres
== S_OK
, "CoCreateInstance failed: %08x\n", hres
);
2498 hres
= IHTMLDocument2_QueryInterface(doc
, &IID_IHTMLDocument5
, (void**)&doc5
);
2500 win_skip("Could not get IHTMLDocument5 interface, probably too old IE\n");
2501 IHTMLDocument2_Release(doc
);
2505 IHTMLDocument5_Release(doc5
);
2510 typedef void (*testfunc_t
)(IHTMLDocument2
*);
2512 static void run_test(const char *str
, testfunc_t test
)
2514 IHTMLDocument2
*doc
;
2515 IHTMLElement
*body
= NULL
;
2520 doc
= create_document();
2523 set_client_site(doc
, TRUE
);
2524 doc_load_string(doc
, str
);
2525 do_advise((IUnknown
*)doc
, &IID_IPropertyNotifySink
, (IUnknown
*)&PropertyNotifySink
);
2527 while(!doc_complete
&& GetMessage(&msg
, NULL
, 0, 0)) {
2528 TranslateMessage(&msg
);
2529 DispatchMessage(&msg
);
2532 hres
= IHTMLDocument2_get_body(doc
, &body
);
2533 ok(hres
== S_OK
, "get_body failed: %08x\n", hres
);
2536 IHTMLElement_Release(body
);
2538 hres
= IHTMLDocument2_get_parentWindow(doc
, &window
);
2539 ok(hres
== S_OK
, "get_parentWindow failed: %08x\n", hres
);
2540 ok(window
!= NULL
, "window == NULL\n");
2544 IHTMLWindow2_Release(window
);
2547 skip("Could not get document body. Assuming no Gecko installed.\n");
2550 set_client_site(doc
, FALSE
);
2551 IHTMLDocument2_Release(doc
);
2554 static LRESULT WINAPI
wnd_proc(HWND hwnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
2556 return DefWindowProc(hwnd
, msg
, wParam
, lParam
);
2559 static HWND
create_container_window(void)
2561 static const CHAR szHTMLDocumentTest
[] = "HTMLDocumentTest";
2562 static WNDCLASSEXA wndclass
= {
2563 sizeof(WNDCLASSEXA
),
2566 0, 0, NULL
, NULL
, NULL
, NULL
, NULL
,
2571 RegisterClassExA(&wndclass
);
2572 return CreateWindowA(szHTMLDocumentTest
, szHTMLDocumentTest
,
2573 WS_OVERLAPPEDWINDOW
, CW_USEDEFAULT
, CW_USEDEFAULT
,
2574 300, 300, NULL
, NULL
, NULL
, NULL
);
2577 static void test_empty_document(void)
2580 IHTMLWindow2
*window
;
2581 IHTMLDocument2
*windows_doc
, *doc
;
2582 IConnectionPoint
*cp
;
2585 doc
= create_document();
2589 hres
= IHTMLDocument2_get_parentWindow(doc
, &window
);
2590 ok(hres
== S_OK
, "get_parentWindow failed: %08x\n", hres
);
2592 hres
= IHTMLWindow2_get_document(window
, &windows_doc
);
2593 IHTMLWindow2_Release(window
);
2594 ok(hres
== S_OK
, "get_document failed: %08x\n", hres
);
2596 cookie
= register_cp((IUnknown
*)windows_doc
, &IID_IDispatch
, (IUnknown
*)&div_onclick_disp
);
2598 cp
= get_cp((IUnknown
*)doc
, &IID_IDispatch
);
2599 hres
= IConnectionPoint_Unadvise(cp
, cookie
);
2600 IConnectionPoint_Release(cp
);
2601 ok(hres
== S_OK
, "Unadvise failed: %08x\n", hres
);
2603 IHTMLDocument2_Release(windows_doc
);
2604 IHTMLDocument2_Release(doc
);
2610 container_hwnd
= create_container_window();
2612 if(winetest_interactive
)
2613 ShowWindow(container_hwnd
, SW_SHOW
);
2615 run_test(empty_doc_str
, test_timeout
);
2616 run_test(click_doc_str
, test_onclick
);
2617 run_test(readystate_doc_str
, test_onreadystatechange
);
2618 run_test(img_doc_str
, test_imgload
);
2619 run_test(input_doc_str
, test_focus
);
2620 run_test(form_doc_str
, test_submit
);
2621 run_test(iframe_doc_str
, test_iframe_connections
);
2623 test_empty_document();
2625 DestroyWindow(container_hwnd
);