?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
mshtml: Implement IHTMLCurrentStyle_get_overflow.
[wine/multimedia.git] / dlls / mshtml / tests / dom.c
blob1fb7979bc044d73ae81b20169844920f0a679cd8
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 onload=\"Testing()\">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\"><!--\nfunction Testing() {}\n// -->\n</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 static const char cond_comment_str[] =
57 "<html><head><title>test</title></head><body>"
58 "<!--[if gte IE 4]> <br> <![endif]-->"
59 "</body></html>";
60
61 static WCHAR characterW[] = {'c','h','a','r','a','c','t','e','r',0};
62 static WCHAR texteditW[] = {'t','e','x','t','e','d','i','t',0};
63 static WCHAR wordW[] = {'w','o','r','d',0};
64
65 typedef enum {
66 ET_NONE,
67 ET_HTML,
68 ET_HEAD,
69 ET_TITLE,
70 ET_BODY,
71 ET_A,
72 ET_INPUT,
73 ET_SELECT,
74 ET_TEXTAREA,
75 ET_OPTION,
76 ET_STYLE,
77 ET_BLOCKQUOTE,
78 ET_P,
79 ET_BR,
80 ET_TABLE,
81 ET_TBODY,
82 ET_SCRIPT,
83 ET_TEST,
84 ET_TESTG,
85 ET_COMMENT,
86 ET_IMG,
87 ET_TR,
88 ET_TD,
89 ET_IFRAME
90 } elem_type_t;
91
92 static const IID * const none_iids[] = {
93 &IID_IUnknown,
94 NULL
95 };
96
97 static const IID * const elem_iids[] = {
98 &IID_IHTMLDOMNode,
99 &IID_IHTMLDOMNode2,
100 &IID_IHTMLElement,
101 &IID_IHTMLElement2,
102 &IID_IHTMLElement3,
103 &IID_IDispatchEx,
104 &IID_IConnectionPointContainer,
105 NULL
106 };
107
108 static const IID * const body_iids[] = {
109 &IID_IHTMLDOMNode,
110 &IID_IHTMLDOMNode2,
111 &IID_IHTMLElement,
112 &IID_IHTMLElement2,
113 &IID_IHTMLElement3,
114 &IID_IHTMLTextContainer,
115 &IID_IHTMLBodyElement,
116 &IID_IDispatchEx,
117 &IID_IConnectionPointContainer,
118 NULL
119 };
120
121 static const IID * const anchor_iids[] = {
122 &IID_IHTMLDOMNode,
123 &IID_IHTMLDOMNode2,
124 &IID_IHTMLElement,
125 &IID_IHTMLElement2,
126 &IID_IHTMLElement3,
127 &IID_IHTMLAnchorElement,
128 &IID_IDispatchEx,
129 &IID_IConnectionPointContainer,
130 NULL
131 };
132
133 static const IID * const input_iids[] = {
134 &IID_IHTMLDOMNode,
135 &IID_IHTMLDOMNode2,
136 &IID_IHTMLElement,
137 &IID_IHTMLElement2,
138 &IID_IHTMLElement3,
139 &IID_IHTMLInputElement,
140 &IID_IHTMLInputTextElement,
141 &IID_IDispatchEx,
142 &IID_IConnectionPointContainer,
143 NULL
144 };
145
146 static const IID * const select_iids[] = {
147 &IID_IHTMLDOMNode,
148 &IID_IHTMLDOMNode2,
149 &IID_IHTMLElement,
150 &IID_IHTMLElement2,
151 &IID_IHTMLElement3,
152 &IID_IHTMLSelectElement,
153 &IID_IDispatchEx,
154 &IID_IConnectionPointContainer,
155 NULL
156 };
157
158 static const IID * const textarea_iids[] = {
159 &IID_IHTMLDOMNode,
160 &IID_IHTMLDOMNode2,
161 &IID_IHTMLElement,
162 &IID_IHTMLElement2,
163 &IID_IHTMLElement3,
164 &IID_IHTMLTextAreaElement,
165 &IID_IDispatchEx,
166 &IID_IConnectionPointContainer,
167 NULL
168 };
169
170 static const IID * const option_iids[] = {
171 &IID_IHTMLDOMNode,
172 &IID_IHTMLDOMNode2,
173 &IID_IHTMLElement,
174 &IID_IHTMLElement2,
175 &IID_IHTMLElement3,
176 &IID_IHTMLOptionElement,
177 &IID_IDispatchEx,
178 &IID_IConnectionPointContainer,
179 NULL
180 };
181
182 static const IID * const table_iids[] = {
183 &IID_IHTMLDOMNode,
184 &IID_IHTMLDOMNode2,
185 &IID_IHTMLElement,
186 &IID_IHTMLElement2,
187 &IID_IHTMLElement3,
188 &IID_IHTMLTable,
189 &IID_IDispatchEx,
190 &IID_IConnectionPointContainer,
191 NULL
192 };
193
194 static const IID * const script_iids[] = {
195 &IID_IHTMLDOMNode,
196 &IID_IHTMLDOMNode2,
197 &IID_IHTMLElement,
198 &IID_IHTMLElement2,
199 &IID_IHTMLElement3,
200 &IID_IHTMLScriptElement,
201 &IID_IDispatchEx,
202 &IID_IConnectionPointContainer,
203 NULL
204 };
205
206 static const IID * const text_iids[] = {
207 &IID_IHTMLDOMNode,
208 &IID_IHTMLDOMNode2,
209 &IID_IHTMLDOMTextNode,
210 NULL
211 };
212
213 static const IID * const location_iids[] = {
214 &IID_IDispatch,
215 &IID_IHTMLLocation,
216 NULL
217 };
218
219 static const IID * const window_iids[] = {
220 &IID_IDispatch,
221 &IID_IHTMLWindow2,
222 &IID_IHTMLWindow3,
223 &IID_IDispatchEx,
224 NULL
225 };
226
227 static const IID * const comment_iids[] = {
228 &IID_IHTMLDOMNode,
229 &IID_IHTMLDOMNode2,
230 &IID_IHTMLElement,
231 &IID_IHTMLElement2,
232 &IID_IHTMLElement3,
233 &IID_IHTMLCommentElement,
234 &IID_IDispatchEx,
235 &IID_IConnectionPointContainer,
236 NULL
237 };
238
239 static const IID * const img_iids[] = {
240 &IID_IHTMLDOMNode,
241 &IID_IHTMLDOMNode2,
242 &IID_IHTMLElement,
243 &IID_IHTMLElement2,
244 &IID_IHTMLElement3,
245 &IID_IDispatchEx,
246 &IID_IHTMLImgElement,
247 &IID_IConnectionPointContainer,
248 NULL
249 };
250
251 static const IID * const tr_iids[] = {
252 &IID_IHTMLDOMNode,
253 &IID_IHTMLDOMNode2,
254 &IID_IHTMLElement,
255 &IID_IHTMLElement2,
256 &IID_IHTMLElement3,
257 &IID_IDispatchEx,
258 &IID_IHTMLTableRow,
259 &IID_IConnectionPointContainer,
260 NULL
261 };
262
263 static const IID * const td_iids[] = {
264 &IID_IHTMLDOMNode,
265 &IID_IHTMLDOMNode2,
266 &IID_IHTMLElement,
267 &IID_IHTMLElement2,
268 &IID_IHTMLElement3,
269 &IID_IDispatchEx,
270 &IID_IConnectionPointContainer,
271 NULL
272 };
273
274 static const IID * const iframe_iids[] = {
275 &IID_IHTMLDOMNode,
276 &IID_IHTMLDOMNode2,
277 &IID_IHTMLElement,
278 &IID_IHTMLElement2,
279 &IID_IHTMLElement3,
280 &IID_IHTMLFrameBase2,
281 &IID_IDispatchEx,
282 &IID_IConnectionPointContainer,
283 NULL
284 };
285
286 static const IID * const generic_iids[] = {
287 &IID_IHTMLDOMNode,
288 &IID_IHTMLDOMNode2,
289 &IID_IHTMLElement,
290 &IID_IHTMLElement2,
291 &IID_IHTMLElement3,
292 &IID_IHTMLGenericElement,
293 &IID_IDispatchEx,
294 &IID_IConnectionPointContainer,
295 NULL
296 };
297
298 static const IID * const style_iids[] = {
299 &IID_IUnknown,
300 &IID_IDispatch,
301 &IID_IDispatchEx,
302 &IID_IHTMLStyle,
303 &IID_IHTMLStyle2,
304 &IID_IHTMLStyle3,
305 &IID_IHTMLStyle4,
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_guid(REFIID riid)
351 {
352 static char buf[50];
353
354 sprintf(buf, "{%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
355 riid->Data1, riid->Data2, riid->Data3, riid->Data4[0],
356 riid->Data4[1], riid->Data4[2], riid->Data4[3], riid->Data4[4],
357 riid->Data4[5], riid->Data4[6], riid->Data4[7]);
358
359 return buf;
360 }
361
362 static int strcmp_wa(LPCWSTR strw, const char *stra)
363 {
364 CHAR buf[512];
365 WideCharToMultiByte(CP_ACP, 0, strw, -1, buf, sizeof(buf), NULL, NULL);
366 return lstrcmpA(stra, buf);
367 }
368
369 static BSTR a2bstr(const char *str)
370 {
371 BSTR ret;
372 int len;
373
374 len = MultiByteToWideChar(CP_ACP, 0, str, -1, NULL, 0);
375 ret = SysAllocStringLen(NULL, len);
376 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
377
378 return ret;
379 }
380
381 static BOOL iface_cmp(IUnknown *iface1, IUnknown *iface2)
382 {
383 IUnknown *unk1, *unk2;
384
385 if(iface1 == iface2)
386 return TRUE;
387
388 IUnknown_QueryInterface(iface1, &IID_IUnknown, (void**)&unk1);
389 IUnknown_Release(unk1);
390 IUnknown_QueryInterface(iface1, &IID_IUnknown, (void**)&unk2);
391 IUnknown_Release(unk2);
392
393 return unk1 == unk2;
394 }
395
396 static IHTMLDocument2 *create_document(void)
397 {
398 IHTMLDocument2 *doc;
399 IHTMLDocument5 *doc5;
400 HRESULT hres;
401
402 hres = CoCreateInstance(&CLSID_HTMLDocument, NULL, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
403 &IID_IHTMLDocument2, (void**)&doc);
404 ok(hres == S_OK, "CoCreateInstance failed: %08x\n", hres);
405
406 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument5, (void**)&doc5);
407 if(FAILED(hres)) {
408 win_skip("Could not get IHTMLDocument5, probably too old IE\n");
409 IHTMLDocument2_Release(doc);
410 return NULL;
411 }
412
413 IHTMLDocument5_Release(doc5);
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_get_dispid(u,id) _test_disp(__LINE__,u,id)
433 static BOOL _test_get_dispid(unsigned line, IUnknown *unk, IID *iid)
434 {
435 IDispatchEx *dispex;
436 ITypeInfo *typeinfo;
437 BOOL ret = FALSE;
438 UINT ticnt;
439 HRESULT hres;
440
441 hres = IUnknown_QueryInterface(unk, &IID_IDispatchEx, (void**)&dispex);
442 ok_(__FILE__,line) (hres == S_OK, "Could not get IDispatch: %08x\n", hres);
443 if(FAILED(hres))
444 return FALSE;
445
446 ticnt = 0xdeadbeef;
447 hres = IDispatchEx_GetTypeInfoCount(dispex, &ticnt);
448 ok_(__FILE__,line) (hres == S_OK, "GetTypeInfoCount failed: %08x\n", hres);
449 ok_(__FILE__,line) (ticnt == 1, "ticnt=%u\n", ticnt);
450
451 hres = IDispatchEx_GetTypeInfo(dispex, 0, 0, &typeinfo);
452 ok_(__FILE__,line) (hres == S_OK, "GetTypeInfo failed: %08x\n", hres);
453
454 if(SUCCEEDED(hres)) {
455 TYPEATTR *type_attr;
456
457 hres = ITypeInfo_GetTypeAttr(typeinfo, &type_attr);
458 ok_(__FILE__,line) (hres == S_OK, "GetTypeAttr failed: %08x\n", hres);
459 if(hres == S_OK) {
460 *iid = type_attr->guid;
461 ret = TRUE;
462 }
463
464 ITypeInfo_ReleaseTypeAttr(typeinfo, type_attr);
465 ITypeInfo_Release(typeinfo);
466 }
467
468 IDispatchEx_Release(dispex);
469 return ret;
470 }
471
472 #define test_disp(u,id) _test_disp(__LINE__,u,id)
473 static void _test_disp(unsigned line, IUnknown *unk, const IID *diid)
474 {
475 IID iid;
476
477 if(_test_get_dispid(line, unk, &iid))
478 ok_(__FILE__,line) (IsEqualGUID(&iid, diid), "unexpected guid %s\n", dbgstr_guid(&iid));
479 }
480
481 #define test_disp2(u,id,id2) _test_disp2(__LINE__,u,id,id2)
482 static void _test_disp2(unsigned line, IUnknown *unk, const IID *diid, const IID *diid2)
483 {
484 IID iid;
485
486 if(_test_get_dispid(line, unk, &iid))
487 ok_(__FILE__,line) (IsEqualGUID(&iid, diid) || broken(IsEqualGUID(&iid, diid2)),
488 "unexpected guid %s\n", dbgstr_guid(&iid));
489 }
490
491 #define get_elem_iface(u) _get_elem_iface(__LINE__,u)
492 static IHTMLElement *_get_elem_iface(unsigned line, IUnknown *unk)
493 {
494 IHTMLElement *elem;
495 HRESULT hres;
496
497 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElement, (void**)&elem);
498 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLElement: %08x\n", hres);
499 return elem;
500 }
501
502 #define get_elem2_iface(u) _get_elem2_iface(__LINE__,u)
503 static IHTMLElement2 *_get_elem2_iface(unsigned line, IUnknown *unk)
504 {
505 IHTMLElement2 *elem;
506 HRESULT hres;
507
508 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElement2, (void**)&elem);
509 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLElement2: %08x\n", hres);
510 return elem;
511 }
512
513 #define get_elem3_iface(u) _get_elem3_iface(__LINE__,u)
514 static IHTMLElement3 *_get_elem3_iface(unsigned line, IUnknown *unk)
515 {
516 IHTMLElement3 *elem;
517 HRESULT hres;
518
519 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElement3, (void**)&elem);
520 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLElement3: %08x\n", hres);
521 return elem;
522 }
523
524 #define get_node_iface(u) _get_node_iface(__LINE__,u)
525 static IHTMLDOMNode *_get_node_iface(unsigned line, IUnknown *unk)
526 {
527 IHTMLDOMNode *node;
528 HRESULT hres;
529
530 hres = IUnknown_QueryInterface(unk, &IID_IHTMLDOMNode, (void**)&node);
531 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLDOMNode: %08x\n", hres);
532 return node;
533 }
534
535 #define get_img_iface(u) _get_img_iface(__LINE__,u)
536 static IHTMLImgElement *_get_img_iface(unsigned line, IUnknown *unk)
537 {
538 IHTMLImgElement *img;
539 HRESULT hres;
540
541 hres = IUnknown_QueryInterface(unk, &IID_IHTMLImgElement, (void**)&img);
542 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLImgElement: %08x\n", hres);
543 return img;
544 }
545
546 #define test_node_name(u,n) _test_node_name(__LINE__,u,n)
547 static void _test_node_name(unsigned line, IUnknown *unk, const char *exname)
548 {
549 IHTMLDOMNode *node = _get_node_iface(line, unk);
550 BSTR name;
551 HRESULT hres;
552
553 hres = IHTMLDOMNode_get_nodeName(node, &name);
554 IHTMLDOMNode_Release(node);
555 ok_(__FILE__, line) (hres == S_OK, "get_nodeName failed: %08x\n", hres);
556 ok_(__FILE__, line) (!strcmp_wa(name, exname), "got name: %s, expected %s\n", wine_dbgstr_w(name), exname);
557
558 SysFreeString(name);
559 }
560
561 #define test_elem_tag(u,n) _test_elem_tag(__LINE__,u,n)
562 static void _test_elem_tag(unsigned line, IUnknown *unk, const char *extag)
563 {
564 IHTMLElement *elem = _get_elem_iface(line, unk);
565 BSTR tag;
566 HRESULT hres;
567
568 hres = IHTMLElement_get_tagName(elem, &tag);
569 IHTMLElement_Release(elem);
570 ok_(__FILE__, line) (hres == S_OK, "get_tagName failed: %08x\n", hres);
571 ok_(__FILE__, line) (!strcmp_wa(tag, extag), "got tag: %s, expected %s\n", wine_dbgstr_w(tag), extag);
572
573 SysFreeString(tag);
574 }
575
576 #define test_elem_type(ifc,t) _test_elem_type(__LINE__,ifc,t)
577 static void _test_elem_type(unsigned line, IUnknown *unk, elem_type_t type)
578 {
579 _test_elem_tag(line, unk, elem_type_infos[type].tag);
580 _test_ifaces(line, unk, elem_type_infos[type].iids);
581
582 if(elem_type_infos[type].dispiid)
583 _test_disp(line, unk, elem_type_infos[type].dispiid);
584 }
585
586 #define get_node_type(n) _get_node_type(__LINE__,n)
587 static LONG _get_node_type(unsigned line, IUnknown *unk)
588 {
589 IHTMLDOMNode *node = _get_node_iface(line, unk);
590 LONG type = -1;
591 HRESULT hres;
592
593 hres = IHTMLDOMNode_get_nodeType(node, &type);
594 ok(hres == S_OK, "get_nodeType failed: %08x\n", hres);
595
596 IHTMLDOMNode_Release(node);
597
598 return type;
599 }
600
601 #define get_child_nodes(u) _get_child_nodes(__LINE__,u)
602 static IHTMLDOMChildrenCollection *_get_child_nodes(unsigned line, IUnknown *unk)
603 {
604 IHTMLDOMNode *node = _get_node_iface(line, unk);
605 IHTMLDOMChildrenCollection *col = NULL;
606 IDispatch *disp;
607 HRESULT hres;
608
609 hres = IHTMLDOMNode_get_childNodes(node, &disp);
610 IHTMLDOMNode_Release(node);
611 ok_(__FILE__,line) (hres == S_OK, "get_childNodes failed: %08x\n", hres);
612 if(FAILED(hres))
613 return NULL;
614
615 hres = IDispatch_QueryInterface(disp, &IID_IHTMLDOMChildrenCollection, (void**)&col);
616 IDispatch_Release(disp);
617 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLDOMChildrenCollection: %08x\n", hres);
618
619 return col;
620 }
621
622 #define get_child_item(c,i) _get_child_item(__LINE__,c,i)
623 static IHTMLDOMNode *_get_child_item(unsigned line, IHTMLDOMChildrenCollection *col, LONG idx)
624 {
625 IHTMLDOMNode *node = NULL;
626 IDispatch *disp;
627 HRESULT hres;
628
629 hres = IHTMLDOMChildrenCollection_item(col, idx, &disp);
630 ok(hres == S_OK, "item failed: %08x\n", hres);
631
632 node = _get_node_iface(line, (IUnknown*)disp);
633 IDispatch_Release(disp);
634
635 return node;
636 }
637
638 #define test_elem_attr(e,n,v) _test_elem_attr(__LINE__,e,n,v)
639 static void _test_elem_attr(unsigned line, IHTMLElement *elem, const char *name, const char *exval)
640 {
641 VARIANT value;
642 BSTR tmp;
643 HRESULT hres;
644
645 VariantInit(&value);
646
647 tmp = a2bstr(name);
648 hres = IHTMLElement_getAttribute(elem, tmp, 0, &value);
649 SysFreeString(tmp);
650 ok_(__FILE__,line) (hres == S_OK, "getAttribute failed: %08x\n", hres);
651
652 if(exval) {
653 ok_(__FILE__,line) (V_VT(&value) == VT_BSTR, "vt=%d\n", V_VT(&value));
654 ok_(__FILE__,line) (!strcmp_wa(V_BSTR(&value), exval), "unexpected value %s\n", wine_dbgstr_w(V_BSTR(&value)));
655 }else {
656 ok_(__FILE__,line) (V_VT(&value) == VT_NULL, "vt=%d\n", V_VT(&value));
657 }
658
659 VariantClear(&value);
660 }
661
662 #define test_elem_offset(u) _test_elem_offset(__LINE__,u)
663 static void _test_elem_offset(unsigned line, IUnknown *unk)
664 {
665 IHTMLElement *elem = _get_elem_iface(line, unk);
666 LONG l;
667 HRESULT hres;
668
669 hres = IHTMLElement_get_offsetTop(elem, &l);
670 ok_(__FILE__,line) (hres == S_OK, "get_offsetTop failed: %08x\n", hres);
671
672 hres = IHTMLElement_get_offsetHeight(elem, &l);
673 ok_(__FILE__,line) (hres == S_OK, "get_offsetHeight failed: %08x\n", hres);
674
675 hres = IHTMLElement_get_offsetWidth(elem, &l);
676 ok_(__FILE__,line) (hres == S_OK, "get_offsetWidth failed: %08x\n", hres);
677
678 IHTMLElement_Release(elem);
679 }
680
681 static void test_doc_elem(IHTMLDocument2 *doc)
682 {
683 IHTMLElement *elem;
684 IHTMLDocument3 *doc3;
685 HRESULT hres;
686
687 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3);
688 ok(hres == S_OK, "QueryInterface(IID_IHTMLDocument3) failed: %08x\n", hres);
689
690 hres = IHTMLDocument3_get_documentElement(doc3, &elem);
691 IHTMLDocument3_Release(doc3);
692 ok(hres == S_OK, "get_documentElement failed: %08x\n", hres);
693
694 test_node_name((IUnknown*)elem, "HTML");
695 test_elem_tag((IUnknown*)elem, "HTML");
696
697 IHTMLElement_Release(elem);
698 }
699
700 #define get_doc_elem(d) _get_doc_elem(__LINE__,d)
701 static IHTMLElement *_get_doc_elem(unsigned line, IHTMLDocument2 *doc)
702 {
703 IHTMLElement *elem;
704 IHTMLDocument3 *doc3;
705 HRESULT hres;
706
707 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3);
708 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLDocument3 interface: %08x\n", hres);
709 hres = IHTMLDocument3_get_documentElement(doc3, &elem);
710 ok_(__FILE__,line) (hres == S_OK, "get_documentElement failed: %08x\n", hres);
711 IHTMLDocument3_Release(doc3);
712
713 return elem;
714 }
715
716 #define test_option_text(o,t) _test_option_text(__LINE__,o,t)
717 static void _test_option_text(unsigned line, IHTMLOptionElement *option, const char *text)
718 {
719 BSTR bstr;
720 HRESULT hres;
721
722 hres = IHTMLOptionElement_get_text(option, &bstr);
723 ok_(__FILE__,line) (hres == S_OK, "get_text failed: %08x\n", hres);
724 ok_(__FILE__,line) (!strcmp_wa(bstr, text), "text=%s\n", wine_dbgstr_w(bstr));
725 SysFreeString(bstr);
726 }
727
728 #define test_option_put_text(o,t) _test_option_put_text(__LINE__,o,t)
729 static void _test_option_put_text(unsigned line, IHTMLOptionElement *option, const char *text)
730 {
731 BSTR bstr;
732 HRESULT hres;
733
734 bstr = a2bstr(text);
735 hres = IHTMLOptionElement_put_text(option, bstr);
736 SysFreeString(bstr);
737 ok(hres == S_OK, "put_text failed: %08x\n", hres);
738
739 _test_option_text(line, option, text);
740 }
741
742 #define test_option_value(o,t) _test_option_value(__LINE__,o,t)
743 static void _test_option_value(unsigned line, IHTMLOptionElement *option, const char *value)
744 {
745 BSTR bstr;
746 HRESULT hres;
747
748 hres = IHTMLOptionElement_get_value(option, &bstr);
749 ok_(__FILE__,line) (hres == S_OK, "get_value failed: %08x\n", hres);
750 ok_(__FILE__,line) (!strcmp_wa(bstr, value), "value=%s\n", wine_dbgstr_w(bstr));
751 SysFreeString(bstr);
752 }
753
754 #define test_option_put_value(o,t) _test_option_put_value(__LINE__,o,t)
755 static void _test_option_put_value(unsigned line, IHTMLOptionElement *option, const char *value)
756 {
757 BSTR bstr;
758 HRESULT hres;
759
760 bstr = a2bstr(value);
761 hres = IHTMLOptionElement_put_value(option, bstr);
762 SysFreeString(bstr);
763 ok(hres == S_OK, "put_value failed: %08x\n", hres);
764
765 _test_option_value(line, option, value);
766 }
767
768 #define create_option_elem(d,t,v) _create_option_elem(__LINE__,d,t,v)
769 static IHTMLOptionElement *_create_option_elem(unsigned line, IHTMLDocument2 *doc,
770 const char *txt, const char *val)
771 {
772 IHTMLOptionElementFactory *factory;
773 IHTMLOptionElement *option;
774 IHTMLWindow2 *window;
775 VARIANT text, value, empty;
776 HRESULT hres;
777
778 hres = IHTMLDocument2_get_parentWindow(doc, &window);
779 ok_(__FILE__,line) (hres == S_OK, "get_parentElement failed: %08x\n", hres);
780
781 hres = IHTMLWindow2_get_Option(window, &factory);
782 IHTMLWindow2_Release(window);
783 ok_(__FILE__,line) (hres == S_OK, "get_Option failed: %08x\n", hres);
784
785 V_VT(&text) = VT_BSTR;
786 V_BSTR(&text) = a2bstr(txt);
787 V_VT(&value) = VT_BSTR;
788 V_BSTR(&value) = a2bstr(val);
789 V_VT(&empty) = VT_EMPTY;
790
791 hres = IHTMLOptionElementFactory_create(factory, text, value, empty, empty, &option);
792 ok_(__FILE__,line) (hres == S_OK, "create failed: %08x\n", hres);
793
794 IHTMLOptionElementFactory_Release(factory);
795 VariantClear(&text);
796 VariantClear(&value);
797
798 _test_option_text(line, option, txt);
799 _test_option_value(line, option, val);
800
801 return option;
802 }
803
804 #define test_select_length(s,l) _test_select_length(__LINE__,s,l)
805 static void _test_select_length(unsigned line, IHTMLSelectElement *select, LONG length)
806 {
807 LONG len = 0xdeadbeef;
808 HRESULT hres;
809
810 hres = IHTMLSelectElement_get_length(select, &len);
811 ok_(__FILE__,line) (hres == S_OK, "get_length failed: %08x\n", hres);
812 ok_(__FILE__,line) (len == length, "len=%d, expected %d\n", len, length);
813 }
814
815 #define test_select_selidx(s,i) _test_select_selidx(__LINE__,s,i)
816 static void _test_select_selidx(unsigned line, IHTMLSelectElement *select, LONG index)
817 {
818 LONG idx = 0xdeadbeef;
819 HRESULT hres;
820
821 hres = IHTMLSelectElement_get_selectedIndex(select, &idx);
822 ok_(__FILE__,line) (hres == S_OK, "get_selectedIndex failed: %08x\n", hres);
823 ok_(__FILE__,line) (idx == index, "idx=%d, expected %d\n", idx, index);
824 }
825
826 #define test_select_put_selidx(s,i) _test_select_put_selidx(__LINE__,s,i)
827 static void _test_select_put_selidx(unsigned line, IHTMLSelectElement *select, LONG index)
828 {
829 HRESULT hres;
830
831 hres = IHTMLSelectElement_put_selectedIndex(select, index);
832 ok_(__FILE__,line) (hres == S_OK, "get_selectedIndex failed: %08x\n", hres);
833 _test_select_selidx(line, select, index);
834 }
835
836 #define test_select_value(s,v) _test_select_value(__LINE__,s,v)
837 static void _test_select_value(unsigned line, IHTMLSelectElement *select, const char *exval)
838 {
839 BSTR val;
840 HRESULT hres;
841
842 hres = IHTMLSelectElement_get_value(select, &val);
843 ok_(__FILE__,line) (hres == S_OK, "get_value failed: %08x\n", hres);
844 if(exval)
845 ok_(__FILE__,line) (!strcmp_wa(val, exval), "unexpected value %s\n", wine_dbgstr_w(val));
846 else
847 ok_(__FILE__,line) (val == NULL, "val=%s, expected NULL\n", wine_dbgstr_w(val));
848 }
849
850 #define test_select_set_value(s,v) _test_select_set_value(__LINE__,s,v)
851 static void _test_select_set_value(unsigned line, IHTMLSelectElement *select, const char *val)
852 {
853 BSTR bstr;
854 HRESULT hres;
855
856 bstr = a2bstr(val);
857 hres = IHTMLSelectElement_put_value(select, bstr);
858 SysFreeString(bstr);
859 ok_(__FILE__,line) (hres == S_OK, "put_value failed: %08x\n", hres);
860 }
861
862 #define test_select_type(s,t) _test_select_type(__LINE__,s,t)
863 static void _test_select_type(unsigned line, IHTMLSelectElement *select, const char *extype)
864 {
865 BSTR type;
866 HRESULT hres;
867
868 hres = IHTMLSelectElement_get_type(select, &type);
869 ok_(__FILE__,line) (hres == S_OK, "get_type failed: %08x\n", hres);
870 ok_(__FILE__,line) (!strcmp_wa(type, extype), "type=%s, expected %s\n", wine_dbgstr_w(type), extype);
871 }
872
873 #define test_range_text(r,t) _test_range_text(__LINE__,r,t)
874 static void _test_range_text(unsigned line, IHTMLTxtRange *range, const char *extext)
875 {
876 BSTR text;
877 HRESULT hres;
878
879 hres = IHTMLTxtRange_get_text(range, &text);
880 ok_(__FILE__, line) (hres == S_OK, "get_text failed: %08x\n", hres);
881
882 if(extext) {
883 ok_(__FILE__, line) (text != NULL, "text == NULL\n");
884 ok_(__FILE__, line) (!strcmp_wa(text, extext), "text=%s, expected %s\n", wine_dbgstr_w(text), extext);
885 }else {
886 ok_(__FILE__, line) (text == NULL, "text=%s, expected NULL\n", wine_dbgstr_w(text));
887 }
888
889 SysFreeString(text);
890
891 }
892
893 #define test_range_collapse(r,b) _test_range_collapse(__LINE__,r,b)
894 static void _test_range_collapse(unsigned line, IHTMLTxtRange *range, BOOL b)
895 {
896 HRESULT hres;
897
898 hres = IHTMLTxtRange_collapse(range, b);
899 ok_(__FILE__, line) (hres == S_OK, "collapse failed: %08x\n", hres);
900 _test_range_text(line, range, NULL);
901 }
902
903 #define test_range_expand(r,u,b,t) _test_range_expand(__LINE__,r,u,b,t)
904 static void _test_range_expand(unsigned line, IHTMLTxtRange *range, LPWSTR unit,
905 VARIANT_BOOL exb, const char *extext)
906 {
907 VARIANT_BOOL b = 0xe0e0;
908 HRESULT hres;
909
910 hres = IHTMLTxtRange_expand(range, unit, &b);
911 ok_(__FILE__,line) (hres == S_OK, "expand failed: %08x\n", hres);
912 ok_(__FILE__,line) (b == exb, "b=%x, expected %x\n", b, exb);
913 _test_range_text(line, range, extext);
914 }
915
916 #define test_range_move(r,u,c,e) _test_range_move(__LINE__,r,u,c,e)
917 static void _test_range_move(unsigned line, IHTMLTxtRange *range, LPWSTR unit, LONG cnt, LONG excnt)
918 {
919 LONG c = 0xdeadbeef;
920 HRESULT hres;
921
922 hres = IHTMLTxtRange_move(range, unit, cnt, &c);
923 ok_(__FILE__,line) (hres == S_OK, "move failed: %08x\n", hres);
924 ok_(__FILE__,line) (c == excnt, "count=%d, expected %d\n", c, excnt);
925 _test_range_text(line, range, NULL);
926 }
927
928 #define test_range_movestart(r,u,c,e) _test_range_movestart(__LINE__,r,u,c,e)
929 static void _test_range_movestart(unsigned line, IHTMLTxtRange *range,
930 LPWSTR unit, LONG cnt, LONG excnt)
931 {
932 LONG c = 0xdeadbeef;
933 HRESULT hres;
934
935 hres = IHTMLTxtRange_moveStart(range, unit, cnt, &c);
936 ok_(__FILE__,line) (hres == S_OK, "move failed: %08x\n", hres);
937 ok_(__FILE__,line) (c == excnt, "count=%d, expected %d\n", c, excnt);
938 }
939
940 #define test_range_moveend(r,u,c,e) _test_range_moveend(__LINE__,r,u,c,e)
941 static void _test_range_moveend(unsigned line, IHTMLTxtRange *range, LPWSTR unit, LONG cnt, LONG excnt)
942 {
943 LONG c = 0xdeadbeef;
944 HRESULT hres;
945
946 hres = IHTMLTxtRange_moveEnd(range, unit, cnt, &c);
947 ok_(__FILE__,line) (hres == S_OK, "move failed: %08x\n", hres);
948 ok_(__FILE__,line) (c == excnt, "count=%d, expected %d\n", c, excnt);
949 }
950
951 #define test_range_put_text(r,t) _test_range_put_text(__LINE__,r,t)
952 static void _test_range_put_text(unsigned line, IHTMLTxtRange *range, const char *text)
953 {
954 HRESULT hres;
955 BSTR bstr = a2bstr(text);
956
957 hres = IHTMLTxtRange_put_text(range, bstr);
958 ok_(__FILE__,line) (hres == S_OK, "put_text failed: %08x\n", hres);
959 SysFreeString(bstr);
960 _test_range_text(line, range, NULL);
961 }
962
963 #define test_range_inrange(r1,r2,b) _test_range_inrange(__LINE__,r1,r2,b)
964 static void _test_range_inrange(unsigned line, IHTMLTxtRange *range1, IHTMLTxtRange *range2, VARIANT_BOOL exb)
965 {
966 VARIANT_BOOL b;
967 HRESULT hres;
968
969 b = 0xe0e0;
970 hres = IHTMLTxtRange_inRange(range1, range2, &b);
971 ok_(__FILE__,line) (hres == S_OK, "(1->2) isEqual failed: %08x\n", hres);
972 ok_(__FILE__,line) (b == exb, "(1->2) b=%x, expected %x\n", b, exb);
973 }
974
975 #define test_range_isequal(r1,r2,b) _test_range_isequal(__LINE__,r1,r2,b)
976 static void _test_range_isequal(unsigned line, IHTMLTxtRange *range1, IHTMLTxtRange *range2, VARIANT_BOOL exb)
977 {
978 VARIANT_BOOL b;
979 HRESULT hres;
980
981 b = 0xe0e0;
982 hres = IHTMLTxtRange_isEqual(range1, range2, &b);
983 ok_(__FILE__,line) (hres == S_OK, "(1->2) isEqual failed: %08x\n", hres);
984 ok_(__FILE__,line) (b == exb, "(1->2) b=%x, expected %x\n", b, exb);
985
986 b = 0xe0e0;
987 hres = IHTMLTxtRange_isEqual(range2, range1, &b);
988 ok_(__FILE__,line) (hres == S_OK, "(2->1) isEqual failed: %08x\n", hres);
989 ok_(__FILE__,line) (b == exb, "(2->1) b=%x, expected %x\n", b, exb);
990
991 if(exb) {
992 test_range_inrange(range1, range2, VARIANT_TRUE);
993 test_range_inrange(range2, range1, VARIANT_TRUE);
994 }
995 }
996
997 #define test_range_parent(r,t) _test_range_parent(__LINE__,r,t)
998 static void _test_range_parent(unsigned line, IHTMLTxtRange *range, elem_type_t type)
999 {
1000 IHTMLElement *elem;
1001 HRESULT hres;
1002
1003 hres = IHTMLTxtRange_parentElement(range, &elem);
1004 ok_(__FILE__,line) (hres == S_OK, "parentElement failed: %08x\n", hres);
1005
1006 _test_elem_type(line, (IUnknown*)elem, type);
1007
1008 IHTMLElement_Release(elem);
1009 }
1010
1011 #define test_elem_collection(c,t,l) _test_elem_collection(__LINE__,c,t,l)
1012 static void _test_elem_collection(unsigned line, IUnknown *unk,
1013 const elem_type_t *elem_types, LONG exlen)
1014 {
1015 IHTMLElementCollection *col;
1016 LONG len;
1017 DWORD i;
1018 VARIANT name, index;
1019 IDispatch *disp, *disp2;
1020 HRESULT hres;
1021
1022 hres = IUnknown_QueryInterface(unk, &IID_IHTMLElementCollection, (void**)&col);
1023 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLElementCollection: %08x\n", hres);
1024
1025 test_disp((IUnknown*)col, &DIID_DispHTMLElementCollection);
1026
1027 hres = IHTMLElementCollection_get_length(col, &len);
1028 ok_(__FILE__,line) (hres == S_OK, "get_length failed: %08x\n", hres);
1029 ok_(__FILE__,line) (len == exlen, "len=%d, expected %d\n", len, exlen);
1030
1031 if(len > exlen)
1032 len = exlen;
1033
1034 V_VT(&index) = VT_EMPTY;
1035
1036 for(i=0; i<len; i++) {
1037 V_VT(&name) = VT_I4;
1038 V_I4(&name) = i;
1039 disp = (void*)0xdeadbeef;
1040 hres = IHTMLElementCollection_item(col, name, index, &disp);
1041 ok_(__FILE__,line) (hres == S_OK, "item(%d) failed: %08x\n", i, hres);
1042 ok_(__FILE__,line) (disp != NULL, "item returned NULL\n");
1043 if(FAILED(hres) || !disp)
1044 continue;
1045
1046 _test_elem_type(line, (IUnknown*)disp, elem_types[i]);
1047
1048 if(!i) {
1049 V_VT(&name) = VT_UINT;
1050 V_I4(&name) = 0;
1051 disp2 = (void*)0xdeadbeef;
1052 hres = IHTMLElementCollection_item(col, name, index, &disp2);
1053 ok_(__FILE__,line) (hres == S_OK, "item(%d) failed: %08x\n", i, hres);
1054 ok_(__FILE__,line) (iface_cmp((IUnknown*)disp, (IUnknown*)disp2), "disp != disp2\n");
1055 if(disp2)
1056 IDispatch_Release(disp2);
1057 }
1058
1059 IDispatch_Release(disp);
1060 }
1061
1062 V_VT(&name) = VT_I4;
1063 V_I4(&name) = len;
1064 disp = (void*)0xdeadbeef;
1065 hres = IHTMLElementCollection_item(col, name, index, &disp);
1066 ok_(__FILE__,line) (hres == S_OK, "item failed: %08x\n", hres);
1067 ok_(__FILE__,line) (disp == NULL, "disp != NULL\n");
1068
1069 V_VT(&name) = VT_I4;
1070 V_I4(&name) = -1;
1071 disp = (void*)0xdeadbeef;
1072 hres = IHTMLElementCollection_item(col, name, index, &disp);
1073 ok_(__FILE__,line) (hres == E_INVALIDARG, "item failed: %08x, expected E_INVALIDARG\n", hres);
1074 ok_(__FILE__,line) (disp == NULL, "disp != NULL\n");
1075
1076 IHTMLElementCollection_Release(col);
1077 }
1078
1079 #define test_elem_getelembytag(u,t,l) _test_elem_getelembytag(__LINE__,u,t,l)
1080 static void _test_elem_getelembytag(unsigned line, IUnknown *unk, elem_type_t type, LONG exlen)
1081 {
1082 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1083 IHTMLElementCollection *col = NULL;
1084 elem_type_t *types = NULL;
1085 BSTR tmp;
1086 int i;
1087 HRESULT hres;
1088
1089 tmp = a2bstr(elem_type_infos[type].tag);
1090 hres = IHTMLElement2_getElementsByTagName(elem, tmp, &col);
1091 SysFreeString(tmp);
1092 IHTMLElement2_Release(elem);
1093 ok_(__FILE__,line) (hres == S_OK, "getElementByTagName failed: %08x\n", hres);
1094 ok_(__FILE__,line) (col != NULL, "col == NULL\n");
1095
1096 if(exlen) {
1097 types = HeapAlloc(GetProcessHeap(), 0, exlen*sizeof(elem_type_t));
1098 for(i=0; i<exlen; i++)
1099 types[i] = type;
1100 }
1101
1102 _test_elem_collection(line, (IUnknown*)col, types, exlen);
1103
1104 HeapFree(GetProcessHeap(), 0, types);
1105 }
1106
1107 #define test_elem_innertext(e,t) _test_elem_innertext(__LINE__,e,t)
1108 static void _test_elem_innertext(unsigned line, IHTMLElement *elem, const char *extext)
1109 {
1110 BSTR text = NULL;
1111 HRESULT hres;
1112
1113 hres = IHTMLElement_get_innerText(elem, &text);
1114 ok_(__FILE__,line) (hres == S_OK, "get_innerText failed: %08x\n", hres);
1115 ok_(__FILE__,line) (!strcmp_wa(text, extext), "get_innerText returned %s expected %s\n",
1116 wine_dbgstr_w(text), extext);
1117 SysFreeString(text);
1118 }
1119
1120 #define test_elem_set_innertext(e,t) _test_elem_set_innertext(__LINE__,e,t)
1121 static void _test_elem_set_innertext(unsigned line, IHTMLElement *elem, const char *text)
1122 {
1123 IHTMLDOMChildrenCollection *col;
1124 BSTR str;
1125 HRESULT hres;
1126
1127 str = a2bstr(text);
1128 hres = IHTMLElement_put_innerText(elem, str);
1129 ok_(__FILE__,line) (hres == S_OK, "put_innerText failed: %08x\n", hres);
1130 SysFreeString(str);
1131
1132 _test_elem_innertext(line, elem, text);
1133
1134
1135 col = _get_child_nodes(line, (IUnknown*)elem);
1136 ok(col != NULL, "col == NULL\n");
1137 if(col) {
1138 LONG length = 0, type;
1139 IHTMLDOMNode *node;
1140
1141 hres = IHTMLDOMChildrenCollection_get_length(col, &length);
1142 ok(hres == S_OK, "get_length failed: %08x\n", hres);
1143 ok(length == 1, "length = %d\n", length);
1144
1145 node = _get_child_item(line, col, 0);
1146 ok(node != NULL, "node == NULL\n");
1147 if(node) {
1148 type = _get_node_type(line, (IUnknown*)node);
1149 ok(type == 3, "type=%d\n", type);
1150 IHTMLDOMNode_Release(node);
1151 }
1152
1153 IHTMLDOMChildrenCollection_Release(col);
1154 }
1155
1156 }
1157
1158 #define test_elem_innerhtml(e,t) _test_elem_innerhtml(__LINE__,e,t)
1159 static void _test_elem_innerhtml(unsigned line, IUnknown *unk, const char *inner_html)
1160 {
1161 IHTMLElement *elem = _get_elem_iface(line, unk);
1162 BSTR html;
1163 HRESULT hres;
1164
1165 hres = IHTMLElement_get_innerHTML(elem, &html);
1166 ok_(__FILE__,line)(hres == S_OK, "get_innerHTML failed: %08x\n", hres);
1167 if(inner_html)
1168 ok_(__FILE__,line)(!strcmp_wa(html, inner_html), "unexpected innerHTML: %s\n", wine_dbgstr_w(html));
1169 else
1170 ok_(__FILE__,line)(!html, "innerHTML = %s\n", wine_dbgstr_w(html));
1171
1172 IHTMLElement_Release(elem);
1173 SysFreeString(html);
1174 }
1175
1176 #define test_elem_set_innerhtml(e,t) _test_elem_set_innerhtml(__LINE__,e,t)
1177 static void _test_elem_set_innerhtml(unsigned line, IUnknown *unk, const char *inner_html)
1178 {
1179 IHTMLElement *elem = _get_elem_iface(line, unk);
1180 BSTR html;
1181 HRESULT hres;
1182
1183 html = a2bstr(inner_html);
1184 hres = IHTMLElement_put_innerHTML(elem, html);
1185 ok_(__FILE__,line)(hres == S_OK, "put_innerHTML failed: %08x\n", hres);
1186
1187 IHTMLElement_Release(elem);
1188 SysFreeString(html);
1189 }
1190
1191 #define get_first_child(n) _get_first_child(__LINE__,n)
1192 static IHTMLDOMNode *_get_first_child(unsigned line, IUnknown *unk)
1193 {
1194 IHTMLDOMNode *node = _get_node_iface(line, unk);
1195 IHTMLDOMNode *child = NULL;
1196 HRESULT hres;
1197
1198 hres = IHTMLDOMNode_get_firstChild(node, &child);
1199 IHTMLDOMNode_Release(node);
1200 ok_(__FILE__,line) (hres == S_OK, "get_firstChild failed: %08x\n", hres);
1201
1202 return child;
1203 }
1204
1205 #define test_node_has_child(u,b) _test_node_has_child(__LINE__,u,b)
1206 static void _test_node_has_child(unsigned line, IUnknown *unk, VARIANT_BOOL exb)
1207 {
1208 IHTMLDOMNode *node = _get_node_iface(line, unk);
1209 VARIANT_BOOL b = 0xdead;
1210 HRESULT hres;
1211
1212 hres = IHTMLDOMNode_hasChildNodes(node, &b);
1213 ok_(__FILE__,line) (hres == S_OK, "hasChildNodes failed: %08x\n", hres);
1214 ok_(__FILE__,line) (b == exb, "hasChildNodes=%x, expected %x\n", b, exb);
1215
1216 IHTMLDOMNode_Release(node);
1217 }
1218
1219 #define test_node_get_parent(u) _test_node_get_parent(__LINE__,u)
1220 static IHTMLDOMNode *_test_node_get_parent(unsigned line, IUnknown *unk)
1221 {
1222 IHTMLDOMNode *node = _get_node_iface(line, unk);
1223 IHTMLDOMNode *parent;
1224 HRESULT hres;
1225
1226 hres = IHTMLDOMNode_get_parentNode(node, &parent);
1227 IHTMLDOMNode_Release(node);
1228 ok_(__FILE__,line) (hres == S_OK, "get_parentNode failed: %08x\n", hres);
1229
1230 return parent;
1231 }
1232
1233 #define test_elem_get_parent(u) _test_elem_get_parent(__LINE__,u)
1234 static IHTMLElement *_test_elem_get_parent(unsigned line, IUnknown *unk)
1235 {
1236 IHTMLElement *elem = _get_elem_iface(line, unk);
1237 IHTMLElement *parent;
1238 HRESULT hres;
1239
1240 hres = IHTMLElement_get_parentElement(elem, &parent);
1241 IHTMLElement_Release(elem);
1242 ok_(__FILE__,line) (hres == S_OK, "get_parentElement failed: %08x\n", hres);
1243
1244 return parent;
1245 }
1246
1247 #define test_elem3_get_disabled(i,b) _test_elem3_get_disabled(__LINE__,i,b)
1248 static void _test_elem3_get_disabled(unsigned line, IUnknown *unk, VARIANT_BOOL exb)
1249 {
1250 IHTMLElement3 *elem3 = _get_elem3_iface(line, unk);
1251 VARIANT_BOOL disabled = 100;
1252 HRESULT hres;
1253
1254 if (!elem3) return;
1255 hres = IHTMLElement3_get_disabled(elem3, &disabled);
1256 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1257 ok_(__FILE__,line) (disabled == exb, "disabled=%x, expected %x\n", disabled, exb);
1258 IHTMLElement3_Release(elem3);
1259 }
1260
1261 #define test_elem3_set_disabled(i,b) _test_elem3_set_disabled(__LINE__,i,b)
1262 static void _test_elem3_set_disabled(unsigned line, IUnknown *unk, VARIANT_BOOL b)
1263 {
1264 IHTMLElement3 *elem3 = _get_elem3_iface(line, unk);
1265 HRESULT hres;
1266
1267 if (!elem3) return;
1268 hres = IHTMLElement3_put_disabled(elem3, b);
1269 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1270
1271 IHTMLElement3_Release(elem3);
1272 _test_elem3_get_disabled(line, unk, b);
1273 }
1274
1275 #define test_select_get_disabled(i,b) _test_select_get_disabled(__LINE__,i,b)
1276 static void _test_select_get_disabled(unsigned line, IHTMLSelectElement *select, VARIANT_BOOL exb)
1277 {
1278 VARIANT_BOOL disabled = 100;
1279 HRESULT hres;
1280
1281 hres = IHTMLSelectElement_get_disabled(select, &disabled);
1282 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1283 ok_(__FILE__,line) (disabled == exb, "disabled=%x, expected %x\n", disabled, exb);
1284
1285 _test_elem3_get_disabled(line, (IUnknown*)select, exb);
1286 }
1287
1288 #define test_select_set_disabled(i,b) _test_select_set_disabled(__LINE__,i,b)
1289 static void _test_select_set_disabled(unsigned line, IHTMLSelectElement *select, VARIANT_BOOL b)
1290 {
1291 HRESULT hres;
1292
1293 hres = IHTMLSelectElement_put_disabled(select, b);
1294 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1295
1296 _test_select_get_disabled(line, select, b);
1297 }
1298
1299 #define elem_get_scroll_height(u) _elem_get_scroll_height(__LINE__,u)
1300 static LONG _elem_get_scroll_height(unsigned line, IUnknown *unk)
1301 {
1302 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1303 IHTMLTextContainer *txtcont;
1304 LONG l = -1, l2 = -1;
1305 HRESULT hres;
1306
1307 hres = IHTMLElement2_get_scrollHeight(elem, &l);
1308 ok_(__FILE__,line) (hres == S_OK, "get_scrollHeight failed: %08x\n", hres);
1309 IHTMLElement2_Release(elem);
1310
1311 hres = IUnknown_QueryInterface(unk, &IID_IHTMLTextContainer, (void**)&txtcont);
1312 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLTextContainer: %08x\n", hres);
1313
1314 hres = IHTMLTextContainer_get_scrollHeight(txtcont, &l2);
1315 IHTMLTextContainer_Release(txtcont);
1316 ok_(__FILE__,line) (hres == S_OK, "IHTMLTextContainer::get_scrollHeight failed: %d\n", l2);
1317 ok_(__FILE__,line) (l == l2, "unexpected height %d, expected %d\n", l2, l);
1318
1319 return l;
1320 }
1321
1322 #define elem_get_scroll_width(u) _elem_get_scroll_width(__LINE__,u)
1323 static LONG _elem_get_scroll_width(unsigned line, IUnknown *unk)
1324 {
1325 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1326 IHTMLTextContainer *txtcont;
1327 LONG l = -1, l2 = -1;
1328 HRESULT hres;
1329
1330 hres = IHTMLElement2_get_scrollWidth(elem, &l);
1331 ok_(__FILE__,line) (hres == S_OK, "get_scrollWidth failed: %08x\n", hres);
1332 IHTMLElement2_Release(elem);
1333
1334 hres = IUnknown_QueryInterface(unk, &IID_IHTMLTextContainer, (void**)&txtcont);
1335 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLTextContainer: %08x\n", hres);
1336
1337 hres = IHTMLTextContainer_get_scrollWidth(txtcont, &l2);
1338 IHTMLTextContainer_Release(txtcont);
1339 ok_(__FILE__,line) (hres == S_OK, "IHTMLTextContainer::get_scrollWidth failed: %d\n", l2);
1340 ok_(__FILE__,line) (l == l2, "unexpected width %d, expected %d\n", l2, l);
1341
1342 return l;
1343 }
1344
1345 #define elem_get_scroll_top(u) _elem_get_scroll_top(__LINE__,u)
1346 static LONG _elem_get_scroll_top(unsigned line, IUnknown *unk)
1347 {
1348 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1349 IHTMLTextContainer *txtcont;
1350 LONG l = -1, l2 = -1;
1351 HRESULT hres;
1352
1353 hres = IHTMLElement2_get_scrollTop(elem, &l);
1354 ok_(__FILE__,line) (hres == S_OK, "get_scrollTop failed: %08x\n", hres);
1355 IHTMLElement2_Release(elem);
1356
1357 hres = IUnknown_QueryInterface(unk, &IID_IHTMLTextContainer, (void**)&txtcont);
1358 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLTextContainer: %08x\n", hres);
1359
1360 hres = IHTMLTextContainer_get_scrollTop(txtcont, &l2);
1361 IHTMLTextContainer_Release(txtcont);
1362 ok_(__FILE__,line) (hres == S_OK, "IHTMLTextContainer::get_scrollTop failed: %d\n", l2);
1363 ok_(__FILE__,line) (l == l2, "unexpected top %d, expected %d\n", l2, l);
1364
1365 return l;
1366 }
1367
1368 #define elem_get_scroll_left(u) _elem_get_scroll_left(__LINE__,u)
1369 static void _elem_get_scroll_left(unsigned line, IUnknown *unk)
1370 {
1371 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1372 IHTMLTextContainer *txtcont;
1373 LONG l = -1, l2 = -1;
1374 HRESULT hres;
1375
1376 hres = IHTMLElement2_get_scrollLeft(elem, NULL);
1377 ok(hres == E_INVALIDARG, "expect E_INVALIDARG got 0x%08x\n", hres);
1378
1379 hres = IHTMLElement2_get_scrollLeft(elem, &l);
1380 ok(hres == S_OK, "get_scrollTop failed: %08x\n", hres);
1381 IHTMLElement2_Release(elem);
1382
1383 hres = IUnknown_QueryInterface(unk, &IID_IHTMLTextContainer, (void**)&txtcont);
1384 ok(hres == S_OK, "Could not get IHTMLTextContainer: %08x\n", hres);
1385
1386 hres = IHTMLTextContainer_get_scrollLeft(txtcont, &l2);
1387 IHTMLTextContainer_Release(txtcont);
1388 ok(hres == S_OK, "IHTMLTextContainer::get_scrollLeft failed: %d\n", l2);
1389 ok(l == l2, "unexpected left %d, expected %d\n", l2, l);
1390 }
1391
1392 #define test_img_src(i,s) _test_img_src(__LINE__,i,s)
1393 static void _test_img_src(unsigned line, IUnknown *unk, const char *exsrc)
1394 {
1395 IHTMLImgElement *img = _get_img_iface(line, unk);
1396 BSTR src;
1397 HRESULT hres;
1398
1399 hres = IHTMLImgElement_get_src(img, &src);
1400 IHTMLImgElement_Release(img);
1401 ok_(__FILE__,line) (hres == S_OK, "get_src failed: %08x\n", hres);
1402 ok_(__FILE__,line) (!strcmp_wa(src, exsrc), "get_src returned %s expected %s\n", wine_dbgstr_w(src), exsrc);
1403 SysFreeString(src);
1404 }
1405
1406 #define test_img_set_src(u,s) _test_img_set_src(__LINE__,u,s)
1407 static void _test_img_set_src(unsigned line, IUnknown *unk, const char *src)
1408 {
1409 IHTMLImgElement *img = _get_img_iface(line, unk);
1410 BSTR tmp;
1411 HRESULT hres;
1412
1413 tmp = a2bstr(src);
1414 hres = IHTMLImgElement_put_src(img, tmp);
1415 IHTMLImgElement_Release(img);
1416 SysFreeString(tmp);
1417 ok_(__FILE__,line) (hres == S_OK, "put_src failed: %08x\n", hres);
1418
1419 _test_img_src(line, unk, src);
1420 }
1421
1422 #define test_img_alt(u,a) _test_img_alt(__LINE__,u,a)
1423 static void _test_img_alt(unsigned line, IUnknown *unk, const char *exalt)
1424 {
1425 IHTMLImgElement *img = _get_img_iface(line, unk);
1426 BSTR alt;
1427 HRESULT hres;
1428
1429 hres = IHTMLImgElement_get_alt(img, &alt);
1430 ok_(__FILE__,line) (hres == S_OK, "get_alt failed: %08x\n", hres);
1431 if(exalt)
1432 ok_(__FILE__,line) (!strcmp_wa(alt, exalt), "inexopected alt %s\n", wine_dbgstr_w(alt));
1433 else
1434 ok_(__FILE__,line) (!alt, "alt != NULL\n");
1435 SysFreeString(alt);
1436 }
1437
1438 #define test_img_set_alt(u,a) _test_img_set_alt(__LINE__,u,a)
1439 static void _test_img_set_alt(unsigned line, IUnknown *unk, const char *alt)
1440 {
1441 IHTMLImgElement *img = _get_img_iface(line, unk);
1442 BSTR tmp;
1443 HRESULT hres;
1444
1445 tmp = a2bstr(alt);
1446 hres = IHTMLImgElement_put_alt(img, tmp);
1447 ok_(__FILE__,line) (hres == S_OK, "get_alt failed: %08x\n", hres);
1448 SysFreeString(tmp);
1449
1450 _test_img_alt(line, unk, alt);
1451 }
1452
1453 #define test_input_get_disabled(i,b) _test_input_get_disabled(__LINE__,i,b)
1454 static void _test_input_get_disabled(unsigned line, IHTMLInputElement *input, VARIANT_BOOL exb)
1455 {
1456 VARIANT_BOOL disabled = 100;
1457 HRESULT hres;
1458
1459 hres = IHTMLInputElement_get_disabled(input, &disabled);
1460 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1461 ok_(__FILE__,line) (disabled == exb, "disabled=%x, expected %x\n", disabled, exb);
1462
1463 _test_elem3_get_disabled(line, (IUnknown*)input, exb);
1464 }
1465
1466 #define test_input_set_disabled(i,b) _test_input_set_disabled(__LINE__,i,b)
1467 static void _test_input_set_disabled(unsigned line, IHTMLInputElement *input, VARIANT_BOOL b)
1468 {
1469 HRESULT hres;
1470
1471 hres = IHTMLInputElement_put_disabled(input, b);
1472 ok_(__FILE__,line) (hres == S_OK, "get_disabled failed: %08x\n", hres);
1473
1474 _test_input_get_disabled(line, input, b);
1475 }
1476
1477 #define test_input_get_defaultchecked(i,b) _test_input_get_defaultchecked(__LINE__,i,b)
1478 static void _test_input_get_defaultchecked(unsigned line, IHTMLInputElement *input, VARIANT_BOOL exb)
1479 {
1480 VARIANT_BOOL checked = 100;
1481 HRESULT hres;
1482
1483 hres = IHTMLInputElement_get_defaultChecked(input, &checked);
1484 ok_(__FILE__,line) (hres == S_OK, "get_defaultChecked failed: %08x\n", hres);
1485 ok_(__FILE__,line) (checked == exb, "checked=%x, expected %x\n", checked, exb);
1486 }
1487
1488 #define test_input_set_defaultchecked(i,b) _test_input_set_defaultchecked(__LINE__,i,b)
1489 static void _test_input_set_defaultchecked(unsigned line, IHTMLInputElement *input, VARIANT_BOOL b)
1490 {
1491 HRESULT hres;
1492
1493 hres = IHTMLInputElement_put_defaultChecked(input, b);
1494 ok_(__FILE__,line) (hres == S_OK, "get_defaultChecked failed: %08x\n", hres);
1495
1496 _test_input_get_defaultchecked(line, input, b);
1497 }
1498
1499 #define test_input_get_checked(i,b) _test_input_get_checked(__LINE__,i,b)
1500 static void _test_input_get_checked(unsigned line, IHTMLInputElement *input, VARIANT_BOOL exb)
1501 {
1502 VARIANT_BOOL checked = 100;
1503 HRESULT hres;
1504
1505 hres = IHTMLInputElement_get_checked(input, &checked);
1506 ok_(__FILE__,line) (hres == S_OK, "get_checked failed: %08x\n", hres);
1507 ok_(__FILE__,line) (checked == exb, "checked=%x, expected %x\n", checked, exb);
1508 }
1509
1510 #define test_input_set_checked(i,b) _test_input_set_checked(__LINE__,i,b)
1511 static void _test_input_set_checked(unsigned line, IHTMLInputElement *input, VARIANT_BOOL b)
1512 {
1513 HRESULT hres;
1514
1515 hres = IHTMLInputElement_put_checked(input, b);
1516 ok_(__FILE__,line) (hres == S_OK, "get_checked failed: %08x\n", hres);
1517
1518 _test_input_get_checked(line, input, b);
1519 }
1520
1521 #define test_input_value(o,t) _test_input_value(__LINE__,o,t)
1522 static void _test_input_value(unsigned line, IUnknown *unk, const char *exval)
1523 {
1524 IHTMLInputElement *input;
1525 BSTR bstr;
1526 HRESULT hres;
1527
1528 hres = IUnknown_QueryInterface(unk, &IID_IHTMLInputElement, (void**)&input);
1529 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLInputElement: %08x\n", hres);
1530 if(FAILED(hres))
1531 return;
1532
1533 hres = IHTMLInputElement_get_value(input, &bstr);
1534 ok_(__FILE__,line) (hres == S_OK, "get_value failed: %08x\n", hres);
1535 if(exval)
1536 ok_(__FILE__,line) (!strcmp_wa(bstr, exval), "value=%s\n", wine_dbgstr_w(bstr));
1537 else
1538 ok_(__FILE__,line) (!exval, "exval != NULL\n");
1539 SysFreeString(bstr);
1540 IHTMLInputElement_Release(input);
1541 }
1542
1543 #define test_input_put_value(o,v) _test_input_put_value(__LINE__,o,v)
1544 static void _test_input_put_value(unsigned line, IUnknown *unk, const char *val)
1545 {
1546 IHTMLInputElement *input;
1547 BSTR bstr;
1548 HRESULT hres;
1549
1550 hres = IUnknown_QueryInterface(unk, &IID_IHTMLInputElement, (void**)&input);
1551 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLInputElement: %08x\n", hres);
1552 if(FAILED(hres))
1553 return;
1554
1555 bstr = a2bstr(val);
1556 hres = IHTMLInputElement_get_value(input, &bstr);
1557 ok_(__FILE__,line) (hres == S_OK, "get_value failed: %08x\n", hres);
1558 SysFreeString(bstr);
1559 IHTMLInputElement_Release(input);
1560 }
1561
1562 #define test_elem_class(u,c) _test_elem_class(__LINE__,u,c)
1563 static void _test_elem_class(unsigned line, IUnknown *unk, const char *exclass)
1564 {
1565 IHTMLElement *elem = _get_elem_iface(line, unk);
1566 BSTR class = (void*)0xdeadbeef;
1567 HRESULT hres;
1568
1569 hres = IHTMLElement_get_className(elem, &class);
1570 IHTMLElement_Release(elem);
1571 ok_(__FILE__,line) (hres == S_OK, "get_className failed: %08x\n", hres);
1572 if(exclass)
1573 ok_(__FILE__,line) (!strcmp_wa(class, exclass), "unexpected className %s\n", wine_dbgstr_w(class));
1574 else
1575 ok_(__FILE__,line) (!class, "class != NULL\n");
1576 SysFreeString(class);
1577 }
1578
1579 #define test_elem_tabindex(u,i) _test_elem_tabindex(__LINE__,u,i)
1580 static void _test_elem_tabindex(unsigned line, IUnknown *unk, short exindex)
1581 {
1582 IHTMLElement2 *elem2 = _get_elem2_iface(line, unk);
1583 short index = -3;
1584 HRESULT hres;
1585
1586 hres = IHTMLElement2_get_tabIndex(elem2, &index);
1587 IHTMLElement2_Release(elem2);
1588 ok_(__FILE__,line) (hres == S_OK, "get_tabIndex failed: %08x\n", hres);
1589 ok_(__FILE__,line) (index == exindex, "unexpected index %d\n", index);
1590 }
1591
1592 #define test_elem_set_tabindex(u,i) _test_elem_set_tabindex(__LINE__,u,i)
1593 static void _test_elem_set_tabindex(unsigned line, IUnknown *unk, short index)
1594 {
1595 IHTMLElement2 *elem2 = _get_elem2_iface(line, unk);
1596 HRESULT hres;
1597
1598 hres = IHTMLElement2_put_tabIndex(elem2, index);
1599 IHTMLElement2_Release(elem2);
1600 ok_(__FILE__,line) (hres == S_OK, "get_tabIndex failed: %08x\n", hres);
1601
1602 _test_elem_tabindex(line, unk, index);
1603 }
1604
1605 #define test_elem_set_class(u,c) _test_elem_set_class(__LINE__,u,c)
1606 static void _test_elem_set_class(unsigned line, IUnknown *unk, const char *class)
1607 {
1608 IHTMLElement *elem = _get_elem_iface(line, unk);
1609 BSTR tmp;
1610 HRESULT hres;
1611
1612 tmp = class ? a2bstr(class) : NULL;
1613 hres = IHTMLElement_put_className(elem, tmp);
1614 IHTMLElement_Release(elem);
1615 ok_(__FILE__,line) (hres == S_OK, "put_className failed: %08x\n", hres);
1616 SysFreeString(tmp);
1617
1618 _test_elem_class(line, unk, class);
1619 }
1620
1621 #define test_elem_id(e,i) _test_elem_id(__LINE__,e,i)
1622 static void _test_elem_id(unsigned line, IUnknown *unk, const char *exid)
1623 {
1624 IHTMLElement *elem = _get_elem_iface(line, unk);
1625 BSTR id = (void*)0xdeadbeef;
1626 HRESULT hres;
1627
1628 hres = IHTMLElement_get_id(elem, &id);
1629 IHTMLElement_Release(elem);
1630 ok_(__FILE__,line) (hres == S_OK, "get_id failed: %08x\n", hres);
1631
1632 if(exid)
1633 ok_(__FILE__,line) (!strcmp_wa(id, exid), "unexpected id %s\n", wine_dbgstr_w(id));
1634 else
1635 ok_(__FILE__,line) (!id, "id=%s\n", wine_dbgstr_w(id));
1636
1637 SysFreeString(id);
1638 }
1639
1640 #define test_elem_put_id(u,i) _test_elem_put_id(__LINE__,u,i)
1641 static void _test_elem_put_id(unsigned line, IUnknown *unk, const char *new_id)
1642 {
1643 IHTMLElement *elem = _get_elem_iface(line, unk);
1644 BSTR tmp = a2bstr(new_id);
1645 HRESULT hres;
1646
1647 hres = IHTMLElement_put_id(elem, tmp);
1648 IHTMLElement_Release(elem);
1649 SysFreeString(tmp);
1650 ok_(__FILE__,line) (hres == S_OK, "put_id failed: %08x\n", hres);
1651
1652 _test_elem_id(line, unk, new_id);
1653 }
1654
1655 #define test_elem_title(u,t) _test_elem_title(__LINE__,u,t)
1656 static void _test_elem_title(unsigned line, IUnknown *unk, const char *extitle)
1657 {
1658 IHTMLElement *elem = _get_elem_iface(line, unk);
1659 BSTR title;
1660 HRESULT hres;
1661
1662 hres = IHTMLElement_get_title(elem, &title);
1663 IHTMLElement_Release(elem);
1664 ok_(__FILE__,line) (hres == S_OK, "get_title failed: %08x\n", hres);
1665 if(extitle)
1666 ok_(__FILE__,line) (!strcmp_wa(title, extitle), "unexpected title %s\n", wine_dbgstr_w(title));
1667 else
1668 ok_(__FILE__,line) (!title, "title=%s, expected NULL\n", wine_dbgstr_w(title));
1669
1670 SysFreeString(title);
1671 }
1672
1673 #define test_elem_set_title(u,t) _test_elem_set_title(__LINE__,u,t)
1674 static void _test_elem_set_title(unsigned line, IUnknown *unk, const char *title)
1675 {
1676 IHTMLElement *elem = _get_elem_iface(line, unk);
1677 BSTR tmp;
1678 HRESULT hres;
1679
1680 tmp = a2bstr(title);
1681 hres = IHTMLElement_put_title(elem, tmp);
1682 ok_(__FILE__,line) (hres == S_OK, "get_title failed: %08x\n", hres);
1683
1684 IHTMLElement_Release(elem);
1685 SysFreeString(tmp);
1686 }
1687
1688 #define test_node_get_value_str(u,e) _test_node_get_value_str(__LINE__,u,e)
1689 static void _test_node_get_value_str(unsigned line, IUnknown *unk, const char *exval)
1690 {
1691 IHTMLDOMNode *node = _get_node_iface(line, unk);
1692 VARIANT var;
1693 HRESULT hres;
1694
1695 hres = IHTMLDOMNode_get_nodeValue(node, &var);
1696 IHTMLDOMNode_Release(node);
1697 ok_(__FILE__,line) (hres == S_OK, "get_nodeValue failed: %08x, expected VT_BSTR\n", hres);
1698
1699 if(exval) {
1700 ok_(__FILE__,line) (V_VT(&var) == VT_BSTR, "vt=%d\n", V_VT(&var));
1701 ok_(__FILE__,line) (!strcmp_wa(V_BSTR(&var), exval), "unexpected value %s\n", wine_dbgstr_w(V_BSTR(&var)));
1702 }else {
1703 ok_(__FILE__,line) (V_VT(&var) == VT_NULL, "vt=%d, expected VT_NULL\n", V_VT(&var));
1704 }
1705
1706 VariantClear(&var);
1707 }
1708
1709 #define test_node_put_value_str(u,v) _test_node_put_value_str(__LINE__,u,v)
1710 static void _test_node_put_value_str(unsigned line, IUnknown *unk, const char *val)
1711 {
1712 IHTMLDOMNode *node = _get_node_iface(line, unk);
1713 VARIANT var;
1714 HRESULT hres;
1715
1716 V_VT(&var) = VT_BSTR;
1717 V_BSTR(&var) = a2bstr(val);
1718
1719 hres = IHTMLDOMNode_put_nodeValue(node, var);
1720 ok_(__FILE__,line) (hres == S_OK, "get_nodeValue failed: %08x, expected VT_BSTR\n", hres);
1721 IHTMLDOMNode_Release(node);
1722 VariantClear(&var);
1723 }
1724
1725 #define test_elem_client_size(u) _test_elem_client_size(__LINE__,u)
1726 static void _test_elem_client_size(unsigned line, IUnknown *unk)
1727 {
1728 IHTMLElement2 *elem = _get_elem2_iface(line, unk);
1729 LONG l;
1730 HRESULT hres;
1731
1732 hres = IHTMLElement2_get_clientWidth(elem, &l);
1733 ok_(__FILE__,line) (hres == S_OK, "get_clientWidth failed: %08x\n", hres);
1734 hres = IHTMLElement2_get_clientHeight(elem, &l);
1735 ok_(__FILE__,line) (hres == S_OK, "get_clientHeight failed: %08x\n", hres);
1736
1737 IHTMLElement2_Release(elem);
1738 }
1739
1740 #define test_create_elem(d,t) _test_create_elem(__LINE__,d,t)
1741 static IHTMLElement *_test_create_elem(unsigned line, IHTMLDocument2 *doc, const char *tag)
1742 {
1743 IHTMLElement *elem = NULL;
1744 BSTR tmp;
1745 HRESULT hres;
1746
1747 tmp = a2bstr(tag);
1748 hres = IHTMLDocument2_createElement(doc, tmp, &elem);
1749 ok_(__FILE__,line) (hres == S_OK, "createElement failed: %08x\n", hres);
1750 ok_(__FILE__,line) (elem != NULL, "elem == NULL\n");
1751
1752 return elem;
1753 }
1754
1755 #define test_create_text(d,t) _test_create_text(__LINE__,d,t)
1756 static IHTMLDOMNode *_test_create_text(unsigned line, IHTMLDocument2 *doc, const char *text)
1757 {
1758 IHTMLDocument3 *doc3;
1759 IHTMLDOMNode *node = NULL;
1760 BSTR tmp;
1761 HRESULT hres;
1762
1763 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3);
1764 ok_(__FILE__,line) (hres == S_OK, "Could not get IHTMLDocument3: %08x\n", hres);
1765
1766 tmp = a2bstr(text);
1767 hres = IHTMLDocument3_createTextNode(doc3, tmp, &node);
1768 IHTMLDocument3_Release(doc3);
1769 ok_(__FILE__,line) (hres == S_OK, "createElement failed: %08x\n", hres);
1770 ok_(__FILE__,line) (node != NULL, "node == NULL\n");
1771
1772 return node;
1773 }
1774
1775 #define test_node_append_child(n,c) _test_node_append_child(__LINE__,n,c)
1776 static IHTMLDOMNode *_test_node_append_child(unsigned line, IUnknown *node_unk, IUnknown *child_unk)
1777 {
1778 IHTMLDOMNode *node = _get_node_iface(line, node_unk);
1779 IHTMLDOMNode *child = _get_node_iface(line, child_unk);
1780 IHTMLDOMNode *new_child = NULL;
1781 HRESULT hres;
1782
1783 hres = IHTMLDOMNode_appendChild(node, child, &new_child);
1784 ok_(__FILE__,line) (hres == S_OK, "appendChild failed: %08x\n", hres);
1785 ok_(__FILE__,line) (new_child != NULL, "new_child == NULL\n");
1786 /* TODO ok_(__FILE__,line) (new_child != child, "new_child == child\n"); */
1787
1788 IHTMLDOMNode_Release(node);
1789 IHTMLDOMNode_Release(child);
1790
1791 return new_child;
1792 }
1793
1794 #define test_node_insertbefore(n,c,v) _test_node_insertbefore(__LINE__,n,c,v)
1795 static IHTMLDOMNode *_test_node_insertbefore(unsigned line, IUnknown *node_unk, IHTMLDOMNode *child, VARIANT *var)
1796 {
1797 IHTMLDOMNode *node = _get_node_iface(line, node_unk);
1798 IHTMLDOMNode *new_child = NULL;
1799 HRESULT hres;
1800
1801 hres = IHTMLDOMNode_insertBefore(node, child, *var, &new_child);
1802 ok_(__FILE__,line) (hres == S_OK, "insertBefore failed: %08x\n", hres);
1803 ok_(__FILE__,line) (new_child != NULL, "new_child == NULL\n");
1804 /* TODO ok_(__FILE__,line) (new_child != child, "new_child == child\n"); */
1805
1806 IHTMLDOMNode_Release(node);
1807
1808 return new_child;
1809 }
1810
1811 #define test_node_remove_child(n,c) _test_node_remove_child(__LINE__,n,c)
1812 static void _test_node_remove_child(unsigned line, IUnknown *unk, IHTMLDOMNode *child)
1813 {
1814 IHTMLDOMNode *node = _get_node_iface(line, unk);
1815 IHTMLDOMNode *new_node = NULL;
1816 HRESULT hres;
1817
1818 hres = IHTMLDOMNode_removeChild(node, child, &new_node);
1819 ok_(__FILE__,line) (hres == S_OK, "removeChild failed: %08x\n", hres);
1820 ok_(__FILE__,line) (new_node != NULL, "new_node == NULL\n");
1821 /* TODO ok_(__FILE__,line) (new_node != child, "new_node == child\n"); */
1822
1823 IHTMLDOMNode_Release(node);
1824 IHTMLDOMNode_Release(new_node);
1825 }
1826
1827 #define test_doc_title(d,t) _test_doc_title(__LINE__,d,t)
1828 static void _test_doc_title(unsigned line, IHTMLDocument2 *doc, const char *extitle)
1829 {
1830 BSTR title = NULL;
1831 HRESULT hres;
1832
1833 hres = IHTMLDocument2_get_title(doc, &title);
1834 ok_(__FILE__,line) (hres == S_OK, "get_title failed: %08x\n", hres);
1835 ok_(__FILE__,line) (!strcmp_wa(title, extitle), "unexpected title %s\n", wine_dbgstr_w(title));
1836 SysFreeString(title);
1837 }
1838
1839 #define test_doc_set_title(d,t) _test_doc_set_title(__LINE__,d,t)
1840 static void _test_doc_set_title(unsigned line, IHTMLDocument2 *doc, const char *title)
1841 {
1842 BSTR tmp;
1843 HRESULT hres;
1844
1845 tmp = a2bstr(title);
1846 hres = IHTMLDocument2_put_title(doc, tmp);
1847 ok_(__FILE__,line) (hres == S_OK, "get_title failed: %08x\n", hres);
1848 SysFreeString(tmp);
1849 }
1850
1851 #define test_border_styles(p, n) _test_border_styles(__LINE__, p, n)
1852 static void _test_border_styles(unsigned line, IHTMLStyle *pStyle, BSTR Name)
1853 {
1854 HRESULT hres;
1855 DISPID dispid;
1856
1857 hres = IHTMLStyle_GetIDsOfNames(pStyle, &IID_NULL, &Name, 1,
1858 LOCALE_USER_DEFAULT, &dispid);
1859 ok_(__FILE__,line) (hres == S_OK, "GetIDsOfNames: %08x\n", hres);
1860 if(hres == S_OK)
1861 {
1862 DISPPARAMS params = {NULL,NULL,0,0};
1863 DISPID dispidNamed = DISPID_PROPERTYPUT;
1864 VARIANT ret;
1865 VARIANT vDefault;
1866 VARIANTARG arg;
1867
1868 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1869 DISPATCH_PROPERTYGET, &params, &vDefault, NULL, NULL);
1870 ok_(__FILE__,line) (hres == S_OK, "get_default. ret: %08x\n", hres);
1871
1872 params.cArgs = 1;
1873 params.cNamedArgs = 1;
1874 params.rgdispidNamedArgs = &dispidNamed;
1875 V_VT(&arg) = VT_BSTR;
1876 V_BSTR(&arg) = a2bstr("none");
1877 params.rgvarg = &arg;
1878 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1879 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1880 ok_(__FILE__,line) (hres == S_OK, "none. ret: %08x\n", hres);
1881 VariantClear(&arg);
1882
1883 V_VT(&arg) = VT_BSTR;
1884 V_BSTR(&arg) = a2bstr("dotted");
1885 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1886 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1887 ok_(__FILE__,line) (hres == S_OK, "dotted. ret: %08x\n", hres);
1888 VariantClear(&arg);
1889
1890 V_VT(&arg) = VT_BSTR;
1891 V_BSTR(&arg) = a2bstr("dashed");
1892 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1893 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1894 ok_(__FILE__,line) (hres == S_OK, "dashed. ret: %08x\n", hres);
1895 VariantClear(&arg);
1896
1897 V_VT(&arg) = VT_BSTR;
1898 V_BSTR(&arg) = a2bstr("solid");
1899 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1900 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1901 ok_(__FILE__,line) (hres == S_OK, "solid. ret: %08x\n", hres);
1902 VariantClear(&arg);
1903
1904 V_VT(&arg) = VT_BSTR;
1905 V_BSTR(&arg) = a2bstr("double");
1906 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1907 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1908 ok_(__FILE__,line) (hres == S_OK, "double. ret: %08x\n", hres);
1909 VariantClear(&arg);
1910
1911 V_VT(&arg) = VT_BSTR;
1912 V_BSTR(&arg) = a2bstr("groove");
1913 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1914 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1915 ok_(__FILE__,line) (hres == S_OK, "groove. ret: %08x\n", hres);
1916 VariantClear(&arg);
1917
1918 V_VT(&arg) = VT_BSTR;
1919 V_BSTR(&arg) = a2bstr("ridge");
1920 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1921 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1922 ok_(__FILE__,line) (hres == S_OK, "ridge. ret: %08x\n", hres);
1923 VariantClear(&arg);
1924
1925 V_VT(&arg) = VT_BSTR;
1926 V_BSTR(&arg) = a2bstr("inset");
1927 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1928 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1929 ok_(__FILE__,line) (hres == S_OK, "inset. ret: %08x\n", hres);
1930 VariantClear(&arg);
1931
1932 V_VT(&arg) = VT_BSTR;
1933 V_BSTR(&arg) = a2bstr("outset");
1934 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1935 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1936 ok_(__FILE__,line) (hres == S_OK, "outset. ret: %08x\n", hres);
1937 VariantClear(&arg);
1938
1939 V_VT(&arg) = VT_BSTR;
1940 V_BSTR(&arg) = a2bstr("invalid");
1941 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1942 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1943 ok_(__FILE__,line) (FAILED(hres), "invalid value passed.\n");
1944 VariantClear(&arg);
1945
1946 params.rgvarg = &vDefault;
1947 hres = IHTMLStyle_Invoke(pStyle, dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
1948 DISPATCH_PROPERTYPUT, &params, &ret, NULL, NULL);
1949 ok_(__FILE__,line) (hres == S_OK, "default. ret: %08x\n", hres);
1950 }
1951 }
1952
1953 #define test_style_csstext(s,t) _test_style_csstext(__LINE__,s,t)
1954 static void _test_style_csstext(unsigned line, IHTMLStyle *style, const char *extext)
1955 {
1956 BSTR text = (void*)0xdeadbeef;
1957 HRESULT hres;
1958
1959 hres = IHTMLStyle_get_cssText(style, &text);
1960 ok_(__FILE__,line)(hres == S_OK, "get_cssText failed: %08x\n", hres);
1961 if(extext)
1962 ok_(__FILE__,line)(!strcmp_wa(text, extext), "cssText = %s\n", wine_dbgstr_w(text));
1963 else
1964 ok_(__FILE__,line)(!text, "cssText = %s\n", wine_dbgstr_w(text));
1965
1966 SysFreeString(text);
1967 }
1968
1969 #define test_style_set_csstext(s,t) _test_style_set_csstext(__LINE__,s,t)
1970 static void _test_style_set_csstext(unsigned line, IHTMLStyle *style, const char *text)
1971 {
1972 BSTR tmp;
1973 HRESULT hres;
1974
1975 tmp = a2bstr(text);
1976 hres = IHTMLStyle_put_cssText(style, tmp);
1977 ok_(__FILE__,line)(hres == S_OK, "put_cssText failed: %08x\n", hres);
1978 SysFreeString(tmp);
1979 }
1980
1981 static void test_elem_col_item(IHTMLElementCollection *col, const char *n,
1982 const elem_type_t *elem_types, LONG len)
1983 {
1984 IDispatch *disp;
1985 VARIANT name, index;
1986 DWORD i;
1987 HRESULT hres;
1988
1989 V_VT(&index) = VT_EMPTY;
1990 V_VT(&name) = VT_BSTR;
1991 V_BSTR(&name) = a2bstr(n);
1992
1993 hres = IHTMLElementCollection_item(col, name, index, &disp);
1994 ok(hres == S_OK, "item failed: %08x\n", hres);
1995
1996 test_elem_collection((IUnknown*)disp, elem_types, len);
1997 IDispatch_Release(disp);
1998 ok(hres == S_OK, "Could not get IHTMLElementCollection interface: %08x\n", hres);
1999 if(hres != S_OK)
2000 goto cleanup;
2001
2002 V_VT(&index) = VT_I4;
2003
2004 for(i=0; i<len; i++) {
2005 V_I4(&index) = i;
2006 disp = (void*)0xdeadbeef;
2007 hres = IHTMLElementCollection_item(col, name, index, &disp);
2008 ok(hres == S_OK, "item failed: %08x\n", hres);
2009 ok(disp != NULL, "disp == NULL\n");
2010 if(FAILED(hres) || !disp)
2011 continue;
2012
2013 test_elem_type((IUnknown*)disp, elem_types[i]);
2014
2015 IDispatch_Release(disp);
2016 }
2017
2018 V_I4(&index) = len;
2019 disp = (void*)0xdeadbeef;
2020 hres = IHTMLElementCollection_item(col, name, index, &disp);
2021 ok(hres == S_OK, "item failed: %08x\n", hres);
2022 ok(disp == NULL, "disp != NULL\n");
2023
2024 V_I4(&index) = -1;
2025 disp = (void*)0xdeadbeef;
2026 hres = IHTMLElementCollection_item(col, name, index, &disp);
2027 ok(hres == E_INVALIDARG, "item failed: %08x, expected E_INVALIDARG\n", hres);
2028 ok(disp == NULL, "disp != NULL\n");
2029
2030 cleanup:
2031 SysFreeString(V_BSTR(&name));
2032 }
2033
2034 static IHTMLElement *get_elem_by_id(IHTMLDocument2 *doc, const char *id, BOOL expect_success)
2035 {
2036 IHTMLElementCollection *col;
2037 IHTMLElement *elem;
2038 IDispatch *disp = (void*)0xdeadbeef;
2039 VARIANT name, index;
2040 HRESULT hres;
2041
2042 hres = IHTMLDocument2_get_all(doc, &col);
2043 ok(hres == S_OK, "get_all failed: %08x\n", hres);
2044 ok(col != NULL, "col == NULL\n");
2045 if(FAILED(hres) || !col)
2046 return NULL;
2047
2048 V_VT(&index) = VT_EMPTY;
2049 V_VT(&name) = VT_BSTR;
2050 V_BSTR(&name) = a2bstr(id);
2051
2052 hres = IHTMLElementCollection_item(col, name, index, &disp);
2053 IHTMLElementCollection_Release(col);
2054 SysFreeString(V_BSTR(&name));
2055 ok(hres == S_OK, "item failed: %08x\n", hres);
2056 if(!expect_success) {
2057 ok(disp == NULL, "disp != NULL\n");
2058 return NULL;
2059 }
2060
2061 ok(disp != NULL, "disp == NULL\n");
2062 if(!disp)
2063 return NULL;
2064
2065 elem = get_elem_iface((IUnknown*)disp);
2066 IDispatch_Release(disp);
2067
2068 return elem;
2069 }
2070
2071 static IHTMLElement *get_doc_elem_by_id(IHTMLDocument2 *doc, const char *id)
2072 {
2073 IHTMLDocument3 *doc3;
2074 IHTMLElement *elem;
2075 BSTR tmp;
2076 HRESULT hres;
2077
2078 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3);
2079 ok(hres == S_OK, "Could not get IHTMLDocument3 iface: %08x\n", hres);
2080
2081 tmp = a2bstr(id);
2082 hres = IHTMLDocument3_getElementById(doc3, tmp, &elem);
2083 SysFreeString(tmp);
2084 ok(hres == S_OK, "getElementById(%s) failed: %08x\n", id, hres);
2085
2086 IHTMLDocument3_Release(doc3);
2087
2088 return elem;
2089 }
2090
2091 static void test_select_elem(IHTMLSelectElement *select)
2092 {
2093 test_select_type(select, "select-one");
2094 test_select_length(select, 2);
2095 test_select_selidx(select, 0);
2096 test_select_put_selidx(select, 1);
2097
2098 test_select_set_value(select, "val1");
2099 test_select_value(select, "val1");
2100
2101 test_select_get_disabled(select, VARIANT_FALSE);
2102 test_select_set_disabled(select, VARIANT_TRUE);
2103 test_select_set_disabled(select, VARIANT_FALSE);
2104 }
2105
2106 static void test_create_option_elem(IHTMLDocument2 *doc)
2107 {
2108 IHTMLOptionElement *option;
2109
2110 option = create_option_elem(doc, "test text", "test value");
2111
2112 test_option_put_text(option, "new text");
2113 test_option_put_value(option, "new value");
2114
2115 IHTMLOptionElement_Release(option);
2116 }
2117
2118 static IHTMLTxtRange *test_create_body_range(IHTMLDocument2 *doc)
2119 {
2120 IHTMLBodyElement *body;
2121 IHTMLTxtRange *range;
2122 IHTMLElement *elem;
2123 HRESULT hres;
2124
2125 hres = IHTMLDocument2_get_body(doc, &elem);
2126 ok(hres == S_OK, "get_body failed: %08x\n", hres);
2127
2128 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLBodyElement, (void**)&body);
2129 IHTMLElement_Release(elem);
2130
2131 hres = IHTMLBodyElement_createTextRange(body, &range);
2132 IHTMLBodyElement_Release(body);
2133 ok(hres == S_OK, "createTextRange failed: %08x\n", hres);
2134
2135 return range;
2136 }
2137
2138 static void test_txtrange(IHTMLDocument2 *doc)
2139 {
2140 IHTMLTxtRange *body_range, *range, *range2;
2141 IHTMLSelectionObject *selection;
2142 IDispatch *disp_range;
2143 HRESULT hres;
2144
2145 body_range = test_create_body_range(doc);
2146
2147 test_range_text(body_range, "test abc 123\r\nit's text");
2148
2149 hres = IHTMLTxtRange_duplicate(body_range, &range);
2150 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
2151
2152 hres = IHTMLTxtRange_duplicate(body_range, &range2);
2153 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
2154 test_range_isequal(range, range2, VARIANT_TRUE);
2155
2156 test_range_text(range, "test abc 123\r\nit's text");
2157 test_range_text(body_range, "test abc 123\r\nit's text");
2158
2159 test_range_collapse(range, TRUE);
2160 test_range_isequal(range, range2, VARIANT_FALSE);
2161 test_range_inrange(range, range2, VARIANT_FALSE);
2162 test_range_inrange(range2, range, VARIANT_TRUE);
2163 IHTMLTxtRange_Release(range2);
2164
2165 test_range_expand(range, wordW, VARIANT_TRUE, "test ");
2166 test_range_expand(range, wordW, VARIANT_FALSE, "test ");
2167 test_range_move(range, characterW, 2, 2);
2168 test_range_expand(range, wordW, VARIANT_TRUE, "test ");
2169
2170 test_range_collapse(range, FALSE);
2171 test_range_expand(range, wordW, VARIANT_TRUE, "abc ");
2172
2173 test_range_collapse(range, FALSE);
2174 test_range_expand(range, wordW, VARIANT_TRUE, "123");
2175 test_range_expand(range, wordW, VARIANT_FALSE, "123");
2176 test_range_move(range, characterW, 2, 2);
2177 test_range_expand(range, wordW, VARIANT_TRUE, "123");
2178 test_range_moveend(range, characterW, -5, -5);
2179 test_range_text(range, NULL);
2180 test_range_moveend(range, characterW, 3, 3);
2181 test_range_text(range, "c 1");
2182 test_range_expand(range, texteditW, VARIANT_TRUE, "test abc 123\r\nit's text");
2183 test_range_collapse(range, TRUE);
2184 test_range_move(range, characterW, 4, 4);
2185 test_range_moveend(range, characterW, 1, 1);
2186 test_range_text(range, " ");
2187 test_range_move(range, wordW, 1, 1);
2188 test_range_moveend(range, characterW, 2, 2);
2189 test_range_text(range, "ab");
2190
2191 IHTMLTxtRange_Release(range);
2192
2193 hres = IHTMLTxtRange_duplicate(body_range, &range);
2194 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
2195
2196 test_range_text(range, "test abc 123\r\nit's text");
2197 test_range_move(range, characterW, 3, 3);
2198 test_range_moveend(range, characterW, 1, 1);
2199 test_range_text(range, "t");
2200 test_range_moveend(range, characterW, 3, 3);
2201 test_range_text(range, "t ab");
2202 test_range_moveend(range, characterW, -2, -2);
2203 test_range_text(range, "t ");
2204 test_range_move(range, characterW, 6, 6);
2205 test_range_moveend(range, characterW, 3, 3);
2206 test_range_text(range, "123");
2207 test_range_moveend(range, characterW, 2, 2);
2208 test_range_text(range, "123\r\ni");
2209
2210 IHTMLTxtRange_Release(range);
2211
2212 hres = IHTMLTxtRange_duplicate(body_range, &range);
2213 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
2214
2215 test_range_move(range, wordW, 1, 1);
2216 test_range_moveend(range, characterW, 2, 2);
2217 test_range_text(range, "ab");
2218
2219 test_range_move(range, characterW, -2, -2);
2220 test_range_moveend(range, characterW, 2, 2);
2221 test_range_text(range, "t ");
2222
2223 test_range_move(range, wordW, 3, 3);
2224 test_range_move(range, wordW, -2, -2);
2225 test_range_moveend(range, characterW, 2, 2);
2226 test_range_text(range, "ab");
2227
2228 test_range_move(range, characterW, -6, -5);
2229 test_range_moveend(range, characterW, -1, 0);
2230 test_range_moveend(range, characterW, -6, 0);
2231 test_range_move(range, characterW, 2, 2);
2232 test_range_moveend(range, characterW, 2, 2);
2233 test_range_text(range, "st");
2234 test_range_moveend(range, characterW, -6, -4);
2235 test_range_moveend(range, characterW, 2, 2);
2236
2237 IHTMLTxtRange_Release(range);
2238
2239 hres = IHTMLTxtRange_duplicate(body_range, &range);
2240 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
2241
2242 test_range_move(range, wordW, 2, 2);
2243 test_range_moveend(range, characterW, 2, 2);
2244 test_range_text(range, "12");
2245
2246 test_range_move(range, characterW, 15, 14);
2247 test_range_move(range, characterW, -2, -2);
2248 test_range_moveend(range, characterW, 3, 2);
2249 test_range_text(range, "t");
2250 test_range_moveend(range, characterW, -1, -1);
2251 test_range_text(range, "t");
2252 test_range_expand(range, wordW, VARIANT_TRUE, "text");
2253 test_range_move(range, characterW, -2, -2);
2254 test_range_moveend(range, characterW, 2, 2);
2255 test_range_text(range, "s ");
2256 test_range_move(range, characterW, 100, 7);
2257 test_range_move(range, wordW, 1, 0);
2258 test_range_move(range, characterW, -2, -2);
2259 test_range_moveend(range, characterW, 3, 2);
2260 test_range_text(range, "t");
2261
2262 IHTMLTxtRange_Release(range);
2263
2264 hres = IHTMLTxtRange_duplicate(body_range, &range);
2265 ok(hres == S_OK, "duplicate failed: %08x\n", hres);
2266
2267 test_range_collapse(range, TRUE);
2268 test_range_expand(range, wordW, VARIANT_TRUE, "test ");
2269 test_range_put_text(range, "word");
2270 test_range_text(body_range, "wordabc 123\r\nit's text");
2271 test_range_text(range, NULL);
2272 test_range_moveend(range, characterW, 3, 3);
2273 test_range_text(range, "abc");
2274 test_range_movestart(range, characterW, -2, -2);
2275 test_range_text(range, "rdabc");
2276 test_range_movestart(range, characterW, 3, 3);
2277 test_range_text(range, "bc");
2278 test_range_movestart(range, characterW, 4, 4);
2279 test_range_text(range, NULL);
2280 test_range_movestart(range, characterW, -3, -3);
2281 test_range_text(range, "c 1");
2282 test_range_movestart(range, characterW, -7, -6);
2283 test_range_text(range, "wordabc 1");
2284 test_range_movestart(range, characterW, 100, 22);
2285 test_range_text(range, NULL);
2286
2287 IHTMLTxtRange_Release(range);
2288 IHTMLTxtRange_Release(body_range);
2289
2290 hres = IHTMLDocument2_get_selection(doc, &selection);
2291 ok(hres == S_OK, "IHTMLDocument2_get_selection failed: %08x\n", hres);
2292
2293 hres = IHTMLSelectionObject_createRange(selection, &disp_range);
2294 ok(hres == S_OK, "IHTMLSelectionObject_createRange failed: %08x\n", hres);
2295 IHTMLSelectionObject_Release(selection);
2296
2297 hres = IDispatch_QueryInterface(disp_range, &IID_IHTMLTxtRange, (void **)&range);
2298 ok(hres == S_OK, "Could not get IID_IHTMLTxtRange interface: 0x%08x\n", hres);
2299 IDispatch_Release(disp_range);
2300
2301 test_range_text(range, NULL);
2302 test_range_moveend(range, characterW, 3, 3);
2303 test_range_text(range, "wor");
2304 test_range_parent(range, ET_BODY);
2305 test_range_expand(range, texteditW, VARIANT_TRUE, "wordabc 123\r\nit's text");
2306 test_range_expand(range, texteditW, VARIANT_TRUE, "wordabc 123\r\nit's text");
2307 test_range_move(range, characterW, 3, 3);
2308 test_range_expand(range, wordW, VARIANT_TRUE, "wordabc ");
2309 test_range_moveend(range, characterW, -4, -4);
2310 test_range_put_text(range, "abc def ");
2311 test_range_expand(range, texteditW, VARIANT_TRUE, "abc def abc 123\r\nit's text");
2312 test_range_move(range, wordW, 1, 1);
2313 test_range_movestart(range, characterW, -1, -1);
2314 test_range_text(range, " ");
2315 test_range_move(range, wordW, 1, 1);
2316 test_range_moveend(range, characterW, 3, 3);
2317 test_range_text(range, "def");
2318 test_range_put_text(range, "xyz");
2319 test_range_moveend(range, characterW, 1, 1);
2320 test_range_move(range, wordW, 1, 1);
2321 test_range_moveend(range, characterW, 2, 2);
2322 test_range_text(range, "ab");
2323
2324 IHTMLTxtRange_Release(range);
2325 }
2326
2327 static void test_txtrange2(IHTMLDocument2 *doc)
2328 {
2329 IHTMLTxtRange *range;
2330
2331 range = test_create_body_range(doc);
2332
2333 test_range_text(range, "abc\r\n\r\n123\r\n\r\n\r\ndef");
2334 test_range_move(range, characterW, 5, 5);
2335 test_range_moveend(range, characterW, 1, 1);
2336 test_range_text(range, "2");
2337 test_range_move(range, characterW, -3, -3);
2338 test_range_moveend(range, characterW, 3, 3);
2339 test_range_text(range, "c\r\n\r\n1");
2340 test_range_collapse(range, VARIANT_FALSE);
2341 test_range_moveend(range, characterW, 4, 4);
2342 test_range_text(range, "23");
2343 test_range_moveend(range, characterW, 1, 1);
2344 test_range_text(range, "23\r\n\r\n\r\nd");
2345 test_range_moveend(range, characterW, -1, -1);
2346 test_range_text(range, "23");
2347 test_range_moveend(range, characterW, -1, -1);
2348 test_range_text(range, "23");
2349 test_range_moveend(range, characterW, -2, -2);
2350 test_range_text(range, "2");
2351
2352 IHTMLTxtRange_Release(range);
2353 }
2354
2355 static void test_compatmode(IHTMLDocument2 *doc)
2356 {
2357 IHTMLDocument5 *doc5;
2358 BSTR mode;
2359 HRESULT hres;
2360
2361 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument5, (void**)&doc5);
2362 ok(hres == S_OK, "Could not get IHTMLDocument5 interface: %08x\n", hres);
2363 if(FAILED(hres))
2364 return;
2365
2366 hres = IHTMLDocument5_get_compatMode(doc5, &mode);
2367 IHTMLDocument5_Release(doc5);
2368 ok(hres == S_OK, "get_compatMode failed: %08x\n", hres);
2369 ok(!strcmp_wa(mode, "BackCompat"), "compatMode=%s\n", wine_dbgstr_w(mode));
2370 SysFreeString(mode);
2371 }
2372
2373 static void test_location(IHTMLDocument2 *doc)
2374 {
2375 IHTMLLocation *location, *location2;
2376 IHTMLWindow2 *window;
2377 BSTR str;
2378 ULONG ref;
2379 HRESULT hres;
2380
2381 hres = IHTMLDocument2_get_location(doc, &location);
2382 ok(hres == S_OK, "get_location failed: %08x\n", hres);
2383
2384 hres = IHTMLDocument2_get_location(doc, &location2);
2385 ok(hres == S_OK, "get_location failed: %08x\n", hres);
2386
2387 ok(location == location2, "location != location2\n");
2388 IHTMLLocation_Release(location2);
2389
2390 hres = IHTMLDocument2_get_parentWindow(doc, &window);
2391 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
2392
2393 hres = IHTMLWindow2_get_location(window, &location2);
2394 ok(hres == S_OK, "get_location failed: %08x\n", hres);
2395 ok(location == location2, "location != location2\n");
2396 IHTMLLocation_Release(location2);
2397
2398 test_ifaces((IUnknown*)location, location_iids);
2399 test_disp2((IUnknown*)location, &DIID_DispHTMLLocation, &IID_IHTMLLocation);
2400
2401 hres = IHTMLLocation_get_pathname(location, &str);
2402 ok(hres == S_OK, "get_pathname failed: %08x\n", hres);
2403 ok(!strcmp_wa(str, "blank"), "unexpected pathname %s\n", wine_dbgstr_w(str));
2404
2405 hres = IHTMLLocation_get_href(location, NULL);
2406 ok(hres == E_POINTER, "get_href passed: %08x\n", hres);
2407
2408 hres = IHTMLLocation_get_href(location, &str);
2409 ok(hres == S_OK, "get_href failed: %08x\n", hres);
2410 ok(!strcmp_wa(str, "about:blank"), "unexpected href %s\n", wine_dbgstr_w(str));
2411
2412 ref = IHTMLLocation_Release(location);
2413 ok(!ref, "location chould be destroyed here\n");
2414 }
2415
2416 static void test_navigator(IHTMLDocument2 *doc)
2417 {
2418 IHTMLWindow2 *window;
2419 IOmNavigator *navigator, *navigator2;
2420 ULONG ref;
2421 BSTR bstr;
2422 HRESULT hres;
2423
2424 static const WCHAR v40[] = {'4','.','0'};
2425
2426 hres = IHTMLDocument2_get_parentWindow(doc, &window);
2427 ok(hres == S_OK, "parentWidnow failed: %08x\n", hres);
2428
2429 hres = IHTMLWindow2_get_navigator(window, &navigator);
2430 ok(hres == S_OK, "get_navigator failed: %08x\n", hres);
2431 ok(navigator != NULL, "navigator == NULL\n");
2432 test_disp2((IUnknown*)navigator, &DIID_DispHTMLNavigator, &IID_IOmNavigator);
2433
2434 hres = IHTMLWindow2_get_navigator(window, &navigator2);
2435 ok(hres == S_OK, "get_navigator failed: %08x\n", hres);
2436 ok(navigator != navigator2, "navigator2 != navihgator\n");
2437
2438 IHTMLWindow2_Release(window);
2439 IOmNavigator_Release(navigator2);
2440
2441 hres = IOmNavigator_get_appCodeName(navigator, &bstr);
2442 ok(hres == S_OK, "get_appCodeName failed: %08x\n", hres);
2443 ok(!strcmp_wa(bstr, "Mozilla"), "Unexpected appCodeName %s\n", wine_dbgstr_w(bstr));
2444 SysFreeString(bstr);
2445
2446 bstr = NULL;
2447 hres = IOmNavigator_get_appName(navigator, &bstr);
2448 ok(hres == S_OK, "get_appName failed: %08x\n", hres);
2449 ok(!strcmp_wa(bstr, "Microsoft Internet Explorer"), "Unexpected appCodeName %s\n", wine_dbgstr_w(bstr));
2450 SysFreeString(bstr);
2451
2452 bstr = NULL;
2453 hres = IOmNavigator_get_platform(navigator, &bstr);
2454 ok(hres == S_OK, "get_platform failed: %08x\n", hres);
2455 #ifdef _WIN64
2456 ok(!strcmp_wa(bstr, "Win64"), "unexpected platform %s\n", wine_dbgstr_w(bstr));
2457 #else
2458 ok(!strcmp_wa(bstr, "Win32"), "unexpected platform %s\n", wine_dbgstr_w(bstr));
2459 #endif
2460 SysFreeString(bstr);
2461
2462 bstr = NULL;
2463 hres = IOmNavigator_get_appVersion(navigator, &bstr);
2464 ok(hres == S_OK, "get_appVersion failed: %08x\n", hres);
2465 ok(!memcmp(bstr, v40, sizeof(v40)), "appVersion is %s\n", wine_dbgstr_w(bstr));
2466 SysFreeString(bstr);
2467
2468 ref = IOmNavigator_Release(navigator);
2469 ok(!ref, "navigator should be destroyed here\n");
2470 }
2471
2472 static void test_current_style(IHTMLCurrentStyle *current_style)
2473 {
2474 BSTR str;
2475 HRESULT hres;
2476 VARIANT v;
2477
2478 test_disp((IUnknown*)current_style, &DIID_DispHTMLCurrentStyle);
2479 test_ifaces((IUnknown*)current_style, cstyle_iids);
2480
2481 hres = IHTMLCurrentStyle_get_display(current_style, &str);
2482 ok(hres == S_OK, "get_display failed: %08x\n", hres);
2483 ok(!strcmp_wa(str, "block"), "get_display returned %s\n", wine_dbgstr_w(str));
2484 SysFreeString(str);
2485
2486 hres = IHTMLCurrentStyle_get_position(current_style, &str);
2487 ok(hres == S_OK, "get_position failed: %08x\n", hres);
2488 ok(!strcmp_wa(str, "absolute"), "get_position returned %s\n", wine_dbgstr_w(str));
2489 SysFreeString(str);
2490
2491 hres = IHTMLCurrentStyle_get_fontFamily(current_style, &str);
2492 ok(hres == S_OK, "get_fontFamily failed: %08x\n", hres);
2493 SysFreeString(str);
2494
2495 hres = IHTMLCurrentStyle_get_fontStyle(current_style, &str);
2496 ok(hres == S_OK, "get_fontStyle failed: %08x\n", hres);
2497 ok(!strcmp_wa(str, "normal"), "get_fontStyle returned %s\n", wine_dbgstr_w(str));
2498 SysFreeString(str);
2499
2500 hres = IHTMLCurrentStyle_get_backgroundImage(current_style, &str);
2501 ok(hres == S_OK, "get_backgroundImage failed: %08x\n", hres);
2502 ok(!strcmp_wa(str, "none"), "get_backgroundImage returned %s\n", wine_dbgstr_w(str));
2503 SysFreeString(str);
2504
2505 hres = IHTMLCurrentStyle_get_fontVariant(current_style, &str);
2506 ok(hres == S_OK, "get_fontVariant failed: %08x\n", hres);
2507 ok(!strcmp_wa(str, "normal"), "get_fontVariant returned %s\n", wine_dbgstr_w(str));
2508 SysFreeString(str);
2509
2510 hres = IHTMLCurrentStyle_get_borderTopStyle(current_style, &str);
2511 ok(hres == S_OK, "get_borderTopStyle failed: %08x\n", hres);
2512 ok(!strcmp_wa(str, "none"), "get_borderTopStyle returned %s\n", wine_dbgstr_w(str));
2513 SysFreeString(str);
2514
2515 hres = IHTMLCurrentStyle_get_borderRightStyle(current_style, &str);
2516 ok(hres == S_OK, "get_borderRightStyle failed: %08x\n", hres);
2517 ok(!strcmp_wa(str, "none"), "get_borderRightStyle returned %s\n", wine_dbgstr_w(str));
2518 SysFreeString(str);
2519
2520 hres = IHTMLCurrentStyle_get_borderBottomStyle(current_style, &str);
2521 ok(hres == S_OK, "get_borderBottomStyle failed: %08x\n", hres);
2522 ok(!strcmp_wa(str, "none"), "get_borderBottomStyle returned %s\n", wine_dbgstr_w(str));
2523 SysFreeString(str);
2524
2525 hres = IHTMLCurrentStyle_get_borderLeftStyle(current_style, &str);
2526 ok(hres == S_OK, "get_borderLeftStyle failed: %08x\n", hres);
2527 ok(!strcmp_wa(str, "none"), "get_borderLeftStyle returned %s\n", wine_dbgstr_w(str));
2528 SysFreeString(str);
2529
2530 hres = IHTMLCurrentStyle_get_textAlign(current_style, &str);
2531 ok(hres == S_OK, "get_textAlign failed: %08x\n", hres);
2532 ok(!strcmp_wa(str, "center"), "get_textAlign returned %s\n", wine_dbgstr_w(str));
2533 SysFreeString(str);
2534
2535 hres = IHTMLCurrentStyle_get_textDecoration(current_style, &str);
2536 ok(hres == S_OK, "get_textDecoration failed: %08x\n", hres);
2537 ok(!strcmp_wa(str, "none"), "get_textDecoration returned %s\n", wine_dbgstr_w(str));
2538 SysFreeString(str);
2539
2540 hres = IHTMLCurrentStyle_get_cursor(current_style, &str);
2541 ok(hres == S_OK, "get_cursor failed: %08x\n", hres);
2542 ok(!strcmp_wa(str, "default"), "get_cursor returned %s\n", wine_dbgstr_w(str));
2543 SysFreeString(str);
2544
2545 hres = IHTMLCurrentStyle_get_backgroundRepeat(current_style, &str);
2546 ok(hres == S_OK, "get_backgroundRepeat failed: %08x\n", hres);
2547 ok(!strcmp_wa(str, "repeat"), "get_backgroundRepeat returned %s\n", wine_dbgstr_w(str));
2548 SysFreeString(str);
2549
2550 hres = IHTMLCurrentStyle_get_borderColor(current_style, &str);
2551 ok(hres == S_OK, "get_borderColor failed: %08x\n", hres);
2552 SysFreeString(str);
2553
2554 hres = IHTMLCurrentStyle_get_borderStyle(current_style, &str);
2555 ok(hres == S_OK, "get_borderStyle failed: %08x\n", hres);
2556 SysFreeString(str);
2557
2558 hres = IHTMLCurrentStyle_get_visibility(current_style, &str);
2559 ok(hres == S_OK, "get_visibility failed: %08x\n", hres);
2560 SysFreeString(str);
2561
2562 hres = IHTMLCurrentStyle_get_overflow(current_style, &str);
2563 ok(hres == S_OK, "get_overflow failed: %08x\n", hres);
2564 SysFreeString(str);
2565
2566 hres = IHTMLCurrentStyle_get_fontWeight(current_style, &v);
2567 ok(hres == S_OK, "get_fontWeight failed: %08x\n", hres);
2568 ok(V_VT(&v) == VT_I4, "V_VT(v) = %d\n", V_VT(&v));
2569 ok( V_I4(&v) == 400, "expect 400 got (%d)\n", V_I4(&v));
2570 VariantClear(&v);
2571
2572 hres = IHTMLCurrentStyle_get_fontSize(current_style, &v);
2573 ok(hres == S_OK, "get_fontSize failed: %08x\n", hres);
2574 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2575 VariantClear(&v);
2576
2577 hres = IHTMLCurrentStyle_get_left(current_style, &v);
2578 ok(hres == S_OK, "get_left failed: %08x\n", hres);
2579 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2580 VariantClear(&v);
2581
2582 hres = IHTMLCurrentStyle_get_top(current_style, &v);
2583 ok(hres == S_OK, "get_top failed: %08x\n", hres);
2584 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2585 VariantClear(&v);
2586
2587 hres = IHTMLCurrentStyle_get_width(current_style, &v);
2588 ok(hres == S_OK, "get_width failed: %08x\n", hres);
2589 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2590 VariantClear(&v);
2591
2592 hres = IHTMLCurrentStyle_get_height(current_style, &v);
2593 ok(hres == S_OK, "get_height failed: %08x\n", hres);
2594 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2595 VariantClear(&v);
2596
2597 hres = IHTMLCurrentStyle_get_paddingLeft(current_style, &v);
2598 ok(hres == S_OK, "get_paddingLeft failed: %08x\n", hres);
2599 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2600 VariantClear(&v);
2601
2602 hres = IHTMLCurrentStyle_get_zIndex(current_style, &v);
2603 ok(hres == S_OK, "get_zIndex failed: %08x\n", hres);
2604 ok(V_VT(&v) == VT_I4, "V_VT(v) = %d\n", V_VT(&v));
2605 ok( V_I4(&v) == 1, "expect 1 got (%d)\n", V_I4(&v));
2606 VariantClear(&v);
2607
2608 hres = IHTMLCurrentStyle_get_verticalAlign(current_style, &v);
2609 ok(hres == S_OK, "get_verticalAlign failed: %08x\n", hres);
2610 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2611 ok(!strcmp_wa(V_BSTR(&v), "middle"), "get_verticalAlign returned %s\n", wine_dbgstr_w(V_BSTR(&v)));
2612 VariantClear(&v);
2613
2614 hres = IHTMLCurrentStyle_get_marginRight(current_style, &v);
2615 ok(hres == S_OK, "get_marginRight failed: %08x\n", hres);
2616 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2617 VariantClear(&v);
2618
2619 hres = IHTMLCurrentStyle_get_marginLeft(current_style, &v);
2620 ok(hres == S_OK, "get_marginLeft failed: %08x\n", hres);
2621 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2622 VariantClear(&v);
2623
2624 hres = IHTMLCurrentStyle_get_borderLeftWidth(current_style, &v);
2625 ok(hres == S_OK, "get_borderLeftWidth failed: %08x\n", hres);
2626 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2627 VariantClear(&v);
2628
2629 V_BSTR(&v) = NULL;
2630 hres = IHTMLCurrentStyle_get_borderRightWidth(current_style, &v);
2631 ok(hres == S_OK, "get_borderRightWidth failed: %08x\n", hres);
2632 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2633 VariantClear(&v);
2634
2635 hres = IHTMLCurrentStyle_get_borderBottomWidth(current_style, &v);
2636 ok(hres == S_OK, "get_borderBottomWidth failed: %08x\n", hres);
2637 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2638 VariantClear(&v);
2639
2640 hres = IHTMLCurrentStyle_get_borderTopWidth(current_style, &v);
2641 ok(hres == S_OK, "get_borderTopWidth failed: %08x\n", hres);
2642 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2643 VariantClear(&v);
2644
2645 hres = IHTMLCurrentStyle_get_color(current_style, &v);
2646 ok(hres == S_OK, "get_color failed: %08x\n", hres);
2647 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2648 VariantClear(&v);
2649
2650 hres = IHTMLCurrentStyle_get_backgroundColor(current_style, &v);
2651 ok(hres == S_OK, "get_backgroundColor failed: %08x\n", hres);
2652 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2653 VariantClear(&v);
2654 }
2655
2656 static void test_style2(IHTMLStyle2 *style2)
2657 {
2658 BSTR str;
2659 HRESULT hres;
2660
2661 str = (void*)0xdeadbeef;
2662 hres = IHTMLStyle2_get_position(style2, &str);
2663 ok(hres == S_OK, "get_position failed: %08x\n", hres);
2664 ok(!str, "str != NULL\n");
2665
2666 str = a2bstr("absolute");
2667 hres = IHTMLStyle2_put_position(style2, str);
2668 ok(hres == S_OK, "put_position failed: %08x\n", hres);
2669 SysFreeString(str);
2670
2671 str = NULL;
2672 hres = IHTMLStyle2_get_position(style2, &str);
2673 ok(hres == S_OK, "get_position failed: %08x\n", hres);
2674 ok(!strcmp_wa(str, "absolute"), "get_position returned %s\n", wine_dbgstr_w(str));
2675 SysFreeString(str);
2676 }
2677
2678 static void test_style3(IHTMLStyle3 *style3)
2679 {
2680 BSTR str;
2681 HRESULT hres;
2682
2683 str = (void*)0xdeadbeef;
2684 hres = IHTMLStyle3_get_wordWrap(style3, &str);
2685 ok(hres == S_OK, "get_wordWrap failed: %08x\n", hres);
2686 ok(!str, "str != NULL\n");
2687
2688 str = a2bstr("break-word");
2689 hres = IHTMLStyle3_put_wordWrap(style3, str);
2690 ok(hres == S_OK, "put_wordWrap failed: %08x\n", hres);
2691 SysFreeString(str);
2692
2693 str = NULL;
2694 hres = IHTMLStyle3_get_wordWrap(style3, &str);
2695 ok(hres == S_OK, "get_wordWrap failed: %08x\n", hres);
2696 ok(!strcmp_wa(str, "break-word"), "get_wordWrap returned %s\n", wine_dbgstr_w(str));
2697 SysFreeString(str);
2698 }
2699
2700 static void test_style4(IHTMLStyle4 *style4)
2701 {
2702 HRESULT hres;
2703 VARIANT v;
2704 VARIANT vdefault;
2705
2706 hres = IHTMLStyle4_get_minHeight(style4, &vdefault);
2707 ok(hres == S_OK, "get_minHeight failed: %08x\n", hres);
2708
2709 V_VT(&v) = VT_BSTR;
2710 V_BSTR(&v) = a2bstr("10px");
2711 hres = IHTMLStyle4_put_minHeight(style4, v);
2712 ok(hres == S_OK, "put_minHeight failed: %08x\n", hres);
2713 VariantClear(&v);
2714
2715 hres = IHTMLStyle4_get_minHeight(style4, &v);
2716 ok(hres == S_OK, "get_minHeight failed: %08x\n", hres);
2717 ok(V_VT(&v) == VT_BSTR, "V_VT(v) = %d\n", V_VT(&v));
2718 ok( !strcmp_wa(V_BSTR(&v), "10px"), "expect 10px got (%s)\n", wine_dbgstr_w(V_BSTR(&v)));
2719
2720 hres = IHTMLStyle4_put_minHeight(style4, vdefault);
2721 ok(hres == S_OK, "put_minHeight failed: %08x\n", hres);
2722 VariantClear(&vdefault);
2723 }
2724
2725 static void test_default_style(IHTMLStyle *style)
2726 {
2727 IHTMLStyle2 *style2;
2728 IHTMLStyle3 *style3;
2729 IHTMLStyle4 *style4;
2730 VARIANT_BOOL b;
2731 VARIANT v;
2732 BSTR str;
2733 HRESULT hres;
2734 float f;
2735 BSTR sOverflowDefault;
2736 BSTR sDefault;
2737 VARIANT vDefault;
2738
2739 test_disp((IUnknown*)style, &DIID_DispHTMLStyle);
2740 test_ifaces((IUnknown*)style, style_iids);
2741
2742 test_style_csstext(style, NULL);
2743
2744 hres = IHTMLStyle_get_position(style, &str);
2745 ok(hres == S_OK, "get_position failed: %08x\n", hres);
2746 ok(!str, "str=%s\n", wine_dbgstr_w(str));
2747
2748 V_VT(&v) = VT_NULL;
2749 hres = IHTMLStyle_get_marginRight(style, &v);
2750 ok(hres == S_OK, "get_marginRight failed: %08x\n", hres);
2751 ok(V_VT(&v) == VT_BSTR, "V_VT(marginRight) = %d\n", V_VT(&v));
2752 ok(!V_BSTR(&v), "V_BSTR(marginRight) = %s\n", wine_dbgstr_w(V_BSTR(&v)));
2753
2754 V_VT(&v) = VT_NULL;
2755 hres = IHTMLStyle_get_marginLeft(style, &v);
2756 ok(hres == S_OK, "get_marginLeft failed: %08x\n", hres);
2757 ok(V_VT(&v) == VT_BSTR, "V_VT(marginLeft) = %d\n", V_VT(&v));
2758 ok(!V_BSTR(&v), "V_BSTR(marginLeft) = %s\n", wine_dbgstr_w(V_BSTR(&v)));
2759
2760 str = (void*)0xdeadbeef;
2761 hres = IHTMLStyle_get_fontFamily(style, &str);
2762 ok(hres == S_OK, "get_fontFamily failed: %08x\n", hres);
2763 ok(!str, "fontFamily = %s\n", wine_dbgstr_w(str));
2764
2765 str = (void*)0xdeadbeef;
2766 hres = IHTMLStyle_get_fontWeight(style, &str);
2767 ok(hres == S_OK, "get_fontWeight failed: %08x\n", hres);
2768 ok(!str, "fontWeight = %s\n", wine_dbgstr_w(str));
2769
2770 hres = IHTMLStyle_get_fontWeight(style, &sDefault);
2771 ok(hres == S_OK, "get_fontWeight failed: %08x\n", hres);
2772
2773 str = a2bstr("test");
2774 hres = IHTMLStyle_put_fontWeight(style, str);
2775 ok(hres == E_INVALIDARG, "put_fontWeight failed: %08x\n", hres);
2776 SysFreeString(str);
2777
2778 str = a2bstr("bold");
2779 hres = IHTMLStyle_put_fontWeight(style, str);
2780 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2781 SysFreeString(str);
2782
2783 str = a2bstr("bolder");
2784 hres = IHTMLStyle_put_fontWeight(style, str);
2785 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2786 SysFreeString(str);
2787
2788 str = a2bstr("lighter");
2789 hres = IHTMLStyle_put_fontWeight(style, str);
2790 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2791 SysFreeString(str);
2792
2793 str = a2bstr("100");
2794 hres = IHTMLStyle_put_fontWeight(style, str);
2795 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2796 SysFreeString(str);
2797
2798 str = a2bstr("200");
2799 hres = IHTMLStyle_put_fontWeight(style, str);
2800 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2801 SysFreeString(str);
2802
2803 str = a2bstr("300");
2804 hres = IHTMLStyle_put_fontWeight(style, str);
2805 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2806 SysFreeString(str);
2807
2808 str = a2bstr("400");
2809 hres = IHTMLStyle_put_fontWeight(style, str);
2810 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2811 SysFreeString(str);
2812
2813 str = a2bstr("500");
2814 hres = IHTMLStyle_put_fontWeight(style, str);
2815 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2816 SysFreeString(str);
2817
2818 str = a2bstr("600");
2819 hres = IHTMLStyle_put_fontWeight(style, str);
2820 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2821 SysFreeString(str);
2822
2823 str = a2bstr("700");
2824 hres = IHTMLStyle_put_fontWeight(style, str);
2825 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2826 SysFreeString(str);
2827
2828 str = a2bstr("800");
2829 hres = IHTMLStyle_put_fontWeight(style, str);
2830 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2831 SysFreeString(str);
2832
2833 str = a2bstr("900");
2834 hres = IHTMLStyle_put_fontWeight(style, str);
2835 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2836 SysFreeString(str);
2837
2838 hres = IHTMLStyle_get_fontWeight(style, &str);
2839 ok(hres == S_OK, "get_fontWeight failed: %08x\n", hres);
2840 ok(!strcmp_wa(str, "900"), "str != style900\n");
2841 SysFreeString(str);
2842
2843 hres = IHTMLStyle_put_fontWeight(style, sDefault);
2844 ok(hres == S_OK, "put_fontWeight failed: %08x\n", hres);
2845 SysFreeString(sDefault);
2846
2847 /* font Variant */
2848 hres = IHTMLStyle_get_fontVariant(style, NULL);
2849 ok(hres == E_INVALIDARG, "get_fontVariant failed: %08x\n", hres);
2850
2851 hres = IHTMLStyle_get_fontVariant(style, &sDefault);
2852 ok(hres == S_OK, "get_fontVariant failed: %08x\n", hres);
2853
2854 str = a2bstr("test");
2855 hres = IHTMLStyle_put_fontVariant(style, str);
2856 ok(hres == E_INVALIDARG, "fontVariant failed: %08x\n", hres);
2857 SysFreeString(str);
2858
2859 str = a2bstr("small-caps");
2860 hres = IHTMLStyle_put_fontVariant(style, str);
2861 ok(hres == S_OK, "fontVariant failed: %08x\n", hres);
2862 SysFreeString(str);
2863
2864 str = a2bstr("normal");
2865 hres = IHTMLStyle_put_fontVariant(style, str);
2866 ok(hres == S_OK, "fontVariant failed: %08x\n", hres);
2867 SysFreeString(str);
2868
2869 hres = IHTMLStyle_put_fontVariant(style, sDefault);
2870 ok(hres == S_OK, "fontVariant failed: %08x\n", hres);
2871 SysFreeString(sDefault);
2872
2873 str = (void*)0xdeadbeef;
2874 hres = IHTMLStyle_get_display(style, &str);
2875 ok(hres == S_OK, "get_display failed: %08x\n", hres);
2876 ok(!str, "display = %s\n", wine_dbgstr_w(str));
2877
2878 str = (void*)0xdeadbeef;
2879 hres = IHTMLStyle_get_visibility(style, &str);
2880 ok(hres == S_OK, "get_visibility failed: %08x\n", hres);
2881 ok(!str, "visibility = %s\n", wine_dbgstr_w(str));
2882
2883 V_VT(&v) = VT_NULL;
2884 hres = IHTMLStyle_get_fontSize(style, &v);
2885 ok(hres == S_OK, "get_fontSize failed: %08x\n", hres);
2886 ok(V_VT(&v) == VT_BSTR, "V_VT(fontSize) = %d\n", V_VT(&v));
2887 ok(!V_BSTR(&v), "V_BSTR(fontSize) = %s\n", wine_dbgstr_w(V_BSTR(&v)));
2888
2889 V_VT(&v) = VT_NULL;
2890 hres = IHTMLStyle_get_color(style, &v);
2891 ok(hres == S_OK, "get_color failed: %08x\n", hres);
2892 ok(V_VT(&v) == VT_BSTR, "V_VT(color) = %d\n", V_VT(&v));
2893 ok(!V_BSTR(&v), "V_BSTR(color) = %s\n", wine_dbgstr_w(V_BSTR(&v)));
2894
2895 b = 0xfefe;
2896 hres = IHTMLStyle_get_textDecorationUnderline(style, &b);
2897 ok(hres == S_OK, "get_textDecorationUnderline failed: %08x\n", hres);
2898 ok(b == VARIANT_FALSE, "textDecorationUnderline = %x\n", b);
2899
2900 hres = IHTMLStyle_put_textDecorationUnderline(style, VARIANT_TRUE);
2901 ok(hres == S_OK, "put_textDecorationUnderline failed: %08x\n", hres);
2902 ok(b == VARIANT_FALSE, "textDecorationUnderline = %x\n", b);
2903
2904 hres = IHTMLStyle_get_textDecorationUnderline(style, &b);
2905 ok(hres == S_OK, "get_textDecorationUnderline failed: %08x\n", hres);
2906 ok(b == VARIANT_TRUE, "textDecorationUnderline = %x\n", b);
2907
2908 hres = IHTMLStyle_put_textDecorationUnderline(style, VARIANT_FALSE);
2909 ok(hres == S_OK, "put_textDecorationUnderline failed: %08x\n", hres);
2910
2911 b = 0xfefe;
2912 hres = IHTMLStyle_get_textDecorationLineThrough(style, &b);
2913 ok(hres == S_OK, "get_textDecorationLineThrough failed: %08x\n", hres);
2914 ok(b == VARIANT_FALSE, "textDecorationLineThrough = %x\n", b);
2915
2916 hres = IHTMLStyle_put_textDecorationLineThrough(style, VARIANT_TRUE);
2917 ok(hres == S_OK, "put_textDecorationLineThrough failed: %08x\n", hres);
2918 ok(b == VARIANT_FALSE, "textDecorationLineThrough = %x\n", b);
2919
2920 hres = IHTMLStyle_get_textDecorationLineThrough(style, &b);
2921 ok(hres == S_OK, "get_textDecorationLineThrough failed: %08x\n", hres);
2922 ok(b == VARIANT_TRUE, "textDecorationLineThrough = %x\n", b);
2923
2924 hres = IHTMLStyle_put_textDecorationLineThrough(style, VARIANT_FALSE);
2925 ok(hres == S_OK, "put_textDecorationLineThrough failed: %08x\n", hres);
2926
2927 b = 0xfefe;
2928 hres = IHTMLStyle_get_textDecorationNone(style, &b);
2929 ok(hres == S_OK, "get_textDecorationNone failed: %08x\n", hres);
2930 ok(b == VARIANT_FALSE, "textDecorationNone = %x\n", b);
2931
2932 hres = IHTMLStyle_put_textDecorationNone(style, VARIANT_TRUE);
2933 ok(hres == S_OK, "put_textDecorationNone failed: %08x\n", hres);
2934 ok(b == VARIANT_FALSE, "textDecorationNone = %x\n", b);
2935
2936 hres = IHTMLStyle_get_textDecorationNone(style, &b);
2937 ok(hres == S_OK, "get_textDecorationNone failed: %08x\n", hres);
2938 ok(b == VARIANT_TRUE, "textDecorationNone = %x\n", b);
2939
2940 hres = IHTMLStyle_put_textDecorationNone(style, VARIANT_FALSE);
2941 ok(hres == S_OK, "put_textDecorationNone failed: %08x\n", hres);
2942
2943 b = 0xfefe;
2944 hres = IHTMLStyle_get_textDecorationOverline(style, &b);
2945 ok(hres == S_OK, "get_textDecorationOverline failed: %08x\n", hres);
2946 ok(b == VARIANT_FALSE, "textDecorationOverline = %x\n", b);
2947
2948 hres = IHTMLStyle_put_textDecorationOverline(style, VARIANT_TRUE);
2949 ok(hres == S_OK, "put_textDecorationOverline failed: %08x\n", hres);
2950 ok(b == VARIANT_FALSE, "textDecorationOverline = %x\n", b);
2951
2952 hres = IHTMLStyle_get_textDecorationOverline(style, &b);
2953 ok(hres == S_OK, "get_textDecorationOverline failed: %08x\n", hres);
2954 ok(b == VARIANT_TRUE, "textDecorationOverline = %x\n", b);
2955
2956 hres = IHTMLStyle_put_textDecorationOverline(style, VARIANT_FALSE);
2957 ok(hres == S_OK, "put_textDecorationOverline failed: %08x\n", hres);
2958
2959 b = 0xfefe;
2960 hres = IHTMLStyle_get_textDecorationBlink(style, &b);
2961 ok(hres == S_OK, "get_textDecorationBlink failed: %08x\n", hres);
2962 ok(b == VARIANT_FALSE, "textDecorationBlink = %x\n", b);
2963
2964 hres = IHTMLStyle_put_textDecorationBlink(style, VARIANT_TRUE);
2965 ok(hres == S_OK, "put_textDecorationBlink failed: %08x\n", hres);
2966 ok(b == VARIANT_FALSE, "textDecorationBlink = %x\n", b);
2967
2968 hres = IHTMLStyle_get_textDecorationBlink(style, &b);
2969 ok(hres == S_OK, "get_textDecorationBlink failed: %08x\n", hres);
2970 ok(b == VARIANT_TRUE, "textDecorationBlink = %x\n", b);
2971
2972 hres = IHTMLStyle_put_textDecorationBlink(style, VARIANT_FALSE);
2973 ok(hres == S_OK, "textDecorationBlink failed: %08x\n", hres);
2974
2975 hres = IHTMLStyle_get_textDecoration(style, &sDefault);
2976 ok(hres == S_OK, "get_textDecoration failed: %08x\n", hres);
2977
2978 str = a2bstr("invalid");
2979 hres = IHTMLStyle_put_textDecoration(style, str);
2980 ok(hres == E_INVALIDARG, "put_textDecoration failed: %08x\n", hres);
2981 SysFreeString(str);
2982
2983 str = a2bstr("none");
2984 hres = IHTMLStyle_put_textDecoration(style, str);
2985 ok(hres == S_OK, "put_textDecoration failed: %08x\n", hres);
2986 SysFreeString(str);
2987
2988 str = a2bstr("underline");
2989 hres = IHTMLStyle_put_textDecoration(style, str);
2990 ok(hres == S_OK, "put_textDecoration failed: %08x\n", hres);
2991 SysFreeString(str);
2992
2993 str = a2bstr("overline");
2994 hres = IHTMLStyle_put_textDecoration(style, str);
2995 ok(hres == S_OK, "put_textDecoration failed: %08x\n", hres);
2996 SysFreeString(str);
2997
2998 str = a2bstr("line-through");
2999 hres = IHTMLStyle_put_textDecoration(style, str);
3000 ok(hres == S_OK, "put_textDecoration failed: %08x\n", hres);
3001 SysFreeString(str);
3002
3003 str = a2bstr("blink");
3004 hres = IHTMLStyle_put_textDecoration(style, str);
3005 ok(hres == S_OK, "put_textDecoration failed: %08x\n", hres);
3006 SysFreeString(str);
3007
3008 hres = IHTMLStyle_get_textDecoration(style, &str);
3009 ok(hres == S_OK, "get_textDecoration failed: %08x\n", hres);
3010 ok(!strcmp_wa(str, "blink"), "str != blink\n");
3011 SysFreeString(str);
3012
3013 hres = IHTMLStyle_put_textDecoration(style, sDefault);
3014 ok(hres == S_OK, "put_textDecoration failed: %08x\n", hres);
3015 SysFreeString(sDefault);
3016
3017 hres = IHTMLStyle_get_posWidth(style, NULL);
3018 ok(hres == E_POINTER, "get_posWidth failed: %08x\n", hres);
3019
3020 hres = IHTMLStyle_get_posWidth(style, &f);
3021 ok(hres == S_OK, "get_posWidth failed: %08x\n", hres);
3022 ok(f == 0.0f, "f = %f\n", f);
3023
3024 V_VT(&v) = VT_EMPTY;
3025 hres = IHTMLStyle_get_width(style, &v);
3026 ok(hres == S_OK, "get_width failed: %08x\n", hres);
3027 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3028 ok(!V_BSTR(&v), "V_BSTR(v)=%p\n", V_BSTR(&v));
3029
3030 hres = IHTMLStyle_put_posWidth(style, 2.2);
3031 ok(hres == S_OK, "put_posWidth failed: %08x\n", hres);
3032
3033 hres = IHTMLStyle_get_posWidth(style, &f);
3034 ok(hres == S_OK, "get_posWidth failed: %08x\n", hres);
3035 ok(f == 2.0f ||
3036 f == 2.2f, /* IE8 */
3037 "f = %f\n", f);
3038
3039 V_VT(&v) = VT_BSTR;
3040 V_BSTR(&v) = a2bstr("auto");
3041 hres = IHTMLStyle_put_width(style, v);
3042 ok(hres == S_OK, "put_width failed: %08x\n", hres);
3043 VariantClear(&v);
3044
3045 V_VT(&v) = VT_EMPTY;
3046 hres = IHTMLStyle_get_width(style, &v);
3047 ok(hres == S_OK, "get_width failed: %08x\n", hres);
3048 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3049 ok(!strcmp_wa(V_BSTR(&v), "auto"), "V_BSTR(v)=%s\n", wine_dbgstr_w(V_BSTR(&v)));
3050 VariantClear(&v);
3051
3052 /* margin tests */
3053 str = (void*)0xdeadbeef;
3054 hres = IHTMLStyle_get_margin(style, &str);
3055 ok(hres == S_OK, "get_margin failed: %08x\n", hres);
3056 ok(!str, "margin = %s\n", wine_dbgstr_w(str));
3057
3058 str = a2bstr("1");
3059 hres = IHTMLStyle_put_margin(style, str);
3060 ok(hres == S_OK, "put_margin failed: %08x\n", hres);
3061 SysFreeString(str);
3062
3063 hres = IHTMLStyle_get_margin(style, &str);
3064 ok(hres == S_OK, "get_margin failed: %08x\n", hres);
3065 ok(!strcmp_wa(str, "1px"), "margin = %s\n", wine_dbgstr_w(str));
3066
3067 hres = IHTMLStyle_put_margin(style, NULL);
3068 ok(hres == S_OK, "put_margin failed: %08x\n", hres);
3069
3070 str = NULL;
3071 hres = IHTMLStyle_get_border(style, &str);
3072 ok(hres == S_OK, "get_border failed: %08x\n", hres);
3073 ok(!str || !*str, "str is not empty\n");
3074 SysFreeString(str);
3075
3076 str = a2bstr("1px");
3077 hres = IHTMLStyle_put_border(style, str);
3078 ok(hres == S_OK, "put_border failed: %08x\n", hres);
3079 SysFreeString(str);
3080
3081 V_VT(&v) = VT_EMPTY;
3082 hres = IHTMLStyle_get_left(style, &v);
3083 ok(hres == S_OK, "get_left failed: %08x\n", hres);
3084 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3085 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
3086 VariantClear(&v);
3087
3088 /* Test posLeft */
3089 hres = IHTMLStyle_get_posLeft(style, NULL);
3090 ok(hres == E_POINTER, "get_posLeft failed: %08x\n", hres);
3091
3092 f = 1.0f;
3093 hres = IHTMLStyle_get_posLeft(style, &f);
3094 ok(hres == S_OK, "get_posLeft failed: %08x\n", hres);
3095 ok(f == 0.0, "expected 0.0 got %f\n", f);
3096
3097 hres = IHTMLStyle_put_posLeft(style, 4.9f);
3098 ok(hres == S_OK, "put_posLeft failed: %08x\n", hres);
3099
3100 hres = IHTMLStyle_get_posLeft(style, &f);
3101 ok(hres == S_OK, "get_posLeft failed: %08x\n", hres);
3102 ok(f == 4.0 ||
3103 f == 4.9f, /* IE8 */
3104 "expected 4.0 or 4.9 (IE8) got %f\n", f);
3105
3106 /* Ensure left is updated correctly. */
3107 V_VT(&v) = VT_EMPTY;
3108 hres = IHTMLStyle_get_left(style, &v);
3109 ok(hres == S_OK, "get_left failed: %08x\n", hres);
3110 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3111 ok(!strcmp_wa(V_BSTR(&v), "4px") ||
3112 !strcmp_wa(V_BSTR(&v), "4.9px"), /* IE8 */
3113 "V_BSTR(v) = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3114 VariantClear(&v);
3115
3116 /* Test left */
3117 V_VT(&v) = VT_BSTR;
3118 V_BSTR(&v) = a2bstr("3px");
3119 hres = IHTMLStyle_put_left(style, v);
3120 ok(hres == S_OK, "put_left failed: %08x\n", hres);
3121 VariantClear(&v);
3122
3123 hres = IHTMLStyle_get_posLeft(style, &f);
3124 ok(hres == S_OK, "get_posLeft failed: %08x\n", hres);
3125 ok(f == 3.0, "expected 3.0 got %f\n", f);
3126
3127 V_VT(&v) = VT_EMPTY;
3128 hres = IHTMLStyle_get_left(style, &v);
3129 ok(hres == S_OK, "get_left failed: %08x\n", hres);
3130 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3131 ok(!strcmp_wa(V_BSTR(&v), "3px"), "V_BSTR(v) = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3132 VariantClear(&v);
3133
3134 V_VT(&v) = VT_NULL;
3135 hres = IHTMLStyle_put_left(style, v);
3136 ok(hres == S_OK, "put_left failed: %08x\n", hres);
3137
3138 V_VT(&v) = VT_EMPTY;
3139 hres = IHTMLStyle_get_left(style, &v);
3140 ok(hres == S_OK, "get_left failed: %08x\n", hres);
3141 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3142 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
3143 VariantClear(&v);
3144
3145 V_VT(&v) = VT_EMPTY;
3146 hres = IHTMLStyle_get_top(style, &v);
3147 ok(hres == S_OK, "get_top failed: %08x\n", hres);
3148 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3149 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
3150 VariantClear(&v);
3151
3152 /* Test posTop */
3153 hres = IHTMLStyle_get_posTop(style, NULL);
3154 ok(hres == E_POINTER, "get_posTop failed: %08x\n", hres);
3155
3156 f = 1.0f;
3157 hres = IHTMLStyle_get_posTop(style, &f);
3158 ok(hres == S_OK, "get_posTop failed: %08x\n", hres);
3159 ok(f == 0.0, "expected 0.0 got %f\n", f);
3160
3161 hres = IHTMLStyle_put_posTop(style, 4.9f);
3162 ok(hres == S_OK, "put_posTop failed: %08x\n", hres);
3163
3164 hres = IHTMLStyle_get_posTop(style, &f);
3165 ok(hres == S_OK, "get_posTop failed: %08x\n", hres);
3166 ok(f == 4.0 ||
3167 f == 4.9f, /* IE8 */
3168 "expected 4.0 or 4.9 (IE8) got %f\n", f);
3169
3170 V_VT(&v) = VT_BSTR;
3171 V_BSTR(&v) = a2bstr("3px");
3172 hres = IHTMLStyle_put_top(style, v);
3173 ok(hres == S_OK, "put_top failed: %08x\n", hres);
3174 VariantClear(&v);
3175
3176 V_VT(&v) = VT_EMPTY;
3177 hres = IHTMLStyle_get_top(style, &v);
3178 ok(hres == S_OK, "get_top failed: %08x\n", hres);
3179 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3180 ok(!strcmp_wa(V_BSTR(&v), "3px"), "V_BSTR(v) = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3181 VariantClear(&v);
3182
3183 hres = IHTMLStyle_get_posTop(style, &f);
3184 ok(hres == S_OK, "get_posTop failed: %08x\n", hres);
3185 ok(f == 3.0, "expected 3.0 got %f\n", f);
3186
3187 V_VT(&v) = VT_NULL;
3188 hres = IHTMLStyle_put_top(style, v);
3189 ok(hres == S_OK, "put_top failed: %08x\n", hres);
3190
3191 V_VT(&v) = VT_EMPTY;
3192 hres = IHTMLStyle_get_top(style, &v);
3193 ok(hres == S_OK, "get_top failed: %08x\n", hres);
3194 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3195 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
3196 VariantClear(&v);
3197
3198 /* Test posHeight */
3199 hres = IHTMLStyle_get_posHeight(style, NULL);
3200 ok(hres == E_POINTER, "get_posHeight failed: %08x\n", hres);
3201
3202 V_VT(&v) = VT_EMPTY;
3203 hres = IHTMLStyle_get_height(style, &v);
3204 ok(hres == S_OK, "get_height failed: %08x\n", hres);
3205 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3206 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
3207 VariantClear(&v);
3208
3209 f = 1.0f;
3210 hres = IHTMLStyle_get_posHeight(style, &f);
3211 ok(hres == S_OK, "get_posHeight failed: %08x\n", hres);
3212 ok(f == 0.0, "expected 0.0 got %f\n", f);
3213
3214 hres = IHTMLStyle_put_posHeight(style, 4.9f);
3215 ok(hres == S_OK, "put_posHeight failed: %08x\n", hres);
3216
3217 hres = IHTMLStyle_get_posHeight(style, &f);
3218 ok(hres == S_OK, "get_posHeight failed: %08x\n", hres);
3219 ok(f == 4.0 ||
3220 f == 4.9f, /* IE8 */
3221 "expected 4.0 or 4.9 (IE8) got %f\n", f);
3222
3223 V_VT(&v) = VT_BSTR;
3224 V_BSTR(&v) = a2bstr("64px");
3225 hres = IHTMLStyle_put_height(style, v);
3226 ok(hres == S_OK, "put_height failed: %08x\n", hres);
3227 VariantClear(&v);
3228
3229 V_VT(&v) = VT_EMPTY;
3230 hres = IHTMLStyle_get_height(style, &v);
3231 ok(hres == S_OK, "get_height failed: %08x\n", hres);
3232 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3233 ok(!strcmp_wa(V_BSTR(&v), "64px"), "V_BSTR(v) = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3234 VariantClear(&v);
3235
3236 hres = IHTMLStyle_get_posHeight(style, &f);
3237 ok(hres == S_OK, "get_posHeight failed: %08x\n", hres);
3238 ok(f == 64.0, "expected 64.0 got %f\n", f);
3239
3240 str = (void*)0xdeadbeef;
3241 hres = IHTMLStyle_get_cursor(style, &str);
3242 ok(hres == S_OK, "get_cursor failed: %08x\n", hres);
3243 ok(!str, "get_cursor != NULL\n");
3244 SysFreeString(str);
3245
3246 str = a2bstr("default");
3247 hres = IHTMLStyle_put_cursor(style, str);
3248 ok(hres == S_OK, "put_cursor failed: %08x\n", hres);
3249 SysFreeString(str);
3250
3251 str = NULL;
3252 hres = IHTMLStyle_get_cursor(style, &str);
3253 ok(hres == S_OK, "get_cursor failed: %08x\n", hres);
3254 ok(!strcmp_wa(str, "default"), "get_cursor returned %s\n", wine_dbgstr_w(str));
3255 SysFreeString(str);
3256
3257 V_VT(&v) = VT_EMPTY;
3258 hres = IHTMLStyle_get_verticalAlign(style, &v);
3259 ok(hres == S_OK, "get_vertivalAlign failed: %08x\n", hres);
3260 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3261 ok(!V_BSTR(&v), "V_BSTR(v) != NULL\n");
3262 VariantClear(&v);
3263
3264 V_VT(&v) = VT_BSTR;
3265 V_BSTR(&v) = a2bstr("middle");
3266 hres = IHTMLStyle_put_verticalAlign(style, v);
3267 ok(hres == S_OK, "put_vertivalAlign failed: %08x\n", hres);
3268 VariantClear(&v);
3269
3270 V_VT(&v) = VT_EMPTY;
3271 hres = IHTMLStyle_get_verticalAlign(style, &v);
3272 ok(hres == S_OK, "get_verticalAlign failed: %08x\n", hres);
3273 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3274 ok(!strcmp_wa(V_BSTR(&v), "middle"), "V_BSTR(v) = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3275 VariantClear(&v);
3276
3277 str = (void*)0xdeadbeef;
3278 hres = IHTMLStyle_get_textAlign(style, &str);
3279 ok(hres == S_OK, "get_textAlign failed: %08x\n", hres);
3280 ok(!str, "textAlign != NULL\n");
3281
3282 str = a2bstr("center");
3283 hres = IHTMLStyle_put_textAlign(style, str);
3284 ok(hres == S_OK, "put_textAlign failed: %08x\n", hres);
3285 SysFreeString(str);
3286
3287 str = NULL;
3288 hres = IHTMLStyle_get_textAlign(style, &str);
3289 ok(hres == S_OK, "get_textAlign failed: %08x\n", hres);
3290 ok(!strcmp_wa(str, "center"), "textAlign = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3291 SysFreeString(str);
3292
3293 str = (void*)0xdeadbeef;
3294 hres = IHTMLStyle_get_filter(style, &str);
3295 ok(hres == S_OK, "get_filter failed: %08x\n", hres);
3296 ok(!str, "filter != NULL\n");
3297
3298 str = a2bstr("alpha(opacity=100)");
3299 hres = IHTMLStyle_put_filter(style, str);
3300 ok(hres == S_OK, "put_filter failed: %08x\n", hres);
3301 SysFreeString(str);
3302
3303 V_VT(&v) = VT_EMPTY;
3304 hres = IHTMLStyle_get_zIndex(style, &v);
3305 ok(hres == S_OK, "get_zIndex failed: %08x\n", hres);
3306 ok(V_VT(&v) == VT_I4, "V_VT(v)=%d\n", V_VT(&v));
3307 ok(!V_I4(&v), "V_I4(v) != 0\n");
3308 VariantClear(&v);
3309
3310 V_VT(&v) = VT_BSTR;
3311 V_BSTR(&v) = a2bstr("1");
3312 hres = IHTMLStyle_put_zIndex(style, v);
3313 ok(hres == S_OK, "put_zIndex failed: %08x\n", hres);
3314 VariantClear(&v);
3315
3316 V_VT(&v) = VT_EMPTY;
3317 hres = IHTMLStyle_get_zIndex(style, &v);
3318 ok(hres == S_OK, "get_zIndex failed: %08x\n", hres);
3319 ok(V_VT(&v) == VT_I4, "V_VT(v)=%d\n", V_VT(&v));
3320 ok(V_I4(&v) == 1, "V_I4(v) = %d\n", V_I4(&v));
3321 VariantClear(&v);
3322
3323 /* fontStyle */
3324 hres = IHTMLStyle_get_fontStyle(style, &sDefault);
3325 ok(hres == S_OK, "get_fontStyle failed: %08x\n", hres);
3326
3327 str = a2bstr("test");
3328 hres = IHTMLStyle_put_fontStyle(style, str);
3329 ok(hres == E_INVALIDARG, "put_fontStyle failed: %08x\n", hres);
3330 SysFreeString(str);
3331
3332 str = a2bstr("italic");
3333 hres = IHTMLStyle_put_fontStyle(style, str);
3334 ok(hres == S_OK, "put_fontStyle failed: %08x\n", hres);
3335 SysFreeString(str);
3336
3337 str = a2bstr("oblique");
3338 hres = IHTMLStyle_put_fontStyle(style, str);
3339 ok(hres == S_OK, "put_fontStyle failed: %08x\n", hres);
3340 SysFreeString(str);
3341
3342 str = a2bstr("normal");
3343 hres = IHTMLStyle_put_fontStyle(style, str);
3344 ok(hres == S_OK, "put_fontStyle failed: %08x\n", hres);
3345 SysFreeString(str);
3346
3347 hres = IHTMLStyle_put_fontStyle(style, sDefault);
3348 ok(hres == S_OK, "put_fontStyle failed: %08x\n", hres);
3349 SysFreeString(sDefault);
3350
3351 /* overflow */
3352 hres = IHTMLStyle_get_overflow(style, NULL);
3353 ok(hres == E_INVALIDARG, "get_overflow failed: %08x\n", hres);
3354
3355 hres = IHTMLStyle_get_overflow(style, &sOverflowDefault);
3356 ok(hres == S_OK, "get_overflow failed: %08x\n", hres);
3357
3358 str = a2bstr("test");
3359 hres = IHTMLStyle_put_overflow(style, str);
3360 ok(hres == E_INVALIDARG, "put_overflow failed: %08x\n", hres);
3361 SysFreeString(str);
3362
3363 str = a2bstr("visible");
3364 hres = IHTMLStyle_put_overflow(style, str);
3365 ok(hres == S_OK, "put_overflow failed: %08x\n", hres);
3366 SysFreeString(str);
3367
3368 str = a2bstr("scroll");
3369 hres = IHTMLStyle_put_overflow(style, str);
3370 ok(hres == S_OK, "put_overflow failed: %08x\n", hres);
3371 SysFreeString(str);
3372
3373 str = a2bstr("hidden");
3374 hres = IHTMLStyle_put_overflow(style, str);
3375 ok(hres == S_OK, "put_overflow failed: %08x\n", hres);
3376 SysFreeString(str);
3377
3378 str = a2bstr("auto");
3379 hres = IHTMLStyle_put_overflow(style, str);
3380 ok(hres == S_OK, "put_overflow failed: %08x\n", hres);
3381 SysFreeString(str);
3382
3383 hres = IHTMLStyle_get_overflow(style, &str);
3384 ok(hres == S_OK, "get_overflow failed: %08x\n", hres);
3385 ok(!strcmp_wa(str, "auto"), "str=%s\n", wine_dbgstr_w(str));
3386 SysFreeString(str);
3387
3388 /* restore overflow default */
3389 hres = IHTMLStyle_put_overflow(style, sOverflowDefault);
3390 ok(hres == S_OK, "put_overflow failed: %08x\n", hres);
3391 SysFreeString(sOverflowDefault);
3392
3393 /* Attribute Tests*/
3394 hres = IHTMLStyle_getAttribute(style, NULL, 1, &v);
3395 ok(hres == E_INVALIDARG, "getAttribute failed: %08x\n", hres);
3396
3397 str = a2bstr("position");
3398 hres = IHTMLStyle_getAttribute(style, str, 1, NULL);
3399 ok(hres == E_INVALIDARG, "getAttribute failed: %08x\n", hres);
3400
3401 hres = IHTMLStyle_getAttribute(style, str, 1, &v);
3402 ok(hres == S_OK, "getAttribute failed: %08x\n", hres);
3403 ok(V_VT(&v) == VT_BSTR, "type failed: %d\n", V_VT(&v));
3404 VariantClear(&v);
3405
3406 hres = IHTMLStyle_setAttribute(style, NULL, v, 1);
3407 ok(hres == E_INVALIDARG, "setAttribute failed: %08x\n", hres);
3408
3409 V_VT(&v) = VT_BSTR;
3410 V_BSTR(&v) = a2bstr("absolute");
3411 hres = IHTMLStyle_setAttribute(style, str, v, 1);
3412 ok(hres == S_OK, "setAttribute failed: %08x\n", hres);
3413 VariantClear(&v);
3414
3415 hres = IHTMLStyle_getAttribute(style, str, 1, &v);
3416 ok(hres == S_OK, "getAttribute failed: %08x\n", hres);
3417 ok(V_VT(&v) == VT_BSTR, "type failed: %d\n", V_VT(&v));
3418 ok(!strcmp_wa(V_BSTR(&v), "absolute"), "str=%s\n", wine_dbgstr_w(V_BSTR(&v)));
3419 VariantClear(&v);
3420
3421 V_VT(&v) = VT_BSTR;
3422 V_BSTR(&v) = NULL;
3423 hres = IHTMLStyle_setAttribute(style, str, v, 1);
3424 ok(hres == S_OK, "setAttribute failed: %08x\n", hres);
3425 VariantClear(&v);
3426
3427 SysFreeString(str);
3428
3429 str = a2bstr("borderLeftStyle");
3430 test_border_styles(style, str);
3431 SysFreeString(str);
3432
3433 str = a2bstr("borderbottomstyle");
3434 test_border_styles(style, str);
3435 SysFreeString(str);
3436
3437 str = a2bstr("borderrightstyle");
3438 test_border_styles(style, str);
3439 SysFreeString(str);
3440
3441 str = a2bstr("bordertopstyle");
3442 test_border_styles(style, str);
3443 SysFreeString(str);
3444
3445 hres = IHTMLStyle_get_borderStyle(style, &sDefault);
3446 ok(hres == S_OK, "get_borderStyle failed: %08x\n", hres);
3447
3448 str = a2bstr("none dotted dashed solid");
3449 hres = IHTMLStyle_put_borderStyle(style, str);
3450 ok(hres == S_OK, "put_borderStyle failed: %08x\n", hres);
3451 SysFreeString(str);
3452
3453 str = a2bstr("none dotted dashed solid");
3454 hres = IHTMLStyle_get_borderStyle(style, &str);
3455 ok(hres == S_OK, "get_borderStyle failed: %08x\n", hres);
3456 ok(!strcmp_wa(str, "none dotted dashed solid"),
3457 "expected (none dotted dashed solid) = (%s)\n", wine_dbgstr_w(V_BSTR(&v)));
3458 SysFreeString(str);
3459
3460 str = a2bstr("double groove ridge inset");
3461 hres = IHTMLStyle_put_borderStyle(style, str);
3462 ok(hres == S_OK, "put_borderStyle failed: %08x\n", hres);
3463 SysFreeString(str);
3464
3465 str = a2bstr("window-inset outset ridge inset");
3466 hres = IHTMLStyle_put_borderStyle(style, str);
3467 ok(hres == S_OK, "put_borderStyle failed: %08x\n", hres);
3468 SysFreeString(str);
3469
3470 str = a2bstr("window-inset");
3471 hres = IHTMLStyle_put_borderStyle(style, str);
3472 ok(hres == S_OK, "put_borderStyle failed: %08x\n", hres);
3473 SysFreeString(str);
3474
3475 str = a2bstr("none none none none none");
3476 hres = IHTMLStyle_put_borderStyle(style, str);
3477 ok(hres == S_OK, "put_borderStyle failed: %08x\n", hres);
3478 SysFreeString(str);
3479
3480 str = a2bstr("invalid none none none");
3481 hres = IHTMLStyle_put_borderStyle(style, str);
3482 ok(hres == E_INVALIDARG, "put_borderStyle failed: %08x\n", hres);
3483 SysFreeString(str);
3484
3485 str = a2bstr("none invalid none none");
3486 hres = IHTMLStyle_put_borderStyle(style, str);
3487 ok(hres == E_INVALIDARG, "put_borderStyle failed: %08x\n", hres);
3488 SysFreeString(str);
3489
3490 hres = IHTMLStyle_put_borderStyle(style, sDefault);
3491 ok(hres == S_OK, "put_borderStyle failed: %08x\n", hres);
3492 SysFreeString(sDefault);
3493
3494 /* backgoundColor */
3495 hres = IHTMLStyle_get_backgroundColor(style, &v);
3496 ok(hres == S_OK, "get_backgroundColor: %08x\n", hres);
3497 ok(V_VT(&v) == VT_BSTR, "type failed: %d\n", V_VT(&v));
3498 ok(!V_BSTR(&v), "str=%s\n", wine_dbgstr_w(V_BSTR(&v)));
3499 VariantClear(&v);
3500
3501 /* PaddingLeft */
3502 hres = IHTMLStyle_get_paddingLeft(style, &vDefault);
3503 ok(hres == S_OK, "get_paddingLeft: %08x\n", hres);
3504
3505 V_VT(&v) = VT_BSTR;
3506 V_BSTR(&v) = a2bstr("10");
3507 hres = IHTMLStyle_put_paddingLeft(style, v);
3508 ok(hres == S_OK, "put_paddingLeft: %08x\n", hres);
3509 VariantClear(&v);
3510
3511 hres = IHTMLStyle_get_paddingLeft(style, &v);
3512 ok(hres == S_OK, "get_paddingLeft: %08x\n", hres);
3513 ok(!strcmp_wa(V_BSTR(&v), "10px"), "expecte 10 = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3514
3515 hres = IHTMLStyle_put_paddingLeft(style, vDefault);
3516 ok(hres == S_OK, "put_paddingLeft: %08x\n", hres);
3517
3518 /* BackgroundRepeat */
3519 hres = IHTMLStyle_get_backgroundRepeat(style, &sDefault);
3520 ok(hres == S_OK, "get_backgroundRepeat failed: %08x\n", hres);
3521
3522 str = a2bstr("invalid");
3523 hres = IHTMLStyle_put_backgroundRepeat(style, str);
3524 ok(hres == E_INVALIDARG, "put_backgroundRepeat failed: %08x\n", hres);
3525 SysFreeString(str);
3526
3527 str = a2bstr("repeat");
3528 hres = IHTMLStyle_put_backgroundRepeat(style, str);
3529 ok(hres == S_OK, "put_backgroundRepeat failed: %08x\n", hres);
3530 SysFreeString(str);
3531
3532 str = a2bstr("no-repeat");
3533 hres = IHTMLStyle_put_backgroundRepeat(style, str);
3534 ok(hres == S_OK, "put_backgroundRepeat failed: %08x\n", hres);
3535 SysFreeString(str);
3536
3537 str = a2bstr("repeat-x");
3538 hres = IHTMLStyle_put_backgroundRepeat(style, str);
3539 ok(hres == S_OK, "put_backgroundRepeat failed: %08x\n", hres);
3540 SysFreeString(str);
3541
3542 str = a2bstr("repeat-y");
3543 hres = IHTMLStyle_put_backgroundRepeat(style, str);
3544 ok(hres == S_OK, "put_backgroundRepeat failed: %08x\n", hres);
3545 SysFreeString(str);
3546
3547 hres = IHTMLStyle_get_backgroundRepeat(style, &str);
3548 ok(hres == S_OK, "get_backgroundRepeat failed: %08x\n", hres);
3549 ok(!strcmp_wa(str, "repeat-y"), "str=%s\n", wine_dbgstr_w(str));
3550 SysFreeString(str);
3551
3552 hres = IHTMLStyle_put_backgroundRepeat(style, sDefault);
3553 ok(hres == S_OK, "put_backgroundRepeat failed: %08x\n", hres);
3554 SysFreeString(sDefault);
3555
3556 /* BorderColor */
3557 hres = IHTMLStyle_get_borderColor(style, &sDefault);
3558 ok(hres == S_OK, "get_borderColor failed: %08x\n", hres);
3559
3560 str = a2bstr("red green red blue");
3561 hres = IHTMLStyle_put_borderColor(style, str);
3562 ok(hres == S_OK, "put_borderColor failed: %08x\n", hres);
3563 SysFreeString(str);
3564
3565 hres = IHTMLStyle_get_borderColor(style, &str);
3566 ok(hres == S_OK, "get_borderColor failed: %08x\n", hres);
3567 ok(!strcmp_wa(str, "red green red blue"), "str=%s\n", wine_dbgstr_w(str));
3568 SysFreeString(str);
3569
3570 hres = IHTMLStyle_put_borderColor(style, sDefault);
3571 ok(hres == S_OK, "put_borderColor failed: %08x\n", hres);
3572 SysFreeString(sDefault);
3573
3574 /* BorderLeft */
3575 hres = IHTMLStyle_get_borderLeft(style, &sDefault);
3576 ok(hres == S_OK, "get_borderLeft failed: %08x\n", hres);
3577
3578 str = a2bstr("thick dotted red");
3579 hres = IHTMLStyle_put_borderLeft(style, str);
3580 ok(hres == S_OK, "put_borderLeft failed: %08x\n", hres);
3581 SysFreeString(str);
3582
3583 /* IHTMLStyle_get_borderLeft appears to have a bug where
3584 it returns the first letter of the color. So we check
3585 each style individually.
3586 */
3587 V_BSTR(&v) = NULL;
3588 hres = IHTMLStyle_get_borderLeftColor(style, &v);
3589 todo_wine ok(hres == S_OK, "get_borderLeftColor failed: %08x\n", hres);
3590 todo_wine ok(!strcmp_wa(V_BSTR(&v), "red"), "str=%s\n", wine_dbgstr_w(V_BSTR(&v)));
3591 VariantClear(&v);
3592
3593 V_BSTR(&v) = NULL;
3594 hres = IHTMLStyle_get_borderLeftWidth(style, &v);
3595 ok(hres == S_OK, "get_borderLeftWidth failed: %08x\n", hres);
3596 ok(!strcmp_wa(V_BSTR(&v), "thick"), "str=%s\n", wine_dbgstr_w(V_BSTR(&v)));
3597 VariantClear(&v);
3598
3599 hres = IHTMLStyle_get_borderLeftStyle(style, &str);
3600 ok(hres == S_OK, "get_borderLeftStyle failed: %08x\n", hres);
3601 ok(!strcmp_wa(str, "dotted"), "str=%s\n", wine_dbgstr_w(str));
3602 SysFreeString(str);
3603
3604 hres = IHTMLStyle_put_borderLeft(style, sDefault);
3605 ok(hres == S_OK, "put_borderLeft failed: %08x\n", hres);
3606 SysFreeString(sDefault);
3607
3608 /* backgroundPositionX */
3609 hres = IHTMLStyle_get_backgroundPositionX(style, &vDefault);
3610 ok(hres == S_OK, "get_backgroundPositionX failed: %08x\n", hres);
3611
3612 V_VT(&v) = VT_BSTR;
3613 V_BSTR(&v) = a2bstr("10px");
3614 hres = IHTMLStyle_put_backgroundPositionX(style, v);
3615 ok(hres == S_OK, "put_backgroundPositionX failed: %08x\n", hres);
3616 VariantClear(&v);
3617
3618 hres = IHTMLStyle_get_backgroundPositionX(style, &v);
3619 ok(hres == S_OK, "get_backgroundPositionX failed: %08x\n", hres);
3620 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3621 VariantClear(&v);
3622
3623 hres = IHTMLStyle_put_backgroundPositionX(style, vDefault);
3624 ok(hres == S_OK, "put_backgroundPositionX failed: %08x\n", hres);
3625 VariantClear(&vDefault);
3626
3627 /* backgroundPositionY */
3628 hres = IHTMLStyle_get_backgroundPositionY(style, &vDefault);
3629 ok(hres == S_OK, "get_backgroundPositionY failed: %08x\n", hres);
3630
3631 V_VT(&v) = VT_BSTR;
3632 V_BSTR(&v) = a2bstr("10px");
3633 hres = IHTMLStyle_put_backgroundPositionY(style, v);
3634 ok(hres == S_OK, "put_backgroundPositionY failed: %08x\n", hres);
3635 VariantClear(&v);
3636
3637 hres = IHTMLStyle_get_backgroundPositionY(style, &v);
3638 ok(hres == S_OK, "get_backgroundPositionY failed: %08x\n", hres);
3639 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3640 VariantClear(&v);
3641
3642 hres = IHTMLStyle_put_backgroundPositionY(style, vDefault);
3643 ok(hres == S_OK, "put_backgroundPositionY failed: %08x\n", hres);
3644 VariantClear(&vDefault);
3645
3646 /* borderTopWidth */
3647 hres = IHTMLStyle_get_borderTopWidth(style, &vDefault);
3648 ok(hres == S_OK, "get_borderTopWidth: %08x\n", hres);
3649
3650 V_VT(&v) = VT_BSTR;
3651 V_BSTR(&v) = a2bstr("10px");
3652 hres = IHTMLStyle_put_borderTopWidth(style, v);
3653 ok(hres == S_OK, "put_borderTopWidth: %08x\n", hres);
3654 VariantClear(&v);
3655
3656 hres = IHTMLStyle_get_borderTopWidth(style, &v);
3657 ok(hres == S_OK, "get_borderTopWidth: %08x\n", hres);
3658 ok(!strcmp_wa(V_BSTR(&v), "10px"), "expected 10px = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3659 VariantClear(&v);
3660
3661 hres = IHTMLStyle_put_borderTopWidth(style, vDefault);
3662 ok(hres == S_OK, "put_borderTopWidth: %08x\n", hres);
3663 VariantClear(&vDefault);
3664
3665 /* borderRightWidth */
3666 hres = IHTMLStyle_get_borderRightWidth(style, &vDefault);
3667 ok(hres == S_OK, "get_borderRightWidth: %08x\n", hres);
3668
3669 V_VT(&v) = VT_BSTR;
3670 V_BSTR(&v) = a2bstr("10");
3671 hres = IHTMLStyle_put_borderRightWidth(style, v);
3672 ok(hres == S_OK, "put_borderRightWidth: %08x\n", hres);
3673 VariantClear(&v);
3674
3675 hres = IHTMLStyle_get_borderRightWidth(style, &v);
3676 ok(hres == S_OK, "get_borderRightWidth: %08x\n", hres);
3677 ok(!strcmp_wa(V_BSTR(&v), "10px"), "expected 10px = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3678 VariantClear(&v);
3679
3680 hres = IHTMLStyle_put_borderRightWidth(style, vDefault);
3681 ok(hres == S_OK, "put_borderRightWidth: %08x\n", hres);
3682 VariantClear(&vDefault);
3683
3684 /* borderBottomWidth */
3685 hres = IHTMLStyle_get_borderBottomWidth(style, &vDefault);
3686 ok(hres == S_OK, "get_borderBottomWidth: %08x\n", hres);
3687
3688 V_VT(&v) = VT_BSTR;
3689 V_BSTR(&v) = a2bstr("10");
3690 hres = IHTMLStyle_put_borderBottomWidth(style, v);
3691 ok(hres == S_OK, "put_borderBottomWidth: %08x\n", hres);
3692 VariantClear(&v);
3693
3694 hres = IHTMLStyle_get_borderBottomWidth(style, &v);
3695 ok(hres == S_OK, "get_borderBottomWidth: %08x\n", hres);
3696 ok(!strcmp_wa(V_BSTR(&v), "10px"), "expected 10px = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3697 VariantClear(&v);
3698
3699 hres = IHTMLStyle_put_borderBottomWidth(style, vDefault);
3700 ok(hres == S_OK, "put_borderBottomWidth: %08x\n", hres);
3701 VariantClear(&vDefault);
3702
3703 /* borderLeftWidth */
3704 hres = IHTMLStyle_get_borderLeftWidth(style, &vDefault);
3705 ok(hres == S_OK, "get_borderLeftWidth: %08x\n", hres);
3706
3707 V_VT(&v) = VT_BSTR;
3708 V_BSTR(&v) = a2bstr("10");
3709 hres = IHTMLStyle_put_borderLeftWidth(style, v);
3710 ok(hres == S_OK, "put_borderLeftWidth: %08x\n", hres);
3711 VariantClear(&v);
3712
3713 hres = IHTMLStyle_get_borderLeftWidth(style, &v);
3714 ok(hres == S_OK, "get_borderLeftWidth: %08x\n", hres);
3715 ok(!strcmp_wa(V_BSTR(&v), "10px"), "expected 10px = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3716 VariantClear(&v);
3717
3718 hres = IHTMLStyle_put_borderLeftWidth(style, vDefault);
3719 ok(hres == S_OK, "put_borderLeftWidth: %08x\n", hres);
3720 VariantClear(&vDefault);
3721
3722 /* wordSpacing */
3723 hres = IHTMLStyle_get_wordSpacing(style, &vDefault);
3724 ok(hres == S_OK, "get_wordSpacing: %08x\n", hres);
3725
3726 V_VT(&v) = VT_BSTR;
3727 V_BSTR(&v) = a2bstr("10");
3728 hres = IHTMLStyle_put_wordSpacing(style, v);
3729 ok(hres == S_OK, "put_wordSpacing: %08x\n", hres);
3730 VariantClear(&v);
3731
3732 hres = IHTMLStyle_get_wordSpacing(style, &v);
3733 ok(hres == S_OK, "get_wordSpacing: %08x\n", hres);
3734 ok(V_VT(&v) == VT_BSTR, "V_VT(v)=%d\n", V_VT(&v));
3735 ok(!strcmp_wa(V_BSTR(&v), "10px"), "expected 10px = %s\n", wine_dbgstr_w(V_BSTR(&v)));
3736 VariantClear(&v);
3737
3738 hres = IHTMLStyle_put_wordSpacing(style, vDefault);
3739 ok(hres == S_OK, "put_wordSpacing: %08x\n", hres);
3740 VariantClear(&vDefault);
3741
3742 hres = IHTMLStyle_QueryInterface(style, &IID_IHTMLStyle2, (void**)&style2);
3743 ok(hres == S_OK, "Could not get IHTMLStyle2 iface: %08x\n", hres);
3744 if(SUCCEEDED(hres)) {
3745 test_style2(style2);
3746 IHTMLStyle2_Release(style2);
3747 }
3748
3749 hres = IHTMLStyle_QueryInterface(style, &IID_IHTMLStyle3, (void**)&style3);
3750 ok(hres == S_OK, "Could not get IHTMLStyle3 iface: %08x\n", hres);
3751 if(SUCCEEDED(hres)) {
3752 test_style3(style3);
3753 IHTMLStyle3_Release(style3);
3754 }
3755
3756 hres = IHTMLStyle_QueryInterface(style, &IID_IHTMLStyle4, (void**)&style4);
3757 ok(hres == S_OK, "Could not get IHTMLStyle4 iface: %08x\n", hres);
3758 if(SUCCEEDED(hres)) {
3759 test_style4(style4);
3760 IHTMLStyle4_Release(style4);
3761 }
3762 }
3763
3764 static void test_set_csstext(IHTMLStyle *style)
3765 {
3766 VARIANT v;
3767 HRESULT hres;
3768
3769 test_style_set_csstext(style, "background-color: black;");
3770
3771 hres = IHTMLStyle_get_backgroundColor(style, &v);
3772 ok(hres == S_OK, "get_backgroundColor: %08x\n", hres);
3773 ok(V_VT(&v) == VT_BSTR, "type failed: %d\n", V_VT(&v));
3774 ok(!strcmp_wa(V_BSTR(&v), "black"), "str=%s\n", wine_dbgstr_w(V_BSTR(&v)));
3775 VariantClear(&v);
3776 }
3777
3778 static void test_default_selection(IHTMLDocument2 *doc)
3779 {
3780 IHTMLSelectionObject *selection;
3781 IHTMLTxtRange *range;
3782 IDispatch *disp;
3783 BSTR str;
3784 HRESULT hres;
3785
3786 hres = IHTMLDocument2_get_selection(doc, &selection);
3787 ok(hres == S_OK, "get_selection failed: %08x\n", hres);
3788
3789 hres = IHTMLSelectionObject_get_type(selection, &str);
3790 ok(hres == S_OK, "get_type failed: %08x\n", hres);
3791 ok(!strcmp_wa(str, "None"), "type = %s\n", wine_dbgstr_w(str));
3792 SysFreeString(str);
3793
3794 hres = IHTMLSelectionObject_createRange(selection, &disp);
3795 IHTMLSelectionObject_Release(selection);
3796 ok(hres == S_OK, "createRange failed: %08x\n", hres);
3797
3798 hres = IDispatch_QueryInterface(disp, &IID_IHTMLTxtRange, (void**)&range);
3799 IDispatch_Release(disp);
3800 ok(hres == S_OK, "Could not get IHTMLTxtRange interface: %08x\n", hres);
3801
3802 test_range_text(range, NULL);
3803 IHTMLTxtRange_Release(range);
3804 }
3805
3806 static void test_default_body(IHTMLBodyElement *body)
3807 {
3808 LONG l;
3809 BSTR bstr;
3810 HRESULT hres;
3811 VARIANT v;
3812 WCHAR sBodyText[] = {'#','F','F','0','0','0','0',0};
3813 WCHAR sTextInvalid[] = {'I','n','v','a','l','i','d',0};
3814
3815 bstr = (void*)0xdeadbeef;
3816 hres = IHTMLBodyElement_get_background(body, &bstr);
3817 ok(hres == S_OK, "get_background failed: %08x\n", hres);
3818 ok(bstr == NULL, "bstr != NULL\n");
3819
3820 l = elem_get_scroll_height((IUnknown*)body);
3821 ok(l != -1, "scrollHeight == -1\n");
3822 l = elem_get_scroll_width((IUnknown*)body);
3823 ok(l != -1, "scrollWidth == -1\n");
3824 l = elem_get_scroll_top((IUnknown*)body);
3825 ok(!l, "scrollTop = %d\n", l);
3826 elem_get_scroll_left((IUnknown*)body);
3827
3828 /* get_text tests */
3829 hres = IHTMLBodyElement_get_text(body, &v);
3830 ok(hres == S_OK, "expect S_OK got 0x%08d\n", hres);
3831 ok(V_VT(&v) == VT_BSTR, "Expected VT_BSTR got %d\n", V_VT(&v));
3832 ok(bstr == NULL, "bstr != NULL\n");
3833
3834
3835 /* get_text - Invalid Text */
3836 V_VT(&v) = VT_BSTR;
3837 V_BSTR(&v) = SysAllocString(sTextInvalid);
3838 hres = IHTMLBodyElement_put_text(body, v);
3839 ok(hres == S_OK, "expect S_OK got 0x%08d\n", hres);
3840 VariantClear(&v);
3841
3842 V_VT(&v) = VT_NULL;
3843 hres = IHTMLBodyElement_get_text(body, &v);
3844 ok(hres == S_OK, "expect S_OK got 0x%08d\n", hres);
3845 ok(V_VT(&v) == VT_BSTR, "Expected VT_BSTR got %d\n", V_VT(&v));
3846 ok(!strcmp_wa(V_BSTR(&v), "#00a0d0"), "v != '#00a0d0'\n");
3847 VariantClear(&v);
3848
3849 /* get_text - Valid Text */
3850 V_VT(&v) = VT_BSTR;
3851 V_BSTR(&v) = SysAllocString(sBodyText);
3852 hres = IHTMLBodyElement_put_text(body, v);
3853 ok(hres == S_OK, "expect S_OK got 0x%08d\n", hres);
3854 VariantClear(&v);
3855
3856 V_VT(&v) = VT_NULL;
3857 hres = IHTMLBodyElement_get_text(body, &v);
3858 ok(hres == S_OK, "expect S_OK got 0x%08d\n", hres);
3859 ok(V_VT(&v) == VT_BSTR, "Expected VT_BSTR got %d\n", V_VT(&v));
3860 ok(!strcmp_wa(V_BSTR(&v), "#ff0000"), "v != '#ff0000'\n");
3861 VariantClear(&v);
3862 }
3863
3864 static void test_body_funs(IHTMLBodyElement *body)
3865 {
3866 static WCHAR sRed[] = {'r','e','d',0};
3867 VARIANT vbg;
3868 VARIANT vDefaultbg;
3869 HRESULT hres;
3870
3871 hres = IHTMLBodyElement_get_bgColor(body, &vDefaultbg);
3872 ok(hres == S_OK, "get_bgColor failed: %08x\n", hres);
3873 ok(V_VT(&vDefaultbg) == VT_BSTR, "bstr != NULL\n");
3874
3875 V_VT(&vbg) = VT_BSTR;
3876 V_BSTR(&vbg) = SysAllocString(sRed);
3877 hres = IHTMLBodyElement_put_bgColor(body, vbg);
3878 ok(hres == S_OK, "put_bgColor failed: %08x\n", hres);
3879 VariantClear(&vbg);
3880
3881 hres = IHTMLBodyElement_get_bgColor(body, &vbg);
3882 ok(hres == S_OK, "get_bgColor failed: %08x\n", hres);
3883 ok(V_VT(&vDefaultbg) == VT_BSTR, "V_VT(&vDefaultbg) != VT_BSTR\n");
3884 ok(!strcmp_wa(V_BSTR(&vbg), "#ff0000"), "Unexpected bgcolor %s\n", wine_dbgstr_w(V_BSTR(&vbg)));
3885 VariantClear(&vbg);
3886
3887 /* Restore Originial */
3888 hres = IHTMLBodyElement_put_bgColor(body, vDefaultbg);
3889 ok(hres == S_OK, "put_bgColor failed: %08x\n", hres);
3890 VariantClear(&vDefaultbg);
3891 }
3892
3893 static void test_window(IHTMLDocument2 *doc)
3894 {
3895 IHTMLWindow2 *window, *window2, *self;
3896 IHTMLDocument2 *doc2 = NULL;
3897 IDispatch *disp;
3898 HRESULT hres;
3899
3900 hres = IHTMLDocument2_get_parentWindow(doc, &window);
3901 ok(hres == S_OK, "get_parentWindow failed: %08x\n", hres);
3902 test_ifaces((IUnknown*)window, window_iids);
3903 test_disp((IUnknown*)window, &DIID_DispHTMLWindow2);
3904
3905 hres = IHTMLWindow2_get_document(window, &doc2);
3906 ok(hres == S_OK, "get_document failed: %08x\n", hres);
3907 ok(doc2 != NULL, "doc2 == NULL\n");
3908
3909 IHTMLDocument_Release(doc2);
3910
3911 hres = IHTMLWindow2_get_window(window, &window2);
3912 ok(hres == S_OK, "get_window failed: %08x\n", hres);
3913 ok(window2 != NULL, "window2 == NULL\n");
3914
3915 hres = IHTMLWindow2_get_self(window, &self);
3916 ok(hres == S_OK, "get_self failed: %08x\n", hres);
3917 ok(window2 != NULL, "self == NULL\n");
3918
3919 ok(self == window2, "self != window2\n");
3920
3921 IHTMLWindow2_Release(window2);
3922 IHTMLWindow2_Release(self);
3923
3924 disp = NULL;
3925 hres = IHTMLDocument2_get_Script(doc, &disp);
3926 ok(hres == S_OK, "get_Script failed: %08x\n", hres);
3927 ok(disp == (void*)window, "disp != window\n");
3928 IDispatch_Release(disp);
3929
3930 IHTMLWindow2_Release(window);
3931 }
3932
3933 static void test_defaults(IHTMLDocument2 *doc)
3934 {
3935 IHTMLStyleSheetsCollection *stylesheetcol;
3936 IHTMLCurrentStyle *cstyle;
3937 IHTMLBodyElement *body;
3938 IHTMLElement2 *elem2;
3939 IHTMLElement *elem;
3940 IHTMLStyle *style;
3941 LONG l;
3942 HRESULT hres;
3943 IHTMLElementCollection *collection;
3944
3945 hres = IHTMLDocument2_get_body(doc, &elem);
3946 ok(hres == S_OK, "get_body failed: %08x\n", hres);
3947
3948 hres = IHTMLDocument2_get_images(doc, NULL);
3949 ok(hres == E_INVALIDARG, "hres %08x\n", hres);
3950
3951 hres = IHTMLDocument2_get_images(doc, &collection);
3952 ok(hres == S_OK, "get_images failed: %08x\n", hres);
3953 if(hres == S_OK)
3954 {
3955 test_elem_collection((IUnknown*)collection, NULL, 0);
3956 IHTMLElementCollection_Release(collection);
3957 }
3958
3959 hres = IHTMLDocument2_get_applets(doc, NULL);
3960 ok(hres == E_INVALIDARG, "hres %08x\n", hres);
3961
3962 hres = IHTMLDocument2_get_applets(doc, &collection);
3963 ok(hres == S_OK, "get_applets failed: %08x\n", hres);
3964 if(hres == S_OK)
3965 {
3966 test_elem_collection((IUnknown*)collection, NULL, 0);
3967 IHTMLElementCollection_Release(collection);
3968 }
3969
3970 hres = IHTMLDocument2_get_links(doc, NULL);
3971 ok(hres == E_INVALIDARG, "hres %08x\n", hres);
3972
3973 hres = IHTMLDocument2_get_links(doc, &collection);
3974 ok(hres == S_OK, "get_links failed: %08x\n", hres);
3975 if(hres == S_OK)
3976 {
3977 test_elem_collection((IUnknown*)collection, NULL, 0);
3978 IHTMLElementCollection_Release(collection);
3979 }
3980
3981 hres = IHTMLDocument2_get_forms(doc, NULL);
3982 ok(hres == E_INVALIDARG, "hres %08x\n", hres);
3983
3984 hres = IHTMLDocument2_get_forms(doc, &collection);
3985 ok(hres == S_OK, "get_forms failed: %08x\n", hres);
3986 if(hres == S_OK)
3987 {
3988 test_elem_collection((IUnknown*)collection, NULL, 0);
3989 IHTMLElementCollection_Release(collection);
3990 }
3991
3992 hres = IHTMLDocument2_get_anchors(doc, NULL);
3993 ok(hres == E_INVALIDARG, "hres %08x\n", hres);
3994
3995 hres = IHTMLDocument2_get_anchors(doc, &collection);
3996 ok(hres == S_OK, "get_anchors failed: %08x\n", hres);
3997 if(hres == S_OK)
3998 {
3999 test_elem_collection((IUnknown*)collection, NULL, 0);
4000 IHTMLElementCollection_Release(collection);
4001 }
4002
4003 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLBodyElement, (void**)&body);
4004 ok(hres == S_OK, "Could not get IHTMBodyElement: %08x\n", hres);
4005 test_default_body(body);
4006 test_body_funs(body);
4007 IHTMLBodyElement_Release(body);
4008
4009 hres = IHTMLElement_get_style(elem, &style);
4010 ok(hres == S_OK, "get_style failed: %08x\n", hres);
4011
4012 test_default_style(style);
4013 test_window(doc);
4014 test_compatmode(doc);
4015 test_location(doc);
4016 test_navigator(doc);
4017
4018 elem2 = get_elem2_iface((IUnknown*)elem);
4019 hres = IHTMLElement2_get_currentStyle(elem2, &cstyle);
4020 ok(hres == S_OK, "get_currentStyle failed: %08x\n", hres);
4021 if(SUCCEEDED(hres)) {
4022 test_current_style(cstyle);
4023 IHTMLCurrentStyle_Release(cstyle);
4024 }
4025 IHTMLElement2_Release(elem2);
4026
4027 IHTMLElement_Release(elem);
4028
4029 test_set_csstext(style);
4030 IHTMLStyle_Release(style);
4031
4032 hres = IHTMLDocument2_get_styleSheets(doc, &stylesheetcol);
4033 ok(hres == S_OK, "get_styleSheets failed: %08x\n", hres);
4034
4035 l = 0xdeadbeef;
4036 hres = IHTMLStyleSheetsCollection_get_length(stylesheetcol, &l);
4037 ok(hres == S_OK, "get_length failed: %08x\n", hres);
4038 ok(l == 0, "length = %d\n", l);
4039
4040 IHTMLStyleSheetsCollection_Release(stylesheetcol);
4041
4042 test_default_selection(doc);
4043 test_doc_title(doc, "");
4044 }
4045
4046 static void test_tr_elem(IHTMLElement *elem)
4047 {
4048 IHTMLElementCollection *col;
4049 IHTMLTableRow *row;
4050 HRESULT hres;
4051
4052 static const elem_type_t cell_types[] = {ET_TD,ET_TD};
4053
4054 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLTableRow, (void**)&row);
4055 ok(hres == S_OK, "Could not get IHTMLTableRow iface: %08x\n", hres);
4056 if(FAILED(hres))
4057 return;
4058
4059 col = NULL;
4060 hres = IHTMLTableRow_get_cells(row, &col);
4061 ok(hres == S_OK, "get_cells failed: %08x\n", hres);
4062 ok(col != NULL, "get_cells returned NULL\n");
4063
4064 test_elem_collection((IUnknown*)col, cell_types, sizeof(cell_types)/sizeof(*cell_types));
4065 IHTMLElementCollection_Release(col);
4066
4067 IHTMLTable_Release(row);
4068 }
4069
4070 static void test_table_elem(IHTMLElement *elem)
4071 {
4072 IHTMLElementCollection *col;
4073 IHTMLTable *table;
4074 HRESULT hres;
4075
4076 static const elem_type_t row_types[] = {ET_TR,ET_TR};
4077
4078 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLTable, (void**)&table);
4079 ok(hres == S_OK, "Could not get IHTMLTable iface: %08x\n", hres);
4080 if(FAILED(hres))
4081 return;
4082
4083 col = NULL;
4084 hres = IHTMLTable_get_rows(table, &col);
4085 ok(hres == S_OK, "get_rows failed: %08x\n", hres);
4086 ok(col != NULL, "get_ros returned NULL\n");
4087
4088 test_elem_collection((IUnknown*)col, row_types, sizeof(row_types)/sizeof(*row_types));
4089 IHTMLElementCollection_Release(col);
4090
4091 IHTMLTable_Release(table);
4092 }
4093
4094 static void doc_write(IHTMLDocument2 *doc, const char *text)
4095 {
4096 SAFEARRAYBOUND dim;
4097 SAFEARRAY *sa;
4098 VARIANT *var;
4099 BSTR str;
4100 HRESULT hres;
4101
4102 dim.lLbound = 0;
4103 dim.cElements = 1;
4104 sa = SafeArrayCreate(VT_VARIANT, 1, &dim);
4105 SafeArrayAccessData(sa, (void**)&var);
4106 V_VT(var) = VT_BSTR;
4107 V_BSTR(var) = str = a2bstr(text);
4108 SafeArrayUnaccessData(sa);
4109
4110 hres = IHTMLDocument2_write(doc, sa);
4111 ok(hres == S_OK, "write failed: %08x\n", hres);
4112
4113 SysFreeString(str);
4114 SafeArrayDestroy(sa);
4115 }
4116
4117 static void test_iframe_elem(IHTMLElement *elem)
4118 {
4119 IHTMLElementCollection *col;
4120 IHTMLDocument2 *content_doc;
4121 IHTMLWindow2 *content_window;
4122 IHTMLFrameBase2 *base2;
4123 IDispatch *disp;
4124 VARIANT errv;
4125 BSTR str;
4126 HRESULT hres;
4127
4128 static const elem_type_t all_types[] = {
4129 ET_HTML,
4130 ET_HEAD,
4131 ET_TITLE,
4132 ET_BODY,
4133 ET_BR
4134 };
4135
4136 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLFrameBase2, (void**)&base2);
4137 ok(hres == S_OK, "Could not get IHTMFrameBase2 iface: %08x\n", hres);
4138 if (!base2) return;
4139
4140 content_window = NULL;
4141 hres = IHTMLFrameBase2_get_contentWindow(base2, &content_window);
4142 IHTMLFrameBase2_Release(base2);
4143 ok(hres == S_OK, "get_contentWindow failed: %08x\n", hres);
4144 ok(content_window != NULL, "contentWindow = NULL\n");
4145
4146 content_doc = NULL;
4147 hres = IHTMLWindow2_get_document(content_window, &content_doc);
4148 IHTMLWindow2_Release(content_window);
4149 ok(hres == S_OK, "get_document failed: %08x\n", hres);
4150 ok(content_doc != NULL, "content_doc = NULL\n");
4151
4152 str = a2bstr("text/html");
4153 V_VT(&errv) = VT_ERROR;
4154 disp = NULL;
4155 hres = IHTMLDocument2_open(content_doc, str, errv, errv, errv, &disp);
4156 SysFreeString(str);
4157 ok(hres == S_OK, "open failed: %08x\n", hres);
4158 ok(disp != NULL, "disp == NULL\n");
4159 ok(iface_cmp((IUnknown*)disp, (IUnknown*)content_window), "disp != content_window\n");
4160 IDispatch_Release(disp);
4161
4162 doc_write(content_doc, "<html><head><title>test</title></head><body><br /></body></html>");
4163
4164 hres = IHTMLDocument2_get_all(content_doc, &col);
4165 ok(hres == S_OK, "get_all failed: %08x\n", hres);
4166 test_elem_collection((IUnknown*)col, all_types, sizeof(all_types)/sizeof(all_types[0]));
4167 IHTMLElementCollection_Release(col);
4168
4169 hres = IHTMLDocument2_close(content_doc);
4170 ok(hres == S_OK, "close failed: %08x\n", hres);
4171
4172 IHTMLDocument2_Release(content_doc);
4173 }
4174
4175 static void test_stylesheet(IDispatch *disp)
4176 {
4177 IHTMLStyleSheetRulesCollection *col = NULL;
4178 IHTMLStyleSheet *stylesheet;
4179 HRESULT hres;
4180
4181 hres = IDispatch_QueryInterface(disp, &IID_IHTMLStyleSheet, (void**)&stylesheet);
4182 ok(hres == S_OK, "Could not get IHTMLStyleSheet: %08x\n", hres);
4183
4184 hres = IHTMLStyleSheet_get_rules(stylesheet, &col);
4185 ok(hres == S_OK, "get_rules failed: %08x\n", hres);
4186 ok(col != NULL, "col == NULL\n");
4187
4188 IHTMLStyleSheetRulesCollection_Release(col);
4189 IHTMLStyleSheet_Release(stylesheet);
4190 }
4191
4192 static void test_stylesheets(IHTMLDocument2 *doc)
4193 {
4194 IHTMLStyleSheetsCollection *col = NULL;
4195 VARIANT idx, res;
4196 LONG len = 0;
4197 HRESULT hres;
4198
4199 hres = IHTMLDocument2_get_styleSheets(doc, &col);
4200 ok(hres == S_OK, "get_styleSheets failed: %08x\n", hres);
4201 ok(col != NULL, "col == NULL\n");
4202
4203 hres = IHTMLStyleSheetsCollection_get_length(col, &len);
4204 ok(hres == S_OK, "get_length failed: %08x\n", hres);
4205 ok(len == 1, "len=%d\n", len);
4206
4207 VariantInit(&res);
4208 V_VT(&idx) = VT_I4;
4209 V_I4(&idx) = 0;
4210
4211 hres = IHTMLStyleSheetsCollection_item(col, &idx, &res);
4212 ok(hres == S_OK, "item failed: %08x\n", hres);
4213 ok(V_VT(&res) == VT_DISPATCH, "V_VT(res) = %d\n", V_VT(&res));
4214 ok(V_DISPATCH(&res) != NULL, "V_DISPATCH(&res) == NULL\n");
4215 test_stylesheet(V_DISPATCH(&res));
4216 VariantClear(&res);
4217
4218 V_VT(&res) = VT_I4;
4219 V_VT(&idx) = VT_I4;
4220 V_I4(&idx) = 1;
4221
4222 hres = IHTMLStyleSheetsCollection_item(col, &idx, &res);
4223 ok(hres == E_INVALIDARG, "item failed: %08x, expected E_INVALIDARG\n", hres);
4224 ok(V_VT(&res) == VT_EMPTY, "V_VT(res) = %d\n", V_VT(&res));
4225 ok(V_DISPATCH(&res) != NULL, "V_DISPATCH(&res) == NULL\n");
4226 VariantClear(&res);
4227
4228 IHTMLStyleSheetsCollection_Release(col);
4229 }
4230
4231 static void test_child_col_disp(IHTMLDOMChildrenCollection *col)
4232 {
4233 IDispatchEx *dispex;
4234 IHTMLDOMNode *node;
4235 DISPPARAMS dp = {NULL, NULL, 0, 0};
4236 VARIANT var;
4237 EXCEPINFO ei;
4238 LONG type;
4239 DISPID id;
4240 BSTR bstr;
4241 HRESULT hres;
4242
4243 static const WCHAR w0[] = {'0',0};
4244 static const WCHAR w100[] = {'1','0','0',0};
4245
4246 hres = IHTMLDOMChildrenCollection_QueryInterface(col, &IID_IDispatchEx, (void**)&dispex);
4247 ok(hres == S_OK, "Could not get IDispatchEx: %08x\n", hres);
4248
4249 bstr = SysAllocString(w0);
4250 hres = IDispatchEx_GetDispID(dispex, bstr, fdexNameCaseSensitive, &id);
4251 ok(hres == S_OK, "GetDispID failed: %08x\n", hres);
4252 SysFreeString(bstr);
4253
4254 VariantInit(&var);
4255 hres = IDispatchEx_InvokeEx(dispex, id, LOCALE_NEUTRAL, INVOKE_PROPERTYGET, &dp, &var, &ei, NULL);
4256 ok(hres == S_OK, "InvokeEx failed: %08x\n", hres);
4257 ok(V_VT(&var) == VT_DISPATCH, "V_VT(var)=%d\n", V_VT(&var));
4258 ok(V_DISPATCH(&var) != NULL, "V_DISPATCH(var) == NULL\n");
4259 node = get_node_iface((IUnknown*)V_DISPATCH(&var));
4260 type = get_node_type((IUnknown*)node);
4261 ok(type == 3, "type=%d\n", type);
4262 IHTMLDOMNode_Release(node);
4263 VariantClear(&var);
4264
4265 bstr = SysAllocString(w100);
4266 hres = IDispatchEx_GetDispID(dispex, bstr, fdexNameCaseSensitive, &id);
4267 ok(hres == DISP_E_UNKNOWNNAME, "GetDispID failed: %08x, expected DISP_E_UNKNOWNNAME\n", hres);
4268 SysFreeString(bstr);
4269
4270 IDispatchEx_Release(dispex);
4271 }
4272
4273
4274
4275 static void test_elems(IHTMLDocument2 *doc)
4276 {
4277 IHTMLElementCollection *col;
4278 IHTMLDOMChildrenCollection *child_col;
4279 IHTMLElement *elem, *elem2, *elem3;
4280 IHTMLDOMNode *node, *node2;
4281 IDispatch *disp;
4282 LONG type;
4283 HRESULT hres;
4284 IHTMLElementCollection *collection;
4285 IHTMLDocument3 *doc3;
4286 BSTR str;
4287
4288 static const elem_type_t all_types[] = {
4289 ET_HTML,
4290 ET_HEAD,
4291 ET_TITLE,
4292 ET_STYLE,
4293 ET_BODY,
4294 ET_COMMENT,
4295 ET_A,
4296 ET_INPUT,
4297 ET_SELECT,
4298 ET_OPTION,
4299 ET_OPTION,
4300 ET_TEXTAREA,
4301 ET_TABLE,
4302 ET_TBODY,
4303 ET_TR,
4304 ET_TR,
4305 ET_TD,
4306 ET_TD,
4307 ET_SCRIPT,
4308 ET_TEST,
4309 ET_IMG,
4310 ET_IFRAME
4311 };
4312
4313 static const elem_type_t item_types[] = {
4314 ET_A,
4315 ET_OPTION,
4316 ET_TEXTAREA
4317 };
4318
4319 hres = IHTMLDocument2_get_all(doc, &col);
4320 ok(hres == S_OK, "get_all failed: %08x\n", hres);
4321 test_elem_collection((IUnknown*)col, all_types, sizeof(all_types)/sizeof(all_types[0]));
4322 test_elem_col_item(col, "x", item_types, sizeof(item_types)/sizeof(item_types[0]));
4323 IHTMLElementCollection_Release(col);
4324
4325 hres = IHTMLDocument2_get_images(doc, &collection);
4326 ok(hres == S_OK, "get_images failed: %08x\n", hres);
4327 if(hres == S_OK)
4328 {
4329 static const elem_type_t images_types[] = {ET_IMG};
4330 test_elem_collection((IUnknown*)collection, images_types, 1);
4331
4332 IHTMLElementCollection_Release(collection);
4333 }
4334
4335 hres = IHTMLDocument2_get_links(doc, &collection);
4336 ok(hres == S_OK, "get_links failed: %08x\n", hres);
4337 if(hres == S_OK)
4338 {
4339 static const elem_type_t images_types[] = {ET_A};
4340 test_elem_collection((IUnknown*)collection, images_types, 1);
4341
4342 IHTMLElementCollection_Release(collection);
4343 }
4344
4345 hres = IHTMLDocument2_get_anchors(doc, &collection);
4346 ok(hres == S_OK, "get_anchors failed: %08x\n", hres);
4347 if(hres == S_OK)
4348 {
4349 static const elem_type_t anchor_types[] = {ET_A};
4350 test_elem_collection((IUnknown*)collection, anchor_types, 1);
4351
4352 IHTMLElementCollection_Release(collection);
4353 }
4354
4355 elem = get_doc_elem(doc);
4356 ok(hres == S_OK, "get_documentElement failed: %08x\n", hres);
4357 hres = IHTMLElement_get_all(elem, &disp);
4358 IHTMLElement_Release(elem);
4359 ok(hres == S_OK, "get_all failed: %08x\n", hres);
4360
4361 hres = IDispatch_QueryInterface(disp, &IID_IHTMLElementCollection, (void**)&col);
4362 IDispatch_Release(disp);
4363 ok(hres == S_OK, "Could not get IHTMLElementCollection: %08x\n", hres);
4364 test_elem_collection((IUnknown*)col, all_types+1, sizeof(all_types)/sizeof(all_types[0])-1);
4365 IHTMLElementCollection_Release(col);
4366
4367 get_elem_by_id(doc, "xxx", FALSE);
4368 elem = get_doc_elem_by_id(doc, "xxx");
4369 ok(!elem, "elem != NULL\n");
4370
4371 elem = get_doc_elem_by_id(doc, "s");
4372 ok(elem != NULL, "elem == NULL\n");
4373 if(elem) {
4374 test_elem_type((IUnknown*)elem, ET_SELECT);
4375 test_elem_attr(elem, "xxx", NULL);
4376 test_elem_attr(elem, "id", "s");
4377 test_elem_class((IUnknown*)elem, NULL);
4378 test_elem_set_class((IUnknown*)elem, "cl");
4379 test_elem_set_class((IUnknown*)elem, NULL);
4380 test_elem_tabindex((IUnknown*)elem, 0);
4381 test_elem_set_tabindex((IUnknown*)elem, 1);
4382
4383 node = test_node_get_parent((IUnknown*)elem);
4384 ok(node != NULL, "node == NULL\n");
4385 test_node_name((IUnknown*)node, "BODY");
4386 node2 = test_node_get_parent((IUnknown*)node);
4387 IHTMLDOMNode_Release(node);
4388 ok(node2 != NULL, "node == NULL\n");
4389 test_node_name((IUnknown*)node2, "HTML");
4390 node = test_node_get_parent((IUnknown*)node2);
4391 IHTMLDOMNode_Release(node2);
4392 ok(node != NULL, "node == NULL\n");
4393 if (node)
4394 {
4395 test_node_name((IUnknown*)node, "#document");
4396 type = get_node_type((IUnknown*)node);
4397 ok(type == 9, "type=%d, expected 9\n", type);
4398 node2 = test_node_get_parent((IUnknown*)node);
4399 IHTMLDOMNode_Release(node);
4400 ok(node2 == NULL, "node != NULL\n");
4401 }
4402
4403 elem2 = test_elem_get_parent((IUnknown*)elem);
4404 ok(elem2 != NULL, "elem2 == NULL\n");
4405 test_node_name((IUnknown*)elem2, "BODY");
4406 elem3 = test_elem_get_parent((IUnknown*)elem2);
4407 IHTMLElement_Release(elem2);
4408 ok(elem3 != NULL, "elem3 == NULL\n");
4409 test_node_name((IUnknown*)elem3, "HTML");
4410 elem2 = test_elem_get_parent((IUnknown*)elem3);
4411 IHTMLElement_Release(elem3);
4412 ok(elem2 == NULL, "elem2 != NULL\n");
4413
4414 test_elem_getelembytag((IUnknown*)elem, ET_OPTION, 2);
4415 test_elem_getelembytag((IUnknown*)elem, ET_SELECT, 0);
4416 test_elem_getelembytag((IUnknown*)elem, ET_HTML, 0);
4417
4418 test_elem_innertext(elem, "opt1opt2");
4419
4420 IHTMLElement_Release(elem);
4421 }
4422
4423 elem = get_elem_by_id(doc, "s", TRUE);
4424 if(elem) {
4425 IHTMLSelectElement *select;
4426
4427 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLSelectElement, (void**)&select);
4428 ok(hres == S_OK, "Could not get IHTMLSelectElement interface: %08x\n", hres);
4429
4430 test_select_elem(select);
4431
4432 test_elem_title((IUnknown*)select, NULL);
4433 test_elem_set_title((IUnknown*)select, "Title");
4434 test_elem_title((IUnknown*)select, "Title");
4435 test_elem_offset((IUnknown*)select);
4436
4437 node = get_first_child((IUnknown*)select);
4438 ok(node != NULL, "node == NULL\n");
4439 if(node) {
4440 test_elem_type((IUnknown*)node, ET_OPTION);
4441 IHTMLDOMNode_Release(node);
4442 }
4443
4444 type = get_node_type((IUnknown*)select);
4445 ok(type == 1, "type=%d\n", type);
4446
4447 IHTMLSelectElement_Release(select);
4448
4449 hres = IHTMLElement_get_document(elem, &disp);
4450 ok(hres == S_OK, "get_document failed: %08x\n", hres);
4451 ok(iface_cmp((IUnknown*)disp, (IUnknown*)doc), "disp != doc\n");
4452
4453 IHTMLElement_Release(elem);
4454 }
4455
4456 elem = get_elem_by_id(doc, "sc", TRUE);
4457 if(elem) {
4458 IHTMLScriptElement *script;
4459 BSTR type;
4460
4461 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLScriptElement, (void**)&script);
4462 ok(hres == S_OK, "Could not get IHTMLScriptElement interface: %08x\n", hres);
4463
4464 if(hres == S_OK)
4465 {
4466 VARIANT_BOOL vb;
4467
4468 hres = IHTMLScriptElement_get_type(script, &type);
4469 ok(hres == S_OK, "get_type failed: %08x\n", hres);
4470 ok(!strcmp_wa(type, "text/javascript"), "Unexpected type %s\n", wine_dbgstr_w(type));
4471 SysFreeString(type);
4472
4473 /* test defer */
4474 hres = IHTMLScriptElement_put_defer(script, VARIANT_TRUE);
4475 ok(hres == S_OK, "put_defer failed: %08x\n", hres);
4476
4477 hres = IHTMLScriptElement_get_defer(script, &vb);
4478 ok(hres == S_OK, "get_defer failed: %08x\n", hres);
4479 ok(vb == VARIANT_TRUE, "get_defer result is %08x\n", hres);
4480
4481 hres = IHTMLScriptElement_put_defer(script, VARIANT_FALSE);
4482 ok(hres == S_OK, "put_defer failed: %08x\n", hres);
4483 }
4484
4485 IHTMLScriptElement_Release(script);
4486 }
4487
4488 elem = get_elem_by_id(doc, "in", TRUE);
4489 if(elem) {
4490 IHTMLInputElement *input;
4491
4492 hres = IHTMLElement_QueryInterface(elem, &IID_IHTMLInputElement, (void**)&input);
4493 ok(hres == S_OK, "Could not get IHTMLInputElement: %08x\n", hres);
4494
4495 test_elem_id((IUnknown*)elem, "in");
4496 test_elem_put_id((IUnknown*)elem, "newin");
4497 test_input_get_disabled(input, VARIANT_FALSE);
4498 test_input_set_disabled(input, VARIANT_TRUE);
4499 test_input_set_disabled(input, VARIANT_FALSE);
4500 test_elem3_set_disabled((IUnknown*)input, VARIANT_TRUE);
4501 test_input_get_disabled(input, VARIANT_TRUE);
4502 test_elem3_set_disabled((IUnknown*)input, VARIANT_FALSE);
4503 test_input_get_disabled(input, VARIANT_FALSE);
4504 test_elem_client_size((IUnknown*)elem);
4505
4506 test_node_get_value_str((IUnknown*)elem, NULL);
4507 test_node_put_value_str((IUnknown*)elem, "test");
4508 test_node_get_value_str((IUnknown*)elem, NULL);
4509 test_input_value((IUnknown*)elem, NULL);
4510 test_input_put_value((IUnknown*)elem, "test");
4511 test_input_value((IUnknown*)elem, NULL);
4512 test_elem_class((IUnknown*)elem, "testclass");
4513 test_elem_tabindex((IUnknown*)elem, 2);
4514 test_elem_set_tabindex((IUnknown*)elem, 3);
4515 test_elem_title((IUnknown*)elem, "test title");
4516
4517 test_input_get_defaultchecked(input, VARIANT_FALSE);
4518 test_input_set_defaultchecked(input, VARIANT_TRUE);
4519 test_input_set_defaultchecked(input, VARIANT_FALSE);
4520
4521 test_input_get_checked(input, VARIANT_FALSE);
4522 test_input_set_checked(input, VARIANT_TRUE);
4523 test_input_set_checked(input, VARIANT_FALSE);
4524
4525 IHTMLInputElement_Release(input);
4526 IHTMLElement_Release(elem);
4527 }
4528
4529 elem = get_elem_by_id(doc, "imgid", TRUE);
4530 if(elem) {
4531 test_img_src((IUnknown*)elem, "");
4532 test_img_set_src((IUnknown*)elem, "about:blank");
4533 test_img_alt((IUnknown*)elem, NULL);
4534 test_img_set_alt((IUnknown*)elem, "alt test");
4535 IHTMLElement_Release(elem);
4536 }
4537
4538 elem = get_doc_elem_by_id(doc, "tbl");
4539 ok(elem != NULL, "elem == NULL\n");
4540 if(elem) {
4541 test_table_elem(elem);
4542 IHTMLElement_Release(elem);
4543 }
4544
4545 elem = get_doc_elem_by_id(doc, "row2");
4546 ok(elem != NULL, "elem == NULL\n");
4547 if(elem) {
4548 test_tr_elem(elem);
4549 IHTMLElement_Release(elem);
4550 }
4551
4552 elem = get_doc_elem_by_id(doc, "ifr");
4553 ok(elem != NULL, "elem == NULL\n");
4554 if(elem) {
4555 test_iframe_elem(elem);
4556 IHTMLElement_Release(elem);
4557 }
4558
4559 hres = IHTMLDocument2_get_body(doc, &elem);
4560 ok(hres == S_OK, "get_body failed: %08x\n", hres);
4561
4562 node = get_first_child((IUnknown*)elem);
4563 ok(node != NULL, "node == NULL\n");
4564 if(node) {
4565 test_ifaces((IUnknown*)node, text_iids);
4566 test_disp((IUnknown*)node, &DIID_DispHTMLDOMTextNode);
4567
4568 node2 = get_first_child((IUnknown*)node);
4569 ok(!node2, "node2 != NULL\n");
4570
4571 type = get_node_type((IUnknown*)node);
4572 ok(type == 3, "type=%d\n", type);
4573
4574 test_node_get_value_str((IUnknown*)node, "text test");
4575 test_node_put_value_str((IUnknown*)elem, "test text");
4576 test_node_get_value_str((IUnknown*)node, "text test");
4577
4578 IHTMLDOMNode_Release(node);
4579 }
4580
4581 child_col = get_child_nodes((IUnknown*)elem);
4582 ok(child_col != NULL, "child_coll == NULL\n");
4583 if(child_col) {
4584 LONG length = 0;
4585
4586 test_disp((IUnknown*)child_col, &DIID_DispDOMChildrenCollection);
4587
4588 hres = IHTMLDOMChildrenCollection_get_length(child_col, &length);
4589 ok(hres == S_OK, "get_length failed: %08x\n", hres);
4590 ok(length, "length=0\n");
4591
4592 node = get_child_item(child_col, 0);
4593 ok(node != NULL, "node == NULL\n");
4594 if(node) {
4595 type = get_node_type((IUnknown*)node);
4596 ok(type == 3, "type=%d\n", type);
4597 IHTMLDOMNode_Release(node);
4598 }
4599
4600 node = get_child_item(child_col, 1);
4601 ok(node != NULL, "node == NULL\n");
4602 if(node) {
4603 type = get_node_type((IUnknown*)node);
4604 ok(type == 8, "type=%d\n", type);
4605
4606 test_elem_id((IUnknown*)node, NULL);
4607 IHTMLDOMNode_Release(node);
4608 }
4609
4610 hres = IHTMLDOMChildrenCollection_item(child_col, length - 1, NULL);
4611 ok(hres == E_POINTER, "item failed: %08x, expected E_POINTER\n", hres);
4612
4613 hres = IHTMLDOMChildrenCollection_item(child_col, length, NULL);
4614 ok(hres == E_POINTER, "item failed: %08x, expected E_POINTER\n", hres);
4615
4616 hres = IHTMLDOMChildrenCollection_item(child_col, 6000, &disp);
4617 ok(hres == E_INVALIDARG, "item failed: %08x, expected E_INVALIDARG\n", hres);
4618
4619 hres = IHTMLDOMChildrenCollection_item(child_col, length, &disp);
4620 ok(hres == E_INVALIDARG, "item failed: %08x, expected E_INVALIDARG\n", hres);
4621
4622 test_child_col_disp(child_col);
4623
4624 IHTMLDOMChildrenCollection_Release(child_col);
4625 }
4626
4627 test_elem3_get_disabled((IUnknown*)elem, VARIANT_FALSE);
4628 test_elem3_set_disabled((IUnknown*)elem, VARIANT_TRUE);
4629 test_elem3_set_disabled((IUnknown*)elem, VARIANT_FALSE);
4630
4631 IHTMLElement_Release(elem);
4632
4633 test_stylesheets(doc);
4634 test_create_option_elem(doc);
4635
4636 elem = get_doc_elem_by_id(doc, "tbl");
4637 ok(elem != NULL, "elem = NULL\n");
4638 test_elem_set_innertext(elem, "inner text");
4639 IHTMLElement_Release(elem);
4640
4641 test_doc_title(doc, "test");
4642 test_doc_set_title(doc, "test title");
4643 test_doc_title(doc, "test title");
4644
4645 disp = NULL;
4646 hres = IHTMLDocument2_get_Script(doc, &disp);
4647 ok(hres == S_OK, "get_Script failed: %08x\n", hres);
4648 if(hres == S_OK)
4649 {
4650 IDispatchEx *dispex;
4651 hres = IDispatch_QueryInterface(disp, &IID_IDispatchEx, (void**)&dispex);
4652 ok(hres == S_OK, "IDispatch_QueryInterface failed: %08x\n", hres);
4653 if(hres == S_OK)
4654 {
4655 DISPID pid = -1;
4656 BSTR str = a2bstr("Testing");
4657 hres = IDispatchEx_GetDispID(dispex, str, 1, &pid);
4658 todo_wine ok(hres == S_OK, "GetDispID failed: %08x\n", hres);
4659 todo_wine ok(pid != -1, "pid == -1\n");
4660 SysFreeString(str);
4661 IDispatchEx_Release(dispex);
4662 }
4663 }
4664 IDispatch_Release(disp);
4665
4666 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument3, (void**)&doc3);
4667 ok(hres == S_OK, "Could not get IHTMLDocument3 iface: %08x\n", hres);
4668
4669 str = a2bstr("img");
4670 hres = IHTMLDocument3_getElementsByTagName(doc3, str, &col);
4671 ok(hres == S_OK, "getElementsByTagName(%s) failed: %08x\n", wine_dbgstr_w(str), hres);
4672 SysFreeString(str);
4673 if(hres == S_OK)
4674 {
4675 static const elem_type_t img_types[] = { ET_IMG };
4676
4677 test_elem_collection((IUnknown*)col, img_types, sizeof(img_types)/sizeof(img_types[0]));
4678 IHTMLElementCollection_Release(col);
4679 }
4680
4681 elem = get_doc_elem_by_id(doc, "y");
4682 test_elem_set_innerhtml((IUnknown*)elem, "inner html");
4683 test_elem_innerhtml((IUnknown*)elem, "inner html");
4684 test_elem_set_innerhtml((IUnknown*)elem, "");
4685 test_elem_innerhtml((IUnknown*)elem, NULL);
4686 IHTMLElement_Release(elem);
4687
4688 IHTMLDocument3_Release(doc3);
4689 }
4690
4691 static void test_create_elems(IHTMLDocument2 *doc)
4692 {
4693 IHTMLElement *elem, *body, *elem2;
4694 IHTMLDOMNode *node, *node2, *node3, *comment;
4695 IHTMLDocument5 *doc5;
4696 IDispatch *disp;
4697 VARIANT var;
4698 LONG type;
4699 HRESULT hres;
4700 BSTR str;
4701
4702 static const elem_type_t types1[] = { ET_TESTG };
4703
4704 elem = test_create_elem(doc, "TEST");
4705 test_elem_tag((IUnknown*)elem, "TEST");
4706 type = get_node_type((IUnknown*)elem);
4707 ok(type == 1, "type=%d\n", type);
4708 test_ifaces((IUnknown*)elem, elem_iids);
4709 test_disp((IUnknown*)elem, &DIID_DispHTMLGenericElement);
4710
4711 hres = IHTMLDocument2_get_body(doc, &body);
4712 ok(hres == S_OK, "get_body failed: %08x\n", hres);
4713 test_node_has_child((IUnknown*)body, VARIANT_FALSE);
4714
4715 node = test_node_append_child((IUnknown*)body, (IUnknown*)elem);
4716 test_node_has_child((IUnknown*)body, VARIANT_TRUE);
4717 elem2 = get_elem_iface((IUnknown*)node);
4718 IHTMLElement_Release(elem2);
4719
4720 hres = IHTMLElement_get_all(body, &disp);
4721 ok(hres == S_OK, "get_all failed: %08x\n", hres);
4722 test_elem_collection((IUnknown*)disp, types1, sizeof(types1)/sizeof(types1[0]));
4723 IDispatch_Release(disp);
4724
4725 test_node_remove_child((IUnknown*)body, node);
4726
4727 hres = IHTMLElement_get_all(body, &disp);
4728 ok(hres == S_OK, "get_all failed: %08x\n", hres);
4729 test_elem_collection((IUnknown*)disp, NULL, 0);
4730 IDispatch_Release(disp);
4731 test_node_has_child((IUnknown*)body, VARIANT_FALSE);
4732
4733 IHTMLElement_Release(elem);
4734 IHTMLDOMNode_Release(node);
4735
4736 node = test_create_text(doc, "test");
4737 test_ifaces((IUnknown*)node, text_iids);
4738 test_disp((IUnknown*)node, &DIID_DispHTMLDOMTextNode);
4739
4740 V_VT(&var) = VT_NULL;
4741 node2 = test_node_insertbefore((IUnknown*)body, node, &var);
4742 IHTMLDOMNode_Release(node);
4743
4744 node = test_create_text(doc, "insert ");
4745
4746 V_VT(&var) = VT_DISPATCH;
4747 V_DISPATCH(&var) = (IDispatch*)node2;
4748 node3 = test_node_insertbefore((IUnknown*)body, node, &var);
4749 IHTMLDOMNode_Release(node);
4750 IHTMLDOMNode_Release(node2);
4751 IHTMLDOMNode_Release(node3);
4752
4753 test_elem_innertext(body, "insert test");
4754 test_elem_innerhtml((IUnknown*)body, "insert test");
4755
4756 hres = IHTMLDocument2_QueryInterface(doc, &IID_IHTMLDocument5, (void**)&doc5);
4757 if(hres == S_OK)
4758 {
4759 str = a2bstr("testing");
4760 hres = IHTMLDocument5_createComment(doc5, str, &comment);
4761 SysFreeString(str);
4762 ok(hres == S_OK, "createComment failed: %08x\n", hres);
4763 if(hres == S_OK)
4764 {
4765 type = get_node_type((IUnknown*)comment);
4766 ok(type == 8, "type=%d, expected 8\n", type);
4767
4768 test_node_get_value_str((IUnknown*)comment, "testing");
4769
4770 IHTMLDOMNode_Release(comment);
4771 }
4772
4773 IHTMLDocument5_Release(doc5);
4774 }
4775
4776 IHTMLElement_Release(body);
4777 }
4778
4779 static void test_exec(IUnknown *unk, const GUID *grpid, DWORD cmdid, VARIANT *in, VARIANT *out)
4780 {
4781 IOleCommandTarget *cmdtrg;
4782 HRESULT hres;
4783
4784 hres = IHTMLTxtRange_QueryInterface(unk, &IID_IOleCommandTarget, (void**)&cmdtrg);
4785 ok(hres == S_OK, "Could not get IOleCommandTarget interface: %08x\n", hres);
4786
4787 hres = IOleCommandTarget_Exec(cmdtrg, grpid, cmdid, 0, in, out);
4788 ok(hres == S_OK, "Exec failed: %08x\n", hres);
4789
4790 IOleCommandTarget_Release(cmdtrg);
4791 }
4792
4793 static void test_indent(IHTMLDocument2 *doc)
4794 {
4795 IHTMLElementCollection *col;
4796 IHTMLTxtRange *range;
4797 HRESULT hres;
4798
4799 static const elem_type_t all_types[] = {
4800 ET_HTML,
4801 ET_HEAD,
4802 ET_TITLE,
4803 ET_BODY,
4804 ET_BR,
4805 ET_A,
4806 };
4807
4808 static const elem_type_t indent_types[] = {
4809 ET_HTML,
4810 ET_HEAD,
4811 ET_TITLE,
4812 ET_BODY,
4813 ET_BLOCKQUOTE,
4814 ET_P,
4815 ET_BR,
4816 ET_A,
4817 };
4818
4819 hres = IHTMLDocument2_get_all(doc, &col);
4820 ok(hres == S_OK, "get_all failed: %08x\n", hres);
4821 test_elem_collection((IUnknown*)col, all_types, sizeof(all_types)/sizeof(all_types[0]));
4822 IHTMLElementCollection_Release(col);
4823
4824 range = test_create_body_range(doc);
4825 test_exec((IUnknown*)range, &CGID_MSHTML, IDM_INDENT, NULL, NULL);
4826 IHTMLTxtRange_Release(range);
4827
4828 hres = IHTMLDocument2_get_all(doc, &col);
4829 ok(hres == S_OK, "get_all failed: %08x\n", hres);
4830 test_elem_collection((IUnknown*)col, indent_types, sizeof(indent_types)/sizeof(indent_types[0]));
4831 IHTMLElementCollection_Release(col);
4832 }
4833
4834 static void test_cond_comment(IHTMLDocument2 *doc)
4835 {
4836 IHTMLElementCollection *col;
4837 HRESULT hres;
4838
4839 static const elem_type_t all_types[] = {
4840 ET_HTML,
4841 ET_HEAD,
4842 ET_TITLE,
4843 ET_BODY,
4844 ET_BR
4845 };
4846
4847 hres = IHTMLDocument2_get_all(doc, &col);
4848 ok(hres == S_OK, "get_all failed: %08x\n", hres);
4849 test_elem_collection((IUnknown*)col, all_types, sizeof(all_types)/sizeof(all_types[0]));
4850 IHTMLElementCollection_Release(col);
4851 }
4852
4853 static IHTMLDocument2 *notif_doc;
4854 static BOOL doc_complete;
4855
4856 static HRESULT WINAPI PropertyNotifySink_QueryInterface(IPropertyNotifySink *iface,
4857 REFIID riid, void**ppv)
4858 {
4859 if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
4860 *ppv = iface;
4861 return S_OK;
4862 }
4863
4864 ok(0, "unexpected call\n");
4865 return E_NOINTERFACE;
4866 }
4867
4868 static ULONG WINAPI PropertyNotifySink_AddRef(IPropertyNotifySink *iface)
4869 {
4870 return 2;
4871 }
4872
4873 static ULONG WINAPI PropertyNotifySink_Release(IPropertyNotifySink *iface)
4874 {
4875 return 1;
4876 }
4877
4878 static HRESULT WINAPI PropertyNotifySink_OnChanged(IPropertyNotifySink *iface, DISPID dispID)
4879 {
4880 if(dispID == DISPID_READYSTATE){
4881 BSTR state;
4882 HRESULT hres;
4883
4884 hres = IHTMLDocument2_get_readyState(notif_doc, &state);
4885 ok(hres == S_OK, "get_readyState failed: %08x\n", hres);
4886
4887 if(!strcmp_wa(state, "complete"))
4888 doc_complete = TRUE;
4889
4890 SysFreeString(state);
4891 }
4892
4893 return S_OK;
4894 }
4895
4896 static HRESULT WINAPI PropertyNotifySink_OnRequestEdit(IPropertyNotifySink *iface, DISPID dispID)
4897 {
4898 ok(0, "unexpected call\n");
4899 return E_NOTIMPL;
4900 }
4901
4902 static IPropertyNotifySinkVtbl PropertyNotifySinkVtbl = {
4903 PropertyNotifySink_QueryInterface,
4904 PropertyNotifySink_AddRef,
4905 PropertyNotifySink_Release,
4906 PropertyNotifySink_OnChanged,
4907 PropertyNotifySink_OnRequestEdit
4908 };
4909
4910 static IPropertyNotifySink PropertyNotifySink = { &PropertyNotifySinkVtbl };
4911
4912 static IHTMLDocument2 *create_doc_with_string(const char *str)
4913 {
4914 IPersistStreamInit *init;
4915 IStream *stream;
4916 IHTMLDocument2 *doc;
4917 HGLOBAL mem;
4918 SIZE_T len;
4919
4920 notif_doc = doc = create_document();
4921 if(!doc)
4922 return NULL;
4923
4924 doc_complete = FALSE;
4925 len = strlen(str);
4926 mem = GlobalAlloc(0, len);
4927 memcpy(mem, str, len);
4928 CreateStreamOnHGlobal(mem, TRUE, &stream);
4929
4930 IHTMLDocument2_QueryInterface(doc, &IID_IPersistStreamInit, (void**)&init);
4931
4932 IPersistStreamInit_Load(init, stream);
4933 IPersistStreamInit_Release(init);
4934 IStream_Release(stream);
4935
4936 return doc;
4937 }
4938
4939 static void do_advise(IUnknown *unk, REFIID riid, IUnknown *unk_advise)
4940 {
4941 IConnectionPointContainer *container;
4942 IConnectionPoint *cp;
4943 DWORD cookie;
4944 HRESULT hres;
4945
4946 hres = IUnknown_QueryInterface(unk, &IID_IConnectionPointContainer, (void**)&container);
4947 ok(hres == S_OK, "QueryInterface(IID_IConnectionPointContainer) failed: %08x\n", hres);
4948
4949 hres = IConnectionPointContainer_FindConnectionPoint(container, riid, &cp);
4950 IConnectionPointContainer_Release(container);
4951 ok(hres == S_OK, "FindConnectionPoint failed: %08x\n", hres);
4952
4953 hres = IConnectionPoint_Advise(cp, unk_advise, &cookie);
4954 IConnectionPoint_Release(cp);
4955 ok(hres == S_OK, "Advise failed: %08x\n", hres);
4956 }
4957
4958 typedef void (*domtest_t)(IHTMLDocument2*);
4959
4960 static void run_domtest(const char *str, domtest_t test)
4961 {
4962 IHTMLDocument2 *doc;
4963 IHTMLElement *body = NULL;
4964 ULONG ref;
4965 MSG msg;
4966 HRESULT hres;
4967
4968 doc = create_doc_with_string(str);
4969 if(!doc)
4970 return;
4971
4972 do_advise((IUnknown*)doc, &IID_IPropertyNotifySink, (IUnknown*)&PropertyNotifySink);
4973
4974 while(!doc_complete && GetMessage(&msg, NULL, 0, 0)) {
4975 TranslateMessage(&msg);
4976 DispatchMessage(&msg);
4977 }
4978
4979 hres = IHTMLDocument2_get_body(doc, &body);
4980 ok(hres == S_OK, "get_body failed: %08x\n", hres);
4981
4982 if(body) {
4983 IHTMLElement_Release(body);
4984 test(doc);
4985 }else {
4986 skip("Could not get document body. Assuming no Gecko installed.\n");
4987 }
4988
4989 ref = IHTMLDocument2_Release(doc);
4990 ok(!ref ||
4991 ref == 1, /* Vista */
4992 "ref = %d\n", ref);
4993 }
4994
4995 static void gecko_installer_workaround(BOOL disable)
4996 {
4997 HKEY hkey;
4998 DWORD res;
4999
5000 static BOOL has_url = FALSE;
5001 static char url[2048];
5002
5003 if(!disable && !has_url)
5004 return;
5005
5006 res = RegOpenKey(HKEY_CURRENT_USER, "Software\\Wine\\MSHTML", &hkey);
5007 if(res != ERROR_SUCCESS)
5008 return;
5009
5010 if(disable) {
5011 DWORD type, size = sizeof(url);
5012
5013 res = RegQueryValueEx(hkey, "GeckoUrl", NULL, &type, (PVOID)url, &size);
5014 if(res == ERROR_SUCCESS && type == REG_SZ)
5015 has_url = TRUE;
5016
5017 RegDeleteValue(hkey, "GeckoUrl");
5018 }else {
5019 RegSetValueEx(hkey, "GeckoUrl", 0, REG_SZ, (PVOID)url, lstrlenA(url)+1);
5020 }
5021
5022 RegCloseKey(hkey);
5023 }
5024
5025 /* Check if Internet Explorer is configured to run in "Enhanced Security Configuration" (aka hardened mode) */
5026 /* Note: this code is duplicated in dlls/mshtml/tests/dom.c, dlls/mshtml/tests/script.c and dlls/urlmon/tests/sec_mgr.c */
5027 static BOOL is_ie_hardened(void)
5028 {
5029 HKEY zone_map;
5030 DWORD ie_harden, type, size;
5031
5032 ie_harden = 0;
5033 if(RegOpenKeyEx(HKEY_CURRENT_USER, "Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap",
5034 0, KEY_QUERY_VALUE, &zone_map) == ERROR_SUCCESS) {
5035 size = sizeof(DWORD);
5036 if (RegQueryValueEx(zone_map, "IEHarden", NULL, &type, (LPBYTE) &ie_harden, &size) != ERROR_SUCCESS ||
5037 type != REG_DWORD) {
5038 ie_harden = 0;
5039 }
5040 RegCloseKey(zone_map);
5041 }
5042
5043 return ie_harden != 0;
5044 }
5045
5046 START_TEST(dom)
5047 {
5048 gecko_installer_workaround(TRUE);
5049 CoInitialize(NULL);
5050
5051 run_domtest(doc_str1, test_doc_elem);
5052 run_domtest(range_test_str, test_txtrange);
5053 run_domtest(range_test2_str, test_txtrange2);
5054 if (winetest_interactive || ! is_ie_hardened()) {
5055 run_domtest(elem_test_str, test_elems);
5056 }else {
5057 skip("IE running in Enhanced Security Configuration\n");
5058 }
5059 run_domtest(doc_blank, test_create_elems);
5060 run_domtest(doc_blank, test_defaults);
5061 run_domtest(indent_test_str, test_indent);
5062 run_domtest(cond_comment_str, test_cond_comment);
5063
5064 CoUninitialize();
5065 gecko_installer_workaround(FALSE);
5066 }
Maarten's multimedia branch