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 #include <stdarg.h>
  20 #include <assert.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
  33 #include "mshtml_private.h"
  34 #include "htmlevent.h"
  35 #include "htmlstyle.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  38
  39 static const WCHAR aW[]        = {'A',0};
  40 static const WCHAR bodyW[]     = {'B','O','D','Y',0};
  41 static const WCHAR buttonW[]   = {'B','U','T','T','O','N',0};
  42 static const WCHAR embedW[]    = {'E','M','B','E','D',0};
  43 static const WCHAR formW[]     = {'F','O','R','M',0};
  44 static const WCHAR frameW[]    = {'F','R','A','M','E',0};
  45 static const WCHAR headW[]     = {'H','E','A','D',0};
  46 static const WCHAR iframeW[]   = {'I','F','R','A','M','E',0};
  47 static const WCHAR imgW[]      = {'I','M','G',0};
  48 static const WCHAR inputW[]    = {'I','N','P','U','T',0};
  49 static const WCHAR labelW[]    = {'L','A','B','E','L',0};
  50 static const WCHAR linkW[]     = {'L','I','N','K',0};
  51 static const WCHAR metaW[]     = {'M','E','T','A',0};
  52 static const WCHAR objectW[]   = {'O','B','J','E','C','T',0};
  53 static const WCHAR optionW[]   = {'O','P','T','I','O','N',0};
  54 static const WCHAR scriptW[]   = {'S','C','R','I','P','T',0};
  55 static const WCHAR selectW[]   = {'S','E','L','E','C','T',0};
  56 static const WCHAR styleW[]    = {'S','T','Y','L','E',0};
  57 static const WCHAR tableW[]    = {'T','A','B','L','E',0};
  58 static const WCHAR tdW[]       = {'T','D',0};
  59 static const WCHAR textareaW[] = {'T','E','X','T','A','R','E','A',0};
  60 static const WCHAR title_tagW[]= {'T','I','T','L','E',0};
  61 static const WCHAR trW[]       = {'T','R',0};
  62
  63 typedef struct {
  64     const WCHAR *name;
  65     HRESULT (*constructor)(HTMLDocumentNode*,nsIDOMHTMLElement*,HTMLElement**);
  66 } tag_desc_t;
  67
  68 static const tag_desc_t tag_descs[] = {
  69     {aW,         HTMLAnchorElement_Create},
  70     {bodyW,      HTMLBodyElement_Create},
  71     {buttonW,    HTMLButtonElement_Create},
  72     {embedW,     HTMLEmbedElement_Create},
  73     {formW,      HTMLFormElement_Create},
  74     {frameW,     HTMLFrameElement_Create},
  75     {headW,      HTMLHeadElement_Create},
  76     {iframeW,    HTMLIFrame_Create},
  77     {imgW,       HTMLImgElement_Create},
  78     {inputW,     HTMLInputElement_Create},
  79     {labelW,     HTMLLabelElement_Create},
  80     {linkW,      HTMLLinkElement_Create},
  81     {metaW,      HTMLMetaElement_Create},
  82     {objectW,    HTMLObjectElement_Create},
  83     {optionW,    HTMLOptionElement_Create},
  84     {scriptW,    HTMLScriptElement_Create},
  85     {selectW,    HTMLSelectElement_Create},
  86     {styleW,     HTMLStyleElement_Create},
  87     {tableW,     HTMLTable_Create},
  88     {tdW,        HTMLTableCell_Create},
  89     {textareaW,  HTMLTextAreaElement_Create},
  90     {title_tagW, HTMLTitleElement_Create},
  91     {trW,        HTMLTableRow_Create}
  92 };
  93
  94 static const tag_desc_t *get_tag_desc(const WCHAR *tag_name)
  95 {
  96     DWORD min=0, max=sizeof(tag_descs)/sizeof(*tag_descs)-1, i;
  97     int r;
  98
  99     while(min <= max) {
 100         i = (min+max)/2;
 101         r = strcmpW(tag_name, tag_descs[i].name);
 102         if(!r)
 103             return tag_descs+i;
 104
 105         if(r < 0)
 106             max = i-1;
 107         else
 108             min = i+1;
 109     }
 110
 111     return NULL;
 112 }
 113
 114 HRESULT replace_node_by_html(nsIDOMHTMLDocument *nsdoc, nsIDOMNode *nsnode, const WCHAR *html)
 115 {
 116     nsIDOMDocumentFragment *nsfragment;
 117     nsIDOMNode *nsparent;
 118     nsIDOMRange *range;
 119     nsAString html_str;
 120     nsresult nsres;
 121     HRESULT hres = S_OK;
 122
 123     nsres = nsIDOMHTMLDocument_CreateRange(nsdoc, &range);
 124     if(NS_FAILED(nsres)) {
 125         ERR("CreateRange failed: %08x\n", nsres);
 126         return E_FAIL;
 127     }
 128
 129     nsAString_InitDepend(&html_str, html);
 130     nsIDOMRange_CreateContextualFragment(range, &html_str, &nsfragment);
 131     nsIDOMRange_Release(range);
 132     nsAString_Finish(&html_str);
 133     if(NS_FAILED(nsres)) {
 134         ERR("CreateContextualFragment failed: %08x\n", nsres);
 135         return E_FAIL;
 136     }
 137
 138     nsres = nsIDOMNode_GetParentNode(nsnode, &nsparent);
 139     if(NS_SUCCEEDED(nsres) && nsparent) {
 140         nsIDOMNode *nstmp;
 141
 142         nsres = nsIDOMNode_ReplaceChild(nsparent, (nsIDOMNode*)nsfragment, nsnode, &nstmp);
 143         nsIDOMNode_Release(nsparent);
 144         if(NS_FAILED(nsres)) {
 145             ERR("ReplaceChild failed: %08x\n", nsres);
 146             hres = E_FAIL;
 147         }else if(nstmp) {
 148             nsIDOMNode_Release(nstmp);
 149         }
 150     }else {
 151         ERR("GetParentNode failed: %08x\n", nsres);
 152         hres = E_FAIL;
 153     }
 154
 155     nsIDOMDocumentFragment_Release(nsfragment);
 156     return hres;
 157 }
 158
 159 nsresult get_elem_attr_value(nsIDOMHTMLElement *nselem, const WCHAR *name, nsAString *val_str, const PRUnichar **val)
 160 {
 161     nsAString name_str;
 162     nsresult nsres;
 163
 164     nsAString_InitDepend(&name_str, name);
 165     nsAString_Init(val_str, NULL);
 166     nsres = nsIDOMHTMLElement_GetAttribute(nselem, &name_str, val_str);
 167     nsAString_Finish(&name_str);
 168     if(NS_FAILED(nsres)) {
 169         ERR("GetAttribute(%s) failed: %08x\n", debugstr_w(name), nsres);
 170         nsAString_Finish(val_str);
 171         return nsres;
 172     }
 173
 174     nsAString_GetData(val_str, val);
 175     return NS_OK;
 176 }
 177
 178 HRESULT elem_string_attr_getter(HTMLElement *elem, const WCHAR *name, BOOL use_null, BSTR *p)
 179 {
 180     const PRUnichar *val;
 181     nsAString val_str;
 182     nsresult nsres;
 183     HRESULT hres = S_OK;
 184
 185     nsres = get_elem_attr_value(elem->nselem, name, &val_str, &val);
 186     if(NS_FAILED(nsres))
 187         return E_FAIL;
 188
 189     TRACE("%s: returning %s\n", debugstr_w(name), debugstr_w(val));
 190
 191     if(*val || !use_null) {
 192         *p = SysAllocString(val);
 193         if(!*p)
 194             hres = E_OUTOFMEMORY;
 195     }else {
 196         *p = NULL;
 197     }
 198     nsAString_Finish(&val_str);
 199     return hres;
 200 }
 201
 202 HRESULT elem_string_attr_setter(HTMLElement *elem, const WCHAR *name, const WCHAR *value)
 203 {
 204     nsAString name_str, val_str;
 205     nsresult nsres;
 206
 207     nsAString_InitDepend(&name_str, name);
 208     nsAString_InitDepend(&val_str, value);
 209     nsres = nsIDOMHTMLElement_SetAttribute(elem->nselem, &name_str, &val_str);
 210     nsAString_Finish(&name_str);
 211     nsAString_Finish(&val_str);
 212
 213     if(NS_FAILED(nsres)) {
 214         WARN("SetAttribute failed: %08x\n", nsres);
 215         return E_FAIL;
 216     }
 217
 218     return S_OK;
 219 }
 220
 221 typedef struct
 222 {
 223     DispatchEx dispex;
 224     IHTMLFiltersCollection IHTMLFiltersCollection_iface;
 225
 226     LONG ref;
 227 } HTMLFiltersCollection;
 228
 229 static inline HTMLFiltersCollection *impl_from_IHTMLFiltersCollection(IHTMLFiltersCollection *iface)
 230 {
 231     return CONTAINING_RECORD(iface, HTMLFiltersCollection, IHTMLFiltersCollection_iface);
 232 }
 233
 234 static IHTMLFiltersCollection *HTMLFiltersCollection_Create(void);
 235
 236 static inline HTMLElement *impl_from_IHTMLElement(IHTMLElement *iface)
 237 {
 238     return CONTAINING_RECORD(iface, HTMLElement, IHTMLElement_iface);
 239 }
 240
 241 HRESULT create_nselem(HTMLDocumentNode *doc, const WCHAR *tag, nsIDOMHTMLElement **ret)
 242 {
 243     nsIDOMElement *nselem;
 244     nsAString tag_str;
 245     nsresult nsres;
 246
 247     if(!doc->nsdoc) {
 248         WARN("NULL nsdoc\n");
 249         return E_UNEXPECTED;
 250     }
 251
 252     nsAString_InitDepend(&tag_str, tag);
 253     nsres = nsIDOMHTMLDocument_CreateElement(doc->nsdoc, &tag_str, &nselem);
 254     nsAString_Finish(&tag_str);
 255     if(NS_FAILED(nsres)) {
 256         ERR("CreateElement failed: %08x\n", nsres);
 257         return E_FAIL;
 258     }
 259
 260     nsres = nsIDOMElement_QueryInterface(nselem, &IID_nsIDOMHTMLElement, (void**)ret);
 261     nsIDOMElement_Release(nselem);
 262     if(NS_FAILED(nsres)) {
 263         ERR("Could not get nsIDOMHTMLElement iface: %08x\n", nsres);
 264         return E_FAIL;
 265     }
 266
 267     return S_OK;
 268 }
 269
 270 HRESULT create_element(HTMLDocumentNode *doc, const WCHAR *tag, HTMLElement **ret)
 271 {
 272     nsIDOMHTMLElement *nselem;
 273     HRESULT hres;
 274
 275     /* Use owner doc if called on document fragment */
 276     if(!doc->nsdoc)
 277         doc = doc->node.doc;
 278
 279     hres = create_nselem(doc, tag, &nselem);
 280     if(FAILED(hres))
 281         return hres;
 282
 283     hres = HTMLElement_Create(doc, (nsIDOMNode*)nselem, TRUE, ret);
 284     nsIDOMHTMLElement_Release(nselem);
 285     return hres;
 286 }
 287
 288 static HRESULT WINAPI HTMLElement_QueryInterface(IHTMLElement *iface,
 289                                                  REFIID riid, void **ppv)
 290 {
 291     HTMLElement *This = impl_from_IHTMLElement(iface);
 292
 293     return IHTMLDOMNode_QueryInterface(&This->node.IHTMLDOMNode_iface, riid, ppv);
 294 }
 295
 296 static ULONG WINAPI HTMLElement_AddRef(IHTMLElement *iface)
 297 {
 298     HTMLElement *This = impl_from_IHTMLElement(iface);
 299
 300     return IHTMLDOMNode_AddRef(&This->node.IHTMLDOMNode_iface);
 301 }
 302
 303 static ULONG WINAPI HTMLElement_Release(IHTMLElement *iface)
 304 {
 305     HTMLElement *This = impl_from_IHTMLElement(iface);
 306
 307     return IHTMLDOMNode_Release(&This->node.IHTMLDOMNode_iface);
 308 }
 309
 310 static HRESULT WINAPI HTMLElement_GetTypeInfoCount(IHTMLElement *iface, UINT *pctinfo)
 311 {
 312     HTMLElement *This = impl_from_IHTMLElement(iface);
 313     return IDispatchEx_GetTypeInfoCount(&This->node.dispex.IDispatchEx_iface, pctinfo);
 314 }
 315
 316 static HRESULT WINAPI HTMLElement_GetTypeInfo(IHTMLElement *iface, UINT iTInfo,
 317                                               LCID lcid, ITypeInfo **ppTInfo)
 318 {
 319     HTMLElement *This = impl_from_IHTMLElement(iface);
 320     return IDispatchEx_GetTypeInfo(&This->node.dispex.IDispatchEx_iface, iTInfo, lcid, ppTInfo);
 321 }
 322
 323 static HRESULT WINAPI HTMLElement_GetIDsOfNames(IHTMLElement *iface, REFIID riid,
 324                                                 LPOLESTR *rgszNames, UINT cNames,
 325                                                 LCID lcid, DISPID *rgDispId)
 326 {
 327     HTMLElement *This = impl_from_IHTMLElement(iface);
 328     return IDispatchEx_GetIDsOfNames(&This->node.dispex.IDispatchEx_iface, riid, rgszNames, cNames,
 329             lcid, rgDispId);
 330 }
 331
 332 static HRESULT WINAPI HTMLElement_Invoke(IHTMLElement *iface, DISPID dispIdMember,
 333                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 334                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 335 {
 336     HTMLElement *This = impl_from_IHTMLElement(iface);
 337     return IDispatchEx_Invoke(&This->node.dispex.IDispatchEx_iface, dispIdMember, riid, lcid,
 338             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 339 }
 340
 341 static HRESULT WINAPI HTMLElement_setAttribute(IHTMLElement *iface, BSTR strAttributeName,
 342                                                VARIANT AttributeValue, LONG lFlags)
 343 {
 344     HTMLElement *This = impl_from_IHTMLElement(iface);
 345     HRESULT hres;
 346     DISPID dispid, dispidNamed = DISPID_PROPERTYPUT;
 347     DISPPARAMS dispParams;
 348     EXCEPINFO excep;
 349
 350     TRACE("(%p)->(%s %s %08x)\n", This, debugstr_w(strAttributeName), debugstr_variant(&AttributeValue), lFlags);
 351
 352     hres = IDispatchEx_GetDispID(&This->node.dispex.IDispatchEx_iface, strAttributeName,
 353             fdexNameCaseInsensitive | fdexNameEnsure, &dispid);
 354     if(FAILED(hres))
 355         return hres;
 356
 357     dispParams.cArgs = 1;
 358     dispParams.cNamedArgs = 1;
 359     dispParams.rgdispidNamedArgs = &dispidNamed;
 360     dispParams.rgvarg = &AttributeValue;
 361
 362     hres = IDispatchEx_InvokeEx(&This->node.dispex.IDispatchEx_iface, dispid,
 363             LOCALE_SYSTEM_DEFAULT, DISPATCH_PROPERTYPUT, &dispParams, NULL, &excep, NULL);
 364     return hres;
 365 }
 366
 367 static HRESULT WINAPI HTMLElement_getAttribute(IHTMLElement *iface, BSTR strAttributeName,
 368                                                LONG lFlags, VARIANT *AttributeValue)
 369 {
 370     HTMLElement *This = impl_from_IHTMLElement(iface);
 371     DISPID dispid;
 372     HRESULT hres;
 373     DISPPARAMS dispParams = {NULL, NULL, 0, 0};
 374     EXCEPINFO excep;
 375
 376     TRACE("(%p)->(%s %08x %p)\n", This, debugstr_w(strAttributeName), lFlags, AttributeValue);
 377
 378     hres = IDispatchEx_GetDispID(&This->node.dispex.IDispatchEx_iface, strAttributeName,
 379             fdexNameCaseInsensitive, &dispid);
 380     if(hres == DISP_E_UNKNOWNNAME) {
 381         V_VT(AttributeValue) = VT_NULL;
 382         return S_OK;
 383     }
 384
 385     if(FAILED(hres)) {
 386         V_VT(AttributeValue) = VT_NULL;
 387         return hres;
 388     }
 389
 390     hres = IDispatchEx_InvokeEx(&This->node.dispex.IDispatchEx_iface, dispid, LOCALE_SYSTEM_DEFAULT,
 391             DISPATCH_PROPERTYGET, &dispParams, AttributeValue, &excep, NULL);
 392
 393     return hres;
 394 }
 395
 396 static HRESULT WINAPI HTMLElement_removeAttribute(IHTMLElement *iface, BSTR strAttributeName,
 397                                                   LONG lFlags, VARIANT_BOOL *pfSuccess)
 398 {
 399     HTMLElement *This = impl_from_IHTMLElement(iface);
 400
 401     TRACE("(%p)->(%s %x %p)\n", This, debugstr_w(strAttributeName), lFlags, pfSuccess);
 402
 403     return remove_prop(&This->node.dispex, strAttributeName, pfSuccess);
 404 }
 405
 406 static HRESULT WINAPI HTMLElement_put_className(IHTMLElement *iface, BSTR v)
 407 {
 408     HTMLElement *This = impl_from_IHTMLElement(iface);
 409     nsAString classname_str;
 410     nsresult nsres;
 411
 412     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 413
 414     if(!This->nselem) {
 415         FIXME("NULL nselem\n");
 416         return E_NOTIMPL;
 417     }
 418
 419     nsAString_InitDepend(&classname_str, v);
 420     nsres = nsIDOMHTMLElement_SetClassName(This->nselem, &classname_str);
 421     nsAString_Finish(&classname_str);
 422     if(NS_FAILED(nsres))
 423         ERR("SetClassName failed: %08x\n", nsres);
 424
 425     return S_OK;
 426 }
 427
 428 static HRESULT WINAPI HTMLElement_get_className(IHTMLElement *iface, BSTR *p)
 429 {
 430     HTMLElement *This = impl_from_IHTMLElement(iface);
 431     nsAString class_str;
 432     nsresult nsres;
 433
 434     TRACE("(%p)->(%p)\n", This, p);
 435
 436     if(!This->nselem) {
 437         FIXME("NULL nselem\n");
 438         return E_NOTIMPL;
 439     }
 440
 441     nsAString_Init(&class_str, NULL);
 442     nsres = nsIDOMHTMLElement_GetClassName(This->nselem, &class_str);
 443     return return_nsstr(nsres, &class_str, p);
 444 }
 445
 446 static HRESULT WINAPI HTMLElement_put_id(IHTMLElement *iface, BSTR v)
 447 {
 448     HTMLElement *This = impl_from_IHTMLElement(iface);
 449     nsAString id_str;
 450     nsresult nsres;
 451
 452     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 453
 454     if(!This->nselem) {
 455         FIXME("nselem == NULL\n");
 456         return S_OK;
 457     }
 458
 459     nsAString_InitDepend(&id_str, v);
 460     nsres = nsIDOMHTMLElement_SetId(This->nselem, &id_str);
 461     nsAString_Finish(&id_str);
 462     if(NS_FAILED(nsres))
 463         ERR("SetId failed: %08x\n", nsres);
 464
 465     return S_OK;
 466 }
 467
 468 static HRESULT WINAPI HTMLElement_get_id(IHTMLElement *iface, BSTR *p)
 469 {
 470     HTMLElement *This = impl_from_IHTMLElement(iface);
 471     nsAString id_str;
 472     nsresult nsres;
 473
 474     TRACE("(%p)->(%p)\n", This, p);
 475
 476     if(!This->nselem) {
 477         *p = NULL;
 478         return S_OK;
 479     }
 480
 481     nsAString_Init(&id_str, NULL);
 482     nsres = nsIDOMHTMLElement_GetId(This->nselem, &id_str);
 483     return return_nsstr(nsres, &id_str, p);
 484 }
 485
 486 static HRESULT WINAPI HTMLElement_get_tagName(IHTMLElement *iface, BSTR *p)
 487 {
 488     HTMLElement *This = impl_from_IHTMLElement(iface);
 489     nsAString tag_str;
 490     nsresult nsres;
 491
 492     TRACE("(%p)->(%p)\n", This, p);
 493
 494     if(!This->nselem) {
 495         static const WCHAR comment_tagW[] = {'!',0};
 496
 497         WARN("NULL nselem, assuming comment\n");
 498
 499         *p = SysAllocString(comment_tagW);
 500         return *p ? S_OK : E_OUTOFMEMORY;
 501     }
 502
 503     nsAString_Init(&tag_str, NULL);
 504     nsres = nsIDOMHTMLElement_GetTagName(This->nselem, &tag_str);
 505     return return_nsstr(nsres, &tag_str, p);
 506 }
 507
 508 static HRESULT WINAPI HTMLElement_get_parentElement(IHTMLElement *iface, IHTMLElement **p)
 509 {
 510     HTMLElement *This = impl_from_IHTMLElement(iface);
 511     IHTMLDOMNode *node;
 512     HRESULT hres;
 513
 514     TRACE("(%p)->(%p)\n", This, p);
 515
 516     hres = IHTMLDOMNode_get_parentNode(&This->node.IHTMLDOMNode_iface, &node);
 517     if(FAILED(hres))
 518         return hres;
 519
 520     hres = IHTMLDOMNode_QueryInterface(node, &IID_IHTMLElement, (void**)p);
 521     IHTMLDOMNode_Release(node);
 522     if(FAILED(hres))
 523         *p = NULL;
 524
 525     return S_OK;
 526 }
 527
 528 static HRESULT WINAPI HTMLElement_get_style(IHTMLElement *iface, IHTMLStyle **p)
 529 {
 530     HTMLElement *This = impl_from_IHTMLElement(iface);
 531
 532     TRACE("(%p)->(%p)\n", This, p);
 533
 534     if(!This->style) {
 535         HRESULT hres;
 536
 537         hres = HTMLStyle_Create(This, &This->style);
 538         if(FAILED(hres))
 539             return hres;
 540     }
 541
 542     *p = &This->style->IHTMLStyle_iface;
 543     IHTMLStyle_AddRef(*p);
 544     return S_OK;
 545 }
 546
 547 static HRESULT WINAPI HTMLElement_put_onhelp(IHTMLElement *iface, VARIANT v)
 548 {
 549     HTMLElement *This = impl_from_IHTMLElement(iface);
 550     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
 551     return E_NOTIMPL;
 552 }
 553
 554 static HRESULT WINAPI HTMLElement_get_onhelp(IHTMLElement *iface, VARIANT *p)
 555 {
 556     HTMLElement *This = impl_from_IHTMLElement(iface);
 557     FIXME("(%p)->(%p)\n", This, p);
 558     return E_NOTIMPL;
 559 }
 560
 561 static HRESULT WINAPI HTMLElement_put_onclick(IHTMLElement *iface, VARIANT v)
 562 {
 563     HTMLElement *This = impl_from_IHTMLElement(iface);
 564
 565     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 566
 567     return set_node_event(&This->node, EVENTID_CLICK, &v);
 568 }
 569
 570 static HRESULT WINAPI HTMLElement_get_onclick(IHTMLElement *iface, VARIANT *p)
 571 {
 572     HTMLElement *This = impl_from_IHTMLElement(iface);
 573
 574     TRACE("(%p)->(%p)\n", This, p);
 575
 576     return get_node_event(&This->node, EVENTID_CLICK, p);
 577 }
 578
 579 static HRESULT WINAPI HTMLElement_put_ondblclick(IHTMLElement *iface, VARIANT v)
 580 {
 581     HTMLElement *This = impl_from_IHTMLElement(iface);
 582
 583     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
 584
 585     return set_node_event(&This->node, EVENTID_DBLCLICK, &v);
 586 }
 587
 588 static HRESULT WINAPI HTMLElement_get_ondblclick(IHTMLElement *iface, VARIANT *p)
 589 {
 590     HTMLElement *This = impl_from_IHTMLElement(iface);
 591
 592     TRACE("(%p)->(%p)\n", This, p);
 593
 594     return get_node_event(&This->node, EVENTID_DBLCLICK, p);
 595 }
 596
 597 static HRESULT WINAPI HTMLElement_put_onkeydown(IHTMLElement *iface, VARIANT v)
 598 {
 599     HTMLElement *This = impl_from_IHTMLElement(iface);
 600
 601     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 602
 603     return set_node_event(&This->node, EVENTID_KEYDOWN, &v);
 604 }
 605
 606 static HRESULT WINAPI HTMLElement_get_onkeydown(IHTMLElement *iface, VARIANT *p)
 607 {
 608     HTMLElement *This = impl_from_IHTMLElement(iface);
 609
 610     TRACE("(%p)->(%p)\n", This, p);
 611
 612     return get_node_event(&This->node, EVENTID_KEYDOWN, p);
 613 }
 614
 615 static HRESULT WINAPI HTMLElement_put_onkeyup(IHTMLElement *iface, VARIANT v)
 616 {
 617     HTMLElement *This = impl_from_IHTMLElement(iface);
 618
 619     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 620
 621     return set_node_event(&This->node, EVENTID_KEYUP, &v);
 622 }
 623
 624 static HRESULT WINAPI HTMLElement_get_onkeyup(IHTMLElement *iface, VARIANT *p)
 625 {
 626     HTMLElement *This = impl_from_IHTMLElement(iface);
 627     FIXME("(%p)->(%p)\n", This, p);
 628     return E_NOTIMPL;
 629 }
 630
 631 static HRESULT WINAPI HTMLElement_put_onkeypress(IHTMLElement *iface, VARIANT v)
 632 {
 633     HTMLElement *This = impl_from_IHTMLElement(iface);
 634
 635     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 636
 637     return set_node_event(&This->node, EVENTID_KEYPRESS, &v);
 638 }
 639
 640 static HRESULT WINAPI HTMLElement_get_onkeypress(IHTMLElement *iface, VARIANT *p)
 641 {
 642     HTMLElement *This = impl_from_IHTMLElement(iface);
 643
 644     TRACE("(%p)->(%p)\n", This, p);
 645
 646     return get_node_event(&This->node, EVENTID_KEYPRESS, p);
 647 }
 648
 649 static HRESULT WINAPI HTMLElement_put_onmouseout(IHTMLElement *iface, VARIANT v)
 650 {
 651     HTMLElement *This = impl_from_IHTMLElement(iface);
 652
 653     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 654
 655     return set_node_event(&This->node, EVENTID_MOUSEOUT, &v);
 656 }
 657
 658 static HRESULT WINAPI HTMLElement_get_onmouseout(IHTMLElement *iface, VARIANT *p)
 659 {
 660     HTMLElement *This = impl_from_IHTMLElement(iface);
 661
 662     TRACE("(%p)->(%p)\n", This, p);
 663
 664     return get_node_event(&This->node, EVENTID_MOUSEOUT, p);
 665 }
 666
 667 static HRESULT WINAPI HTMLElement_put_onmouseover(IHTMLElement *iface, VARIANT v)
 668 {
 669     HTMLElement *This = impl_from_IHTMLElement(iface);
 670
 671     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 672
 673     return set_node_event(&This->node, EVENTID_MOUSEOVER, &v);
 674 }
 675
 676 static HRESULT WINAPI HTMLElement_get_onmouseover(IHTMLElement *iface, VARIANT *p)
 677 {
 678     HTMLElement *This = impl_from_IHTMLElement(iface);
 679
 680     TRACE("(%p)->(%p)\n", This, p);
 681
 682     return get_node_event(&This->node, EVENTID_MOUSEOVER, p);
 683 }
 684
 685 static HRESULT WINAPI HTMLElement_put_onmousemove(IHTMLElement *iface, VARIANT v)
 686 {
 687     HTMLElement *This = impl_from_IHTMLElement(iface);
 688
 689     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 690
 691     return set_node_event(&This->node, EVENTID_MOUSEMOVE, &v);
 692 }
 693
 694 static HRESULT WINAPI HTMLElement_get_onmousemove(IHTMLElement *iface, VARIANT *p)
 695 {
 696     HTMLElement *This = impl_from_IHTMLElement(iface);
 697
 698     TRACE("(%p)->(%p)\n", This, p);
 699
 700     return get_node_event(&This->node, EVENTID_MOUSEMOVE, p);
 701 }
 702
 703 static HRESULT WINAPI HTMLElement_put_onmousedown(IHTMLElement *iface, VARIANT v)
 704 {
 705     HTMLElement *This = impl_from_IHTMLElement(iface);
 706
 707     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 708
 709     return set_node_event(&This->node, EVENTID_MOUSEDOWN, &v);
 710 }
 711
 712 static HRESULT WINAPI HTMLElement_get_onmousedown(IHTMLElement *iface, VARIANT *p)
 713 {
 714     HTMLElement *This = impl_from_IHTMLElement(iface);
 715
 716     TRACE("(%p)->(%p)\n", This, p);
 717
 718     return get_node_event(&This->node, EVENTID_MOUSEDOWN, p);
 719 }
 720
 721 static HRESULT WINAPI HTMLElement_put_onmouseup(IHTMLElement *iface, VARIANT v)
 722 {
 723     HTMLElement *This = impl_from_IHTMLElement(iface);
 724
 725     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 726
 727     return set_node_event(&This->node, EVENTID_MOUSEUP, &v);
 728 }
 729
 730 static HRESULT WINAPI HTMLElement_get_onmouseup(IHTMLElement *iface, VARIANT *p)
 731 {
 732     HTMLElement *This = impl_from_IHTMLElement(iface);
 733
 734     TRACE("(%p)->(%p)\n", This, p);
 735
 736     return get_node_event(&This->node, EVENTID_MOUSEUP, p);
 737 }
 738
 739 static HRESULT WINAPI HTMLElement_get_document(IHTMLElement *iface, IDispatch **p)
 740 {
 741     HTMLElement *This = impl_from_IHTMLElement(iface);
 742
 743     TRACE("(%p)->(%p)\n", This, p);
 744
 745     if(!p)
 746         return E_POINTER;
 747
 748     if(This->node.vtbl->get_document)
 749         return This->node.vtbl->get_document(&This->node, p);
 750
 751     *p = (IDispatch*)&This->node.doc->basedoc.IHTMLDocument2_iface;
 752     IDispatch_AddRef(*p);
 753     return S_OK;
 754 }
 755
 756 static const WCHAR titleW[] = {'t','i','t','l','e',0};
 757
 758 static HRESULT WINAPI HTMLElement_put_title(IHTMLElement *iface, BSTR v)
 759 {
 760     HTMLElement *This = impl_from_IHTMLElement(iface);
 761     nsAString title_str;
 762     nsresult nsres;
 763
 764     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 765
 766     if(!This->nselem) {
 767         VARIANT *var;
 768         HRESULT hres;
 769
 770         hres = dispex_get_dprop_ref(&This->node.dispex, titleW, TRUE, &var);
 771         if(FAILED(hres))
 772             return hres;
 773
 774         VariantClear(var);
 775         V_VT(var) = VT_BSTR;
 776         V_BSTR(var) = v ? SysAllocString(v) : NULL;
 777         return S_OK;
 778     }
 779
 780     nsAString_InitDepend(&title_str, v);
 781     nsres = nsIDOMHTMLElement_SetTitle(This->nselem, &title_str);
 782     nsAString_Finish(&title_str);
 783     if(NS_FAILED(nsres))
 784         ERR("SetTitle failed: %08x\n", nsres);
 785
 786     return S_OK;
 787 }
 788
 789 static HRESULT WINAPI HTMLElement_get_title(IHTMLElement *iface, BSTR *p)
 790 {
 791     HTMLElement *This = impl_from_IHTMLElement(iface);
 792     nsAString title_str;
 793     nsresult nsres;
 794
 795     TRACE("(%p)->(%p)\n", This, p);
 796
 797     if(!This->nselem) {
 798         VARIANT *var;
 799         HRESULT hres;
 800
 801         hres = dispex_get_dprop_ref(&This->node.dispex, titleW, FALSE, &var);
 802         if(hres == DISP_E_UNKNOWNNAME) {
 803             *p = NULL;
 804         }else if(V_VT(var) != VT_BSTR) {
 805             FIXME("title = %s\n", debugstr_variant(var));
 806             return E_FAIL;
 807         }else {
 808             *p = V_BSTR(var) ? SysAllocString(V_BSTR(var)) : NULL;
 809         }
 810
 811         return S_OK;
 812     }
 813
 814     nsAString_Init(&title_str, NULL);
 815     nsres = nsIDOMHTMLElement_GetTitle(This->nselem, &title_str);
 816     return return_nsstr(nsres, &title_str, p);
 817 }
 818
 819 static HRESULT WINAPI HTMLElement_put_language(IHTMLElement *iface, BSTR v)
 820 {
 821     HTMLElement *This = impl_from_IHTMLElement(iface);
 822     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 823     return E_NOTIMPL;
 824 }
 825
 826 static HRESULT WINAPI HTMLElement_get_language(IHTMLElement *iface, BSTR *p)
 827 {
 828     HTMLElement *This = impl_from_IHTMLElement(iface);
 829     FIXME("(%p)->(%p)\n", This, p);
 830     return E_NOTIMPL;
 831 }
 832
 833 static HRESULT WINAPI HTMLElement_put_onselectstart(IHTMLElement *iface, VARIANT v)
 834 {
 835     HTMLElement *This = impl_from_IHTMLElement(iface);
 836
 837     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 838
 839     return set_node_event(&This->node, EVENTID_SELECTSTART, &v);
 840 }
 841
 842 static HRESULT WINAPI HTMLElement_get_onselectstart(IHTMLElement *iface, VARIANT *p)
 843 {
 844     HTMLElement *This = impl_from_IHTMLElement(iface);
 845
 846     TRACE("(%p)->(%p)\n", This, p);
 847
 848     return get_node_event(&This->node, EVENTID_SELECTSTART, p);
 849 }
 850
 851 static HRESULT WINAPI HTMLElement_scrollIntoView(IHTMLElement *iface, VARIANT varargStart)
 852 {
 853     HTMLElement *This = impl_from_IHTMLElement(iface);
 854     cpp_bool start = TRUE;
 855     nsresult nsres;
 856
 857     TRACE("(%p)->(%s)\n", This, debugstr_variant(&varargStart));
 858
 859     switch(V_VT(&varargStart)) {
 860     case VT_EMPTY:
 861     case VT_ERROR:
 862         break;
 863     case VT_BOOL:
 864         start = V_BOOL(&varargStart) != VARIANT_FALSE;
 865         break;
 866     default:
 867         FIXME("Unsupported argument %s\n", debugstr_variant(&varargStart));
 868     }
 869
 870     if(!This->nselem) {
 871         FIXME("Unsupported for comments\n");
 872         return E_NOTIMPL;
 873     }
 874
 875     nsres = nsIDOMHTMLElement_ScrollIntoView(This->nselem, start, 1);
 876     assert(nsres == NS_OK);
 877
 878     return S_OK;
 879 }
 880
 881 static HRESULT WINAPI HTMLElement_contains(IHTMLElement *iface, IHTMLElement *pChild,
 882                                            VARIANT_BOOL *pfResult)
 883 {
 884     HTMLElement *This = impl_from_IHTMLElement(iface);
 885     cpp_bool result = FALSE;
 886
 887     TRACE("(%p)->(%p %p)\n", This, pChild, pfResult);
 888
 889     if(pChild) {
 890         HTMLElement *child;
 891         nsresult nsres;
 892
 893         child = unsafe_impl_from_IHTMLElement(pChild);
 894         if(!child) {
 895             ERR("not our element\n");
 896             return E_FAIL;
 897         }
 898
 899         nsres = nsIDOMNode_Contains(This->node.nsnode, child->node.nsnode, &result);
 900         assert(nsres == NS_OK);
 901     }
 902
 903     *pfResult = result ? VARIANT_TRUE : VARIANT_FALSE;
 904     return S_OK;
 905 }
 906
 907 static HRESULT WINAPI HTMLElement_get_sourceIndex(IHTMLElement *iface, LONG *p)
 908 {
 909     HTMLElement *This = impl_from_IHTMLElement(iface);
 910
 911     TRACE("(%p)->(%p)\n", This, p);
 912
 913     return get_elem_source_index(This, p);
 914 }
 915
 916 static HRESULT WINAPI HTMLElement_get_recordNumber(IHTMLElement *iface, VARIANT *p)
 917 {
 918     HTMLElement *This = impl_from_IHTMLElement(iface);
 919     FIXME("(%p)->(%p)\n", This, p);
 920     return E_NOTIMPL;
 921 }
 922
 923 static HRESULT WINAPI HTMLElement_put_lang(IHTMLElement *iface, BSTR v)
 924 {
 925     HTMLElement *This = impl_from_IHTMLElement(iface);
 926     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 927     return E_NOTIMPL;
 928 }
 929
 930 static HRESULT WINAPI HTMLElement_get_lang(IHTMLElement *iface, BSTR *p)
 931 {
 932     HTMLElement *This = impl_from_IHTMLElement(iface);
 933     FIXME("(%p)->(%p)\n", This, p);
 934     return E_NOTIMPL;
 935 }
 936
 937 static HRESULT WINAPI HTMLElement_get_offsetLeft(IHTMLElement *iface, LONG *p)
 938 {
 939     HTMLElement *This = impl_from_IHTMLElement(iface);
 940     nsresult nsres;
 941
 942     TRACE("(%p)->(%p)\n", This, p);
 943
 944     nsres = nsIDOMHTMLElement_GetOffsetLeft(This->nselem, p);
 945     if(NS_FAILED(nsres)) {
 946         ERR("GetOffsetLeft failed: %08x\n", nsres);
 947         return E_FAIL;
 948     }
 949
 950     return S_OK;
 951 }
 952
 953 static HRESULT WINAPI HTMLElement_get_offsetTop(IHTMLElement *iface, LONG *p)
 954 {
 955     HTMLElement *This = impl_from_IHTMLElement(iface);
 956     nsresult nsres;
 957
 958     TRACE("(%p)->(%p)\n", This, p);
 959
 960     nsres = nsIDOMHTMLElement_GetOffsetTop(This->nselem, p);
 961     if(NS_FAILED(nsres)) {
 962         ERR("GetOffsetTop failed: %08x\n", nsres);
 963         return E_FAIL;
 964     }
 965
 966     return S_OK;
 967 }
 968
 969 static HRESULT WINAPI HTMLElement_get_offsetWidth(IHTMLElement *iface, LONG *p)
 970 {
 971     HTMLElement *This = impl_from_IHTMLElement(iface);
 972     nsresult nsres;
 973
 974     TRACE("(%p)->(%p)\n", This, p);
 975
 976     nsres = nsIDOMHTMLElement_GetOffsetWidth(This->nselem, p);
 977     if(NS_FAILED(nsres)) {
 978         ERR("GetOffsetWidth failed: %08x\n", nsres);
 979         return E_FAIL;
 980     }
 981
 982     return S_OK;
 983 }
 984
 985 static HRESULT WINAPI HTMLElement_get_offsetHeight(IHTMLElement *iface, LONG *p)
 986 {
 987     HTMLElement *This = impl_from_IHTMLElement(iface);
 988     nsresult nsres;
 989
 990     TRACE("(%p)->(%p)\n", This, p);
 991
 992     nsres = nsIDOMHTMLElement_GetOffsetHeight(This->nselem, p);
 993     if(NS_FAILED(nsres)) {
 994         ERR("GetOffsetHeight failed: %08x\n", nsres);
 995         return E_FAIL;
 996     }
 997
 998     return S_OK;
 999 }
1000
1001 static HRESULT WINAPI HTMLElement_get_offsetParent(IHTMLElement *iface, IHTMLElement **p)
1002 {
1003     HTMLElement *This = impl_from_IHTMLElement(iface);
1004     nsIDOMElement *nsparent;
1005     nsresult nsres;
1006     HRESULT hres;
1007
1008     TRACE("(%p)->(%p)\n", This, p);
1009
1010     nsres = nsIDOMHTMLElement_GetOffsetParent(This->nselem, &nsparent);
1011     if(NS_FAILED(nsres)) {
1012         ERR("GetOffsetParent failed: %08x\n", nsres);
1013         return E_FAIL;
1014     }
1015
1016     if(nsparent) {
1017         HTMLDOMNode *node;
1018
1019         hres = get_node(This->node.doc, (nsIDOMNode*)nsparent, TRUE, &node);
1020         nsIDOMElement_Release(nsparent);
1021         if(FAILED(hres))
1022             return hres;
1023
1024         hres = IHTMLDOMNode_QueryInterface(&node->IHTMLDOMNode_iface, &IID_IHTMLElement, (void**)p);
1025         node_release(node);
1026     }else {
1027         *p = NULL;
1028         hres = S_OK;
1029     }
1030
1031     return hres;
1032 }
1033
1034 static HRESULT WINAPI HTMLElement_put_innerHTML(IHTMLElement *iface, BSTR v)
1035 {
1036     HTMLElement *This = impl_from_IHTMLElement(iface);
1037     nsAString html_str;
1038     nsresult nsres;
1039
1040     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
1041
1042     if(!This->nselem) {
1043         FIXME("NULL nselem\n");
1044         return E_NOTIMPL;
1045     }
1046
1047     nsAString_InitDepend(&html_str, v);
1048     nsres = nsIDOMHTMLElement_SetInnerHTML(This->nselem, &html_str);
1049     nsAString_Finish(&html_str);
1050     if(NS_FAILED(nsres)) {
1051         FIXME("SetInnerHtml failed %08x\n", nsres);
1052         return E_FAIL;
1053     }
1054
1055     return S_OK;
1056 }
1057
1058 static HRESULT WINAPI HTMLElement_get_innerHTML(IHTMLElement *iface, BSTR *p)
1059 {
1060     HTMLElement *This = impl_from_IHTMLElement(iface);
1061     nsAString html_str;
1062     nsresult nsres;
1063
1064     TRACE("(%p)->(%p)\n", This, p);
1065
1066     if(!This->nselem) {
1067         FIXME("NULL nselem\n");
1068         return E_NOTIMPL;
1069     }
1070
1071     nsAString_Init(&html_str, NULL);
1072     nsres = nsIDOMHTMLElement_GetInnerHTML(This->nselem, &html_str);
1073     return return_nsstr(nsres, &html_str, p);
1074 }
1075
1076 static HRESULT WINAPI HTMLElement_put_innerText(IHTMLElement *iface, BSTR v)
1077 {
1078     HTMLElement *This = impl_from_IHTMLElement(iface);
1079     nsIDOMNode *nschild, *tmp;
1080     nsIDOMText *text_node;
1081     nsAString text_str;
1082     nsresult nsres;
1083
1084     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
1085
1086     while(1) {
1087         nsres = nsIDOMHTMLElement_GetLastChild(This->nselem, &nschild);
1088         if(NS_FAILED(nsres)) {
1089             ERR("GetLastChild failed: %08x\n", nsres);
1090             return E_FAIL;
1091         }
1092         if(!nschild)
1093             break;
1094
1095         nsres = nsIDOMHTMLElement_RemoveChild(This->nselem, nschild, &tmp);
1096         nsIDOMNode_Release(nschild);
1097         if(NS_FAILED(nsres)) {
1098             ERR("RemoveChild failed: %08x\n", nsres);
1099             return E_FAIL;
1100         }
1101         nsIDOMNode_Release(tmp);
1102     }
1103
1104     nsAString_InitDepend(&text_str, v);
1105     nsres = nsIDOMHTMLDocument_CreateTextNode(This->node.doc->nsdoc, &text_str, &text_node);
1106     nsAString_Finish(&text_str);
1107     if(NS_FAILED(nsres)) {
1108         ERR("CreateTextNode failed: %08x\n", nsres);
1109         return E_FAIL;
1110     }
1111
1112     nsres = nsIDOMHTMLElement_AppendChild(This->nselem, (nsIDOMNode*)text_node, &tmp);
1113     if(NS_FAILED(nsres)) {
1114         ERR("AppendChild failed: %08x\n", nsres);
1115         return E_FAIL;
1116     }
1117
1118     nsIDOMNode_Release(tmp);
1119     return S_OK;
1120 }
1121
1122 static HRESULT WINAPI HTMLElement_get_innerText(IHTMLElement *iface, BSTR *p)
1123 {
1124     HTMLElement *This = impl_from_IHTMLElement(iface);
1125
1126     TRACE("(%p)->(%p)\n", This, p);
1127
1128     return get_node_text(&This->node, p);
1129 }
1130
1131 static HRESULT WINAPI HTMLElement_put_outerHTML(IHTMLElement *iface, BSTR v)
1132 {
1133     HTMLElement *This = impl_from_IHTMLElement(iface);
1134
1135     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
1136
1137     return replace_node_by_html(This->node.doc->nsdoc, This->node.nsnode, v);
1138 }
1139
1140 static HRESULT WINAPI HTMLElement_get_outerHTML(IHTMLElement *iface, BSTR *p)
1141 {
1142     HTMLElement *This = impl_from_IHTMLElement(iface);
1143     nsAString html_str;
1144     HRESULT hres;
1145
1146     WARN("(%p)->(%p) semi-stub\n", This, p);
1147
1148     nsAString_Init(&html_str, NULL);
1149     hres = nsnode_to_nsstring(This->node.nsnode, &html_str);
1150     if(SUCCEEDED(hres)) {
1151         const PRUnichar *html;
1152
1153         nsAString_GetData(&html_str, &html);
1154         *p = SysAllocString(html);
1155         if(!*p)
1156             hres = E_OUTOFMEMORY;
1157     }
1158
1159     nsAString_Finish(&html_str);
1160
1161     TRACE("ret %s\n", debugstr_w(*p));
1162     return hres;
1163 }
1164
1165 static HRESULT WINAPI HTMLElement_put_outerText(IHTMLElement *iface, BSTR v)
1166 {
1167     HTMLElement *This = impl_from_IHTMLElement(iface);
1168     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
1169     return E_NOTIMPL;
1170 }
1171
1172 static HRESULT WINAPI HTMLElement_get_outerText(IHTMLElement *iface, BSTR *p)
1173 {
1174     HTMLElement *This = impl_from_IHTMLElement(iface);
1175     FIXME("(%p)->(%p)\n", This, p);
1176     return E_NOTIMPL;
1177 }
1178
1179 HRESULT insert_adjacent_node(HTMLElement *This, const WCHAR *where, nsIDOMNode *nsnode, HTMLDOMNode **ret_node)
1180 {
1181     nsIDOMNode *ret_nsnode;
1182     nsresult nsres;
1183     HRESULT hres = S_OK;
1184
1185     static const WCHAR beforebeginW[] = {'b','e','f','o','r','e','b','e','g','i','n',0};
1186     static const WCHAR afterbeginW[] = {'a','f','t','e','r','b','e','g','i','n',0};
1187     static const WCHAR beforeendW[] = {'b','e','f','o','r','e','e','n','d',0};
1188     static const WCHAR afterendW[] = {'a','f','t','e','r','e','n','d',0};
1189
1190     if (!strcmpiW(where, beforebeginW)) {
1191         nsIDOMNode *parent;
1192
1193         nsres = nsIDOMNode_GetParentNode(This->node.nsnode, &parent);
1194         if(NS_FAILED(nsres))
1195             return E_FAIL;
1196
1197         if(!parent)
1198             return E_INVALIDARG;
1199
1200         nsres = nsIDOMNode_InsertBefore(parent, nsnode, This->node.nsnode, &ret_nsnode);
1201         nsIDOMNode_Release(parent);
1202     }else if(!strcmpiW(where, afterbeginW)) {
1203         nsIDOMNode *first_child;
1204
1205         nsres = nsIDOMNode_GetFirstChild(This->node.nsnode, &first_child);
1206         if(NS_FAILED(nsres))
1207             return E_FAIL;
1208
1209         nsres = nsIDOMNode_InsertBefore(This->node.nsnode, nsnode, first_child, &ret_nsnode);
1210         if(NS_FAILED(nsres))
1211             return E_FAIL;
1212
1213         if (first_child)
1214             nsIDOMNode_Release(first_child);
1215     }else if (!strcmpiW(where, beforeendW)) {
1216         nsres = nsIDOMNode_AppendChild(This->node.nsnode, nsnode, &ret_nsnode);
1217     }else if (!strcmpiW(where, afterendW)) {
1218         nsIDOMNode *next_sibling, *parent;
1219
1220         nsres = nsIDOMNode_GetParentNode(This->node.nsnode, &parent);
1221         if(NS_FAILED(nsres))
1222             return E_FAIL;
1223         if(!parent)
1224             return E_INVALIDARG;
1225
1226         nsres = nsIDOMNode_GetNextSibling(This->node.nsnode, &next_sibling);
1227         if(NS_SUCCEEDED(nsres)) {
1228             if(next_sibling) {
1229                 nsres = nsIDOMNode_InsertBefore(parent, nsnode, next_sibling, &ret_nsnode);
1230                 nsIDOMNode_Release(next_sibling);
1231             }else {
1232                 nsres = nsIDOMNode_AppendChild(parent, nsnode, &ret_nsnode);
1233             }
1234         }
1235
1236         nsIDOMNode_Release(parent);
1237     }else {
1238         ERR("invalid where: %s\n", debugstr_w(where));
1239         return E_INVALIDARG;
1240     }
1241
1242     if (NS_FAILED(nsres))
1243         return E_FAIL;
1244
1245     if(ret_node)
1246         hres = get_node(This->node.doc, ret_nsnode, TRUE, ret_node);
1247     nsIDOMNode_Release(ret_nsnode);
1248     return hres;
1249 }
1250
1251 static HRESULT WINAPI HTMLElement_insertAdjacentHTML(IHTMLElement *iface, BSTR where,
1252                                                      BSTR html)
1253 {
1254     HTMLElement *This = impl_from_IHTMLElement(iface);
1255     nsIDOMRange *range;
1256     nsIDOMNode *nsnode;
1257     nsAString ns_html;
1258     nsresult nsres;
1259     HRESULT hr;
1260
1261     TRACE("(%p)->(%s %s)\n", This, debugstr_w(where), debugstr_w(html));
1262
1263     if(!This->node.doc->nsdoc) {
1264         WARN("NULL nsdoc\n");
1265         return E_UNEXPECTED;
1266     }
1267
1268     nsres = nsIDOMHTMLDocument_CreateRange(This->node.doc->nsdoc, &range);
1269     if(NS_FAILED(nsres))
1270     {
1271         ERR("CreateRange failed: %08x\n", nsres);
1272         return E_FAIL;
1273     }
1274
1275     nsIDOMRange_SetStartBefore(range, This->node.nsnode);
1276
1277     nsAString_InitDepend(&ns_html, html);
1278     nsres = nsIDOMRange_CreateContextualFragment(range, &ns_html, (nsIDOMDocumentFragment **)&nsnode);
1279     nsAString_Finish(&ns_html);
1280     nsIDOMRange_Release(range);
1281
1282     if(NS_FAILED(nsres) || !nsnode)
1283     {
1284         ERR("CreateTextNode failed: %08x\n", nsres);
1285         return E_FAIL;
1286     }
1287
1288     hr = insert_adjacent_node(This, where, nsnode, NULL);
1289     nsIDOMNode_Release(nsnode);
1290     return hr;
1291 }
1292
1293 static HRESULT WINAPI HTMLElement_insertAdjacentText(IHTMLElement *iface, BSTR where,
1294                                                      BSTR text)
1295 {
1296     HTMLElement *This = impl_from_IHTMLElement(iface);
1297     nsIDOMNode *nsnode;
1298     nsAString ns_text;
1299     nsresult nsres;
1300     HRESULT hr;
1301
1302     TRACE("(%p)->(%s %s)\n", This, debugstr_w(where), debugstr_w(text));
1303
1304     if(!This->node.doc->nsdoc) {
1305         WARN("NULL nsdoc\n");
1306         return E_UNEXPECTED;
1307     }
1308
1309
1310     nsAString_InitDepend(&ns_text, text);
1311     nsres = nsIDOMHTMLDocument_CreateTextNode(This->node.doc->nsdoc, &ns_text, (nsIDOMText **)&nsnode);
1312     nsAString_Finish(&ns_text);
1313
1314     if(NS_FAILED(nsres) || !nsnode)
1315     {
1316         ERR("CreateTextNode failed: %08x\n", nsres);
1317         return E_FAIL;
1318     }
1319
1320     hr = insert_adjacent_node(This, where, nsnode, NULL);
1321     nsIDOMNode_Release(nsnode);
1322
1323     return hr;
1324 }
1325
1326 static HRESULT WINAPI HTMLElement_get_parentTextEdit(IHTMLElement *iface, IHTMLElement **p)
1327 {
1328     HTMLElement *This = impl_from_IHTMLElement(iface);
1329     FIXME("(%p)->(%p)\n", This, p);
1330     return E_NOTIMPL;
1331 }
1332
1333 static HRESULT WINAPI HTMLElement_get_isTextEdit(IHTMLElement *iface, VARIANT_BOOL *p)
1334 {
1335     HTMLElement *This = impl_from_IHTMLElement(iface);
1336     FIXME("(%p)->(%p)\n", This, p);
1337     return E_NOTIMPL;
1338 }
1339
1340 static HRESULT WINAPI HTMLElement_click(IHTMLElement *iface)
1341 {
1342     HTMLElement *This = impl_from_IHTMLElement(iface);
1343
1344     TRACE("(%p)\n", This);
1345
1346     return call_fire_event(&This->node, EVENTID_CLICK);
1347 }
1348
1349 static HRESULT WINAPI HTMLElement_get_filters(IHTMLElement *iface,
1350                                               IHTMLFiltersCollection **p)
1351 {
1352     HTMLElement *This = impl_from_IHTMLElement(iface);
1353     TRACE("(%p)->(%p)\n", This, p);
1354
1355     if(!p)
1356         return E_POINTER;
1357
1358     *p = HTMLFiltersCollection_Create();
1359
1360     return S_OK;
1361 }
1362
1363 static HRESULT WINAPI HTMLElement_put_ondragstart(IHTMLElement *iface, VARIANT v)
1364 {
1365     HTMLElement *This = impl_from_IHTMLElement(iface);
1366     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
1367     return E_NOTIMPL;
1368 }
1369
1370 static HRESULT WINAPI HTMLElement_get_ondragstart(IHTMLElement *iface, VARIANT *p)
1371 {
1372     HTMLElement *This = impl_from_IHTMLElement(iface);
1373     FIXME("(%p)->(%p)\n", This, p);
1374     return E_NOTIMPL;
1375 }
1376
1377 static HRESULT WINAPI HTMLElement_toString(IHTMLElement *iface, BSTR *String)
1378 {
1379     HTMLElement *This = impl_from_IHTMLElement(iface);
1380     FIXME("(%p)->(%p)\n", This, String);
1381     return E_NOTIMPL;
1382 }
1383
1384 static HRESULT WINAPI HTMLElement_put_onbeforeupdate(IHTMLElement *iface, VARIANT v)
1385 {
1386     HTMLElement *This = impl_from_IHTMLElement(iface);
1387     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
1388     return E_NOTIMPL;
1389 }
1390
1391 static HRESULT WINAPI HTMLElement_get_onbeforeupdate(IHTMLElement *iface, VARIANT *p)
1392 {
1393     HTMLElement *This = impl_from_IHTMLElement(iface);
1394     FIXME("(%p)->(%p)\n", This, p);
1395     return E_NOTIMPL;
1396 }
1397
1398 static HRESULT WINAPI HTMLElement_put_onafterupdate(IHTMLElement *iface, VARIANT v)
1399 {
1400     HTMLElement *This = impl_from_IHTMLElement(iface);
1401     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
1402     return E_NOTIMPL;
1403 }
1404
1405 static HRESULT WINAPI HTMLElement_get_onafterupdate(IHTMLElement *iface, VARIANT *p)
1406 {
1407     HTMLElement *This = impl_from_IHTMLElement(iface);
1408     FIXME("(%p)->(%p)\n", This, p);
1409     return E_NOTIMPL;
1410 }
1411
1412 static HRESULT WINAPI HTMLElement_put_onerrorupdate(IHTMLElement *iface, VARIANT v)
1413 {
1414     HTMLElement *This = impl_from_IHTMLElement(iface);
1415     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
1416     return E_NOTIMPL;
1417 }
1418
1419 static HRESULT WINAPI HTMLElement_get_onerrorupdate(IHTMLElement *iface, VARIANT *p)
1420 {
1421     HTMLElement *This = impl_from_IHTMLElement(iface);
1422     FIXME("(%p)->(%p)\n", This, p);
1423     return E_NOTIMPL;
1424 }
1425
1426 static HRESULT WINAPI HTMLElement_put_onrowexit(IHTMLElement *iface, VARIANT v)
1427 {
1428     HTMLElement *This = impl_from_IHTMLElement(iface);
1429     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
1430     return E_NOTIMPL;
1431 }
1432
1433 static HRESULT WINAPI HTMLElement_get_onrowexit(IHTMLElement *iface, VARIANT *p)
1434 {
1435     HTMLElement *This = impl_from_IHTMLElement(iface);
1436     FIXME("(%p)->(%p)\n", This, p);
1437     return E_NOTIMPL;
1438 }
1439
1440 static HRESULT WINAPI HTMLElement_put_onrowenter(IHTMLElement *iface, VARIANT v)
1441 {
1442     HTMLElement *This = impl_from_IHTMLElement(iface);
1443     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
1444     return E_NOTIMPL;
1445 }
1446
1447 static HRESULT WINAPI HTMLElement_get_onrowenter(IHTMLElement *iface, VARIANT *p)
1448 {
1449     HTMLElement *This = impl_from_IHTMLElement(iface);
1450     FIXME("(%p)->(%p)\n", This, p);
1451     return E_NOTIMPL;
1452 }
1453
1454 static HRESULT WINAPI HTMLElement_put_ondatasetchanged(IHTMLElement *iface, VARIANT v)
1455 {
1456     HTMLElement *This = impl_from_IHTMLElement(iface);
1457     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
1458     return E_NOTIMPL;
1459 }
1460
1461 static HRESULT WINAPI HTMLElement_get_ondatasetchanged(IHTMLElement *iface, VARIANT *p)
1462 {
1463     HTMLElement *This = impl_from_IHTMLElement(iface);
1464     FIXME("(%p)->(%p)\n", This, p);
1465     return E_NOTIMPL;
1466 }
1467
1468 static HRESULT WINAPI HTMLElement_put_ondataavailable(IHTMLElement *iface, VARIANT v)
1469 {
1470     HTMLElement *This = impl_from_IHTMLElement(iface);
1471
1472     FIXME("(%p)->(%s) semi-stub\n", This, debugstr_variant(&v));
1473
1474     return set_node_event(&This->node, EVENTID_DATAAVAILABLE, &v);
1475 }
1476
1477 static HRESULT WINAPI HTMLElement_get_ondataavailable(IHTMLElement *iface, VARIANT *p)
1478 {
1479     HTMLElement *This = impl_from_IHTMLElement(iface);
1480
1481     TRACE("(%p)->(%p)\n", This, p);
1482
1483     return get_node_event(&This->node, EVENTID_DATAAVAILABLE, p);
1484 }
1485
1486 static HRESULT WINAPI HTMLElement_put_ondatasetcomplete(IHTMLElement *iface, VARIANT v)
1487 {
1488     HTMLElement *This = impl_from_IHTMLElement(iface);
1489     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
1490     return E_NOTIMPL;
1491 }
1492
1493 static HRESULT WINAPI HTMLElement_get_ondatasetcomplete(IHTMLElement *iface, VARIANT *p)
1494 {
1495     HTMLElement *This = impl_from_IHTMLElement(iface);
1496     FIXME("(%p)->(%p)\n", This, p);
1497     return E_NOTIMPL;
1498 }
1499
1500 static HRESULT WINAPI HTMLElement_put_onfilterchange(IHTMLElement *iface, VARIANT v)
1501 {
1502     HTMLElement *This = impl_from_IHTMLElement(iface);
1503     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
1504     return E_NOTIMPL;
1505 }
1506
1507 static HRESULT WINAPI HTMLElement_get_onfilterchange(IHTMLElement *iface, VARIANT *p)
1508 {
1509     HTMLElement *This = impl_from_IHTMLElement(iface);
1510     FIXME("(%p)->(%p)\n", This, p);
1511     return E_NOTIMPL;
1512 }
1513
1514 static HRESULT WINAPI HTMLElement_get_children(IHTMLElement *iface, IDispatch **p)
1515 {
1516     HTMLElement *This = impl_from_IHTMLElement(iface);
1517     nsIDOMNodeList *nsnode_list;
1518     nsresult nsres;
1519
1520     TRACE("(%p)->(%p)\n", This, p);
1521
1522     nsres = nsIDOMNode_GetChildNodes(This->node.nsnode, &nsnode_list);
1523     if(NS_FAILED(nsres)) {
1524         ERR("GetChildNodes failed: %08x\n", nsres);
1525         return E_FAIL;
1526     }
1527
1528     *p = (IDispatch*)create_collection_from_nodelist(This->node.doc, nsnode_list);
1529
1530     nsIDOMNodeList_Release(nsnode_list);
1531     return S_OK;
1532 }
1533
1534 static HRESULT WINAPI HTMLElement_get_all(IHTMLElement *iface, IDispatch **p)
1535 {
1536     HTMLElement *This = impl_from_IHTMLElement(iface);
1537
1538     TRACE("(%p)->(%p)\n", This, p);
1539
1540     *p = (IDispatch*)create_all_collection(&This->node, FALSE);
1541     return S_OK;
1542 }
1543
1544 static const IHTMLElementVtbl HTMLElementVtbl = {
1545     HTMLElement_QueryInterface,
1546     HTMLElement_AddRef,
1547     HTMLElement_Release,
1548     HTMLElement_GetTypeInfoCount,
1549     HTMLElement_GetTypeInfo,
1550     HTMLElement_GetIDsOfNames,
1551     HTMLElement_Invoke,
1552     HTMLElement_setAttribute,
1553     HTMLElement_getAttribute,
1554     HTMLElement_removeAttribute,
1555     HTMLElement_put_className,
1556     HTMLElement_get_className,
1557     HTMLElement_put_id,
1558     HTMLElement_get_id,
1559     HTMLElement_get_tagName,
1560     HTMLElement_get_parentElement,
1561     HTMLElement_get_style,
1562     HTMLElement_put_onhelp,
1563     HTMLElement_get_onhelp,
1564     HTMLElement_put_onclick,
1565     HTMLElement_get_onclick,
1566     HTMLElement_put_ondblclick,
1567     HTMLElement_get_ondblclick,
1568     HTMLElement_put_onkeydown,
1569     HTMLElement_get_onkeydown,
1570     HTMLElement_put_onkeyup,
1571     HTMLElement_get_onkeyup,
1572     HTMLElement_put_onkeypress,
1573     HTMLElement_get_onkeypress,
1574     HTMLElement_put_onmouseout,
1575     HTMLElement_get_onmouseout,
1576     HTMLElement_put_onmouseover,
1577     HTMLElement_get_onmouseover,
1578     HTMLElement_put_onmousemove,
1579     HTMLElement_get_onmousemove,
1580     HTMLElement_put_onmousedown,
1581     HTMLElement_get_onmousedown,
1582     HTMLElement_put_onmouseup,
1583     HTMLElement_get_onmouseup,
1584     HTMLElement_get_document,
1585     HTMLElement_put_title,
1586     HTMLElement_get_title,
1587     HTMLElement_put_language,
1588     HTMLElement_get_language,
1589     HTMLElement_put_onselectstart,
1590     HTMLElement_get_onselectstart,
1591     HTMLElement_scrollIntoView,
1592     HTMLElement_contains,
1593     HTMLElement_get_sourceIndex,
1594     HTMLElement_get_recordNumber,
1595     HTMLElement_put_lang,
1596     HTMLElement_get_lang,
1597     HTMLElement_get_offsetLeft,
1598     HTMLElement_get_offsetTop,
1599     HTMLElement_get_offsetWidth,
1600     HTMLElement_get_offsetHeight,
1601     HTMLElement_get_offsetParent,
1602     HTMLElement_put_innerHTML,
1603     HTMLElement_get_innerHTML,
1604     HTMLElement_put_innerText,
1605     HTMLElement_get_innerText,
1606     HTMLElement_put_outerHTML,
1607     HTMLElement_get_outerHTML,
1608     HTMLElement_put_outerText,
1609     HTMLElement_get_outerText,
1610     HTMLElement_insertAdjacentHTML,
1611     HTMLElement_insertAdjacentText,
1612     HTMLElement_get_parentTextEdit,
1613     HTMLElement_get_isTextEdit,
1614     HTMLElement_click,
1615     HTMLElement_get_filters,
1616     HTMLElement_put_ondragstart,
1617     HTMLElement_get_ondragstart,
1618     HTMLElement_toString,
1619     HTMLElement_put_onbeforeupdate,
1620     HTMLElement_get_onbeforeupdate,
1621     HTMLElement_put_onafterupdate,
1622     HTMLElement_get_onafterupdate,
1623     HTMLElement_put_onerrorupdate,
1624     HTMLElement_get_onerrorupdate,
1625     HTMLElement_put_onrowexit,
1626     HTMLElement_get_onrowexit,
1627     HTMLElement_put_onrowenter,
1628     HTMLElement_get_onrowenter,
1629     HTMLElement_put_ondatasetchanged,
1630     HTMLElement_get_ondatasetchanged,
1631     HTMLElement_put_ondataavailable,
1632     HTMLElement_get_ondataavailable,
1633     HTMLElement_put_ondatasetcomplete,
1634     HTMLElement_get_ondatasetcomplete,
1635     HTMLElement_put_onfilterchange,
1636     HTMLElement_get_onfilterchange,
1637     HTMLElement_get_children,
1638     HTMLElement_get_all
1639 };
1640
1641 HTMLElement *unsafe_impl_from_IHTMLElement(IHTMLElement *iface)
1642 {
1643     return iface->lpVtbl == &HTMLElementVtbl ? impl_from_IHTMLElement(iface) : NULL;
1644 }
1645
1646 static inline HTMLElement *impl_from_HTMLDOMNode(HTMLDOMNode *iface)
1647 {
1648     return CONTAINING_RECORD(iface, HTMLElement, node);
1649 }
1650
1651 HRESULT HTMLElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
1652 {
1653     HTMLElement *This = impl_from_HTMLDOMNode(iface);
1654
1655     if(IsEqualGUID(&IID_IUnknown, riid)) {
1656         *ppv = &This->IHTMLElement_iface;
1657     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
1658         *ppv = &This->IHTMLElement_iface;
1659     }else if(IsEqualGUID(&IID_IHTMLElement, riid)) {
1660         *ppv = &This->IHTMLElement_iface;
1661     }else if(IsEqualGUID(&IID_IHTMLElement2, riid)) {
1662         *ppv = &This->IHTMLElement2_iface;
1663     }else if(IsEqualGUID(&IID_IHTMLElement3, riid)) {
1664         *ppv = &This->IHTMLElement3_iface;
1665     }else if(IsEqualGUID(&IID_IHTMLElement4, riid)) {
1666         *ppv = &This->IHTMLElement4_iface;
1667     }else if(IsEqualGUID(&IID_IConnectionPointContainer, riid)) {
1668         *ppv = &This->cp_container.IConnectionPointContainer_iface;
1669     }else {
1670         return HTMLDOMNode_QI(&This->node, riid, ppv);
1671     }
1672
1673     IUnknown_AddRef((IUnknown*)*ppv);
1674     return S_OK;
1675 }
1676
1677 void HTMLElement_destructor(HTMLDOMNode *iface)
1678 {
1679     HTMLElement *This = impl_from_HTMLDOMNode(iface);
1680
1681     ConnectionPointContainer_Destroy(&This->cp_container);
1682
1683     if(This->style) {
1684         This->style->elem = NULL;
1685         IHTMLStyle_Release(&This->style->IHTMLStyle_iface);
1686     }
1687     if(This->runtime_style) {
1688         This->runtime_style->elem = NULL;
1689         IHTMLStyle_Release(&This->runtime_style->IHTMLStyle_iface);
1690     }
1691     if(This->attrs) {
1692         HTMLDOMAttribute *attr;
1693
1694         LIST_FOR_EACH_ENTRY(attr, &This->attrs->attrs, HTMLDOMAttribute, entry)
1695             attr->elem = NULL;
1696
1697         This->attrs->elem = NULL;
1698         IHTMLAttributeCollection_Release(&This->attrs->IHTMLAttributeCollection_iface);
1699     }
1700
1701     heap_free(This->filter);
1702
1703     HTMLDOMNode_destructor(&This->node);
1704 }
1705
1706 HRESULT HTMLElement_clone(HTMLDOMNode *iface, nsIDOMNode *nsnode, HTMLDOMNode **ret)
1707 {
1708     HTMLElement *This = impl_from_HTMLDOMNode(iface);
1709     HTMLElement *new_elem;
1710     HRESULT hres;
1711
1712     hres = HTMLElement_Create(This->node.doc, nsnode, FALSE, &new_elem);
1713     if(FAILED(hres))
1714         return hres;
1715
1716     if(This->filter) {
1717         new_elem->filter = heap_strdupW(This->filter);
1718         if(!new_elem->filter) {
1719             IHTMLElement_Release(&This->IHTMLElement_iface);
1720             return E_OUTOFMEMORY;
1721         }
1722     }
1723
1724     *ret = &new_elem->node;
1725     return S_OK;
1726 }
1727
1728 HRESULT HTMLElement_handle_event(HTMLDOMNode *iface, DWORD eid, nsIDOMEvent *event, BOOL *prevent_default)
1729 {
1730     HTMLElement *This = impl_from_HTMLDOMNode(iface);
1731
1732     switch(eid) {
1733     case EVENTID_KEYDOWN: {
1734         nsIDOMKeyEvent *key_event;
1735         nsresult nsres;
1736
1737         nsres = nsIDOMEvent_QueryInterface(event, &IID_nsIDOMKeyEvent, (void**)&key_event);
1738         if(NS_SUCCEEDED(nsres)) {
1739             UINT32 code = 0;
1740
1741             nsIDOMKeyEvent_GetKeyCode(key_event, &code);
1742
1743             switch(code) {
1744             case VK_F1: /* DOM_VK_F1 */
1745                 TRACE("F1 pressed\n");
1746                 fire_event(This->node.doc, EVENTID_HELP, TRUE, This->node.nsnode, NULL, NULL);
1747                 *prevent_default = TRUE;
1748             }
1749
1750             nsIDOMKeyEvent_Release(key_event);
1751         }
1752     }
1753     }
1754
1755     return S_OK;
1756 }
1757
1758 cp_static_data_t HTMLElementEvents2_data = { HTMLElementEvents2_tid, NULL /* FIXME */, TRUE };
1759
1760 const cpc_entry_t HTMLElement_cpc[] = {
1761     HTMLELEMENT_CPC,
1762     {NULL}
1763 };
1764
1765 static const NodeImplVtbl HTMLElementImplVtbl = {
1766     HTMLElement_QI,
1767     HTMLElement_destructor,
1768     HTMLElement_cpc,
1769     HTMLElement_clone,
1770     HTMLElement_handle_event,
1771     HTMLElement_get_attr_col
1772 };
1773
1774 static inline HTMLElement *impl_from_DispatchEx(DispatchEx *iface)
1775 {
1776     return CONTAINING_RECORD(iface, HTMLElement, node.dispex);
1777 }
1778
1779 static HRESULT HTMLElement_get_dispid(DispatchEx *dispex, BSTR name,
1780         DWORD grfdex, DISPID *pid)
1781 {
1782     HTMLElement *This = impl_from_DispatchEx(dispex);
1783
1784     if(This->node.vtbl->get_dispid)
1785         return This->node.vtbl->get_dispid(&This->node, name, grfdex, pid);
1786
1787     return DISP_E_UNKNOWNNAME;
1788 }
1789
1790 static HRESULT HTMLElement_invoke(DispatchEx *dispex, DISPID id, LCID lcid,
1791         WORD flags, DISPPARAMS *params, VARIANT *res, EXCEPINFO *ei,
1792         IServiceProvider *caller)
1793 {
1794     HTMLElement *This = impl_from_DispatchEx(dispex);
1795
1796     if(This->node.vtbl->invoke)
1797         return This->node.vtbl->invoke(&This->node, id, lcid, flags,
1798                 params, res, ei, caller);
1799
1800     ERR("(%p): element has no invoke method\n", This);
1801     return E_NOTIMPL;
1802 }
1803
1804 static HRESULT HTMLElement_populate_props(DispatchEx *dispex)
1805 {
1806     HTMLElement *This = impl_from_DispatchEx(dispex);
1807     nsIDOMMozNamedAttrMap *attrs;
1808     nsIDOMAttr *attr;
1809     nsAString nsstr;
1810     const PRUnichar *str;
1811     BSTR name;
1812     VARIANT value;
1813     unsigned i;
1814     UINT32 len;
1815     DISPID id;
1816     nsresult nsres;
1817     HRESULT hres;
1818
1819     if(!This->nselem)
1820         return S_FALSE;
1821
1822     nsres = nsIDOMHTMLElement_GetAttributes(This->nselem, &attrs);
1823     if(NS_FAILED(nsres))
1824         return E_FAIL;
1825
1826     nsres = nsIDOMMozNamedAttrMap_GetLength(attrs, &len);
1827     if(NS_FAILED(nsres)) {
1828         nsIDOMMozNamedAttrMap_Release(attrs);
1829         return E_FAIL;
1830     }
1831
1832     nsAString_Init(&nsstr, NULL);
1833     for(i=0; i<len; i++) {
1834         nsres = nsIDOMMozNamedAttrMap_Item(attrs, i, &attr);
1835         if(NS_FAILED(nsres))
1836             continue;
1837
1838         nsres = nsIDOMAttr_GetNodeName(attr, &nsstr);
1839         if(NS_FAILED(nsres)) {
1840             nsIDOMAttr_Release(attr);
1841             continue;
1842         }
1843
1844         nsAString_GetData(&nsstr, &str);
1845         name = SysAllocString(str);
1846         if(!name) {
1847             nsIDOMAttr_Release(attr);
1848             continue;
1849         }
1850
1851         hres = IDispatchEx_GetDispID(&dispex->IDispatchEx_iface, name, fdexNameCaseInsensitive, &id);
1852         if(hres != DISP_E_UNKNOWNNAME) {
1853             nsIDOMAttr_Release(attr);
1854             SysFreeString(name);
1855             continue;
1856         }
1857
1858         nsres = nsIDOMAttr_GetNodeValue(attr, &nsstr);
1859         nsIDOMAttr_Release(attr);
1860         if(NS_FAILED(nsres)) {
1861             SysFreeString(name);
1862             continue;
1863         }
1864
1865         nsAString_GetData(&nsstr, &str);
1866         V_VT(&value) = VT_BSTR;
1867         if(*str) {
1868             V_BSTR(&value) = SysAllocString(str);
1869             if(!V_BSTR(&value)) {
1870                 SysFreeString(name);
1871                 continue;
1872             }
1873         } else
1874             V_BSTR(&value) = NULL;
1875
1876         IHTMLElement_setAttribute(&This->IHTMLElement_iface, name, value, 0);
1877         SysFreeString(name);
1878         VariantClear(&value);
1879     }
1880     nsAString_Finish(&nsstr);
1881
1882     nsIDOMMozNamedAttrMap_Release(attrs);
1883     return S_OK;
1884 }
1885
1886 static const tid_t HTMLElement_iface_tids[] = {
1887     HTMLELEMENT_TIDS,
1888     0
1889 };
1890
1891 static dispex_static_data_vtbl_t HTMLElement_dispex_vtbl = {
1892     NULL,
1893     HTMLElement_get_dispid,
1894     HTMLElement_invoke,
1895     HTMLElement_populate_props
1896 };
1897
1898 static dispex_static_data_t HTMLElement_dispex = {
1899     &HTMLElement_dispex_vtbl,
1900     DispHTMLUnknownElement_tid,
1901     NULL,
1902     HTMLElement_iface_tids
1903 };
1904
1905 void HTMLElement_Init(HTMLElement *This, HTMLDocumentNode *doc, nsIDOMHTMLElement *nselem, dispex_static_data_t *dispex_data)
1906 {
1907     This->IHTMLElement_iface.lpVtbl = &HTMLElementVtbl;
1908
1909     HTMLElement2_Init(This);
1910     HTMLElement3_Init(This);
1911
1912     if(dispex_data && !dispex_data->vtbl)
1913         dispex_data->vtbl = &HTMLElement_dispex_vtbl;
1914     init_dispex(&This->node.dispex, (IUnknown*)&This->IHTMLElement_iface,
1915             dispex_data ? dispex_data : &HTMLElement_dispex);
1916
1917     if(nselem) {
1918         HTMLDOMNode_Init(doc, &This->node, (nsIDOMNode*)nselem);
1919
1920         /* No AddRef, share reference with HTMLDOMNode */
1921         assert((nsIDOMNode*)nselem == This->node.nsnode);
1922         This->nselem = nselem;
1923     }
1924
1925     This->node.cp_container = &This->cp_container;
1926     ConnectionPointContainer_Init(&This->cp_container, (IUnknown*)&This->IHTMLElement_iface, This->node.vtbl->cpc_entries);
1927 }
1928
1929 HRESULT HTMLElement_Create(HTMLDocumentNode *doc, nsIDOMNode *nsnode, BOOL use_generic, HTMLElement **ret)
1930 {
1931     nsIDOMHTMLElement *nselem;
1932     nsAString class_name_str;
1933     const PRUnichar *class_name;
1934     const tag_desc_t *tag;
1935     HTMLElement *elem;
1936     nsresult nsres;
1937     HRESULT hres;
1938
1939     nsres = nsIDOMNode_QueryInterface(nsnode, &IID_nsIDOMHTMLElement, (void**)&nselem);
1940     if(NS_FAILED(nsres))
1941         return E_FAIL;
1942
1943     nsAString_Init(&class_name_str, NULL);
1944     nsIDOMHTMLElement_GetTagName(nselem, &class_name_str);
1945
1946     nsAString_GetData(&class_name_str, &class_name);
1947
1948     tag = get_tag_desc(class_name);
1949     if(tag) {
1950         hres = tag->constructor(doc, nselem, &elem);
1951     }else if(use_generic) {
1952         hres = HTMLGenericElement_Create(doc, nselem, &elem);
1953     }else {
1954         elem = heap_alloc_zero(sizeof(HTMLElement));
1955         if(elem) {
1956             elem->node.vtbl = &HTMLElementImplVtbl;
1957             HTMLElement_Init(elem, doc, nselem, &HTMLElement_dispex);
1958             hres = S_OK;
1959         }else {
1960             hres = E_OUTOFMEMORY;
1961         }
1962     }
1963
1964     TRACE("%s ret %p\n", debugstr_w(class_name), elem);
1965
1966     nsIDOMHTMLElement_Release(nselem);
1967     nsAString_Finish(&class_name_str);
1968     if(FAILED(hres))
1969         return hres;
1970
1971     *ret = elem;
1972     return S_OK;
1973 }
1974
1975 HRESULT get_elem(HTMLDocumentNode *doc, nsIDOMElement *nselem, HTMLElement **ret)
1976 {
1977     HTMLDOMNode *node;
1978     HRESULT hres;
1979
1980     hres = get_node(doc, (nsIDOMNode*)nselem, TRUE, &node);
1981     if(FAILED(hres))
1982         return hres;
1983
1984     *ret = impl_from_HTMLDOMNode(node);
1985     return S_OK;
1986 }
1987
1988 /* interface IHTMLFiltersCollection */
1989 static HRESULT WINAPI HTMLFiltersCollection_QueryInterface(IHTMLFiltersCollection *iface, REFIID riid, void **ppv)
1990 {
1991     HTMLFiltersCollection *This = impl_from_IHTMLFiltersCollection(iface);
1992
1993     TRACE("%p %s %p\n", This, debugstr_mshtml_guid(riid), ppv );
1994
1995     if(IsEqualGUID(&IID_IUnknown, riid)) {
1996         *ppv = &This->IHTMLFiltersCollection_iface;
1997     }else if(IsEqualGUID(&IID_IHTMLFiltersCollection, riid)) {
1998         TRACE("(%p)->(IID_IHTMLFiltersCollection %p)\n", This, ppv);
1999         *ppv = &This->IHTMLFiltersCollection_iface;
2000     }else if(dispex_query_interface(&This->dispex, riid, ppv)) {
2001         return *ppv ? S_OK : E_NOINTERFACE;
2002     }else {
2003         *ppv = NULL;
2004         FIXME("(%p)->(%s %p)\n", This, debugstr_mshtml_guid(riid), ppv);
2005         return E_NOINTERFACE;
2006     }
2007
2008     IUnknown_AddRef((IUnknown*)*ppv);
2009     return S_OK;
2010 }
2011
2012 static ULONG WINAPI HTMLFiltersCollection_AddRef(IHTMLFiltersCollection *iface)
2013 {
2014     HTMLFiltersCollection *This = impl_from_IHTMLFiltersCollection(iface);
2015     LONG ref = InterlockedIncrement(&This->ref);
2016
2017     TRACE("(%p) ref=%d\n", This, ref);
2018
2019     return ref;
2020 }
2021
2022 static ULONG WINAPI HTMLFiltersCollection_Release(IHTMLFiltersCollection *iface)
2023 {
2024     HTMLFiltersCollection *This = impl_from_IHTMLFiltersCollection(iface);
2025     LONG ref = InterlockedDecrement(&This->ref);
2026
2027     TRACE("(%p) ref=%d\n", This, ref);
2028
2029     if(!ref)
2030     {
2031         heap_free(This);
2032     }
2033
2034     return ref;
2035 }
2036
2037 static HRESULT WINAPI HTMLFiltersCollection_GetTypeInfoCount(IHTMLFiltersCollection *iface, UINT *pctinfo)
2038 {
2039     HTMLFiltersCollection *This = impl_from_IHTMLFiltersCollection(iface);
2040     return IDispatchEx_GetTypeInfoCount(&This->dispex.IDispatchEx_iface, pctinfo);
2041 }
2042
2043 static HRESULT WINAPI HTMLFiltersCollection_GetTypeInfo(IHTMLFiltersCollection *iface,
2044                                     UINT iTInfo, LCID lcid, ITypeInfo **ppTInfo)
2045 {
2046     HTMLFiltersCollection *This = impl_from_IHTMLFiltersCollection(iface);
2047     return IDispatchEx_GetTypeInfo(&This->dispex.IDispatchEx_iface, iTInfo, lcid, ppTInfo);
2048 }
2049
2050 static HRESULT WINAPI HTMLFiltersCollection_GetIDsOfNames(IHTMLFiltersCollection *iface,
2051                                     REFIID riid, LPOLESTR *rgszNames, UINT cNames,
2052                                     LCID lcid, DISPID *rgDispId)
2053 {
2054     HTMLFiltersCollection *This = impl_from_IHTMLFiltersCollection(iface);
2055     return IDispatchEx_GetIDsOfNames(&This->dispex.IDispatchEx_iface, riid, rgszNames, cNames,
2056             lcid, rgDispId);
2057 }
2058
2059 static HRESULT WINAPI HTMLFiltersCollection_Invoke(IHTMLFiltersCollection *iface, DISPID dispIdMember, REFIID riid,
2060                                     LCID lcid, WORD wFlags, DISPPARAMS *pDispParams, VARIANT *pVarResult,
2061                                     EXCEPINFO *pExcepInfo, UINT *puArgErr)
2062 {
2063     HTMLFiltersCollection *This = impl_from_IHTMLFiltersCollection(iface);
2064     return IDispatchEx_Invoke(&This->dispex.IDispatchEx_iface, dispIdMember, riid, lcid,
2065             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
2066 }
2067
2068 static HRESULT WINAPI HTMLFiltersCollection_get_length(IHTMLFiltersCollection *iface, LONG *p)
2069 {
2070     HTMLFiltersCollection *This = impl_from_IHTMLFiltersCollection(iface);
2071
2072     if(!p)
2073         return E_POINTER;
2074
2075     FIXME("(%p)->(%p) Always returning 0\n", This, p);
2076     *p = 0;
2077
2078     return S_OK;
2079 }
2080
2081 static HRESULT WINAPI HTMLFiltersCollection_get__newEnum(IHTMLFiltersCollection *iface, IUnknown **p)
2082 {
2083     HTMLFiltersCollection *This = impl_from_IHTMLFiltersCollection(iface);
2084     FIXME("(%p)->(%p)\n", This, p);
2085     return E_NOTIMPL;
2086 }
2087
2088 static HRESULT WINAPI HTMLFiltersCollection_item(IHTMLFiltersCollection *iface, VARIANT *pvarIndex, VARIANT *pvarResult)
2089 {
2090     HTMLFiltersCollection *This = impl_from_IHTMLFiltersCollection(iface);
2091     FIXME("(%p)->(%p, %p)\n", This, pvarIndex, pvarResult);
2092     return E_NOTIMPL;
2093 }
2094
2095 static const IHTMLFiltersCollectionVtbl HTMLFiltersCollectionVtbl = {
2096     HTMLFiltersCollection_QueryInterface,
2097     HTMLFiltersCollection_AddRef,
2098     HTMLFiltersCollection_Release,
2099     HTMLFiltersCollection_GetTypeInfoCount,
2100     HTMLFiltersCollection_GetTypeInfo,
2101     HTMLFiltersCollection_GetIDsOfNames,
2102     HTMLFiltersCollection_Invoke,
2103     HTMLFiltersCollection_get_length,
2104     HTMLFiltersCollection_get__newEnum,
2105     HTMLFiltersCollection_item
2106 };
2107
2108 static HRESULT HTMLFiltersCollection_get_dispid(DispatchEx *dispex, BSTR name, DWORD flags, DISPID *dispid)
2109 {
2110     WCHAR *ptr;
2111     int idx = 0;
2112
2113     for(ptr = name; *ptr && isdigitW(*ptr); ptr++)
2114         idx = idx*10 + (*ptr-'0');
2115     if(*ptr)
2116         return DISP_E_UNKNOWNNAME;
2117
2118     *dispid = MSHTML_DISPID_CUSTOM_MIN + idx;
2119     TRACE("ret %x\n", *dispid);
2120     return S_OK;
2121 }
2122
2123 static HRESULT HTMLFiltersCollection_invoke(DispatchEx *dispex, DISPID id, LCID lcid, WORD flags, DISPPARAMS *params,
2124         VARIANT *res, EXCEPINFO *ei, IServiceProvider *caller)
2125 {
2126     TRACE("(%p)->(%x %x %x %p %p %p)\n", dispex, id, lcid, flags, params, res, ei);
2127
2128     V_VT(res) = VT_DISPATCH;
2129     V_DISPATCH(res) = NULL;
2130
2131     FIXME("always returning NULL\n");
2132
2133     return S_OK;
2134 }
2135
2136 static const dispex_static_data_vtbl_t HTMLFiltersCollection_dispex_vtbl = {
2137     NULL,
2138     HTMLFiltersCollection_get_dispid,
2139     HTMLFiltersCollection_invoke,
2140     NULL
2141 };
2142
2143 static const tid_t HTMLFiltersCollection_iface_tids[] = {
2144     IHTMLFiltersCollection_tid,
2145     0
2146 };
2147 static dispex_static_data_t HTMLFiltersCollection_dispex = {
2148     &HTMLFiltersCollection_dispex_vtbl,
2149     IHTMLFiltersCollection_tid,
2150     NULL,
2151     HTMLFiltersCollection_iface_tids
2152 };
2153
2154 static IHTMLFiltersCollection *HTMLFiltersCollection_Create(void)
2155 {
2156     HTMLFiltersCollection *ret = heap_alloc(sizeof(HTMLFiltersCollection));
2157
2158     ret->IHTMLFiltersCollection_iface.lpVtbl = &HTMLFiltersCollectionVtbl;
2159     ret->ref = 1;
2160
2161     init_dispex(&ret->dispex, (IUnknown*)&ret->IHTMLFiltersCollection_iface,
2162             &HTMLFiltersCollection_dispex);
2163
2164     return &ret->IHTMLFiltersCollection_iface;
2165 }
2166
2167 /* interface IHTMLAttributeCollection */
2168 static inline HTMLAttributeCollection *impl_from_IHTMLAttributeCollection(IHTMLAttributeCollection *iface)
2169 {
2170     return CONTAINING_RECORD(iface, HTMLAttributeCollection, IHTMLAttributeCollection_iface);
2171 }
2172
2173 static HRESULT WINAPI HTMLAttributeCollection_QueryInterface(IHTMLAttributeCollection *iface, REFIID riid, void **ppv)
2174 {
2175     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection(iface);
2176
2177     if(IsEqualGUID(&IID_IUnknown, riid)) {
2178         *ppv = &This->IHTMLAttributeCollection_iface;
2179     }else if(IsEqualGUID(&IID_IHTMLAttributeCollection, riid)) {
2180         *ppv = &This->IHTMLAttributeCollection_iface;
2181     }else if(IsEqualGUID(&IID_IHTMLAttributeCollection2, riid)) {
2182         *ppv = &This->IHTMLAttributeCollection2_iface;
2183     }else if(IsEqualGUID(&IID_IHTMLAttributeCollection3, riid)) {
2184         *ppv = &This->IHTMLAttributeCollection3_iface;
2185     }else if(dispex_query_interface(&This->dispex, riid, ppv)) {
2186         return *ppv ? S_OK : E_NOINTERFACE;
2187     }else {
2188         *ppv = NULL;
2189         WARN("(%p)->(%s %p)\n", This, debugstr_mshtml_guid(riid), ppv);
2190         return E_NOINTERFACE;
2191     }
2192
2193     IUnknown_AddRef((IUnknown*)*ppv);
2194     return S_OK;
2195 }
2196
2197 static ULONG WINAPI HTMLAttributeCollection_AddRef(IHTMLAttributeCollection *iface)
2198 {
2199     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection(iface);
2200     LONG ref = InterlockedIncrement(&This->ref);
2201
2202     TRACE("(%p) ref=%d\n", This, ref);
2203
2204     return ref;
2205 }
2206
2207 static ULONG WINAPI HTMLAttributeCollection_Release(IHTMLAttributeCollection *iface)
2208 {
2209     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection(iface);
2210     LONG ref = InterlockedDecrement(&This->ref);
2211
2212     TRACE("(%p) ref=%d\n", This, ref);
2213
2214     if(!ref) {
2215         while(!list_empty(&This->attrs)) {
2216             HTMLDOMAttribute *attr = LIST_ENTRY(list_head(&This->attrs), HTMLDOMAttribute, entry);
2217
2218             list_remove(&attr->entry);
2219             attr->elem = NULL;
2220             IHTMLDOMAttribute_Release(&attr->IHTMLDOMAttribute_iface);
2221         }
2222
2223         heap_free(This);
2224     }
2225
2226     return ref;
2227 }
2228
2229 static HRESULT WINAPI HTMLAttributeCollection_GetTypeInfoCount(IHTMLAttributeCollection *iface, UINT *pctinfo)
2230 {
2231     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection(iface);
2232     return IDispatchEx_GetTypeInfoCount(&This->dispex.IDispatchEx_iface, pctinfo);
2233 }
2234
2235 static HRESULT WINAPI HTMLAttributeCollection_GetTypeInfo(IHTMLAttributeCollection *iface, UINT iTInfo,
2236         LCID lcid, ITypeInfo **ppTInfo)
2237 {
2238     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection(iface);
2239     return IDispatchEx_GetTypeInfo(&This->dispex.IDispatchEx_iface, iTInfo, lcid, ppTInfo);
2240 }
2241
2242 static HRESULT WINAPI HTMLAttributeCollection_GetIDsOfNames(IHTMLAttributeCollection *iface, REFIID riid,
2243         LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
2244 {
2245     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection(iface);
2246     return IDispatchEx_GetIDsOfNames(&This->dispex.IDispatchEx_iface, riid, rgszNames, cNames,
2247             lcid, rgDispId);
2248 }
2249
2250 static HRESULT WINAPI HTMLAttributeCollection_Invoke(IHTMLAttributeCollection *iface, DISPID dispIdMember,
2251         REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
2252         VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
2253 {
2254     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection(iface);
2255     return IDispatchEx_Invoke(&This->dispex.IDispatchEx_iface, dispIdMember, riid, lcid,
2256             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
2257 }
2258
2259 static HRESULT get_attr_dispid_by_idx(HTMLAttributeCollection *This, LONG *idx, DISPID *dispid)
2260 {
2261     IDispatchEx *dispex = &This->elem->node.dispex.IDispatchEx_iface;
2262     DISPID id = DISPID_STARTENUM;
2263     LONG len = -1;
2264     HRESULT hres;
2265
2266     FIXME("filter non-enumerable attributes out\n");
2267
2268     while(1) {
2269         hres = IDispatchEx_GetNextDispID(dispex, fdexEnumAll, id, &id);
2270         if(FAILED(hres))
2271             return hres;
2272         else if(hres == S_FALSE)
2273             break;
2274
2275         len++;
2276         if(len == *idx)
2277             break;
2278     }
2279
2280     if(dispid) {
2281         *dispid = id;
2282         return *idx==len ? S_OK : DISP_E_UNKNOWNNAME;
2283     }
2284
2285     *idx = len+1;
2286     return S_OK;
2287 }
2288
2289 static inline HRESULT get_attr_dispid_by_name(HTMLAttributeCollection *This, BSTR name, DISPID *id)
2290 {
2291     HRESULT hres;
2292
2293     if(name[0]>='0' && name[0]<='9') {
2294         WCHAR *end_ptr;
2295         LONG idx;
2296
2297         idx = strtoulW(name, &end_ptr, 10);
2298         if(!*end_ptr) {
2299             hres = get_attr_dispid_by_idx(This, &idx, id);
2300             if(SUCCEEDED(hres))
2301                 return hres;
2302         }
2303     }
2304
2305     if(!This->elem) {
2306         WARN("NULL elem\n");
2307         return E_UNEXPECTED;
2308     }
2309
2310     hres = IDispatchEx_GetDispID(&This->elem->node.dispex.IDispatchEx_iface,
2311             name, fdexNameCaseInsensitive, id);
2312     return hres;
2313 }
2314
2315 static inline HRESULT get_domattr(HTMLAttributeCollection *This, DISPID id, LONG *list_pos, HTMLDOMAttribute **attr)
2316 {
2317     HTMLDOMAttribute *iter;
2318     LONG pos = 0;
2319     HRESULT hres;
2320
2321     *attr = NULL;
2322     LIST_FOR_EACH_ENTRY(iter, &This->attrs, HTMLDOMAttribute, entry) {
2323         if(iter->dispid == id) {
2324             *attr = iter;
2325             break;
2326         }
2327         pos++;
2328     }
2329
2330     if(!*attr) {
2331         if(!This->elem) {
2332             WARN("NULL elem\n");
2333             return E_UNEXPECTED;
2334         }
2335
2336         hres = HTMLDOMAttribute_Create(NULL, This->elem, id, attr);
2337         if(FAILED(hres))
2338             return hres;
2339     }
2340
2341     IHTMLDOMAttribute_AddRef(&(*attr)->IHTMLDOMAttribute_iface);
2342     if(list_pos)
2343         *list_pos = pos;
2344     return S_OK;
2345 }
2346
2347 static HRESULT WINAPI HTMLAttributeCollection_get_length(IHTMLAttributeCollection *iface, LONG *p)
2348 {
2349     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection(iface);
2350     HRESULT hres;
2351
2352     TRACE("(%p)->(%p)\n", This, p);
2353
2354     *p = -1;
2355     hres = get_attr_dispid_by_idx(This, p, NULL);
2356     return hres;
2357 }
2358
2359 static HRESULT WINAPI HTMLAttributeCollection__newEnum(IHTMLAttributeCollection *iface, IUnknown **p)
2360 {
2361     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection(iface);
2362     FIXME("(%p)->(%p)\n", This, p);
2363     return E_NOTIMPL;
2364 }
2365
2366 static HRESULT WINAPI HTMLAttributeCollection_item(IHTMLAttributeCollection *iface, VARIANT *name, IDispatch **ppItem)
2367 {
2368     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection(iface);
2369     HTMLDOMAttribute *attr;
2370     DISPID id;
2371     HRESULT hres;
2372
2373     TRACE("(%p)->(%s %p)\n", This, debugstr_variant(name), ppItem);
2374
2375     switch(V_VT(name)) {
2376     case VT_I4:
2377         hres = get_attr_dispid_by_idx(This, &V_I4(name), &id);
2378         break;
2379     case VT_BSTR:
2380         hres = get_attr_dispid_by_name(This, V_BSTR(name), &id);
2381         break;
2382     default:
2383         FIXME("unsupported name %s\n", debugstr_variant(name));
2384         hres = E_NOTIMPL;
2385     }
2386     if(hres == DISP_E_UNKNOWNNAME)
2387         return E_INVALIDARG;
2388     if(FAILED(hres))
2389         return hres;
2390
2391     hres = get_domattr(This, id, NULL, &attr);
2392     if(FAILED(hres))
2393         return hres;
2394
2395     *ppItem = (IDispatch*)&attr->IHTMLDOMAttribute_iface;
2396     return S_OK;
2397 }
2398
2399 static const IHTMLAttributeCollectionVtbl HTMLAttributeCollectionVtbl = {
2400     HTMLAttributeCollection_QueryInterface,
2401     HTMLAttributeCollection_AddRef,
2402     HTMLAttributeCollection_Release,
2403     HTMLAttributeCollection_GetTypeInfoCount,
2404     HTMLAttributeCollection_GetTypeInfo,
2405     HTMLAttributeCollection_GetIDsOfNames,
2406     HTMLAttributeCollection_Invoke,
2407     HTMLAttributeCollection_get_length,
2408     HTMLAttributeCollection__newEnum,
2409     HTMLAttributeCollection_item
2410 };
2411
2412 static inline HTMLAttributeCollection *impl_from_IHTMLAttributeCollection2(IHTMLAttributeCollection2 *iface)
2413 {
2414     return CONTAINING_RECORD(iface, HTMLAttributeCollection, IHTMLAttributeCollection2_iface);
2415 }
2416
2417 static HRESULT WINAPI HTMLAttributeCollection2_QueryInterface(IHTMLAttributeCollection2 *iface, REFIID riid, void **ppv)
2418 {
2419     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection2(iface);
2420     return IHTMLAttributeCollection_QueryInterface(&This->IHTMLAttributeCollection_iface, riid, ppv);
2421 }
2422
2423 static ULONG WINAPI HTMLAttributeCollection2_AddRef(IHTMLAttributeCollection2 *iface)
2424 {
2425     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection2(iface);
2426     return IHTMLAttributeCollection_AddRef(&This->IHTMLAttributeCollection_iface);
2427 }
2428
2429 static ULONG WINAPI HTMLAttributeCollection2_Release(IHTMLAttributeCollection2 *iface)
2430 {
2431     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection2(iface);
2432     return IHTMLAttributeCollection_Release(&This->IHTMLAttributeCollection_iface);
2433 }
2434
2435 static HRESULT WINAPI HTMLAttributeCollection2_GetTypeInfoCount(IHTMLAttributeCollection2 *iface, UINT *pctinfo)
2436 {
2437     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection2(iface);
2438     return IDispatchEx_GetTypeInfoCount(&This->dispex.IDispatchEx_iface, pctinfo);
2439 }
2440
2441 static HRESULT WINAPI HTMLAttributeCollection2_GetTypeInfo(IHTMLAttributeCollection2 *iface, UINT iTInfo,
2442         LCID lcid, ITypeInfo **ppTInfo)
2443 {
2444     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection2(iface);
2445     return IDispatchEx_GetTypeInfo(&This->dispex.IDispatchEx_iface, iTInfo, lcid, ppTInfo);
2446 }
2447
2448 static HRESULT WINAPI HTMLAttributeCollection2_GetIDsOfNames(IHTMLAttributeCollection2 *iface, REFIID riid,
2449         LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
2450 {
2451     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection2(iface);
2452     return IDispatchEx_GetIDsOfNames(&This->dispex.IDispatchEx_iface, riid, rgszNames, cNames,
2453             lcid, rgDispId);
2454 }
2455
2456 static HRESULT WINAPI HTMLAttributeCollection2_Invoke(IHTMLAttributeCollection2 *iface, DISPID dispIdMember,
2457         REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
2458         VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
2459 {
2460     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection2(iface);
2461     return IDispatchEx_Invoke(&This->dispex.IDispatchEx_iface, dispIdMember, riid, lcid,
2462             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
2463 }
2464
2465 static HRESULT WINAPI HTMLAttributeCollection2_getNamedItem(IHTMLAttributeCollection2 *iface, BSTR bstrName,
2466         IHTMLDOMAttribute **newretNode)
2467 {
2468     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection2(iface);
2469     HTMLDOMAttribute *attr;
2470     DISPID id;
2471     HRESULT hres;
2472
2473     TRACE("(%p)->(%s %p)\n", This, debugstr_w(bstrName), newretNode);
2474
2475     hres = get_attr_dispid_by_name(This, bstrName, &id);
2476     if(hres == DISP_E_UNKNOWNNAME) {
2477         *newretNode = NULL;
2478         return S_OK;
2479     } else if(FAILED(hres)) {
2480         return hres;
2481     }
2482
2483     hres = get_domattr(This, id, NULL, &attr);
2484     if(FAILED(hres))
2485         return hres;
2486
2487     *newretNode = &attr->IHTMLDOMAttribute_iface;
2488     return S_OK;
2489 }
2490
2491 static HRESULT WINAPI HTMLAttributeCollection2_setNamedItem(IHTMLAttributeCollection2 *iface,
2492         IHTMLDOMAttribute *ppNode, IHTMLDOMAttribute **newretNode)
2493 {
2494     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection2(iface);
2495     FIXME("(%p)->(%p %p)\n", This, ppNode, newretNode);
2496     return E_NOTIMPL;
2497 }
2498
2499 static HRESULT WINAPI HTMLAttributeCollection2_removeNamedItem(IHTMLAttributeCollection2 *iface,
2500         BSTR bstrName, IHTMLDOMAttribute **newretNode)
2501 {
2502     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection2(iface);
2503     FIXME("(%p)->(%s %p)\n", This, debugstr_w(bstrName), newretNode);
2504     return E_NOTIMPL;
2505 }
2506
2507 static const IHTMLAttributeCollection2Vtbl HTMLAttributeCollection2Vtbl = {
2508     HTMLAttributeCollection2_QueryInterface,
2509     HTMLAttributeCollection2_AddRef,
2510     HTMLAttributeCollection2_Release,
2511     HTMLAttributeCollection2_GetTypeInfoCount,
2512     HTMLAttributeCollection2_GetTypeInfo,
2513     HTMLAttributeCollection2_GetIDsOfNames,
2514     HTMLAttributeCollection2_Invoke,
2515     HTMLAttributeCollection2_getNamedItem,
2516     HTMLAttributeCollection2_setNamedItem,
2517     HTMLAttributeCollection2_removeNamedItem
2518 };
2519
2520 static inline HTMLAttributeCollection *impl_from_IHTMLAttributeCollection3(IHTMLAttributeCollection3 *iface)
2521 {
2522     return CONTAINING_RECORD(iface, HTMLAttributeCollection, IHTMLAttributeCollection3_iface);
2523 }
2524
2525 static HRESULT WINAPI HTMLAttributeCollection3_QueryInterface(IHTMLAttributeCollection3 *iface, REFIID riid, void **ppv)
2526 {
2527     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2528     return IHTMLAttributeCollection_QueryInterface(&This->IHTMLAttributeCollection_iface, riid, ppv);
2529 }
2530
2531 static ULONG WINAPI HTMLAttributeCollection3_AddRef(IHTMLAttributeCollection3 *iface)
2532 {
2533     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2534     return IHTMLAttributeCollection_AddRef(&This->IHTMLAttributeCollection_iface);
2535 }
2536
2537 static ULONG WINAPI HTMLAttributeCollection3_Release(IHTMLAttributeCollection3 *iface)
2538 {
2539     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2540     return IHTMLAttributeCollection_Release(&This->IHTMLAttributeCollection_iface);
2541 }
2542
2543 static HRESULT WINAPI HTMLAttributeCollection3_GetTypeInfoCount(IHTMLAttributeCollection3 *iface, UINT *pctinfo)
2544 {
2545     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2546     return IDispatchEx_GetTypeInfoCount(&This->dispex.IDispatchEx_iface, pctinfo);
2547 }
2548
2549 static HRESULT WINAPI HTMLAttributeCollection3_GetTypeInfo(IHTMLAttributeCollection3 *iface, UINT iTInfo,
2550         LCID lcid, ITypeInfo **ppTInfo)
2551 {
2552     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2553     return IDispatchEx_GetTypeInfo(&This->dispex.IDispatchEx_iface, iTInfo, lcid, ppTInfo);
2554 }
2555
2556 static HRESULT WINAPI HTMLAttributeCollection3_GetIDsOfNames(IHTMLAttributeCollection3 *iface, REFIID riid,
2557         LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
2558 {
2559     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2560     return IDispatchEx_GetIDsOfNames(&This->dispex.IDispatchEx_iface, riid, rgszNames, cNames,
2561             lcid, rgDispId);
2562 }
2563
2564 static HRESULT WINAPI HTMLAttributeCollection3_Invoke(IHTMLAttributeCollection3 *iface, DISPID dispIdMember,
2565         REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
2566         VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
2567 {
2568     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2569     return IDispatchEx_Invoke(&This->dispex.IDispatchEx_iface, dispIdMember, riid, lcid,
2570             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
2571 }
2572
2573 static HRESULT WINAPI HTMLAttributeCollection3_getNamedItem(IHTMLAttributeCollection3 *iface, BSTR bstrName,
2574         IHTMLDOMAttribute **ppNodeOut)
2575 {
2576     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2577     return IHTMLAttributeCollection2_getNamedItem(&This->IHTMLAttributeCollection2_iface, bstrName, ppNodeOut);
2578 }
2579
2580 static HRESULT WINAPI HTMLAttributeCollection3_setNamedItem(IHTMLAttributeCollection3 *iface,
2581         IHTMLDOMAttribute *pNodeIn, IHTMLDOMAttribute **ppNodeOut)
2582 {
2583     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2584     FIXME("(%p)->(%p %p)\n", This, pNodeIn, ppNodeOut);
2585     return E_NOTIMPL;
2586 }
2587
2588 static HRESULT WINAPI HTMLAttributeCollection3_removeNamedItem(IHTMLAttributeCollection3 *iface,
2589         BSTR bstrName, IHTMLDOMAttribute **ppNodeOut)
2590 {
2591     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2592     FIXME("(%p)->(%s %p)\n", This, debugstr_w(bstrName), ppNodeOut);
2593     return E_NOTIMPL;
2594 }
2595
2596 static HRESULT WINAPI HTMLAttributeCollection3_item(IHTMLAttributeCollection3 *iface, LONG index, IHTMLDOMAttribute **ppNodeOut)
2597 {
2598     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2599     HTMLDOMAttribute *attr;
2600     DISPID id;
2601     HRESULT hres;
2602
2603     TRACE("(%p)->(%d %p)\n", This, index, ppNodeOut);
2604
2605     hres = get_attr_dispid_by_idx(This, &index, &id);
2606     if(hres == DISP_E_UNKNOWNNAME)
2607         return E_INVALIDARG;
2608     if(FAILED(hres))
2609         return hres;
2610
2611     hres = get_domattr(This, id, NULL, &attr);
2612     if(FAILED(hres))
2613         return hres;
2614
2615     *ppNodeOut = &attr->IHTMLDOMAttribute_iface;
2616     return S_OK;
2617 }
2618
2619 static HRESULT WINAPI HTMLAttributeCollection3_get_length(IHTMLAttributeCollection3 *iface, LONG *p)
2620 {
2621     HTMLAttributeCollection *This = impl_from_IHTMLAttributeCollection3(iface);
2622     return IHTMLAttributeCollection_get_length(&This->IHTMLAttributeCollection_iface, p);
2623 }
2624
2625 static const IHTMLAttributeCollection3Vtbl HTMLAttributeCollection3Vtbl = {
2626     HTMLAttributeCollection3_QueryInterface,
2627     HTMLAttributeCollection3_AddRef,
2628     HTMLAttributeCollection3_Release,
2629     HTMLAttributeCollection3_GetTypeInfoCount,
2630     HTMLAttributeCollection3_GetTypeInfo,
2631     HTMLAttributeCollection3_GetIDsOfNames,
2632     HTMLAttributeCollection3_Invoke,
2633     HTMLAttributeCollection3_getNamedItem,
2634     HTMLAttributeCollection3_setNamedItem,
2635     HTMLAttributeCollection3_removeNamedItem,
2636     HTMLAttributeCollection3_item,
2637     HTMLAttributeCollection3_get_length
2638 };
2639
2640 static inline HTMLAttributeCollection *HTMLAttributeCollection_from_DispatchEx(DispatchEx *iface)
2641 {
2642     return CONTAINING_RECORD(iface, HTMLAttributeCollection, dispex);
2643 }
2644
2645 static HRESULT HTMLAttributeCollection_get_dispid(DispatchEx *dispex, BSTR name, DWORD flags, DISPID *dispid)
2646 {
2647     HTMLAttributeCollection *This = HTMLAttributeCollection_from_DispatchEx(dispex);
2648     HTMLDOMAttribute *attr;
2649     LONG pos;
2650     HRESULT hres;
2651
2652     TRACE("(%p)->(%s %x %p)\n", This, debugstr_w(name), flags, dispid);
2653
2654     hres = get_attr_dispid_by_name(This, name, dispid);
2655     if(FAILED(hres))
2656         return hres;
2657
2658     hres = get_domattr(This, *dispid, &pos, &attr);
2659     if(FAILED(hres))
2660         return hres;
2661     IHTMLDOMAttribute_Release(&attr->IHTMLDOMAttribute_iface);
2662
2663     *dispid = MSHTML_DISPID_CUSTOM_MIN+pos;
2664     return S_OK;
2665 }
2666
2667 static HRESULT HTMLAttributeCollection_invoke(DispatchEx *dispex, DISPID id, LCID lcid,
2668         WORD flags, DISPPARAMS *params, VARIANT *res, EXCEPINFO *ei, IServiceProvider *caller)
2669 {
2670     HTMLAttributeCollection *This = HTMLAttributeCollection_from_DispatchEx(dispex);
2671
2672     TRACE("(%p)->(%x %x %x %p %p %p %p)\n", This, id, lcid, flags, params, res, ei, caller);
2673
2674     switch(flags) {
2675     case DISPATCH_PROPERTYGET: {
2676         HTMLDOMAttribute *iter;
2677         DWORD pos;
2678
2679         pos = id-MSHTML_DISPID_CUSTOM_MIN;
2680
2681         LIST_FOR_EACH_ENTRY(iter, &This->attrs, HTMLDOMAttribute, entry) {
2682             if(!pos) {
2683                 IHTMLDOMAttribute_AddRef(&iter->IHTMLDOMAttribute_iface);
2684                 V_VT(res) = VT_DISPATCH;
2685                 V_DISPATCH(res) = (IDispatch*)&iter->IHTMLDOMAttribute_iface;
2686                 return S_OK;
2687             }
2688             pos--;
2689         }
2690
2691         WARN("invalid arg\n");
2692         return E_INVALIDARG;
2693     }
2694
2695     default:
2696         FIXME("unimplemented flags %x\n", flags);
2697         return E_NOTIMPL;
2698     }
2699 }
2700
2701 static const dispex_static_data_vtbl_t HTMLAttributeCollection_dispex_vtbl = {
2702     NULL,
2703     HTMLAttributeCollection_get_dispid,
2704     HTMLAttributeCollection_invoke,
2705     NULL
2706 };
2707
2708 static const tid_t HTMLAttributeCollection_iface_tids[] = {
2709     IHTMLAttributeCollection_tid,
2710     IHTMLAttributeCollection2_tid,
2711     IHTMLAttributeCollection3_tid,
2712     0
2713 };
2714
2715 static dispex_static_data_t HTMLAttributeCollection_dispex = {
2716     &HTMLAttributeCollection_dispex_vtbl,
2717     DispHTMLAttributeCollection_tid,
2718     NULL,
2719     HTMLAttributeCollection_iface_tids
2720 };
2721
2722 HRESULT HTMLElement_get_attr_col(HTMLDOMNode *iface, HTMLAttributeCollection **ac)
2723 {
2724     HTMLElement *This = impl_from_HTMLDOMNode(iface);
2725
2726     if(This->attrs) {
2727         IHTMLAttributeCollection_AddRef(&This->attrs->IHTMLAttributeCollection_iface);
2728         *ac = This->attrs;
2729         return S_OK;
2730     }
2731
2732     This->attrs = heap_alloc_zero(sizeof(HTMLAttributeCollection));
2733     if(!This->attrs)
2734         return E_OUTOFMEMORY;
2735
2736     This->attrs->IHTMLAttributeCollection_iface.lpVtbl = &HTMLAttributeCollectionVtbl;
2737     This->attrs->IHTMLAttributeCollection2_iface.lpVtbl = &HTMLAttributeCollection2Vtbl;
2738     This->attrs->IHTMLAttributeCollection3_iface.lpVtbl = &HTMLAttributeCollection3Vtbl;
2739     This->attrs->ref = 2;
2740
2741     This->attrs->elem = This;
2742     list_init(&This->attrs->attrs);
2743     init_dispex(&This->attrs->dispex, (IUnknown*)&This->attrs->IHTMLAttributeCollection_iface,
2744             &HTMLAttributeCollection_dispex);
2745
2746     *ac = This->attrs;
2747     return S_OK;
2748 }