mshtml: Implement IHTMLElement get_document.
[wine] / dlls / mshtml / htmlelem.c
1 /*
2  * Copyright 2006 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
20 #include <stdarg.h>
21
22 #define COBJMACROS
23
24 #include "windef.h"
25 #include "winbase.h"
26 #include "winuser.h"
27 #include "winreg.h"
28 #include "ole2.h"
29 #include "shlwapi.h"
30
31 #include "wine/debug.h"
32 #include "wine/unicode.h"
33
34 #include "mshtml_private.h"
35 #include "htmlevent.h"
36
37 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
38
39 #define HTMLELEM_THIS(iface) DEFINE_THIS(HTMLElement, HTMLElement, iface)
40
41 #define HTMLELEM_NODE_THIS(iface) DEFINE_THIS2(HTMLElement, node, iface)
42
43 static HRESULT WINAPI HTMLElement_QueryInterface(IHTMLElement *iface,
44                                                  REFIID riid, void **ppv)
45 {
46     HTMLElement *This = HTMLELEM_THIS(iface);
47
48     return IHTMLDOMNode_QueryInterface(HTMLDOMNODE(&This->node), riid, ppv);
49 }
50
51 static ULONG WINAPI HTMLElement_AddRef(IHTMLElement *iface)
52 {
53     HTMLElement *This = HTMLELEM_THIS(iface);
54
55     return IHTMLDOMNode_AddRef(HTMLDOMNODE(&This->node));
56 }
57
58 static ULONG WINAPI HTMLElement_Release(IHTMLElement *iface)
59 {
60     HTMLElement *This = HTMLELEM_THIS(iface);
61
62     return IHTMLDOMNode_Release(HTMLDOMNODE(&This->node));
63 }
64
65 static HRESULT WINAPI HTMLElement_GetTypeInfoCount(IHTMLElement *iface, UINT *pctinfo)
66 {
67     HTMLElement *This = HTMLELEM_THIS(iface);
68     return IDispatchEx_GetTypeInfoCount(DISPATCHEX(&This->node.dispex), pctinfo);
69 }
70
71 static HRESULT WINAPI HTMLElement_GetTypeInfo(IHTMLElement *iface, UINT iTInfo,
72                                               LCID lcid, ITypeInfo **ppTInfo)
73 {
74     HTMLElement *This = HTMLELEM_THIS(iface);
75     return IDispatchEx_GetTypeInfo(DISPATCHEX(&This->node.dispex), iTInfo, lcid, ppTInfo);
76 }
77
78 static HRESULT WINAPI HTMLElement_GetIDsOfNames(IHTMLElement *iface, REFIID riid,
79                                                 LPOLESTR *rgszNames, UINT cNames,
80                                                 LCID lcid, DISPID *rgDispId)
81 {
82     HTMLElement *This = HTMLELEM_THIS(iface);
83     return IDispatchEx_GetIDsOfNames(DISPATCHEX(&This->node.dispex), riid, rgszNames, cNames, lcid, rgDispId);
84 }
85
86 static HRESULT WINAPI HTMLElement_Invoke(IHTMLElement *iface, DISPID dispIdMember,
87                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
88                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
89 {
90     HTMLElement *This = HTMLELEM_THIS(iface);
91     return IDispatchEx_Invoke(DISPATCHEX(&This->node.dispex), dispIdMember, riid, lcid,
92             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
93 }
94
95 static HRESULT WINAPI HTMLElement_setAttribute(IHTMLElement *iface, BSTR strAttributeName,
96                                                VARIANT AttributeValue, LONG lFlags)
97 {
98     HTMLElement *This = HTMLELEM_THIS(iface);
99     nsAString attr_str;
100     nsAString value_str;
101     nsresult nsres;
102     HRESULT hres;
103     VARIANT AttributeValueChanged;
104
105     WARN("(%p)->(%s . %08x)\n", This, debugstr_w(strAttributeName), lFlags);
106
107     if(!This->nselem) {
108         FIXME("NULL nselem\n");
109         return E_NOTIMPL;
110     }
111
112     VariantInit(&AttributeValueChanged);
113
114     hres = VariantChangeType(&AttributeValueChanged, &AttributeValue, 0, VT_BSTR);
115     if (FAILED(hres)) {
116         WARN("couldn't convert input attribute value %d to VT_BSTR\n", V_VT(&AttributeValue));
117         return hres;
118     }
119
120     nsAString_Init(&attr_str, strAttributeName);
121     nsAString_Init(&value_str, V_BSTR(&AttributeValueChanged));
122
123     TRACE("setting %s to %s\n", debugstr_w(strAttributeName),
124         debugstr_w(V_BSTR(&AttributeValueChanged)));
125
126     nsres = nsIDOMHTMLElement_SetAttribute(This->nselem, &attr_str, &value_str);
127     nsAString_Finish(&attr_str);
128     nsAString_Finish(&value_str);
129
130     if(NS_SUCCEEDED(nsres)) {
131         hres = S_OK;
132     }else {
133         ERR("SetAttribute failed: %08x\n", nsres);
134         hres = E_FAIL;
135     }
136
137     return hres;
138 }
139
140 static HRESULT WINAPI HTMLElement_getAttribute(IHTMLElement *iface, BSTR strAttributeName,
141                                                LONG lFlags, VARIANT *AttributeValue)
142 {
143     HTMLElement *This = HTMLELEM_THIS(iface);
144     nsAString attr_str;
145     nsAString value_str;
146     const PRUnichar *value;
147     nsresult nsres;
148     HRESULT hres = S_OK;
149
150     WARN("(%p)->(%s %08x %p)\n", This, debugstr_w(strAttributeName), lFlags, AttributeValue);
151
152     if(!This->nselem) {
153         FIXME("NULL nselem\n");
154         V_VT(AttributeValue) = VT_NULL;
155         return S_OK;
156     }
157
158     V_VT(AttributeValue) = VT_NULL;
159
160     nsAString_Init(&attr_str, strAttributeName);
161     nsAString_Init(&value_str, NULL);
162
163     nsres = nsIDOMHTMLElement_GetAttribute(This->nselem, &attr_str, &value_str);
164     nsAString_Finish(&attr_str);
165
166     if(NS_SUCCEEDED(nsres)) {
167         static const WCHAR wszSRC[] = {'s','r','c',0};
168         nsAString_GetData(&value_str, &value);
169         if(!strcmpiW(strAttributeName, wszSRC))
170         {
171             WCHAR buffer[256];
172             DWORD len;
173             BSTR bstrBaseUrl;
174             hres = IHTMLDocument2_get_URL(HTMLDOC(This->node.doc), &bstrBaseUrl);
175             if(SUCCEEDED(hres)) {
176                 hres = CoInternetCombineUrl(bstrBaseUrl, value,
177                                             URL_ESCAPE_SPACES_ONLY|URL_DONT_ESCAPE_EXTRA_INFO,
178                                             buffer, sizeof(buffer)/sizeof(WCHAR), &len, 0);
179                 SysFreeString(bstrBaseUrl);
180                 if(SUCCEEDED(hres)) {
181                     V_VT(AttributeValue) = VT_BSTR;
182                     V_BSTR(AttributeValue) = SysAllocString(buffer);
183                     TRACE("attr_value=%s\n", debugstr_w(V_BSTR(AttributeValue)));
184                 }
185             }
186         }else if(*value) {
187             V_VT(AttributeValue) = VT_BSTR;
188             V_BSTR(AttributeValue) = SysAllocString(value);
189             TRACE("attr_value=%s\n", debugstr_w(V_BSTR(AttributeValue)));
190         }
191     }else {
192         ERR("GetAttribute failed: %08x\n", nsres);
193         hres = E_FAIL;
194     }
195
196     nsAString_Finish(&value_str);
197
198     return hres;
199 }
200
201 static HRESULT WINAPI HTMLElement_removeAttribute(IHTMLElement *iface, BSTR strAttributeName,
202                                                   LONG lFlags, VARIANT_BOOL *pfSuccess)
203 {
204     HTMLElement *This = HTMLELEM_THIS(iface);
205     FIXME("(%p)->()\n", This);
206     return E_NOTIMPL;
207 }
208
209 static HRESULT WINAPI HTMLElement_put_className(IHTMLElement *iface, BSTR v)
210 {
211     HTMLElement *This = HTMLELEM_THIS(iface);
212     nsAString classname_str;
213     nsresult nsres;
214
215     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
216
217     if(!This->nselem) {
218         FIXME("NULL nselem\n");
219         return E_NOTIMPL;
220     }
221
222     nsAString_Init(&classname_str, v);
223     nsres = nsIDOMHTMLElement_SetClassName(This->nselem, &classname_str);
224     nsAString_Finish(&classname_str);
225     if(NS_FAILED(nsres))
226         ERR("SetClassName failed: %08x\n", nsres);
227
228     return S_OK;
229 }
230
231 static HRESULT WINAPI HTMLElement_get_className(IHTMLElement *iface, BSTR *p)
232 {
233     HTMLElement *This = HTMLELEM_THIS(iface);
234     nsAString class_str;
235     nsresult nsres;
236     HRESULT hres = S_OK;
237
238     TRACE("(%p)->(%p)\n", This, p);
239
240     if(!This->nselem) {
241         FIXME("NULL nselem\n");
242         return E_NOTIMPL;
243     }
244
245     nsAString_Init(&class_str, NULL);
246     nsres = nsIDOMHTMLElement_GetClassName(This->nselem, &class_str);
247
248     if(NS_SUCCEEDED(nsres)) {
249         const PRUnichar *class;
250         nsAString_GetData(&class_str, &class);
251         *p = *class ? SysAllocString(class) : NULL;
252     }else {
253         ERR("GetClassName failed: %08x\n", nsres);
254         hres = E_FAIL;
255     }
256
257     nsAString_Finish(&class_str);
258
259     TRACE("className=%s\n", debugstr_w(*p));
260     return hres;
261 }
262
263 static HRESULT WINAPI HTMLElement_put_id(IHTMLElement *iface, BSTR v)
264 {
265     HTMLElement *This = HTMLELEM_THIS(iface);
266     nsAString id_str;
267     nsresult nsres;
268
269     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
270
271     if(!This->nselem) {
272         FIXME("nselem == NULL\n");
273         return S_OK;
274     }
275
276     nsAString_Init(&id_str, v);
277     nsres = nsIDOMHTMLElement_SetId(This->nselem, &id_str);
278     nsAString_Finish(&id_str);
279     if(NS_FAILED(nsres))
280         ERR("SetId failed: %08x\n", nsres);
281
282     return S_OK;
283 }
284
285 static HRESULT WINAPI HTMLElement_get_id(IHTMLElement *iface, BSTR *p)
286 {
287     HTMLElement *This = HTMLELEM_THIS(iface);
288     const PRUnichar *id;
289     nsAString id_str;
290     nsresult nsres;
291
292     TRACE("(%p)->(%p)\n", This, p);
293
294     *p = NULL;
295
296     if(!This->nselem)
297         return S_OK;
298
299     nsAString_Init(&id_str, NULL);
300     nsres = nsIDOMHTMLElement_GetId(This->nselem, &id_str);
301     nsAString_GetData(&id_str, &id);
302
303     if(NS_FAILED(nsres))
304         ERR("GetId failed: %08x\n", nsres);
305     else if(*id)
306         *p = SysAllocString(id);
307
308     nsAString_Finish(&id_str);
309     return S_OK;
310 }
311
312 static HRESULT WINAPI HTMLElement_get_tagName(IHTMLElement *iface, BSTR *p)
313 {
314     HTMLElement *This = HTMLELEM_THIS(iface);
315     const PRUnichar *tag;
316     nsAString tag_str;
317     nsresult nsres;
318
319     TRACE("(%p)->(%p)\n", This, p);
320
321     if(!This->nselem) {
322         static const WCHAR comment_tagW[] = {'!',0};
323
324         WARN("NULL nselem, assuming comment\n");
325
326         *p = SysAllocString(comment_tagW);
327         return S_OK;
328     }
329
330     nsAString_Init(&tag_str, NULL);
331     nsres = nsIDOMHTMLElement_GetTagName(This->nselem, &tag_str);
332     if(NS_SUCCEEDED(nsres)) {
333         nsAString_GetData(&tag_str, &tag);
334         *p = SysAllocString(tag);
335     }else {
336         ERR("GetTagName failed: %08x\n", nsres);
337         *p = NULL;
338     }
339     nsAString_Finish(&tag_str);
340
341     return S_OK;
342 }
343
344 static HRESULT WINAPI HTMLElement_get_parentElement(IHTMLElement *iface, IHTMLElement **p)
345 {
346     HTMLElement *This = HTMLELEM_THIS(iface);
347     IHTMLDOMNode *node;
348     HRESULT hres;
349
350     TRACE("(%p)->(%p)\n", This, p);
351
352     hres = IHTMLDOMNode_get_parentNode(HTMLDOMNODE(&This->node), &node);
353     if(FAILED(hres))
354         return hres;
355
356     hres = IHTMLDOMNode_QueryInterface(node, &IID_IHTMLElement, (void**)p);
357     IHTMLDOMNode_Release(node);
358     if(FAILED(hres))
359         *p = NULL;
360
361     return S_OK;
362 }
363
364 static HRESULT WINAPI HTMLElement_get_style(IHTMLElement *iface, IHTMLStyle **p)
365 {
366     HTMLElement *This = HTMLELEM_THIS(iface);
367     nsIDOMElementCSSInlineStyle *nselemstyle;
368     nsIDOMCSSStyleDeclaration *nsstyle;
369     nsresult nsres;
370
371     TRACE("(%p)->(%p)\n", This, p);
372
373     if(!This->nselem) {
374         FIXME("NULL nselem\n");
375         return E_NOTIMPL;
376     }
377
378     nsres = nsIDOMHTMLElement_QueryInterface(This->nselem, &IID_nsIDOMElementCSSInlineStyle,
379                                              (void**)&nselemstyle);
380     if(NS_FAILED(nsres)) {
381         ERR("Coud not get nsIDOMCSSStyleDeclaration interface: %08x\n", nsres);
382         return E_FAIL;
383     }
384
385     nsres = nsIDOMElementCSSInlineStyle_GetStyle(nselemstyle, &nsstyle);
386     nsIDOMElementCSSInlineStyle_Release(nselemstyle);
387     if(NS_FAILED(nsres)) {
388         ERR("GetStyle failed: %08x\n", nsres);
389         return E_FAIL;
390     }
391
392     /* FIXME: Store style instead of creating a new instance in each call */
393     *p = HTMLStyle_Create(nsstyle);
394
395     nsIDOMCSSStyleDeclaration_Release(nsstyle);
396     return S_OK;
397 }
398
399 static HRESULT WINAPI HTMLElement_put_onhelp(IHTMLElement *iface, VARIANT v)
400 {
401     HTMLElement *This = HTMLELEM_THIS(iface);
402     FIXME("(%p)->()\n", This);
403     return E_NOTIMPL;
404 }
405
406 static HRESULT WINAPI HTMLElement_get_onhelp(IHTMLElement *iface, VARIANT *p)
407 {
408     HTMLElement *This = HTMLELEM_THIS(iface);
409     FIXME("(%p)->(%p)\n", This, p);
410     return E_NOTIMPL;
411 }
412
413 static HRESULT WINAPI HTMLElement_put_onclick(IHTMLElement *iface, VARIANT v)
414 {
415     HTMLElement *This = HTMLELEM_THIS(iface);
416
417     TRACE("(%p)->()\n", This);
418
419     return set_node_event(&This->node, EVENTID_CLICK, &v);
420 }
421
422 static HRESULT WINAPI HTMLElement_get_onclick(IHTMLElement *iface, VARIANT *p)
423 {
424     HTMLElement *This = HTMLELEM_THIS(iface);
425
426     TRACE("(%p)->(%p)\n", This, p);
427
428     return get_node_event(&This->node, EVENTID_CLICK, p);
429 }
430
431 static HRESULT WINAPI HTMLElement_put_ondblclick(IHTMLElement *iface, VARIANT v)
432 {
433     HTMLElement *This = HTMLELEM_THIS(iface);
434     FIXME("(%p)->()\n", This);
435     return E_NOTIMPL;
436 }
437
438 static HRESULT WINAPI HTMLElement_get_ondblclick(IHTMLElement *iface, VARIANT *p)
439 {
440     HTMLElement *This = HTMLELEM_THIS(iface);
441     FIXME("(%p)->(%p)\n", This, p);
442     return E_NOTIMPL;
443 }
444
445 static HRESULT WINAPI HTMLElement_put_onkeydown(IHTMLElement *iface, VARIANT v)
446 {
447     HTMLElement *This = HTMLELEM_THIS(iface);
448
449     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
450
451     return set_node_event(&This->node, EVENTID_KEYDOWN, &v);
452 }
453
454 static HRESULT WINAPI HTMLElement_get_onkeydown(IHTMLElement *iface, VARIANT *p)
455 {
456     HTMLElement *This = HTMLELEM_THIS(iface);
457
458     TRACE("(%p)->(%p)\n", This, p);
459
460     return get_node_event(&This->node, EVENTID_KEYDOWN, p);
461 }
462
463 static HRESULT WINAPI HTMLElement_put_onkeyup(IHTMLElement *iface, VARIANT v)
464 {
465     HTMLElement *This = HTMLELEM_THIS(iface);
466
467     TRACE("(%p)->()\n", This);
468
469     return set_node_event(&This->node, EVENTID_KEYUP, &v);
470 }
471
472 static HRESULT WINAPI HTMLElement_get_onkeyup(IHTMLElement *iface, VARIANT *p)
473 {
474     HTMLElement *This = HTMLELEM_THIS(iface);
475     FIXME("(%p)->(%p)\n", This, p);
476     return E_NOTIMPL;
477 }
478
479 static HRESULT WINAPI HTMLElement_put_onkeypress(IHTMLElement *iface, VARIANT v)
480 {
481     HTMLElement *This = HTMLELEM_THIS(iface);
482     FIXME("(%p)->()\n", This);
483     return E_NOTIMPL;
484 }
485
486 static HRESULT WINAPI HTMLElement_get_onkeypress(IHTMLElement *iface, VARIANT *p)
487 {
488     HTMLElement *This = HTMLELEM_THIS(iface);
489     FIXME("(%p)->(%p)\n", This, p);
490     return E_NOTIMPL;
491 }
492
493 static HRESULT WINAPI HTMLElement_put_onmouseout(IHTMLElement *iface, VARIANT v)
494 {
495     HTMLElement *This = HTMLELEM_THIS(iface);
496
497     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
498
499     return set_node_event(&This->node, EVENTID_MOUSEOUT, &v);
500 }
501
502 static HRESULT WINAPI HTMLElement_get_onmouseout(IHTMLElement *iface, VARIANT *p)
503 {
504     HTMLElement *This = HTMLELEM_THIS(iface);
505
506     TRACE("(%p)->(%p)\n", This, p);
507
508     return get_node_event(&This->node, EVENTID_MOUSEOUT, p);
509 }
510
511 static HRESULT WINAPI HTMLElement_put_onmouseover(IHTMLElement *iface, VARIANT v)
512 {
513     HTMLElement *This = HTMLELEM_THIS(iface);
514
515     TRACE("(%p)->()\n", This);
516
517     return set_node_event(&This->node, EVENTID_MOUSEOVER, &v);
518 }
519
520 static HRESULT WINAPI HTMLElement_get_onmouseover(IHTMLElement *iface, VARIANT *p)
521 {
522     HTMLElement *This = HTMLELEM_THIS(iface);
523
524     TRACE("(%p)->(%p)\n", This, p);
525
526     return get_node_event(&This->node, EVENTID_MOUSEOVER, p);
527 }
528
529 static HRESULT WINAPI HTMLElement_put_onmousemove(IHTMLElement *iface, VARIANT v)
530 {
531     HTMLElement *This = HTMLELEM_THIS(iface);
532     FIXME("(%p)->()\n", This);
533     return E_NOTIMPL;
534 }
535
536 static HRESULT WINAPI HTMLElement_get_onmousemove(IHTMLElement *iface, VARIANT *p)
537 {
538     HTMLElement *This = HTMLELEM_THIS(iface);
539     FIXME("(%p)->(%p)\n", This, p);
540     return E_NOTIMPL;
541 }
542
543 static HRESULT WINAPI HTMLElement_put_onmousedown(IHTMLElement *iface, VARIANT v)
544 {
545     HTMLElement *This = HTMLELEM_THIS(iface);
546
547     TRACE("(%p)->()\n", This);
548
549     return set_node_event(&This->node, EVENTID_MOUSEDOWN, &v);
550 }
551
552 static HRESULT WINAPI HTMLElement_get_onmousedown(IHTMLElement *iface, VARIANT *p)
553 {
554     HTMLElement *This = HTMLELEM_THIS(iface);
555
556     TRACE("(%p)->(%p)\n", This, p);
557
558     return get_node_event(&This->node, EVENTID_MOUSEDOWN, p);
559 }
560
561 static HRESULT WINAPI HTMLElement_put_onmouseup(IHTMLElement *iface, VARIANT v)
562 {
563     HTMLElement *This = HTMLELEM_THIS(iface);
564
565     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
566
567     return set_node_event(&This->node, EVENTID_MOUSEUP, &v);
568 }
569
570 static HRESULT WINAPI HTMLElement_get_onmouseup(IHTMLElement *iface, VARIANT *p)
571 {
572     HTMLElement *This = HTMLELEM_THIS(iface);
573
574     TRACE("(%p)->(%p)\n", This, p);
575
576     return get_node_event(&This->node, EVENTID_MOUSEUP, p);
577 }
578
579 static HRESULT WINAPI HTMLElement_get_document(IHTMLElement *iface, IDispatch **p)
580 {
581     HTMLElement *This = HTMLELEM_THIS(iface);
582
583     TRACE("(%p)->(%p)\n", This, p);
584
585     if(!p)
586         return E_POINTER;
587
588     *p = (IDispatch*)This->node.doc;
589     IDispatch_AddRef(*p);
590
591     return S_OK;
592 }
593
594 static HRESULT WINAPI HTMLElement_put_title(IHTMLElement *iface, BSTR v)
595 {
596     HTMLElement *This = HTMLELEM_THIS(iface);
597     nsAString title_str;
598     nsresult nsres;
599
600     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
601
602     nsAString_Init(&title_str, v);
603     nsres = nsIDOMHTMLElement_SetTitle(This->nselem, &title_str);
604     nsAString_Finish(&title_str);
605     if(NS_FAILED(nsres))
606         ERR("SetTitle failed: %08x\n", nsres);
607
608     return S_OK;
609 }
610
611 static HRESULT WINAPI HTMLElement_get_title(IHTMLElement *iface, BSTR *p)
612 {
613     HTMLElement *This = HTMLELEM_THIS(iface);
614     nsAString title_str;
615     nsresult nsres;
616
617     TRACE("(%p)->(%p)\n", This, p);
618
619     nsAString_Init(&title_str, NULL);
620     nsres = nsIDOMHTMLElement_GetTitle(This->nselem, &title_str);
621     if(NS_SUCCEEDED(nsres)) {
622         const PRUnichar *title;
623
624         nsAString_GetData(&title_str, &title);
625         *p = *title ? SysAllocString(title) : NULL;
626     }else {
627         ERR("GetTitle failed: %08x\n", nsres);
628         return E_FAIL;
629     }
630
631     return S_OK;
632 }
633
634 static HRESULT WINAPI HTMLElement_put_language(IHTMLElement *iface, BSTR v)
635 {
636     HTMLElement *This = HTMLELEM_THIS(iface);
637     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
638     return E_NOTIMPL;
639 }
640
641 static HRESULT WINAPI HTMLElement_get_language(IHTMLElement *iface, BSTR *p)
642 {
643     HTMLElement *This = HTMLELEM_THIS(iface);
644     FIXME("(%p)->(%p)\n", This, p);
645     return E_NOTIMPL;
646 }
647
648 static HRESULT WINAPI HTMLElement_put_onselectstart(IHTMLElement *iface, VARIANT v)
649 {
650     HTMLElement *This = HTMLELEM_THIS(iface);
651
652     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
653
654     return set_node_event(&This->node, EVENTID_SELECTSTART, &v);
655 }
656
657 static HRESULT WINAPI HTMLElement_get_onselectstart(IHTMLElement *iface, VARIANT *p)
658 {
659     HTMLElement *This = HTMLELEM_THIS(iface);
660
661     TRACE("(%p)->(%p)\n", This, p);
662
663     return get_node_event(&This->node, EVENTID_SELECTSTART, p);
664 }
665
666 static HRESULT WINAPI HTMLElement_scrollIntoView(IHTMLElement *iface, VARIANT varargStart)
667 {
668     HTMLElement *This = HTMLELEM_THIS(iface);
669     FIXME("(%p)->()\n", This);
670     return E_NOTIMPL;
671 }
672
673 static HRESULT WINAPI HTMLElement_contains(IHTMLElement *iface, IHTMLElement *pChild,
674                                            VARIANT_BOOL *pfResult)
675 {
676     HTMLElement *This = HTMLELEM_THIS(iface);
677     FIXME("(%p)->(%p %p)\n", This, pChild, pfResult);
678     return E_NOTIMPL;
679 }
680
681 static HRESULT WINAPI HTMLElement_get_sourceIndex(IHTMLElement *iface, long *p)
682 {
683     HTMLElement *This = HTMLELEM_THIS(iface);
684     FIXME("(%p)->(%p)\n", This, p);
685     return E_NOTIMPL;
686 }
687
688 static HRESULT WINAPI HTMLElement_get_recordNumber(IHTMLElement *iface, VARIANT *p)
689 {
690     HTMLElement *This = HTMLELEM_THIS(iface);
691     FIXME("(%p)->(%p)\n", This, p);
692     return E_NOTIMPL;
693 }
694
695 static HRESULT WINAPI HTMLElement_put_lang(IHTMLElement *iface, BSTR v)
696 {
697     HTMLElement *This = HTMLELEM_THIS(iface);
698     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
699     return E_NOTIMPL;
700 }
701
702 static HRESULT WINAPI HTMLElement_get_lang(IHTMLElement *iface, BSTR *p)
703 {
704     HTMLElement *This = HTMLELEM_THIS(iface);
705     FIXME("(%p)->(%p)\n", This, p);
706     return E_NOTIMPL;
707 }
708
709 static HRESULT WINAPI HTMLElement_get_offsetLeft(IHTMLElement *iface, long *p)
710 {
711     HTMLElement *This = HTMLELEM_THIS(iface);
712     FIXME("(%p)->(%p)\n", This, p);
713     return E_NOTIMPL;
714 }
715
716 static HRESULT WINAPI HTMLElement_get_offsetTop(IHTMLElement *iface, long *p)
717 {
718     HTMLElement *This = HTMLELEM_THIS(iface);
719     nsIDOMNSHTMLElement *nselem;
720     PRInt32 top = 0;
721     nsresult nsres;
722
723     TRACE("(%p)->(%p)\n", This, p);
724
725     nsres = nsIDOMHTMLElement_QueryInterface(This->nselem, &IID_nsIDOMNSHTMLElement, (void**)&nselem);
726     if(NS_FAILED(nsres)) {
727         ERR("Could not get nsIDOMNSHTMLElement: %08x\n", nsres);
728         return E_FAIL;
729     }
730
731     nsres = nsIDOMNSHTMLElement_GetOffsetTop(nselem, &top);
732     nsIDOMNSHTMLElement_Release(nselem);
733     if(NS_FAILED(nsres)) {
734         ERR("GetOffsetTop failed: %08x\n", nsres);
735         return E_FAIL;
736     }
737
738     *p = top;
739     return S_OK;
740 }
741
742 static HRESULT WINAPI HTMLElement_get_offsetWidth(IHTMLElement *iface, long *p)
743 {
744     HTMLElement *This = HTMLELEM_THIS(iface);
745     nsIDOMNSHTMLElement *nselem;
746     PRInt32 offset = 0;
747     nsresult nsres;
748
749     TRACE("(%p)->(%p)\n", This, p);
750
751     nsres = nsIDOMHTMLElement_QueryInterface(This->nselem, &IID_nsIDOMNSHTMLElement, (void**)&nselem);
752     if(NS_FAILED(nsres)) {
753         ERR("Could not get nsIDOMNSHTMLElement: %08x\n", nsres);
754         return E_FAIL;
755     }
756
757     nsres = nsIDOMNSHTMLElement_GetOffsetWidth(nselem, &offset);
758     nsIDOMNSHTMLElement_Release(nselem);
759     if(NS_FAILED(nsres)) {
760         ERR("GetOffsetWidth failed: %08x\n", nsres);
761         return E_FAIL;
762     }
763
764     *p = offset;
765     return S_OK;
766 }
767
768 static HRESULT WINAPI HTMLElement_get_offsetHeight(IHTMLElement *iface, long *p)
769 {
770     HTMLElement *This = HTMLELEM_THIS(iface);
771     nsIDOMNSHTMLElement *nselem;
772     PRInt32 offset = 0;
773     nsresult nsres;
774
775     TRACE("(%p)->(%p)\n", This, p);
776
777     nsres = nsIDOMHTMLElement_QueryInterface(This->nselem, &IID_nsIDOMNSHTMLElement, (void**)&nselem);
778     if(NS_FAILED(nsres)) {
779         ERR("Could not get nsIDOMNSHTMLElement: %08x\n", nsres);
780         return E_FAIL;
781     }
782
783     nsres = nsIDOMNSHTMLElement_GetOffsetHeight(nselem, &offset);
784     nsIDOMNSHTMLElement_Release(nselem);
785     if(NS_FAILED(nsres)) {
786         ERR("GetOffsetHeight failed: %08x\n", nsres);
787         return E_FAIL;
788     }
789
790     *p = offset;
791     return S_OK;
792 }
793
794 static HRESULT WINAPI HTMLElement_get_offsetParent(IHTMLElement *iface, IHTMLElement **p)
795 {
796     HTMLElement *This = HTMLELEM_THIS(iface);
797     FIXME("(%p)->(%p)\n", This, p);
798     return E_NOTIMPL;
799 }
800
801 static HRESULT WINAPI HTMLElement_put_innerHTML(IHTMLElement *iface, BSTR v)
802 {
803     HTMLElement *This = HTMLELEM_THIS(iface);
804     nsIDOMNSHTMLElement *nselem;
805     nsAString html_str;
806     nsresult nsres;
807
808     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
809
810     if(!This->nselem) {
811         FIXME("NULL nselem\n");
812         return E_NOTIMPL;
813     }
814
815     nsres = nsIDOMHTMLElement_QueryInterface(This->nselem, &IID_nsIDOMNSHTMLElement, (void**)&nselem);
816     if(NS_FAILED(nsres)) {
817         ERR("Could not get nsIDOMNSHTMLElement: %08x\n", nsres);
818         return E_FAIL;
819     }
820
821     nsAString_Init(&html_str, v);
822     nsres = nsIDOMNSHTMLElement_SetInnerHTML(nselem, &html_str);
823     nsAString_Finish(&html_str);
824
825     if(NS_FAILED(nsres)) {
826         FIXME("SetInnerHtml failed %08x\n", nsres);
827         return E_FAIL;
828     }
829
830     return S_OK;
831 }
832
833 static HRESULT WINAPI HTMLElement_get_innerHTML(IHTMLElement *iface, BSTR *p)
834 {
835     HTMLElement *This = HTMLELEM_THIS(iface);
836     FIXME("(%p)->(%p)\n", This, p);
837     return E_NOTIMPL;
838 }
839
840 static HRESULT WINAPI HTMLElement_put_innerText(IHTMLElement *iface, BSTR v)
841 {
842     HTMLElement *This = HTMLELEM_THIS(iface);
843     nsIDOMNode *nschild, *tmp;
844     nsIDOMText *text_node;
845     nsAString text_str;
846     nsresult nsres;
847
848     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
849
850     while(1) {
851         nsres = nsIDOMHTMLElement_GetLastChild(This->nselem, &nschild);
852         if(NS_FAILED(nsres)) {
853             ERR("GetLastChild failed: %08x\n", nsres);
854             return E_FAIL;
855         }
856         if(!nschild)
857             break;
858
859         nsres = nsIDOMHTMLElement_RemoveChild(This->nselem, nschild, &tmp);
860         nsIDOMNode_Release(nschild);
861         if(NS_FAILED(nsres)) {
862             ERR("RemoveChild failed: %08x\n", nsres);
863             return E_FAIL;
864         }
865         nsIDOMNode_Release(tmp);
866     }
867
868     nsAString_Init(&text_str, v);
869     nsres = nsIDOMHTMLDocument_CreateTextNode(This->node.doc->nsdoc, &text_str, &text_node);
870     nsAString_Finish(&text_str);
871     if(NS_FAILED(nsres)) {
872         ERR("CreateTextNode failed: %08x\n", nsres);
873         return E_FAIL;
874     }
875
876     nsres = nsIDOMHTMLElement_AppendChild(This->nselem, (nsIDOMNode*)text_node, &tmp);
877     if(NS_FAILED(nsres)) {
878         ERR("AppendChild failed: %08x\n", nsres);
879         return E_FAIL;
880     }
881
882     nsIDOMNode_Release(tmp);
883     return S_OK;
884 }
885
886 static HRESULT WINAPI HTMLElement_get_innerText(IHTMLElement *iface, BSTR *p)
887 {
888     HTMLElement *This = HTMLELEM_THIS(iface);
889
890     TRACE("(%p)->(%p)\n", This, p);
891
892     return get_node_text(&This->node, p);
893 }
894
895 static HRESULT WINAPI HTMLElement_put_outerHTML(IHTMLElement *iface, BSTR v)
896 {
897     HTMLElement *This = HTMLELEM_THIS(iface);
898     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
899     return E_NOTIMPL;
900 }
901
902 static HRESULT WINAPI HTMLElement_get_outerHTML(IHTMLElement *iface, BSTR *p)
903 {
904     HTMLElement *This = HTMLELEM_THIS(iface);
905     FIXME("(%p)->(%p)\n", This, p);
906     return E_NOTIMPL;
907 }
908
909 static HRESULT WINAPI HTMLElement_put_outerText(IHTMLElement *iface, BSTR v)
910 {
911     HTMLElement *This = HTMLELEM_THIS(iface);
912     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
913     return E_NOTIMPL;
914 }
915
916 static HRESULT WINAPI HTMLElement_get_outerText(IHTMLElement *iface, BSTR *p)
917 {
918     HTMLElement *This = HTMLELEM_THIS(iface);
919     FIXME("(%p)->(%p)\n", This, p);
920     return E_NOTIMPL;
921 }
922
923 static HRESULT HTMLElement_InsertAdjacentNode(HTMLElement *This, BSTR where, nsIDOMNode *nsnode)
924 {
925     static const WCHAR wszBeforeBegin[] = {'b','e','f','o','r','e','B','e','g','i','n',0};
926     static const WCHAR wszAfterBegin[] = {'a','f','t','e','r','B','e','g','i','n',0};
927     static const WCHAR wszBeforeEnd[] = {'b','e','f','o','r','e','E','n','d',0};
928     static const WCHAR wszAfterEnd[] = {'a','f','t','e','r','E','n','d',0};
929     nsresult nsres;
930
931     if(!This->nselem) {
932         FIXME("NULL nselem\n");
933         return E_NOTIMPL;
934     }
935
936     if (!strcmpiW(where, wszBeforeBegin))
937     {
938         nsIDOMNode *unused;
939         nsIDOMNode *parent;
940         nsres = nsIDOMNode_GetParentNode(This->nselem, &parent);
941         if (!parent) return E_INVALIDARG;
942         nsres = nsIDOMNode_InsertBefore(parent, nsnode,
943                                         (nsIDOMNode *)This->nselem, &unused);
944         if (unused) nsIDOMNode_Release(unused);
945         nsIDOMNode_Release(parent);
946     }
947     else if (!strcmpiW(where, wszAfterBegin))
948     {
949         nsIDOMNode *unused;
950         nsIDOMNode *first_child;
951         nsIDOMNode_GetFirstChild(This->nselem, &first_child);
952         nsres = nsIDOMNode_InsertBefore(This->nselem, nsnode, first_child, &unused);
953         if (unused) nsIDOMNode_Release(unused);
954         if (first_child) nsIDOMNode_Release(first_child);
955     }
956     else if (!strcmpiW(where, wszBeforeEnd))
957     {
958         nsIDOMNode *unused;
959         nsres = nsIDOMNode_AppendChild(This->nselem, nsnode, &unused);
960         if (unused) nsIDOMNode_Release(unused);
961     }
962     else if (!strcmpiW(where, wszAfterEnd))
963     {
964         nsIDOMNode *unused;
965         nsIDOMNode *next_sibling;
966         nsIDOMNode *parent;
967         nsIDOMNode_GetParentNode(This->nselem, &parent);
968         if (!parent) return E_INVALIDARG;
969
970         nsIDOMNode_GetNextSibling(This->nselem, &next_sibling);
971         if (next_sibling)
972         {
973             nsres = nsIDOMNode_InsertBefore(parent, nsnode, next_sibling, &unused);
974             nsIDOMNode_Release(next_sibling);
975         }
976         else
977             nsres = nsIDOMNode_AppendChild(parent, nsnode, &unused);
978         nsIDOMNode_Release(parent);
979         if (unused) nsIDOMNode_Release(unused);
980     }
981     else
982     {
983         ERR("invalid where: %s\n", debugstr_w(where));
984         return E_INVALIDARG;
985     }
986
987     if (NS_FAILED(nsres))
988         return E_FAIL;
989     else
990         return S_OK;
991 }
992
993 static HRESULT WINAPI HTMLElement_insertAdjacentHTML(IHTMLElement *iface, BSTR where,
994                                                      BSTR html)
995 {
996     HTMLElement *This = HTMLELEM_THIS(iface);
997     nsIDOMDocumentRange *nsdocrange;
998     nsIDOMRange *range;
999     nsIDOMNSRange *nsrange;
1000     nsIDOMNode *nsnode;
1001     nsAString ns_html;
1002     nsresult nsres;
1003     HRESULT hr;
1004
1005     TRACE("(%p)->(%s %s)\n", This, debugstr_w(where), debugstr_w(html));
1006
1007     if(!This->node.doc->nsdoc) {
1008         WARN("NULL nsdoc\n");
1009         return E_UNEXPECTED;
1010     }
1011
1012     nsres = nsIDOMDocument_QueryInterface(This->node.doc->nsdoc, &IID_nsIDOMDocumentRange, (void **)&nsdocrange);
1013     if(NS_FAILED(nsres))
1014     {
1015         ERR("getting nsIDOMDocumentRange failed: %08x\n", nsres);
1016         return E_FAIL;
1017     }
1018     nsres = nsIDOMDocumentRange_CreateRange(nsdocrange, &range);
1019     nsIDOMDocumentRange_Release(nsdocrange);
1020     if(NS_FAILED(nsres))
1021     {
1022         ERR("CreateRange failed: %08x\n", nsres);
1023         return E_FAIL;
1024     }
1025
1026     nsIDOMRange_SetStartBefore(range, (nsIDOMNode *)This->nselem);
1027
1028     nsIDOMRange_QueryInterface(range, &IID_nsIDOMNSRange, (void **)&nsrange);
1029     nsIDOMRange_Release(range);
1030     if(NS_FAILED(nsres))
1031     {
1032         ERR("getting nsIDOMNSRange failed: %08x\n", nsres);
1033         return E_FAIL;
1034     }
1035
1036     nsAString_Init(&ns_html, html);
1037
1038     nsres = nsIDOMNSRange_CreateContextualFragment(nsrange, &ns_html, (nsIDOMDocumentFragment **)&nsnode);
1039     nsIDOMNSRange_Release(nsrange);
1040     nsAString_Finish(&ns_html);
1041
1042     if(NS_FAILED(nsres) || !nsnode)
1043     {
1044         ERR("CreateTextNode failed: %08x\n", nsres);
1045         return E_FAIL;
1046     }
1047
1048     hr = HTMLElement_InsertAdjacentNode(This, where, nsnode);
1049     nsIDOMNode_Release(nsnode);
1050
1051     return hr;
1052 }
1053
1054 static HRESULT WINAPI HTMLElement_insertAdjacentText(IHTMLElement *iface, BSTR where,
1055                                                      BSTR text)
1056 {
1057     HTMLElement *This = HTMLELEM_THIS(iface);
1058     nsIDOMNode *nsnode;
1059     nsAString ns_text;
1060     nsresult nsres;
1061     HRESULT hr;
1062
1063     TRACE("(%p)->(%s %s)\n", This, debugstr_w(where), debugstr_w(text));
1064
1065     if(!This->node.doc->nsdoc) {
1066         WARN("NULL nsdoc\n");
1067         return E_UNEXPECTED;
1068     }
1069
1070
1071     nsAString_Init(&ns_text, text);
1072     nsres = nsIDOMDocument_CreateTextNode(This->node.doc->nsdoc, &ns_text, (nsIDOMText **)&nsnode);
1073     nsAString_Finish(&ns_text);
1074
1075     if(NS_FAILED(nsres) || !nsnode)
1076     {
1077         ERR("CreateTextNode failed: %08x\n", nsres);
1078         return E_FAIL;
1079     }
1080
1081     hr = HTMLElement_InsertAdjacentNode(This, where, nsnode);
1082     nsIDOMNode_Release(nsnode);
1083
1084     return hr;
1085 }
1086
1087 static HRESULT WINAPI HTMLElement_get_parentTextEdit(IHTMLElement *iface, IHTMLElement **p)
1088 {
1089     HTMLElement *This = HTMLELEM_THIS(iface);
1090     FIXME("(%p)->(%p)\n", This, p);
1091     return E_NOTIMPL;
1092 }
1093
1094 static HRESULT WINAPI HTMLElement_get_isTextEdit(IHTMLElement *iface, VARIANT_BOOL *p)
1095 {
1096     HTMLElement *This = HTMLELEM_THIS(iface);
1097     FIXME("(%p)->(%p)\n", This, p);
1098     return E_NOTIMPL;
1099 }
1100
1101 static HRESULT WINAPI HTMLElement_click(IHTMLElement *iface)
1102 {
1103     HTMLElement *This = HTMLELEM_THIS(iface);
1104     FIXME("(%p)\n", This);
1105     return E_NOTIMPL;
1106 }
1107
1108 static HRESULT WINAPI HTMLElement_get_filters(IHTMLElement *iface,
1109                                               IHTMLFiltersCollection **p)
1110 {
1111     HTMLElement *This = HTMLELEM_THIS(iface);
1112     FIXME("(%p)->(%p)\n", This, p);
1113     return E_NOTIMPL;
1114 }
1115
1116 static HRESULT WINAPI HTMLElement_put_ondragstart(IHTMLElement *iface, VARIANT v)
1117 {
1118     HTMLElement *This = HTMLELEM_THIS(iface);
1119     FIXME("(%p)->()\n", This);
1120     return E_NOTIMPL;
1121 }
1122
1123 static HRESULT WINAPI HTMLElement_get_ondragstart(IHTMLElement *iface, VARIANT *p)
1124 {
1125     HTMLElement *This = HTMLELEM_THIS(iface);
1126     FIXME("(%p)->(%p)\n", This, p);
1127     return E_NOTIMPL;
1128 }
1129
1130 static HRESULT WINAPI HTMLElement_toString(IHTMLElement *iface, BSTR *String)
1131 {
1132     HTMLElement *This = HTMLELEM_THIS(iface);
1133     FIXME("(%p)->(%p)\n", This, String);
1134     return E_NOTIMPL;
1135 }
1136
1137 static HRESULT WINAPI HTMLElement_put_onbeforeupdate(IHTMLElement *iface, VARIANT v)
1138 {
1139     HTMLElement *This = HTMLELEM_THIS(iface);
1140     FIXME("(%p)->()\n", This);
1141     return E_NOTIMPL;
1142 }
1143
1144 static HRESULT WINAPI HTMLElement_get_onbeforeupdate(IHTMLElement *iface, VARIANT *p)
1145 {
1146     HTMLElement *This = HTMLELEM_THIS(iface);
1147     FIXME("(%p)->(%p)\n", This, p);
1148     return E_NOTIMPL;
1149 }
1150
1151 static HRESULT WINAPI HTMLElement_put_onafterupdate(IHTMLElement *iface, VARIANT v)
1152 {
1153     HTMLElement *This = HTMLELEM_THIS(iface);
1154     FIXME("(%p)->()\n", This);
1155     return E_NOTIMPL;
1156 }
1157
1158 static HRESULT WINAPI HTMLElement_get_onafterupdate(IHTMLElement *iface, VARIANT *p)
1159 {
1160     HTMLElement *This = HTMLELEM_THIS(iface);
1161     FIXME("(%p)->(%p)\n", This, p);
1162     return E_NOTIMPL;
1163 }
1164
1165 static HRESULT WINAPI HTMLElement_put_onerrorupdate(IHTMLElement *iface, VARIANT v)
1166 {
1167     HTMLElement *This = HTMLELEM_THIS(iface);
1168     FIXME("(%p)->()\n", This);
1169     return E_NOTIMPL;
1170 }
1171
1172 static HRESULT WINAPI HTMLElement_get_onerrorupdate(IHTMLElement *iface, VARIANT *p)
1173 {
1174     HTMLElement *This = HTMLELEM_THIS(iface);
1175     FIXME("(%p)->(%p)\n", This, p);
1176     return E_NOTIMPL;
1177 }
1178
1179 static HRESULT WINAPI HTMLElement_put_onrowexit(IHTMLElement *iface, VARIANT v)
1180 {
1181     HTMLElement *This = HTMLELEM_THIS(iface);
1182     FIXME("(%p)->()\n", This);
1183     return E_NOTIMPL;
1184 }
1185
1186 static HRESULT WINAPI HTMLElement_get_onrowexit(IHTMLElement *iface, VARIANT *p)
1187 {
1188     HTMLElement *This = HTMLELEM_THIS(iface);
1189     FIXME("(%p)->(%p)\n", This, p);
1190     return E_NOTIMPL;
1191 }
1192
1193 static HRESULT WINAPI HTMLElement_put_onrowenter(IHTMLElement *iface, VARIANT v)
1194 {
1195     HTMLElement *This = HTMLELEM_THIS(iface);
1196     FIXME("(%p)->()\n", This);
1197     return E_NOTIMPL;
1198 }
1199
1200 static HRESULT WINAPI HTMLElement_get_onrowenter(IHTMLElement *iface, VARIANT *p)
1201 {
1202     HTMLElement *This = HTMLELEM_THIS(iface);
1203     FIXME("(%p)->(%p)\n", This, p);
1204     return E_NOTIMPL;
1205 }
1206
1207 static HRESULT WINAPI HTMLElement_put_ondatasetchanged(IHTMLElement *iface, VARIANT v)
1208 {
1209     HTMLElement *This = HTMLELEM_THIS(iface);
1210     FIXME("(%p)->()\n", This);
1211     return E_NOTIMPL;
1212 }
1213
1214 static HRESULT WINAPI HTMLElement_get_ondatasetchanged(IHTMLElement *iface, VARIANT *p)
1215 {
1216     HTMLElement *This = HTMLELEM_THIS(iface);
1217     FIXME("(%p)->(%p)\n", This, p);
1218     return E_NOTIMPL;
1219 }
1220
1221 static HRESULT WINAPI HTMLElement_put_ondataavailable(IHTMLElement *iface, VARIANT v)
1222 {
1223     HTMLElement *This = HTMLELEM_THIS(iface);
1224     FIXME("(%p)->()\n", This);
1225     return E_NOTIMPL;
1226 }
1227
1228 static HRESULT WINAPI HTMLElement_get_ondataavailable(IHTMLElement *iface, VARIANT *p)
1229 {
1230     HTMLElement *This = HTMLELEM_THIS(iface);
1231     FIXME("(%p)->(%p)\n", This, p);
1232     return E_NOTIMPL;
1233 }
1234
1235 static HRESULT WINAPI HTMLElement_put_ondatasetcomplete(IHTMLElement *iface, VARIANT v)
1236 {
1237     HTMLElement *This = HTMLELEM_THIS(iface);
1238     FIXME("(%p)->()\n", This);
1239     return E_NOTIMPL;
1240 }
1241
1242 static HRESULT WINAPI HTMLElement_get_ondatasetcomplete(IHTMLElement *iface, VARIANT *p)
1243 {
1244     HTMLElement *This = HTMLELEM_THIS(iface);
1245     FIXME("(%p)->(%p)\n", This, p);
1246     return E_NOTIMPL;
1247 }
1248
1249 static HRESULT WINAPI HTMLElement_put_onfilterchange(IHTMLElement *iface, VARIANT v)
1250 {
1251     HTMLElement *This = HTMLELEM_THIS(iface);
1252     FIXME("(%p)->()\n", This);
1253     return E_NOTIMPL;
1254 }
1255
1256 static HRESULT WINAPI HTMLElement_get_onfilterchange(IHTMLElement *iface, VARIANT *p)
1257 {
1258     HTMLElement *This = HTMLELEM_THIS(iface);
1259     FIXME("(%p)->(%p)\n", This, p);
1260     return E_NOTIMPL;
1261 }
1262
1263 static HRESULT WINAPI HTMLElement_get_children(IHTMLElement *iface, IDispatch **p)
1264 {
1265     HTMLElement *This = HTMLELEM_THIS(iface);
1266     nsIDOMNodeList *nsnode_list;
1267     nsresult nsres;
1268
1269     TRACE("(%p)->(%p)\n", This, p);
1270
1271     nsres = nsIDOMNode_GetChildNodes(This->node.nsnode, &nsnode_list);
1272     if(NS_FAILED(nsres)) {
1273         ERR("GetChildNodes failed: %08x\n", nsres);
1274         return E_FAIL;
1275     }
1276
1277     *p = (IDispatch*)create_collection_from_nodelist(This->node.doc, (IUnknown*)HTMLELEM(This), nsnode_list);
1278
1279     nsIDOMNodeList_Release(nsnode_list);
1280     return S_OK;
1281 }
1282
1283 static HRESULT WINAPI HTMLElement_get_all(IHTMLElement *iface, IDispatch **p)
1284 {
1285     HTMLElement *This = HTMLELEM_THIS(iface);
1286
1287     TRACE("(%p)->(%p)\n", This, p);
1288
1289     *p = (IDispatch*)create_all_collection(&This->node, FALSE);
1290     return S_OK;
1291 }
1292
1293 #undef HTMLELEM_THIS
1294
1295 static const IHTMLElementVtbl HTMLElementVtbl = {
1296     HTMLElement_QueryInterface,
1297     HTMLElement_AddRef,
1298     HTMLElement_Release,
1299     HTMLElement_GetTypeInfoCount,
1300     HTMLElement_GetTypeInfo,
1301     HTMLElement_GetIDsOfNames,
1302     HTMLElement_Invoke,
1303     HTMLElement_setAttribute,
1304     HTMLElement_getAttribute,
1305     HTMLElement_removeAttribute,
1306     HTMLElement_put_className,
1307     HTMLElement_get_className,
1308     HTMLElement_put_id,
1309     HTMLElement_get_id,
1310     HTMLElement_get_tagName,
1311     HTMLElement_get_parentElement,
1312     HTMLElement_get_style,
1313     HTMLElement_put_onhelp,
1314     HTMLElement_get_onhelp,
1315     HTMLElement_put_onclick,
1316     HTMLElement_get_onclick,
1317     HTMLElement_put_ondblclick,
1318     HTMLElement_get_ondblclick,
1319     HTMLElement_put_onkeydown,
1320     HTMLElement_get_onkeydown,
1321     HTMLElement_put_onkeyup,
1322     HTMLElement_get_onkeyup,
1323     HTMLElement_put_onkeypress,
1324     HTMLElement_get_onkeypress,
1325     HTMLElement_put_onmouseout,
1326     HTMLElement_get_onmouseout,
1327     HTMLElement_put_onmouseover,
1328     HTMLElement_get_onmouseover,
1329     HTMLElement_put_onmousemove,
1330     HTMLElement_get_onmousemove,
1331     HTMLElement_put_onmousedown,
1332     HTMLElement_get_onmousedown,
1333     HTMLElement_put_onmouseup,
1334     HTMLElement_get_onmouseup,
1335     HTMLElement_get_document,
1336     HTMLElement_put_title,
1337     HTMLElement_get_title,
1338     HTMLElement_put_language,
1339     HTMLElement_get_language,
1340     HTMLElement_put_onselectstart,
1341     HTMLElement_get_onselectstart,
1342     HTMLElement_scrollIntoView,
1343     HTMLElement_contains,
1344     HTMLElement_get_sourceIndex,
1345     HTMLElement_get_recordNumber,
1346     HTMLElement_put_lang,
1347     HTMLElement_get_lang,
1348     HTMLElement_get_offsetLeft,
1349     HTMLElement_get_offsetTop,
1350     HTMLElement_get_offsetWidth,
1351     HTMLElement_get_offsetHeight,
1352     HTMLElement_get_offsetParent,
1353     HTMLElement_put_innerHTML,
1354     HTMLElement_get_innerHTML,
1355     HTMLElement_put_innerText,
1356     HTMLElement_get_innerText,
1357     HTMLElement_put_outerHTML,
1358     HTMLElement_get_outerHTML,
1359     HTMLElement_put_outerText,
1360     HTMLElement_get_outerText,
1361     HTMLElement_insertAdjacentHTML,
1362     HTMLElement_insertAdjacentText,
1363     HTMLElement_get_parentTextEdit,
1364     HTMLElement_get_isTextEdit,
1365     HTMLElement_click,
1366     HTMLElement_get_filters,
1367     HTMLElement_put_ondragstart,
1368     HTMLElement_get_ondragstart,
1369     HTMLElement_toString,
1370     HTMLElement_put_onbeforeupdate,
1371     HTMLElement_get_onbeforeupdate,
1372     HTMLElement_put_onafterupdate,
1373     HTMLElement_get_onafterupdate,
1374     HTMLElement_put_onerrorupdate,
1375     HTMLElement_get_onerrorupdate,
1376     HTMLElement_put_onrowexit,
1377     HTMLElement_get_onrowexit,
1378     HTMLElement_put_onrowenter,
1379     HTMLElement_get_onrowenter,
1380     HTMLElement_put_ondatasetchanged,
1381     HTMLElement_get_ondatasetchanged,
1382     HTMLElement_put_ondataavailable,
1383     HTMLElement_get_ondataavailable,
1384     HTMLElement_put_ondatasetcomplete,
1385     HTMLElement_get_ondatasetcomplete,
1386     HTMLElement_put_onfilterchange,
1387     HTMLElement_get_onfilterchange,
1388     HTMLElement_get_children,
1389     HTMLElement_get_all
1390 };
1391
1392 HRESULT HTMLElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
1393 {
1394     HTMLElement *This = HTMLELEM_NODE_THIS(iface);
1395
1396     *ppv =  NULL;
1397
1398     if(IsEqualGUID(&IID_IUnknown, riid)) {
1399         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
1400         *ppv = HTMLELEM(This);
1401     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
1402         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
1403         *ppv = HTMLELEM(This);
1404     }else if(IsEqualGUID(&IID_IHTMLElement, riid)) {
1405         TRACE("(%p)->(IID_IHTMLElement %p)\n", This, ppv);
1406         *ppv = HTMLELEM(This);
1407     }else if(IsEqualGUID(&IID_IHTMLElement2, riid)) {
1408         TRACE("(%p)->(IID_IHTMLElement2 %p)\n", This, ppv);
1409         *ppv = HTMLELEM2(This);
1410     }else if(IsEqualGUID(&IID_IHTMLElement3, riid)) {
1411         TRACE("(%p)->(IID_IHTMLElement3 %p)\n", This, ppv);
1412         *ppv = HTMLELEM3(This);
1413     }else if(IsEqualGUID(&IID_IConnectionPointContainer, riid)) {
1414         TRACE("(%p)->(IID_IConnectionPointContainer %p)\n", This, ppv);
1415         *ppv = CONPTCONT(&This->cp_container);
1416     }
1417
1418     if(*ppv) {
1419         IHTMLElement_AddRef(HTMLELEM(This));
1420         return S_OK;
1421     }
1422
1423     return HTMLDOMNode_QI(&This->node, riid, ppv);
1424 }
1425
1426 void HTMLElement_destructor(HTMLDOMNode *iface)
1427 {
1428     HTMLElement *This = HTMLELEM_NODE_THIS(iface);
1429
1430     ConnectionPointContainer_Destroy(&This->cp_container);
1431
1432     if(This->nselem)
1433         nsIDOMHTMLElement_Release(This->nselem);
1434
1435     HTMLDOMNode_destructor(&This->node);
1436 }
1437
1438 static const NodeImplVtbl HTMLElementImplVtbl = {
1439     HTMLElement_QI,
1440     HTMLElement_destructor
1441 };
1442
1443 static const tid_t HTMLElement_iface_tids[] = {
1444     IHTMLDOMNode_tid,
1445     IHTMLDOMNode2_tid,
1446     IHTMLElement_tid,
1447     IHTMLElement2_tid,
1448     IHTMLElement3_tid,
1449     0
1450 };
1451
1452 static dispex_static_data_t HTMLElement_dispex = {
1453     NULL,
1454     DispHTMLUnknownElement_tid,
1455     NULL,
1456     HTMLElement_iface_tids
1457 };
1458
1459 void HTMLElement_Init(HTMLElement *This)
1460 {
1461     This->lpHTMLElementVtbl = &HTMLElementVtbl;
1462
1463     ConnectionPointContainer_Init(&This->cp_container, (IUnknown*)HTMLELEM(This));
1464
1465     HTMLElement2_Init(This);
1466     HTMLElement3_Init(This);
1467
1468     if(!This->node.dispex.data)
1469         init_dispex(&This->node.dispex, (IUnknown*)HTMLELEM(This), &HTMLElement_dispex);
1470 }
1471
1472 HTMLElement *HTMLElement_Create(HTMLDocument *doc, nsIDOMNode *nsnode, BOOL use_generic)
1473 {
1474     nsIDOMHTMLElement *nselem;
1475     HTMLElement *ret = NULL;
1476     nsAString class_name_str;
1477     const PRUnichar *class_name;
1478     nsresult nsres;
1479
1480     static const WCHAR wszA[]        = {'A',0};
1481     static const WCHAR wszBODY[]     = {'B','O','D','Y',0};
1482     static const WCHAR wszIFRAME[]   = {'I','F','R','A','M','E',0};
1483     static const WCHAR wszIMG[]      = {'I','M','G',0};
1484     static const WCHAR wszINPUT[]    = {'I','N','P','U','T',0};
1485     static const WCHAR wszOPTION[]   = {'O','P','T','I','O','N',0};
1486     static const WCHAR wszSCRIPT[]   = {'S','C','R','I','P','T',0};
1487     static const WCHAR wszSELECT[]   = {'S','E','L','E','C','T',0};
1488     static const WCHAR wszTABLE[]    = {'T','A','B','L','E',0};
1489     static const WCHAR wszTR[]       = {'T','R',0};
1490     static const WCHAR wszTEXTAREA[] = {'T','E','X','T','A','R','E','A',0};
1491
1492     nsres = nsIDOMNode_QueryInterface(nsnode, &IID_nsIDOMHTMLElement, (void**)&nselem);
1493     if(NS_FAILED(nsres))
1494         return NULL;
1495
1496     nsAString_Init(&class_name_str, NULL);
1497     nsIDOMHTMLElement_GetTagName(nselem, &class_name_str);
1498
1499     nsAString_GetData(&class_name_str, &class_name);
1500
1501     if(!strcmpW(class_name, wszA))
1502         ret = HTMLAnchorElement_Create(nselem);
1503     else if(!strcmpW(class_name, wszBODY))
1504         ret = HTMLBodyElement_Create(nselem);
1505     else if(!strcmpW(class_name, wszIFRAME))
1506         ret = HTMLIFrame_Create(nselem);
1507     else if(!strcmpW(class_name, wszIMG))
1508         ret = HTMLImgElement_Create(nselem);
1509     else if(!strcmpW(class_name, wszINPUT))
1510         ret = HTMLInputElement_Create(nselem);
1511     else if(!strcmpW(class_name, wszOPTION))
1512         ret = HTMLOptionElement_Create(nselem);
1513     else if(!strcmpW(class_name, wszSCRIPT))
1514         ret = HTMLScriptElement_Create(nselem);
1515     else if(!strcmpW(class_name, wszSELECT))
1516         ret = HTMLSelectElement_Create(nselem);
1517     else if(!strcmpW(class_name, wszTABLE))
1518         ret = HTMLTable_Create(nselem);
1519     else if(!strcmpW(class_name, wszTR))
1520         ret = HTMLTableRow_Create(nselem);
1521     else if(!strcmpW(class_name, wszTEXTAREA))
1522         ret = HTMLTextAreaElement_Create(nselem);
1523     else if(use_generic)
1524         ret = HTMLGenericElement_Create(nselem);
1525
1526     if(!ret) {
1527         ret = heap_alloc_zero(sizeof(HTMLElement));
1528         HTMLElement_Init(ret);
1529         ret->node.vtbl = &HTMLElementImplVtbl;
1530     }
1531
1532     TRACE("%s ret %p\n", debugstr_w(class_name), ret);
1533
1534     nsAString_Finish(&class_name_str);
1535
1536     ret->nselem = nselem;
1537     HTMLDOMNode_Init(doc, &ret->node, (nsIDOMNode*)nselem);
1538
1539     return ret;
1540 }