dlls/mshtml/htmlattr.c

   1 /*
   2  * Copyright 2011 Jacek Caban for CodeWeavers
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19
  20 #include <stdarg.h>
  21 #include <assert.h>
  22
  23 #define COBJMACROS
  24
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "winuser.h"
  28 #include "ole2.h"
  29
  30 #include "mshtml_private.h"
  31
  32 #include "wine/debug.h"
  33
  34 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  35
  36 static inline HTMLDOMAttribute *impl_from_IHTMLDOMAttribute(IHTMLDOMAttribute *iface)
  37 {
  38     return CONTAINING_RECORD(iface, HTMLDOMAttribute, IHTMLDOMAttribute_iface);
  39 }
  40
  41 static HRESULT WINAPI HTMLDOMAttribute_QueryInterface(IHTMLDOMAttribute *iface,
  42                                                  REFIID riid, void **ppv)
  43 {
  44     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
  45
  46     TRACE("(%p)->(%s %p)\n", This, debugstr_mshtml_guid(riid), ppv);
  47
  48     if(IsEqualGUID(&IID_IUnknown, riid)) {
  49         *ppv = &This->IHTMLDOMAttribute_iface;
  50     }else if(IsEqualGUID(&IID_IHTMLDOMAttribute, riid)) {
  51         *ppv = &This->IHTMLDOMAttribute_iface;
  52     }else if(IsEqualGUID(&IID_IHTMLDOMAttribute2, riid)) {
  53         *ppv = &This->IHTMLDOMAttribute2_iface;
  54     }else if(dispex_query_interface(&This->dispex, riid, ppv)) {
  55         return *ppv ? S_OK : E_NOINTERFACE;
  56     }else {
  57         WARN("%s not supported\n", debugstr_mshtml_guid(riid));
  58         *ppv =  NULL;
  59         return E_NOINTERFACE;
  60     }
  61
  62     IUnknown_AddRef((IUnknown*)*ppv);
  63     return S_OK;
  64 }
  65
  66 static ULONG WINAPI HTMLDOMAttribute_AddRef(IHTMLDOMAttribute *iface)
  67 {
  68     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
  69     LONG ref = InterlockedIncrement(&This->ref);
  70
  71     TRACE("(%p) ref=%d\n", This, ref);
  72
  73     return ref;
  74 }
  75
  76 static ULONG WINAPI HTMLDOMAttribute_Release(IHTMLDOMAttribute *iface)
  77 {
  78     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
  79     LONG ref = InterlockedDecrement(&This->ref);
  80
  81     TRACE("(%p) ref=%d\n", This, ref);
  82
  83     if(!ref) {
  84         assert(!This->elem);
  85         release_dispex(&This->dispex);
  86         VariantClear(&This->value);
  87         heap_free(This->name);
  88         heap_free(This);
  89     }
  90
  91     return ref;
  92 }
  93
  94 static HRESULT WINAPI HTMLDOMAttribute_GetTypeInfoCount(IHTMLDOMAttribute *iface, UINT *pctinfo)
  95 {
  96     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
  97     return IDispatchEx_GetTypeInfoCount(&This->dispex.IDispatchEx_iface, pctinfo);
  98 }
  99
 100 static HRESULT WINAPI HTMLDOMAttribute_GetTypeInfo(IHTMLDOMAttribute *iface, UINT iTInfo,
 101                                               LCID lcid, ITypeInfo **ppTInfo)
 102 {
 103     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
 104     return IDispatchEx_GetTypeInfo(&This->dispex.IDispatchEx_iface, iTInfo, lcid, ppTInfo);
 105 }
 106
 107 static HRESULT WINAPI HTMLDOMAttribute_GetIDsOfNames(IHTMLDOMAttribute *iface, REFIID riid,
 108                                                 LPOLESTR *rgszNames, UINT cNames,
 109                                                 LCID lcid, DISPID *rgDispId)
 110 {
 111     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
 112     return IDispatchEx_GetIDsOfNames(&This->dispex.IDispatchEx_iface, riid, rgszNames, cNames,
 113             lcid, rgDispId);
 114 }
 115
 116 static HRESULT WINAPI HTMLDOMAttribute_Invoke(IHTMLDOMAttribute *iface, DISPID dispIdMember,
 117                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 118                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 119 {
 120     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
 121     return IDispatchEx_Invoke(&This->dispex.IDispatchEx_iface, dispIdMember, riid, lcid,
 122             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 123 }
 124
 125 static HRESULT WINAPI HTMLDOMAttribute_get_nodeName(IHTMLDOMAttribute *iface, BSTR *p)
 126 {
 127     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
 128
 129     TRACE("(%p)->(%p)\n", This, p);
 130
 131     if(!This->elem) {
 132         if(!This->name) {
 133             FIXME("No name available\n");
 134             return E_FAIL;
 135         }
 136
 137         *p = SysAllocString(This->name);
 138         return *p ? S_OK : E_OUTOFMEMORY;
 139     }
 140
 141     return IDispatchEx_GetMemberName(&This->elem->node.event_target.dispex.IDispatchEx_iface, This->dispid, p);
 142 }
 143
 144 static HRESULT WINAPI HTMLDOMAttribute_put_nodeValue(IHTMLDOMAttribute *iface, VARIANT v)
 145 {
 146     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
 147     DISPID dispidNamed = DISPID_PROPERTYPUT;
 148     DISPPARAMS dp = {&v, &dispidNamed, 1, 1};
 149     EXCEPINFO ei;
 150     VARIANT ret;
 151
 152     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 153
 154     if(!This->elem)
 155         return VariantCopy(&This->value, &v);
 156
 157     memset(&ei, 0, sizeof(ei));
 158
 159     return IDispatchEx_InvokeEx(&This->elem->node.event_target.dispex.IDispatchEx_iface, This->dispid, LOCALE_SYSTEM_DEFAULT,
 160             DISPATCH_PROPERTYPUT, &dp, &ret, &ei, NULL);
 161 }
 162
 163 static HRESULT WINAPI HTMLDOMAttribute_get_nodeValue(IHTMLDOMAttribute *iface, VARIANT *p)
 164 {
 165     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
 166
 167     TRACE("(%p)->(%p)\n", This, p);
 168
 169     if(!This->elem)
 170         return VariantCopy(p, &This->value);
 171
 172     return get_elem_attr_value_by_dispid(This->elem, This->dispid, p);
 173 }
 174
 175 static HRESULT WINAPI HTMLDOMAttribute_get_specified(IHTMLDOMAttribute *iface, VARIANT_BOOL *p)
 176 {
 177     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
 178     nsIDOMAttr *nsattr;
 179     nsAString nsname;
 180     BSTR name;
 181     nsresult nsres;
 182     HRESULT hres;
 183
 184     TRACE("(%p)->(%p)\n", This, p);
 185
 186     if(!This->elem || !This->elem->dom_element) {
 187         FIXME("NULL This->elem\n");
 188         return E_UNEXPECTED;
 189     }
 190
 191     if(get_dispid_type(This->dispid) != DISPEXPROP_BUILTIN) {
 192         *p = VARIANT_TRUE;
 193         return S_OK;
 194     }
 195
 196     hres = IDispatchEx_GetMemberName(&This->elem->node.event_target.dispex.IDispatchEx_iface, This->dispid, &name);
 197     if(FAILED(hres))
 198         return hres;
 199
 200     /* FIXME: This is not exactly right, we have some attributes that don't map directly to Gecko attributes. */
 201     nsAString_InitDepend(&nsname, name);
 202     nsres = nsIDOMElement_GetAttributeNode(This->elem->dom_element, &nsname, &nsattr);
 203     nsAString_Finish(&nsname);
 204     SysFreeString(name);
 205     if(NS_FAILED(nsres))
 206         return E_FAIL;
 207
 208     /* If the Gecko attribute node can be found, we know that the attribute is specified.
 209        There is no point in calling GetSpecified */
 210     if(nsattr) {
 211         nsIDOMAttr_Release(nsattr);
 212         *p = VARIANT_TRUE;
 213     }else {
 214         *p = VARIANT_FALSE;
 215     }
 216     return S_OK;
 217 }
 218
 219 static const IHTMLDOMAttributeVtbl HTMLDOMAttributeVtbl = {
 220     HTMLDOMAttribute_QueryInterface,
 221     HTMLDOMAttribute_AddRef,
 222     HTMLDOMAttribute_Release,
 223     HTMLDOMAttribute_GetTypeInfoCount,
 224     HTMLDOMAttribute_GetTypeInfo,
 225     HTMLDOMAttribute_GetIDsOfNames,
 226     HTMLDOMAttribute_Invoke,
 227     HTMLDOMAttribute_get_nodeName,
 228     HTMLDOMAttribute_put_nodeValue,
 229     HTMLDOMAttribute_get_nodeValue,
 230     HTMLDOMAttribute_get_specified
 231 };
 232
 233 static inline HTMLDOMAttribute *impl_from_IHTMLDOMAttribute2(IHTMLDOMAttribute2 *iface)
 234 {
 235     return CONTAINING_RECORD(iface, HTMLDOMAttribute, IHTMLDOMAttribute2_iface);
 236 }
 237
 238 static HRESULT WINAPI HTMLDOMAttribute2_QueryInterface(IHTMLDOMAttribute2 *iface, REFIID riid, void **ppv)
 239 {
 240     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 241     return IHTMLDOMAttribute_QueryInterface(&This->IHTMLDOMAttribute_iface, riid, ppv);
 242 }
 243
 244 static ULONG WINAPI HTMLDOMAttribute2_AddRef(IHTMLDOMAttribute2 *iface)
 245 {
 246     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 247     return IHTMLDOMAttribute_AddRef(&This->IHTMLDOMAttribute_iface);
 248 }
 249
 250 static ULONG WINAPI HTMLDOMAttribute2_Release(IHTMLDOMAttribute2 *iface)
 251 {
 252     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 253     return IHTMLDOMAttribute_Release(&This->IHTMLDOMAttribute_iface);
 254 }
 255
 256 static HRESULT WINAPI HTMLDOMAttribute2_GetTypeInfoCount(IHTMLDOMAttribute2 *iface, UINT *pctinfo)
 257 {
 258     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 259     return IDispatchEx_GetTypeInfoCount(&This->dispex.IDispatchEx_iface, pctinfo);
 260 }
 261
 262 static HRESULT WINAPI HTMLDOMAttribute2_GetTypeInfo(IHTMLDOMAttribute2 *iface, UINT iTInfo,
 263         LCID lcid, ITypeInfo **ppTInfo)
 264 {
 265     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 266     return IDispatchEx_GetTypeInfo(&This->dispex.IDispatchEx_iface, iTInfo, lcid, ppTInfo);
 267 }
 268
 269 static HRESULT WINAPI HTMLDOMAttribute2_GetIDsOfNames(IHTMLDOMAttribute2 *iface, REFIID riid,
 270         LPOLESTR *rgszNames, UINT cNames, LCID lcid, DISPID *rgDispId)
 271 {
 272     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 273     return IDispatchEx_GetIDsOfNames(&This->dispex.IDispatchEx_iface, riid, rgszNames, cNames,
 274             lcid, rgDispId);
 275 }
 276
 277 static HRESULT WINAPI HTMLDOMAttribute2_Invoke(IHTMLDOMAttribute2 *iface, DISPID dispIdMember,
 278         REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 279         VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 280 {
 281     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 282     return IDispatchEx_Invoke(&This->dispex.IDispatchEx_iface, dispIdMember, riid, lcid,
 283             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 284 }
 285
 286 static HRESULT WINAPI HTMLDOMAttribute2_get_name(IHTMLDOMAttribute2 *iface, BSTR *p)
 287 {
 288     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 289     FIXME("(%p)->(%p)\n", This, p);
 290     return E_NOTIMPL;
 291 }
 292
 293 static HRESULT WINAPI HTMLDOMAttribute2_put_value(IHTMLDOMAttribute2 *iface, BSTR v)
 294 {
 295     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 296     VARIANT var;
 297
 298     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 299
 300     V_VT(&var) = VT_BSTR;
 301     V_BSTR(&var) = v;
 302     return IHTMLDOMAttribute_put_nodeValue(&This->IHTMLDOMAttribute_iface, var);
 303 }
 304
 305 static HRESULT WINAPI HTMLDOMAttribute2_get_value(IHTMLDOMAttribute2 *iface, BSTR *p)
 306 {
 307     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 308     VARIANT val;
 309     HRESULT hres;
 310
 311     TRACE("(%p)->(%p)\n", This, p);
 312
 313     V_VT(&val) = VT_EMPTY;
 314     if(This->elem)
 315         hres = get_elem_attr_value_by_dispid(This->elem, This->dispid, &val);
 316     else
 317         hres = VariantCopy(&val, &This->value);
 318     if(SUCCEEDED(hres))
 319         hres = attr_value_to_string(&val);
 320     if(FAILED(hres))
 321         return hres;
 322
 323     assert(V_VT(&val) == VT_BSTR);
 324     *p = V_BSTR(&val);
 325     if(!*p && !(*p = SysAllocStringLen(NULL, 0)))
 326         return E_OUTOFMEMORY;
 327     return S_OK;
 328 }
 329
 330 static HRESULT WINAPI HTMLDOMAttribute2_get_expando(IHTMLDOMAttribute2 *iface, VARIANT_BOOL *p)
 331 {
 332     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 333
 334     TRACE("(%p)->(%p)\n", This, p);
 335
 336     *p = variant_bool(This->elem && get_dispid_type(This->dispid) != DISPEXPROP_BUILTIN);
 337     return S_OK;
 338 }
 339
 340 static HRESULT WINAPI HTMLDOMAttribute2_get_nodeType(IHTMLDOMAttribute2 *iface, LONG *p)
 341 {
 342     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 343     FIXME("(%p)->(%p)\n", This, p);
 344     return E_NOTIMPL;
 345 }
 346
 347 static HRESULT WINAPI HTMLDOMAttribute2_get_parentNode(IHTMLDOMAttribute2 *iface, IHTMLDOMNode **p)
 348 {
 349     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 350
 351     TRACE("(%p)->(%p)\n", This, p);
 352
 353     *p = NULL;
 354     return S_OK;
 355 }
 356
 357 static HRESULT WINAPI HTMLDOMAttribute2_get_childNodes(IHTMLDOMAttribute2 *iface, IDispatch **p)
 358 {
 359     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 360     FIXME("(%p)->(%p)\n", This, p);
 361     return E_NOTIMPL;
 362 }
 363
 364 static HRESULT WINAPI HTMLDOMAttribute2_get_firstChild(IHTMLDOMAttribute2 *iface, IHTMLDOMNode **p)
 365 {
 366     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 367     FIXME("(%p)->(%p)\n", This, p);
 368     return E_NOTIMPL;
 369 }
 370
 371 static HRESULT WINAPI HTMLDOMAttribute2_get_lastChild(IHTMLDOMAttribute2 *iface, IHTMLDOMNode **p)
 372 {
 373     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 374     FIXME("(%p)->(%p)\n", This, p);
 375     return E_NOTIMPL;
 376 }
 377
 378 static HRESULT WINAPI HTMLDOMAttribute2_get_previousSibling(IHTMLDOMAttribute2 *iface, IHTMLDOMNode **p)
 379 {
 380     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 381     FIXME("(%p)->(%p)\n", This, p);
 382     return E_NOTIMPL;
 383 }
 384
 385 static HRESULT WINAPI HTMLDOMAttribute2_get_nextSibling(IHTMLDOMAttribute2 *iface, IHTMLDOMNode **p)
 386 {
 387     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 388     FIXME("(%p)->(%p)\n", This, p);
 389     return E_NOTIMPL;
 390 }
 391
 392 static HRESULT WINAPI HTMLDOMAttribute2_get_attributes(IHTMLDOMAttribute2 *iface, IDispatch **p)
 393 {
 394     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 395     FIXME("(%p)->(%p)\n", This, p);
 396     return E_NOTIMPL;
 397 }
 398
 399 static HRESULT WINAPI HTMLDOMAttribute2_get_ownerDocument(IHTMLDOMAttribute2 *iface, IDispatch **p)
 400 {
 401     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 402     FIXME("(%p)->(%p)\n", This, p);
 403     return E_NOTIMPL;
 404 }
 405
 406 static HRESULT WINAPI HTMLDOMAttribute2_insertBefore(IHTMLDOMAttribute2 *iface, IHTMLDOMNode *newChild,
 407         VARIANT refChild, IHTMLDOMNode **node)
 408 {
 409     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 410     FIXME("(%p)->(%p %s %p)\n", This, newChild, debugstr_variant(&refChild), node);
 411     return E_NOTIMPL;
 412 }
 413
 414 static HRESULT WINAPI HTMLDOMAttribute2_replaceChild(IHTMLDOMAttribute2 *iface, IHTMLDOMNode *newChild,
 415         IHTMLDOMNode *oldChild, IHTMLDOMNode **node)
 416 {
 417     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 418     FIXME("(%p)->(%p %p %p)\n", This, newChild, oldChild, node);
 419     return E_NOTIMPL;
 420 }
 421
 422 static HRESULT WINAPI HTMLDOMAttribute2_removeChild(IHTMLDOMAttribute2 *iface, IHTMLDOMNode *oldChild,
 423         IHTMLDOMNode **node)
 424 {
 425     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 426     FIXME("(%p)->(%p %p)\n", This, oldChild, node);
 427     return E_NOTIMPL;
 428 }
 429
 430 static HRESULT WINAPI HTMLDOMAttribute2_appendChild(IHTMLDOMAttribute2 *iface, IHTMLDOMNode *newChild,
 431         IHTMLDOMNode **node)
 432 {
 433     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 434     FIXME("(%p)->(%p %p)\n", This, newChild, node);
 435     return E_NOTIMPL;
 436 }
 437
 438 static HRESULT WINAPI HTMLDOMAttribute2_hasChildNodes(IHTMLDOMAttribute2 *iface, VARIANT_BOOL *fChildren)
 439 {
 440     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 441     FIXME("(%p)->(%p)\n", This, fChildren);
 442     return E_NOTIMPL;
 443 }
 444
 445 static HRESULT WINAPI HTMLDOMAttribute2_cloneNode(IHTMLDOMAttribute2 *iface, VARIANT_BOOL fDeep,
 446         IHTMLDOMAttribute **clonedNode)
 447 {
 448     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 449     FIXME("(%p)->(%x %p)\n", This, fDeep, clonedNode);
 450     return E_NOTIMPL;
 451 }
 452
 453 static const IHTMLDOMAttribute2Vtbl HTMLDOMAttribute2Vtbl = {
 454     HTMLDOMAttribute2_QueryInterface,
 455     HTMLDOMAttribute2_AddRef,
 456     HTMLDOMAttribute2_Release,
 457     HTMLDOMAttribute2_GetTypeInfoCount,
 458     HTMLDOMAttribute2_GetTypeInfo,
 459     HTMLDOMAttribute2_GetIDsOfNames,
 460     HTMLDOMAttribute2_Invoke,
 461     HTMLDOMAttribute2_get_name,
 462     HTMLDOMAttribute2_put_value,
 463     HTMLDOMAttribute2_get_value,
 464     HTMLDOMAttribute2_get_expando,
 465     HTMLDOMAttribute2_get_nodeType,
 466     HTMLDOMAttribute2_get_parentNode,
 467     HTMLDOMAttribute2_get_childNodes,
 468     HTMLDOMAttribute2_get_firstChild,
 469     HTMLDOMAttribute2_get_lastChild,
 470     HTMLDOMAttribute2_get_previousSibling,
 471     HTMLDOMAttribute2_get_nextSibling,
 472     HTMLDOMAttribute2_get_attributes,
 473     HTMLDOMAttribute2_get_ownerDocument,
 474     HTMLDOMAttribute2_insertBefore,
 475     HTMLDOMAttribute2_replaceChild,
 476     HTMLDOMAttribute2_removeChild,
 477     HTMLDOMAttribute2_appendChild,
 478     HTMLDOMAttribute2_hasChildNodes,
 479     HTMLDOMAttribute2_cloneNode
 480 };
 481
 482 static const tid_t HTMLDOMAttribute_iface_tids[] = {
 483     IHTMLDOMAttribute_tid,
 484     IHTMLDOMAttribute2_tid,
 485     0
 486 };
 487 static dispex_static_data_t HTMLDOMAttribute_dispex = {
 488     NULL,
 489     DispHTMLDOMAttribute_tid,
 490     HTMLDOMAttribute_iface_tids
 491 };
 492
 493 HTMLDOMAttribute *unsafe_impl_from_IHTMLDOMAttribute(IHTMLDOMAttribute *iface)
 494 {
 495     return iface->lpVtbl == &HTMLDOMAttributeVtbl ? impl_from_IHTMLDOMAttribute(iface) : NULL;
 496 }
 497
 498 HRESULT HTMLDOMAttribute_Create(const WCHAR *name, HTMLElement *elem, DISPID dispid, HTMLDOMAttribute **attr)
 499 {
 500     compat_mode_t compat_mode = elem ? dispex_compat_mode(&elem->node.event_target.dispex) : COMPAT_MODE_QUIRKS;
 501     HTMLAttributeCollection *col;
 502     HTMLDOMAttribute *ret;
 503     HRESULT hres;
 504
 505     ret = heap_alloc_zero(sizeof(*ret));
 506     if(!ret)
 507         return E_OUTOFMEMORY;
 508
 509     ret->IHTMLDOMAttribute_iface.lpVtbl = &HTMLDOMAttributeVtbl;
 510     ret->IHTMLDOMAttribute2_iface.lpVtbl = &HTMLDOMAttribute2Vtbl;
 511     ret->ref = 1;
 512     ret->dispid = dispid;
 513     ret->elem = elem;
 514
 515     init_dispatch(&ret->dispex, (IUnknown*)&ret->IHTMLDOMAttribute_iface,
 516                   &HTMLDOMAttribute_dispex, compat_mode);
 517
 518     /* For attributes attached to an element, (elem,dispid) pair should be valid used for its operation. */
 519     if(elem) {
 520         hres = HTMLElement_get_attr_col(&elem->node, &col);
 521         if(FAILED(hres)) {
 522             IHTMLDOMAttribute_Release(&ret->IHTMLDOMAttribute_iface);
 523             return hres;
 524         }
 525         IHTMLAttributeCollection_Release(&col->IHTMLAttributeCollection_iface);
 526
 527         list_add_tail(&elem->attrs->attrs, &ret->entry);
 528     }
 529
 530     /* For detached attributes we may still do most operations if we have its name available. */
 531     if(name) {
 532         ret->name = heap_strdupW(name);
 533         if(!ret->name) {
 534             IHTMLDOMAttribute_Release(&ret->IHTMLDOMAttribute_iface);
 535             return E_OUTOFMEMORY;
 536         }
 537     }
 538
 539     *attr = ret;
 540     return S_OK;
 541 }