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