1 /*
2 * Copyright 2008-2011 Jacek Caban for CodeWeavers
3 *
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.
8 *
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.
13 *
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
17 */
18
19 #include "precomp.h"
20
21 #include <docobj.h>
22
23 #define DEFINE_EXPECT(func) \
24 static BOOL expect_ ## func = FALSE, called_ ## func = FALSE
25
26 #define SET_EXPECT(func) \
27 do { called_ ## func = FALSE; expect_ ## func = TRUE; } while(0)
28
29 #define CHECK_EXPECT2(func) \
30 do { \
31 trace(#func "\n"); \
32 ok(expect_ ##func, "unexpected call " #func "\n"); \
33 called_ ## func = TRUE; \
34 }while(0)
35
36 #define CHECK_EXPECT(func) \
37 do { \
38 CHECK_EXPECT2(func); \
39 expect_ ## func = FALSE; \
40 }while(0)
41
42 #define CHECK_CALLED(func) \
43 do { \
44 ok(called_ ## func, "expected " #func "\n"); \
45 expect_ ## func = called_ ## func = FALSE; \
46 }while(0)
47
48 DEFINE_EXPECT(document_onclick);
49 DEFINE_EXPECT(body_onclick);
50 DEFINE_EXPECT(doc_onclick_attached);
51 DEFINE_EXPECT(div_onclick);
52 DEFINE_EXPECT(div_onclick_attached);
53 DEFINE_EXPECT(timeout);
54 DEFINE_EXPECT(doccp_onclick);
55 DEFINE_EXPECT(doccp_onclick_cancel);
56 DEFINE_EXPECT(div_onclick_disp);
57 DEFINE_EXPECT(invoke_onclick);
58 DEFINE_EXPECT(iframe_onreadystatechange_loading);
59 DEFINE_EXPECT(iframe_onreadystatechange_interactive);
60 DEFINE_EXPECT(iframe_onreadystatechange_complete);
61 DEFINE_EXPECT(iframedoc_onreadystatechange);
62 DEFINE_EXPECT(img_onload);
63 DEFINE_EXPECT(img_onerror);
64 DEFINE_EXPECT(input_onfocus);
65 DEFINE_EXPECT(input_onblur);
66 DEFINE_EXPECT(form_onsubmit);
67 DEFINE_EXPECT(form_onclick);
68 DEFINE_EXPECT(submit_onclick);
69 DEFINE_EXPECT(submit_onclick_cancel);
70 DEFINE_EXPECT(submit_onclick_attached);
71 DEFINE_EXPECT(submit_onclick_attached_check_cancel);
72 DEFINE_EXPECT(submit_onclick_setret);
73 DEFINE_EXPECT(elem2_cp_onclick);
74 DEFINE_EXPECT(iframe_onload);
75
76 static HWND container_hwnd = NULL;
77 static IHTMLWindow2 *window;
78 static IOleDocumentView *view;
79 static BOOL is_ie9plus;
80
81 typedef struct {
82 LONG x;
83 LONG y;
84 LONG offset_x;
85 LONG offset_y;
86 } xy_test_t;
87
88 static const xy_test_t no_xy = {-10,-10,-10,-10};
89
90 static const char empty_doc_str[] =
91 "<html></html>";
92
93 static const char click_doc_str[] =
94 "<html><body>"
95 "<div id=\"clickdiv\" style=\"text-align: center; background: red; font-size: 32\">click here</div>"
96 "</body></html>";
97
98 static const char readystate_doc_str[] =
99 "<html><body><iframe id=\"iframe\"></iframe></body></html>";
100
101 static const char img_doc_str[] =
102 "<html><body><img id=\"imgid\"></img></body></html>";
103
104 static const char input_doc_str[] =
105 "<html><body><input id=\"inputid\"></input></body></html>";
106
107 static const char iframe_doc_str[] =
108 "<html><body><iframe id=\"ifr\">Testing</iframe></body></html>";
109
110 static const char form_doc_str[] =
111 "<html><body><form id=\"formid\" method=\"post\" action=\"about:blank\">"
112 "<input type=\"text\" value=\"test\" name=\"i\"/>"
113 "<input type=\"submit\" id=\"submitid\" />"
114 "</form></body></html>";
115
strcmp_wa(LPCWSTR strw,const char * stra)116 static int strcmp_wa(LPCWSTR strw, const char *stra)
117 {
118 CHAR buf[512];
119 WideCharToMultiByte(CP_ACP, 0, strw, -1, buf, sizeof(buf), NULL, NULL);
120 return lstrcmpA(stra, buf);
121 }
122
a2bstr(const char * str)123 static BSTR a2bstr(const char *str)
124 {
125 BSTR ret;
126 int len;
127
128 len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
129 ret = SysAllocStringLen(NULL, len-1);
130 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
131
132 return ret;
133 }
134
iface_cmp(IUnknown * iface1,IUnknown * iface2)135 static BOOL iface_cmp(IUnknown *iface1, IUnknown *iface2)
136 {
137 IUnknown *unk1, *unk2;
138
139 if(iface1 == iface2)
140 return TRUE;
141
142 IUnknown_QueryInterface(iface1, &IID_IUnknown, (void**)&unk1);
143 IUnknown_Release(unk1);
144 IUnknown_QueryInterface(iface1, &IID_IUnknown, (void**)&unk2);
145 IUnknown_Release(unk2);
146
147 return unk1 == unk2;
148 }
149
150 #define test_disp(u,id) _test_disp(__LINE__,u,id)
_test_disp(unsigned line,IUnknown * unk,const IID * diid)151 static void _test_disp(unsigned line, IUnknown *unk, const IID *diid)
152 {
153 IDispatchEx *dispex;
154 ITypeInfo *typeinfo;
155 UINT ticnt;
156 HRESULT hres;
157
158 hres = IUnknown_QueryInterface(unk, &IID_IDispatchEx, (void**)&dispex);
159 ok_(__FILE__,line) (hres == S_OK, "Could not get IDispatch: %08x\n", hres);
160 if(FAILED(hres))
161 return;
162
163 ticnt = 0xdeadbeef;
164 hres = IDispatchEx_GetTypeInfoCount(dispex, &ticnt);
165 ok_(__FILE__,line) (hres == S_OK, "GetTypeInfoCount failed: %08x\n", hres);
166 ok_(__FILE__,line) (ticnt == 1, "ticnt=%u\n", ticnt);
167
168 hres = IDispatchEx_GetTypeInfo(dispex, 0, 0, &typeinfo);
169 ok_(__FILE__,line) (hres == S_OK, "GetTypeInfo failed: %08x\n", hres);
170
171 if(SUCCEEDED(hres)) {
172 TYPEATTR *type_attr;
173
174 hres = ITypeInfo_GetTypeAttr(typeinfo, &type_attr);
175 ok_(__FILE__,line) (hres == S_OK, "GetTypeAttr failed: %08x\n", hres);
176 ok_(__FILE__,line) (IsEqualGUID(&type_attr->guid, diid), "unexpected guid %s\n",
177 wine_dbgstr_guid(&type_attr->guid));
178
179 ITypeInfo_ReleaseTypeAttr(typeinfo, type_attr);
180 ITypeInfo_Release(typeinfo);
181 }
182
183 IDispatchEx_Release(dispex);
184 }
185
186 #define get_doc3_iface(u) _get_doc3_iface(__LINE__,u)
_get_doc3_iface(unsigned line,IUnknown * unk)187 static IHTMLDocument3 *_get_doc3_iface(unsigned line, IUnknown *unk)
188 {
189 IHTMLDocument3 *doc3;
190 HRESULT hres;
191
192 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDocument3, (void**)&doc3);
193 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLDocument3 iface: %08x\n", hres);
194
195 return doc3;
196 }
197
198 #define get_elem_iface(u) _get_elem_iface(__LINE__,u)
_get_elem_iface(unsigned line,IUnknown * unk)199 static IHTMLElement *_get_elem_iface(unsigned line, IUnknown *unk)
200 {
201 IHTMLElement *elem;
202 HRESULT hres;
203
204 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElement, (void**)&elem);
205 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLElement iface: %08x\n", hres);
206
207 return elem;
208 }
209
210 #define get_elem2_iface(u) _get_elem2_iface(__LINE__,u)
_get_elem2_iface(unsigned line,IUnknown * unk)211 static IHTMLElement2 *_get_elem2_iface(unsigned line, IUnknown *unk)
212 {
213 IHTMLElement2 *elem2;
214 HRESULT hres;
215
216 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElement2, (void**)&elem2);
217 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLElement2 iface: %08x\n", hres);
218
219 return elem2;
220 }
221
222 #define get_elem3_iface(u) _get_elem3_iface(__LINE__,u)
_get_elem3_iface(unsigned line,IUnknown * unk)223 static IHTMLElement3 *_get_elem3_iface(unsigned line, IUnknown *unk)
224 {
225 IHTMLElement3 *elem3;
226 HRESULT hres;
227
228 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElement3, (void**)&elem3);
229 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLElement3 iface: %08x\n", hres);
230
231 return elem3;
232 }
233
234 #define get_iframe_iface(u) _get_iframe_iface(__LINE__,u)
_get_iframe_iface(unsigned line,IUnknown * unk)235 static IHTMLIFrameElement *_get_iframe_iface(unsigned line, IUnknown *unk)
236 {
237 IHTMLIFrameElement *iframe;
238 HRESULT hres;
239
240 hres = IUnknown_QueryInterface(unk, &IID_IHTMLIFrameElement, (void**)&iframe);
241 ok_(__FILE__,line)(hres == S_OK, "QueryInterface(IID_IHTMLIFrameElement) failed: %08x\n", hres);
242
243 return iframe;
244 }
245
246 #define doc_get_body(d) _doc_get_body(__LINE__,d)
_doc_get_body(unsigned line,IHTMLDocument2 * doc)247 static IHTMLElement *_doc_get_body(unsigned line, IHTMLDocument2 *doc)
248 {
249 IHTMLElement *body = NULL;
250 HRESULT hres;
251
252 hres = IHTMLDocument2_get_body(doc, &body);
253 ok_(__FILE__,line) (hres == S_OK, "get_body failed: %08x\n", hres);
254 ok_(__FILE__,line) (body != NULL, "body == NULL\n");
255
256 return body;
257 }
258
259 #define get_elem_id(d,i) _get_elem_id(__LINE__,d,i)
_get_elem_id(unsigned line,IHTMLDocument2 * doc,const char * id)260 static IHTMLElement *_get_elem_id(unsigned line, IHTMLDocument2 *doc, const char *id)
261 {
262 IHTMLDocument3 *doc3 = _get_doc3_iface(line, (IUnknown*)doc);
263 IHTMLElement *elem;
264 BSTR str;
265 HRESULT hres;
266
267 str = a2bstr(id);
268 hres = IHTMLDocument3_getElementById(doc3, str, &elem);
269 SysFreeString(str);
270 IHTMLDocument3_Release(doc3);
271 ok_(__FILE__,line) (hres == S_OK, "getElementById failed: %08x\n", hres);
272
273 return elem;
274 }
275
276 #define test_elem_tag(u,n) _test_elem_tag(__LINE__,u,n)
_test_elem_tag(unsigned line,IUnknown * unk,const char * extag)277 static void _test_elem_tag(unsigned line, IUnknown *unk, const char *extag)
278 {
279 IHTMLElement *elem = _get_elem_iface(line, unk);
280 BSTR tag;
281 HRESULT hres;
282
283 hres = IHTMLElement_get_tagName(elem, &tag);
284 IHTMLElement_Release(elem);
285 ok_(__FILE__, line) (hres == S_OK, "get_tagName failed: %08x\n", hres);
286 ok_(__FILE__, line) (!strcmp_wa(tag, extag), "got tag: %s, expected %s\n", wine_dbgstr_w(tag), extag);
287
288 SysFreeString(tag);
289 }
290
291 #define get_event_obj() _get_event_obj(__LINE__)
_get_event_obj(unsigned line)292 static IHTMLEventObj *_get_event_obj(unsigned line)
293 {
294 IHTMLEventObj *event = NULL;
295 HRESULT hres;
296
297 hres = IHTMLWindow2_get_event(window, &event);
298 ok_(__FILE__,line) (hres == S_OK, "get_event failed: %08x\n", hres);
299 ok_(__FILE__,line) (event != NULL, "event = NULL\n");
300 _test_disp(line, (IUnknown*)event, &DIID_DispCEventObj);
301
302 return event;
303 }
304
305 #define elem_fire_event(a,b,c) _elem_fire_event(__LINE__,a,b,c)
_elem_fire_event(unsigned line,IUnknown * unk,const char * event,VARIANT * evobj)306 static void _elem_fire_event(unsigned line, IUnknown *unk, const char *event, VARIANT *evobj)
307 {
308 IHTMLElement3 *elem3 = _get_elem3_iface(line, unk);
309 VARIANT_BOOL b;
310 BSTR str;
311 HRESULT hres;
312
313 b = 100;
314 str = a2bstr(event);
315 hres = IHTMLElement3_fireEvent(elem3, str, evobj, &b);
316 SysFreeString(str);
317 ok_(__FILE__,line)(hres == S_OK, "fireEvent failed: %08x\n", hres);
318 ok_(__FILE__,line)(b == VARIANT_TRUE, "fireEvent returned %x\n", b);
319 }
320
321 #define test_event_args(a,b,c,d,e,f,g) _test_event_args(__LINE__,a,b,c,d,e,f,g)
_test_event_args(unsigned line,const IID * dispiid,DISPID id,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)322 static void _test_event_args(unsigned line, const IID *dispiid, DISPID id, WORD wFlags, DISPPARAMS *pdp,
323 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
324 {
325 ok_(__FILE__,line) (id == DISPID_VALUE, "id = %d\n", id);
326 ok_(__FILE__,line) (wFlags == DISPATCH_METHOD, "wFlags = %x\n", wFlags);
327 ok_(__FILE__,line) (pdp != NULL, "pdp == NULL\n");
328 ok_(__FILE__,line) (pdp->cArgs == 1, "pdp->cArgs = %d\n", pdp->cArgs);
329 ok_(__FILE__,line) (pdp->cNamedArgs == 1, "pdp->cNamedArgs = %d\n", pdp->cNamedArgs);
330 ok_(__FILE__,line) (pdp->rgdispidNamedArgs[0] == DISPID_THIS, "pdp->rgdispidNamedArgs[0] = %d\n",
331 pdp->rgdispidNamedArgs[0]);
332 ok_(__FILE__,line) (V_VT(pdp->rgvarg) == VT_DISPATCH, "V_VT(rgvarg) = %d\n", V_VT(pdp->rgvarg));
333 ok_(__FILE__,line) (pvarRes != NULL, "pvarRes == NULL\n");
334 ok_(__FILE__,line) (pei != NULL, "pei == NULL");
335 ok_(__FILE__,line) (!pspCaller, "pspCaller != NULL\n");
336
337 if(dispiid)
338 _test_disp(line, (IUnknown*)V_DISPATCH(pdp->rgvarg), dispiid);
339 }
340
341 #define test_attached_event_args(a,b,c,d,e) _test_attached_event_args(__LINE__,a,b,c,d,e)
_test_attached_event_args(unsigned line,DISPID id,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei)342 static void _test_attached_event_args(unsigned line, DISPID id, WORD wFlags, DISPPARAMS *pdp,
343 VARIANT *pvarRes, EXCEPINFO *pei)
344 {
345 IHTMLEventObj *event;
346
347 ok(id == DISPID_VALUE, "id = %d\n", id);
348 ok(wFlags == DISPATCH_METHOD, "wFlags = %x\n", wFlags);
349 ok(pdp != NULL, "pDispParams == NULL\n");
350 ok(pdp->cArgs == 1, "pdp->cArgs = %d\n", pdp->cArgs);
351 ok(!pdp->cNamedArgs, "pdp->cNamedArgs = %d\n", pdp->cNamedArgs);
352 ok(!pdp->rgdispidNamedArgs, "pdp->rgdispidNamedArgs = %p\n", pdp->rgdispidNamedArgs);
353 ok(pdp->rgvarg != NULL, "rgvarg = NULL\n");
354 ok(pvarRes != NULL, "pvarRes = NULL\n");
355 ok(pei != NULL, "pei = NULL\n");
356 ok(V_VT(pvarRes) == VT_EMPTY, "V_VT(pVarRes) = %d\n", V_VT(pvarRes));
357 ok(V_VT(pdp->rgvarg) == VT_DISPATCH, "V_VT(pdp->rgvarg) = %d\n", V_VT(pdp->rgvarg));
358 ok(V_DISPATCH(pdp->rgvarg) != NULL, "V_DISPATCH(pdp->rgvarg) = %p\n", V_DISPATCH(pdp->rgvarg));
359
360 event = _get_event_obj(line);
361 ok(iface_cmp((IUnknown*)event, (IUnknown*)V_DISPATCH(pdp->rgvarg)), "event != arg0\n");
362 IHTMLEventObj_Release(event);
363 }
364
365 #define get_event_src() _get_event_src(__LINE__)
_get_event_src(unsigned line)366 static IHTMLElement *_get_event_src(unsigned line)
367 {
368 IHTMLEventObj *event = _get_event_obj(line);
369 IHTMLElement *src_elem = NULL;
370 HRESULT hres;
371
372 hres = IHTMLEventObj_get_srcElement(event, &src_elem);
373 IHTMLEventObj_Release(event);
374 ok_(__FILE__,line) (hres == S_OK, "get_srcElement failed: %08x\n", hres);
375
376 return src_elem;
377 }
378
379 #define test_event_src(t) _test_event_src(__LINE__,t)
_test_event_src(unsigned line,const char * src_tag)380 static void _test_event_src(unsigned line, const char *src_tag)
381 {
382 IHTMLElement *src_elem = _get_event_src(line);
383
384 if(src_tag) {
385 ok_(__FILE__,line) (src_elem != NULL, "src_elem = NULL\n");
386 _test_elem_tag(line, (IUnknown*)src_elem, src_tag);
387 IHTMLElement_Release(src_elem);
388 }else {
389 ok_(__FILE__,line) (!src_elem, "src_elem != NULL\n");
390 }
391 }
392
_test_event_altkey(unsigned line,IHTMLEventObj * event,VARIANT_BOOL exval)393 static void _test_event_altkey(unsigned line, IHTMLEventObj *event, VARIANT_BOOL exval)
394 {
395 VARIANT_BOOL b;
396 HRESULT hres;
397
398 hres = IHTMLEventObj_get_altKey(event, &b);
399 ok_(__FILE__,line)(hres == S_OK, "get_altKey failed: %08x\n", hres);
400 ok_(__FILE__,line)(b == exval, "altKey = %x, expected %x\n", b, exval);
401 }
402
_test_event_ctrlkey(unsigned line,IHTMLEventObj * event,VARIANT_BOOL exval)403 static void _test_event_ctrlkey(unsigned line, IHTMLEventObj *event, VARIANT_BOOL exval)
404 {
405 VARIANT_BOOL b;
406 HRESULT hres;
407
408 hres = IHTMLEventObj_get_ctrlKey(event, &b);
409 ok_(__FILE__,line)(hres == S_OK, "get_ctrlKey failed: %08x\n", hres);
410 ok_(__FILE__,line)(b == exval, "ctrlKey = %x, expected %x\n", b, exval);
411 }
412
_test_event_shiftkey(unsigned line,IHTMLEventObj * event,VARIANT_BOOL exval)413 static void _test_event_shiftkey(unsigned line, IHTMLEventObj *event, VARIANT_BOOL exval)
414 {
415 VARIANT_BOOL b;
416 HRESULT hres;
417
418 hres = IHTMLEventObj_get_shiftKey(event, &b);
419 ok_(__FILE__,line)(hres == S_OK, "get_shiftKey failed: %08x\n", hres);
420 ok_(__FILE__,line)(b == exval, "shiftKey = %x, expected %x\n", b, exval);
421 }
422
423 #define test_event_cancelbubble(a,b) _test_event_cancelbubble(__LINE__,a,b)
_test_event_cancelbubble(unsigned line,IHTMLEventObj * event,VARIANT_BOOL exval)424 static void _test_event_cancelbubble(unsigned line, IHTMLEventObj *event, VARIANT_BOOL exval)
425 {
426 VARIANT_BOOL b;
427 HRESULT hres;
428
429 hres = IHTMLEventObj_get_cancelBubble(event, &b);
430 ok_(__FILE__,line)(hres == S_OK, "get_cancelBubble failed: %08x\n", hres);
431 ok_(__FILE__,line)(b == exval, "cancelBubble = %x, expected %x\n", b, exval);
432 }
433
_test_event_fromelem(unsigned line,IHTMLEventObj * event,const char * from_tag)434 static void _test_event_fromelem(unsigned line, IHTMLEventObj *event, const char *from_tag)
435 {
436 IHTMLElement *elem;
437 HRESULT hres;
438
439 hres = IHTMLEventObj_get_fromElement(event, &elem);
440 ok_(__FILE__,line)(hres == S_OK, "get_fromElement failed: %08x\n", hres);
441 if(from_tag)
442 _test_elem_tag(line, (IUnknown*)elem, from_tag);
443 else
444 ok_(__FILE__,line)(elem == NULL, "fromElement != NULL\n");
445 if(elem)
446 IHTMLElement_Release(elem);
447 }
448
_test_event_toelem(unsigned line,IHTMLEventObj * event,const char * to_tag)449 static void _test_event_toelem(unsigned line, IHTMLEventObj *event, const char *to_tag)
450 {
451 IHTMLElement *elem;
452 HRESULT hres;
453
454 hres = IHTMLEventObj_get_toElement(event, &elem);
455 ok_(__FILE__,line)(hres == S_OK, "get_toElement failed: %08x\n", hres);
456 if(to_tag)
457 _test_elem_tag(line, (IUnknown*)elem, to_tag);
458 else
459 ok_(__FILE__,line)(elem == NULL, "toElement != NULL\n");
460 if(elem)
461 IHTMLElement_Release(elem);
462 }
463
_test_event_keycode(unsigned line,IHTMLEventObj * event,LONG exl)464 static void _test_event_keycode(unsigned line, IHTMLEventObj *event, LONG exl)
465 {
466 LONG l;
467 HRESULT hres;
468
469 hres = IHTMLEventObj_get_keyCode(event, &l);
470 ok_(__FILE__,line)(hres == S_OK, "get_keyCode failed: %08x\n", hres);
471 ok_(__FILE__,line)(l == exl, "keyCode = %x, expected %x\n", l, exl);
472 }
473
_test_event_button(unsigned line,IHTMLEventObj * event,LONG exl)474 static void _test_event_button(unsigned line, IHTMLEventObj *event, LONG exl)
475 {
476 LONG l;
477 HRESULT hres;
478
479 hres = IHTMLEventObj_get_button(event, &l);
480 ok_(__FILE__,line)(hres == S_OK, "get_button failed: %08x\n", hres);
481 ok_(__FILE__,line)(l == exl, "button = %x, expected %x\n", l, exl);
482 }
483
_test_event_reason(unsigned line,IHTMLEventObj * event,LONG exl)484 static void _test_event_reason(unsigned line, IHTMLEventObj *event, LONG exl)
485 {
486 LONG l;
487 HRESULT hres;
488
489 hres = IHTMLEventObj_get_reason(event, &l);
490 ok_(__FILE__,line)(hres == S_OK, "get_reason failed: %08x\n", hres);
491 ok_(__FILE__,line)(l == exl, "reason = %x, expected %x\n", l, exl);
492 }
493
_test_event_x(unsigned line,IHTMLEventObj * event,LONG exl)494 static void _test_event_x(unsigned line, IHTMLEventObj *event, LONG exl)
495 {
496 LONG l;
497 HRESULT hres;
498
499 hres = IHTMLEventObj_get_x(event, &l);
500 ok_(__FILE__,line)(hres == S_OK, "get_x failed: %08x\n", hres);
501 if(exl != -10) /* don't test the exact value */
502 ok_(__FILE__,line)(l == exl, "x = %d, expected %d\n", l, exl);
503 }
504
_test_event_y(unsigned line,IHTMLEventObj * event,LONG exl)505 static void _test_event_y(unsigned line, IHTMLEventObj *event, LONG exl)
506 {
507 LONG l;
508 HRESULT hres;
509
510 hres = IHTMLEventObj_get_y(event, &l);
511 ok_(__FILE__,line)(hres == S_OK, "get_y failed: %08x\n", hres);
512 if(exl != -10) /* don't test the exact value */
513 ok_(__FILE__,line)(l == exl, "y = %d, expected %d\n", l, exl);
514 }
515
_test_event_clientx(unsigned line,IHTMLEventObj * event,LONG exl)516 static void _test_event_clientx(unsigned line, IHTMLEventObj *event, LONG exl)
517 {
518 LONG l;
519 HRESULT hres;
520
521 hres = IHTMLEventObj_get_clientX(event, &l);
522 ok_(__FILE__,line)(hres == S_OK, "get_clientX failed: %08x\n", hres);
523 if(exl != -10) /* don't test the exact value */
524 ok_(__FILE__,line)(l == exl, "clientX = %d, expected %d\n", l, exl);
525 }
526
_test_event_clienty(unsigned line,IHTMLEventObj * event,LONG exl)527 static void _test_event_clienty(unsigned line, IHTMLEventObj *event, LONG exl)
528 {
529 LONG l;
530 HRESULT hres;
531
532 hres = IHTMLEventObj_get_clientY(event, &l);
533 ok_(__FILE__,line)(hres == S_OK, "get_clientY failed: %08x\n", hres);
534 if(exl != -10) /* don't test the exact value */
535 ok_(__FILE__,line)(l == exl, "clientY = %d, expected %d\n", l, exl);
536 }
537
_test_event_offsetx(unsigned line,IHTMLEventObj * event,LONG exl)538 static void _test_event_offsetx(unsigned line, IHTMLEventObj *event, LONG exl)
539 {
540 LONG l;
541 HRESULT hres;
542
543 hres = IHTMLEventObj_get_offsetX(event, &l);
544 ok_(__FILE__,line)(hres == S_OK, "get_offsetX failed: %08x\n", hres);
545 if(exl != -10) /* don't test the exact value */
546 ok_(__FILE__,line)(l == exl, "offsetX = %d, expected %d\n", l, exl);
547 }
548
_test_event_offsety(unsigned line,IHTMLEventObj * event,LONG exl)549 static void _test_event_offsety(unsigned line, IHTMLEventObj *event, LONG exl)
550 {
551 LONG l;
552 HRESULT hres;
553
554 hres = IHTMLEventObj_get_offsetY(event, &l);
555 ok_(__FILE__,line)(hres == S_OK, "get_offsetY failed: %08x\n", hres);
556 if(exl != -10) /* don't test the exact value */
557 ok_(__FILE__,line)(l == exl, "offsetY = %d, expected %d\n", l, exl);
558 }
559
_test_event_screenx(unsigned line,IHTMLEventObj * event,LONG exl)560 static void _test_event_screenx(unsigned line, IHTMLEventObj *event, LONG exl)
561 {
562 LONG l;
563 HRESULT hres;
564
565 hres = IHTMLEventObj_get_screenX(event, &l);
566 ok_(__FILE__,line)(hres == S_OK, "get_screenX failed: %08x\n", hres);
567 if(exl != -10) /* don't test the exact value */
568 ok_(__FILE__,line)(l == exl, "screenX = %d, expected %d\n", l, exl);
569 }
570
_test_event_screeny(unsigned line,IHTMLEventObj * event,LONG exl)571 static void _test_event_screeny(unsigned line, IHTMLEventObj *event, LONG exl)
572 {
573 LONG l;
574 HRESULT hres;
575
576 hres = IHTMLEventObj_get_screenY(event, &l);
577 ok_(__FILE__,line)(hres == S_OK, "get_screenY failed: %08x\n", hres);
578 if(exl != -10) /* don't test the exact value for -10 */
579 ok_(__FILE__,line)(l == exl, "screenY = %d, expected %d\n", l, exl);
580 }
581
_test_event_type(unsigned line,IHTMLEventObj * event,const char * exstr)582 static void _test_event_type(unsigned line, IHTMLEventObj *event, const char *exstr)
583 {
584 BSTR str;
585 HRESULT hres;
586
587 hres = IHTMLEventObj_get_type(event, &str);
588 ok_(__FILE__,line)(hres == S_OK, "get_type failed: %08x\n", hres);
589 ok_(__FILE__,line)(!strcmp_wa(str, exstr), "type = %s, expected %s\n", wine_dbgstr_w(str), exstr);
590 }
591
_test_event_qualifier(unsigned line,IHTMLEventObj * event,const char * exstr)592 static void _test_event_qualifier(unsigned line, IHTMLEventObj *event, const char *exstr)
593 {
594 BSTR str;
595 HRESULT hres;
596
597 hres = IHTMLEventObj_get_qualifier(event, &str);
598 ok_(__FILE__,line)(hres == S_OK, "get_qualifier failed: %08x\n", hres);
599 if(exstr)
600 ok_(__FILE__,line)(!strcmp_wa(str, exstr), "qualifier = %s, expected %s\n", wine_dbgstr_w(str), exstr);
601 else
602 ok_(__FILE__,line)(!str, "qualifier != NULL\n");
603 }
604
_test_event_srcfilter(unsigned line,IHTMLEventObj * event)605 static void _test_event_srcfilter(unsigned line, IHTMLEventObj *event)
606 {
607 IDispatch *disp;
608 HRESULT hres;
609
610 hres = IHTMLEventObj_get_srcFilter(event, &disp);
611 ok_(__FILE__,line)(hres == S_OK, "get_srcFilter failed: %08x\n", hres);
612 ok_(__FILE__,line)(!disp, "srcFilter != NULL\n");
613 }
614
615 #define test_event_obj(t,x) _test_event_obj(__LINE__,t,x)
_test_event_obj(unsigned line,const char * type,const xy_test_t * xy)616 static void _test_event_obj(unsigned line, const char *type, const xy_test_t *xy)
617 {
618 IHTMLEventObj *event = _get_event_obj(line);
619 VARIANT v;
620 HRESULT hres;
621
622 _test_event_altkey(line, event, VARIANT_FALSE);
623 _test_event_ctrlkey(line, event, VARIANT_FALSE);
624 _test_event_shiftkey(line, event, VARIANT_FALSE);
625 _test_event_cancelbubble(line, event, VARIANT_FALSE);
626 _test_event_fromelem(line, event, NULL);
627 _test_event_toelem(line, event, NULL);
628 _test_event_keycode(line, event, 0);
629 _test_event_button(line, event, 0);
630 _test_event_type(line, event, type);
631 _test_event_qualifier(line, event, NULL);
632 _test_event_reason(line, event, 0);
633 _test_event_srcfilter(line, event);
634 _test_event_x(line, event, xy->x);
635 _test_event_y(line, event, xy->y);
636 _test_event_clientx(line, event, -10);
637 _test_event_clienty(line, event, -10);
638 _test_event_offsetx(line, event, xy->offset_x);
639 _test_event_offsety(line, event, xy->offset_y);
640 _test_event_screenx(line, event, -10);
641 _test_event_screeny(line, event, -10);
642
643 V_VT(&v) = VT_NULL;
644 hres = IHTMLEventObj_get_returnValue(event, &v);
645 ok_(__FILE__,line)(hres == S_OK, "get_returnValue failed: %08x\n", hres);
646 ok_(__FILE__,line)(V_VT(&v) == VT_EMPTY, "V_VT(returnValue) = %d\n", V_VT(&v));
647
648 IHTMLEventObj_Release(event);
649 }
650
651 #define elem_attach_event(a,b,c) _elem_attach_event(__LINE__,a,b,c)
_elem_attach_event(unsigned line,IUnknown * unk,const char * namea,IDispatch * disp)652 static void _elem_attach_event(unsigned line, IUnknown *unk, const char *namea, IDispatch *disp)
653 {
654 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
655 VARIANT_BOOL res;
656 BSTR name;
657 HRESULT hres;
658
659 name = a2bstr(namea);
660 hres = IHTMLElement2_attachEvent(elem, name, disp, &res);
661 IHTMLElement2_Release(elem);
662 SysFreeString(name);
663 ok_(__FILE__,line)(hres == S_OK, "attachEvent failed: %08x\n", hres);
664 ok_(__FILE__,line)(res == VARIANT_TRUE, "attachEvent returned %x\n", res);
665 }
666
667 #define elem_detach_event(a,b,c) _elem_detach_event(__LINE__,a,b,c)
_elem_detach_event(unsigned line,IUnknown * unk,const char * namea,IDispatch * disp)668 static void _elem_detach_event(unsigned line, IUnknown *unk, const char *namea, IDispatch *disp)
669 {
670 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
671 BSTR name;
672 HRESULT hres;
673
674 name = a2bstr(namea);
675 hres = IHTMLElement2_detachEvent(elem, name, disp);
676 IHTMLElement2_Release(elem);
677 SysFreeString(name);
678 ok_(__FILE__,line)(hres == S_OK, "detachEvent failed: %08x\n", hres);
679 }
680
681 #define doc_attach_event(a,b,c) _doc_attach_event(__LINE__,a,b,c)
_doc_attach_event(unsigned line,IHTMLDocument2 * doc,const char * namea,IDispatch * disp)682 static void _doc_attach_event(unsigned line, IHTMLDocument2 *doc, const char *namea, IDispatch *disp)
683 {
684 IHTMLDocument3 *doc3 = _get_doc3_iface(line, (IUnknown*)doc);
685 VARIANT_BOOL res;
686 BSTR name;
687 HRESULT hres;
688
689 name = a2bstr(namea);
690 hres = IHTMLDocument3_attachEvent(doc3, name, disp, &res);
691 IHTMLDocument3_Release(doc3);
692 SysFreeString(name);
693 ok_(__FILE__,line)(hres == S_OK, "attachEvent failed: %08x\n", hres);
694 ok_(__FILE__,line)(res == VARIANT_TRUE, "attachEvent returned %x\n", res);
695 }
696
697 #define doc_detach_event(a,b,c) _doc_detach_event(__LINE__,a,b,c)
_doc_detach_event(unsigned line,IHTMLDocument2 * doc,const char * namea,IDispatch * disp)698 static void _doc_detach_event(unsigned line, IHTMLDocument2 *doc, const char *namea, IDispatch *disp)
699 {
700 IHTMLDocument3 *doc3 = _get_doc3_iface(line, (IUnknown*)doc);
701 BSTR name;
702 HRESULT hres;
703
704 name = a2bstr(namea);
705 hres = IHTMLDocument3_detachEvent(doc3, name, disp);
706 IHTMLDocument3_Release(doc3);
707 SysFreeString(name);
708 ok_(__FILE__,line)(hres == S_OK, "detachEvent failed: %08x\n", hres);
709 }
710
DispatchEx_QueryInterface(IDispatchEx * iface,REFIID riid,void ** ppv)711 static HRESULT WINAPI DispatchEx_QueryInterface(IDispatchEx *iface, REFIID riid, void **ppv)
712 {
713 *ppv = NULL;
714
715 if(IsEqualGUID(riid, &IID_IUnknown)
716 || IsEqualGUID(riid, &IID_IDispatch)
717 || IsEqualGUID(riid, &IID_IDispatchEx))
718 *ppv = iface;
719 else {
720 ok(0, "unexpected riid %s\n", wine_dbgstr_guid(riid));
721 return E_NOINTERFACE;
722 }
723
724 return S_OK;
725 }
726
Dispatch_QueryInterface(IDispatchEx * iface,REFIID riid,void ** ppv)727 static HRESULT WINAPI Dispatch_QueryInterface(IDispatchEx *iface, REFIID riid, void **ppv)
728 {
729 *ppv = NULL;
730
731 if(IsEqualGUID(riid, &IID_IUnknown)
732 || IsEqualGUID(riid, &IID_IDispatch)) {
733 *ppv = iface;
734 }else if(IsEqualGUID(riid, &IID_IDispatchEx)) {
735 return E_NOINTERFACE;
736 }else {
737 ok(0, "unexpected riid %s\n", wine_dbgstr_guid(riid));
738 return E_NOINTERFACE;
739 }
740
741 return S_OK;
742 }
743
DispatchEx_AddRef(IDispatchEx * iface)744 static ULONG WINAPI DispatchEx_AddRef(IDispatchEx *iface)
745 {
746 return 2;
747 }
748
DispatchEx_Release(IDispatchEx * iface)749 static ULONG WINAPI DispatchEx_Release(IDispatchEx *iface)
750 {
751 return 1;
752 }
753
DispatchEx_GetTypeInfoCount(IDispatchEx * iface,UINT * pctinfo)754 static HRESULT WINAPI DispatchEx_GetTypeInfoCount(IDispatchEx *iface, UINT *pctinfo)
755 {
756 ok(0, "unexpected call\n");
757 return E_NOTIMPL;
758 }
759
DispatchEx_GetTypeInfo(IDispatchEx * iface,UINT iTInfo,LCID lcid,ITypeInfo ** ppTInfo)760 static HRESULT WINAPI DispatchEx_GetTypeInfo(IDispatchEx *iface, UINT iTInfo,
761 LCID lcid, ITypeInfo **ppTInfo)
762 {
763 ok(0, "unexpected call\n");
764 return E_NOTIMPL;
765 }
766
DispatchEx_GetIDsOfNames(IDispatchEx * iface,REFIID riid,LPOLESTR * rgszNames,UINT cNames,LCID lcid,DISPID * rgDispId)767 static HRESULT WINAPI DispatchEx_GetIDsOfNames(IDispatchEx *iface, REFIID riid,
768 LPOLESTR *rgszNames, UINT cNames,
769 LCID lcid, DISPID *rgDispId)
770 {
771 ok(0, "unexpected call\n");
772 return E_NOTIMPL;
773 }
774
DispatchEx_Invoke(IDispatchEx * iface,DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS * pDispParams,VARIANT * pVarResult,EXCEPINFO * pExcepInfo,UINT * puArgErr)775 static HRESULT WINAPI DispatchEx_Invoke(IDispatchEx *iface, DISPID dispIdMember,
776 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
777 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
778 {
779 ok(0, "unexpected call\n");
780 return E_NOTIMPL;
781 }
782
DispatchEx_GetDispID(IDispatchEx * iface,BSTR bstrName,DWORD grfdex,DISPID * pid)783 static HRESULT WINAPI DispatchEx_GetDispID(IDispatchEx *iface, BSTR bstrName, DWORD grfdex, DISPID *pid)
784 {
785 ok(0, "unexpected call\n");
786 return E_NOTIMPL;
787 }
788
DispatchEx_InvokeEx(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)789 static HRESULT WINAPI DispatchEx_InvokeEx(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
790 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
791 {
792 ok(0, "unexpected call\n");
793 return E_NOTIMPL;
794 }
795
DispatchEx_DeleteMemberByName(IDispatchEx * iface,BSTR bstrName,DWORD grfdex)796 static HRESULT WINAPI DispatchEx_DeleteMemberByName(IDispatchEx *iface, BSTR bstrName, DWORD grfdex)
797 {
798 ok(0, "unexpected call %s %x\n", wine_dbgstr_w(bstrName), grfdex);
799 return E_NOTIMPL;
800 }
801
DispatchEx_DeleteMemberByDispID(IDispatchEx * iface,DISPID id)802 static HRESULT WINAPI DispatchEx_DeleteMemberByDispID(IDispatchEx *iface, DISPID id)
803 {
804 ok(0, "unexpected call\n");
805 return E_NOTIMPL;
806 }
807
DispatchEx_GetMemberProperties(IDispatchEx * iface,DISPID id,DWORD grfdexFetch,DWORD * pgrfdex)808 static HRESULT WINAPI DispatchEx_GetMemberProperties(IDispatchEx *iface, DISPID id, DWORD grfdexFetch, DWORD *pgrfdex)
809 {
810 ok(0, "unexpected call\n");
811 return E_NOTIMPL;
812 }
813
DispatchEx_GetMemberName(IDispatchEx * iface,DISPID id,BSTR * pbstrName)814 static HRESULT WINAPI DispatchEx_GetMemberName(IDispatchEx *iface, DISPID id, BSTR *pbstrName)
815 {
816 ok(0, "unexpected call\n");
817 return E_NOTIMPL;
818 }
819
DispatchEx_GetNextDispID(IDispatchEx * iface,DWORD grfdex,DISPID id,DISPID * pid)820 static HRESULT WINAPI DispatchEx_GetNextDispID(IDispatchEx *iface, DWORD grfdex, DISPID id, DISPID *pid)
821 {
822 ok(0, "unexpected call\n");
823 return E_NOTIMPL;
824 }
825
DispatchEx_GetNameSpaceParent(IDispatchEx * iface,IUnknown ** ppunk)826 static HRESULT WINAPI DispatchEx_GetNameSpaceParent(IDispatchEx *iface, IUnknown **ppunk)
827 {
828 ok(0, "unexpected call\n");
829 return E_NOTIMPL;
830 }
831
832 #define EVENT_HANDLER_FUNC_OBJ(event) \
833 static IDispatchExVtbl event ## FuncVtbl = { \
834 DispatchEx_QueryInterface, \
835 DispatchEx_AddRef, \
836 DispatchEx_Release, \
837 DispatchEx_GetTypeInfoCount, \
838 DispatchEx_GetTypeInfo, \
839 DispatchEx_GetIDsOfNames, \
840 DispatchEx_Invoke, \
841 DispatchEx_GetDispID, \
842 event, \
843 DispatchEx_DeleteMemberByName, \
844 DispatchEx_DeleteMemberByDispID, \
845 DispatchEx_GetMemberProperties, \
846 DispatchEx_GetMemberName, \
847 DispatchEx_GetNextDispID, \
848 DispatchEx_GetNameSpaceParent \
849 }; \
850 static IDispatchEx event ## _obj = { &event ## FuncVtbl };
851
document_onclick(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)852 static HRESULT WINAPI document_onclick(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
853 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
854 {
855 IHTMLDocument3 *doc3;
856 CHECK_EXPECT(document_onclick);
857 test_event_args(NULL, id, wFlags, pdp, pvarRes, pei, pspCaller);
858 doc3 = get_doc3_iface((IUnknown*)V_DISPATCH(pdp->rgvarg));
859 IHTMLDocument3_Release(doc3);
860 test_event_src("DIV");
861 test_event_obj("click", &no_xy);
862 return S_OK;
863 }
864
865 EVENT_HANDLER_FUNC_OBJ(document_onclick);
866
div_onclick(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)867 static HRESULT WINAPI div_onclick(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
868 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
869 {
870 CHECK_EXPECT(div_onclick);
871 test_event_args(NULL, id, wFlags, pdp, pvarRes, pei, pspCaller);
872 test_event_src("DIV");
873 return S_OK;
874 }
875
876 EVENT_HANDLER_FUNC_OBJ(div_onclick);
877
div_onclick_attached(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)878 static HRESULT WINAPI div_onclick_attached(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
879 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
880 {
881 CHECK_EXPECT(div_onclick_attached);
882
883 test_attached_event_args(id, wFlags, pdp, pvarRes, pei);
884 test_event_src("DIV");
885 return S_OK;
886 }
887
888 EVENT_HANDLER_FUNC_OBJ(div_onclick_attached);
889
doc_onclick_attached(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)890 static HRESULT WINAPI doc_onclick_attached(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
891 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
892 {
893 CHECK_EXPECT(doc_onclick_attached);
894
895 test_attached_event_args(id, wFlags, pdp, pvarRes, pei);
896 test_event_src("DIV");
897 return S_OK;
898 }
899
900 EVENT_HANDLER_FUNC_OBJ(doc_onclick_attached);
901
body_onclick(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)902 static HRESULT WINAPI body_onclick(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
903 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
904 {
905 CHECK_EXPECT(body_onclick);
906 test_event_args(&DIID_DispHTMLBody, id, wFlags, pdp, pvarRes, pei, pspCaller);
907 test_event_src("DIV");
908 return S_OK;
909 }
910
911 EVENT_HANDLER_FUNC_OBJ(body_onclick);
912
img_onload(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)913 static HRESULT WINAPI img_onload(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
914 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
915 {
916 CHECK_EXPECT(img_onload);
917 test_event_args(&DIID_DispHTMLImg, id, wFlags, pdp, pvarRes, pei, pspCaller);
918 test_event_src("IMG");
919 return S_OK;
920 }
921
922 EVENT_HANDLER_FUNC_OBJ(img_onload);
923
img_onerror(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)924 static HRESULT WINAPI img_onerror(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
925 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
926 {
927 CHECK_EXPECT(img_onerror);
928 test_event_args(&DIID_DispHTMLImg, id, wFlags, pdp, pvarRes, pei, pspCaller);
929 test_event_src("IMG");
930 return S_OK;
931 }
932
933 EVENT_HANDLER_FUNC_OBJ(img_onerror);
934
input_onfocus(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)935 static HRESULT WINAPI input_onfocus(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
936 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
937 {
938 CHECK_EXPECT(input_onfocus);
939 test_event_args(&DIID_DispHTMLInputElement, id, wFlags, pdp, pvarRes, pei, pspCaller);
940 test_event_src("INPUT");
941 return S_OK;
942 }
943
944 EVENT_HANDLER_FUNC_OBJ(input_onfocus);
945
input_onblur(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)946 static HRESULT WINAPI input_onblur(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
947 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
948 {
949 CHECK_EXPECT(input_onblur);
950 test_event_args(&DIID_DispHTMLInputElement, id, wFlags, pdp, pvarRes, pei, pspCaller);
951 test_event_src("INPUT");
952 return S_OK;
953 }
954
955 EVENT_HANDLER_FUNC_OBJ(input_onblur);
956
form_onsubmit(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)957 static HRESULT WINAPI form_onsubmit(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
958 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
959 {
960 CHECK_EXPECT(form_onsubmit);
961 test_event_args(NULL, id, wFlags, pdp, pvarRes, pei, pspCaller);
962 test_event_src("FORM");
963
964 V_VT(pvarRes) = VT_BOOL;
965 V_BOOL(pvarRes) = VARIANT_FALSE;
966 return S_OK;
967 }
968
969 EVENT_HANDLER_FUNC_OBJ(form_onsubmit);
970
form_onclick(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)971 static HRESULT WINAPI form_onclick(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
972 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
973 {
974 CHECK_EXPECT(form_onclick);
975 test_event_args(NULL, id, wFlags, pdp, pvarRes, pei, pspCaller);
976
977 return S_OK;
978 }
979
980 EVENT_HANDLER_FUNC_OBJ(form_onclick);
981
submit_onclick(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)982 static HRESULT WINAPI submit_onclick(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
983 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
984 {
985 CHECK_EXPECT(submit_onclick);
986 test_event_args(NULL, id, wFlags, pdp, pvarRes, pei, pspCaller);
987 test_event_src("INPUT");
988
989 V_VT(pvarRes) = VT_BOOL;
990 V_BOOL(pvarRes) = VARIANT_FALSE;
991 return S_OK;
992 }
993
994 EVENT_HANDLER_FUNC_OBJ(submit_onclick);
995
iframe_onload(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)996 static HRESULT WINAPI iframe_onload(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
997 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
998 {
999 CHECK_EXPECT(iframe_onload);
1000 test_event_args(&DIID_DispHTMLIFrame, id, wFlags, pdp, pvarRes, pei, pspCaller);
1001 test_event_src("IFRAME");
1002 return S_OK;
1003 }
1004
1005 EVENT_HANDLER_FUNC_OBJ(iframe_onload);
1006
submit_onclick_attached(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)1007 static HRESULT WINAPI submit_onclick_attached(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1008 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
1009 {
1010 CHECK_EXPECT(submit_onclick_attached);
1011 test_attached_event_args(id, wFlags, pdp, pvarRes, pei);
1012 test_event_src("INPUT");
1013
1014 V_VT(pvarRes) = VT_BOOL;
1015 V_BOOL(pvarRes) = VARIANT_FALSE;
1016 return S_OK;
1017 }
1018
1019 EVENT_HANDLER_FUNC_OBJ(submit_onclick_attached);
1020
submit_onclick_attached_check_cancel(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)1021 static HRESULT WINAPI submit_onclick_attached_check_cancel(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1022 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
1023 {
1024 IHTMLEventObj *event;
1025 HRESULT hres;
1026
1027 CHECK_EXPECT(submit_onclick_attached_check_cancel);
1028 test_attached_event_args(id, wFlags, pdp, pvarRes, pei);
1029 test_event_src("INPUT");
1030
1031 event = NULL;
1032 hres = IHTMLWindow2_get_event(window, &event);
1033 ok(hres == S_OK, "get_event failed: %08x\n", hres);
1034 ok(event != NULL, "event == NULL\n");
1035
1036 test_event_cancelbubble(event, VARIANT_TRUE);
1037 return S_OK;
1038 }
1039
1040 EVENT_HANDLER_FUNC_OBJ(submit_onclick_attached_check_cancel);
1041
1042 static VARIANT onclick_retval, onclick_event_retval;
1043
submit_onclick_setret(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)1044 static HRESULT WINAPI submit_onclick_setret(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1045 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
1046 {
1047 IHTMLEventObj *event;
1048 VARIANT v;
1049 HRESULT hres;
1050
1051 CHECK_EXPECT(submit_onclick_setret);
1052 test_event_args(NULL, id, wFlags, pdp, pvarRes, pei, pspCaller);
1053 test_event_src("INPUT");
1054
1055 event = NULL;
1056 hres = IHTMLWindow2_get_event(window, &event);
1057 ok(hres == S_OK, "get_event failed: %08x\n", hres);
1058 ok(event != NULL, "event == NULL\n");
1059
1060 V_VT(&v) = VT_ERROR;
1061 hres = IHTMLEventObj_get_returnValue(event, &v);
1062 ok(hres == S_OK, "get_returnValue failed: %08x\n", hres);
1063 ok(V_VT(&v) == VT_EMPTY, "V_VT(returnValue) = %d\n", V_VT(&v));
1064
1065 hres = IHTMLEventObj_put_returnValue(event, onclick_event_retval);
1066 ok(hres == S_OK, "put_returnValue failed: %08x\n", hres);
1067
1068 V_VT(&v) = VT_ERROR;
1069 hres = IHTMLEventObj_get_returnValue(event, &v);
1070 ok(hres == S_OK, "get_returnValue failed: %08x\n", hres);
1071 ok(VarCmp(&v, &onclick_event_retval, 0, 0) == VARCMP_EQ, "unexpected returnValue\n");
1072
1073 IHTMLEventObj_Release(event);
1074 *pvarRes = onclick_retval;
1075 return S_OK;
1076 }
1077
1078 EVENT_HANDLER_FUNC_OBJ(submit_onclick_setret);
1079
submit_onclick_cancel(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)1080 static HRESULT WINAPI submit_onclick_cancel(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1081 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
1082 {
1083 IHTMLEventObj *event;
1084 HRESULT hres;
1085
1086 CHECK_EXPECT(submit_onclick_cancel);
1087 test_event_args(NULL, id, wFlags, pdp, pvarRes, pei, pspCaller);
1088 test_event_src("INPUT");
1089
1090 event = NULL;
1091 hres = IHTMLWindow2_get_event(window, &event);
1092 ok(hres == S_OK, "get_event failed: %08x\n", hres);
1093 ok(event != NULL, "event == NULL\n");
1094
1095 test_event_cancelbubble(event, VARIANT_FALSE);
1096
1097 hres = IHTMLEventObj_put_cancelBubble(event, VARIANT_TRUE);
1098 ok(hres == S_OK, "put_returnValue failed: %08x\n", hres);
1099
1100 test_event_cancelbubble(event, VARIANT_TRUE);
1101 IHTMLEventObj_Release(event);
1102 return S_OK;
1103 }
1104
1105 EVENT_HANDLER_FUNC_OBJ(submit_onclick_cancel);
1106
iframedoc_onreadystatechange(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)1107 static HRESULT WINAPI iframedoc_onreadystatechange(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1108 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
1109 {
1110 IHTMLEventObj *event = NULL;
1111 HRESULT hres;
1112
1113 CHECK_EXPECT2(iframedoc_onreadystatechange);
1114 test_event_args(&DIID_DispHTMLDocument, id, wFlags, pdp, pvarRes, pei, pspCaller);
1115
1116 event = (void*)0xdeadbeef;
1117 hres = IHTMLWindow2_get_event(window, &event);
1118 ok(hres == S_OK, "get_event failed: %08x\n", hres);
1119 ok(!event, "event = %p\n", event);
1120
1121 return S_OK;
1122 }
1123
1124 EVENT_HANDLER_FUNC_OBJ(iframedoc_onreadystatechange);
1125
iframe_onreadystatechange(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)1126 static HRESULT WINAPI iframe_onreadystatechange(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1127 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
1128 {
1129 IHTMLWindow2 *iframe_window;
1130 IHTMLDocument2 *iframe_doc;
1131 IHTMLFrameBase2 *iframe;
1132 IHTMLElement2 *elem2;
1133 IHTMLElement *elem;
1134 VARIANT v;
1135 BSTR str, str2;
1136 HRESULT hres;
1137
1138 test_event_args(&DIID_DispHTMLIFrame, id, wFlags, pdp, pvarRes, pei, pspCaller);
1139 test_event_src("IFRAME");
1140
1141 elem = get_event_src();
1142 elem2 = get_elem2_iface((IUnknown*)elem);
1143 IHTMLElement_Release(elem);
1144
1145 V_VT(&v) = VT_EMPTY;
1146 hres = IHTMLElement2_get_readyState(elem2, &v);
1147 ok(hres == S_OK, "get_readyState failed: %08x\n", hres);
1148 ok(V_VT(&v) == VT_BSTR, "V_VT(readyState) = %d\n", V_VT(&v));
1149
1150 hres = IHTMLElement2_QueryInterface(elem2, &IID_IHTMLFrameBase2, (void**)&iframe);
1151 IHTMLElement2_Release(elem2);
1152 ok(hres == S_OK, "Could not get IHTMLFrameBase2 iface: %08x\n", hres);
1153
1154 str = NULL;
1155 hres = IHTMLFrameBase2_get_readyState(iframe, &str);
1156 ok(hres == S_OK, "get_readyState failed: %08x\n", hres);
1157 ok(str != NULL, "readyState == NULL\n");
1158 ok(!lstrcmpW(str, V_BSTR(&v)), "ready states differ\n");
1159 VariantClear(&v);
1160
1161 hres = IHTMLFrameBase2_get_contentWindow(iframe, &iframe_window);
1162 ok(hres == S_OK, "get_contentDocument failed: %08x\n", hres);
1163
1164 hres = IHTMLWindow2_get_document(iframe_window, &iframe_doc);
1165 IHTMLWindow2_Release(iframe_window);
1166 ok(hres == S_OK, "get_document failed: %08x\n", hres);
1167
1168 hres = IHTMLDocument2_get_readyState(iframe_doc, &str2);
1169 ok(hres == S_OK, "get_document failed: %08x\n", hres);
1170 ok(!lstrcmpW(str, str2), "unexpected document readyState %s\n", wine_dbgstr_w(str2));
1171 SysFreeString(str2);
1172
1173 if(!strcmp_wa(str, "loading")) {
1174 CHECK_EXPECT(iframe_onreadystatechange_loading);
1175
1176 V_VT(&v) = VT_DISPATCH;
1177 V_DISPATCH(&v) = (IDispatch*)&iframedoc_onreadystatechange_obj;
1178 hres = IHTMLDocument2_put_onreadystatechange(iframe_doc, v);
1179 ok(hres == S_OK, "put_onreadystatechange: %08x\n", hres);
1180 }else if(!strcmp_wa(str, "interactive"))
1181 CHECK_EXPECT(iframe_onreadystatechange_interactive);
1182 else if(!strcmp_wa(str, "complete"))
1183 CHECK_EXPECT(iframe_onreadystatechange_complete);
1184 else
1185 ok(0, "unexpected state %s\n", wine_dbgstr_w(str));
1186
1187 SysFreeString(str);
1188 IHTMLDocument2_Release(iframe_doc);
1189 IHTMLFrameBase2_Release(iframe);
1190 return S_OK;
1191 }
1192
1193 EVENT_HANDLER_FUNC_OBJ(iframe_onreadystatechange);
1194
nocall(IDispatchEx * iface,DISPID id,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,IServiceProvider * pspCaller)1195 static HRESULT WINAPI nocall(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1196 VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
1197 {
1198 ok(0, "unexpected call\n");
1199 return S_OK;
1200 }
1201
1202 EVENT_HANDLER_FUNC_OBJ(nocall);
1203
1204 #define CONNECTION_POINT_OBJ(cpname, diid) \
1205 static HRESULT WINAPI cpname ## _QueryInterface(IDispatchEx *iface, REFIID riid, void **ppv) \
1206 { \
1207 *ppv = NULL; \
1208 if(IsEqualGUID(riid, &IID_IUnknown) \
1209 || IsEqualGUID(riid, &IID_IDispatch) \
1210 || IsEqualGUID(riid, &diid)) \
1211 *ppv = iface; \
1212 else { \
1213 ok(0, "unexpected riid %s\n", wine_dbgstr_guid(riid)); \
1214 return E_NOINTERFACE; \
1215 } \
1216 return S_OK; \
1217 } \
1218 static IDispatchExVtbl cpname ## Vtbl = { \
1219 cpname ## _QueryInterface, \
1220 DispatchEx_AddRef, \
1221 DispatchEx_Release, \
1222 DispatchEx_GetTypeInfoCount, \
1223 DispatchEx_GetTypeInfo, \
1224 DispatchEx_GetIDsOfNames, \
1225 cpname, \
1226 DispatchEx_GetDispID, \
1227 DispatchEx_InvokeEx, \
1228 DispatchEx_DeleteMemberByName, \
1229 DispatchEx_DeleteMemberByDispID, \
1230 DispatchEx_GetMemberProperties, \
1231 DispatchEx_GetMemberName, \
1232 DispatchEx_GetNextDispID, \
1233 DispatchEx_GetNameSpaceParent \
1234 }; \
1235 static IDispatchEx cpname ## _obj = { &cpname ## Vtbl }
1236
1237 #define test_cp_args(a,b,c,d,e,f) _test_cp_args(__LINE__,a,b,c,d,e,f)
_test_cp_args(unsigned line,REFIID riid,WORD flags,DISPPARAMS * dp,VARIANT * vres,EXCEPINFO * ei,UINT * argerr)1238 static void _test_cp_args(unsigned line, REFIID riid, WORD flags, DISPPARAMS *dp, VARIANT *vres, EXCEPINFO *ei, UINT *argerr)
1239 {
1240 ok_(__FILE__,line)(IsEqualGUID(&IID_NULL, riid), "riid = %s\n", wine_dbgstr_guid(riid));
1241 ok_(__FILE__,line)(flags == DISPATCH_METHOD, "flags = %x\n", flags);
1242 ok_(__FILE__,line)(dp != NULL, "dp == NULL\n");
1243 ok_(__FILE__,line)(!dp->cArgs, "dp->cArgs = %d\n", dp->cArgs);
1244 ok_(__FILE__,line)(!dp->rgvarg, "dp->rgvarg = %p\n", dp->rgvarg);
1245 ok_(__FILE__,line)(!dp->cNamedArgs, "dp->cNamedArgs = %d\n", dp->cNamedArgs);
1246 ok_(__FILE__,line)(!dp->rgdispidNamedArgs, "dp->rgdispidNamedArgs = %p\n", dp->rgdispidNamedArgs);
1247 ok_(__FILE__,line)(vres != NULL, "vres == NULL\n");
1248 ok_(__FILE__,line)(V_VT(vres) == VT_EMPTY, "V_VT(vres) = %d\n", V_VT(vres));
1249 ok_(__FILE__,line)(ei != NULL, "ei == NULL\n");
1250 ok_(__FILE__,line)(argerr != NULL, "argerr == NULL\n");
1251 }
1252
1253 #define test_cp_eventarg(a,b,c,d,e,f) _test_cp_eventarg(__LINE__,a,b,c,d,e,f)
_test_cp_eventarg(unsigned line,REFIID riid,WORD flags,DISPPARAMS * dp,VARIANT * vres,EXCEPINFO * ei,UINT * argerr)1254 static void _test_cp_eventarg(unsigned line, REFIID riid, WORD flags, DISPPARAMS *dp, VARIANT *vres, EXCEPINFO *ei, UINT *argerr)
1255 {
1256 IHTMLEventObj *event;
1257
1258 ok_(__FILE__,line)(IsEqualGUID(&IID_NULL, riid), "riid = %s\n", wine_dbgstr_guid(riid));
1259 ok_(__FILE__,line)(flags == DISPATCH_METHOD, "flags = %x\n", flags);
1260 ok_(__FILE__,line)(dp != NULL, "dp == NULL\n");
1261 ok_(__FILE__,line)(dp->cArgs == 1, "dp->cArgs = %d\n", dp->cArgs);
1262 ok_(__FILE__,line)(dp->rgvarg != NULL, "dp->rgvarg = %p\n", dp->rgvarg);
1263 ok_(__FILE__,line)(!dp->cNamedArgs, "dp->cNamedArgs = %d\n", dp->cNamedArgs);
1264 ok_(__FILE__,line)(!dp->rgdispidNamedArgs, "dp->rgdispidNamedArgs = %p\n", dp->rgdispidNamedArgs);
1265 ok_(__FILE__,line)(vres != NULL, "vres == NULL\n");
1266 ok_(__FILE__,line)(V_VT(vres) == VT_EMPTY, "V_VT(vres) = %d\n", V_VT(vres));
1267 ok_(__FILE__,line)(ei != NULL, "ei == NULL\n");
1268 ok_(__FILE__,line)(argerr != NULL, "argerr == NULL\n");
1269
1270 ok(V_VT(dp->rgvarg) == VT_DISPATCH, "V_VT(dp->rgvarg) = %d\n", V_VT(dp->rgvarg));
1271 ok(V_DISPATCH(dp->rgvarg) != NULL, "V_DISPATCH(dp->rgvarg) = %p\n", V_DISPATCH(dp->rgvarg));
1272
1273 event = _get_event_obj(line);
1274 ok(iface_cmp((IUnknown*)event, (IUnknown*)V_DISPATCH(dp->rgvarg)), "event != arg0\n");
1275 IHTMLEventObj_Release(event);
1276 }
1277
doccp(IDispatchEx * iface,DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pVarResult,EXCEPINFO * pei,UINT * puArgErr)1278 static HRESULT WINAPI doccp(IDispatchEx *iface, DISPID dispIdMember,
1279 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1280 VARIANT *pVarResult, EXCEPINFO *pei, UINT *puArgErr)
1281 {
1282 switch(dispIdMember) {
1283 case DISPID_HTMLDOCUMENTEVENTS_ONCLICK:
1284 CHECK_EXPECT(doccp_onclick);
1285 test_cp_args(riid, wFlags, pdp, pVarResult, pei, puArgErr);
1286 break;
1287 default:
1288 ok(0, "unexpected call %d\n", dispIdMember);
1289 return E_NOTIMPL;
1290 }
1291
1292 return S_OK;
1293 }
1294
1295 CONNECTION_POINT_OBJ(doccp, DIID_HTMLDocumentEvents);
1296
doccp_onclick_cancel(IDispatchEx * iface,DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pVarResult,EXCEPINFO * pei,UINT * puArgErr)1297 static HRESULT WINAPI doccp_onclick_cancel(IDispatchEx *iface, DISPID dispIdMember,
1298 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pdp, VARIANT *pVarResult, EXCEPINFO *pei, UINT *puArgErr)
1299 {
1300 switch(dispIdMember) {
1301 case DISPID_HTMLDOCUMENTEVENTS_ONCLICK:
1302 CHECK_EXPECT(doccp_onclick_cancel);
1303 test_cp_args(riid, wFlags, pdp, pVarResult, pei, puArgErr);
1304 V_VT(pVarResult) = VT_BOOL;
1305 V_BOOL(pVarResult) = VARIANT_FALSE;
1306 break;
1307 default:
1308 ok(0, "unexpected call %d\n", dispIdMember);
1309 return E_NOTIMPL;
1310 }
1311
1312 return S_OK;
1313 }
1314
1315 CONNECTION_POINT_OBJ(doccp_onclick_cancel, DIID_HTMLDocumentEvents);
1316
elem2_cp(IDispatchEx * iface,DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pVarResult,EXCEPINFO * pei,UINT * puArgErr)1317 static HRESULT WINAPI elem2_cp(IDispatchEx *iface, DISPID dispIdMember, REFIID riid, LCID lcid,
1318 WORD wFlags, DISPPARAMS *pdp, VARIANT *pVarResult, EXCEPINFO *pei, UINT *puArgErr)
1319 {
1320 switch(dispIdMember) {
1321 case DISPID_HTMLDOCUMENTEVENTS_ONCLICK:
1322 CHECK_EXPECT(elem2_cp_onclick);
1323 test_cp_eventarg(riid, wFlags, pdp, pVarResult, pei, puArgErr);
1324 break;
1325 default:
1326 ok(0, "unexpected call %d\n", dispIdMember);
1327 return E_NOTIMPL;
1328 }
1329
1330 return S_OK;
1331 }
1332
1333 CONNECTION_POINT_OBJ(elem2_cp, DIID_HTMLElementEvents2);
1334
timeoutFunc_Invoke(IDispatchEx * iface,DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS * pDispParams,VARIANT * pVarResult,EXCEPINFO * pExcepInfo,UINT * puArgErr)1335 static HRESULT WINAPI timeoutFunc_Invoke(IDispatchEx *iface, DISPID dispIdMember,
1336 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
1337 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
1338 {
1339 CHECK_EXPECT(timeout);
1340
1341 ok(dispIdMember == DISPID_VALUE, "dispIdMember = %d\n", dispIdMember);
1342 ok(IsEqualGUID(&IID_NULL, riid), "riid = %s\n", wine_dbgstr_guid(riid));
1343 ok(wFlags == DISPATCH_METHOD, "wFlags = %x\n", wFlags);
1344 ok(!lcid, "lcid = %x\n", lcid);
1345 ok(pDispParams != NULL, "pDispParams == NULL\n");
1346 ok(!pDispParams->cArgs, "pdp->cArgs = %d\n", pDispParams->cArgs);
1347 ok(!pDispParams->cNamedArgs, "pdp->cNamedArgs = %d\n", pDispParams->cNamedArgs);
1348 ok(!pDispParams->rgdispidNamedArgs, "pdp->rgdispidNamedArgs = %p\n", pDispParams->rgdispidNamedArgs);
1349 ok(!pDispParams->rgvarg, "rgvarg = %p\n", pDispParams->rgvarg);
1350 ok(pVarResult != NULL, "pVarResult = NULL\n");
1351 ok(pExcepInfo != NULL, "pExcepInfo = NULL\n");
1352 ok(!puArgErr, "puArgErr = %p\n", puArgErr);
1353 ok(V_VT(pVarResult) == VT_EMPTY, "V_VT(pVarResult) = %d\n", V_VT(pVarResult));
1354
1355 return S_OK;
1356 }
1357
1358 static const IDispatchExVtbl timeoutFuncVtbl = {
1359 DispatchEx_QueryInterface,
1360 DispatchEx_AddRef,
1361 DispatchEx_Release,
1362 DispatchEx_GetTypeInfoCount,
1363 DispatchEx_GetTypeInfo,
1364 DispatchEx_GetIDsOfNames,
1365 timeoutFunc_Invoke,
1366 DispatchEx_GetDispID,
1367 DispatchEx_InvokeEx,
1368 DispatchEx_DeleteMemberByName,
1369 DispatchEx_DeleteMemberByDispID,
1370 DispatchEx_GetMemberProperties,
1371 DispatchEx_GetMemberName,
1372 DispatchEx_GetNextDispID,
1373 DispatchEx_GetNameSpaceParent
1374 };
1375
1376 static IDispatchEx timeoutFunc = { &timeoutFuncVtbl };
1377
div_onclick_disp_Invoke(IDispatchEx * iface,DISPID id,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS * pdp,VARIANT * pvarRes,EXCEPINFO * pei,UINT * puArgErr)1378 static HRESULT WINAPI div_onclick_disp_Invoke(IDispatchEx *iface, DISPID id,
1379 REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1380 VARIANT *pvarRes, EXCEPINFO *pei, UINT *puArgErr)
1381 {
1382 CHECK_EXPECT(div_onclick_disp);
1383
1384 test_attached_event_args(id, wFlags, pdp, pvarRes, pei);
1385
1386 ok(IsEqualGUID(&IID_NULL, riid), "riid = %s\n", wine_dbgstr_guid(riid));
1387 ok(!puArgErr, "puArgErr = %p\n", puArgErr);
1388
1389 return S_OK;
1390 }
1391
1392 static const IDispatchExVtbl div_onclick_dispVtbl = {
1393 Dispatch_QueryInterface,
1394 DispatchEx_AddRef,
1395 DispatchEx_Release,
1396 DispatchEx_GetTypeInfoCount,
1397 DispatchEx_GetTypeInfo,
1398 DispatchEx_GetIDsOfNames,
1399 div_onclick_disp_Invoke,
1400 };
1401
1402 static IDispatchEx div_onclick_disp = { &div_onclick_dispVtbl };
1403
pump_msgs(BOOL * b)1404 static void pump_msgs(BOOL *b)
1405 {
1406 MSG msg;
1407
1408 if(b) {
1409 while(!*b && GetMessageW(&msg, NULL, 0, 0)) {
1410 TranslateMessage(&msg);
1411 DispatchMessageW(&msg);
1412 }
1413 }else {
1414 while(PeekMessageW(&msg, NULL, 0, 0, PM_REMOVE)) {
1415 TranslateMessage(&msg);
1416 DispatchMessageW(&msg);
1417 }
1418 }
1419 }
1420
get_cp(IUnknown * unk,REFIID riid)1421 static IConnectionPoint *get_cp(IUnknown *unk, REFIID riid)
1422 {
1423 IConnectionPointContainer *cp_container;
1424 IConnectionPoint *cp;
1425 HRESULT hres;
1426
1427 hres = IUnknown_QueryInterface(unk, &IID_IConnectionPointContainer, (void**)&cp_container);
1428 ok(hres == S_OK, "Could not get IConnectionPointContainer: %08x\n", hres);
1429
1430 hres = IConnectionPointContainer_FindConnectionPoint(cp_container, riid, &cp);
1431 IConnectionPointContainer_Release(cp_container);
1432 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
1433
1434 return cp;
1435 }
1436
register_cp(IUnknown * unk,REFIID riid,IUnknown * sink)1437 static DWORD register_cp(IUnknown *unk, REFIID riid, IUnknown *sink)
1438 {
1439 IConnectionPoint *cp;
1440 DWORD cookie;
1441 HRESULT hres;
1442
1443 cp = get_cp(unk, riid);
1444 hres = IConnectionPoint_Advise(cp, sink, &cookie);
1445 IConnectionPoint_Release(cp);
1446 ok(hres == S_OK, "Advise failed: %08x\n", hres);
1447
1448 return cookie;
1449 }
1450
unregister_cp(IUnknown * unk,REFIID riid,DWORD cookie)1451 static void unregister_cp(IUnknown *unk, REFIID riid, DWORD cookie)
1452 {
1453 IConnectionPoint *cp;
1454 HRESULT hres;
1455
1456 cp = get_cp(unk, riid);
1457 hres = IConnectionPoint_Unadvise(cp, cookie);
1458 IConnectionPoint_Release(cp);
1459 ok(hres == S_OK, "Unadvise failed: %08x\n", hres);
1460 }
1461
EventDispatch_QueryInterface(IDispatch * iface,REFIID riid,void ** ppv)1462 static HRESULT WINAPI EventDispatch_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
1463 {
1464 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IDispatch, riid)) {
1465 *ppv = iface;
1466 return S_OK;
1467 }
1468
1469 ok(0, "Unexpected call\n");
1470 return E_NOINTERFACE;
1471 }
1472
EventDispatch_AddRef(IDispatch * iface)1473 static DWORD WINAPI EventDispatch_AddRef(IDispatch *iface)
1474 {
1475 return 2;
1476 }
1477
EventDispatch_Release(IDispatch * iface)1478 static DWORD WINAPI EventDispatch_Release(IDispatch *iface)
1479 {
1480 return 1;
1481 }
1482
EventDispatch_GetTypeInfoCount(IDispatch * iface,UINT * pctinfo)1483 static HRESULT WINAPI EventDispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
1484 {
1485 ok(0, "Unexpected call\n");
1486 return E_NOTIMPL;
1487 }
1488
EventDispatch_GetTypeInfo(IDispatch * iface,UINT iTInfo,LCID lcid,ITypeInfo ** ppTInfo)1489 static HRESULT WINAPI EventDispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid, ITypeInfo **ppTInfo)
1490 {
1491 ok(0, "Unexpected call\n");
1492 return E_NOTIMPL;
1493 }
1494
EventDispatch_GetIDsOfNames(IDispatch * iface,REFIID riid,LPOLESTR * rgszNames,UINT cNames,LCID lcid,DISPID * rgDispId)1495 static HRESULT WINAPI EventDispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
1496 UINT cNames, LCID lcid, DISPID *rgDispId)
1497 {
1498 ok(0, "Unexpected call\n");
1499 return E_NOTIMPL;
1500 }
1501
EventDispatch_Invoke(IDispatch * iface,DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS * pDispParams,VARIANT * pVarResult,EXCEPINFO * pExcepInfo,UINT * puArgErr)1502 static HRESULT WINAPI EventDispatch_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
1503 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
1504 EXCEPINFO *pExcepInfo, UINT *puArgErr)
1505 {
1506 ok(IsEqualGUID(&IID_NULL, riid), "riid = %s\n", wine_dbgstr_guid(riid));
1507 ok(pDispParams != NULL, "pDispParams == NULL\n");
1508 ok(pExcepInfo != NULL, "pExcepInfo == NULL\n");
1509 ok(puArgErr != NULL, "puArgErr == NULL\n");
1510 ok(V_VT(pVarResult) == 0, "V_VT(pVarResult) = %d\n", V_VT(pVarResult));
1511 ok(wFlags == DISPATCH_METHOD, "wFlags = %d\n", wFlags);
1512
1513 switch(dispIdMember) {
1514 case DISPID_HTMLDOCUMENTEVENTS_ONCLICK:
1515 CHECK_EXPECT2(invoke_onclick);
1516 break;
1517 case DISPID_HTMLDOCUMENTEVENTS2_ONPROPERTYCHANGE:
1518 case DISPID_HTMLDOCUMENTEVENTS2_ONREADYSTATECHANGE:
1519 case 1027:
1520 case 1034:
1521 case 1037:
1522 case 1044:
1523 case 1045:
1524 case 1047:
1525 case 1048:
1526 case 1049:
1527 break; /* TODO */
1528 default:
1529 ok(0, "Unexpected call: %d\n", dispIdMember);
1530 }
1531
1532 return S_OK;
1533 }
1534
1535 static const IDispatchVtbl EventDispatchVtbl = {
1536 EventDispatch_QueryInterface,
1537 EventDispatch_AddRef,
1538 EventDispatch_Release,
1539 EventDispatch_GetTypeInfoCount,
1540 EventDispatch_GetTypeInfo,
1541 EventDispatch_GetIDsOfNames,
1542 EventDispatch_Invoke
1543 };
1544
1545 static IDispatch EventDispatch = { &EventDispatchVtbl };
1546
test_onclick(IHTMLDocument2 * doc)1547 static void test_onclick(IHTMLDocument2 *doc)
1548 {
1549 DWORD cp_cookie, elem2_cp_cookie;
1550 IHTMLElement *div, *body;
1551 VARIANT v;
1552 HRESULT hres;
1553
1554 register_cp((IUnknown*)doc, &IID_IDispatch, (IUnknown*)&EventDispatch);
1555
1556 div = get_elem_id(doc, "clickdiv");
1557
1558 elem_attach_event((IUnknown*)div, "abcde", (IDispatch*)&nocall_obj);
1559 elem_attach_event((IUnknown*)div, "onclick", (IDispatch*)&div_onclick_attached_obj);
1560
1561 V_VT(&v) = VT_EMPTY;
1562 hres = IHTMLElement_get_onclick(div, &v);
1563 ok(hres == S_OK, "get_onclick failed: %08x\n", hres);
1564 ok(V_VT(&v) == VT_NULL, "V_VT(onclick) = %d\n", V_VT(&v));
1565
1566 V_VT(&v) = VT_EMPTY;
1567 hres = IHTMLElement_put_onclick(div, v);
1568 ok(hres == E_NOTIMPL, "put_onclick failed: %08x\n", hres);
1569
1570 V_VT(&v) = VT_BSTR;
1571 V_BSTR(&v) = a2bstr("function();");
1572 hres = IHTMLElement_put_onclick(div, v);
1573 ok(hres == S_OK, "put_onclick failed: %08x\n", hres);
1574
1575 if(hres == S_OK) {
1576 V_VT(&v) = VT_EMPTY;
1577 hres = IHTMLElement_get_onclick(div, &v);
1578 ok(hres == S_OK, "get_onclick failed: %08x\n", hres);
1579 ok(V_VT(&v) == VT_BSTR, "V_VT(onclick) = %d\n", V_VT(&v));
1580 ok(!strcmp_wa(V_BSTR(&v), "function();"), "V_BSTR(onclick) = %s\n", wine_dbgstr_w(V_BSTR(&v)));
1581 }
1582 VariantClear(&v);
1583
1584 V_VT(&v) = VT_DISPATCH;
1585 V_DISPATCH(&v) = (IDispatch*)&div_onclick_obj;
1586 hres = IHTMLElement_put_onclick(div, v);
1587 ok(hres == S_OK, "put_onclick failed: %08x\n", hres);
1588
1589 V_VT(&v) = VT_NULL;
1590 hres = IHTMLElement_put_ondblclick(div, v);
1591 ok(hres == S_OK, "put_ondblclick failed: %08x\n", hres);
1592
1593 V_VT(&v) = VT_EMPTY;
1594 hres = IHTMLElement_get_onclick(div, &v);
1595 ok(hres == S_OK, "get_onclick failed: %08x\n", hres);
1596 ok(V_VT(&v) == VT_DISPATCH, "V_VT(onclick) = %d\n", V_VT(&v));
1597 ok(V_DISPATCH(&v) == (IDispatch*)&div_onclick_obj, "V_DISPATCH(onclick) != onclickFunc\n");
1598 VariantClear(&v);
1599
1600 V_VT(&v) = VT_EMPTY;
1601 hres = IHTMLDocument2_get_onclick(doc, &v);
1602 ok(hres == S_OK, "get_onclick failed: %08x\n", hres);
1603 ok(V_VT(&v) == VT_NULL, "V_VT(onclick) = %d\n", V_VT(&v));
1604
1605 V_VT(&v) = VT_DISPATCH;
1606 V_DISPATCH(&v) = (IDispatch*)&document_onclick_obj;
1607 hres = IHTMLDocument2_put_onclick(doc, v);
1608 ok(hres == S_OK, "put_onclick failed: %08x\n", hres);
1609
1610 V_VT(&v) = VT_EMPTY;
1611 hres = IHTMLDocument2_get_onclick(doc, &v);
1612 ok(hres == S_OK, "get_onclick failed: %08x\n", hres);
1613 ok(V_VT(&v) == VT_DISPATCH, "V_VT(onclick) = %d\n", V_VT(&v));
1614 ok(V_DISPATCH(&v) == (IDispatch*)&document_onclick_obj, "V_DISPATCH(onclick) != onclickFunc\n");
1615 VariantClear(&v);
1616
1617 body = doc_get_body(doc);
1618
1619 V_VT(&v) = VT_DISPATCH;
1620 V_DISPATCH(&v) = (IDispatch*)&body_onclick_obj;
1621 hres = IHTMLElement_put_onclick(body, v);
1622 ok(hres == S_OK, "put_onclick failed: %08x\n", hres);
1623
1624 if(winetest_interactive) {
1625 SET_EXPECT(div_onclick);
1626 SET_EXPECT(div_onclick_attached);
1627 SET_EXPECT(body_onclick);
1628 SET_EXPECT(document_onclick);
1629 SET_EXPECT(invoke_onclick);
1630 pump_msgs(&called_document_onclick);
1631 CHECK_CALLED(div_onclick);
1632 CHECK_CALLED(div_onclick_attached);
1633 CHECK_CALLED(body_onclick);
1634 CHECK_CALLED(document_onclick);
1635 CHECK_CALLED(invoke_onclick);
1636 }
1637
1638 SET_EXPECT(div_onclick);
1639 SET_EXPECT(div_onclick_attached);
1640 SET_EXPECT(body_onclick);
1641 SET_EXPECT(document_onclick);
1642 SET_EXPECT(invoke_onclick);
1643
1644 hres = IHTMLElement_click(div);
1645 ok(hres == S_OK, "click failed: %08x\n", hres);
1646
1647 CHECK_CALLED(div_onclick);
1648 CHECK_CALLED(div_onclick_attached);
1649 CHECK_CALLED(body_onclick);
1650 CHECK_CALLED(document_onclick);
1651 CHECK_CALLED(invoke_onclick);
1652
1653 SET_EXPECT(div_onclick);
1654 SET_EXPECT(div_onclick_attached);
1655 SET_EXPECT(body_onclick);
1656 SET_EXPECT(document_onclick);
1657 SET_EXPECT(invoke_onclick);
1658
1659 V_VT(&v) = VT_EMPTY;
1660 elem_fire_event((IUnknown*)div, "onclick", &v);
1661
1662 CHECK_CALLED(div_onclick);
1663 CHECK_CALLED(div_onclick_attached);
1664 CHECK_CALLED(body_onclick);
1665 CHECK_CALLED(document_onclick);
1666 CHECK_CALLED(invoke_onclick);
1667
1668 cp_cookie = register_cp((IUnknown*)doc, &DIID_HTMLDocumentEvents, (IUnknown*)&doccp_obj);
1669 elem_attach_event((IUnknown*)div, "onclick", (IDispatch*)&div_onclick_disp);
1670 doc_attach_event(doc, "onclick", (IDispatch*)&doc_onclick_attached_obj);
1671
1672 SET_EXPECT(div_onclick);
1673 SET_EXPECT(div_onclick_disp);
1674 SET_EXPECT(div_onclick_attached);
1675 SET_EXPECT(body_onclick);
1676 SET_EXPECT(document_onclick);
1677 SET_EXPECT(doc_onclick_attached);
1678 SET_EXPECT(doccp_onclick);
1679 SET_EXPECT(invoke_onclick);
1680
1681 hres = IHTMLElement_click(div);
1682 ok(hres == S_OK, "click failed: %08x\n", hres);
1683
1684 CHECK_CALLED(div_onclick);
1685 CHECK_CALLED(div_onclick_disp);
1686 CHECK_CALLED(div_onclick_attached);
1687 CHECK_CALLED(body_onclick);
1688 CHECK_CALLED(document_onclick);
1689 CHECK_CALLED(doc_onclick_attached);
1690 CHECK_CALLED(doccp_onclick);
1691 CHECK_CALLED(invoke_onclick);
1692
1693 elem2_cp_cookie = register_cp((IUnknown*)div, &DIID_HTMLElementEvents2, (IUnknown*)&elem2_cp_obj);
1694
1695 SET_EXPECT(div_onclick);
1696 SET_EXPECT(div_onclick_disp);
1697 SET_EXPECT(div_onclick_attached);
1698 SET_EXPECT(elem2_cp_onclick);
1699 SET_EXPECT(body_onclick);
1700 SET_EXPECT(document_onclick);
1701 SET_EXPECT(doc_onclick_attached);
1702 SET_EXPECT(doccp_onclick);
1703 SET_EXPECT(invoke_onclick);
1704
1705 trace("click >>>\n");
1706 hres = IHTMLElement_click(div);
1707 ok(hres == S_OK, "click failed: %08x\n", hres);
1708 trace("click <<<\n");
1709
1710 CHECK_CALLED(div_onclick);
1711 CHECK_CALLED(div_onclick_disp);
1712 CHECK_CALLED(div_onclick_attached);
1713 CHECK_CALLED(elem2_cp_onclick);
1714 CHECK_CALLED(body_onclick);
1715 CHECK_CALLED(document_onclick);
1716 CHECK_CALLED(doc_onclick_attached);
1717 CHECK_CALLED(doccp_onclick);
1718 CHECK_CALLED(invoke_onclick);
1719
1720 unregister_cp((IUnknown*)div, &DIID_HTMLElementEvents2, elem2_cp_cookie);
1721 unregister_cp((IUnknown*)doc, &DIID_HTMLDocumentEvents, cp_cookie);
1722
1723 V_VT(&v) = VT_NULL;
1724 hres = IHTMLElement_put_onclick(div, v);
1725 ok(hres == S_OK, "put_onclick failed: %08x\n", hres);
1726
1727 hres = IHTMLElement_get_onclick(div, &v);
1728 ok(hres == S_OK, "get_onclick failed: %08x\n", hres);
1729 ok(V_VT(&v) == VT_NULL, "get_onclick returned vt %d\n", V_VT(&v));
1730
1731 elem_detach_event((IUnknown*)div, "onclick", (IDispatch*)&div_onclick_disp);
1732 elem_detach_event((IUnknown*)div, "onclick", (IDispatch*)&div_onclick_disp);
1733 elem_detach_event((IUnknown*)div, "test", (IDispatch*)&div_onclick_disp);
1734 doc_detach_event(doc, "onclick", (IDispatch*)&doc_onclick_attached_obj);
1735
1736 SET_EXPECT(div_onclick_attached);
1737 SET_EXPECT(body_onclick);
1738 SET_EXPECT(document_onclick);
1739 SET_EXPECT(invoke_onclick);
1740
1741 hres = IHTMLElement_click(div);
1742 ok(hres == S_OK, "click failed: %08x\n", hres);
1743
1744 CHECK_CALLED(div_onclick_attached);
1745 CHECK_CALLED(body_onclick);
1746 CHECK_CALLED(document_onclick);
1747 CHECK_CALLED(invoke_onclick);
1748
1749 IHTMLElement_Release(div);
1750 IHTMLElement_Release(body);
1751 }
1752
test_onreadystatechange(IHTMLDocument2 * doc)1753 static void test_onreadystatechange(IHTMLDocument2 *doc)
1754 {
1755 IHTMLFrameBase *iframe;
1756 IHTMLElement2 *elem2;
1757 IHTMLElement *elem;
1758 VARIANT v;
1759 BSTR str;
1760 HRESULT hres;
1761
1762 elem = get_elem_id(doc, "iframe");
1763 elem2 = get_elem2_iface((IUnknown*)elem);
1764 IHTMLElement_Release(elem);
1765
1766 V_VT(&v) = VT_EMPTY;
1767 hres = IHTMLElement2_get_onreadystatechange(elem2, &v);
1768 ok(hres == S_OK, "get_onreadystatechange failed: %08x\n", hres);
1769 ok(V_VT(&v) == VT_NULL, "V_VT(onreadystatechange) = %d\n", V_VT(&v));
1770
1771 V_VT(&v) = VT_DISPATCH;
1772 V_DISPATCH(&v) = (IDispatch*)&iframe_onreadystatechange_obj;
1773 hres = IHTMLElement2_put_onreadystatechange(elem2, v);
1774 ok(hres == S_OK, "put_onreadystatechange failed: %08x\n", hres);
1775
1776 V_VT(&v) = VT_EMPTY;
1777 hres = IHTMLElement2_get_onreadystatechange(elem2, &v);
1778 ok(hres == S_OK, "get_onreadystatechange failed: %08x\n", hres);
1779 ok(V_VT(&v) == VT_DISPATCH, "V_VT(onreadystatechange) = %d\n", V_VT(&v));
1780 ok(V_DISPATCH(&v) == (IDispatch*)&iframe_onreadystatechange_obj, "unexpected onreadystatechange value\n");
1781
1782 hres = IHTMLElement2_QueryInterface(elem2, &IID_IHTMLFrameBase, (void**)&iframe);
1783 IHTMLElement2_Release(elem2);
1784 ok(hres == S_OK, "Could not get IHTMLFrameBase iface: %08x\n", hres);
1785
1786 hres = IHTMLFrameBase_put_src(iframe, (str = a2bstr("about:blank")));
1787 SysFreeString(str);
1788 ok(hres == S_OK, "put_src failed: %08x\n", hres);
1789
1790 SET_EXPECT(iframe_onreadystatechange_loading);
1791 SET_EXPECT(iframedoc_onreadystatechange);
1792 SET_EXPECT(iframe_onreadystatechange_interactive);
1793 SET_EXPECT(iframe_onreadystatechange_complete);
1794 pump_msgs(&called_iframe_onreadystatechange_complete);
1795 CHECK_CALLED(iframe_onreadystatechange_loading);
1796 CHECK_CALLED(iframedoc_onreadystatechange);
1797 CHECK_CALLED(iframe_onreadystatechange_interactive);
1798 CHECK_CALLED(iframe_onreadystatechange_complete);
1799
1800 IHTMLFrameBase_Release(iframe);
1801 }
1802
test_imgload(IHTMLDocument2 * doc)1803 static void test_imgload(IHTMLDocument2 *doc)
1804 {
1805 IHTMLImgElement *img;
1806 IHTMLElement *elem;
1807 VARIANT v;
1808 BSTR str;
1809 HRESULT hres;
1810
1811 elem = get_elem_id(doc, "imgid");
1812 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLImgElement, (void**)&img);
1813 IHTMLElement_Release(elem);
1814 ok(hres == S_OK, "Could not get IHTMLImgElement iface: %08x\n", hres);
1815
1816 V_VT(&v) = VT_EMPTY;
1817 hres = IHTMLImgElement_get_onload(img, &v);
1818 ok(hres == S_OK, "get_onload failed: %08x\n", hres);
1819 ok(V_VT(&v) == VT_NULL, "V_VT(onload) = %d\n", V_VT(&v));
1820
1821 V_VT(&v) = VT_DISPATCH;
1822 V_DISPATCH(&v) = (IDispatch*)&img_onload_obj;
1823 hres = IHTMLImgElement_put_onload(img, v);
1824 ok(hres == S_OK, "put_onload failed: %08x\n", hres);
1825
1826 V_VT(&v) = VT_EMPTY;
1827 hres = IHTMLImgElement_get_onload(img, &v);
1828 ok(hres == S_OK, "get_onload failed: %08x\n", hres);
1829 ok(V_VT(&v) == VT_DISPATCH, "V_VT(onload) = %d\n", V_VT(&v));
1830 ok(V_DISPATCH(&v) == (IDispatch*)&img_onload_obj, "V_DISPATCH(onload) != onloadkFunc\n");
1831 VariantClear(&v);
1832
1833 V_VT(&v) = VT_DISPATCH;
1834 V_DISPATCH(&v) = (IDispatch*)&img_onerror_obj;
1835 hres = IHTMLImgElement_put_onerror(img, v);
1836 ok(hres == S_OK, "put_onerror failed: %08x\n", hres);
1837
1838 V_VT(&v) = VT_EMPTY;
1839 hres = IHTMLImgElement_get_onerror(img, &v);
1840 ok(hres == S_OK, "get_onerror failed: %08x\n", hres);
1841 ok(V_VT(&v) == VT_DISPATCH, "V_VT(onerror) = %d\n", V_VT(&v));
1842 ok(V_DISPATCH(&v) == (IDispatch*)&img_onerror_obj, "V_DISPATCH(onerror) != onerrorFunc\n");
1843 VariantClear(&v);
1844
1845 str = a2bstr("http://test.winehq.org/tests/winehq_snapshot/index_files/winehq_logo_text.png");
1846 hres = IHTMLImgElement_put_src(img, str);
1847 ok(hres == S_OK, "put_src failed: %08x\n", hres);
1848 SysFreeString(str);
1849
1850 SET_EXPECT(img_onload);
1851 pump_msgs(&called_img_onload);
1852 CHECK_CALLED(img_onload);
1853
1854 SET_EXPECT(img_onerror);
1855
1856 str = a2bstr("about:blank");
1857 hres = IHTMLImgElement_put_src(img, str);
1858 ok(hres == S_OK, "put_src failed: %08x\n", hres);
1859 SysFreeString(str);
1860
1861 pump_msgs(&called_img_onerror); /* FIXME: should not be needed */
1862
1863 CHECK_CALLED(img_onerror);
1864
1865 IHTMLImgElement_Release(img);
1866 }
1867
test_focus(IHTMLDocument2 * doc)1868 static void test_focus(IHTMLDocument2 *doc)
1869 {
1870 IHTMLElement2 *elem2;
1871 IHTMLElement *elem;
1872 VARIANT v;
1873 HRESULT hres;
1874
1875 elem = get_elem_id(doc, "inputid");
1876 elem2 = get_elem2_iface((IUnknown*)elem);
1877 IHTMLElement_Release(elem);
1878
1879 V_VT(&v) = VT_EMPTY;
1880 hres = IHTMLElement2_get_onfocus(elem2, &v);
1881 ok(hres == S_OK, "get_onfocus failed: %08x\n", hres);
1882 ok(V_VT(&v) == VT_NULL, "V_VT(onfocus) = %d\n", V_VT(&v));
1883
1884 V_VT(&v) = VT_DISPATCH;
1885 V_DISPATCH(&v) = (IDispatch*)&input_onfocus_obj;
1886 hres = IHTMLElement2_put_onfocus(elem2, v);
1887 ok(hres == S_OK, "put_onfocus failed: %08x\n", hres);
1888
1889 V_VT(&v) = VT_EMPTY;
1890 hres = IHTMLElement2_get_onfocus(elem2, &v);
1891 ok(hres == S_OK, "get_onfocus failed: %08x\n", hres);
1892 ok(V_VT(&v) == VT_DISPATCH, "V_VT(onfocus) = %d\n", V_VT(&v));
1893 ok(V_DISPATCH(&v) == (IDispatch*)&input_onfocus_obj, "V_DISPATCH(onfocus) != onfocusFunc\n");
1894 VariantClear(&v);
1895
1896 if(!winetest_interactive)
1897 ShowWindow(container_hwnd, SW_SHOW);
1898
1899 SetFocus(NULL);
1900 ok(!IsChild(container_hwnd, GetFocus()), "focus belongs to document window\n");
1901
1902 hres = IHTMLWindow2_focus(window);
1903 ok(hres == S_OK, "focus failed: %08x\n", hres);
1904
1905 ok(IsChild(container_hwnd, GetFocus()), "focus does not belong to document window\n");
1906 pump_msgs(NULL);
1907
1908 SET_EXPECT(input_onfocus);
1909 hres = IHTMLElement2_focus(elem2);
1910 pump_msgs(NULL);
1911 CHECK_CALLED(input_onfocus);
1912 ok(hres == S_OK, "focus failed: %08x\n", hres);
1913
1914 V_VT(&v) = VT_DISPATCH;
1915 V_DISPATCH(&v) = (IDispatch*)&input_onblur_obj;
1916 hres = IHTMLElement2_put_onblur(elem2, v);
1917 ok(hres == S_OK, "put_onblur failed: %08x\n", hres);
1918
1919 SET_EXPECT(input_onblur);
1920 hres = IHTMLElement2_blur(elem2);
1921 pump_msgs(NULL);
1922 CHECK_CALLED(input_onblur);
1923 ok(hres == S_OK, "blur failed: %08x\n", hres);
1924
1925 if(!winetest_interactive)
1926 ShowWindow(container_hwnd, SW_HIDE);
1927
1928 IHTMLElement2_Release(elem2);
1929 }
1930
test_submit(IHTMLDocument2 * doc)1931 static void test_submit(IHTMLDocument2 *doc)
1932 {
1933 IHTMLElement *elem, *submit;
1934 IHTMLFormElement *form;
1935 VARIANT v;
1936 DWORD cp_cookie;
1937 HRESULT hres;
1938
1939 elem = get_elem_id(doc, "formid");
1940
1941 V_VT(&v) = VT_DISPATCH;
1942 V_DISPATCH(&v) = (IDispatch*)&form_onclick_obj;
1943 hres = IHTMLElement_put_onclick(elem, v);
1944 ok(hres == S_OK, "put_onclick failed: %08x\n", hres);
1945
1946 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLFormElement, (void**)&form);
1947 IHTMLElement_Release(elem);
1948 ok(hres == S_OK, "Could not get IHTMLFormElement iface: %08x\n", hres);
1949
1950 V_VT(&v) = VT_DISPATCH;
1951 V_DISPATCH(&v) = (IDispatch*)&form_onsubmit_obj;
1952 hres = IHTMLFormElement_put_onsubmit(form, v);
1953 ok(hres == S_OK, "put_onsubmit failed: %08x\n", hres);
1954
1955 IHTMLFormElement_Release(form);
1956
1957 submit = get_elem_id(doc, "submitid");
1958
1959 SET_EXPECT(form_onclick);
1960 SET_EXPECT(form_onsubmit);
1961 hres = IHTMLElement_click(submit);
1962 ok(hres == S_OK, "click failed: %08x\n", hres);
1963 CHECK_CALLED(form_onclick);
1964 CHECK_CALLED(form_onsubmit);
1965
1966 V_VT(&v) = VT_DISPATCH;
1967 V_DISPATCH(&v) = (IDispatch*)&submit_onclick_obj;
1968 hres = IHTMLElement_put_onclick(submit, v);
1969 ok(hres == S_OK, "put_onclick failed: %08x\n", hres);
1970
1971 SET_EXPECT(form_onclick);
1972 SET_EXPECT(submit_onclick);
1973 hres = IHTMLElement_click(submit);
1974 ok(hres == S_OK, "click failed: %08x\n", hres);
1975 CHECK_CALLED(form_onclick);
1976 CHECK_CALLED(submit_onclick);
1977
1978 elem_attach_event((IUnknown*)submit, "onclick", (IDispatch*)&submit_onclick_attached_obj);
1979
1980 SET_EXPECT(form_onclick);
1981 SET_EXPECT(submit_onclick);
1982 SET_EXPECT(submit_onclick_attached);
1983 hres = IHTMLElement_click(submit);
1984 ok(hres == S_OK, "click failed: %08x\n", hres);
1985 CHECK_CALLED(form_onclick);
1986 CHECK_CALLED(submit_onclick);
1987 CHECK_CALLED(submit_onclick_attached);
1988
1989 V_VT(&v) = VT_NULL;
1990 hres = IHTMLElement_put_onclick(submit, v);
1991 ok(hres == S_OK, "put_onclick failed: %08x\n", hres);
1992
1993 SET_EXPECT(form_onclick);
1994 SET_EXPECT(submit_onclick_attached);
1995 hres = IHTMLElement_click(submit);
1996 ok(hres == S_OK, "click failed: %08x\n", hres);
1997 CHECK_CALLED(form_onclick);
1998 CHECK_CALLED(submit_onclick_attached);
1999
2000 elem_detach_event((IUnknown*)submit, "onclick", (IDispatch*)&submit_onclick_attached_obj);
2001
2002 cp_cookie = register_cp((IUnknown*)doc, &DIID_HTMLDocumentEvents, (IUnknown*)&doccp_onclick_cancel_obj);
2003
2004 SET_EXPECT(form_onclick);
2005 SET_EXPECT(doccp_onclick_cancel);
2006 hres = IHTMLElement_click(submit);
2007 ok(hres == S_OK, "click failed: %08x\n", hres);
2008 CHECK_CALLED(form_onclick);
2009 CHECK_CALLED(doccp_onclick_cancel);
2010
2011 unregister_cp((IUnknown*)doc, &DIID_HTMLDocumentEvents, cp_cookie);
2012
2013 V_VT(&v) = VT_DISPATCH;
2014 V_DISPATCH(&v) = (IDispatch*)&submit_onclick_setret_obj;
2015 hres = IHTMLElement_put_onclick(submit, v);
2016 ok(hres == S_OK, "put_onclick failed: %08x\n", hres);
2017
2018 V_VT(&onclick_retval) = VT_BOOL;
2019 V_BOOL(&onclick_retval) = VARIANT_TRUE;
2020 V_VT(&onclick_event_retval) = VT_BOOL;
2021 V_BOOL(&onclick_event_retval) = VARIANT_TRUE;
2022
2023 SET_EXPECT(submit_onclick_setret);
2024 SET_EXPECT(form_onclick);
2025 SET_EXPECT(form_onsubmit);
2026 hres = IHTMLElement_click(submit);
2027 ok(hres == S_OK, "click failed: %08x\n", hres);
2028 CHECK_CALLED(submit_onclick_setret);
2029 CHECK_CALLED(form_onclick);
2030 CHECK_CALLED(form_onsubmit);
2031
2032 V_VT(&onclick_event_retval) = VT_BOOL;
2033 V_BOOL(&onclick_event_retval) = VARIANT_FALSE;
2034
2035 SET_EXPECT(submit_onclick_setret);
2036 SET_EXPECT(form_onclick);
2037 hres = IHTMLElement_click(submit);
2038 ok(hres == S_OK, "click failed: %08x\n", hres);
2039 CHECK_CALLED(submit_onclick_setret);
2040 CHECK_CALLED(form_onclick);
2041
2042 V_VT(&onclick_retval) = VT_BOOL;
2043 V_BOOL(&onclick_retval) = VARIANT_FALSE;
2044 V_VT(&onclick_event_retval) = VT_BOOL;
2045 V_BOOL(&onclick_event_retval) = VARIANT_TRUE;
2046
2047 SET_EXPECT(submit_onclick_setret);
2048 SET_EXPECT(form_onclick);
2049 hres = IHTMLElement_click(submit);
2050 ok(hres == S_OK, "click failed: %08x\n", hres);
2051 CHECK_CALLED(submit_onclick_setret);
2052 CHECK_CALLED(form_onclick);
2053
2054 V_VT(&onclick_event_retval) = VT_BOOL;
2055 V_BOOL(&onclick_event_retval) = VARIANT_FALSE;
2056
2057 SET_EXPECT(submit_onclick_setret);
2058 SET_EXPECT(form_onclick);
2059 hres = IHTMLElement_click(submit);
2060 ok(hres == S_OK, "click failed: %08x\n", hres);
2061 CHECK_CALLED(submit_onclick_setret);
2062 CHECK_CALLED(form_onclick);
2063
2064 elem_attach_event((IUnknown*)submit, "onclick", (IDispatch*)&submit_onclick_attached_obj);
2065 elem_attach_event((IUnknown*)submit, "onclick", (IDispatch*)&submit_onclick_attached_check_cancel_obj);
2066
2067 V_VT(&v) = VT_DISPATCH;
2068 V_DISPATCH(&v) = (IDispatch*)&submit_onclick_cancel_obj;
2069 hres = IHTMLElement_put_onclick(submit, v);
2070 ok(hres == S_OK, "put_onclick failed: %08x\n", hres);
2071
2072 SET_EXPECT(submit_onclick_cancel);
2073 SET_EXPECT(submit_onclick_attached_check_cancel);
2074 SET_EXPECT(submit_onclick_attached);
2075 hres = IHTMLElement_click(submit);
2076 ok(hres == S_OK, "click failed: %08x\n", hres);
2077 CHECK_CALLED(submit_onclick_cancel);
2078 CHECK_CALLED(submit_onclick_attached_check_cancel);
2079 CHECK_CALLED(submit_onclick_attached);
2080
2081 if(1)pump_msgs(NULL);
2082
2083 IHTMLElement_Release(submit);
2084 }
2085
test_timeout(IHTMLDocument2 * doc)2086 static void test_timeout(IHTMLDocument2 *doc)
2087 {
2088 IHTMLWindow3 *win3;
2089 VARIANT expr, var;
2090 LONG id;
2091 HRESULT hres;
2092
2093 hres = IHTMLWindow2_QueryInterface(window, &IID_IHTMLWindow3, (void**)&win3);
2094 ok(hres == S_OK, "Could not get IHTMLWindow3 iface: %08x\n", hres);
2095
2096 V_VT(&expr) = VT_DISPATCH;
2097 V_DISPATCH(&expr) = (IDispatch*)&timeoutFunc;
2098 V_VT(&var) = VT_EMPTY;
2099 id = 0;
2100 hres = IHTMLWindow3_setTimeout(win3, &expr, 0, &var, &id);
2101 ok(hres == S_OK, "setTimeout failed: %08x\n", hres);
2102 ok(id, "id = 0\n");
2103
2104 SET_EXPECT(timeout);
2105 pump_msgs(&called_timeout);
2106 CHECK_CALLED(timeout);
2107
2108 V_VT(&expr) = VT_DISPATCH;
2109 V_DISPATCH(&expr) = (IDispatch*)&timeoutFunc;
2110 V_VT(&var) = VT_EMPTY;
2111 id = 0;
2112 hres = IHTMLWindow3_setTimeout(win3, &expr, 0, &var, &id);
2113 ok(hres == S_OK, "setTimeout failed: %08x\n", hres);
2114 ok(id, "id = 0\n");
2115
2116 hres = IHTMLWindow2_clearTimeout(window, id);
2117 ok(hres == S_OK, "clearTimeout failed: %08x\n", hres);
2118
2119 IHTMLWindow3_Release(win3);
2120 }
2121
find_element_by_id(IHTMLDocument2 * doc,const char * id)2122 static IHTMLElement* find_element_by_id(IHTMLDocument2 *doc, const char *id)
2123 {
2124 HRESULT hres;
2125 IHTMLDocument3 *doc3;
2126 IHTMLElement *result;
2127 BSTR idW = a2bstr(id);
2128
2129 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3);
2130 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument3) failed: %08x\n", hres);
2131
2132 hres = IHTMLDocument3_getElementById(doc3, idW, &result);
2133 ok(hres == S_OK, "getElementById failed: %08x\n", hres);
2134 ok(result != NULL, "result == NULL\n");
2135 SysFreeString(idW);
2136
2137 IHTMLDocument3_Release(doc3);
2138 return result;
2139 }
2140
get_iframe_doc(IHTMLIFrameElement * iframe)2141 static IHTMLDocument2* get_iframe_doc(IHTMLIFrameElement *iframe)
2142 {
2143 HRESULT hres;
2144 IHTMLFrameBase2 *base;
2145 IHTMLDocument2 *result = NULL;
2146
2147 hres = IHTMLIFrameElement_QueryInterface(iframe, &IID_IHTMLFrameBase2, (void**)&base);
2148 ok(hres == S_OK, "QueryInterface(IID_IHTMLFrameBase2) failed: %08x\n", hres);
2149 if(hres == S_OK) {
2150 IHTMLWindow2 *window;
2151
2152 hres = IHTMLFrameBase2_get_contentWindow(base, &window);
2153 ok(hres == S_OK, "get_contentWindow failed: %08x\n", hres);
2154 ok(window != NULL, "window == NULL\n");
2155 if(window) {
2156 hres = IHTMLWindow2_get_document(window, &result);
2157 ok(hres == S_OK, "get_document failed: %08x\n", hres);
2158 ok(result != NULL, "result == NULL\n");
2159 IHTMLWindow2_Release(window);
2160 }
2161 }
2162 if(base) IHTMLFrameBase2_Release(base);
2163
2164 return result;
2165 }
2166
test_iframe_connections(IHTMLDocument2 * doc)2167 static void test_iframe_connections(IHTMLDocument2 *doc)
2168 {
2169 IHTMLIFrameElement *iframe;
2170 IHTMLDocument2 *iframes_doc;
2171 DWORD cookie;
2172 IConnectionPoint *cp;
2173 IHTMLElement *element;
2174 BSTR str;
2175 HRESULT hres;
2176
2177 trace("iframe tests...\n");
2178
2179 element = find_element_by_id(doc, "ifr");
2180 iframe = get_iframe_iface((IUnknown*)element);
2181 IHTMLElement_Release(element);
2182
2183 iframes_doc = get_iframe_doc(iframe);
2184 IHTMLIFrameElement_Release(iframe);
2185
2186 cookie = register_cp((IUnknown*)iframes_doc, &IID_IDispatch, (IUnknown*)&div_onclick_disp);
2187
2188 cp = get_cp((IUnknown*)doc, &IID_IDispatch);
2189 hres = IConnectionPoint_Unadvise(cp, cookie);
2190 IConnectionPoint_Release(cp);
2191 ok(hres == CONNECT_E_NOCONNECTION, "Unadvise returned %08x, expected CONNECT_E_NOCONNECTION\n", hres);
2192
2193 unregister_cp((IUnknown*)iframes_doc, &IID_IDispatch, cookie);
2194
2195 if(is_ie9plus) {
2196 IHTMLFrameBase2 *frame_base2;
2197 VARIANT v;
2198
2199 hres = IHTMLIFrameElement_QueryInterface(iframe, &IID_IHTMLFrameBase2, (void**)&frame_base2);
2200 ok(hres == S_OK, "Could not get IHTMLFrameBase2 iface: %08x\n", hres);
2201
2202 V_VT(&v) = VT_DISPATCH;
2203 V_DISPATCH(&v) = (IDispatch*)&iframe_onload_obj;
2204 hres = IHTMLFrameBase2_put_onload(frame_base2, v);
2205 ok(hres == S_OK, "put_onload failed: %08x\n", hres);
2206
2207 IHTMLFrameBase2_Release(frame_base2);
2208
2209 str = a2bstr("about:blank");
2210 hres = IHTMLDocument2_put_URL(iframes_doc, str);
2211 ok(hres == S_OK, "put_URL failed: %08x\n", hres);
2212 SysFreeString(str);
2213
2214 SET_EXPECT(iframe_onload);
2215 pump_msgs(&called_iframe_onload);
2216 CHECK_CALLED(iframe_onload);
2217
2218 str = a2bstr("about:test");
2219 hres = IHTMLDocument2_put_URL(iframes_doc, str);
2220 ok(hres == S_OK, "put_URL failed: %08x\n", hres);
2221 SysFreeString(str);
2222
2223 SET_EXPECT(iframe_onload);
2224 pump_msgs(&called_iframe_onload);
2225 CHECK_CALLED(iframe_onload);
2226 }else {
2227 win_skip("Skipping iframe onload tests on IE older than 9.\n");
2228 }
2229
2230 IHTMLDocument2_Release(iframes_doc);
2231 }
2232
2233 static HRESULT QueryInterface(REFIID,void**);
2234
InPlaceFrame_QueryInterface(IOleInPlaceFrame * iface,REFIID riid,void ** ppv)2235 static HRESULT WINAPI InPlaceFrame_QueryInterface(IOleInPlaceFrame *iface, REFIID riid, void **ppv)
2236 {
2237 return E_NOINTERFACE;
2238 }
2239
InPlaceFrame_AddRef(IOleInPlaceFrame * iface)2240 static ULONG WINAPI InPlaceFrame_AddRef(IOleInPlaceFrame *iface)
2241 {
2242 return 2;
2243 }
2244
InPlaceFrame_Release(IOleInPlaceFrame * iface)2245 static ULONG WINAPI InPlaceFrame_Release(IOleInPlaceFrame *iface)
2246 {
2247 return 1;
2248 }
2249
InPlaceFrame_GetWindow(IOleInPlaceFrame * iface,HWND * phwnd)2250 static HRESULT WINAPI InPlaceFrame_GetWindow(IOleInPlaceFrame *iface, HWND *phwnd)
2251 {
2252 return E_NOTIMPL;
2253 }
2254
InPlaceFrame_ContextSensitiveHelp(IOleInPlaceFrame * iface,BOOL fEnterMode)2255 static HRESULT WINAPI InPlaceFrame_ContextSensitiveHelp(IOleInPlaceFrame *iface, BOOL fEnterMode)
2256 {
2257 return E_NOTIMPL;
2258 }
2259
InPlaceFrame_GetBorder(IOleInPlaceFrame * iface,LPRECT lprectBorder)2260 static HRESULT WINAPI InPlaceFrame_GetBorder(IOleInPlaceFrame *iface, LPRECT lprectBorder)
2261 {
2262 return E_NOTIMPL;
2263 }
2264
InPlaceFrame_RequestBorderSpace(IOleInPlaceFrame * iface,LPCBORDERWIDTHS pborderwidths)2265 static HRESULT WINAPI InPlaceFrame_RequestBorderSpace(IOleInPlaceFrame *iface,
2266 LPCBORDERWIDTHS pborderwidths)
2267 {
2268 return E_NOTIMPL;
2269 }
2270
InPlaceFrame_SetBorderSpace(IOleInPlaceFrame * iface,LPCBORDERWIDTHS pborderwidths)2271 static HRESULT WINAPI InPlaceFrame_SetBorderSpace(IOleInPlaceFrame *iface,
2272 LPCBORDERWIDTHS pborderwidths)
2273 {
2274 return S_OK;
2275 }
2276
InPlaceUIWindow_SetActiveObject(IOleInPlaceFrame * iface,IOleInPlaceActiveObject * pActiveObject,LPCOLESTR pszObjName)2277 static HRESULT WINAPI InPlaceUIWindow_SetActiveObject(IOleInPlaceFrame *iface,
2278 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
2279 {
2280 return S_OK;
2281 }
2282
InPlaceFrame_SetActiveObject(IOleInPlaceFrame * iface,IOleInPlaceActiveObject * pActiveObject,LPCOLESTR pszObjName)2283 static HRESULT WINAPI InPlaceFrame_SetActiveObject(IOleInPlaceFrame *iface,
2284 IOleInPlaceActiveObject *pActiveObject, LPCOLESTR pszObjName)
2285 {
2286 return S_OK;
2287 }
2288
InPlaceFrame_InsertMenus(IOleInPlaceFrame * iface,HMENU hmenuShared,LPOLEMENUGROUPWIDTHS lpMenuWidths)2289 static HRESULT WINAPI InPlaceFrame_InsertMenus(IOleInPlaceFrame *iface, HMENU hmenuShared,
2290 LPOLEMENUGROUPWIDTHS lpMenuWidths)
2291 {
2292 return E_NOTIMPL;
2293 }
2294
InPlaceFrame_SetMenu(IOleInPlaceFrame * iface,HMENU hmenuShared,HOLEMENU holemenu,HWND hwndActiveObject)2295 static HRESULT WINAPI InPlaceFrame_SetMenu(IOleInPlaceFrame *iface, HMENU hmenuShared,
2296 HOLEMENU holemenu, HWND hwndActiveObject)
2297 {
2298 ok(0, "unexpected call\n");
2299 return E_NOTIMPL;
2300 }
2301
InPlaceFrame_RemoveMenus(IOleInPlaceFrame * iface,HMENU hmenuShared)2302 static HRESULT WINAPI InPlaceFrame_RemoveMenus(IOleInPlaceFrame *iface, HMENU hmenuShared)
2303 {
2304 ok(0, "unexpected call\n");
2305 return E_NOTIMPL;
2306 }
2307
InPlaceFrame_SetStatusText(IOleInPlaceFrame * iface,LPCOLESTR pszStatusText)2308 static HRESULT WINAPI InPlaceFrame_SetStatusText(IOleInPlaceFrame *iface, LPCOLESTR pszStatusText)
2309 {
2310 return S_OK;
2311 }
2312
InPlaceFrame_EnableModeless(IOleInPlaceFrame * iface,BOOL fEnable)2313 static HRESULT WINAPI InPlaceFrame_EnableModeless(IOleInPlaceFrame *iface, BOOL fEnable)
2314 {
2315 return E_NOTIMPL;
2316 }
2317
InPlaceFrame_TranslateAccelerator(IOleInPlaceFrame * iface,LPMSG lpmsg,WORD wID)2318 static HRESULT WINAPI InPlaceFrame_TranslateAccelerator(IOleInPlaceFrame *iface, LPMSG lpmsg, WORD wID)
2319 {
2320 ok(0, "unexpected call\n");
2321 return E_NOTIMPL;
2322 }
2323
2324 static const IOleInPlaceFrameVtbl InPlaceFrameVtbl = {
2325 InPlaceFrame_QueryInterface,
2326 InPlaceFrame_AddRef,
2327 InPlaceFrame_Release,
2328 InPlaceFrame_GetWindow,
2329 InPlaceFrame_ContextSensitiveHelp,
2330 InPlaceFrame_GetBorder,
2331 InPlaceFrame_RequestBorderSpace,
2332 InPlaceFrame_SetBorderSpace,
2333 InPlaceFrame_SetActiveObject,
2334 InPlaceFrame_InsertMenus,
2335 InPlaceFrame_SetMenu,
2336 InPlaceFrame_RemoveMenus,
2337 InPlaceFrame_SetStatusText,
2338 InPlaceFrame_EnableModeless,
2339 InPlaceFrame_TranslateAccelerator
2340 };
2341
2342 static IOleInPlaceFrame InPlaceFrame = { &InPlaceFrameVtbl };
2343
2344 static const IOleInPlaceFrameVtbl InPlaceUIWindowVtbl = {
2345 InPlaceFrame_QueryInterface,
2346 InPlaceFrame_AddRef,
2347 InPlaceFrame_Release,
2348 InPlaceFrame_GetWindow,
2349 InPlaceFrame_ContextSensitiveHelp,
2350 InPlaceFrame_GetBorder,
2351 InPlaceFrame_RequestBorderSpace,
2352 InPlaceFrame_SetBorderSpace,
2353 InPlaceUIWindow_SetActiveObject,
2354 };
2355
2356 static IOleInPlaceFrame InPlaceUIWindow = { &InPlaceUIWindowVtbl };
2357
InPlaceSite_QueryInterface(IOleInPlaceSite * iface,REFIID riid,void ** ppv)2358 static HRESULT WINAPI InPlaceSite_QueryInterface(IOleInPlaceSite *iface, REFIID riid, void **ppv)
2359 {
2360 return QueryInterface(riid, ppv);
2361 }
2362
InPlaceSite_AddRef(IOleInPlaceSite * iface)2363 static ULONG WINAPI InPlaceSite_AddRef(IOleInPlaceSite *iface)
2364 {
2365 return 2;
2366 }
2367
InPlaceSite_Release(IOleInPlaceSite * iface)2368 static ULONG WINAPI InPlaceSite_Release(IOleInPlaceSite *iface)
2369 {
2370 return 1;
2371 }
2372
InPlaceSite_GetWindow(IOleInPlaceSite * iface,HWND * phwnd)2373 static HRESULT WINAPI InPlaceSite_GetWindow(IOleInPlaceSite *iface, HWND *phwnd)
2374 {
2375 *phwnd = container_hwnd;
2376 return S_OK;
2377 }
2378
InPlaceSite_ContextSensitiveHelp(IOleInPlaceSite * iface,BOOL fEnterMode)2379 static HRESULT WINAPI InPlaceSite_ContextSensitiveHelp(IOleInPlaceSite *iface, BOOL fEnterMode)
2380 {
2381 ok(0, "unexpected call\n");
2382 return E_NOTIMPL;
2383 }
2384
InPlaceSite_CanInPlaceActivate(IOleInPlaceSite * iface)2385 static HRESULT WINAPI InPlaceSite_CanInPlaceActivate(IOleInPlaceSite *iface)
2386 {
2387 return S_OK;
2388 }
2389
InPlaceSite_OnInPlaceActivate(IOleInPlaceSite * iface)2390 static HRESULT WINAPI InPlaceSite_OnInPlaceActivate(IOleInPlaceSite *iface)
2391 {
2392 return S_OK;
2393 }
2394
InPlaceSite_OnUIActivate(IOleInPlaceSite * iface)2395 static HRESULT WINAPI InPlaceSite_OnUIActivate(IOleInPlaceSite *iface)
2396 {
2397 return S_OK;
2398 }
2399
InPlaceSite_GetWindowContext(IOleInPlaceSite * iface,IOleInPlaceFrame ** ppFrame,IOleInPlaceUIWindow ** ppDoc,LPRECT lprcPosRect,LPRECT lprcClipRect,LPOLEINPLACEFRAMEINFO lpFrameInfo)2400 static HRESULT WINAPI InPlaceSite_GetWindowContext(IOleInPlaceSite *iface,
2401 IOleInPlaceFrame **ppFrame, IOleInPlaceUIWindow **ppDoc, LPRECT lprcPosRect,
2402 LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
2403 {
2404 static const RECT rect = {0,0,300,300};
2405
2406 *ppFrame = &InPlaceFrame;
2407 *ppDoc = (IOleInPlaceUIWindow*)&InPlaceUIWindow;
2408 *lprcPosRect = rect;
2409 *lprcClipRect = rect;
2410
2411 ok(lpFrameInfo->cb == sizeof(*lpFrameInfo), "lpFrameInfo->cb = %u, expected %u\n", lpFrameInfo->cb, (unsigned)sizeof(*lpFrameInfo));
2412 lpFrameInfo->fMDIApp = FALSE;
2413 lpFrameInfo->hwndFrame = container_hwnd;
2414 lpFrameInfo->haccel = NULL;
2415 lpFrameInfo->cAccelEntries = 0;
2416
2417 return S_OK;
2418 }
2419
InPlaceSite_Scroll(IOleInPlaceSite * iface,SIZE scrollExtant)2420 static HRESULT WINAPI InPlaceSite_Scroll(IOleInPlaceSite *iface, SIZE scrollExtant)
2421 {
2422 return E_NOTIMPL;
2423 }
2424
InPlaceSite_OnUIDeactivate(IOleInPlaceSite * iface,BOOL fUndoable)2425 static HRESULT WINAPI InPlaceSite_OnUIDeactivate(IOleInPlaceSite *iface, BOOL fUndoable)
2426 {
2427 return S_OK;
2428 }
2429
InPlaceSite_OnInPlaceDeactivate(IOleInPlaceSite * iface)2430 static HRESULT WINAPI InPlaceSite_OnInPlaceDeactivate(IOleInPlaceSite *iface)
2431 {
2432 return S_OK;
2433 }
2434
InPlaceSite_DiscardUndoState(IOleInPlaceSite * iface)2435 static HRESULT WINAPI InPlaceSite_DiscardUndoState(IOleInPlaceSite *iface)
2436 {
2437 return E_NOTIMPL;
2438 }
2439
InPlaceSite_DeactivateAndUndo(IOleInPlaceSite * iface)2440 static HRESULT WINAPI InPlaceSite_DeactivateAndUndo(IOleInPlaceSite *iface)
2441 {
2442 return E_NOTIMPL;
2443 }
2444
InPlaceSite_OnPosRectChange(IOleInPlaceSite * iface,LPCRECT lprcPosRect)2445 static HRESULT WINAPI InPlaceSite_OnPosRectChange(IOleInPlaceSite *iface, LPCRECT lprcPosRect)
2446 {
2447 return E_NOTIMPL;
2448 }
2449
2450 static const IOleInPlaceSiteVtbl InPlaceSiteVtbl = {
2451 InPlaceSite_QueryInterface,
2452 InPlaceSite_AddRef,
2453 InPlaceSite_Release,
2454 InPlaceSite_GetWindow,
2455 InPlaceSite_ContextSensitiveHelp,
2456 InPlaceSite_CanInPlaceActivate,
2457 InPlaceSite_OnInPlaceActivate,
2458 InPlaceSite_OnUIActivate,
2459 InPlaceSite_GetWindowContext,
2460 InPlaceSite_Scroll,
2461 InPlaceSite_OnUIDeactivate,
2462 InPlaceSite_OnInPlaceDeactivate,
2463 InPlaceSite_DiscardUndoState,
2464 InPlaceSite_DeactivateAndUndo,
2465 InPlaceSite_OnPosRectChange,
2466 };
2467
2468 static IOleInPlaceSite InPlaceSite = { &InPlaceSiteVtbl };
2469
ClientSite_QueryInterface(IOleClientSite * iface,REFIID riid,void ** ppv)2470 static HRESULT WINAPI ClientSite_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppv)
2471 {
2472 return QueryInterface(riid, ppv);
2473 }
2474
ClientSite_AddRef(IOleClientSite * iface)2475 static ULONG WINAPI ClientSite_AddRef(IOleClientSite *iface)
2476 {
2477 return 2;
2478 }
2479
ClientSite_Release(IOleClientSite * iface)2480 static ULONG WINAPI ClientSite_Release(IOleClientSite *iface)
2481 {
2482 return 1;
2483 }
2484
ClientSite_SaveObject(IOleClientSite * iface)2485 static HRESULT WINAPI ClientSite_SaveObject(IOleClientSite *iface)
2486 {
2487 ok(0, "unexpected call\n");
2488 return E_NOTIMPL;
2489 }
2490
ClientSite_GetMoniker(IOleClientSite * iface,DWORD dwAssign,DWORD dwWhichMoniker,IMoniker ** ppmon)2491 static HRESULT WINAPI ClientSite_GetMoniker(IOleClientSite *iface, DWORD dwAssign, DWORD dwWhichMoniker,
2492 IMoniker **ppmon)
2493 {
2494 ok(0, "unexpected call\n");
2495 return E_NOTIMPL;
2496 }
2497
ClientSite_GetContainer(IOleClientSite * iface,IOleContainer ** ppContainer)2498 static HRESULT WINAPI ClientSite_GetContainer(IOleClientSite *iface, IOleContainer **ppContainer)
2499 {
2500 return E_NOTIMPL;
2501 }
2502
ClientSite_ShowObject(IOleClientSite * iface)2503 static HRESULT WINAPI ClientSite_ShowObject(IOleClientSite *iface)
2504 {
2505 ok(0, "unexpected call\n");
2506 return E_NOTIMPL;
2507 }
2508
ClientSite_OnShowWindow(IOleClientSite * iface,BOOL fShow)2509 static HRESULT WINAPI ClientSite_OnShowWindow(IOleClientSite *iface, BOOL fShow)
2510 {
2511 ok(0, "unexpected call\n");
2512 return E_NOTIMPL;
2513 }
2514
ClientSite_RequestNewObjectLayout(IOleClientSite * iface)2515 static HRESULT WINAPI ClientSite_RequestNewObjectLayout(IOleClientSite *iface)
2516 {
2517 ok(0, "unexpected call\n");
2518 return E_NOTIMPL;
2519 }
2520
2521 static const IOleClientSiteVtbl ClientSiteVtbl = {
2522 ClientSite_QueryInterface,
2523 ClientSite_AddRef,
2524 ClientSite_Release,
2525 ClientSite_SaveObject,
2526 ClientSite_GetMoniker,
2527 ClientSite_GetContainer,
2528 ClientSite_ShowObject,
2529 ClientSite_OnShowWindow,
2530 ClientSite_RequestNewObjectLayout
2531 };
2532
2533 static IOleClientSite ClientSite = { &ClientSiteVtbl };
2534
DocumentSite_QueryInterface(IOleDocumentSite * iface,REFIID riid,void ** ppv)2535 static HRESULT WINAPI DocumentSite_QueryInterface(IOleDocumentSite *iface, REFIID riid, void **ppv)
2536 {
2537 return QueryInterface(riid, ppv);
2538 }
2539
DocumentSite_AddRef(IOleDocumentSite * iface)2540 static ULONG WINAPI DocumentSite_AddRef(IOleDocumentSite *iface)
2541 {
2542 return 2;
2543 }
2544
DocumentSite_Release(IOleDocumentSite * iface)2545 static ULONG WINAPI DocumentSite_Release(IOleDocumentSite *iface)
2546 {
2547 return 1;
2548 }
2549
DocumentSite_ActivateMe(IOleDocumentSite * iface,IOleDocumentView * pViewToActivate)2550 static HRESULT WINAPI DocumentSite_ActivateMe(IOleDocumentSite *iface, IOleDocumentView *pViewToActivate)
2551 {
2552 RECT rect = {0,0,300,300};
2553 IOleDocument *document;
2554 HRESULT hres;
2555
2556 hres = IOleDocumentView_QueryInterface(pViewToActivate, &IID_IOleDocument, (void**)&document);
2557 ok(hres == S_OK, "could not get IOleDocument: %08x\n", hres);
2558
2559 hres = IOleDocument_CreateView(document, &InPlaceSite, NULL, 0, &view);
2560 IOleDocument_Release(document);
2561 ok(hres == S_OK, "CreateView failed: %08x\n", hres);
2562
2563 hres = IOleDocumentView_SetInPlaceSite(view, &InPlaceSite);
2564 ok(hres == S_OK, "SetInPlaceSite failed: %08x\n", hres);
2565
2566 hres = IOleDocumentView_UIActivate(view, TRUE);
2567 ok(hres == S_OK, "UIActivate failed: %08x\n", hres);
2568
2569 hres = IOleDocumentView_SetRect(view, &rect);
2570 ok(hres == S_OK, "SetRect failed: %08x\n", hres);
2571
2572 hres = IOleDocumentView_Show(view, TRUE);
2573 ok(hres == S_OK, "Show failed: %08x\n", hres);
2574
2575 return S_OK;
2576 }
2577
2578 static const IOleDocumentSiteVtbl DocumentSiteVtbl = {
2579 DocumentSite_QueryInterface,
2580 DocumentSite_AddRef,
2581 DocumentSite_Release,
2582 DocumentSite_ActivateMe
2583 };
2584
2585 static IOleDocumentSite DocumentSite = { &DocumentSiteVtbl };
2586
QueryInterface(REFIID riid,void ** ppv)2587 static HRESULT QueryInterface(REFIID riid, void **ppv)
2588 {
2589 *ppv = NULL;
2590
2591 if(IsEqualGUID(&IID_IUnknown, riid) || IsEqualGUID(&IID_IOleClientSite, riid))
2592 *ppv = &ClientSite;
2593 else if(IsEqualGUID(&IID_IOleDocumentSite, riid))
2594 *ppv = &DocumentSite;
2595 else if(IsEqualGUID(&IID_IOleWindow, riid) || IsEqualGUID(&IID_IOleInPlaceSite, riid))
2596 *ppv = &InPlaceSite;
2597
2598 return *ppv ? S_OK : E_NOINTERFACE;
2599 }
2600
2601 static IHTMLDocument2 *notif_doc;
2602 static BOOL doc_complete;
2603
PropertyNotifySink_QueryInterface(IPropertyNotifySink * iface,REFIID riid,void ** ppv)2604 static HRESULT WINAPI PropertyNotifySink_QueryInterface(IPropertyNotifySink *iface,
2605 REFIID riid, void**ppv)
2606 {
2607 if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
2608 *ppv = iface;
2609 return S_OK;
2610 }
2611
2612 ok(0, "unexpected call\n");
2613 return E_NOINTERFACE;
2614 }
2615
PropertyNotifySink_AddRef(IPropertyNotifySink * iface)2616 static ULONG WINAPI PropertyNotifySink_AddRef(IPropertyNotifySink *iface)
2617 {
2618 return 2;
2619 }
2620
PropertyNotifySink_Release(IPropertyNotifySink * iface)2621 static ULONG WINAPI PropertyNotifySink_Release(IPropertyNotifySink *iface)
2622 {
2623 return 1;
2624 }
2625
PropertyNotifySink_OnChanged(IPropertyNotifySink * iface,DISPID dispID)2626 static HRESULT WINAPI PropertyNotifySink_OnChanged(IPropertyNotifySink *iface, DISPID dispID)
2627 {
2628 if(dispID == DISPID_READYSTATE){
2629 BSTR state;
2630 HRESULT hres;
2631
2632 hres = IHTMLDocument2_get_readyState(notif_doc, &state);
2633 ok(hres == S_OK, "get_readyState failed: %08x\n", hres);
2634
2635 if(!strcmp_wa(state, "complete"))
2636 doc_complete = TRUE;
2637
2638 SysFreeString(state);
2639 }
2640
2641 return S_OK;
2642 }
2643
PropertyNotifySink_OnRequestEdit(IPropertyNotifySink * iface,DISPID dispID)2644 static HRESULT WINAPI PropertyNotifySink_OnRequestEdit(IPropertyNotifySink *iface, DISPID dispID)
2645 {
2646 ok(0, "unexpected call\n");
2647 return E_NOTIMPL;
2648 }
2649
2650 static const IPropertyNotifySinkVtbl PropertyNotifySinkVtbl = {
2651 PropertyNotifySink_QueryInterface,
2652 PropertyNotifySink_AddRef,
2653 PropertyNotifySink_Release,
2654 PropertyNotifySink_OnChanged,
2655 PropertyNotifySink_OnRequestEdit
2656 };
2657
2658 static IPropertyNotifySink PropertyNotifySink = { &PropertyNotifySinkVtbl };
2659
doc_load_string(IHTMLDocument2 * doc,const char * str)2660 static void doc_load_string(IHTMLDocument2 *doc, const char *str)
2661 {
2662 IPersistStreamInit *init;
2663 IStream *stream;
2664 HGLOBAL mem;
2665 SIZE_T len;
2666
2667 notif_doc = doc;
2668
2669 doc_complete = FALSE;
2670 len = strlen(str);
2671 mem = GlobalAlloc(0, len);
2672 memcpy(mem, str, len);
2673 CreateStreamOnHGlobal(mem, TRUE, &stream);
2674
2675 IHTMLDocument2_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&init);
2676
2677 IPersistStreamInit_Load(init, stream);
2678 IPersistStreamInit_Release(init);
2679 IStream_Release(stream);
2680 }
2681
do_advise(IUnknown * unk,REFIID riid,IUnknown * unk_advise)2682 static void do_advise(IUnknown *unk, REFIID riid, IUnknown *unk_advise)
2683 {
2684 IConnectionPointContainer *container;
2685 IConnectionPoint *cp;
2686 DWORD cookie;
2687 HRESULT hres;
2688
2689 hres = IUnknown_QueryInterface(unk, &IID_IConnectionPointContainer, (void**)&container);
2690 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
2691
2692 hres = IConnectionPointContainer_FindConnectionPoint(container, riid, &cp);
2693 IConnectionPointContainer_Release(container);
2694 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
2695
2696 hres = IConnectionPoint_Advise(cp, unk_advise, &cookie);
2697 IConnectionPoint_Release(cp);
2698 ok(hres == S_OK, "Advise failed: %08x\n", hres);
2699 }
2700
set_client_site(IHTMLDocument2 * doc,BOOL set)2701 static void set_client_site(IHTMLDocument2 *doc, BOOL set)
2702 {
2703 IOleObject *oleobj;
2704 HRESULT hres;
2705
2706 if(!set && view) {
2707 IOleDocumentView_Show(view, FALSE);
2708 IOleDocumentView_CloseView(view, 0);
2709 IOleDocumentView_SetInPlaceSite(view, NULL);
2710 IOleDocumentView_Release(view);
2711 view = NULL;
2712 }
2713
2714 hres = IHTMLDocument2_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
2715 ok(hres == S_OK, "Could not et IOleObject: %08x\n", hres);
2716
2717 hres = IOleObject_SetClientSite(oleobj, set ? &ClientSite : NULL);
2718 ok(hres == S_OK, "SetClientSite failed: %08x\n", hres);
2719
2720 if(set) {
2721 IHlinkTarget *hlink;
2722
2723 hres = IOleObject_QueryInterface(oleobj, &IID_IHlinkTarget, (void**)&hlink);
2724 ok(hres == S_OK, "Could not get IHlinkTarget iface: %08x\n", hres);
2725
2726 hres = IHlinkTarget_Navigate(hlink, 0, NULL);
2727 ok(hres == S_OK, "Navgate failed: %08x\n", hres);
2728
2729 IHlinkTarget_Release(hlink);
2730 }
2731
2732 IOleObject_Release(oleobj);
2733 }
create_document(void)2734 static IHTMLDocument2 *create_document(void)
2735 {
2736 IHTMLDocument2 *doc;
2737 HRESULT hres;
2738
2739 hres = CoCreateInstance(&CLSID_HTMLDocument, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
2740 &IID_IHTMLDocument2, (void**)&doc);
2741 ok(hres == S_OK, "CoCreateInstance failed: %08x\n", hres);
2742 return SUCCEEDED(hres) ? doc : NULL;
2743 }
2744
2745
2746 typedef void (*testfunc_t)(IHTMLDocument2*);
2747
run_test(const char * str,testfunc_t test)2748 static void run_test(const char *str, testfunc_t test)
2749 {
2750 IHTMLDocument2 *doc;
2751 IHTMLElement *body = NULL;
2752 MSG msg;
2753 HRESULT hres;
2754
2755 doc = create_document();
2756 if (!doc)
2757 return;
2758 set_client_site(doc, TRUE);
2759 doc_load_string(doc, str);
2760 do_advise((IUnknown*)doc, &IID_IPropertyNotifySink, (IUnknown*)&PropertyNotifySink);
2761
2762 while(!doc_complete && GetMessageA(&msg, NULL, 0, 0)) {
2763 TranslateMessage(&msg);
2764 DispatchMessageA(&msg);
2765 }
2766
2767 hres = IHTMLDocument2_get_body(doc, &body);
2768 ok(hres == S_OK, "get_body failed: %08x\n", hres);
2769
2770 if(body) {
2771 IHTMLElement_Release(body);
2772
2773 hres = IHTMLDocument2_get_parentWindow(doc, &window);
2774 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
2775 ok(window != NULL, "window == NULL\n");
2776
2777 test(doc);
2778
2779 IHTMLWindow2_Release(window);
2780 window = NULL;
2781 }else {
2782 skip("Could not get document body. Assuming no Gecko installed.\n");
2783 }
2784
2785 set_client_site(doc, FALSE);
2786 IHTMLDocument2_Release(doc);
2787 }
2788
wnd_proc(HWND hwnd,UINT msg,WPARAM wParam,LPARAM lParam)2789 static LRESULT WINAPI wnd_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
2790 {
2791 return DefWindowProcA(hwnd, msg, wParam, lParam);
2792 }
2793
create_container_window(void)2794 static HWND create_container_window(void)
2795 {
2796 static const CHAR szHTMLDocumentTest[] = "HTMLDocumentTest";
2797 static WNDCLASSEXA wndclass = {
2798 sizeof(WNDCLASSEXA),
2799 0,
2800 wnd_proc,
2801 0, 0, NULL, NULL, NULL, NULL, NULL,
2802 szHTMLDocumentTest,
2803 NULL
2804 };
2805
2806 RegisterClassExA(&wndclass);
2807 return CreateWindowA(szHTMLDocumentTest, szHTMLDocumentTest,
2808 WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT,
2809 300, 300, NULL, NULL, NULL, NULL);
2810 }
2811
test_empty_document(void)2812 static void test_empty_document(void)
2813 {
2814 HRESULT hres;
2815 IHTMLWindow2 *window;
2816 IHTMLDocument2 *windows_doc, *doc;
2817 IConnectionPoint *cp;
2818 DWORD cookie;
2819
2820 doc = create_document();
2821 if(!doc)
2822 return;
2823
2824 hres = IHTMLDocument2_get_parentWindow(doc, &window);
2825 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
2826
2827 hres = IHTMLWindow2_get_document(window, &windows_doc);
2828 IHTMLWindow2_Release(window);
2829 ok(hres == S_OK, "get_document failed: %08x\n", hres);
2830
2831 cookie = register_cp((IUnknown*)windows_doc, &IID_IDispatch, (IUnknown*)&div_onclick_disp);
2832
2833 cp = get_cp((IUnknown*)doc, &IID_IDispatch);
2834 hres = IConnectionPoint_Unadvise(cp, cookie);
2835 IConnectionPoint_Release(cp);
2836 ok(hres == S_OK, "Unadvise failed: %08x\n", hres);
2837
2838 IHTMLDocument2_Release(windows_doc);
2839 IHTMLDocument2_Release(doc);
2840 }
2841
check_ie(void)2842 static BOOL check_ie(void)
2843 {
2844 IHTMLDocument2 *doc;
2845 IHTMLDocument5 *doc5;
2846 IHTMLDocument7 *doc7;
2847 HRESULT hres;
2848
2849 doc = create_document();
2850 if(!doc)
2851 return FALSE;
2852
2853 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument7, (void**)&doc7);
2854 if(SUCCEEDED(hres)) {
2855 is_ie9plus = TRUE;
2856 IHTMLDocument7_Release(doc7);
2857 }
2858
2859 trace("is_ie9plus %x\n", is_ie9plus);
2860
2861 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument5, (void**)&doc5);
2862 if(SUCCEEDED(hres))
2863 IHTMLDocument5_Release(doc5);
2864
2865 IHTMLDocument2_Release(doc);
2866 return SUCCEEDED(hres);
2867 }
2868
START_TEST(events)2869 START_TEST(events)
2870 {
2871 CoInitialize(NULL);
2872
2873 if(check_ie()) {
2874 container_hwnd = create_container_window();
2875
2876 if(winetest_interactive)
2877 ShowWindow(container_hwnd, SW_SHOW);
2878
2879 run_test(empty_doc_str, test_timeout);
2880 run_test(click_doc_str, test_onclick);
2881 run_test(readystate_doc_str, test_onreadystatechange);
2882 run_test(img_doc_str, test_imgload);
2883 run_test(input_doc_str, test_focus);
2884 run_test(form_doc_str, test_submit);
2885 run_test(iframe_doc_str, test_iframe_connections);
2886
2887 test_empty_document();
2888
2889 DestroyWindow(container_hwnd);
2890 }else {
2891 win_skip("Too old IE\n");
2892 }
2893
2894 CoUninitialize();
2895 }
2896
