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
  22 #define COBJMACROS
  23
  24 #include "windef.h"
  25 #include "winbase.h"
  26 #include "winuser.h"
  27 #include "ole2.h"
  28
  29 #include "mshtml_private.h"
  30
  31 #include "wine/debug.h"
  32
  33 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  34
  35 static inline HTMLDOMAttribute *impl_from_IHTMLDOMAttribute(IHTMLDOMAttribute *iface)
  36 {
  37     return CONTAINING_RECORD(iface, HTMLDOMAttribute, IHTMLDOMAttribute_iface);
  38 }
  39
  40 DISPEX_IDISPATCH_IMPL(HTMLDOMAttribute, IHTMLDOMAttribute, impl_from_IHTMLDOMAttribute(iface)->dispex)
  41
  42 static HRESULT WINAPI HTMLDOMAttribute_get_nodeName(IHTMLDOMAttribute *iface, BSTR *p)
  43 {
  44     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
  45
  46     TRACE("(%p)->(%p)\n", This, p);
  47
  48     if(!This->elem) {
  49         if(!This->name) {
  50             FIXME("No name available\n");
  51             return E_FAIL;
  52         }
  53
  54         *p = SysAllocString(This->name);
  55         return *p ? S_OK : E_OUTOFMEMORY;
  56     }
  57
  58     return IWineJSDispatchHost_GetMemberName(&This->elem->node.event_target.dispex.IWineJSDispatchHost_iface, This->dispid, p);
  59 }
  60
  61 static HRESULT WINAPI HTMLDOMAttribute_put_nodeValue(IHTMLDOMAttribute *iface, VARIANT v)
  62 {
  63     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
  64     DISPID dispidNamed = DISPID_PROPERTYPUT;
  65     DISPPARAMS dp = {&v, &dispidNamed, 1, 1};
  66     EXCEPINFO ei;
  67     VARIANT ret;
  68
  69     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
  70
  71     if(!This->elem)
  72         return VariantCopy(&This->value, &v);
  73
  74     memset(&ei, 0, sizeof(ei));
  75
  76     return IWineJSDispatchHost_InvokeEx(&This->elem->node.event_target.dispex.IWineJSDispatchHost_iface, This->dispid, LOCALE_SYSTEM_DEFAULT,
  77             DISPATCH_PROPERTYPUT, &dp, &ret, &ei, NULL);
  78 }
  79
  80 static HRESULT WINAPI HTMLDOMAttribute_get_nodeValue(IHTMLDOMAttribute *iface, VARIANT *p)
  81 {
  82     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
  83
  84     TRACE("(%p)->(%p)\n", This, p);
  85
  86     if(!This->elem)
  87         return VariantCopy(p, &This->value);
  88
  89     return get_elem_attr_value_by_dispid(This->elem, This->dispid, p);
  90 }
  91
  92 static HRESULT WINAPI HTMLDOMAttribute_get_specified(IHTMLDOMAttribute *iface, VARIANT_BOOL *p)
  93 {
  94     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute(iface);
  95     nsIDOMAttr *nsattr;
  96     nsAString nsname;
  97     BSTR name;
  98     nsresult nsres;
  99     HRESULT hres;
 100
 101     TRACE("(%p)->(%p)\n", This, p);
 102
 103     if(!This->elem || !This->elem->dom_element) {
 104         FIXME("NULL This->elem\n");
 105         return E_UNEXPECTED;
 106     }
 107
 108     if(get_dispid_type(This->dispid) != DISPEXPROP_BUILTIN) {
 109         *p = VARIANT_TRUE;
 110         return S_OK;
 111     }
 112
 113     hres = IWineJSDispatchHost_GetMemberName(&This->elem->node.event_target.dispex.IWineJSDispatchHost_iface, This->dispid, &name);
 114     if(FAILED(hres))
 115         return hres;
 116
 117     /* FIXME: This is not exactly right, we have some attributes that don't map directly to Gecko attributes. */
 118     nsAString_InitDepend(&nsname, name);
 119     nsres = nsIDOMElement_GetAttributeNode(This->elem->dom_element, &nsname, &nsattr);
 120     nsAString_Finish(&nsname);
 121     SysFreeString(name);
 122     if(NS_FAILED(nsres))
 123         return E_FAIL;
 124
 125     /* If the Gecko attribute node can be found, we know that the attribute is specified.
 126        There is no point in calling GetSpecified */
 127     if(nsattr) {
 128         nsIDOMAttr_Release(nsattr);
 129         *p = VARIANT_TRUE;
 130     }else {
 131         *p = VARIANT_FALSE;
 132     }
 133     return S_OK;
 134 }
 135
 136 static const IHTMLDOMAttributeVtbl HTMLDOMAttributeVtbl = {
 137     HTMLDOMAttribute_QueryInterface,
 138     HTMLDOMAttribute_AddRef,
 139     HTMLDOMAttribute_Release,
 140     HTMLDOMAttribute_GetTypeInfoCount,
 141     HTMLDOMAttribute_GetTypeInfo,
 142     HTMLDOMAttribute_GetIDsOfNames,
 143     HTMLDOMAttribute_Invoke,
 144     HTMLDOMAttribute_get_nodeName,
 145     HTMLDOMAttribute_put_nodeValue,
 146     HTMLDOMAttribute_get_nodeValue,
 147     HTMLDOMAttribute_get_specified
 148 };
 149
 150 static inline HTMLDOMAttribute *impl_from_IHTMLDOMAttribute2(IHTMLDOMAttribute2 *iface)
 151 {
 152     return CONTAINING_RECORD(iface, HTMLDOMAttribute, IHTMLDOMAttribute2_iface);
 153 }
 154
 155 DISPEX_IDISPATCH_IMPL(HTMLDOMAttribute2, IHTMLDOMAttribute2, impl_from_IHTMLDOMAttribute2(iface)->dispex)
 156
 157 static HRESULT WINAPI HTMLDOMAttribute2_get_name(IHTMLDOMAttribute2 *iface, BSTR *p)
 158 {
 159     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 160
 161     TRACE("(%p)->(%p)\n", This, p);
 162
 163     return IHTMLDOMAttribute_get_nodeName(&This->IHTMLDOMAttribute_iface, p);
 164 }
 165
 166 static HRESULT WINAPI HTMLDOMAttribute2_put_value(IHTMLDOMAttribute2 *iface, BSTR v)
 167 {
 168     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 169     VARIANT var;
 170
 171     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 172
 173     V_VT(&var) = VT_BSTR;
 174     V_BSTR(&var) = v;
 175     return IHTMLDOMAttribute_put_nodeValue(&This->IHTMLDOMAttribute_iface, var);
 176 }
 177
 178 static HRESULT WINAPI HTMLDOMAttribute2_get_value(IHTMLDOMAttribute2 *iface, BSTR *p)
 179 {
 180     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 181     VARIANT val;
 182     HRESULT hres;
 183
 184     TRACE("(%p)->(%p)\n", This, p);
 185
 186     V_VT(&val) = VT_EMPTY;
 187     if(This->elem)
 188         hres = get_elem_attr_value_by_dispid(This->elem, This->dispid, &val);
 189     else
 190         hres = VariantCopy(&val, &This->value);
 191     if(SUCCEEDED(hres))
 192         hres = attr_value_to_string(&val);
 193     if(FAILED(hres))
 194         return hres;
 195
 196     assert(V_VT(&val) == VT_BSTR);
 197     *p = V_BSTR(&val);
 198     if(!*p && !(*p = SysAllocStringLen(NULL, 0)))
 199         return E_OUTOFMEMORY;
 200     return S_OK;
 201 }
 202
 203 static HRESULT WINAPI HTMLDOMAttribute2_get_expando(IHTMLDOMAttribute2 *iface, VARIANT_BOOL *p)
 204 {
 205     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 206
 207     TRACE("(%p)->(%p)\n", This, p);
 208
 209     *p = variant_bool(This->elem && get_dispid_type(This->dispid) != DISPEXPROP_BUILTIN);
 210     return S_OK;
 211 }
 212
 213 static HRESULT WINAPI HTMLDOMAttribute2_get_nodeType(IHTMLDOMAttribute2 *iface, LONG *p)
 214 {
 215     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 216     FIXME("(%p)->(%p)\n", This, p);
 217     return E_NOTIMPL;
 218 }
 219
 220 static HRESULT WINAPI HTMLDOMAttribute2_get_parentNode(IHTMLDOMAttribute2 *iface, IHTMLDOMNode **p)
 221 {
 222     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 223
 224     TRACE("(%p)->(%p)\n", This, p);
 225
 226     *p = NULL;
 227     return S_OK;
 228 }
 229
 230 static HRESULT WINAPI HTMLDOMAttribute2_get_childNodes(IHTMLDOMAttribute2 *iface, IDispatch **p)
 231 {
 232     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 233     FIXME("(%p)->(%p)\n", This, p);
 234     return E_NOTIMPL;
 235 }
 236
 237 static HRESULT WINAPI HTMLDOMAttribute2_get_firstChild(IHTMLDOMAttribute2 *iface, IHTMLDOMNode **p)
 238 {
 239     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 240     FIXME("(%p)->(%p)\n", This, p);
 241     return E_NOTIMPL;
 242 }
 243
 244 static HRESULT WINAPI HTMLDOMAttribute2_get_lastChild(IHTMLDOMAttribute2 *iface, IHTMLDOMNode **p)
 245 {
 246     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 247     FIXME("(%p)->(%p)\n", This, p);
 248     return E_NOTIMPL;
 249 }
 250
 251 static HRESULT WINAPI HTMLDOMAttribute2_get_previousSibling(IHTMLDOMAttribute2 *iface, IHTMLDOMNode **p)
 252 {
 253     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 254     FIXME("(%p)->(%p)\n", This, p);
 255     return E_NOTIMPL;
 256 }
 257
 258 static HRESULT WINAPI HTMLDOMAttribute2_get_nextSibling(IHTMLDOMAttribute2 *iface, IHTMLDOMNode **p)
 259 {
 260     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 261     FIXME("(%p)->(%p)\n", This, p);
 262     return E_NOTIMPL;
 263 }
 264
 265 static HRESULT WINAPI HTMLDOMAttribute2_get_attributes(IHTMLDOMAttribute2 *iface, IDispatch **p)
 266 {
 267     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 268     FIXME("(%p)->(%p)\n", This, p);
 269     return E_NOTIMPL;
 270 }
 271
 272 static HRESULT WINAPI HTMLDOMAttribute2_get_ownerDocument(IHTMLDOMAttribute2 *iface, IDispatch **p)
 273 {
 274     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 275     FIXME("(%p)->(%p)\n", This, p);
 276     return E_NOTIMPL;
 277 }
 278
 279 static HRESULT WINAPI HTMLDOMAttribute2_insertBefore(IHTMLDOMAttribute2 *iface, IHTMLDOMNode *newChild,
 280         VARIANT refChild, IHTMLDOMNode **node)
 281 {
 282     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 283     FIXME("(%p)->(%p %s %p)\n", This, newChild, debugstr_variant(&refChild), node);
 284     return E_NOTIMPL;
 285 }
 286
 287 static HRESULT WINAPI HTMLDOMAttribute2_replaceChild(IHTMLDOMAttribute2 *iface, IHTMLDOMNode *newChild,
 288         IHTMLDOMNode *oldChild, IHTMLDOMNode **node)
 289 {
 290     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 291     FIXME("(%p)->(%p %p %p)\n", This, newChild, oldChild, node);
 292     return E_NOTIMPL;
 293 }
 294
 295 static HRESULT WINAPI HTMLDOMAttribute2_removeChild(IHTMLDOMAttribute2 *iface, IHTMLDOMNode *oldChild,
 296         IHTMLDOMNode **node)
 297 {
 298     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 299     FIXME("(%p)->(%p %p)\n", This, oldChild, node);
 300     return E_NOTIMPL;
 301 }
 302
 303 static HRESULT WINAPI HTMLDOMAttribute2_appendChild(IHTMLDOMAttribute2 *iface, IHTMLDOMNode *newChild,
 304         IHTMLDOMNode **node)
 305 {
 306     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 307     FIXME("(%p)->(%p %p)\n", This, newChild, node);
 308     return E_NOTIMPL;
 309 }
 310
 311 static HRESULT WINAPI HTMLDOMAttribute2_hasChildNodes(IHTMLDOMAttribute2 *iface, VARIANT_BOOL *fChildren)
 312 {
 313     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 314     FIXME("(%p)->(%p)\n", This, fChildren);
 315     return E_NOTIMPL;
 316 }
 317
 318 static HRESULT WINAPI HTMLDOMAttribute2_cloneNode(IHTMLDOMAttribute2 *iface, VARIANT_BOOL fDeep,
 319         IHTMLDOMAttribute **clonedNode)
 320 {
 321     HTMLDOMAttribute *This = impl_from_IHTMLDOMAttribute2(iface);
 322     FIXME("(%p)->(%x %p)\n", This, fDeep, clonedNode);
 323     return E_NOTIMPL;
 324 }
 325
 326 static const IHTMLDOMAttribute2Vtbl HTMLDOMAttribute2Vtbl = {
 327     HTMLDOMAttribute2_QueryInterface,
 328     HTMLDOMAttribute2_AddRef,
 329     HTMLDOMAttribute2_Release,
 330     HTMLDOMAttribute2_GetTypeInfoCount,
 331     HTMLDOMAttribute2_GetTypeInfo,
 332     HTMLDOMAttribute2_GetIDsOfNames,
 333     HTMLDOMAttribute2_Invoke,
 334     HTMLDOMAttribute2_get_name,
 335     HTMLDOMAttribute2_put_value,
 336     HTMLDOMAttribute2_get_value,
 337     HTMLDOMAttribute2_get_expando,
 338     HTMLDOMAttribute2_get_nodeType,
 339     HTMLDOMAttribute2_get_parentNode,
 340     HTMLDOMAttribute2_get_childNodes,
 341     HTMLDOMAttribute2_get_firstChild,
 342     HTMLDOMAttribute2_get_lastChild,
 343     HTMLDOMAttribute2_get_previousSibling,
 344     HTMLDOMAttribute2_get_nextSibling,
 345     HTMLDOMAttribute2_get_attributes,
 346     HTMLDOMAttribute2_get_ownerDocument,
 347     HTMLDOMAttribute2_insertBefore,
 348     HTMLDOMAttribute2_replaceChild,
 349     HTMLDOMAttribute2_removeChild,
 350     HTMLDOMAttribute2_appendChild,
 351     HTMLDOMAttribute2_hasChildNodes,
 352     HTMLDOMAttribute2_cloneNode
 353 };
 354
 355 static inline HTMLDOMAttribute *impl_from_DispatchEx(DispatchEx *iface)
 356 {
 357     return CONTAINING_RECORD(iface, HTMLDOMAttribute, dispex);
 358 }
 359
 360 static void *HTMLDOMAttribute_query_interface(DispatchEx *dispex, REFIID riid)
 361 {
 362     HTMLDOMAttribute *This = impl_from_DispatchEx(dispex);
 363
 364     if(IsEqualGUID(&IID_IHTMLDOMAttribute, riid))
 365         return &This->IHTMLDOMAttribute_iface;
 366     if(IsEqualGUID(&IID_IHTMLDOMAttribute2, riid))
 367         return &This->IHTMLDOMAttribute2_iface;
 368
 369     return NULL;
 370 }
 371
 372 static void HTMLDOMAttribute_traverse(DispatchEx *dispex, nsCycleCollectionTraversalCallback *cb)
 373 {
 374     HTMLDOMAttribute *This = impl_from_DispatchEx(dispex);
 375
 376     if(This->elem)
 377         note_cc_edge((nsISupports*)&This->elem->node.IHTMLDOMNode_iface, "elem", cb);
 378     traverse_variant(&This->value, "value", cb);
 379 }
 380
 381 static void HTMLDOMAttribute_unlink(DispatchEx *dispex)
 382 {
 383     HTMLDOMAttribute *This = impl_from_DispatchEx(dispex);
 384
 385     if(This->elem) {
 386         HTMLElement *elem = This->elem;
 387         This->elem = NULL;
 388         IHTMLDOMNode_Release(&elem->node.IHTMLDOMNode_iface);
 389     }
 390     unlink_variant(&This->value);
 391 }
 392
 393 static void HTMLDOMAttribute_destructor(DispatchEx *dispex)
 394 {
 395     HTMLDOMAttribute *This = impl_from_DispatchEx(dispex);
 396     VariantClear(&This->value);
 397     free(This->name);
 398     free(This);
 399 }
 400
 401 static const dispex_static_data_vtbl_t HTMLDOMAttribute_dispex_vtbl = {
 402     .query_interface  = HTMLDOMAttribute_query_interface,
 403     .destructor       = HTMLDOMAttribute_destructor,
 404     .traverse         = HTMLDOMAttribute_traverse,
 405     .unlink           = HTMLDOMAttribute_unlink
 406 };
 407
 408 static const tid_t HTMLDOMAttribute_iface_tids[] = {
 409     IHTMLDOMAttribute_tid,
 410     IHTMLDOMAttribute2_tid,
 411     0
 412 };
 413 static dispex_static_data_t HTMLDOMAttribute_dispex = {
 414     "Attr",
 415     &HTMLDOMAttribute_dispex_vtbl,
 416     DispHTMLDOMAttribute_tid,
 417     HTMLDOMAttribute_iface_tids
 418 };
 419
 420 HTMLDOMAttribute *unsafe_impl_from_IHTMLDOMAttribute(IHTMLDOMAttribute *iface)
 421 {
 422     return iface->lpVtbl == &HTMLDOMAttributeVtbl ? impl_from_IHTMLDOMAttribute(iface) : NULL;
 423 }
 424
 425 HRESULT HTMLDOMAttribute_Create(const WCHAR *name, HTMLElement *elem, DISPID dispid, compat_mode_t compat_mode, HTMLDOMAttribute **attr)
 426 {
 427     HTMLAttributeCollection *col;
 428     HTMLDOMAttribute *ret;
 429     HRESULT hres;
 430
 431     ret = calloc(1, sizeof(*ret));
 432     if(!ret)
 433         return E_OUTOFMEMORY;
 434
 435     ret->IHTMLDOMAttribute_iface.lpVtbl = &HTMLDOMAttributeVtbl;
 436     ret->IHTMLDOMAttribute2_iface.lpVtbl = &HTMLDOMAttribute2Vtbl;
 437     ret->dispid = dispid;
 438     ret->elem = elem;
 439
 440     init_dispatch(&ret->dispex, &HTMLDOMAttribute_dispex, compat_mode);
 441
 442     /* For attributes attached to an element, (elem,dispid) pair should be valid used for its operation. */
 443     if(elem) {
 444         IHTMLDOMNode_AddRef(&elem->node.IHTMLDOMNode_iface);
 445
 446         hres = HTMLElement_get_attr_col(&elem->node, &col);
 447         if(FAILED(hres)) {
 448             IHTMLDOMAttribute_Release(&ret->IHTMLDOMAttribute_iface);
 449             return hres;
 450         }
 451         IHTMLAttributeCollection_Release(&col->IHTMLAttributeCollection_iface);
 452
 453         list_add_tail(&elem->attrs->attrs, &ret->entry);
 454     }
 455
 456     /* For detached attributes we may still do most operations if we have its name available. */
 457     if(name) {
 458         ret->name = wcsdup(name);
 459         if(!ret->name) {
 460             IHTMLDOMAttribute_Release(&ret->IHTMLDOMAttribute_iface);
 461             return E_OUTOFMEMORY;
 462         }
 463     }
 464
 465     *attr = ret;
 466     return S_OK;
 467 }