dlls/mshtml/htmlselect.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
  21 #define COBJMACROS
  22
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "winuser.h"
  26 #include "ole2.h"
  27
  28 #include "wine/debug.h"
  29
  30 #include "mshtml_private.h"
  31 #include "htmlevent.h"
  32
  33 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  34
  35 typedef struct {
  36     HTMLElement element;
  37
  38     const IHTMLSelectElementVtbl *lpHTMLSelectElementVtbl;
  39
  40     nsIDOMHTMLSelectElement *nsselect;
  41 } HTMLSelectElement;
  42
  43 #define HTMLSELECT(x)      ((IHTMLSelectElement*)         &(x)->lpHTMLSelectElementVtbl)
  44
  45 #define HTMLSELECT_THIS(iface) DEFINE_THIS(HTMLSelectElement, HTMLSelectElement, iface)
  46
  47 static HRESULT WINAPI HTMLSelectElement_QueryInterface(IHTMLSelectElement *iface,
  48                                                          REFIID riid, void **ppv)
  49 {
  50     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
  51
  52     return IHTMLDOMNode_QueryInterface(HTMLDOMNODE(&This->element.node), riid, ppv);
  53 }
  54
  55 static ULONG WINAPI HTMLSelectElement_AddRef(IHTMLSelectElement *iface)
  56 {
  57     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
  58
  59     return IHTMLDOMNode_AddRef(HTMLDOMNODE(&This->element.node));
  60 }
  61
  62 static ULONG WINAPI HTMLSelectElement_Release(IHTMLSelectElement *iface)
  63 {
  64     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
  65
  66     return IHTMLDOMNode_Release(HTMLDOMNODE(&This->element.node));
  67 }
  68
  69 static HRESULT WINAPI HTMLSelectElement_GetTypeInfoCount(IHTMLSelectElement *iface, UINT *pctinfo)
  70 {
  71     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
  72
  73     return IDispatchEx_GetTypeInfoCount(DISPATCHEX(&This->element.node.dispex), pctinfo);
  74 }
  75
  76 static HRESULT WINAPI HTMLSelectElement_GetTypeInfo(IHTMLSelectElement *iface, UINT iTInfo,
  77                                               LCID lcid, ITypeInfo **ppTInfo)
  78 {
  79     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
  80
  81     return IDispatchEx_GetTypeInfo(DISPATCHEX(&This->element.node.dispex), iTInfo, lcid, ppTInfo);
  82 }
  83
  84 static HRESULT WINAPI HTMLSelectElement_GetIDsOfNames(IHTMLSelectElement *iface, REFIID riid,
  85                                                 LPOLESTR *rgszNames, UINT cNames,
  86                                                 LCID lcid, DISPID *rgDispId)
  87 {
  88     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
  89
  90     return IDispatchEx_GetIDsOfNames(DISPATCHEX(&This->element.node.dispex), riid, rgszNames, cNames, lcid, rgDispId);
  91 }
  92
  93 static HRESULT WINAPI HTMLSelectElement_Invoke(IHTMLSelectElement *iface, DISPID dispIdMember,
  94                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
  95                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
  96 {
  97     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
  98
  99     return IDispatchEx_Invoke(DISPATCHEX(&This->element.node.dispex), dispIdMember, riid, lcid,
 100             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 101 }
 102
 103 static HRESULT WINAPI HTMLSelectElement_put_size(IHTMLSelectElement *iface, LONG v)
 104 {
 105     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 106     FIXME("(%p)->(%d)\n", This, v);
 107     return E_NOTIMPL;
 108 }
 109
 110 static HRESULT WINAPI HTMLSelectElement_get_size(IHTMLSelectElement *iface, LONG *p)
 111 {
 112     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 113     FIXME("(%p)->(%p)\n", This, p);
 114     return E_NOTIMPL;
 115 }
 116
 117 static HRESULT WINAPI HTMLSelectElement_put_multiple(IHTMLSelectElement *iface, VARIANT_BOOL v)
 118 {
 119     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 120     FIXME("(%p)->(%x)\n", This, v);
 121     return E_NOTIMPL;
 122 }
 123
 124 static HRESULT WINAPI HTMLSelectElement_get_multiple(IHTMLSelectElement *iface, VARIANT_BOOL *p)
 125 {
 126     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 127     FIXME("(%p)->(%p)\n", This, p);
 128     return E_NOTIMPL;
 129 }
 130
 131 static HRESULT WINAPI HTMLSelectElement_put_name(IHTMLSelectElement *iface, BSTR v)
 132 {
 133     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 134     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 135     return E_NOTIMPL;
 136 }
 137
 138 static HRESULT WINAPI HTMLSelectElement_get_name(IHTMLSelectElement *iface, BSTR *p)
 139 {
 140     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 141     nsAString name_str;
 142     const PRUnichar *name = NULL;
 143     nsresult nsres;
 144
 145     TRACE("(%p)->(%p)\n", This, p);
 146
 147     nsAString_Init(&name_str, NULL);
 148
 149     nsres = nsIDOMHTMLSelectElement_GetName(This->nsselect, &name_str);
 150     if(NS_SUCCEEDED(nsres)) {
 151         static const WCHAR wszGarbage[] = {'g','a','r','b','a','g','e',0};
 152
 153         nsAString_GetData(&name_str, &name);
 154
 155         /*
 156          * Native never returns empty string here. If an element has no name,
 157          * name of previous element or ramdom data is returned.
 158          */
 159         *p = SysAllocString(*name ? name : wszGarbage);
 160     }else {
 161         ERR("GetName failed: %08x\n", nsres);
 162     }
 163
 164     nsAString_Finish(&name_str);
 165
 166     TRACE("name=%s\n", debugstr_w(*p));
 167     return S_OK;
 168 }
 169
 170 static HRESULT WINAPI HTMLSelectElement_get_options(IHTMLSelectElement *iface, IDispatch **p)
 171 {
 172     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 173     FIXME("(%p)->(%p)\n", This, p);
 174     return E_NOTIMPL;
 175 }
 176
 177 static HRESULT WINAPI HTMLSelectElement_put_onchange(IHTMLSelectElement *iface, VARIANT v)
 178 {
 179     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 180
 181     TRACE("(%p)->()\n", This);
 182
 183     return set_node_event(&This->element.node, EVENTID_CHANGE, &v);
 184 }
 185
 186 static HRESULT WINAPI HTMLSelectElement_get_onchange(IHTMLSelectElement *iface, VARIANT *p)
 187 {
 188     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 189     FIXME("(%p)->(%p)\n", This, p);
 190     return E_NOTIMPL;
 191 }
 192
 193 static HRESULT WINAPI HTMLSelectElement_put_selectedIndex(IHTMLSelectElement *iface, LONG v)
 194 {
 195     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 196     nsresult nsres;
 197
 198     TRACE("(%p)->(%d)\n", This, v);
 199
 200     nsres = nsIDOMHTMLSelectElement_SetSelectedIndex(This->nsselect, v);
 201     if(NS_FAILED(nsres))
 202         ERR("SetSelectedIndex failed: %08x\n", nsres);
 203
 204     return S_OK;
 205 }
 206
 207 static HRESULT WINAPI HTMLSelectElement_get_selectedIndex(IHTMLSelectElement *iface, LONG *p)
 208 {
 209     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 210     PRInt32 idx = 0;
 211     nsresult nsres;
 212
 213     TRACE("(%p)->(%p)\n", This, p);
 214
 215     nsres = nsIDOMHTMLSelectElement_GetSelectedIndex(This->nsselect, &idx);
 216     if(NS_FAILED(nsres))
 217         ERR("GetSelectedIndex failed: %08x\n", nsres);
 218
 219     *p = idx;
 220     return S_OK;
 221 }
 222
 223 static HRESULT WINAPI HTMLSelectElement_get_type(IHTMLSelectElement *iface, BSTR *p)
 224 {
 225     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 226     const PRUnichar *type;
 227     nsAString type_str;
 228     nsresult nsres;
 229     HRESULT hres = S_OK;
 230
 231     TRACE("(%p)->(%p)\n", This, p);
 232
 233     nsAString_Init(&type_str, NULL);
 234     nsres = nsIDOMHTMLSelectElement_GetType(This->nsselect, &type_str);
 235     if(NS_SUCCEEDED(nsres)) {
 236         nsAString_GetData(&type_str, &type);
 237         *p = *type ? SysAllocString(type) : NULL;
 238     }else {
 239         ERR("GetType failed: %08x\n", nsres);
 240         hres = E_FAIL;
 241     }
 242
 243     nsAString_Finish(&type_str);
 244
 245     return hres;
 246 }
 247
 248 static HRESULT WINAPI HTMLSelectElement_put_value(IHTMLSelectElement *iface, BSTR v)
 249 {
 250     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 251     nsAString value_str;
 252     nsresult nsres;
 253
 254     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 255
 256     nsAString_InitDepend(&value_str, v);
 257     nsres = nsIDOMHTMLSelectElement_SetValue(This->nsselect, &value_str);
 258     nsAString_Finish(&value_str);
 259     if(NS_FAILED(nsres))
 260         ERR("SetValue failed: %08x\n", nsres);
 261
 262     return S_OK;
 263 }
 264
 265 static HRESULT WINAPI HTMLSelectElement_get_value(IHTMLSelectElement *iface, BSTR *p)
 266 {
 267     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 268     nsAString value_str;
 269     const PRUnichar *value = NULL;
 270     nsresult nsres;
 271
 272     TRACE("(%p)->(%p)\n", This, p);
 273
 274     nsAString_Init(&value_str, NULL);
 275
 276     nsres = nsIDOMHTMLSelectElement_GetValue(This->nsselect, &value_str);
 277     if(NS_SUCCEEDED(nsres)) {
 278         nsAString_GetData(&value_str, &value);
 279         *p = *value ? SysAllocString(value) : NULL;
 280     }else {
 281         ERR("GetValue failed: %08x\n", nsres);
 282     }
 283
 284     nsAString_Finish(&value_str);
 285
 286     TRACE("value=%s\n", debugstr_w(*p));
 287     return S_OK;
 288 }
 289
 290 static HRESULT WINAPI HTMLSelectElement_put_disabled(IHTMLSelectElement *iface, VARIANT_BOOL v)
 291 {
 292     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 293     nsresult nsres;
 294
 295     TRACE("(%p)->(%x)\n", This, v);
 296
 297     nsres = nsIDOMHTMLSelectElement_SetDisabled(This->nsselect, v != VARIANT_FALSE);
 298     if(NS_FAILED(nsres)) {
 299         ERR("SetDisabled failed: %08x\n", nsres);
 300         return E_FAIL;
 301     }
 302
 303     return S_OK;
 304 }
 305
 306 static HRESULT WINAPI HTMLSelectElement_get_disabled(IHTMLSelectElement *iface, VARIANT_BOOL *p)
 307 {
 308     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 309     PRBool disabled = FALSE;
 310     nsresult nsres;
 311
 312     TRACE("(%p)->(%p)\n", This, p);
 313
 314     nsres = nsIDOMHTMLSelectElement_GetDisabled(This->nsselect, &disabled);
 315     if(NS_FAILED(nsres)) {
 316         ERR("GetDisabled failed: %08x\n", nsres);
 317         return E_FAIL;
 318     }
 319
 320     *p = disabled ? VARIANT_TRUE : VARIANT_FALSE;
 321     return S_OK;
 322 }
 323
 324 static HRESULT WINAPI HTMLSelectElement_get_form(IHTMLSelectElement *iface, IHTMLFormElement **p)
 325 {
 326     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 327     FIXME("(%p)->(%p)\n", This, p);
 328     return E_NOTIMPL;
 329 }
 330
 331 static HRESULT WINAPI HTMLSelectElement_add(IHTMLSelectElement *iface, IHTMLElement *element,
 332                                             VARIANT before)
 333 {
 334     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 335     IHTMLDOMNode *node, *tmp;
 336     HRESULT hres;
 337
 338     FIXME("(%p)->(%p %s): semi-stub\n", This, element, debugstr_variant(&before));
 339
 340     if(V_VT(&before) != VT_EMPTY) {
 341         FIXME("unhandled before %s\n", debugstr_variant(&before));
 342         return E_NOTIMPL;
 343     }
 344
 345     hres = IHTMLElement_QueryInterface(element, &IID_IHTMLDOMNode, (void**)&node);
 346     if(FAILED(hres))
 347         return hres;
 348
 349     hres = IHTMLDOMNode_appendChild(HTMLDOMNODE(&This->element.node), node, &tmp);
 350     IHTMLDOMNode_Release(node);
 351     if(SUCCEEDED(hres) && tmp)
 352         IHTMLDOMNode_Release(tmp);
 353
 354     return hres;
 355 }
 356
 357 static HRESULT WINAPI HTMLSelectElement_remove(IHTMLSelectElement *iface, LONG index)
 358 {
 359     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 360     FIXME("(%p)->(%d)\n", This, index);
 361     return E_NOTIMPL;
 362 }
 363
 364 static HRESULT WINAPI HTMLSelectElement_put_length(IHTMLSelectElement *iface, LONG v)
 365 {
 366     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 367     FIXME("(%p)->(%d)\n", This, v);
 368     return E_NOTIMPL;
 369 }
 370
 371 static HRESULT WINAPI HTMLSelectElement_get_length(IHTMLSelectElement *iface, LONG *p)
 372 {
 373     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 374     PRUint32 length = 0;
 375     nsresult nsres;
 376
 377     TRACE("(%p)->(%p)\n", This, p);
 378
 379     nsres = nsIDOMHTMLSelectElement_GetLength(This->nsselect, &length);
 380     if(NS_FAILED(nsres))
 381         ERR("GetLength failed: %08x\n", nsres);
 382
 383     *p = length;
 384
 385     TRACE("ret %d\n", *p);
 386     return S_OK;
 387 }
 388
 389 static HRESULT WINAPI HTMLSelectElement_get__newEnum(IHTMLSelectElement *iface, IUnknown **p)
 390 {
 391     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 392     FIXME("(%p)->(%p)\n", This, p);
 393     return E_NOTIMPL;
 394 }
 395
 396 static HRESULT WINAPI HTMLSelectElement_item(IHTMLSelectElement *iface, VARIANT name,
 397                                              VARIANT index, IDispatch **pdisp)
 398 {
 399     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 400     FIXME("(%p)->(v v %p)\n", This, pdisp);
 401     return E_NOTIMPL;
 402 }
 403
 404 static HRESULT WINAPI HTMLSelectElement_tags(IHTMLSelectElement *iface, VARIANT tagName,
 405                                              IDispatch **pdisp)
 406 {
 407     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 408     FIXME("(%p)->(v %p)\n", This, pdisp);
 409     return E_NOTIMPL;
 410 }
 411
 412 #undef HTMLSELECT_THIS
 413
 414 static const IHTMLSelectElementVtbl HTMLSelectElementVtbl = {
 415     HTMLSelectElement_QueryInterface,
 416     HTMLSelectElement_AddRef,
 417     HTMLSelectElement_Release,
 418     HTMLSelectElement_GetTypeInfoCount,
 419     HTMLSelectElement_GetTypeInfo,
 420     HTMLSelectElement_GetIDsOfNames,
 421     HTMLSelectElement_Invoke,
 422     HTMLSelectElement_put_size,
 423     HTMLSelectElement_get_size,
 424     HTMLSelectElement_put_multiple,
 425     HTMLSelectElement_get_multiple,
 426     HTMLSelectElement_put_name,
 427     HTMLSelectElement_get_name,
 428     HTMLSelectElement_get_options,
 429     HTMLSelectElement_put_onchange,
 430     HTMLSelectElement_get_onchange,
 431     HTMLSelectElement_put_selectedIndex,
 432     HTMLSelectElement_get_selectedIndex,
 433     HTMLSelectElement_get_type,
 434     HTMLSelectElement_put_value,
 435     HTMLSelectElement_get_value,
 436     HTMLSelectElement_put_disabled,
 437     HTMLSelectElement_get_disabled,
 438     HTMLSelectElement_get_form,
 439     HTMLSelectElement_add,
 440     HTMLSelectElement_remove,
 441     HTMLSelectElement_put_length,
 442     HTMLSelectElement_get_length,
 443     HTMLSelectElement_get__newEnum,
 444     HTMLSelectElement_item,
 445     HTMLSelectElement_tags
 446 };
 447
 448 #define HTMLSELECT_NODE_THIS(iface) DEFINE_THIS2(HTMLSelectElement, element.node, iface)
 449
 450 static HRESULT HTMLSelectElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
 451 {
 452     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
 453
 454     *ppv = NULL;
 455
 456     if(IsEqualGUID(&IID_IUnknown, riid)) {
 457         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 458         *ppv = HTMLSELECT(This);
 459     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
 460         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
 461         *ppv = HTMLSELECT(This);
 462     }else if(IsEqualGUID(&IID_IHTMLSelectElement, riid)) {
 463         TRACE("(%p)->(IID_IHTMLSelectElement %p)\n", This, ppv);
 464         *ppv = HTMLSELECT(This);
 465     }
 466
 467     if(*ppv) {
 468         IUnknown_AddRef((IUnknown*)*ppv);
 469         return S_OK;
 470     }
 471
 472     return HTMLElement_QI(&This->element.node, riid, ppv);
 473 }
 474
 475 static void HTMLSelectElement_destructor(HTMLDOMNode *iface)
 476 {
 477     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
 478
 479     nsIDOMHTMLSelectElement_Release(This->nsselect);
 480
 481     HTMLElement_destructor(&This->element.node);
 482 }
 483
 484 static HRESULT HTMLSelectElementImpl_put_disabled(HTMLDOMNode *iface, VARIANT_BOOL v)
 485 {
 486     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
 487     return IHTMLSelectElement_put_disabled(HTMLSELECT(This), v);
 488 }
 489
 490 static HRESULT HTMLSelectElementImpl_get_disabled(HTMLDOMNode *iface, VARIANT_BOOL *p)
 491 {
 492     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
 493     return IHTMLSelectElement_get_disabled(HTMLSELECT(This), p);
 494 }
 495
 496 #undef HTMLSELECT_NODE_THIS
 497
 498 static const NodeImplVtbl HTMLSelectElementImplVtbl = {
 499     HTMLSelectElement_QI,
 500     HTMLSelectElement_destructor,
 501     NULL,
 502     NULL,
 503     HTMLSelectElementImpl_put_disabled,
 504     HTMLSelectElementImpl_get_disabled
 505 };
 506
 507 static const tid_t HTMLSelectElement_tids[] = {
 508     HTMLELEMENT_TIDS,
 509     IHTMLSelectElement_tid,
 510     0
 511 };
 512
 513 static dispex_static_data_t HTMLSelectElement_dispex = {
 514     NULL,
 515     DispHTMLSelectElement_tid,
 516     NULL,
 517     HTMLSelectElement_tids
 518 };
 519
 520 HTMLElement *HTMLSelectElement_Create(HTMLDocumentNode *doc, nsIDOMHTMLElement *nselem)
 521 {
 522     HTMLSelectElement *ret = heap_alloc_zero(sizeof(HTMLSelectElement));
 523     nsresult nsres;
 524
 525     ret->lpHTMLSelectElementVtbl = &HTMLSelectElementVtbl;
 526     ret->element.node.vtbl = &HTMLSelectElementImplVtbl;
 527
 528     HTMLElement_Init(&ret->element, doc, nselem, &HTMLSelectElement_dispex);
 529
 530     nsres = nsIDOMHTMLElement_QueryInterface(nselem, &IID_nsIDOMHTMLSelectElement,
 531                                              (void**)&ret->nsselect);
 532     if(NS_FAILED(nsres))
 533         ERR("Could not get nsIDOMHTMLSelectElement interfce: %08x\n", nsres);
 534
 535     return &ret->element;
 536 }