?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
mshtml: Use set_nsstyle_attr_var in IHTMLStyle::put_left implementation.
[wine/wine-kai.git] / dlls / mshtml / tests / dom.c
blobf2252a1241d2bb8dc97f9ee994861872c74166d4
1 /*
2 * Copyright 2007-2008 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 #define COBJMACROS
20 #define CONST_VTABLE
21
22 #include <wine/test.h>
23 #include <stdarg.h>
24 #include <stdio.h>
25
26 #include "windef.h"
27 #include "winbase.h"
28 #include "ole2.h"
29 #include "mshtml.h"
30 #include "mshtmcid.h"
31 #include "mshtmhst.h"
32 #include "docobj.h"
33 #include "dispex.h"
34
35 static const char doc_blank[] = "<html></html>";
36 static const char doc_str1[] = "<html><body>test</body></html>";
37 static const char range_test_str[] =
38 "<html><body>test \na<font size=\"2\">bc\t123<br /> it's\r\n \t</font>text<br /></body></html>";
39 static const char range_test2_str[] =
40 "<html><body>abc<hr />123<br /><hr />def</body></html>";
41 static const char elem_test_str[] =
42 "<html><head><title>test</title><style>.body { margin-right: 0px; }</style>"
43 "<body>text test<!-- a comment -->"
44 "<a href=\"http://test\" name=\"x\">link</a>"
45 "<input id=\"in\" class=\"testclass\" tabIndex=\"2\" title=\"test title\" />"
46 "<select id=\"s\"><option id=\"x\" value=\"val1\">opt1</option><option id=\"y\">opt2</option></select>"
47 "<textarea id=\"X\">text text</textarea>"
48 "<table id=\"tbl\"><tbody><tr></tr><tr id=\"row2\"><td>td1 text</td><td>td2 text</td></tr></tbody></table>"
49 "<script id=\"sc\" type=\"text/javascript\"></script>"
50 "<test />"
51 "<img id=\"imgid\"/>"
52 "<iframe src=\"about:blank\" id=\"ifr\"></iframe>"
53 "</body></html>";
54 static const char indent_test_str[] =
55 "<html><head><title>test</title></head><body>abc<br /><a href=\"about:blank\">123</a></body></html>";
56
57 static const WCHAR noneW[] = {'N','o','n','e',0};
58
59 static WCHAR characterW[] = {'c','h','a','r','a','c','t','e','r',0};
60 static WCHAR texteditW[] = {'t','e','x','t','e','d','i','t',0};
61 static WCHAR wordW[] = {'w','o','r','d',0};
62
63 static const WCHAR text_javascriptW[] = {'t','e','x','t','/','j','a','v','a','s','c','r','i','p','t',0};
64
65 static const WCHAR idW[] = {'i','d',0};
66
67 typedef enum {
68 ET_NONE,
69 ET_HTML,
70 ET_HEAD,
71 ET_TITLE,
72 ET_BODY,
73 ET_A,
74 ET_INPUT,
75 ET_SELECT,
76 ET_TEXTAREA,
77 ET_OPTION,
78 ET_STYLE,
79 ET_BLOCKQUOTE,
80 ET_P,
81 ET_BR,
82 ET_TABLE,
83 ET_TBODY,
84 ET_SCRIPT,
85 ET_TEST,
86 ET_TESTG,
87 ET_COMMENT,
88 ET_IMG,
89 ET_TR,
90 ET_TD,
91 ET_IFRAME
92 } elem_type_t;
93
94 static const IID * const none_iids[] = {
95 &IID_IUnknown,
96 NULL
97 };
98
99 static const IID * const elem_iids[] = {
100 &IID_IHTMLDOMNode,
101 &IID_IHTMLDOMNode2,
102 &IID_IHTMLElement,
103 &IID_IHTMLElement2,
104 &IID_IHTMLElement3,
105 &IID_IDispatchEx,
106 &IID_IConnectionPointContainer,
107 NULL
108 };
109
110 static const IID * const body_iids[] = {
111 &IID_IHTMLDOMNode,
112 &IID_IHTMLDOMNode2,
113 &IID_IHTMLElement,
114 &IID_IHTMLElement2,
115 &IID_IHTMLElement3,
116 &IID_IHTMLTextContainer,
117 &IID_IHTMLBodyElement,
118 &IID_IDispatchEx,
119 &IID_IConnectionPointContainer,
120 NULL
121 };
122
123 static const IID * const anchor_iids[] = {
124 &IID_IHTMLDOMNode,
125 &IID_IHTMLDOMNode2,
126 &IID_IHTMLElement,
127 &IID_IHTMLElement2,
128 &IID_IHTMLElement3,
129 &IID_IHTMLAnchorElement,
130 &IID_IDispatchEx,
131 &IID_IConnectionPointContainer,
132 NULL
133 };
134
135 static const IID * const input_iids[] = {
136 &IID_IHTMLDOMNode,
137 &IID_IHTMLDOMNode2,
138 &IID_IHTMLElement,
139 &IID_IHTMLElement2,
140 &IID_IHTMLElement3,
141 &IID_IHTMLInputElement,
142 &IID_IHTMLInputTextElement,
143 &IID_IDispatchEx,
144 &IID_IConnectionPointContainer,
145 NULL
146 };
147
148 static const IID * const select_iids[] = {
149 &IID_IHTMLDOMNode,
150 &IID_IHTMLDOMNode2,
151 &IID_IHTMLElement,
152 &IID_IHTMLElement2,
153 &IID_IHTMLElement3,
154 &IID_IHTMLSelectElement,
155 &IID_IDispatchEx,
156 &IID_IConnectionPointContainer,
157 NULL
158 };
159
160 static const IID * const textarea_iids[] = {
161 &IID_IHTMLDOMNode,
162 &IID_IHTMLDOMNode2,
163 &IID_IHTMLElement,
164 &IID_IHTMLElement2,
165 &IID_IHTMLElement3,
166 &IID_IHTMLTextAreaElement,
167 &IID_IDispatchEx,
168 &IID_IConnectionPointContainer,
169 NULL
170 };
171
172 static const IID * const option_iids[] = {
173 &IID_IHTMLDOMNode,
174 &IID_IHTMLDOMNode2,
175 &IID_IHTMLElement,
176 &IID_IHTMLElement2,
177 &IID_IHTMLElement3,
178 &IID_IHTMLOptionElement,
179 &IID_IDispatchEx,
180 &IID_IConnectionPointContainer,
181 NULL
182 };
183
184 static const IID * const table_iids[] = {
185 &IID_IHTMLDOMNode,
186 &IID_IHTMLDOMNode2,
187 &IID_IHTMLElement,
188 &IID_IHTMLElement2,
189 &IID_IHTMLElement3,
190 &IID_IHTMLTable,
191 &IID_IDispatchEx,
192 &IID_IConnectionPointContainer,
193 NULL
194 };
195
196 static const IID * const script_iids[] = {
197 &IID_IHTMLDOMNode,
198 &IID_IHTMLDOMNode2,
199 &IID_IHTMLElement,
200 &IID_IHTMLElement2,
201 &IID_IHTMLElement3,
202 &IID_IHTMLScriptElement,
203 &IID_IDispatchEx,
204 &IID_IConnectionPointContainer,
205 NULL
206 };
207
208 static const IID * const text_iids[] = {
209 &IID_IHTMLDOMNode,
210 &IID_IHTMLDOMNode2,
211 &IID_IHTMLDOMTextNode,
212 NULL
213 };
214
215 static const IID * const location_iids[] = {
216 &IID_IDispatch,
217 &IID_IHTMLLocation,
218 NULL
219 };
220
221 static const IID * const window_iids[] = {
222 &IID_IDispatch,
223 &IID_IHTMLWindow2,
224 &IID_IHTMLWindow3,
225 &IID_IDispatchEx,
226 NULL
227 };
228
229 static const IID * const comment_iids[] = {
230 &IID_IHTMLDOMNode,
231 &IID_IHTMLDOMNode2,
232 &IID_IHTMLElement,
233 &IID_IHTMLElement2,
234 &IID_IHTMLElement3,
235 &IID_IHTMLCommentElement,
236 &IID_IDispatchEx,
237 &IID_IConnectionPointContainer,
238 NULL
239 };
240
241 static const IID * const img_iids[] = {
242 &IID_IHTMLDOMNode,
243 &IID_IHTMLDOMNode2,
244 &IID_IHTMLElement,
245 &IID_IHTMLElement2,
246 &IID_IHTMLElement3,
247 &IID_IDispatchEx,
248 &IID_IHTMLImgElement,
249 &IID_IConnectionPointContainer,
250 NULL
251 };
252
253 static const IID * const tr_iids[] = {
254 &IID_IHTMLDOMNode,
255 &IID_IHTMLDOMNode2,
256 &IID_IHTMLElement,
257 &IID_IHTMLElement2,
258 &IID_IHTMLElement3,
259 &IID_IDispatchEx,
260 &IID_IHTMLTableRow,
261 &IID_IConnectionPointContainer,
262 NULL
263 };
264
265 static const IID * const td_iids[] = {
266 &IID_IHTMLDOMNode,
267 &IID_IHTMLDOMNode2,
268 &IID_IHTMLElement,
269 &IID_IHTMLElement2,
270 &IID_IHTMLElement3,
271 &IID_IDispatchEx,
272 &IID_IConnectionPointContainer,
273 NULL
274 };
275
276 static const IID * const iframe_iids[] = {
277 &IID_IHTMLDOMNode,
278 &IID_IHTMLDOMNode2,
279 &IID_IHTMLElement,
280 &IID_IHTMLElement2,
281 &IID_IHTMLElement3,
282 &IID_IHTMLFrameBase2,
283 &IID_IDispatchEx,
284 &IID_IConnectionPointContainer,
285 NULL
286 };
287
288 static const IID * const generic_iids[] = {
289 &IID_IHTMLDOMNode,
290 &IID_IHTMLDOMNode2,
291 &IID_IHTMLElement,
292 &IID_IHTMLElement2,
293 &IID_IHTMLElement3,
294 &IID_IHTMLGenericElement,
295 &IID_IDispatchEx,
296 &IID_IConnectionPointContainer,
297 NULL
298 };
299
300 static const IID * const style_iids[] = {
301 &IID_IUnknown,
302 &IID_IDispatch,
303 &IID_IDispatchEx,
304 &IID_IHTMLStyle,
305 &IID_IHTMLStyle2,
306 NULL
307 };
308
309 static const IID * const cstyle_iids[] = {
310 &IID_IUnknown,
311 &IID_IDispatch,
312 &IID_IDispatchEx,
313 &IID_IHTMLCurrentStyle,
314 NULL
315 };
316
317 typedef struct {
318 const char *tag;
319 REFIID *iids;
320 const IID *dispiid;
321 } elem_type_info_t;
322
323 static const elem_type_info_t elem_type_infos[] = {
324 {"", none_iids, NULL},
325 {"HTML", elem_iids, NULL},
326 {"HEAD", elem_iids, NULL},
327 {"TITLE", elem_iids, NULL},
328 {"BODY", body_iids, &DIID_DispHTMLBody},
329 {"A", anchor_iids, NULL},
330 {"INPUT", input_iids, &DIID_DispHTMLInputElement},
331 {"SELECT", select_iids, &DIID_DispHTMLSelectElement},
332 {"TEXTAREA", textarea_iids, NULL},
333 {"OPTION", option_iids, &DIID_DispHTMLOptionElement},
334 {"STYLE", elem_iids, NULL},
335 {"BLOCKQUOTE",elem_iids, NULL},
336 {"P", elem_iids, NULL},
337 {"BR", elem_iids, NULL},
338 {"TABLE", table_iids, &DIID_DispHTMLTable},
339 {"TBODY", elem_iids, NULL},
340 {"SCRIPT", script_iids, NULL},
341 {"TEST", elem_iids, &DIID_DispHTMLUnknownElement},
342 {"TEST", generic_iids, &DIID_DispHTMLGenericElement},
343 {"!", comment_iids, &DIID_DispHTMLCommentElement},
344 {"IMG", img_iids, &DIID_DispHTMLImg},
345 {"TR", tr_iids, &DIID_DispHTMLTableRow},
346 {"TD", td_iids, NULL},
347 {"IFRAME", iframe_iids, &DIID_DispHTMLIFrame}
348 };
349
350 static const char *dbgstr_w(LPCWSTR str)
351 {
352 static char buf[512];
353 if(!str)
354 return "(null)";
355 WideCharToMultiByte(CP_ACP, 0, str, -1, buf, sizeof(buf), NULL, NULL);
356 return buf;
357 }
358
359 static const char *dbgstr_guid(REFIID riid)
360 {
361 static char buf[50];
362
363 sprintf(buf, "{%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
364 riid->Data1, riid->Data2, riid->Data3, riid->Data4[0],
365 riid->Data4[1], riid->Data4[2], riid->Data4[3], riid->Data4[4],
366 riid->Data4[5], riid->Data4[6], riid->Data4[7]);
367
368 return buf;
369 }
370
371 static int strcmp_wa(LPCWSTR strw, const char *stra)
372 {
373 WCHAR buf[512];
374 MultiByteToWideChar(CP_ACP, 0, stra, -1, buf, sizeof(buf)/sizeof(WCHAR));
375 return lstrcmpW(strw, buf);
376 }
377
378 static BSTR a2bstr(const char *str)
379 {
380 BSTR ret;
381 int len;
382
383 len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
384 ret = SysAllocStringLen(NULL, len);
385 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
386
387 return ret;
388 }
389
390 static BOOL iface_cmp(IUnknown *iface1, IUnknown *iface2)
391 {
392 IUnknown *unk1, *unk2;
393
394 if(iface1 == iface2)
395 return TRUE;
396
397 IUnknown_QueryInterface(iface1, &IID_IUnknown, (void**)&unk1);
398 IUnknown_Release(unk1);
399 IUnknown_QueryInterface(iface1, &IID_IUnknown, (void**)&unk2);
400 IUnknown_Release(unk2);
401
402 return unk1 == unk2;
403 }
404
405 static IHTMLDocument2 *create_document(void)
406 {
407 IHTMLDocument2 *doc;
408 HRESULT hres;
409
410 hres = CoCreateInstance(&CLSID_HTMLDocument, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
411 &IID_IHTMLDocument2, (void**)&doc);
412 ok(hres == S_OK, "CoCreateInstance failed: %08x\n", hres);
413
414 return doc;
415 }
416
417 #define test_ifaces(i,ids) _test_ifaces(__LINE__,i,ids)
418 static void _test_ifaces(unsigned line, IUnknown *iface, REFIID *iids)
419 {
420 const IID * const *piid;
421 IUnknown *unk;
422 HRESULT hres;
423
424 for(piid = iids; *piid; piid++) {
425 hres = IDispatch_QueryInterface(iface, *piid, (void**)&unk);
426 ok_(__FILE__,line) (hres == S_OK, "Could not get %s interface: %08x\n", dbgstr_guid(*piid), hres);
427 if(SUCCEEDED(hres))
428 IUnknown_Release(unk);
429 }
430 }
431
432 #define test_disp(u,id) _test_disp(__LINE__,u,id)
433 static void _test_disp(unsigned line, IUnknown *unk, const IID *diid)
434 {
435 IDispatchEx *dispex;
436 ITypeInfo *typeinfo;
437 UINT ticnt;
438 HRESULT hres;
439
440 hres = IUnknown_QueryInterface(unk, &IID_IDispatchEx, (void**)&dispex);
441 ok_(__FILE__,line) (hres == S_OK, "Could not get IDispatch: %08x\n", hres);
442 if(FAILED(hres))
443 return;
444
445 ticnt = 0xdeadbeef;
446 hres = IDispatchEx_GetTypeInfoCount(dispex, &ticnt);
447 ok_(__FILE__,line) (hres == S_OK, "GetTypeInfoCount failed: %08x\n", hres);
448 ok_(__FILE__,line) (ticnt == 1, "ticnt=%u\n", ticnt);
449
450 hres = IDispatchEx_GetTypeInfo(dispex, 0, 0, &typeinfo);
451 ok_(__FILE__,line) (hres == S_OK, "GetTypeInfo failed: %08x\n", hres);
452
453 if(SUCCEEDED(hres)) {
454 TYPEATTR *type_attr;
455
456 hres = ITypeInfo_GetTypeAttr(typeinfo, &type_attr);
457 ok_(__FILE__,line) (hres == S_OK, "GetTypeAttr failed: %08x\n", hres);
458 ok_(__FILE__,line) (IsEqualGUID(&type_attr->guid, diid), "unexpected guid %s\n", dbgstr_guid(&type_attr->guid));
459
460 ITypeInfo_ReleaseTypeAttr(typeinfo, type_attr);
461 ITypeInfo_Release(typeinfo);
462 }
463
464 IDispatchEx_Release(dispex);
465 }
466
467 #define get_elem_iface(u) _get_elem_iface(__LINE__,u)
468 static IHTMLElement *_get_elem_iface(unsigned line, IUnknown *unk)
469 {
470 IHTMLElement *elem;
471 HRESULT hres;
472
473 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElement, (void**)&elem);
474 ok_(__FILE__,line) (hres == S_OK, "Coule not get IHTMLElement: %08x\n", hres);
475 return elem;
476 }
477
478 #define get_elem2_iface(u) _get_elem2_iface(__LINE__,u)
479 static IHTMLElement2 *_get_elem2_iface(unsigned line, IUnknown *unk)
480 {
481 IHTMLElement2 *elem;
482 HRESULT hres;
483
484 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElement2, (void**)&elem);
485 ok_(__FILE__,line) (hres == S_OK, "Coule not get IHTMLElement2: %08x\n", hres);
486 return elem;
487 }
488
489 #define get_elem3_iface(u) _get_elem3_iface(__LINE__,u)
490 static IHTMLElement3 *_get_elem3_iface(unsigned line, IUnknown *unk)
491 {
492 IHTMLElement3 *elem;
493 HRESULT hres;
494
495 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElement3, (void**)&elem);
496 ok_(__FILE__,line) (hres == S_OK, "Coule not get IHTMLElement3: %08x\n", hres);
497 return elem;
498 }
499
500 #define get_node_iface(u) _get_node_iface(__LINE__,u)
501 static IHTMLDOMNode *_get_node_iface(unsigned line, IUnknown *unk)
502 {
503 IHTMLDOMNode *node;
504 HRESULT hres;
505
506 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDOMNode, (void**)&node);
507 ok_(__FILE__,line) (hres == S_OK, "Coule not get IHTMLDOMNode: %08x\n", hres);
508 return node;
509 }
510
511 #define get_img_iface(u) _get_img_iface(__LINE__,u)
512 static IHTMLImgElement *_get_img_iface(unsigned line, IUnknown *unk)
513 {
514 IHTMLImgElement *img;
515 HRESULT hres;
516
517 hres = IUnknown_QueryInterface(unk, &IID_IHTMLImgElement, (void**)&img);
518 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLImgElement: %08x\n", hres);
519 return img;
520 }
521
522 #define test_node_name(u,n) _test_node_name(__LINE__,u,n)
523 static void _test_node_name(unsigned line, IUnknown *unk, const char *exname)
524 {
525 IHTMLDOMNode *node = _get_node_iface(line, unk);
526 BSTR name;
527 HRESULT hres;
528
529 hres = IHTMLDOMNode_get_nodeName(node, &name);
530 IHTMLDOMNode_Release(node);
531 ok_(__FILE__, line) (hres == S_OK, "get_nodeName failed: %08x\n", hres);
532 ok_(__FILE__, line) (!strcmp_wa(name, exname), "got name: %s, expected %s\n", dbgstr_w(name), exname);
533
534 SysFreeString(name);
535 }
536
537 #define test_elem_tag(u,n) _test_elem_tag(__LINE__,u,n)
538 static void _test_elem_tag(unsigned line, IUnknown *unk, const char *extag)
539 {
540 IHTMLElement *elem = _get_elem_iface(line, unk);
541 BSTR tag;
542 HRESULT hres;
543
544 hres = IHTMLElement_get_tagName(elem, &tag);
545 IHTMLElement_Release(elem);
546 ok_(__FILE__, line) (hres == S_OK, "get_tagName failed: %08x\n", hres);
547 ok_(__FILE__, line) (!strcmp_wa(tag, extag), "got tag: %s, expected %s\n", dbgstr_w(tag), extag);
548
549 SysFreeString(tag);
550 }
551
552 #define test_elem_type(ifc,t) _test_elem_type(__LINE__,ifc,t)
553 static void _test_elem_type(unsigned line, IUnknown *unk, elem_type_t type)
554 {
555 _test_elem_tag(line, unk, elem_type_infos[type].tag);
556 _test_ifaces(line, unk, elem_type_infos[type].iids);
557
558 if(elem_type_infos[type].dispiid)
559 _test_disp(line, unk, elem_type_infos[type].dispiid);
560 }
561
562 #define get_node_type(n) _get_node_type(__LINE__,n)
563 static long _get_node_type(unsigned line, IUnknown *unk)
564 {
565 IHTMLDOMNode *node = _get_node_iface(line, unk);
566 long type = -1;
567 HRESULT hres;
568
569 hres = IHTMLDOMNode_get_nodeType(node, &type);
570 ok(hres == S_OK, "get_nodeType failed: %08x\n", hres);
571
572 IHTMLDOMNode_Release(node);
573
574 return type;
575 }
576
577 #define get_child_nodes(u) _get_child_nodes(__LINE__,u)
578 static IHTMLDOMChildrenCollection *_get_child_nodes(unsigned line, IUnknown *unk)
579 {
580 IHTMLDOMNode *node = _get_node_iface(line, unk);
581 IHTMLDOMChildrenCollection *col = NULL;
582 IDispatch *disp;
583 HRESULT hres;
584
585 hres = IHTMLDOMNode_get_childNodes(node, &disp);
586 IHTMLDOMNode_Release(node);
587 ok_(__FILE__,line) (hres == S_OK, "get_childNodes failed: %08x\n", hres);
588 if(FAILED(hres))
589 return NULL;
590
591 hres = IDispatch_QueryInterface(disp, &IID_IHTMLDOMChildrenCollection, (void**)&col);
592 IDispatch_Release(disp);
593 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLDOMChildrenCollection: %08x\n", hres);
594
595 return col;
596 }
597
598 #define get_child_item(c,i) _get_child_item(__LINE__,c,i)
599 static IHTMLDOMNode *_get_child_item(unsigned line, IHTMLDOMChildrenCollection *col, long idx)
600 {
601 IHTMLDOMNode *node = NULL;
602 IDispatch *disp;
603 HRESULT hres;
604
605 hres = IHTMLDOMChildrenCollection_item(col, idx, &disp);
606 ok(hres == S_OK, "item failed: %08x\n", hres);
607
608 node = _get_node_iface(line, (IUnknown*)disp);
609 IDispatch_Release(disp);
610
611 return node;
612 }
613
614 #define test_elem_attr(e,n,v) _test_elem_attr(__LINE__,e,n,v)
615 static void _test_elem_attr(unsigned line, IHTMLElement *elem, LPCWSTR name, LPCWSTR exval)
616 {
617 VARIANT value;
618 BSTR tmp;
619 HRESULT hres;
620
621 VariantInit(&value);
622
623 tmp = SysAllocString(name);
624 hres = IHTMLElement_getAttribute(elem, tmp, 0, &value);
625 SysFreeString(tmp);
626 ok_(__FILE__,line) (hres == S_OK, "getAttribute failed: %08x\n", hres);
627
628 if(exval) {
629 ok_(__FILE__,line) (V_VT(&value) == VT_BSTR, "vt=%d\n", V_VT(&value));
630 ok_(__FILE__,line) (!lstrcmpW(exval, V_BSTR(&value)), "unexpected value %s\n", dbgstr_w(V_BSTR(&value)));
631 }else {
632 ok_(__FILE__,line) (V_VT(&value) == VT_NULL, "vt=%d\n", V_VT(&value));
633 }
634
635 VariantClear(&value);
636 }
637
638 #define test_elem_offset(u) _test_elem_offset(__LINE__,u)
639 static void _test_elem_offset(unsigned line, IUnknown *unk)
640 {
641 IHTMLElement *elem = _get_elem_iface(line, unk);
642 long l;
643 HRESULT hres;
644
645 hres = IHTMLElement_get_offsetTop(elem, &l);
646 ok_(__FILE__,line) (hres == S_OK, "get_offsetTop failed: %08x\n", hres);
647
648 hres = IHTMLElement_get_offsetHeight(elem, &l);
649 ok_(__FILE__,line) (hres == S_OK, "get_offsetHeight failed: %08x\n", hres);
650
651 hres = IHTMLElement_get_offsetWidth(elem, &l);
652 ok_(__FILE__,line) (hres == S_OK, "get_offsetWidth failed: %08x\n", hres);
653
654 IHTMLElement_Release(elem);
655 }
656
657 static void test_doc_elem(IHTMLDocument2 *doc)
658 {
659 IHTMLElement *elem;
660 IHTMLDocument3 *doc3;
661 HRESULT hres;
662
663 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3);
664 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument3) failed: %08x\n", hres);
665
666 hres = IHTMLDocument3_get_documentElement(doc3, &elem);
667 IHTMLDocument3_Release(doc3);
668 ok(hres == S_OK, "get_documentElement failed: %08x\n", hres);
669
670 test_node_name((IUnknown*)elem, "HTML");
671 test_elem_tag((IUnknown*)elem, "HTML");
672
673 IHTMLElement_Release(elem);
674 }
675
676 #define get_doc_elem(d) _get_doc_elem(__LINE__,d)
677 static IHTMLElement *_get_doc_elem(unsigned line, IHTMLDocument2 *doc)
678 {
679 IHTMLElement *elem;
680 IHTMLDocument3 *doc3;
681 HRESULT hres;
682
683 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3);
684 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLDocument3 interface: %08x\n", hres);
685 hres = IHTMLDocument3_get_documentElement(doc3, &elem);
686 ok_(__FILE__,line) (hres == S_OK, "get_documentElement failed: %08x\n", hres);
687 IHTMLDocument3_Release(doc3);
688
689 return elem;
690 }
691
692 #define test_option_text(o,t) _test_option_text(__LINE__,o,t)
693 static void _test_option_text(unsigned line, IHTMLOptionElement *option, const char *text)
694 {
695 BSTR bstr;
696 HRESULT hres;
697
698 hres = IHTMLOptionElement_get_text(option, &bstr);
699 ok_(__FILE__,line) (hres == S_OK, "get_text failed: %08x\n", hres);
700 ok_(__FILE__,line) (!strcmp_wa(bstr, text), "text=%s\n", dbgstr_w(bstr));
701 SysFreeString(bstr);
702 }
703
704 #define test_option_put_text(o,t) _test_option_put_text(__LINE__,o,t)
705 static void _test_option_put_text(unsigned line, IHTMLOptionElement *option, const char *text)
706 {
707 BSTR bstr;
708 HRESULT hres;
709
710 bstr = a2bstr(text);
711 hres = IHTMLOptionElement_put_text(option, bstr);
712 SysFreeString(bstr);
713 ok(hres == S_OK, "put_text failed: %08x\n", hres);
714
715 _test_option_text(line, option, text);
716 }
717
718 #define test_option_value(o,t) _test_option_value(__LINE__,o,t)
719 static void _test_option_value(unsigned line, IHTMLOptionElement *option, const char *value)
720 {
721 BSTR bstr;
722 HRESULT hres;
723
724 hres = IHTMLOptionElement_get_value(option, &bstr);
725 ok_(__FILE__,line) (hres == S_OK, "get_value failed: %08x\n", hres);
726 ok_(__FILE__,line) (!strcmp_wa(bstr, value), "value=%s\n", dbgstr_w(bstr));
727 SysFreeString(bstr);
728 }
729
730 #define test_option_put_value(o,t) _test_option_put_value(__LINE__,o,t)
731 static void _test_option_put_value(unsigned line, IHTMLOptionElement *option, const char *value)
732 {
733 BSTR bstr;
734 HRESULT hres;
735
736 bstr = a2bstr(value);
737 hres = IHTMLOptionElement_put_value(option, bstr);
738 SysFreeString(bstr);
739 ok(hres == S_OK, "put_value failed: %08x\n", hres);
740
741 _test_option_value(line, option, value);
742 }
743
744 #define create_option_elem(d,t,v) _create_option_elem(__LINE__,d,t,v)
745 static IHTMLOptionElement *_create_option_elem(unsigned line, IHTMLDocument2 *doc,
746 const char *txt, const char *val)
747 {
748 IHTMLOptionElementFactory *factory;
749 IHTMLOptionElement *option;
750 IHTMLWindow2 *window;
751 VARIANT text, value, empty;
752 HRESULT hres;
753
754 hres = IHTMLDocument2_get_parentWindow(doc, &window);
755 ok_(__FILE__,line) (hres == S_OK, "get_parentElement failed: %08x\n", hres);
756
757 hres = IHTMLWindow2_get_Option(window, &factory);
758 IHTMLWindow2_Release(window);
759 ok_(__FILE__,line) (hres == S_OK, "get_Option failed: %08x\n", hres);
760
761 V_VT(&text) = VT_BSTR;
762 V_BSTR(&text) = a2bstr(txt);
763 V_VT(&value) = VT_BSTR;
764 V_BSTR(&value) = a2bstr(val);
765 V_VT(&empty) = VT_EMPTY;
766
767 hres = IHTMLOptionElementFactory_create(factory, text, value, empty, empty, &option);
768 ok_(__FILE__,line) (hres == S_OK, "create failed: %08x\n", hres);
769
770 IHTMLOptionElementFactory_Release(factory);
771 VariantClear(&text);
772 VariantClear(&value);
773
774 _test_option_text(line, option, txt);
775 _test_option_value(line, option, val);
776
777 return option;
778 }
779
780 #define test_select_length(s,l) _test_select_length(__LINE__,s,l)
781 static void _test_select_length(unsigned line, IHTMLSelectElement *select, long length)
782 {
783 long len = 0xdeadbeef;
784 HRESULT hres;
785
786 hres = IHTMLSelectElement_get_length(select, &len);
787 ok_(__FILE__,line) (hres == S_OK, "get_length failed: %08x\n", hres);
788 ok_(__FILE__,line) (len == length, "len=%ld, expected %ld\n", len, length);
789 }
790
791 #define test_select_selidx(s,i) _test_select_selidx(__LINE__,s,i)
792 static void _test_select_selidx(unsigned line, IHTMLSelectElement *select, long index)
793 {
794 long idx = 0xdeadbeef;
795 HRESULT hres;
796
797 hres = IHTMLSelectElement_get_selectedIndex(select, &idx);
798 ok_(__FILE__,line) (hres == S_OK, "get_selectedIndex failed: %08x\n", hres);
799 ok_(__FILE__,line) (idx == index, "idx=%ld, expected %ld\n", idx, index);
800 }
801
802 #define test_select_put_selidx(s,i) _test_select_put_selidx(__LINE__,s,i)
803 static void _test_select_put_selidx(unsigned line, IHTMLSelectElement *select, long index)
804 {
805 HRESULT hres;
806
807 hres = IHTMLSelectElement_put_selectedIndex(select, index);
808 ok_(__FILE__,line) (hres == S_OK, "get_selectedIndex failed: %08x\n", hres);
809 _test_select_selidx(line, select, index);
810 }
811
812 #define test_select_value(s,v) _test_select_value(__LINE__,s,v)
813 static void _test_select_value(unsigned line, IHTMLSelectElement *select, const char *exval)
814 {
815 BSTR val;
816 HRESULT hres;
817
818 hres = IHTMLSelectElement_get_value(select, &val);
819 ok_(__FILE__,line) (hres == S_OK, "get_value failed: %08x\n", hres);
820 if(exval)
821 ok_(__FILE__,line) (!strcmp_wa(val, exval), "unexpected value %s\n", dbgstr_w(val));
822 else
823 ok_(__FILE__,line) (val == NULL, "val=%s, expected NULL\n", dbgstr_w(val));
824 }
825
826 #define test_select_set_value(s,v) _test_select_set_value(__LINE__,s,v)
827 static void _test_select_set_value(unsigned line, IHTMLSelectElement *select, const char *val)
828 {
829 BSTR bstr;
830 HRESULT hres;
831
832 bstr = a2bstr(val);
833 hres = IHTMLSelectElement_put_value(select, bstr);
834 SysFreeString(bstr);
835 ok_(__FILE__,line) (hres == S_OK, "put_value failed: %08x\n", hres);
836 }
837
838 #define test_select_type(s,t) _test_select_type(__LINE__,s,t)
839 static void _test_select_type(unsigned line, IHTMLSelectElement *select, const char *extype)
840 {
841 BSTR type;
842 HRESULT hres;
843
844 hres = IHTMLSelectElement_get_type(select, &type);
845 ok_(__FILE__,line) (hres == S_OK, "get_type failed: %08x\n", hres);
846 ok_(__FILE__,line) (!strcmp_wa(type, extype), "type=%s, expected %s\n", dbgstr_w(type), extype);
847 }
848
849 #define test_range_text(r,t) _test_range_text(__LINE__,r,t)
850 static void _test_range_text(unsigned line, IHTMLTxtRange *range, const char *extext)
851 {
852 BSTR text;
853 HRESULT hres;
854
855 hres = IHTMLTxtRange_get_text(range, &text);
856 ok_(__FILE__, line) (hres == S_OK, "get_text failed: %08x\n", hres);
857
858 if(extext) {
859 ok_(__FILE__, line) (text != NULL, "text == NULL\n");
860 ok_(__FILE__, line) (!strcmp_wa(text, extext), "text=\"%s\", expected \"%s\"\n", dbgstr_w(text), extext);
861 }else {
862 ok_(__FILE__, line) (text == NULL, "text=\"%s\", expected NULL\n", dbgstr_w(text));
863 }
864
865 SysFreeString(text);
866
867 }
868
869 #define test_range_collapse(r,b) _test_range_collapse(__LINE__,r,b)
870 static void _test_range_collapse(unsigned line, IHTMLTxtRange *range, BOOL b)
871 {
872 HRESULT hres;
873
874 hres = IHTMLTxtRange_collapse(range, b);
875 ok_(__FILE__, line) (hres == S_OK, "collapse failed: %08x\n", hres);
876 _test_range_text(line, range, NULL);
877 }
878
879 #define test_range_expand(r,u,b,t) _test_range_expand(__LINE__,r,u,b,t)
880 static void _test_range_expand(unsigned line, IHTMLTxtRange *range, LPWSTR unit,
881 VARIANT_BOOL exb, const char *extext)
882 {
883 VARIANT_BOOL b = 0xe0e0;
884 HRESULT hres;
885
886 hres = IHTMLTxtRange_expand(range, unit, &b);
887 ok_(__FILE__,line) (hres == S_OK, "expand failed: %08x\n", hres);
888 ok_(__FILE__,line) (b == exb, "b=%x, expected %x\n", b, exb);
889 _test_range_text(line, range, extext);
890 }
891
892 #define test_range_move(r,u,c,e) _test_range_move(__LINE__,r,u,c,e)
893 static void _test_range_move(unsigned line, IHTMLTxtRange *range, LPWSTR unit, long cnt, long excnt)
894 {
895 long c = 0xdeadbeef;
896 HRESULT hres;
897
898 hres = IHTMLTxtRange_move(range, unit, cnt, &c);
899 ok_(__FILE__,line) (hres == S_OK, "move failed: %08x\n", hres);
900 ok_(__FILE__,line) (c == excnt, "count=%ld, expected %ld\n", c, excnt);
901 _test_range_text(line, range, NULL);
902 }
903
904 #define test_range_movestart(r,u,c,e) _test_range_movestart(__LINE__,r,u,c,e)
905 static void _test_range_movestart(unsigned line, IHTMLTxtRange *range,
906 LPWSTR unit, long cnt, long excnt)
907 {
908 long c = 0xdeadbeef;
909 HRESULT hres;
910
911 hres = IHTMLTxtRange_moveStart(range, unit, cnt, &c);
912 ok_(__FILE__,line) (hres == S_OK, "move failed: %08x\n", hres);
913 ok_(__FILE__,line) (c == excnt, "count=%ld, expected %ld\n", c, excnt);
914 }
915
916 #define test_range_moveend(r,u,c,e) _test_range_moveend(__LINE__,r,u,c,e)
917 static void _test_range_moveend(unsigned line, IHTMLTxtRange *range, LPWSTR unit, long cnt, long excnt)
918 {
919 long c = 0xdeadbeef;
920 HRESULT hres;
921
922 hres = IHTMLTxtRange_moveEnd(range, unit, cnt, &c);
923 ok_(__FILE__,line) (hres == S_OK, "move failed: %08x\n", hres);
924 ok_(__FILE__,line) (c == excnt, "count=%ld, expected %ld\n", c, excnt);
925 }
926
927 #define test_range_put_text(r,t) _test_range_put_text(__LINE__,r,t)
928 static void _test_range_put_text(unsigned line, IHTMLTxtRange *range, const char *text)
929 {
930 HRESULT hres;
931 BSTR bstr = a2bstr(text);
932
933 hres = IHTMLTxtRange_put_text(range, bstr);
934 ok_(__FILE__,line) (hres == S_OK, "put_text failed: %08x\n", hres);
935 SysFreeString(bstr);
936 _test_range_text(line, range, NULL);
937 }
938
939 #define test_range_inrange(r1,r2,b) _test_range_inrange(__LINE__,r1,r2,b)
940 static void _test_range_inrange(unsigned line, IHTMLTxtRange *range1, IHTMLTxtRange *range2, VARIANT_BOOL exb)
941 {
942 VARIANT_BOOL b;
943 HRESULT hres;
944
945 b = 0xe0e0;
946 hres = IHTMLTxtRange_inRange(range1, range2, &b);
947 ok_(__FILE__,line) (hres == S_OK, "(1->2) isEqual failed: %08x\n", hres);
948 ok_(__FILE__,line) (b == exb, "(1->2) b=%x, expected %x\n", b, exb);
949 }
950
951 #define test_range_isequal(r1,r2,b) _test_range_isequal(__LINE__,r1,r2,b)
952 static void _test_range_isequal(unsigned line, IHTMLTxtRange *range1, IHTMLTxtRange *range2, VARIANT_BOOL exb)
953 {
954 VARIANT_BOOL b;
955 HRESULT hres;
956
957 b = 0xe0e0;
958 hres = IHTMLTxtRange_isEqual(range1, range2, &b);
959 ok_(__FILE__,line) (hres == S_OK, "(1->2) isEqual failed: %08x\n", hres);
960 ok_(__FILE__,line) (b == exb, "(1->2) b=%x, expected %x\n", b, exb);
961
962 b = 0xe0e0;
963 hres = IHTMLTxtRange_isEqual(range2, range1, &b);
964 ok_(__FILE__,line) (hres == S_OK, "(2->1) isEqual failed: %08x\n", hres);
965 ok_(__FILE__,line) (b == exb, "(2->1) b=%x, expected %x\n", b, exb);
966
967 if(exb) {
968 test_range_inrange(range1, range2, VARIANT_TRUE);
969 test_range_inrange(range2, range1, VARIANT_TRUE);
970 }
971 }
972
973 #define test_range_parent(r,t) _test_range_parent(__LINE__,r,t)
974 static void _test_range_parent(unsigned line, IHTMLTxtRange *range, elem_type_t type)
975 {
976 IHTMLElement *elem;
977 HRESULT hres;
978
979 hres = IHTMLTxtRange_parentElement(range, &elem);
980 ok_(__FILE__,line) (hres == S_OK, "parentElement failed: %08x\n", hres);
981
982 _test_elem_type(line, (IUnknown*)elem, type);
983
984 IHTMLElement_Release(elem);
985 }
986
987 #define test_elem_collection(c,t,l) _test_elem_collection(__LINE__,c,t,l)
988 static void _test_elem_collection(unsigned line, IUnknown *unk,
989 const elem_type_t *elem_types, long exlen)
990 {
991 IHTMLElementCollection *col;
992 long len;
993 DWORD i;
994 VARIANT name, index;
995 IDispatch *disp;
996 HRESULT hres;
997
998 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElementCollection, (void**)&col);
999 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLElementCollection: %08x\n", hres);
1000
1001 test_disp((IUnknown*)col, &DIID_DispHTMLElementCollection);
1002
1003 hres = IHTMLElementCollection_get_length(col, &len);
1004 ok_(__FILE__,line) (hres == S_OK, "get_length failed: %08x\n", hres);
1005 ok_(__FILE__,line) (len == exlen, "len=%ld, expected %ld\n", len, exlen);
1006
1007 if(len > exlen)
1008 len = exlen;
1009
1010 V_VT(&index) = VT_EMPTY;
1011 V_VT(&name) = VT_I4;
1012
1013 for(i=0; i<len; i++) {
1014 V_I4(&name) = i;
1015 disp = (void*)0xdeadbeef;
1016 hres = IHTMLElementCollection_item(col, name, index, &disp);
1017 ok_(__FILE__,line) (hres == S_OK, "item(%d) failed: %08x\n", i, hres);
1018 ok_(__FILE__,line) (disp != NULL, "item returned NULL\n");
1019 if(FAILED(hres) || !disp)
1020 continue;
1021
1022 _test_elem_type(line, (IUnknown*)disp, elem_types[i]);
1023 IDispatch_Release(disp);
1024 }
1025
1026 V_I4(&name) = len;
1027 disp = (void*)0xdeadbeef;
1028 hres = IHTMLElementCollection_item(col, name, index, &disp);
1029 ok_(__FILE__,line) (hres == S_OK, "item failed: %08x\n", hres);
1030 ok_(__FILE__,line) (disp == NULL, "disp != NULL\n");
1031
1032 V_I4(&name) = -1;
1033 disp = (void*)0xdeadbeef;
1034 hres = IHTMLElementCollection_item(col, name, index, &disp);
1035 ok_(__FILE__,line) (hres == E_INVALIDARG, "item failed: %08x, expected E_INVALIDARG\n", hres);
1036 ok_(__FILE__,line) (disp == NULL, "disp != NULL\n");
1037
1038 IHTMLElementCollection_Release(col);
1039 }
1040
1041 #define test_elem_getelembytag(u,t,l) _test_elem_getelembytag(__LINE__,u,t,l)
1042 static void _test_elem_getelembytag(unsigned line, IUnknown *unk, elem_type_t type, long exlen)
1043 {
1044 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1045 IHTMLElementCollection *col = NULL;
1046 elem_type_t *types = NULL;
1047 BSTR tmp;
1048 int i;
1049 HRESULT hres;
1050
1051 tmp = a2bstr(elem_type_infos[type].tag);
1052 hres = IHTMLElement2_getElementsByTagName(elem, tmp, &col);
1053 SysFreeString(tmp);
1054 IHTMLElement2_Release(elem);
1055 ok_(__FILE__,line) (hres == S_OK, "getElementByTagName failed: %08x\n", hres);
1056 ok_(__FILE__,line) (col != NULL, "col == NULL\n");
1057
1058 if(exlen) {
1059 types = HeapAlloc(GetProcessHeap(), 0, exlen*sizeof(elem_type_t));
1060 for(i=0; i<exlen; i++)
1061 types[i] = type;
1062 }
1063
1064 _test_elem_collection(line, (IUnknown*)col, types, exlen);
1065
1066 HeapFree(GetProcessHeap(), 0, types);
1067 }
1068
1069 #define test_elem_innertext(e,t) _test_elem_innertext(__LINE__,e,t)
1070 static void _test_elem_innertext(unsigned line, IHTMLElement *elem, const char *extext)
1071 {
1072 BSTR text = NULL;
1073 HRESULT hres;
1074
1075 hres = IHTMLElement_get_innerText(elem, &text);
1076 ok_(__FILE__,line) (hres == S_OK, "get_innerText failed: %08x\n", hres);
1077 ok_(__FILE__,line) (!strcmp_wa(text, extext), "get_innerText returned %s expected %s\n",
1078 dbgstr_w(text), extext);
1079 SysFreeString(text);
1080 }
1081
1082 #define test_elem_set_innertext(e,t) _test_elem_set_innertext(__LINE__,e,t)
1083 static void _test_elem_set_innertext(unsigned line, IHTMLElement *elem, const char *text)
1084 {
1085 IHTMLDOMChildrenCollection *col;
1086 BSTR str;
1087 HRESULT hres;
1088
1089 str = a2bstr(text);
1090 hres = IHTMLElement_put_innerText(elem, str);
1091 ok_(__FILE__,line) (hres == S_OK, "put_innerText failed: %08x\n", hres);
1092 SysFreeString(str);
1093
1094 _test_elem_innertext(line, elem, text);
1095
1096
1097 col = _get_child_nodes(line, (IUnknown*)elem);
1098 ok(col != NULL, "col == NULL\n");
1099 if(col) {
1100 long length = 0, type;
1101 IHTMLDOMNode *node;
1102
1103 hres = IHTMLDOMChildrenCollection_get_length(col, &length);
1104 ok(hres == S_OK, "get_length failed: %08x\n", hres);
1105 ok(length == 1, "length = %ld\n", length);
1106
1107 node = _get_child_item(line, col, 0);
1108 ok(node != NULL, "node == NULL\n");
1109 if(node) {
1110 type = _get_node_type(line, (IUnknown*)node);
1111 ok(type == 3, "type=%ld\n", type);
1112 IHTMLDOMNode_Release(node);
1113 }
1114
1115 IHTMLDOMChildrenCollection_Release(col);
1116 }
1117
1118 }
1119
1120 #define get_first_child(n) _get_first_child(__LINE__,n)
1121 static IHTMLDOMNode *_get_first_child(unsigned line, IUnknown *unk)
1122 {
1123 IHTMLDOMNode *node = _get_node_iface(line, unk);
1124 IHTMLDOMNode *child = NULL;
1125 HRESULT hres;
1126
1127 hres = IHTMLDOMNode_get_firstChild(node, &child);
1128 IHTMLDOMNode_Release(node);
1129 ok_(__FILE__,line) (hres == S_OK, "get_firstChild failed: %08x\n", hres);
1130
1131 return child;
1132 }
1133
1134 #define test_node_has_child(u,b) _test_node_has_child(__LINE__,u,b)
1135 static void _test_node_has_child(unsigned line, IUnknown *unk, VARIANT_BOOL exb)
1136 {
1137 IHTMLDOMNode *node = _get_node_iface(line, unk);
1138 VARIANT_BOOL b = 0xdead;
1139 HRESULT hres;
1140
1141 hres = IHTMLDOMNode_hasChildNodes(node, &b);
1142 ok_(__FILE__,line) (hres == S_OK, "hasChildNodes failed: %08x\n", hres);
1143 ok_(__FILE__,line) (b == exb, "hasChildNodes=%x, expected %x\n", b, exb);
1144
1145 IHTMLDOMNode_Release(node);
1146 }
1147
1148 #define test_node_get_parent(u) _test_node_get_parent(__LINE__,u)
1149 static IHTMLDOMNode *_test_node_get_parent(unsigned line, IUnknown *unk)
1150 {
1151 IHTMLDOMNode *node = _get_node_iface(line, unk);
1152 IHTMLDOMNode *parent;
1153 HRESULT hres;
1154
1155 hres = IHTMLDOMNode_get_parentNode(node, &parent);
1156 IHTMLDOMNode_Release(node);
1157 ok_(__FILE__,line) (hres == S_OK, "get_parentNode failed: %08x\n", hres);
1158
1159 return parent;
1160 }
1161
1162 #define test_elem_get_parent(u) _test_elem_get_parent(__LINE__,u)
1163 static IHTMLElement *_test_elem_get_parent(unsigned line, IUnknown *unk)
1164 {
1165 IHTMLElement *elem = _get_elem_iface(line, unk);
1166 IHTMLElement *parent;
1167 HRESULT hres;
1168
1169 hres = IHTMLElement_get_parentElement(elem, &parent);
1170 IHTMLElement_Release(elem);
1171 ok_(__FILE__,line) (hres == S_OK, "get_parentElement failed: %08x\n", hres);
1172
1173 return parent;
1174 }
1175
1176 #define test_elem3_get_disabled(i,b) _test_elem3_get_disabled(__LINE__,i,b)
1177 static void _test_elem3_get_disabled(unsigned line, IUnknown *unk, VARIANT_BOOL exb)
1178 {
1179 IHTMLElement3 *elem3 = _get_elem3_iface(line, unk);
1180 VARIANT_BOOL disabled = 100;
1181 HRESULT hres;
1182
1183 hres = IHTMLElement3_get_disabled(elem3, &disabled);
1184 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1185 ok_(__FILE__,line) (disabled == exb, "disabled=%x, expected %x\n", disabled, exb);
1186 IHTMLElement3_Release(elem3);
1187 }
1188
1189 #define test_elem3_set_disabled(i,b) _test_elem3_set_disabled(__LINE__,i,b)
1190 static void _test_elem3_set_disabled(unsigned line, IUnknown *unk, VARIANT_BOOL b)
1191 {
1192 IHTMLElement3 *elem3 = _get_elem3_iface(line, unk);
1193 HRESULT hres;
1194
1195 hres = IHTMLElement3_put_disabled(elem3, b);
1196 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1197
1198 IHTMLElement3_Release(elem3);
1199 _test_elem3_get_disabled(line, unk, b);
1200 }
1201
1202 #define test_select_get_disabled(i,b) _test_select_get_disabled(__LINE__,i,b)
1203 static void _test_select_get_disabled(unsigned line, IHTMLSelectElement *select, VARIANT_BOOL exb)
1204 {
1205 VARIANT_BOOL disabled = 100;
1206 HRESULT hres;
1207
1208 hres = IHTMLSelectElement_get_disabled(select, &disabled);
1209 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1210 ok_(__FILE__,line) (disabled == exb, "disabled=%x, expected %x\n", disabled, exb);
1211
1212 _test_elem3_get_disabled(line, (IUnknown*)select, exb);
1213 }
1214
1215 #define test_select_set_disabled(i,b) _test_select_set_disabled(__LINE__,i,b)
1216 static void _test_select_set_disabled(unsigned line, IHTMLSelectElement *select, VARIANT_BOOL b)
1217 {
1218 HRESULT hres;
1219
1220 hres = IHTMLSelectElement_put_disabled(select, b);
1221 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1222
1223 _test_select_get_disabled(line, select, b);
1224 }
1225
1226 #define elem_get_scroll_height(u) _elem_get_scroll_height(__LINE__,u)
1227 static long _elem_get_scroll_height(unsigned line, IUnknown *unk)
1228 {
1229 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1230 IHTMLTextContainer *txtcont;
1231 long l = -1, l2 = -1;
1232 HRESULT hres;
1233
1234 hres = IHTMLElement2_get_scrollHeight(elem, &l);
1235 ok_(__FILE__,line) (hres == S_OK, "get_scrollHeight failed: %08x\n", hres);
1236 IHTMLElement2_Release(elem);
1237
1238 hres = IUnknown_QueryInterface(unk, &IID_IHTMLTextContainer, (void**)&txtcont);
1239 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLTextContainer: %08x\n", hres);
1240
1241 hres = IHTMLTextContainer_get_scrollHeight(txtcont, &l2);
1242 IHTMLTextContainer_Release(txtcont);
1243 ok_(__FILE__,line) (hres == S_OK, "IHTMLTextContainer::get_scrollHeight failed: %ld\n", l2);
1244 ok_(__FILE__,line) (l == l2, "unexpected height %ld, expected %ld\n", l2, l);
1245
1246 return l;
1247 }
1248
1249 #define elem_get_scroll_width(u) _elem_get_scroll_width(__LINE__,u)
1250 static long _elem_get_scroll_width(unsigned line, IUnknown *unk)
1251 {
1252 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1253 IHTMLTextContainer *txtcont;
1254 long l = -1, l2 = -1;
1255 HRESULT hres;
1256
1257 hres = IHTMLElement2_get_scrollWidth(elem, &l);
1258 ok_(__FILE__,line) (hres == S_OK, "get_scrollWidth failed: %08x\n", hres);
1259 IHTMLElement2_Release(elem);
1260
1261 hres = IUnknown_QueryInterface(unk, &IID_IHTMLTextContainer, (void**)&txtcont);
1262 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLTextContainer: %08x\n", hres);
1263
1264 hres = IHTMLTextContainer_get_scrollWidth(txtcont, &l2);
1265 IHTMLTextContainer_Release(txtcont);
1266 ok_(__FILE__,line) (hres == S_OK, "IHTMLTextContainer::get_scrollWidth failed: %ld\n", l2);
1267 ok_(__FILE__,line) (l == l2, "unexpected width %ld, expected %ld\n", l2, l);
1268
1269 return l;
1270 }
1271
1272 #define elem_get_scroll_top(u) _elem_get_scroll_top(__LINE__,u)
1273 static long _elem_get_scroll_top(unsigned line, IUnknown *unk)
1274 {
1275 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1276 IHTMLTextContainer *txtcont;
1277 long l = -1, l2 = -1;
1278 HRESULT hres;
1279
1280 hres = IHTMLElement2_get_scrollTop(elem, &l);
1281 ok_(__FILE__,line) (hres == S_OK, "get_scrollTop failed: %08x\n", hres);
1282 IHTMLElement2_Release(elem);
1283
1284 hres = IUnknown_QueryInterface(unk, &IID_IHTMLTextContainer, (void**)&txtcont);
1285 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLTextContainer: %08x\n", hres);
1286
1287 hres = IHTMLTextContainer_get_scrollTop(txtcont, &l2);
1288 IHTMLTextContainer_Release(txtcont);
1289 ok_(__FILE__,line) (hres == S_OK, "IHTMLTextContainer::get_scrollTop failed: %ld\n", l2);
1290 ok_(__FILE__,line) (l == l2, "unexpected top %ld, expected %ld\n", l2, l);
1291
1292 return l;
1293 }
1294
1295 #define elem_get_scroll_left(u) _elem_get_scroll_left(__LINE__,u)
1296 static void _elem_get_scroll_left(unsigned line, IUnknown *unk)
1297 {
1298 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1299 IHTMLTextContainer *txtcont;
1300 long l = -1, l2 = -1;
1301 HRESULT hres;
1302
1303 hres = IHTMLElement2_get_scrollLeft(elem, NULL);
1304 ok(hres == E_INVALIDARG, "expect E_INVALIDARG got 0x%08x\n", hres);
1305
1306 hres = IHTMLElement2_get_scrollLeft(elem, &l);
1307 ok(hres == S_OK, "get_scrollTop failed: %08x\n", hres);
1308 IHTMLElement2_Release(elem);
1309
1310 hres = IUnknown_QueryInterface(unk, &IID_IHTMLTextContainer, (void**)&txtcont);
1311 ok(hres == S_OK, "Could not get IHTMLTextContainer: %08x\n", hres);
1312
1313 hres = IHTMLTextContainer_get_scrollLeft(txtcont, &l2);
1314 IHTMLTextContainer_Release(txtcont);
1315 ok(hres == S_OK, "IHTMLTextContainer::get_scrollLeft failed: %ld\n", l2);
1316 ok(l == l2, "unexpected left %ld, expected %ld\n", l2, l);
1317 }
1318
1319 #define test_img_src(i,s) _test_img_src(__LINE__,i,s)
1320 static void _test_img_src(unsigned line, IUnknown *unk, const char *exsrc)
1321 {
1322 IHTMLImgElement *img = _get_img_iface(line, unk);
1323 BSTR src;
1324 HRESULT hres;
1325
1326 hres = IHTMLImgElement_get_src(img, &src);
1327 IHTMLImgElement_Release(img);
1328 ok_(__FILE__,line) (hres == S_OK, "get_src failed: %08x\n", hres);
1329 ok_(__FILE__,line) (!strcmp_wa(src, exsrc), "get_src returned %s expected %s\n", dbgstr_w(src), exsrc);
1330 SysFreeString(src);
1331 }
1332
1333 #define test_img_set_src(u,s) _test_img_set_src(__LINE__,u,s)
1334 static void _test_img_set_src(unsigned line, IUnknown *unk, const char *src)
1335 {
1336 IHTMLImgElement *img = _get_img_iface(line, unk);
1337 BSTR tmp;
1338 HRESULT hres;
1339
1340 tmp = a2bstr(src);
1341 hres = IHTMLImgElement_put_src(img, tmp);
1342 IHTMLImgElement_Release(img);
1343 SysFreeString(tmp);
1344 ok_(__FILE__,line) (hres == S_OK, "put_src failed: %08x\n", hres);
1345
1346 _test_img_src(line, unk, src);
1347 }
1348
1349 #define test_img_alt(u,a) _test_img_alt(__LINE__,u,a)
1350 static void _test_img_alt(unsigned line, IUnknown *unk, const char *exalt)
1351 {
1352 IHTMLImgElement *img = _get_img_iface(line, unk);
1353 BSTR alt;
1354 HRESULT hres;
1355
1356 hres = IHTMLImgElement_get_alt(img, &alt);
1357 ok_(__FILE__,line) (hres == S_OK, "get_alt failed: %08x\n", hres);
1358 if(exalt)
1359 ok_(__FILE__,line) (!strcmp_wa(alt, exalt), "inexopected alt %s\n", dbgstr_w(alt));
1360 else
1361 ok_(__FILE__,line) (!alt, "alt != NULL\n");
1362 SysFreeString(alt);
1363 }
1364
1365 #define test_img_set_alt(u,a) _test_img_set_alt(__LINE__,u,a)
1366 static void _test_img_set_alt(unsigned line, IUnknown *unk, const char *alt)
1367 {
1368 IHTMLImgElement *img = _get_img_iface(line, unk);
1369 BSTR tmp;
1370 HRESULT hres;
1371
1372 tmp = a2bstr(alt);
1373 hres = IHTMLImgElement_put_alt(img, tmp);
1374 ok_(__FILE__,line) (hres == S_OK, "get_alt failed: %08x\n", hres);
1375 SysFreeString(tmp);
1376
1377 _test_img_alt(line, unk, alt);
1378 }
1379
1380 #define test_input_get_disabled(i,b) _test_input_get_disabled(__LINE__,i,b)
1381 static void _test_input_get_disabled(unsigned line, IHTMLInputElement *input, VARIANT_BOOL exb)
1382 {
1383 VARIANT_BOOL disabled = 100;
1384 HRESULT hres;
1385
1386 hres = IHTMLInputElement_get_disabled(input, &disabled);
1387 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1388 ok_(__FILE__,line) (disabled == exb, "disabled=%x, expected %x\n", disabled, exb);
1389
1390 _test_elem3_get_disabled(line, (IUnknown*)input, exb);
1391 }
1392
1393 #define test_input_set_disabled(i,b) _test_input_set_disabled(__LINE__,i,b)
1394 static void _test_input_set_disabled(unsigned line, IHTMLInputElement *input, VARIANT_BOOL b)
1395 {
1396 HRESULT hres;
1397
1398 hres = IHTMLInputElement_put_disabled(input, b);
1399 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1400
1401 _test_input_get_disabled(line, input, b);
1402 }
1403
1404 #define test_input_value(o,t) _test_input_value(__LINE__,o,t)
1405 static void _test_input_value(unsigned line, IUnknown *unk, const char *exval)
1406 {
1407 IHTMLInputElement *input;
1408 BSTR bstr;
1409 HRESULT hres;
1410
1411 hres = IUnknown_QueryInterface(unk, &IID_IHTMLInputElement, (void**)&input);
1412 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLInputElement: %08x\n", hres);
1413 if(FAILED(hres))
1414 return;
1415
1416 hres = IHTMLInputElement_get_value(input, &bstr);
1417 ok_(__FILE__,line) (hres == S_OK, "get_value failed: %08x\n", hres);
1418 if(exval)
1419 ok_(__FILE__,line) (!strcmp_wa(bstr, exval), "value=%s\n", dbgstr_w(bstr));
1420 else
1421 ok_(__FILE__,line) (!exval, "exval != NULL\n");
1422 SysFreeString(bstr);
1423 IHTMLInputElement_Release(input);
1424 }
1425
1426 #define test_input_put_value(o,v) _test_input_put_value(__LINE__,o,v)
1427 static void _test_input_put_value(unsigned line, IUnknown *unk, const char *val)
1428 {
1429 IHTMLInputElement *input;
1430 BSTR bstr;
1431 HRESULT hres;
1432
1433 hres = IUnknown_QueryInterface(unk, &IID_IHTMLInputElement, (void**)&input);
1434 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLInputElement: %08x\n", hres);
1435 if(FAILED(hres))
1436 return;
1437
1438 bstr = a2bstr(val);
1439 hres = IHTMLInputElement_get_value(input, &bstr);
1440 ok_(__FILE__,line) (hres == S_OK, "get_value failed: %08x\n", hres);
1441 SysFreeString(bstr);
1442 IHTMLInputElement_Release(input);
1443 }
1444
1445 #define test_elem_class(u,c) _test_elem_class(__LINE__,u,c)
1446 static void _test_elem_class(unsigned line, IUnknown *unk, const char *exclass)
1447 {
1448 IHTMLElement *elem = _get_elem_iface(line, unk);
1449 BSTR class = (void*)0xdeadbeef;
1450 HRESULT hres;
1451
1452 hres = IHTMLElement_get_className(elem, &class);
1453 IHTMLElement_Release(elem);
1454 ok_(__FILE__,line) (hres == S_OK, "get_className failed: %08x\n", hres);
1455 if(exclass)
1456 ok_(__FILE__,line) (!strcmp_wa(class, exclass), "unexpected className %s\n", dbgstr_w(class));
1457 else
1458 ok_(__FILE__,line) (!class, "class != NULL\n");
1459 SysFreeString(class);
1460 }
1461
1462 #define test_elem_tabindex(u,i) _test_elem_tabindex(__LINE__,u,i)
1463 static void _test_elem_tabindex(unsigned line, IUnknown *unk, short exindex)
1464 {
1465 IHTMLElement2 *elem2 = _get_elem2_iface(line, unk);
1466 short index = -3;
1467 HRESULT hres;
1468
1469 hres = IHTMLElement2_get_tabIndex(elem2, &index);
1470 IHTMLElement2_Release(elem2);
1471 ok_(__FILE__,line) (hres == S_OK, "get_tabIndex failed: %08x\n", hres);
1472 ok_(__FILE__,line) (index == exindex, "unexpected index %d\n", index);
1473 }
1474
1475 #define test_elem_set_tabindex(u,i) _test_elem_set_tabindex(__LINE__,u,i)
1476 static void _test_elem_set_tabindex(unsigned line, IUnknown *unk, short index)
1477 {
1478 IHTMLElement2 *elem2 = _get_elem2_iface(line, unk);
1479 HRESULT hres;
1480
1481 hres = IHTMLElement2_put_tabIndex(elem2, index);
1482 IHTMLElement2_Release(elem2);
1483 ok_(__FILE__,line) (hres == S_OK, "get_tabIndex failed: %08x\n", hres);
1484
1485 _test_elem_tabindex(line, unk, index);
1486 }
1487
1488 #define test_elem_set_class(u,c) _test_elem_set_class(__LINE__,u,c)
1489 static void _test_elem_set_class(unsigned line, IUnknown *unk, const char *class)
1490 {
1491 IHTMLElement *elem = _get_elem_iface(line, unk);
1492 BSTR tmp;
1493 HRESULT hres;
1494
1495 tmp = class ? a2bstr(class) : NULL;
1496 hres = IHTMLElement_put_className(elem, tmp);
1497 IHTMLElement_Release(elem);
1498 ok_(__FILE__,line) (hres == S_OK, "put_className failed: %08x\n", hres);
1499 SysFreeString(tmp);
1500
1501 _test_elem_class(line, unk, class);
1502 }
1503
1504 #define test_elem_id(e,i) _test_elem_id(__LINE__,e,i)
1505 static void _test_elem_id(unsigned line, IUnknown *unk, const char *exid)
1506 {
1507 IHTMLElement *elem = _get_elem_iface(line, unk);
1508 BSTR id = (void*)0xdeadbeef;
1509 HRESULT hres;
1510
1511 hres = IHTMLElement_get_id(elem, &id);
1512 IHTMLElement_Release(elem);
1513 ok_(__FILE__,line) (hres == S_OK, "get_id failed: %08x\n", hres);
1514
1515 if(exid)
1516 ok_(__FILE__,line) (!strcmp_wa(id, exid), "unexpected id %s\n", dbgstr_w(id));
1517 else
1518 ok_(__FILE__,line) (!id, "id=%s\n", dbgstr_w(id));
1519
1520 SysFreeString(id);
1521 }
1522
1523 #define test_elem_put_id(u,i) _test_elem_put_id(__LINE__,u,i)
1524 static void _test_elem_put_id(unsigned line, IUnknown *unk, const char *new_id)
1525 {
1526 IHTMLElement *elem = _get_elem_iface(line, unk);
1527 BSTR tmp = a2bstr(new_id);
1528 HRESULT hres;
1529
1530 hres = IHTMLElement_put_id(elem, tmp);
1531 IHTMLElement_Release(elem);
1532 SysFreeString(tmp);
1533 ok_(__FILE__,line) (hres == S_OK, "put_id failed: %08x\n", hres);
1534
1535 _test_elem_id(line, unk, new_id);
1536 }
1537
1538 #define test_elem_title(u,t) _test_elem_title(__LINE__,u,t)
1539 static void _test_elem_title(unsigned line, IUnknown *unk, const char *extitle)
1540 {
1541 IHTMLElement *elem = _get_elem_iface(line, unk);
1542 BSTR title;
1543 HRESULT hres;
1544
1545 hres = IHTMLElement_get_title(elem, &title);
1546 IHTMLElement_Release(elem);
1547 ok_(__FILE__,line) (hres == S_OK, "get_title failed: %08x\n", hres);
1548 if(extitle)
1549 ok_(__FILE__,line) (!strcmp_wa(title, extitle), "unexpected title %s\n", dbgstr_w(title));
1550 else
1551 ok_(__FILE__,line) (!title, "title=%s, expected NULL\n", dbgstr_w(title));
1552
1553 SysFreeString(title);
1554 }
1555
1556 #define test_elem_set_title(u,t) _test_elem_set_title(__LINE__,u,t)
1557 static void _test_elem_set_title(unsigned line, IUnknown *unk, const char *title)
1558 {
1559 IHTMLElement *elem = _get_elem_iface(line, unk);
1560 BSTR tmp;
1561 HRESULT hres;
1562
1563 tmp = a2bstr(title);
1564 hres = IHTMLElement_put_title(elem, tmp);
1565 ok_(__FILE__,line) (hres == S_OK, "get_title failed: %08x\n", hres);
1566
1567 IHTMLElement_Release(elem);
1568 SysFreeString(tmp);
1569 }
1570
1571 #define test_node_get_value_str(u,e) _test_node_get_value_str(__LINE__,u,e)
1572 static void _test_node_get_value_str(unsigned line, IUnknown *unk, const char *exval)
1573 {
1574 IHTMLDOMNode *node = _get_node_iface(line, unk);
1575 VARIANT var;
1576 HRESULT hres;
1577
1578 hres = IHTMLDOMNode_get_nodeValue(node, &var);
1579 IHTMLDOMNode_Release(node);
1580 ok_(__FILE__,line) (hres == S_OK, "get_nodeValue failed: %08x, expected VT_BSTR\n", hres);
1581
1582 if(exval) {
1583 ok_(__FILE__,line) (V_VT(&var) == VT_BSTR, "vt=%d\n", V_VT(&var));
1584 ok_(__FILE__,line) (!strcmp_wa(V_BSTR(&var), exval), "unexpected value %s\n", dbgstr_w(V_BSTR(&var)));
1585 }else {
1586 ok_(__FILE__,line) (V_VT(&var) == VT_NULL, "vt=%d, expected VT_NULL\n", V_VT(&var));
1587 }
1588
1589 VariantClear(&var);
1590 }
1591
1592 #define test_node_put_value_str(u,v) _test_node_put_value_str(__LINE__,u,v)
1593 static void _test_node_put_value_str(unsigned line, IUnknown *unk, const char *val)
1594 {
1595 IHTMLDOMNode *node = _get_node_iface(line, unk);
1596 VARIANT var;
1597 HRESULT hres;
1598
1599 V_VT(&var) = VT_BSTR;
1600 V_BSTR(&var) = a2bstr(val);
1601
1602 hres = IHTMLDOMNode_put_nodeValue(node, var);
1603 ok_(__FILE__,line) (hres == S_OK, "get_nodeValue failed: %08x, expected VT_BSTR\n", hres);
1604 IHTMLDOMNode_Release(node);
1605 VariantClear(&var);
1606 }
1607
1608 #define test_elem_client_size(u) _test_elem_client_size(__LINE__,u)
1609 static void _test_elem_client_size(unsigned line, IUnknown *unk)
1610 {
1611 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1612 long l;
1613 HRESULT hres;
1614
1615 hres = IHTMLElement2_get_clientWidth(elem, &l);
1616 ok_(__FILE__,line) (hres == S_OK, "get_clientWidth failed: %08x\n", hres);
1617 hres = IHTMLElement2_get_clientHeight(elem, &l);
1618 ok_(__FILE__,line) (hres == S_OK, "get_clientHeight failed: %08x\n", hres);
1619
1620 IHTMLElement2_Release(elem);
1621 }
1622
1623 #define test_create_elem(d,t) _test_create_elem(__LINE__,d,t)
1624 static IHTMLElement *_test_create_elem(unsigned line, IHTMLDocument2 *doc, const char *tag)
1625 {
1626 IHTMLElement *elem = NULL;
1627 BSTR tmp;
1628 HRESULT hres;
1629
1630 tmp = a2bstr(tag);
1631 hres = IHTMLDocument2_createElement(doc, tmp, &elem);
1632 ok_(__FILE__,line) (hres == S_OK, "createElement failed: %08x\n", hres);
1633 ok_(__FILE__,line) (elem != NULL, "elem == NULL\n");
1634
1635 return elem;
1636 }
1637
1638 #define test_create_text(d,t) _test_create_text(__LINE__,d,t)
1639 static IHTMLDOMNode *_test_create_text(unsigned line, IHTMLDocument2 *doc, const char *text)
1640 {
1641 IHTMLDocument3 *doc3;
1642 IHTMLDOMNode *node = NULL;
1643 BSTR tmp;
1644 HRESULT hres;
1645
1646 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3);
1647 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLDocument3: %08x\n", hres);
1648
1649 tmp = a2bstr(text);
1650 hres = IHTMLDocument3_createTextNode(doc3, tmp, &node);
1651 IHTMLDocument3_Release(doc3);
1652 ok_(__FILE__,line) (hres == S_OK, "createElement failed: %08x\n", hres);
1653 ok_(__FILE__,line) (node != NULL, "node == NULL\n");
1654
1655 return node;
1656 }
1657
1658 #define test_node_append_child(n,c) _test_node_append_child(__LINE__,n,c)
1659 static IHTMLDOMNode *_test_node_append_child(unsigned line, IUnknown *node_unk, IUnknown *child_unk)
1660 {
1661 IHTMLDOMNode *node = _get_node_iface(line, node_unk);
1662 IHTMLDOMNode *child = _get_node_iface(line, child_unk);
1663 IHTMLDOMNode *new_child = NULL;
1664 HRESULT hres;
1665
1666 hres = IHTMLDOMNode_appendChild(node, child, &new_child);
1667 ok_(__FILE__,line) (hres == S_OK, "appendChild failed: %08x\n", hres);
1668 ok_(__FILE__,line) (new_child != NULL, "new_child == NULL\n");
1669 /* TODO ok_(__FILE__,line) (new_child != child, "new_child == child\n"); */
1670
1671 IHTMLDOMNode_Release(node);
1672 IHTMLDOMNode_Release(child);
1673
1674 return new_child;
1675 }
1676
1677 #define test_node_insertbefore(n,c,v) _test_node_insertbefore(__LINE__,n,c,v)
1678 static IHTMLDOMNode *_test_node_insertbefore(unsigned line, IUnknown *node_unk, IHTMLDOMNode *child, VARIANT *var)
1679 {
1680 IHTMLDOMNode *node = _get_node_iface(line, node_unk);
1681 IHTMLDOMNode *new_child = NULL;
1682 HRESULT hres;
1683
1684 hres = IHTMLDOMNode_insertBefore(node, child, *var, &new_child);
1685 ok_(__FILE__,line) (hres == S_OK, "insertBefore failed: %08x\n", hres);
1686 ok_(__FILE__,line) (new_child != NULL, "new_child == NULL\n");
1687 /* TODO ok_(__FILE__,line) (new_child != child, "new_child == child\n"); */
1688
1689 IHTMLDOMNode_Release(node);
1690
1691 return new_child;
1692 }
1693
1694 #define test_node_remove_child(n,c) _test_node_remove_child(__LINE__,n,c)
1695 static void _test_node_remove_child(unsigned line, IUnknown *unk, IHTMLDOMNode *child)
1696 {
1697 IHTMLDOMNode *node = _get_node_iface(line, unk);
1698 IHTMLDOMNode *new_node = NULL;
1699 HRESULT hres;
1700
1701 hres = IHTMLDOMNode_removeChild(node, child, &new_node);
1702 ok_(__FILE__,line) (hres == S_OK, "removeChild failed: %08x\n", hres);
1703 ok_(__FILE__,line) (new_node != NULL, "new_node == NULL\n");
1704 /* TODO ok_(__FILE__,line) (new_node != child, "new_node == child\n"); */
1705
1706 IHTMLDOMNode_Release(node);
1707 IHTMLDOMNode_Release(new_node);
1708 }
1709
1710 #define test_doc_title(d,t) _test_doc_title(__LINE__,d,t)
1711 static void _test_doc_title(unsigned line, IHTMLDocument2 *doc, const char *extitle)
1712 {
1713 BSTR title = NULL;
1714 HRESULT hres;
1715
1716 hres = IHTMLDocument2_get_title(doc, &title);
1717 ok_(__FILE__,line) (hres == S_OK, "get_title failed: %08x\n", hres);
1718 ok_(__FILE__,line) (!strcmp_wa(title, extitle), "unexpected title %s\n", dbgstr_w(title));
1719 SysFreeString(title);
1720 }
1721
1722 #define test_doc_set_title(d,t) _test_doc_set_title(__LINE__,d,t)
1723 static void _test_doc_set_title(unsigned line, IHTMLDocument2 *doc, const char *title)
1724 {
1725 BSTR tmp;
1726 HRESULT hres;
1727
1728 tmp = a2bstr(title);
1729 hres = IHTMLDocument2_put_title(doc, tmp);
1730 ok_(__FILE__,line) (hres == S_OK, "get_title failed: %08x\n", hres);
1731 SysFreeString(tmp);
1732 }
1733
1734 static void test_elem_col_item(IHTMLElementCollection *col, LPCWSTR n,
1735 const elem_type_t *elem_types, long len)
1736 {
1737 IDispatch *disp;
1738 VARIANT name, index;
1739 DWORD i;
1740 HRESULT hres;
1741
1742 V_VT(&index) = VT_EMPTY;
1743 V_VT(&name) = VT_BSTR;
1744 V_BSTR(&name) = SysAllocString(n);
1745
1746 hres = IHTMLElementCollection_item(col, name, index, &disp);
1747 ok(hres == S_OK, "item failed: %08x\n", hres);
1748
1749 test_elem_collection((IUnknown*)disp, elem_types, len);
1750 IDispatch_Release(disp);
1751 ok(hres == S_OK, "Could not get IHTMLElementCollection interface: %08x\n", hres);
1752 if(hres != S_OK)
1753 goto cleanup;
1754
1755 V_VT(&index) = VT_I4;
1756
1757 for(i=0; i<len; i++) {
1758 V_I4(&index) = i;
1759 disp = (void*)0xdeadbeef;
1760 hres = IHTMLElementCollection_item(col, name, index, &disp);
1761 ok(hres == S_OK, "item failed: %08x\n", hres);
1762 ok(disp != NULL, "disp == NULL\n");
1763 if(FAILED(hres) || !disp)
1764 continue;
1765
1766 test_elem_type((IUnknown*)disp, elem_types[i]);
1767
1768 IDispatch_Release(disp);
1769 }
1770
1771 V_I4(&index) = len;
1772 disp = (void*)0xdeadbeef;
1773 hres = IHTMLElementCollection_item(col, name, index, &disp);
1774 ok(hres == S_OK, "item failed: %08x\n", hres);
1775 ok(disp == NULL, "disp != NULL\n");
1776
1777 V_I4(&index) = -1;
1778 disp = (void*)0xdeadbeef;
1779 hres = IHTMLElementCollection_item(col, name, index, &disp);
1780 ok(hres == E_INVALIDARG, "item failed: %08x, expected E_INVALIDARG\n", hres);
1781 ok(disp == NULL, "disp != NULL\n");
1782
1783 cleanup:
1784 SysFreeString(V_BSTR(&name));
1785 }
1786
1787 static IHTMLElement *get_elem_by_id(IHTMLDocument2 *doc, LPCWSTR id, BOOL expect_success)
1788 {
1789 IHTMLElementCollection *col;
1790 IHTMLElement *elem;
1791 IDispatch *disp = (void*)0xdeadbeef;
1792 VARIANT name, index;
1793 HRESULT hres;
1794
1795 hres = IHTMLDocument2_get_all(doc, &col);
1796 ok(hres == S_OK, "get_all failed: %08x\n", hres);
1797 ok(col != NULL, "col == NULL\n");
1798 if(FAILED(hres) || !col)
1799 return NULL;
1800
1801 V_VT(&index) = VT_EMPTY;
1802 V_VT(&name) = VT_BSTR;
1803 V_BSTR(&name) = SysAllocString(id);
1804
1805 hres = IHTMLElementCollection_item(col, name, index, &disp);
1806 IHTMLElementCollection_Release(col);
1807 SysFreeString(V_BSTR(&name));
1808 ok(hres == S_OK, "item failed: %08x\n", hres);
1809 if(!expect_success) {
1810 ok(disp == NULL, "disp != NULL\n");
1811 return NULL;
1812 }
1813
1814 ok(disp != NULL, "disp == NULL\n");
1815 if(!disp)
1816 return NULL;
1817
1818 elem = get_elem_iface((IUnknown*)disp);
1819 IDispatch_Release(disp);
1820
1821 return elem;
1822 }
1823
1824 static IHTMLElement *get_doc_elem_by_id(IHTMLDocument2 *doc, LPCWSTR id)
1825 {
1826 IHTMLDocument3 *doc3;
1827 IHTMLElement *elem;
1828 BSTR tmp;
1829 HRESULT hres;
1830
1831 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3);
1832 ok(hres == S_OK, "Could not get IHTMLDocument3 iface: %08x\n", hres);
1833
1834 tmp = SysAllocString(id);
1835 hres = IHTMLDocument3_getElementById(doc3, tmp, &elem);
1836 SysFreeString(tmp);
1837 ok(hres == S_OK, "getElementById(%s) failed: %08x\n", dbgstr_w(id), hres);
1838
1839 IHTMLDocument3_Release(doc3);
1840
1841 return elem;
1842 }
1843
1844 static void test_select_elem(IHTMLSelectElement *select)
1845 {
1846 test_select_type(select, "select-one");
1847 test_select_length(select, 2);
1848 test_select_selidx(select, 0);
1849 test_select_put_selidx(select, 1);
1850
1851 test_select_set_value(select, "val1");
1852 test_select_value(select, "val1");
1853
1854 test_select_get_disabled(select, VARIANT_FALSE);
1855 test_select_set_disabled(select, VARIANT_TRUE);
1856 test_select_set_disabled(select, VARIANT_FALSE);
1857 }
1858
1859 static void test_create_option_elem(IHTMLDocument2 *doc)
1860 {
1861 IHTMLOptionElement *option;
1862
1863 option = create_option_elem(doc, "test text", "test value");
1864
1865 test_option_put_text(option, "new text");
1866 test_option_put_value(option, "new value");
1867
1868 IHTMLOptionElement_Release(option);
1869 }
1870
1871 static IHTMLTxtRange *test_create_body_range(IHTMLDocument2 *doc)
1872 {
1873 IHTMLBodyElement *body;
1874 IHTMLTxtRange *range;
1875 IHTMLElement *elem;
1876 HRESULT hres;
1877
1878 hres = IHTMLDocument2_get_body(doc, &elem);
1879 ok(hres == S_OK, "get_body failed: %08x\n", hres);
1880
1881 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLBodyElement, (void**)&body);
1882 IHTMLElement_Release(elem);
1883
1884 hres = IHTMLBodyElement_createTextRange(body, &range);
1885 IHTMLBodyElement_Release(body);
1886 ok(hres == S_OK, "createTextRange failed: %08x\n", hres);
1887
1888 return range;
1889 }
1890
1891 static void test_txtrange(IHTMLDocument2 *doc)
1892 {
1893 IHTMLTxtRange *body_range, *range, *range2;
1894 IHTMLSelectionObject *selection;
1895 IDispatch *disp_range;
1896 HRESULT hres;
1897
1898 body_range = test_create_body_range(doc);
1899
1900 test_range_text(body_range, "test abc 123\r\nit's text");
1901
1902 hres = IHTMLTxtRange_duplicate(body_range, &range);
1903 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
1904
1905 hres = IHTMLTxtRange_duplicate(body_range, &range2);
1906 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
1907 test_range_isequal(range, range2, VARIANT_TRUE);
1908
1909 test_range_text(range, "test abc 123\r\nit's text");
1910 test_range_text(body_range, "test abc 123\r\nit's text");
1911
1912 test_range_collapse(range, TRUE);
1913 test_range_isequal(range, range2, VARIANT_FALSE);
1914 test_range_inrange(range, range2, VARIANT_FALSE);
1915 test_range_inrange(range2, range, VARIANT_TRUE);
1916 IHTMLTxtRange_Release(range2);
1917
1918 test_range_expand(range, wordW, VARIANT_TRUE, "test ");
1919 test_range_expand(range, wordW, VARIANT_FALSE, "test ");
1920 test_range_move(range, characterW, 2, 2);
1921 test_range_expand(range, wordW, VARIANT_TRUE, "test ");
1922
1923 test_range_collapse(range, FALSE);
1924 test_range_expand(range, wordW, VARIANT_TRUE, "abc ");
1925
1926 test_range_collapse(range, FALSE);
1927 test_range_expand(range, wordW, VARIANT_TRUE, "123");
1928 test_range_expand(range, wordW, VARIANT_FALSE, "123");
1929 test_range_move(range, characterW, 2, 2);
1930 test_range_expand(range, wordW, VARIANT_TRUE, "123");
1931 test_range_moveend(range, characterW, -5, -5);
1932 test_range_text(range, NULL);
1933 test_range_moveend(range, characterW, 3, 3);
1934 test_range_text(range, "c 1");
1935 test_range_expand(range, texteditW, VARIANT_TRUE, "test abc 123\r\nit's text");
1936 test_range_collapse(range, TRUE);
1937 test_range_move(range, characterW, 4, 4);
1938 test_range_moveend(range, characterW, 1, 1);
1939 test_range_text(range, " ");
1940 test_range_move(range, wordW, 1, 1);
1941 test_range_moveend(range, characterW, 2, 2);
1942 test_range_text(range, "ab");
1943
1944 IHTMLTxtRange_Release(range);
1945
1946 hres = IHTMLTxtRange_duplicate(body_range, &range);
1947 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
1948
1949 test_range_text(range, "test abc 123\r\nit's text");
1950 test_range_move(range, characterW, 3, 3);
1951 test_range_moveend(range, characterW, 1, 1);
1952 test_range_text(range, "t");
1953 test_range_moveend(range, characterW, 3, 3);
1954 test_range_text(range, "t ab");
1955 test_range_moveend(range, characterW, -2, -2);
1956 test_range_text(range, "t ");
1957 test_range_move(range, characterW, 6, 6);
1958 test_range_moveend(range, characterW, 3, 3);
1959 test_range_text(range, "123");
1960 test_range_moveend(range, characterW, 2, 2);
1961 test_range_text(range, "123\r\ni");
1962
1963 IHTMLTxtRange_Release(range);
1964
1965 hres = IHTMLTxtRange_duplicate(body_range, &range);
1966 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
1967
1968 test_range_move(range, wordW, 1, 1);
1969 test_range_moveend(range, characterW, 2, 2);
1970 test_range_text(range, "ab");
1971
1972 test_range_move(range, characterW, -2, -2);
1973 test_range_moveend(range, characterW, 2, 2);
1974 test_range_text(range, "t ");
1975
1976 test_range_move(range, wordW, 3, 3);
1977 test_range_move(range, wordW, -2, -2);
1978 test_range_moveend(range, characterW, 2, 2);
1979 test_range_text(range, "ab");
1980
1981 test_range_move(range, characterW, -6, -5);
1982 test_range_moveend(range, characterW, -1, 0);
1983 test_range_moveend(range, characterW, -6, 0);
1984 test_range_move(range, characterW, 2, 2);
1985 test_range_moveend(range, characterW, 2, 2);
1986 test_range_text(range, "st");
1987 test_range_moveend(range, characterW, -6, -4);
1988 test_range_moveend(range, characterW, 2, 2);
1989
1990 IHTMLTxtRange_Release(range);
1991
1992 hres = IHTMLTxtRange_duplicate(body_range, &range);
1993 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
1994
1995 test_range_move(range, wordW, 2, 2);
1996 test_range_moveend(range, characterW, 2, 2);
1997 test_range_text(range, "12");
1998
1999 test_range_move(range, characterW, 15, 14);
2000 test_range_move(range, characterW, -2, -2);
2001 test_range_moveend(range, characterW, 3, 2);
2002 test_range_text(range, "t");
2003 test_range_moveend(range, characterW, -1, -1);
2004 test_range_text(range, "t");
2005 test_range_expand(range, wordW, VARIANT_TRUE, "text");
2006 test_range_move(range, characterW, -2, -2);
2007 test_range_moveend(range, characterW, 2, 2);
2008 test_range_text(range, "s ");
2009 test_range_move(range, characterW, 100, 7);
2010 test_range_move(range, wordW, 1, 0);
2011 test_range_move(range, characterW, -2, -2);
2012 test_range_moveend(range, characterW, 3, 2);
2013 test_range_text(range, "t");
2014
2015 IHTMLTxtRange_Release(range);
2016
2017 hres = IHTMLTxtRange_duplicate(body_range, &range);
2018 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
2019
2020 test_range_collapse(range, TRUE);
2021 test_range_expand(range, wordW, VARIANT_TRUE, "test ");
2022 test_range_put_text(range, "word");
2023 test_range_text(body_range, "wordabc 123\r\nit's text");
2024 test_range_text(range, NULL);
2025 test_range_moveend(range, characterW, 3, 3);
2026 test_range_text(range, "abc");
2027 test_range_movestart(range, characterW, -2, -2);
2028 test_range_text(range, "rdabc");
2029 test_range_movestart(range, characterW, 3, 3);
2030 test_range_text(range, "bc");
2031 test_range_movestart(range, characterW, 4, 4);
2032 test_range_text(range, NULL);
2033 test_range_movestart(range, characterW, -3, -3);
2034 test_range_text(range, "c 1");
2035 test_range_movestart(range, characterW, -7, -6);
2036 test_range_text(range, "wordabc 1");
2037 test_range_movestart(range, characterW, 100, 22);
2038 test_range_text(range, NULL);
2039
2040 IHTMLTxtRange_Release(range);
2041 IHTMLTxtRange_Release(body_range);
2042
2043 hres = IHTMLDocument2_get_selection(doc, &selection);
2044 ok(hres == S_OK, "IHTMLDocument2_get_selection failed: %08x\n", hres);
2045
2046 hres = IHTMLSelectionObject_createRange(selection, &disp_range);
2047 ok(hres == S_OK, "IHTMLSelectionObject_createRange failed: %08x\n", hres);
2048 IHTMLSelectionObject_Release(selection);
2049
2050 hres = IDispatch_QueryInterface(disp_range, &IID_IHTMLTxtRange, (void **)&range);
2051 ok(hres == S_OK, "Could not get IID_IHTMLTxtRange interface: 0x%08x\n", hres);
2052 IDispatch_Release(disp_range);
2053
2054 test_range_text(range, NULL);
2055 test_range_moveend(range, characterW, 3, 3);
2056 test_range_text(range, "wor");
2057 test_range_parent(range, ET_BODY);
2058 test_range_expand(range, texteditW, VARIANT_TRUE, "wordabc 123\r\nit's text");
2059 test_range_expand(range, texteditW, VARIANT_TRUE, "wordabc 123\r\nit's text");
2060 test_range_move(range, characterW, 3, 3);
2061 test_range_expand(range, wordW, VARIANT_TRUE, "wordabc ");
2062 test_range_moveend(range, characterW, -4, -4);
2063 test_range_put_text(range, "abc def ");
2064 test_range_expand(range, texteditW, VARIANT_TRUE, "abc def abc 123\r\nit's text");
2065 test_range_move(range, wordW, 1, 1);
2066 test_range_movestart(range, characterW, -1, -1);
2067 test_range_text(range, " ");
2068 test_range_move(range, wordW, 1, 1);
2069 test_range_moveend(range, characterW, 3, 3);
2070 test_range_text(range, "def");
2071 test_range_put_text(range, "xyz");
2072 test_range_moveend(range, characterW, 1, 1);
2073 test_range_move(range, wordW, 1, 1);
2074 test_range_moveend(range, characterW, 2, 2);
2075 test_range_text(range, "ab");
2076
2077 IHTMLTxtRange_Release(range);
2078 }
2079
2080 static void test_txtrange2(IHTMLDocument2 *doc)
2081 {
2082 IHTMLTxtRange *range;
2083
2084 range = test_create_body_range(doc);
2085
2086 test_range_text(range, "abc\r\n\r\n123\r\n\r\n\r\ndef");
2087 test_range_move(range, characterW, 5, 5);
2088 test_range_moveend(range, characterW, 1, 1);
2089 test_range_text(range, "2");
2090 test_range_move(range, characterW, -3, -3);
2091 test_range_moveend(range, characterW, 3, 3);
2092 test_range_text(range, "c\r\n\r\n1");
2093 test_range_collapse(range, VARIANT_FALSE);
2094 test_range_moveend(range, characterW, 4, 4);
2095 test_range_text(range, "23");
2096 test_range_moveend(range, characterW, 1, 1);
2097 test_range_text(range, "23\r\n\r\n\r\nd");
2098 test_range_moveend(range, characterW, -1, -1);
2099 test_range_text(range, "23");
2100 test_range_moveend(range, characterW, -1, -1);
2101 test_range_text(range, "23");
2102 test_range_moveend(range, characterW, -2, -2);
2103 test_range_text(range, "2");
2104
2105 IHTMLTxtRange_Release(range);
2106 }
2107
2108 static void test_compatmode(IHTMLDocument2 *doc)
2109 {
2110 IHTMLDocument5 *doc5;
2111 BSTR mode;
2112 HRESULT hres;
2113
2114 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument5, (void**)&doc5);
2115 ok(hres == S_OK, "Could not get IHTMLDocument5 interface: %08x\n", hres);
2116 if(FAILED(hres))
2117 return;
2118
2119 hres = IHTMLDocument5_get_compatMode(doc5, &mode);
2120 IHTMLDocument5_Release(doc5);
2121 ok(hres == S_OK, "get_compatMode failed: %08x\n", hres);
2122 ok(!strcmp_wa(mode, "BackCompat"), "compatMode=%s\n", dbgstr_w(mode));
2123 SysFreeString(mode);
2124 }
2125
2126 static void test_location(IHTMLDocument2 *doc)
2127 {
2128 IHTMLLocation *location, *location2;
2129 ULONG ref;
2130 HRESULT hres;
2131
2132 hres = IHTMLDocument2_get_location(doc, &location);
2133 ok(hres == S_OK, "get_location failed: %08x\n", hres);
2134
2135 hres = IHTMLDocument2_get_location(doc, &location2);
2136 ok(hres == S_OK, "get_location failed: %08x\n", hres);
2137
2138 ok(location == location2, "location != location2\n");
2139
2140 test_ifaces((IUnknown*)location, location_iids);
2141
2142 IHTMLLocation_Release(location2);
2143 ref = IHTMLLocation_Release(location);
2144 ok(!ref, "location chould be destroyed here\n");
2145 }
2146
2147 static void test_navigator(IHTMLDocument2 *doc)
2148 {
2149 IHTMLWindow2 *window;
2150 IOmNavigator *navigator, *navigator2;
2151 ULONG ref;
2152 BSTR bstr;
2153 HRESULT hres;
2154
2155 hres = IHTMLDocument2_get_parentWindow(doc, &window);
2156 ok(hres == S_OK, "parentWidnow failed: %08x\n", hres);
2157
2158 hres = IHTMLWindow2_get_navigator(window, &navigator);
2159 ok(hres == S_OK, "get_navigator failed: %08x\n", hres);
2160 ok(navigator != NULL, "navigator == NULL\n");
2161 test_disp((IUnknown*)navigator, &IID_IOmNavigator);
2162
2163 hres = IHTMLWindow2_get_navigator(window, &navigator2);
2164 ok(hres == S_OK, "get_navigator failed: %08x\n", hres);
2165 ok(navigator != navigator2, "navigator2 != navihgator\n");
2166
2167 IHTMLWindow2_Release(window);
2168 IOmNavigator_Release(navigator2);
2169
2170 hres = IOmNavigator_get_appCodeName(navigator, &bstr);
2171 ok(hres == S_OK, "get_appCodeName failed: %08x\n", hres);
2172 ok(!strcmp_wa(bstr, "Mozilla"), "Unexpected appCodeName %s\n", dbgstr_w(bstr));
2173 SysFreeString(bstr);
2174
2175 bstr = NULL;
2176 hres = IOmNavigator_get_platform(navigator, &bstr);
2177 ok(hres == S_OK, "get_appMinorVersion failed: %08x\n", hres);
2178 ok(!strcmp_wa(bstr, "Win32"), "unexpected platform %s\n", dbgstr_w(bstr));
2179 SysFreeString(bstr);
2180
2181 ref = IOmNavigator_Release(navigator);
2182 ok(!ref, "navigator should be destroyed here\n");
2183 }
2184
2185 static void test_current_style(IHTMLCurrentStyle *current_style)
2186 {
2187 BSTR str;
2188 HRESULT hres;
2189
2190 test_disp((IUnknown*)current_style, &DIID_DispHTMLCurrentStyle);
2191 test_ifaces((IUnknown*)current_style, cstyle_iids);
2192
2193 hres = IHTMLCurrentStyle_get_display(current_style, &str);
2194 ok(hres == S_OK, "get_display failed: %08x\n", hres);
2195 ok(!strcmp_wa(str, "block"), "get_display returned %s\n", dbgstr_w(str));
2196 SysFreeString(str);
2197 }
2198
2199 static void test_style2(IHTMLStyle2 *style2)
2200 {
2201 BSTR str;
2202 HRESULT hres;
2203
2204 str = (void*)0xdeadbeef;
2205 hres = IHTMLStyle2_get_position(style2, &str);
2206 ok(hres == S_OK, "get_position failed: %08x\n", hres);
2207 ok(!str, "str != NULL\n");
2208
2209 str = a2bstr("absolute");
2210 hres = IHTMLStyle2_put_position(style2, str);
2211 ok(hres == S_OK, "get_position failed: %08x\n", hres);
2212 SysFreeString(str);
2213
2214 str = NULL;
2215 hres = IHTMLStyle2_get_position(style2, &str);
2216 ok(hres == S_OK, "get_position failed: %08x\n", hres);
2217 ok(!strcmp_wa(str, "absolute"), "get_position returned %s\n", dbgstr_w(str));
2218 SysFreeString(str);
2219 }
2220
2221 static void test_default_style(IHTMLStyle *style)
2222 {
2223 IHTMLStyle2 *style2;
2224 VARIANT_BOOL b;
2225 VARIANT v;
2226 BSTR str;
2227 HRESULT hres;
2228
2229 test_disp((IUnknown*)style, &DIID_DispHTMLStyle);
2230 test_ifaces((IUnknown*)style, style_iids);
2231
2232 str = (void*)0xdeadbeef;
2233 hres = IHTMLStyle_get_fontFamily(style, &str);
2234 ok(hres == S_OK, "get_fontFamily failed: %08x\n", hres);
2235 ok(!str, "fontFamily = %s\n", dbgstr_w(str));
2236
2237 str = (void*)0xdeadbeef;
2238 hres = IHTMLStyle_get_fontWeight(style, &str);
2239 ok(hres == S_OK, "get_fontWeight failed: %08x\n", hres);
2240 ok(!str, "fontWeight = %s\n", dbgstr_w(str));
2241
2242 str = (void*)0xdeadbeef;
2243 hres = IHTMLStyle_get_display(style, &str);
2244 ok(hres == S_OK, "get_display failed: %08x\n", hres);
2245 ok(!str, "display = %s\n", dbgstr_w(str));
2246
2247 str = (void*)0xdeadbeef;
2248 hres = IHTMLStyle_get_visibility(style, &str);
2249 ok(hres == S_OK, "get_visibility failed: %08x\n", hres);
2250 ok(!str, "visibility = %s\n", dbgstr_w(str));
2251
2252 V_VT(&v) = VT_NULL;
2253 hres = IHTMLStyle_get_fontSize(style, &v);
2254 ok(hres == S_OK, "get_fontSize failed: %08x\n", hres);
2255 ok(V_VT(&v) == VT_BSTR, "V_VT(fontSize) = %d\n", V_VT(&v));
2256 ok(!V_BSTR(&v), "V_BSTR(fontSize) = %s\n", dbgstr_w(V_BSTR(&v)));
2257
2258 V_VT(&v) = VT_NULL;
2259 hres = IHTMLStyle_get_color(style, &v);
2260 ok(hres == S_OK, "get_color failed: %08x\n", hres);
2261 ok(V_VT(&v) == VT_BSTR, "V_VT(color) = %d\n", V_VT(&v));
2262 ok(!V_BSTR(&v), "V_BSTR(color) = %s\n", dbgstr_w(V_BSTR(&v)));
2263
2264 b = 0xfefe;
2265 hres = IHTMLStyle_get_textDecorationUnderline(style, &b);
2266 ok(hres == S_OK, "get_textDecorationUnderline failed: %08x\n", hres);
2267 ok(b == VARIANT_FALSE, "textDecorationUnderline = %x\n", b);
2268
2269 b = 0xfefe;
2270 hres = IHTMLStyle_get_textDecorationLineThrough(style, &b);
2271 ok(hres == S_OK, "get_textDecorationLineThrough failed: %08x\n", hres);
2272 ok(b == VARIANT_FALSE, "textDecorationLineThrough = %x\n", b);
2273
2274 V_VT(&v) = VT_EMPTY;
2275 hres = IHTMLStyle_get_width(style, &v);
2276 ok(hres == S_OK, "get_width failed: %08x\n", hres);
2277 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2278 ok(!V_BSTR(&v), "V_BSTR(v)=%p\n", V_BSTR(&v));
2279
2280 V_VT(&v) = VT_BSTR;
2281 V_BSTR(&v) = a2bstr("auto");
2282 hres = IHTMLStyle_put_width(style, v);
2283 ok(hres == S_OK, "put_width failed: %08x\n", hres);
2284 VariantClear(&v);
2285
2286 V_VT(&v) = VT_EMPTY;
2287 hres = IHTMLStyle_get_width(style, &v);
2288 ok(hres == S_OK, "get_width failed: %08x\n", hres);
2289 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2290 ok(!strcmp_wa(V_BSTR(&v), "auto"), "V_BSTR(v)=%s\n", dbgstr_w(V_BSTR(&v)));
2291 VariantClear(&v);
2292
2293 /* margin tests */
2294 str = (void*)0xdeadbeef;
2295 hres = IHTMLStyle_get_margin(style, &str);
2296 ok(hres == S_OK, "get_margin failed: %08x\n", hres);
2297 ok(!str, "margin = %s\n", dbgstr_w(str));
2298
2299 str = a2bstr("1");
2300 hres = IHTMLStyle_put_margin(style, str);
2301 ok(hres == S_OK, "get_margin failed: %08x\n", hres);
2302 SysFreeString(str);
2303
2304 hres = IHTMLStyle_get_margin(style, &str);
2305 ok(hres == S_OK, "get_margin failed: %08x\n", hres);
2306 ok(strcmp_wa(str, "1"), "margin = %s\n", dbgstr_w(str));
2307
2308 hres = IHTMLStyle_put_margin(style, NULL);
2309 ok(hres == S_OK, "get_margin failed: %08x\n", hres);
2310
2311 str = NULL;
2312 hres = IHTMLStyle_get_border(style, &str);
2313 ok(hres == S_OK, "get_border failed: %08x\n", hres);
2314 ok(!str || !*str, "str is not empty\n");
2315 SysFreeString(str);
2316
2317 str = a2bstr("1px");
2318 hres = IHTMLStyle_put_border(style, str);
2319 ok(hres == S_OK, "get_border failed: %08x\n", hres);
2320 SysFreeString(str);
2321
2322 V_VT(&v) = VT_EMPTY;
2323 hres = IHTMLStyle_get_left(style, &v);
2324 ok(hres == S_OK, "get_left failed: %08x\n", hres);
2325 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2326 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
2327 VariantClear(&v);
2328
2329 V_VT(&v) = VT_BSTR;
2330 V_BSTR(&v) = a2bstr("3px");
2331 hres = IHTMLStyle_put_left(style, v);
2332 ok(hres == S_OK, "put_left failed: %08x\n", hres);
2333 VariantClear(&v);
2334
2335 V_VT(&v) = VT_EMPTY;
2336 hres = IHTMLStyle_get_left(style, &v);
2337 ok(hres == S_OK, "get_left failed: %08x\n", hres);
2338 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2339 ok(!strcmp_wa(V_BSTR(&v), "3px"), "V_BSTR(v) = %s\n", dbgstr_w(V_BSTR(&v)));
2340 VariantClear(&v);
2341
2342 V_VT(&v) = VT_NULL;
2343 hres = IHTMLStyle_put_left(style, v);
2344 ok(hres == S_OK, "put_left failed: %08x\n", hres);
2345
2346 V_VT(&v) = VT_EMPTY;
2347 hres = IHTMLStyle_get_left(style, &v);
2348 ok(hres == S_OK, "get_left failed: %08x\n", hres);
2349 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2350 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
2351 VariantClear(&v);
2352
2353 V_VT(&v) = VT_EMPTY;
2354 hres = IHTMLStyle_get_top(style, &v);
2355 ok(hres == S_OK, "get_top failed: %08x\n", hres);
2356 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2357 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
2358 VariantClear(&v);
2359
2360 V_VT(&v) = VT_BSTR;
2361 V_BSTR(&v) = a2bstr("3px");
2362 hres = IHTMLStyle_put_top(style, v);
2363 ok(hres == S_OK, "put_top failed: %08x\n", hres);
2364 VariantClear(&v);
2365
2366 V_VT(&v) = VT_EMPTY;
2367 hres = IHTMLStyle_get_top(style, &v);
2368 ok(hres == S_OK, "get_top failed: %08x\n", hres);
2369 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2370 ok(!strcmp_wa(V_BSTR(&v), "3px"), "V_BSTR(v) = %s\n", dbgstr_w(V_BSTR(&v)));
2371 VariantClear(&v);
2372
2373 V_VT(&v) = VT_NULL;
2374 hres = IHTMLStyle_put_top(style, v);
2375 ok(hres == S_OK, "put_top failed: %08x\n", hres);
2376
2377 V_VT(&v) = VT_EMPTY;
2378 hres = IHTMLStyle_get_top(style, &v);
2379 ok(hres == S_OK, "get_top failed: %08x\n", hres);
2380 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2381 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
2382 VariantClear(&v);
2383
2384 V_VT(&v) = VT_EMPTY;
2385 hres = IHTMLStyle_get_height(style, &v);
2386 ok(hres == S_OK, "get_height failed: %08x\n", hres);
2387 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2388 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
2389 VariantClear(&v);
2390
2391 V_VT(&v) = VT_BSTR;
2392 V_BSTR(&v) = a2bstr("64px");
2393 hres = IHTMLStyle_put_height(style, v);
2394 ok(hres == S_OK, "put_height failed: %08x\n", hres);
2395 VariantClear(&v);
2396
2397 V_VT(&v) = VT_EMPTY;
2398 hres = IHTMLStyle_get_height(style, &v);
2399 ok(hres == S_OK, "get_height failed: %08x\n", hres);
2400 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2401 ok(!strcmp_wa(V_BSTR(&v), "64px"), "V_BSTR(v) = %s\n", dbgstr_w(V_BSTR(&v)));
2402 VariantClear(&v);
2403
2404 str = (void*)0xdeadbeef;
2405 hres = IHTMLStyle_get_cursor(style, &str);
2406 ok(hres == S_OK, "get_cursor failed: %08x\n", hres);
2407 ok(!str, "get_cursor != NULL\n");
2408 SysFreeString(str);
2409
2410 str = a2bstr("default");
2411 hres = IHTMLStyle_put_cursor(style, str);
2412 ok(hres == S_OK, "get_cursor failed: %08x\n", hres);
2413 SysFreeString(str);
2414
2415 str = NULL;
2416 hres = IHTMLStyle_get_cursor(style, &str);
2417 ok(hres == S_OK, "get_cursor failed: %08x\n", hres);
2418 ok(!strcmp_wa(str, "default"), "get_cursor returned %s\n", dbgstr_w(str));
2419 SysFreeString(str);
2420
2421 V_VT(&v) = VT_EMPTY;
2422 hres = IHTMLStyle_get_verticalAlign(style, &v);
2423 ok(hres == S_OK, "get_vertivalAlign failed: %08x\n", hres);
2424 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2425 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
2426 VariantClear(&v);
2427
2428 V_VT(&v) = VT_BSTR;
2429 V_BSTR(&v) = a2bstr("middle");
2430 hres = IHTMLStyle_put_verticalAlign(style, v);
2431 ok(hres == S_OK, "put_vertivalAlign failed: %08x\n", hres);
2432 VariantClear(&v);
2433
2434 V_VT(&v) = VT_EMPTY;
2435 hres = IHTMLStyle_get_verticalAlign(style, &v);
2436 ok(hres == S_OK, "get_verticalAlign failed: %08x\n", hres);
2437 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
2438 ok(!strcmp_wa(V_BSTR(&v), "middle"), "V_BSTR(v) = %s\n", dbgstr_w(V_BSTR(&v)));
2439 VariantClear(&v);
2440
2441 str = (void*)0xdeadbeef;
2442 hres = IHTMLStyle_get_textAlign(style, &str);
2443 ok(hres == S_OK, "get_textAlign failed: %08x\n", hres);
2444 ok(!str, "textAlign != NULL\n");
2445
2446 str = a2bstr("center");
2447 hres = IHTMLStyle_put_textAlign(style, str);
2448 ok(hres == S_OK, "put_textAlign failed: %08x\n", hres);
2449 SysFreeString(str);
2450
2451 str = NULL;
2452 hres = IHTMLStyle_get_textAlign(style, &str);
2453 ok(hres == S_OK, "get_textAlign failed: %08x\n", hres);
2454 ok(!strcmp_wa(str, "center"), "textAlign = %s\n", dbgstr_w(V_BSTR(&v)));
2455 SysFreeString(str);
2456
2457 str = (void*)0xdeadbeef;
2458 hres = IHTMLStyle_get_filter(style, &str);
2459 ok(hres == S_OK, "get_filter failed: %08x\n", hres);
2460 ok(!str, "filter != NULL\n");
2461
2462 str = a2bstr("alpha(opacity=100)");
2463 hres = IHTMLStyle_put_filter(style, str);
2464 ok(hres == S_OK, "put_filter failed: %08x\n", hres);
2465 SysFreeString(str);
2466
2467 V_VT(&v) = VT_EMPTY;
2468 hres = IHTMLStyle_get_zIndex(style, &v);
2469 ok(hres == S_OK, "get_zIndex failed: %08x\n", hres);
2470 ok(V_VT(&v) == VT_I4, "V_VT(v)=%d\n", V_VT(&v));
2471 ok(!V_I4(&v), "V_I4(v) != 0\n");
2472 VariantClear(&v);
2473
2474 V_VT(&v) = VT_BSTR;
2475 V_BSTR(&v) = a2bstr("1");
2476 hres = IHTMLStyle_put_zIndex(style, v);
2477 ok(hres == S_OK, "put_zIndex failed: %08x\n", hres);
2478 VariantClear(&v);
2479
2480 V_VT(&v) = VT_EMPTY;
2481 hres = IHTMLStyle_get_zIndex(style, &v);
2482 ok(hres == S_OK, "get_zIndex failed: %08x\n", hres);
2483 ok(V_VT(&v) == VT_I4, "V_VT(v)=%d\n", V_VT(&v));
2484 ok(V_I4(&v) == 1, "V_I4(v) = %d\n", V_I4(&v));
2485 VariantClear(&v);
2486
2487 hres = IHTMLStyle_QueryInterface(style, &IID_IHTMLStyle2, (void**)&style2);
2488 ok(hres == S_OK, "Could not get IHTMLStyle2 iface: %08x\n", hres);
2489 if(SUCCEEDED(hres)) {
2490 test_style2(style2);
2491 IHTMLStyle2_Release(style2);
2492 }
2493 }
2494
2495 static void test_default_selection(IHTMLDocument2 *doc)
2496 {
2497 IHTMLSelectionObject *selection;
2498 IHTMLTxtRange *range;
2499 IDispatch *disp;
2500 BSTR str;
2501 HRESULT hres;
2502
2503 hres = IHTMLDocument2_get_selection(doc, &selection);
2504 ok(hres == S_OK, "get_selection failed: %08x\n", hres);
2505
2506 hres = IHTMLSelectionObject_get_type(selection, &str);
2507 ok(hres == S_OK, "get_type failed: %08x\n", hres);
2508 ok(!lstrcmpW(str, noneW), "type = %s\n", dbgstr_w(str));
2509 SysFreeString(str);
2510
2511 hres = IHTMLSelectionObject_createRange(selection, &disp);
2512 IHTMLSelectionObject_Release(selection);
2513 ok(hres == S_OK, "createRange failed: %08x\n", hres);
2514
2515 hres = IDispatch_QueryInterface(disp, &IID_IHTMLTxtRange, (void**)&range);
2516 IDispatch_Release(disp);
2517 ok(hres == S_OK, "Could not get IHTMLTxtRange interface: %08x\n", hres);
2518
2519 test_range_text(range, NULL);
2520 IHTMLTxtRange_Release(range);
2521 }
2522
2523 static void test_default_body(IHTMLBodyElement *body)
2524 {
2525 long l;
2526 BSTR bstr;
2527 HRESULT hres;
2528 VARIANT v;
2529 WCHAR sBodyText[] = {'#','F','F','0','0','0','0',0};
2530 WCHAR sTextInvalid[] = {'I','n','v','a','l','i','d',0};
2531 WCHAR sResInvalid[] = {'#','0','0','a','0','d','0',0};
2532
2533 bstr = (void*)0xdeadbeef;
2534 hres = IHTMLBodyElement_get_background(body, &bstr);
2535 ok(hres == S_OK, "get_background failed: %08x\n", hres);
2536 ok(bstr == NULL, "bstr != NULL\n");
2537
2538 l = elem_get_scroll_height((IUnknown*)body);
2539 ok(l != -1, "scrollHeight == -1\n");
2540 l = elem_get_scroll_width((IUnknown*)body);
2541 ok(l != -1, "scrollWidth == -1\n");
2542 l = elem_get_scroll_top((IUnknown*)body);
2543 ok(!l, "scrollTop = %ld\n", l);
2544 elem_get_scroll_left((IUnknown*)body);
2545
2546 /* get_text tests */
2547 hres = IHTMLBodyElement_get_text(body, &v);
2548 ok(hres == S_OK, "expect S_OK got 0x%08d\n", hres);
2549 ok(V_VT(&v) == VT_BSTR, "Expected VT_BSTR got %d\n", V_VT(&v));
2550 ok(bstr == NULL, "bstr != NULL\n");
2551
2552
2553 /* get_text - Invalid Text */
2554 V_VT(&v) = VT_BSTR;
2555 V_BSTR(&v) = SysAllocString(sTextInvalid);
2556 hres = IHTMLBodyElement_put_text(body, v);
2557 ok(hres == S_OK, "expect S_OK got 0x%08d\n", hres);
2558
2559 V_VT(&v) = VT_NULL;
2560 hres = IHTMLBodyElement_get_text(body, &v);
2561 ok(hres == S_OK, "expect S_OK got 0x%08d\n", hres);
2562 ok(V_VT(&v) == VT_BSTR, "Expected VT_BSTR got %d\n", V_VT(&v));
2563 ok(!lstrcmpW(sResInvalid, V_BSTR(&v)), "bstr != sResInvalid\n");
2564 VariantClear(&v);
2565
2566 /* get_text - Valid Text */
2567 V_VT(&v) = VT_BSTR;
2568 V_BSTR(&v) = SysAllocString(sBodyText);
2569 hres = IHTMLBodyElement_put_text(body, v);
2570 ok(hres == S_OK, "expect S_OK got 0x%08d\n", hres);
2571
2572 V_VT(&v) = VT_NULL;
2573 hres = IHTMLBodyElement_get_text(body, &v);
2574 ok(hres == S_OK, "expect S_OK got 0x%08d\n", hres);
2575 ok(V_VT(&v) == VT_BSTR, "Expected VT_BSTR got %d\n", V_VT(&v));
2576 ok(lstrcmpW(bstr, V_BSTR(&v)), "bstr != V_BSTR(&v)\n");
2577 VariantClear(&v);
2578 }
2579
2580 static void test_body_funs(IHTMLBodyElement *body)
2581 {
2582 static WCHAR sRed[] = {'r','e','d',0};
2583 static WCHAR sRedbg[] = {'#','f','f','0','0','0','0',0};
2584 VARIANT vbg;
2585 VARIANT vDefaultbg;
2586 HRESULT hres;
2587
2588 hres = IHTMLBodyElement_get_bgColor(body, &vDefaultbg);
2589 ok(hres == S_OK, "get_background failed: %08x\n", hres);
2590 ok(V_VT(&vDefaultbg) == VT_BSTR, "bstr != NULL\n");
2591
2592 V_VT(&vbg) = VT_BSTR;
2593 V_BSTR(&vbg) = SysAllocString(sRed);
2594 hres = IHTMLBodyElement_put_bgColor(body, vbg);
2595 ok(hres == S_OK, "get_background failed: %08x\n", hres);
2596 VariantClear(&vbg);
2597
2598 hres = IHTMLBodyElement_get_bgColor(body, &vbg);
2599 ok(hres == S_OK, "get_background failed: %08x\n", hres);
2600 ok(V_VT(&vDefaultbg) == VT_BSTR, "V_VT(&vDefaultbg) != VT_BSTR\n");
2601 ok(!lstrcmpW(V_BSTR(&vbg), sRedbg), "Unexpected type %s\n", dbgstr_w(V_BSTR(&vbg)));
2602 VariantClear(&vbg);
2603
2604 /* Restore Originial */
2605 hres = IHTMLBodyElement_put_bgColor(body, vDefaultbg);
2606 ok(hres == S_OK, "get_background failed: %08x\n", hres);
2607 VariantClear(&vDefaultbg);
2608 }
2609
2610 static void test_window(IHTMLDocument2 *doc)
2611 {
2612 IHTMLWindow2 *window, *window2, *self;
2613 IHTMLDocument2 *doc2 = NULL;
2614 IDispatch *disp;
2615 HRESULT hres;
2616
2617 hres = IHTMLDocument2_get_parentWindow(doc, &window);
2618 ok(hres == S_OK, "get_parentElement failed: %08x\n", hres);
2619 test_ifaces((IUnknown*)window, window_iids);
2620 test_disp((IUnknown*)window, &DIID_DispHTMLWindow2);
2621
2622 hres = IHTMLWindow2_get_document(window, &doc2);
2623 ok(hres == S_OK, "get_document failed: %08x\n", hres);
2624 ok(doc2 != NULL, "doc2 == NULL\n");
2625
2626 IHTMLDocument_Release(doc2);
2627
2628 hres = IHTMLWindow2_get_window(window, &window2);
2629 ok(hres == S_OK, "get_window failed: %08x\n", hres);
2630 ok(window2 != NULL, "window2 == NULL\n");
2631
2632 hres = IHTMLWindow2_get_self(window, &self);
2633 ok(hres == S_OK, "get_window failed: %08x\n", hres);
2634 ok(window2 != NULL, "self == NULL\n");
2635
2636 ok(self == window2, "self != window2\n");
2637
2638 IHTMLWindow2_Release(window2);
2639 IHTMLWindow2_Release(self);
2640
2641 disp = NULL;
2642 hres = IHTMLDocument2_get_Script(doc, &disp);
2643 ok(hres == S_OK, "get_Script failed: %08x\n", hres);
2644 ok(disp == (void*)window, "disp != window\n");
2645 IDispatch_Release(disp);
2646
2647 IHTMLWindow2_Release(window);
2648 }
2649
2650 static void test_defaults(IHTMLDocument2 *doc)
2651 {
2652 IHTMLStyleSheetsCollection *stylesheetcol;
2653 IHTMLCurrentStyle *cstyle;
2654 IHTMLBodyElement *body;
2655 IHTMLElement2 *elem2;
2656 IHTMLElement *elem;
2657 IHTMLStyle *style;
2658 long l;
2659 HRESULT hres;
2660
2661 hres = IHTMLDocument2_get_body(doc, &elem);
2662 ok(hres == S_OK, "get_body failed: %08x\n", hres);
2663
2664 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLBodyElement, (void**)&body);
2665 ok(hres == S_OK, "Could not get IHTMBodyElement: %08x\n", hres);
2666 test_default_body(body);
2667 test_body_funs(body);
2668 IHTMLBodyElement_Release(body);
2669
2670 hres = IHTMLElement_get_style(elem, &style);
2671 ok(hres == S_OK, "get_style failed: %08x\n", hres);
2672
2673 test_default_style(style);
2674 test_window(doc);
2675 test_compatmode(doc);
2676 test_location(doc);
2677 test_navigator(doc);
2678
2679 IHTMLStyle_Release(style);
2680
2681 elem2 = get_elem2_iface((IUnknown*)elem);
2682 hres = IHTMLElement2_get_currentStyle(elem2, &cstyle);
2683 ok(hres == S_OK, "get_currentStyle failed: %08x\n", hres);
2684 if(SUCCEEDED(hres)) {
2685 test_current_style(cstyle);
2686 IHTMLCurrentStyle_Release(cstyle);
2687 }
2688 IHTMLElement2_Release(elem2);
2689
2690 IHTMLElement_Release(elem);
2691
2692 hres = IHTMLDocument2_get_styleSheets(doc, &stylesheetcol);
2693 ok(hres == S_OK, "get_styleSheets failed: %08x\n", hres);
2694
2695 l = 0xdeadbeef;
2696 hres = IHTMLStyleSheetsCollection_get_length(stylesheetcol, &l);
2697 ok(hres == S_OK, "get_length failed: %08x\n", hres);
2698 ok(l == 0, "length = %ld\n", l);
2699
2700 IHTMLStyleSheetsCollection_Release(stylesheetcol);
2701
2702 test_default_selection(doc);
2703 test_doc_title(doc, "");
2704 }
2705
2706 static void test_tr_elem(IHTMLElement *elem)
2707 {
2708 IHTMLElementCollection *col;
2709 IHTMLTableRow *row;
2710 HRESULT hres;
2711
2712 static const elem_type_t cell_types[] = {ET_TD,ET_TD};
2713
2714 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLTableRow, (void**)&row);
2715 ok(hres == S_OK, "Could not get IHTMLTableRow iface: %08x\n", hres);
2716 if(FAILED(hres))
2717 return;
2718
2719 col = NULL;
2720 hres = IHTMLTableRow_get_cells(row, &col);
2721 ok(hres == S_OK, "get_cells failed: %08x\n", hres);
2722 ok(col != NULL, "get_cells returned NULL\n");
2723
2724 test_elem_collection((IUnknown*)col, cell_types, sizeof(cell_types)/sizeof(*cell_types));
2725 IHTMLElementCollection_Release(col);
2726
2727 IHTMLTable_Release(row);
2728 }
2729
2730 static void test_table_elem(IHTMLElement *elem)
2731 {
2732 IHTMLElementCollection *col;
2733 IHTMLTable *table;
2734 HRESULT hres;
2735
2736 static const elem_type_t row_types[] = {ET_TR,ET_TR};
2737
2738 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLTable, (void**)&table);
2739 ok(hres == S_OK, "Could not get IHTMLTable iface: %08x\n", hres);
2740 if(FAILED(hres))
2741 return;
2742
2743 col = NULL;
2744 hres = IHTMLTable_get_rows(table, &col);
2745 ok(hres == S_OK, "get_rows failed: %08x\n", hres);
2746 ok(col != NULL, "get_ros returned NULL\n");
2747
2748 test_elem_collection((IUnknown*)col, row_types, sizeof(row_types)/sizeof(*row_types));
2749 IHTMLElementCollection_Release(col);
2750
2751 IHTMLTable_Release(table);
2752 }
2753
2754 static void doc_write(IHTMLDocument2 *doc, const char *text)
2755 {
2756 SAFEARRAYBOUND dim;
2757 SAFEARRAY *sa;
2758 VARIANT *var;
2759 BSTR str;
2760 HRESULT hres;
2761
2762 dim.lLbound = 0;
2763 dim.cElements = 1;
2764 sa = SafeArrayCreate(VT_VARIANT, 1, &dim);
2765 SafeArrayAccessData(sa, (void**)&var);
2766 V_VT(var) = VT_BSTR;
2767 V_BSTR(var) = str = a2bstr(text);
2768 SafeArrayUnaccessData(sa);
2769
2770 hres = IHTMLDocument2_write(doc, sa);
2771 ok(hres == S_OK, "write failed: %08x\n", hres);
2772
2773 SysFreeString(str);
2774 SafeArrayDestroy(sa);
2775 }
2776
2777 static void test_iframe_elem(IHTMLElement *elem)
2778 {
2779 IHTMLElementCollection *col;
2780 IHTMLDocument2 *content_doc;
2781 IHTMLWindow2 *content_window;
2782 IHTMLFrameBase2 *base2;
2783 IDispatch *disp;
2784 VARIANT errv;
2785 BSTR str;
2786 HRESULT hres;
2787
2788 static const elem_type_t all_types[] = {
2789 ET_HTML,
2790 ET_HEAD,
2791 ET_TITLE,
2792 ET_BODY,
2793 ET_BR
2794 };
2795
2796 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLFrameBase2, (void**)&base2);
2797 ok(hres == S_OK, "Could not get IHTMFrameBase2 iface: %08x\n", hres);
2798
2799 content_window = NULL;
2800 hres = IHTMLFrameBase2_get_contentWindow(base2, &content_window);
2801 IHTMLFrameBase2_Release(base2);
2802 ok(hres == S_OK, "get_contentWindow failed: %08x\n", hres);
2803 ok(content_window != NULL, "contentWindow = NULL\n");
2804
2805 content_doc = NULL;
2806 hres = IHTMLWindow2_get_document(content_window, &content_doc);
2807 IHTMLWindow2_Release(content_window);
2808 ok(hres == S_OK, "get_document failed: %08x\n", hres);
2809 ok(content_doc != NULL, "content_doc = NULL\n");
2810
2811 str = a2bstr("text/html");
2812 V_VT(&errv) = VT_ERROR;
2813 disp = NULL;
2814 hres = IHTMLDocument2_open(content_doc, str, errv, errv, errv, &disp);
2815 SysFreeString(str);
2816 ok(hres == S_OK, "open failed: %08x\n", hres);
2817 ok(disp != NULL, "disp == NULL\n");
2818 ok(iface_cmp((IUnknown*)disp, (IUnknown*)content_window), "disp != content_window\n");
2819 IDispatch_Release(disp);
2820
2821 doc_write(content_doc, "<html><head><title>test</title></head><body><br /></body></html>");
2822
2823 hres = IHTMLDocument2_get_all(content_doc, &col);
2824 ok(hres == S_OK, "get_all failed: %08x\n", hres);
2825 test_elem_collection((IUnknown*)col, all_types, sizeof(all_types)/sizeof(all_types[0]));
2826 IHTMLElementCollection_Release(col);
2827
2828 hres = IHTMLDocument2_close(content_doc);
2829 ok(hres == S_OK, "close failed: %08x\n", hres);
2830
2831 IHTMLDocument2_Release(content_doc);
2832 }
2833
2834 static void test_stylesheet(IDispatch *disp)
2835 {
2836 IHTMLStyleSheetRulesCollection *col = NULL;
2837 IHTMLStyleSheet *stylesheet;
2838 HRESULT hres;
2839
2840 hres = IDispatch_QueryInterface(disp, &IID_IHTMLStyleSheet, (void**)&stylesheet);
2841 ok(hres == S_OK, "Could not get IHTMLStyleSheet: %08x\n", hres);
2842
2843 hres = IHTMLStyleSheet_get_rules(stylesheet, &col);
2844 ok(hres == S_OK, "get_rules failed: %08x\n", hres);
2845 ok(col != NULL, "col == NULL\n");
2846
2847 IHTMLStyleSheetRulesCollection_Release(col);
2848 IHTMLStyleSheet_Release(stylesheet);
2849 }
2850
2851 static void test_stylesheets(IHTMLDocument2 *doc)
2852 {
2853 IHTMLStyleSheetsCollection *col = NULL;
2854 VARIANT idx, res;
2855 long len = 0;
2856 HRESULT hres;
2857
2858 hres = IHTMLDocument2_get_styleSheets(doc, &col);
2859 ok(hres == S_OK, "get_styleSheets failed: %08x\n", hres);
2860 ok(col != NULL, "col == NULL\n");
2861
2862 hres = IHTMLStyleSheetsCollection_get_length(col, &len);
2863 ok(hres == S_OK, "get_length failed: %08x\n", hres);
2864 ok(len == 1, "len=%ld\n", len);
2865
2866 VariantInit(&res);
2867 V_VT(&idx) = VT_I4;
2868 V_I4(&idx) = 0;
2869
2870 hres = IHTMLStyleSheetsCollection_item(col, &idx, &res);
2871 ok(hres == S_OK, "item failed: %08x\n", hres);
2872 ok(V_VT(&res) == VT_DISPATCH, "V_VT(res) = %d\n", V_VT(&res));
2873 ok(V_DISPATCH(&res) != NULL, "V_DISPATCH(&res) == NULL\n");
2874 test_stylesheet(V_DISPATCH(&res));
2875 VariantClear(&res);
2876
2877 V_VT(&res) = VT_I4;
2878 V_VT(&idx) = VT_I4;
2879 V_I4(&idx) = 1;
2880
2881 hres = IHTMLStyleSheetsCollection_item(col, &idx, &res);
2882 ok(hres == E_INVALIDARG, "item failed: %08x, expected E_INVALIDARG\n", hres);
2883 ok(V_VT(&res) == VT_EMPTY, "V_VT(res) = %d\n", V_VT(&res));
2884 ok(V_DISPATCH(&res) != NULL, "V_DISPATCH(&res) == NULL\n");
2885 VariantClear(&res);
2886
2887 IHTMLStyleSheetsCollection_Release(col);
2888 }
2889
2890 static void test_child_col_disp(IHTMLDOMChildrenCollection *col)
2891 {
2892 IDispatchEx *dispex;
2893 IHTMLDOMNode *node;
2894 DISPPARAMS dp = {NULL, NULL, 0, 0};
2895 VARIANT var;
2896 EXCEPINFO ei;
2897 long type;
2898 DISPID id;
2899 BSTR bstr;
2900 HRESULT hres;
2901
2902 static const WCHAR w0[] = {'0',0};
2903 static const WCHAR w100[] = {'1','0','0',0};
2904
2905 hres = IHTMLDOMChildrenCollection_QueryInterface(col, &IID_IDispatchEx, (void**)&dispex);
2906 ok(hres == S_OK, "Could not get IDispatchEx: %08x\n", hres);
2907
2908 bstr = SysAllocString(w0);
2909 hres = IDispatchEx_GetDispID(dispex, bstr, fdexNameCaseSensitive, &id);
2910 ok(hres == S_OK, "GetDispID failed: %08x\n", hres);
2911 SysFreeString(bstr);
2912
2913 VariantInit(&var);
2914 hres = IDispatchEx_InvokeEx(dispex, id, LOCALE_NEUTRAL, INVOKE_PROPERTYGET, &dp, &var, &ei, NULL);
2915 ok(hres == S_OK, "InvokeEx failed: %08x\n", hres);
2916 ok(V_VT(&var) == VT_DISPATCH, "V_VT(var)=%d\n", V_VT(&var));
2917 ok(V_DISPATCH(&var) != NULL, "V_DISPATCH(var) == NULL\n");
2918 node = get_node_iface((IUnknown*)V_DISPATCH(&var));
2919 type = get_node_type((IUnknown*)node);
2920 ok(type == 3, "type=%ld\n", type);
2921 IHTMLDOMNode_Release(node);
2922 VariantClear(&var);
2923
2924 bstr = SysAllocString(w100);
2925 hres = IDispatchEx_GetDispID(dispex, bstr, fdexNameCaseSensitive, &id);
2926 ok(hres == DISP_E_UNKNOWNNAME, "GetDispID failed: %08x, expected DISP_E_UNKNOWNNAME\n", hres);
2927 SysFreeString(bstr);
2928
2929 IDispatchEx_Release(dispex);
2930 }
2931
2932
2933
2934 static void test_elems(IHTMLDocument2 *doc)
2935 {
2936 IHTMLElementCollection *col;
2937 IHTMLDOMChildrenCollection *child_col;
2938 IHTMLElement *elem, *elem2, *elem3;
2939 IHTMLDOMNode *node, *node2;
2940 IDispatch *disp;
2941 long type;
2942 HRESULT hres;
2943
2944 static const WCHAR imgidW[] = {'i','m','g','i','d',0};
2945 static const WCHAR inW[] = {'i','n',0};
2946 static const WCHAR xW[] = {'x',0};
2947 static const WCHAR sW[] = {'s',0};
2948 static const WCHAR scW[] = {'s','c',0};
2949 static const WCHAR xxxW[] = {'x','x','x',0};
2950 static const WCHAR tblW[] = {'t','b','l',0};
2951 static const WCHAR row2W[] = {'r','o','w','2',0};
2952 static const WCHAR ifrW[] = {'i','f','r',0};
2953
2954 static const elem_type_t all_types[] = {
2955 ET_HTML,
2956 ET_HEAD,
2957 ET_TITLE,
2958 ET_STYLE,
2959 ET_BODY,
2960 ET_COMMENT,
2961 ET_A,
2962 ET_INPUT,
2963 ET_SELECT,
2964 ET_OPTION,
2965 ET_OPTION,
2966 ET_TEXTAREA,
2967 ET_TABLE,
2968 ET_TBODY,
2969 ET_TR,
2970 ET_TR,
2971 ET_TD,
2972 ET_TD,
2973 ET_SCRIPT,
2974 ET_TEST,
2975 ET_IMG,
2976 ET_IFRAME
2977 };
2978
2979 static const elem_type_t item_types[] = {
2980 ET_A,
2981 ET_OPTION,
2982 ET_TEXTAREA
2983 };
2984
2985 hres = IHTMLDocument2_get_all(doc, &col);
2986 ok(hres == S_OK, "get_all failed: %08x\n", hres);
2987 test_elem_collection((IUnknown*)col, all_types, sizeof(all_types)/sizeof(all_types[0]));
2988 test_elem_col_item(col, xW, item_types, sizeof(item_types)/sizeof(item_types[0]));
2989 IHTMLElementCollection_Release(col);
2990
2991 elem = get_doc_elem(doc);
2992 ok(hres == S_OK, "get_documentElement failed: %08x\n", hres);
2993 hres = IHTMLElement_get_all(elem, &disp);
2994 IHTMLElement_Release(elem);
2995 ok(hres == S_OK, "get_all failed: %08x\n", hres);
2996
2997 hres = IDispatch_QueryInterface(disp, &IID_IHTMLElementCollection, (void**)&col);
2998 IDispatch_Release(disp);
2999 ok(hres == S_OK, "Could not get IHTMLElementCollection: %08x\n", hres);
3000 test_elem_collection((IUnknown*)col, all_types+1, sizeof(all_types)/sizeof(all_types[0])-1);
3001 IHTMLElementCollection_Release(col);
3002
3003 get_elem_by_id(doc, xxxW, FALSE);
3004 elem = get_doc_elem_by_id(doc, xxxW);
3005 ok(!elem, "elem != NULL\n");
3006
3007 elem = get_doc_elem_by_id(doc, sW);
3008 ok(elem != NULL, "elem == NULL\n");
3009 if(elem) {
3010 test_elem_type((IUnknown*)elem, ET_SELECT);
3011 test_elem_attr(elem, xxxW, NULL);
3012 test_elem_attr(elem, idW, sW);
3013 test_elem_class((IUnknown*)elem, NULL);
3014 test_elem_set_class((IUnknown*)elem, "cl");
3015 test_elem_set_class((IUnknown*)elem, NULL);
3016 test_elem_tabindex((IUnknown*)elem, 0);
3017 test_elem_set_tabindex((IUnknown*)elem, 1);
3018
3019 node = test_node_get_parent((IUnknown*)elem);
3020 ok(node != NULL, "node == NULL\n");
3021 test_node_name((IUnknown*)node, "BODY");
3022 node2 = test_node_get_parent((IUnknown*)node);
3023 IHTMLDOMNode_Release(node);
3024 ok(node2 != NULL, "node == NULL\n");
3025 test_node_name((IUnknown*)node2, "HTML");
3026 node = test_node_get_parent((IUnknown*)node2);
3027 IHTMLDOMNode_Release(node2);
3028 ok(node != NULL, "node == NULL\n");
3029 test_node_name((IUnknown*)node, "#document");
3030 type = get_node_type((IUnknown*)node);
3031 ok(type == 9, "type=%ld, expected 9\n", type);
3032 node2 = test_node_get_parent((IUnknown*)node);
3033 IHTMLDOMNode_Release(node);
3034 ok(node2 == NULL, "node != NULL\n");
3035
3036 elem2 = test_elem_get_parent((IUnknown*)elem);
3037 ok(elem2 != NULL, "elem2 == NULL\n");
3038 test_node_name((IUnknown*)elem2, "BODY");
3039 elem3 = test_elem_get_parent((IUnknown*)elem2);
3040 IHTMLElement_Release(elem2);
3041 ok(elem3 != NULL, "elem3 == NULL\n");
3042 test_node_name((IUnknown*)elem3, "HTML");
3043 elem2 = test_elem_get_parent((IUnknown*)elem3);
3044 IHTMLElement_Release(elem3);
3045 ok(elem2 == NULL, "elem2 != NULL\n");
3046
3047 test_elem_getelembytag((IUnknown*)elem, ET_OPTION, 2);
3048 test_elem_getelembytag((IUnknown*)elem, ET_SELECT, 0);
3049 test_elem_getelembytag((IUnknown*)elem, ET_HTML, 0);
3050
3051 test_elem_innertext(elem, "opt1opt2");
3052
3053 IHTMLElement_Release(elem);
3054 }
3055
3056 elem = get_elem_by_id(doc, sW, TRUE);
3057 if(elem) {
3058 IHTMLSelectElement *select;
3059
3060 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLSelectElement, (void**)&select);
3061 ok(hres == S_OK, "Could not get IHTMLSelectElement interface: %08x\n", hres);
3062
3063 test_select_elem(select);
3064
3065 test_elem_title((IUnknown*)select, NULL);
3066 test_elem_set_title((IUnknown*)select, "Title");
3067 test_elem_title((IUnknown*)select, "Title");
3068 test_elem_offset((IUnknown*)select);
3069
3070 node = get_first_child((IUnknown*)select);
3071 ok(node != NULL, "node == NULL\n");
3072 if(node) {
3073 test_elem_type((IUnknown*)node, ET_OPTION);
3074 IHTMLDOMNode_Release(node);
3075 }
3076
3077 type = get_node_type((IUnknown*)select);
3078 ok(type == 1, "type=%ld\n", type);
3079
3080 IHTMLSelectElement_Release(select);
3081 IHTMLElement_Release(elem);
3082 }
3083
3084 elem = get_elem_by_id(doc, scW, TRUE);
3085 if(elem) {
3086 IHTMLScriptElement *script;
3087 BSTR type;
3088
3089 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLScriptElement, (void**)&script);
3090 ok(hres == S_OK, "Could not get IHTMLScriptElement interface: %08x\n", hres);
3091
3092 hres = IHTMLScriptElement_get_type(script, &type);
3093 ok(hres == S_OK, "get_type failed: %08x\n", hres);
3094 ok(!lstrcmpW(type, text_javascriptW), "Unexpected type %s\n", dbgstr_w(type));
3095 SysFreeString(type);
3096
3097 IHTMLScriptElement_Release(script);
3098 }
3099
3100 elem = get_elem_by_id(doc, inW, TRUE);
3101 if(elem) {
3102 IHTMLInputElement *input;
3103
3104 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLInputElement, (void**)&input);
3105 ok(hres == S_OK, "Could not get IHTMLInputElement: %08x\n", hres);
3106
3107 test_elem_id((IUnknown*)elem, "in");
3108 test_elem_put_id((IUnknown*)elem, "newin");
3109 test_input_get_disabled(input, VARIANT_FALSE);
3110 test_input_set_disabled(input, VARIANT_TRUE);
3111 test_input_set_disabled(input, VARIANT_FALSE);
3112 test_elem3_set_disabled((IUnknown*)input, VARIANT_TRUE);
3113 test_input_get_disabled(input, VARIANT_TRUE);
3114 test_elem3_set_disabled((IUnknown*)input, VARIANT_FALSE);
3115 test_input_get_disabled(input, VARIANT_FALSE);
3116 test_elem_client_size((IUnknown*)elem);
3117
3118 test_node_get_value_str((IUnknown*)elem, NULL);
3119 test_node_put_value_str((IUnknown*)elem, "test");
3120 test_node_get_value_str((IUnknown*)elem, NULL);
3121 test_input_value((IUnknown*)elem, NULL);
3122 test_input_put_value((IUnknown*)elem, "test");
3123 test_input_value((IUnknown*)elem, NULL);
3124 test_elem_class((IUnknown*)elem, "testclass");
3125 test_elem_tabindex((IUnknown*)elem, 2);
3126 test_elem_set_tabindex((IUnknown*)elem, 3);
3127 test_elem_title((IUnknown*)elem, "test title");
3128
3129 IHTMLInputElement_Release(input);
3130 IHTMLElement_Release(elem);
3131 }
3132
3133 elem = get_elem_by_id(doc, imgidW, TRUE);
3134 if(elem) {
3135 test_img_src((IUnknown*)elem, "");
3136 test_img_set_src((IUnknown*)elem, "about:blank");
3137 test_img_alt((IUnknown*)elem, NULL);
3138 test_img_set_alt((IUnknown*)elem, "alt test");
3139 IHTMLElement_Release(elem);
3140 }
3141
3142 elem = get_doc_elem_by_id(doc, tblW);
3143 ok(elem != NULL, "elem == NULL\n");
3144 if(elem) {
3145 test_table_elem(elem);
3146 IHTMLElement_Release(elem);
3147 }
3148
3149 elem = get_doc_elem_by_id(doc, row2W);
3150 ok(elem != NULL, "elem == NULL\n");
3151 if(elem) {
3152 test_tr_elem(elem);
3153 IHTMLElement_Release(elem);
3154 }
3155
3156 elem = get_doc_elem_by_id(doc, ifrW);
3157 ok(elem != NULL, "elem == NULL\n");
3158 if(elem) {
3159 test_iframe_elem(elem);
3160 IHTMLElement_Release(elem);
3161 }
3162
3163 hres = IHTMLDocument2_get_body(doc, &elem);
3164 ok(hres == S_OK, "get_body failed: %08x\n", hres);
3165
3166 node = get_first_child((IUnknown*)elem);
3167 ok(node != NULL, "node == NULL\n");
3168 if(node) {
3169 test_ifaces((IUnknown*)node, text_iids);
3170 test_disp((IUnknown*)node, &DIID_DispHTMLDOMTextNode);
3171
3172 node2 = get_first_child((IUnknown*)node);
3173 ok(!node2, "node2 != NULL\n");
3174
3175 type = get_node_type((IUnknown*)node);
3176 ok(type == 3, "type=%ld\n", type);
3177
3178 test_node_get_value_str((IUnknown*)node, "text test");
3179 test_node_put_value_str((IUnknown*)elem, "test text");
3180 test_node_get_value_str((IUnknown*)node, "text test");
3181
3182 IHTMLDOMNode_Release(node);
3183 }
3184
3185 child_col = get_child_nodes((IUnknown*)elem);
3186 ok(child_col != NULL, "child_coll == NULL\n");
3187 if(child_col) {
3188 long length = 0;
3189
3190 test_disp((IUnknown*)child_col, &DIID_DispDOMChildrenCollection);
3191
3192 hres = IHTMLDOMChildrenCollection_get_length(child_col, &length);
3193 ok(hres == S_OK, "get_length failed: %08x\n", hres);
3194 ok(length, "length=0\n");
3195
3196 node = get_child_item(child_col, 0);
3197 ok(node != NULL, "node == NULL\n");
3198 if(node) {
3199 type = get_node_type((IUnknown*)node);
3200 ok(type == 3, "type=%ld\n", type);
3201 IHTMLDOMNode_Release(node);
3202 }
3203
3204 node = get_child_item(child_col, 1);
3205 ok(node != NULL, "node == NULL\n");
3206 if(node) {
3207 type = get_node_type((IUnknown*)node);
3208 ok(type == 8, "type=%ld\n", type);
3209
3210 test_elem_id((IUnknown*)node, NULL);
3211 IHTMLDOMNode_Release(node);
3212 }
3213
3214 disp = (void*)0xdeadbeef;
3215 hres = IHTMLDOMChildrenCollection_item(child_col, 6000, &disp);
3216 ok(hres == E_INVALIDARG, "item failed: %08x, expected E_INVALIDARG\n", hres);
3217 ok(disp == (void*)0xdeadbeef, "disp=%p\n", disp);
3218
3219 disp = (void*)0xdeadbeef;
3220 hres = IHTMLDOMChildrenCollection_item(child_col, length, &disp);
3221 ok(hres == E_INVALIDARG, "item failed: %08x, expected E_INVALIDARG\n", hres);
3222 ok(disp == (void*)0xdeadbeef, "disp=%p\n", disp);
3223
3224 test_child_col_disp(child_col);
3225
3226 IHTMLDOMChildrenCollection_Release(child_col);
3227 }
3228
3229 test_elem3_get_disabled((IUnknown*)elem, VARIANT_FALSE);
3230 test_elem3_set_disabled((IUnknown*)elem, VARIANT_TRUE);
3231 test_elem3_set_disabled((IUnknown*)elem, VARIANT_FALSE);
3232
3233 IHTMLElement_Release(elem);
3234
3235 test_stylesheets(doc);
3236 test_create_option_elem(doc);
3237
3238 elem = get_doc_elem_by_id(doc, tblW);
3239 ok(elem != NULL, "elem = NULL\n");
3240 test_elem_set_innertext(elem, "inner text");
3241 IHTMLElement_Release(elem);
3242
3243 test_doc_title(doc, "test");
3244 test_doc_set_title(doc, "test title");
3245 test_doc_title(doc, "test title");
3246 }
3247
3248 static void test_create_elems(IHTMLDocument2 *doc)
3249 {
3250 IHTMLElement *elem, *body, *elem2;
3251 IHTMLDOMNode *node, *node2, *node3;
3252 IDispatch *disp;
3253 VARIANT var;
3254 long type;
3255 HRESULT hres;
3256
3257 static const elem_type_t types1[] = { ET_TESTG };
3258
3259 elem = test_create_elem(doc, "TEST");
3260 test_elem_tag((IUnknown*)elem, "TEST");
3261 type = get_node_type((IUnknown*)elem);
3262 ok(type == 1, "type=%ld\n", type);
3263 test_ifaces((IUnknown*)elem, elem_iids);
3264 test_disp((IUnknown*)elem, &DIID_DispHTMLGenericElement);
3265
3266 hres = IHTMLDocument2_get_body(doc, &body);
3267 ok(hres == S_OK, "get_body failed: %08x\n", hres);
3268 test_node_has_child((IUnknown*)body, VARIANT_FALSE);
3269
3270 node = test_node_append_child((IUnknown*)body, (IUnknown*)elem);
3271 test_node_has_child((IUnknown*)body, VARIANT_TRUE);
3272 elem2 = get_elem_iface((IUnknown*)node);
3273 IHTMLElement_Release(elem2);
3274
3275 hres = IHTMLElement_get_all(body, &disp);
3276 ok(hres == S_OK, "get_all failed: %08x\n", hres);
3277 test_elem_collection((IUnknown*)disp, types1, sizeof(types1)/sizeof(types1[0]));
3278 IDispatch_Release(disp);
3279
3280 test_node_remove_child((IUnknown*)body, node);
3281
3282 hres = IHTMLElement_get_all(body, &disp);
3283 ok(hres == S_OK, "get_all failed: %08x\n", hres);
3284 test_elem_collection((IUnknown*)disp, NULL, 0);
3285 IDispatch_Release(disp);
3286 test_node_has_child((IUnknown*)body, VARIANT_FALSE);
3287
3288 IHTMLElement_Release(elem);
3289 IHTMLDOMNode_Release(node);
3290
3291 node = test_create_text(doc, "test");
3292 test_ifaces((IUnknown*)node, text_iids);
3293 test_disp((IUnknown*)node, &DIID_DispHTMLDOMTextNode);
3294
3295 V_VT(&var) = VT_NULL;
3296 node2 = test_node_insertbefore((IUnknown*)body, node, &var);
3297 IHTMLDOMNode_Release(node);
3298
3299 node = test_create_text(doc, "insert ");
3300
3301 V_VT(&var) = VT_DISPATCH;
3302 V_DISPATCH(&var) = (IDispatch*)node2;
3303 node3 = test_node_insertbefore((IUnknown*)body, node, &var);
3304 IHTMLDOMNode_Release(node);
3305 IHTMLDOMNode_Release(node2);
3306 IHTMLDOMNode_Release(node3);
3307
3308 test_elem_innertext(body, "insert test");
3309
3310 IHTMLElement_Release(body);
3311 }
3312
3313 static void test_exec(IUnknown *unk, const GUID *grpid, DWORD cmdid, VARIANT *in, VARIANT *out)
3314 {
3315 IOleCommandTarget *cmdtrg;
3316 HRESULT hres;
3317
3318 hres = IHTMLTxtRange_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
3319 ok(hres == S_OK, "Could not get IOleCommandTarget interface: %08x\n", hres);
3320
3321 hres = IOleCommandTarget_Exec(cmdtrg, grpid, cmdid, 0, in, out);
3322 ok(hres == S_OK, "Exec failed: %08x\n", hres);
3323
3324 IOleCommandTarget_Release(cmdtrg);
3325 }
3326
3327 static void test_indent(IHTMLDocument2 *doc)
3328 {
3329 IHTMLElementCollection *col;
3330 IHTMLTxtRange *range;
3331 HRESULT hres;
3332
3333 static const elem_type_t all_types[] = {
3334 ET_HTML,
3335 ET_HEAD,
3336 ET_TITLE,
3337 ET_BODY,
3338 ET_BR,
3339 ET_A,
3340 };
3341
3342 static const elem_type_t indent_types[] = {
3343 ET_HTML,
3344 ET_HEAD,
3345 ET_TITLE,
3346 ET_BODY,
3347 ET_BLOCKQUOTE,
3348 ET_P,
3349 ET_BR,
3350 ET_A,
3351 };
3352
3353 hres = IHTMLDocument2_get_all(doc, &col);
3354 ok(hres == S_OK, "get_all failed: %08x\n", hres);
3355 test_elem_collection((IUnknown*)col, all_types, sizeof(all_types)/sizeof(all_types[0]));
3356 IHTMLElementCollection_Release(col);
3357
3358 range = test_create_body_range(doc);
3359 test_exec((IUnknown*)range, &CGID_MSHTML, IDM_INDENT, NULL, NULL);
3360 IHTMLTxtRange_Release(range);
3361
3362 hres = IHTMLDocument2_get_all(doc, &col);
3363 ok(hres == S_OK, "get_all failed: %08x\n", hres);
3364 test_elem_collection((IUnknown*)col, indent_types, sizeof(indent_types)/sizeof(indent_types[0]));
3365 IHTMLElementCollection_Release(col);
3366 }
3367
3368 static IHTMLDocument2 *notif_doc;
3369 static BOOL doc_complete;
3370
3371 static HRESULT WINAPI PropertyNotifySink_QueryInterface(IPropertyNotifySink *iface,
3372 REFIID riid, void**ppv)
3373 {
3374 if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
3375 *ppv = iface;
3376 return S_OK;
3377 }
3378
3379 ok(0, "unexpected call\n");
3380 return E_NOINTERFACE;
3381 }
3382
3383 static ULONG WINAPI PropertyNotifySink_AddRef(IPropertyNotifySink *iface)
3384 {
3385 return 2;
3386 }
3387
3388 static ULONG WINAPI PropertyNotifySink_Release(IPropertyNotifySink *iface)
3389 {
3390 return 1;
3391 }
3392
3393 static HRESULT WINAPI PropertyNotifySink_OnChanged(IPropertyNotifySink *iface, DISPID dispID)
3394 {
3395 if(dispID == DISPID_READYSTATE){
3396 BSTR state;
3397 HRESULT hres;
3398
3399 static const WCHAR completeW[] = {'c','o','m','p','l','e','t','e',0};
3400
3401 hres = IHTMLDocument2_get_readyState(notif_doc, &state);
3402 ok(hres == S_OK, "get_readyState failed: %08x\n", hres);
3403
3404 if(!lstrcmpW(state, completeW))
3405 doc_complete = TRUE;
3406
3407 SysFreeString(state);
3408 }
3409
3410 return S_OK;
3411 }
3412
3413 static HRESULT WINAPI PropertyNotifySink_OnRequestEdit(IPropertyNotifySink *iface, DISPID dispID)
3414 {
3415 ok(0, "unexpected call\n");
3416 return E_NOTIMPL;
3417 }
3418
3419 static IPropertyNotifySinkVtbl PropertyNotifySinkVtbl = {
3420 PropertyNotifySink_QueryInterface,
3421 PropertyNotifySink_AddRef,
3422 PropertyNotifySink_Release,
3423 PropertyNotifySink_OnChanged,
3424 PropertyNotifySink_OnRequestEdit
3425 };
3426
3427 static IPropertyNotifySink PropertyNotifySink = { &PropertyNotifySinkVtbl };
3428
3429 static IHTMLDocument2 *create_doc_with_string(const char *str)
3430 {
3431 IPersistStreamInit *init;
3432 IStream *stream;
3433 IHTMLDocument2 *doc;
3434 HGLOBAL mem;
3435 SIZE_T len;
3436
3437 notif_doc = doc = create_document();
3438 if(!doc)
3439 return NULL;
3440
3441 doc_complete = FALSE;
3442 len = strlen(str);
3443 mem = GlobalAlloc(0, len);
3444 memcpy(mem, str, len);
3445 CreateStreamOnHGlobal(mem, TRUE, &stream);
3446
3447 IHTMLDocument2_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&init);
3448
3449 IPersistStreamInit_Load(init, stream);
3450 IPersistStreamInit_Release(init);
3451 IStream_Release(stream);
3452
3453 return doc;
3454 }
3455
3456 static void do_advise(IUnknown *unk, REFIID riid, IUnknown *unk_advise)
3457 {
3458 IConnectionPointContainer *container;
3459 IConnectionPoint *cp;
3460 DWORD cookie;
3461 HRESULT hres;
3462
3463 hres = IUnknown_QueryInterface(unk, &IID_IConnectionPointContainer, (void**)&container);
3464 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
3465
3466 hres = IConnectionPointContainer_FindConnectionPoint(container, riid, &cp);
3467 IConnectionPointContainer_Release(container);
3468 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
3469
3470 hres = IConnectionPoint_Advise(cp, unk_advise, &cookie);
3471 IConnectionPoint_Release(cp);
3472 ok(hres == S_OK, "Advise failed: %08x\n", hres);
3473 }
3474
3475 typedef void (*domtest_t)(IHTMLDocument2*);
3476
3477 static void run_domtest(const char *str, domtest_t test)
3478 {
3479 IHTMLDocument2 *doc;
3480 IHTMLElement *body = NULL;
3481 ULONG ref;
3482 MSG msg;
3483 HRESULT hres;
3484
3485 doc = create_doc_with_string(str);
3486 do_advise((IUnknown*)doc, &IID_IPropertyNotifySink, (IUnknown*)&PropertyNotifySink);
3487
3488 while(!doc_complete && GetMessage(&msg, NULL, 0, 0)) {
3489 TranslateMessage(&msg);
3490 DispatchMessage(&msg);
3491 }
3492
3493 hres = IHTMLDocument2_get_body(doc, &body);
3494 ok(hres == S_OK, "get_body failed: %08x\n", hres);
3495
3496 if(body) {
3497 IHTMLElement_Release(body);
3498 test(doc);
3499 }else {
3500 skip("Could not get document body. Assuming no Gecko installed.\n");
3501 }
3502
3503 ref = IHTMLDocument2_Release(doc);
3504 ok(!ref ||
3505 ref == 1, /* Vista */
3506 "ref = %d\n", ref);
3507 }
3508
3509 static void gecko_installer_workaround(BOOL disable)
3510 {
3511 HKEY hkey;
3512 DWORD res;
3513
3514 static BOOL has_url = FALSE;
3515 static char url[2048];
3516
3517 if(!disable && !has_url)
3518 return;
3519
3520 res = RegOpenKey(HKEY_CURRENT_USER, "Software\\Wine\\MSHTML", &hkey);
3521 if(res != ERROR_SUCCESS)
3522 return;
3523
3524 if(disable) {
3525 DWORD type, size = sizeof(url);
3526
3527 res = RegQueryValueEx(hkey, "GeckoUrl", NULL, &type, (PVOID)url, &size);
3528 if(res == ERROR_SUCCESS && type == REG_SZ)
3529 has_url = TRUE;
3530
3531 RegDeleteValue(hkey, "GeckoUrl");
3532 }else {
3533 RegSetValueEx(hkey, "GeckoUrl", 0, REG_SZ, (PVOID)url, lstrlenA(url)+1);
3534 }
3535
3536 RegCloseKey(hkey);
3537 }
3538
3539 START_TEST(dom)
3540 {
3541 gecko_installer_workaround(TRUE);
3542 CoInitialize(NULL);
3543
3544 run_domtest(doc_str1, test_doc_elem);
3545 run_domtest(range_test_str, test_txtrange);
3546 run_domtest(range_test2_str, test_txtrange2);
3547 run_domtest(elem_test_str, test_elems);
3548 run_domtest(doc_blank, test_create_elems);
3549 run_domtest(doc_blank, test_defaults);
3550 run_domtest(indent_test_str, test_indent);
3551
3552 CoUninitialize();
3553 gecko_installer_workaround(FALSE);
3554 }
Work in progress by Kai Blin