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 #include <assert.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 "wine/debug.h"
  30
  31 #include "mshtml_private.h"
  32 #include "htmlevent.h"
  33
  34 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  35
  36 struct HTMLSelectElement {
  37     HTMLElement element;
  38
  39     IHTMLSelectElement IHTMLSelectElement_iface;
  40
  41     nsIDOMHTMLSelectElement *nsselect;
  42 };
  43
  44 static inline HTMLSelectElement *impl_from_IHTMLSelectElement(IHTMLSelectElement *iface)
  45 {
  46     return CONTAINING_RECORD(iface, HTMLSelectElement, IHTMLSelectElement_iface);
  47 }
  48
  49 static HRESULT htmlselect_item(HTMLSelectElement *This, int i, IDispatch **ret)
  50 {
  51     nsIDOMHTMLOptionsCollection *nscol;
  52     nsIDOMNode *nsnode;
  53     nsresult nsres;
  54     HRESULT hres;
  55
  56     nsres = nsIDOMHTMLSelectElement_GetOptions(This->nsselect, &nscol);
  57     if(NS_FAILED(nsres)) {
  58         ERR("GetOptions failed: %08x\n", nsres);
  59         return E_FAIL;
  60     }
  61
  62     nsres = nsIDOMHTMLOptionsCollection_Item(nscol, i, &nsnode);
  63     nsIDOMHTMLOptionsCollection_Release(nscol);
  64     if(NS_FAILED(nsres)) {
  65         ERR("Item failed: %08x\n", nsres);
  66         return E_FAIL;
  67     }
  68
  69     if(nsnode) {
  70         HTMLDOMNode *node;
  71
  72         hres = get_node(This->element.node.doc, nsnode, TRUE, &node);
  73         nsIDOMNode_Release(nsnode);
  74         if(FAILED(hres))
  75             return hres;
  76
  77         *ret = (IDispatch*)&node->IHTMLDOMNode_iface;
  78     }else {
  79         *ret = NULL;
  80     }
  81     return S_OK;
  82 }
  83
  84 static HRESULT WINAPI HTMLSelectElement_QueryInterface(IHTMLSelectElement *iface,
  85                                                          REFIID riid, void **ppv)
  86 {
  87     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
  88
  89     return IHTMLDOMNode_QueryInterface(&This->element.node.IHTMLDOMNode_iface, riid, ppv);
  90 }
  91
  92 static ULONG WINAPI HTMLSelectElement_AddRef(IHTMLSelectElement *iface)
  93 {
  94     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
  95
  96     return IHTMLDOMNode_AddRef(&This->element.node.IHTMLDOMNode_iface);
  97 }
  98
  99 static ULONG WINAPI HTMLSelectElement_Release(IHTMLSelectElement *iface)
 100 {
 101     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 102
 103     return IHTMLDOMNode_Release(&This->element.node.IHTMLDOMNode_iface);
 104 }
 105
 106 static HRESULT WINAPI HTMLSelectElement_GetTypeInfoCount(IHTMLSelectElement *iface, UINT *pctinfo)
 107 {
 108     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 109
 110     return IDispatchEx_GetTypeInfoCount(&This->element.node.event_target.dispex.IDispatchEx_iface, pctinfo);
 111 }
 112
 113 static HRESULT WINAPI HTMLSelectElement_GetTypeInfo(IHTMLSelectElement *iface, UINT iTInfo,
 114                                               LCID lcid, ITypeInfo **ppTInfo)
 115 {
 116     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 117
 118     return IDispatchEx_GetTypeInfo(&This->element.node.event_target.dispex.IDispatchEx_iface, iTInfo, lcid,
 119             ppTInfo);
 120 }
 121
 122 static HRESULT WINAPI HTMLSelectElement_GetIDsOfNames(IHTMLSelectElement *iface, REFIID riid,
 123                                                 LPOLESTR *rgszNames, UINT cNames,
 124                                                 LCID lcid, DISPID *rgDispId)
 125 {
 126     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 127
 128     return IDispatchEx_GetIDsOfNames(&This->element.node.event_target.dispex.IDispatchEx_iface, riid, rgszNames,
 129             cNames, lcid, rgDispId);
 130 }
 131
 132 static HRESULT WINAPI HTMLSelectElement_Invoke(IHTMLSelectElement *iface, DISPID dispIdMember,
 133                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 134                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 135 {
 136     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 137
 138     return IDispatchEx_Invoke(&This->element.node.event_target.dispex.IDispatchEx_iface, dispIdMember, riid,
 139             lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 140 }
 141
 142 static HRESULT WINAPI HTMLSelectElement_put_size(IHTMLSelectElement *iface, LONG v)
 143 {
 144     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 145     nsresult nsres;
 146
 147     TRACE("(%p)->(%d)\n", This, v);
 148     if(v < 0)
 149         return CTL_E_INVALIDPROPERTYVALUE;
 150
 151     nsres = nsIDOMHTMLSelectElement_SetSize(This->nsselect, v);
 152     if(NS_FAILED(nsres)) {
 153         ERR("SetSize failed: %08x\n", nsres);
 154         return E_FAIL;
 155     }
 156     return S_OK;
 157 }
 158
 159 static HRESULT WINAPI HTMLSelectElement_get_size(IHTMLSelectElement *iface, LONG *p)
 160 {
 161     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 162     DWORD val;
 163     nsresult nsres;
 164
 165     TRACE("(%p)->(%p)\n", This, p);
 166     if(!p)
 167         return E_INVALIDARG;
 168
 169     nsres = nsIDOMHTMLSelectElement_GetSize(This->nsselect, &val);
 170     if(NS_FAILED(nsres)) {
 171         ERR("GetSize failed: %08x\n", nsres);
 172         return E_FAIL;
 173     }
 174     *p = val;
 175     return S_OK;
 176 }
 177
 178 static HRESULT WINAPI HTMLSelectElement_put_multiple(IHTMLSelectElement *iface, VARIANT_BOOL v)
 179 {
 180     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 181     nsresult nsres;
 182
 183     TRACE("(%p)->(%x)\n", This, v);
 184
 185     nsres = nsIDOMHTMLSelectElement_SetMultiple(This->nsselect, !!v);
 186     assert(nsres == NS_OK);
 187     return S_OK;
 188 }
 189
 190 static HRESULT WINAPI HTMLSelectElement_get_multiple(IHTMLSelectElement *iface, VARIANT_BOOL *p)
 191 {
 192     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 193     cpp_bool val;
 194     nsresult nsres;
 195
 196     TRACE("(%p)->(%p)\n", This, p);
 197
 198     nsres = nsIDOMHTMLSelectElement_GetMultiple(This->nsselect, &val);
 199     assert(nsres == NS_OK);
 200
 201     *p = variant_bool(val);
 202     return S_OK;
 203 }
 204
 205 static HRESULT WINAPI HTMLSelectElement_put_name(IHTMLSelectElement *iface, BSTR v)
 206 {
 207     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 208     nsAString str;
 209     nsresult nsres;
 210
 211     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 212     nsAString_InitDepend(&str, v);
 213     nsres = nsIDOMHTMLSelectElement_SetName(This->nsselect, &str);
 214     nsAString_Finish(&str);
 215
 216     if(NS_FAILED(nsres)) {
 217         ERR("SetName failed: %08x\n", nsres);
 218         return E_FAIL;
 219     }
 220     return S_OK;
 221 }
 222
 223 static HRESULT WINAPI HTMLSelectElement_get_name(IHTMLSelectElement *iface, BSTR *p)
 224 {
 225     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 226     nsAString name_str;
 227     nsresult nsres;
 228
 229     TRACE("(%p)->(%p)\n", This, p);
 230
 231     nsAString_Init(&name_str, NULL);
 232     nsres = nsIDOMHTMLSelectElement_GetName(This->nsselect, &name_str);
 233
 234     return return_nsstr(nsres, &name_str, p);
 235 }
 236
 237 static HRESULT WINAPI HTMLSelectElement_get_options(IHTMLSelectElement *iface, IDispatch **p)
 238 {
 239     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 240
 241     TRACE("(%p)->(%p)\n", This, p);
 242
 243     *p = (IDispatch*)&This->IHTMLSelectElement_iface;
 244     IDispatch_AddRef(*p);
 245     return S_OK;
 246 }
 247
 248 static HRESULT WINAPI HTMLSelectElement_put_onchange(IHTMLSelectElement *iface, VARIANT v)
 249 {
 250     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 251
 252     TRACE("(%p)->()\n", This);
 253
 254     return set_node_event(&This->element.node, EVENTID_CHANGE, &v);
 255 }
 256
 257 static HRESULT WINAPI HTMLSelectElement_get_onchange(IHTMLSelectElement *iface, VARIANT *p)
 258 {
 259     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 260     FIXME("(%p)->(%p)\n", This, p);
 261     return E_NOTIMPL;
 262 }
 263
 264 static HRESULT WINAPI HTMLSelectElement_put_selectedIndex(IHTMLSelectElement *iface, LONG v)
 265 {
 266     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 267     nsresult nsres;
 268
 269     TRACE("(%p)->(%d)\n", This, v);
 270
 271     nsres = nsIDOMHTMLSelectElement_SetSelectedIndex(This->nsselect, v);
 272     if(NS_FAILED(nsres))
 273         ERR("SetSelectedIndex failed: %08x\n", nsres);
 274
 275     return S_OK;
 276 }
 277
 278 static HRESULT WINAPI HTMLSelectElement_get_selectedIndex(IHTMLSelectElement *iface, LONG *p)
 279 {
 280     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 281     nsresult nsres;
 282
 283     TRACE("(%p)->(%p)\n", This, p);
 284
 285     nsres = nsIDOMHTMLSelectElement_GetSelectedIndex(This->nsselect, p);
 286     if(NS_FAILED(nsres)) {
 287         ERR("GetSelectedIndex failed: %08x\n", nsres);
 288         return E_FAIL;
 289     }
 290
 291     return S_OK;
 292 }
 293
 294 static HRESULT WINAPI HTMLSelectElement_get_type(IHTMLSelectElement *iface, BSTR *p)
 295 {
 296     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 297     nsAString type_str;
 298     nsresult nsres;
 299
 300     TRACE("(%p)->(%p)\n", This, p);
 301
 302     nsAString_Init(&type_str, NULL);
 303     nsres = nsIDOMHTMLSelectElement_GetType(This->nsselect, &type_str);
 304     return return_nsstr(nsres, &type_str, p);
 305 }
 306
 307 static HRESULT WINAPI HTMLSelectElement_put_value(IHTMLSelectElement *iface, BSTR v)
 308 {
 309     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 310     nsAString value_str;
 311     nsresult nsres;
 312
 313     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 314
 315     nsAString_InitDepend(&value_str, v);
 316     nsres = nsIDOMHTMLSelectElement_SetValue(This->nsselect, &value_str);
 317     nsAString_Finish(&value_str);
 318     if(NS_FAILED(nsres))
 319         ERR("SetValue failed: %08x\n", nsres);
 320
 321     return S_OK;
 322 }
 323
 324 static HRESULT WINAPI HTMLSelectElement_get_value(IHTMLSelectElement *iface, BSTR *p)
 325 {
 326     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 327     nsAString value_str;
 328     nsresult nsres;
 329
 330     TRACE("(%p)->(%p)\n", This, p);
 331
 332     nsAString_Init(&value_str, NULL);
 333     nsres = nsIDOMHTMLSelectElement_GetValue(This->nsselect, &value_str);
 334     return return_nsstr(nsres, &value_str, p);
 335 }
 336
 337 static HRESULT WINAPI HTMLSelectElement_put_disabled(IHTMLSelectElement *iface, VARIANT_BOOL v)
 338 {
 339     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 340     nsresult nsres;
 341
 342     TRACE("(%p)->(%x)\n", This, v);
 343
 344     nsres = nsIDOMHTMLSelectElement_SetDisabled(This->nsselect, v != VARIANT_FALSE);
 345     if(NS_FAILED(nsres)) {
 346         ERR("SetDisabled failed: %08x\n", nsres);
 347         return E_FAIL;
 348     }
 349
 350     return S_OK;
 351 }
 352
 353 static HRESULT WINAPI HTMLSelectElement_get_disabled(IHTMLSelectElement *iface, VARIANT_BOOL *p)
 354 {
 355     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 356     cpp_bool disabled = FALSE;
 357     nsresult nsres;
 358
 359     TRACE("(%p)->(%p)\n", This, p);
 360
 361     nsres = nsIDOMHTMLSelectElement_GetDisabled(This->nsselect, &disabled);
 362     if(NS_FAILED(nsres)) {
 363         ERR("GetDisabled failed: %08x\n", nsres);
 364         return E_FAIL;
 365     }
 366
 367     *p = variant_bool(disabled);
 368     return S_OK;
 369 }
 370
 371 static HRESULT WINAPI HTMLSelectElement_get_form(IHTMLSelectElement *iface, IHTMLFormElement **p)
 372 {
 373     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 374     nsIDOMHTMLFormElement *nsform;
 375     nsIDOMNode *form_node;
 376     HTMLDOMNode *node;
 377     HRESULT hres;
 378     nsresult nsres;
 379
 380     TRACE("(%p)->(%p)\n", This, p);
 381
 382     if(!p)
 383         return E_POINTER;
 384
 385     nsres = nsIDOMHTMLSelectElement_GetForm(This->nsselect, &nsform);
 386     if (NS_FAILED(nsres)) {
 387         ERR("GetForm failed: %08x, nsform: %p\n", nsres, nsform);
 388         *p = NULL;
 389         return E_FAIL;
 390     }
 391     if (nsform == NULL) {
 392         TRACE("nsform not found\n");
 393         *p = NULL;
 394         return S_OK;
 395     }
 396
 397     nsres = nsIDOMHTMLFormElement_QueryInterface(nsform, &IID_nsIDOMNode, (void**)&form_node);
 398     nsIDOMHTMLFormElement_Release(nsform);
 399     assert(nsres == NS_OK);
 400
 401     hres = get_node(This->element.node.doc, form_node, TRUE, &node);
 402     nsIDOMNode_Release(form_node);
 403     if (FAILED(hres))
 404         return hres;
 405
 406     hres = IHTMLDOMNode_QueryInterface(&node->IHTMLDOMNode_iface, &IID_IHTMLElement, (void**)p);
 407
 408     node_release(node);
 409     return hres;
 410 }
 411
 412 static HRESULT WINAPI HTMLSelectElement_add(IHTMLSelectElement *iface, IHTMLElement *element,
 413                                             VARIANT before)
 414 {
 415     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 416     nsIWritableVariant *nsvariant;
 417     HTMLElement *element_obj;
 418     nsresult nsres;
 419
 420     TRACE("(%p)->(%p %s)\n", This, element, debugstr_variant(&before));
 421
 422     element_obj = unsafe_impl_from_IHTMLElement(element);
 423     if(!element_obj) {
 424         FIXME("External IHTMLElement implementation?\n");
 425         return E_INVALIDARG;
 426     }
 427
 428     if(!element_obj->html_element) {
 429         FIXME("Not HTML element\n");
 430         return E_NOTIMPL;
 431     }
 432
 433     nsvariant = create_nsvariant();
 434     if(!nsvariant)
 435         return E_FAIL;
 436
 437     switch(V_VT(&before)) {
 438     case VT_EMPTY:
 439     case VT_ERROR:
 440         nsres = nsIWritableVariant_SetAsEmpty(nsvariant);
 441         break;
 442     case VT_I2:
 443         nsres = nsIWritableVariant_SetAsInt16(nsvariant, V_I2(&before));
 444         break;
 445     default:
 446         FIXME("unhandled before %s\n", debugstr_variant(&before));
 447         nsIWritableVariant_Release(nsvariant);
 448         return E_NOTIMPL;
 449     }
 450
 451     if(NS_SUCCEEDED(nsres))
 452         nsres = nsIDOMHTMLSelectElement_Add(This->nsselect, element_obj->html_element, (nsIVariant*)nsvariant);
 453     nsIWritableVariant_Release(nsvariant);
 454     if(NS_FAILED(nsres)) {
 455         ERR("Add failed: %08x\n", nsres);
 456         return E_FAIL;
 457     }
 458
 459     return S_OK;
 460 }
 461
 462 static HRESULT WINAPI HTMLSelectElement_remove(IHTMLSelectElement *iface, LONG index)
 463 {
 464     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 465     nsresult nsres;
 466     TRACE("(%p)->(%d)\n", This, index);
 467     if(index < 0)
 468         return E_INVALIDARG;
 469
 470     nsres = nsIDOMHTMLSelectElement_select_Remove(This->nsselect, index);
 471     if(NS_FAILED(nsres)) {
 472         ERR("Remove failed: %08x\n", nsres);
 473         return E_FAIL;
 474     }
 475     return S_OK;
 476 }
 477
 478 static HRESULT WINAPI HTMLSelectElement_put_length(IHTMLSelectElement *iface, LONG v)
 479 {
 480     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 481     nsresult nsres;
 482
 483     TRACE("(%p)->(%d)\n", This, v);
 484
 485     nsres = nsIDOMHTMLSelectElement_SetLength(This->nsselect, v);
 486     if(NS_FAILED(nsres))
 487         ERR("SetLength failed: %08x\n", nsres);
 488
 489     return S_OK;
 490 }
 491
 492 static HRESULT WINAPI HTMLSelectElement_get_length(IHTMLSelectElement *iface, LONG *p)
 493 {
 494     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 495     UINT32 length = 0;
 496     nsresult nsres;
 497
 498     TRACE("(%p)->(%p)\n", This, p);
 499
 500     nsres = nsIDOMHTMLSelectElement_GetLength(This->nsselect, &length);
 501     if(NS_FAILED(nsres))
 502         ERR("GetLength failed: %08x\n", nsres);
 503
 504     *p = length;
 505
 506     TRACE("ret %d\n", *p);
 507     return S_OK;
 508 }
 509
 510 static HRESULT WINAPI HTMLSelectElement_get__newEnum(IHTMLSelectElement *iface, IUnknown **p)
 511 {
 512     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 513     FIXME("(%p)->(%p)\n", This, p);
 514     return E_NOTIMPL;
 515 }
 516
 517 static HRESULT WINAPI HTMLSelectElement_item(IHTMLSelectElement *iface, VARIANT name,
 518                                              VARIANT index, IDispatch **pdisp)
 519 {
 520     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 521
 522     TRACE("(%p)->(%s %s %p)\n", This, debugstr_variant(&name), debugstr_variant(&index), pdisp);
 523
 524     if(!pdisp)
 525         return E_POINTER;
 526     *pdisp = NULL;
 527
 528     if(V_VT(&name) == VT_I4) {
 529         if(V_I4(&name) < 0)
 530             return E_INVALIDARG;
 531         return htmlselect_item(This, V_I4(&name), pdisp);
 532     }
 533
 534     FIXME("Unsupported args\n");
 535     return E_NOTIMPL;
 536 }
 537
 538 static HRESULT WINAPI HTMLSelectElement_tags(IHTMLSelectElement *iface, VARIANT tagName,
 539                                              IDispatch **pdisp)
 540 {
 541     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 542     FIXME("(%p)->(v %p)\n", This, pdisp);
 543     return E_NOTIMPL;
 544 }
 545
 546 static const IHTMLSelectElementVtbl HTMLSelectElementVtbl = {
 547     HTMLSelectElement_QueryInterface,
 548     HTMLSelectElement_AddRef,
 549     HTMLSelectElement_Release,
 550     HTMLSelectElement_GetTypeInfoCount,
 551     HTMLSelectElement_GetTypeInfo,
 552     HTMLSelectElement_GetIDsOfNames,
 553     HTMLSelectElement_Invoke,
 554     HTMLSelectElement_put_size,
 555     HTMLSelectElement_get_size,
 556     HTMLSelectElement_put_multiple,
 557     HTMLSelectElement_get_multiple,
 558     HTMLSelectElement_put_name,
 559     HTMLSelectElement_get_name,
 560     HTMLSelectElement_get_options,
 561     HTMLSelectElement_put_onchange,
 562     HTMLSelectElement_get_onchange,
 563     HTMLSelectElement_put_selectedIndex,
 564     HTMLSelectElement_get_selectedIndex,
 565     HTMLSelectElement_get_type,
 566     HTMLSelectElement_put_value,
 567     HTMLSelectElement_get_value,
 568     HTMLSelectElement_put_disabled,
 569     HTMLSelectElement_get_disabled,
 570     HTMLSelectElement_get_form,
 571     HTMLSelectElement_add,
 572     HTMLSelectElement_remove,
 573     HTMLSelectElement_put_length,
 574     HTMLSelectElement_get_length,
 575     HTMLSelectElement_get__newEnum,
 576     HTMLSelectElement_item,
 577     HTMLSelectElement_tags
 578 };
 579
 580 static inline HTMLSelectElement *impl_from_HTMLDOMNode(HTMLDOMNode *iface)
 581 {
 582     return CONTAINING_RECORD(iface, HTMLSelectElement, element.node);
 583 }
 584
 585 static HRESULT HTMLSelectElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
 586 {
 587     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 588
 589     *ppv = NULL;
 590
 591     if(IsEqualGUID(&IID_IUnknown, riid)) {
 592         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 593         *ppv = &This->IHTMLSelectElement_iface;
 594     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
 595         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
 596         *ppv = &This->IHTMLSelectElement_iface;
 597     }else if(IsEqualGUID(&IID_IHTMLSelectElement, riid)) {
 598         TRACE("(%p)->(IID_IHTMLSelectElement %p)\n", This, ppv);
 599         *ppv = &This->IHTMLSelectElement_iface;
 600     }
 601
 602     if(*ppv) {
 603         IUnknown_AddRef((IUnknown*)*ppv);
 604         return S_OK;
 605     }
 606
 607     return HTMLElement_QI(&This->element.node, riid, ppv);
 608 }
 609
 610 static HRESULT HTMLSelectElementImpl_put_disabled(HTMLDOMNode *iface, VARIANT_BOOL v)
 611 {
 612     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 613     return IHTMLSelectElement_put_disabled(&This->IHTMLSelectElement_iface, v);
 614 }
 615
 616 static HRESULT HTMLSelectElementImpl_get_disabled(HTMLDOMNode *iface, VARIANT_BOOL *p)
 617 {
 618     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 619     return IHTMLSelectElement_get_disabled(&This->IHTMLSelectElement_iface, p);
 620 }
 621
 622 #define DISPID_OPTIONCOL_0 MSHTML_DISPID_CUSTOM_MIN
 623
 624 static HRESULT HTMLSelectElement_get_dispid(HTMLDOMNode *iface, BSTR name, DWORD flags, DISPID *dispid)
 625 {
 626     const WCHAR *ptr;
 627     DWORD idx = 0;
 628
 629     for(ptr = name; *ptr && isdigitW(*ptr); ptr++) {
 630         idx = idx*10 + (*ptr-'0');
 631         if(idx > MSHTML_CUSTOM_DISPID_CNT) {
 632             WARN("too big idx\n");
 633             return DISP_E_UNKNOWNNAME;
 634         }
 635     }
 636     if(*ptr)
 637         return DISP_E_UNKNOWNNAME;
 638
 639     *dispid = DISPID_OPTIONCOL_0 + idx;
 640     return S_OK;
 641 }
 642
 643 static HRESULT HTMLSelectElement_invoke(HTMLDOMNode *iface, DISPID id, LCID lcid, WORD flags, DISPPARAMS *params,
 644         VARIANT *res, EXCEPINFO *ei, IServiceProvider *caller)
 645 {
 646     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 647
 648     TRACE("(%p)->(%x %x %x %p %p %p %p)\n", This, id, lcid, flags, params, res, ei, caller);
 649
 650     switch(flags) {
 651     case DISPATCH_PROPERTYGET: {
 652         IDispatch *ret;
 653         HRESULT hres;
 654
 655         hres = htmlselect_item(This, id-DISPID_OPTIONCOL_0, &ret);
 656         if(FAILED(hres))
 657             return hres;
 658
 659         if(ret) {
 660             V_VT(res) = VT_DISPATCH;
 661             V_DISPATCH(res) = ret;
 662         }else {
 663             V_VT(res) = VT_NULL;
 664         }
 665         break;
 666     }
 667
 668     default:
 669         FIXME("unimplemented flags %x\n", flags);
 670         return E_NOTIMPL;
 671     }
 672
 673     return S_OK;
 674 }
 675
 676 static void HTMLSelectElement_traverse(HTMLDOMNode *iface, nsCycleCollectionTraversalCallback *cb)
 677 {
 678     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 679
 680     if(This->nsselect)
 681         note_cc_edge((nsISupports*)This->nsselect, "This->nsselect", cb);
 682 }
 683
 684 static void HTMLSelectElement_unlink(HTMLDOMNode *iface)
 685 {
 686     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 687
 688     if(This->nsselect) {
 689         nsIDOMHTMLSelectElement *nsselect = This->nsselect;
 690
 691         This->nsselect = NULL;
 692         nsIDOMHTMLSelectElement_Release(nsselect);
 693     }
 694 }
 695
 696 static const NodeImplVtbl HTMLSelectElementImplVtbl = {
 697     &CLSID_HTMLSelectElement,
 698     HTMLSelectElement_QI,
 699     HTMLElement_destructor,
 700     HTMLElement_cpc,
 701     HTMLElement_clone,
 702     HTMLElement_handle_event,
 703     HTMLElement_get_attr_col,
 704     NULL,
 705     HTMLSelectElementImpl_put_disabled,
 706     HTMLSelectElementImpl_get_disabled,
 707     NULL,
 708     NULL,
 709     HTMLSelectElement_get_dispid,
 710     HTMLSelectElement_invoke,
 711     NULL,
 712     HTMLSelectElement_traverse,
 713     HTMLSelectElement_unlink
 714 };
 715
 716 static const tid_t HTMLSelectElement_tids[] = {
 717     HTMLELEMENT_TIDS,
 718     IHTMLSelectElement_tid,
 719     0
 720 };
 721
 722 static dispex_static_data_t HTMLSelectElement_dispex = {
 723     NULL,
 724     DispHTMLSelectElement_tid,
 725     HTMLSelectElement_tids,
 726     HTMLElement_init_dispex_info
 727 };
 728
 729 HRESULT HTMLSelectElement_Create(HTMLDocumentNode *doc, nsIDOMElement *nselem, HTMLElement **elem)
 730 {
 731     HTMLSelectElement *ret;
 732     nsresult nsres;
 733
 734     ret = heap_alloc_zero(sizeof(HTMLSelectElement));
 735     if(!ret)
 736         return E_OUTOFMEMORY;
 737
 738     ret->IHTMLSelectElement_iface.lpVtbl = &HTMLSelectElementVtbl;
 739     ret->element.node.vtbl = &HTMLSelectElementImplVtbl;
 740
 741     HTMLElement_Init(&ret->element, doc, nselem, &HTMLSelectElement_dispex);
 742
 743     nsres = nsIDOMElement_QueryInterface(nselem, &IID_nsIDOMHTMLSelectElement, (void**)&ret->nsselect);
 744     assert(nsres == NS_OK);
 745
 746     *elem = &ret->element;
 747     return S_OK;
 748 }