reactos/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.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.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.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.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     FIXME("(%p)->(%d)\n", This, v);
 131     return E_NOTIMPL;
 132 }
 133
 134 static HRESULT WINAPI HTMLSelectElement_get_size(IHTMLSelectElement *iface, LONG *p)
 135 {
 136     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 137     FIXME("(%p)->(%p)\n", This, p);
 138     return E_NOTIMPL;
 139 }
 140
 141 static HRESULT WINAPI HTMLSelectElement_put_multiple(IHTMLSelectElement *iface, VARIANT_BOOL v)
 142 {
 143     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 144     nsresult nsres;
 145
 146     TRACE("(%p)->(%x)\n", This, v);
 147
 148     nsres = nsIDOMHTMLSelectElement_SetMultiple(This->nsselect, !!v);
 149     assert(nsres == NS_OK);
 150     return S_OK;
 151 }
 152
 153 static HRESULT WINAPI HTMLSelectElement_get_multiple(IHTMLSelectElement *iface, VARIANT_BOOL *p)
 154 {
 155     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 156     cpp_bool val;
 157     nsresult nsres;
 158
 159     TRACE("(%p)->(%p)\n", This, p);
 160
 161     nsres = nsIDOMHTMLSelectElement_GetMultiple(This->nsselect, &val);
 162     assert(nsres == NS_OK);
 163
 164     *p = val ? VARIANT_TRUE : VARIANT_FALSE;
 165     return S_OK;
 166 }
 167
 168 static HRESULT WINAPI HTMLSelectElement_put_name(IHTMLSelectElement *iface, BSTR v)
 169 {
 170     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 171     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 172     return E_NOTIMPL;
 173 }
 174
 175 static HRESULT WINAPI HTMLSelectElement_get_name(IHTMLSelectElement *iface, BSTR *p)
 176 {
 177     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 178     nsAString name_str;
 179     const PRUnichar *name = NULL;
 180     nsresult nsres;
 181
 182     TRACE("(%p)->(%p)\n", This, p);
 183
 184     nsAString_Init(&name_str, NULL);
 185
 186     nsres = nsIDOMHTMLSelectElement_GetName(This->nsselect, &name_str);
 187     if(NS_SUCCEEDED(nsres)) {
 188         static const WCHAR wszGarbage[] = {'g','a','r','b','a','g','e',0};
 189
 190         nsAString_GetData(&name_str, &name);
 191
 192         /*
 193          * Native never returns empty string here. If an element has no name,
 194          * name of previous element or ramdom data is returned.
 195          */
 196         *p = SysAllocString(*name ? name : wszGarbage);
 197     }else {
 198         ERR("GetName failed: %08x\n", nsres);
 199     }
 200
 201     nsAString_Finish(&name_str);
 202
 203     TRACE("name=%s\n", debugstr_w(*p));
 204     return S_OK;
 205 }
 206
 207 static HRESULT WINAPI HTMLSelectElement_get_options(IHTMLSelectElement *iface, IDispatch **p)
 208 {
 209     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 210
 211     TRACE("(%p)->(%p)\n", This, p);
 212
 213     *p = (IDispatch*)&This->IHTMLSelectElement_iface;
 214     IDispatch_AddRef(*p);
 215     return S_OK;
 216 }
 217
 218 static HRESULT WINAPI HTMLSelectElement_put_onchange(IHTMLSelectElement *iface, VARIANT v)
 219 {
 220     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 221
 222     TRACE("(%p)->()\n", This);
 223
 224     return set_node_event(&This->element.node, EVENTID_CHANGE, &v);
 225 }
 226
 227 static HRESULT WINAPI HTMLSelectElement_get_onchange(IHTMLSelectElement *iface, VARIANT *p)
 228 {
 229     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 230     FIXME("(%p)->(%p)\n", This, p);
 231     return E_NOTIMPL;
 232 }
 233
 234 static HRESULT WINAPI HTMLSelectElement_put_selectedIndex(IHTMLSelectElement *iface, LONG v)
 235 {
 236     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 237     nsresult nsres;
 238
 239     TRACE("(%p)->(%d)\n", This, v);
 240
 241     nsres = nsIDOMHTMLSelectElement_SetSelectedIndex(This->nsselect, v);
 242     if(NS_FAILED(nsres))
 243         ERR("SetSelectedIndex failed: %08x\n", nsres);
 244
 245     return S_OK;
 246 }
 247
 248 static HRESULT WINAPI HTMLSelectElement_get_selectedIndex(IHTMLSelectElement *iface, LONG *p)
 249 {
 250     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 251     nsresult nsres;
 252
 253     TRACE("(%p)->(%p)\n", This, p);
 254
 255     nsres = nsIDOMHTMLSelectElement_GetSelectedIndex(This->nsselect, p);
 256     if(NS_FAILED(nsres)) {
 257         ERR("GetSelectedIndex failed: %08x\n", nsres);
 258         return E_FAIL;
 259     }
 260
 261     return S_OK;
 262 }
 263
 264 static HRESULT WINAPI HTMLSelectElement_get_type(IHTMLSelectElement *iface, BSTR *p)
 265 {
 266     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 267     nsAString type_str;
 268     nsresult nsres;
 269
 270     TRACE("(%p)->(%p)\n", This, p);
 271
 272     nsAString_Init(&type_str, NULL);
 273     nsres = nsIDOMHTMLSelectElement_GetType(This->nsselect, &type_str);
 274     return return_nsstr(nsres, &type_str, p);
 275 }
 276
 277 static HRESULT WINAPI HTMLSelectElement_put_value(IHTMLSelectElement *iface, BSTR v)
 278 {
 279     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 280     nsAString value_str;
 281     nsresult nsres;
 282
 283     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 284
 285     nsAString_InitDepend(&value_str, v);
 286     nsres = nsIDOMHTMLSelectElement_SetValue(This->nsselect, &value_str);
 287     nsAString_Finish(&value_str);
 288     if(NS_FAILED(nsres))
 289         ERR("SetValue failed: %08x\n", nsres);
 290
 291     return S_OK;
 292 }
 293
 294 static HRESULT WINAPI HTMLSelectElement_get_value(IHTMLSelectElement *iface, BSTR *p)
 295 {
 296     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 297     nsAString value_str;
 298     nsresult nsres;
 299
 300     TRACE("(%p)->(%p)\n", This, p);
 301
 302     nsAString_Init(&value_str, NULL);
 303     nsres = nsIDOMHTMLSelectElement_GetValue(This->nsselect, &value_str);
 304     return return_nsstr(nsres, &value_str, p);
 305 }
 306
 307 static HRESULT WINAPI HTMLSelectElement_put_disabled(IHTMLSelectElement *iface, VARIANT_BOOL v)
 308 {
 309     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 310     nsresult nsres;
 311
 312     TRACE("(%p)->(%x)\n", This, v);
 313
 314     nsres = nsIDOMHTMLSelectElement_SetDisabled(This->nsselect, v != VARIANT_FALSE);
 315     if(NS_FAILED(nsres)) {
 316         ERR("SetDisabled failed: %08x\n", nsres);
 317         return E_FAIL;
 318     }
 319
 320     return S_OK;
 321 }
 322
 323 static HRESULT WINAPI HTMLSelectElement_get_disabled(IHTMLSelectElement *iface, VARIANT_BOOL *p)
 324 {
 325     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 326     cpp_bool disabled = FALSE;
 327     nsresult nsres;
 328
 329     TRACE("(%p)->(%p)\n", This, p);
 330
 331     nsres = nsIDOMHTMLSelectElement_GetDisabled(This->nsselect, &disabled);
 332     if(NS_FAILED(nsres)) {
 333         ERR("GetDisabled failed: %08x\n", nsres);
 334         return E_FAIL;
 335     }
 336
 337     *p = disabled ? VARIANT_TRUE : VARIANT_FALSE;
 338     return S_OK;
 339 }
 340
 341 static HRESULT WINAPI HTMLSelectElement_get_form(IHTMLSelectElement *iface, IHTMLFormElement **p)
 342 {
 343     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 344     FIXME("(%p)->(%p)\n", This, p);
 345     return E_NOTIMPL;
 346 }
 347
 348 static HRESULT WINAPI HTMLSelectElement_add(IHTMLSelectElement *iface, IHTMLElement *element,
 349                                             VARIANT before)
 350 {
 351     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 352     nsIWritableVariant *nsvariant;
 353     HTMLElement *element_obj;
 354     nsresult nsres;
 355
 356     TRACE("(%p)->(%p %s)\n", This, element, debugstr_variant(&before));
 357
 358     element_obj = unsafe_impl_from_IHTMLElement(element);
 359     if(!element_obj) {
 360         FIXME("External IHTMLElement implementation?\n");
 361         return E_INVALIDARG;
 362     }
 363
 364     nsvariant = create_nsvariant();
 365     if(!nsvariant)
 366         return E_FAIL;
 367
 368     switch(V_VT(&before)) {
 369     case VT_EMPTY:
 370         nsres = nsIWritableVariant_SetAsEmpty(nsvariant);
 371         break;
 372     case VT_I2:
 373         nsres = nsIWritableVariant_SetAsInt16(nsvariant, V_I2(&before));
 374         break;
 375     default:
 376         FIXME("unhandled before %s\n", debugstr_variant(&before));
 377         nsIWritableVariant_Release(nsvariant);
 378         return E_NOTIMPL;
 379     }
 380
 381     if(NS_SUCCEEDED(nsres))
 382         nsres = nsIDOMHTMLSelectElement_Add(This->nsselect, element_obj->nselem, (nsIVariant*)nsvariant);
 383     nsIWritableVariant_Release(nsvariant);
 384     if(NS_FAILED(nsres)) {
 385         ERR("Add failed: %08x\n", nsres);
 386         return E_FAIL;
 387     }
 388
 389     return S_OK;
 390 }
 391
 392 static HRESULT WINAPI HTMLSelectElement_remove(IHTMLSelectElement *iface, LONG index)
 393 {
 394     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 395     nsresult nsres;
 396     TRACE("(%p)->(%d)\n", This, index);
 397     nsres = nsIDOMHTMLSelectElement_select_Remove(This->nsselect, index);
 398     if(NS_FAILED(nsres)) {
 399         ERR("Remove failed: %08x\n", nsres);
 400         return E_FAIL;
 401     }
 402     return S_OK;
 403 }
 404
 405 static HRESULT WINAPI HTMLSelectElement_put_length(IHTMLSelectElement *iface, LONG v)
 406 {
 407     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 408     nsresult nsres;
 409
 410     TRACE("(%p)->(%d)\n", This, v);
 411
 412     nsres = nsIDOMHTMLSelectElement_SetLength(This->nsselect, v);
 413     if(NS_FAILED(nsres))
 414         ERR("SetLength failed: %08x\n", nsres);
 415
 416     return S_OK;
 417 }
 418
 419 static HRESULT WINAPI HTMLSelectElement_get_length(IHTMLSelectElement *iface, LONG *p)
 420 {
 421     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 422     UINT32 length = 0;
 423     nsresult nsres;
 424
 425     TRACE("(%p)->(%p)\n", This, p);
 426
 427     nsres = nsIDOMHTMLSelectElement_GetLength(This->nsselect, &length);
 428     if(NS_FAILED(nsres))
 429         ERR("GetLength failed: %08x\n", nsres);
 430
 431     *p = length;
 432
 433     TRACE("ret %d\n", *p);
 434     return S_OK;
 435 }
 436
 437 static HRESULT WINAPI HTMLSelectElement_get__newEnum(IHTMLSelectElement *iface, IUnknown **p)
 438 {
 439     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 440     FIXME("(%p)->(%p)\n", This, p);
 441     return E_NOTIMPL;
 442 }
 443
 444 static HRESULT WINAPI HTMLSelectElement_item(IHTMLSelectElement *iface, VARIANT name,
 445                                              VARIANT index, IDispatch **pdisp)
 446 {
 447     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 448
 449     TRACE("(%p)->(%s %s %p)\n", This, debugstr_variant(&name), debugstr_variant(&index), pdisp);
 450
 451     if(!pdisp)
 452         return E_POINTER;
 453     *pdisp = NULL;
 454
 455     if(V_VT(&name) == VT_I4) {
 456         if(V_I4(&name) < 0)
 457             return E_INVALIDARG;
 458         return htmlselect_item(This, V_I4(&name), pdisp);
 459     }
 460
 461     FIXME("Unsupported args\n");
 462     return E_NOTIMPL;
 463 }
 464
 465 static HRESULT WINAPI HTMLSelectElement_tags(IHTMLSelectElement *iface, VARIANT tagName,
 466                                              IDispatch **pdisp)
 467 {
 468     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 469     FIXME("(%p)->(v %p)\n", This, pdisp);
 470     return E_NOTIMPL;
 471 }
 472
 473 static const IHTMLSelectElementVtbl HTMLSelectElementVtbl = {
 474     HTMLSelectElement_QueryInterface,
 475     HTMLSelectElement_AddRef,
 476     HTMLSelectElement_Release,
 477     HTMLSelectElement_GetTypeInfoCount,
 478     HTMLSelectElement_GetTypeInfo,
 479     HTMLSelectElement_GetIDsOfNames,
 480     HTMLSelectElement_Invoke,
 481     HTMLSelectElement_put_size,
 482     HTMLSelectElement_get_size,
 483     HTMLSelectElement_put_multiple,
 484     HTMLSelectElement_get_multiple,
 485     HTMLSelectElement_put_name,
 486     HTMLSelectElement_get_name,
 487     HTMLSelectElement_get_options,
 488     HTMLSelectElement_put_onchange,
 489     HTMLSelectElement_get_onchange,
 490     HTMLSelectElement_put_selectedIndex,
 491     HTMLSelectElement_get_selectedIndex,
 492     HTMLSelectElement_get_type,
 493     HTMLSelectElement_put_value,
 494     HTMLSelectElement_get_value,
 495     HTMLSelectElement_put_disabled,
 496     HTMLSelectElement_get_disabled,
 497     HTMLSelectElement_get_form,
 498     HTMLSelectElement_add,
 499     HTMLSelectElement_remove,
 500     HTMLSelectElement_put_length,
 501     HTMLSelectElement_get_length,
 502     HTMLSelectElement_get__newEnum,
 503     HTMLSelectElement_item,
 504     HTMLSelectElement_tags
 505 };
 506
 507 static inline HTMLSelectElement *impl_from_HTMLDOMNode(HTMLDOMNode *iface)
 508 {
 509     return CONTAINING_RECORD(iface, HTMLSelectElement, element.node);
 510 }
 511
 512 static HRESULT HTMLSelectElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
 513 {
 514     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 515
 516     *ppv = NULL;
 517
 518     if(IsEqualGUID(&IID_IUnknown, riid)) {
 519         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 520         *ppv = &This->IHTMLSelectElement_iface;
 521     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
 522         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
 523         *ppv = &This->IHTMLSelectElement_iface;
 524     }else if(IsEqualGUID(&IID_IHTMLSelectElement, riid)) {
 525         TRACE("(%p)->(IID_IHTMLSelectElement %p)\n", This, ppv);
 526         *ppv = &This->IHTMLSelectElement_iface;
 527     }
 528
 529     if(*ppv) {
 530         IUnknown_AddRef((IUnknown*)*ppv);
 531         return S_OK;
 532     }
 533
 534     return HTMLElement_QI(&This->element.node, riid, ppv);
 535 }
 536
 537 static HRESULT HTMLSelectElementImpl_put_disabled(HTMLDOMNode *iface, VARIANT_BOOL v)
 538 {
 539     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 540     return IHTMLSelectElement_put_disabled(&This->IHTMLSelectElement_iface, v);
 541 }
 542
 543 static HRESULT HTMLSelectElementImpl_get_disabled(HTMLDOMNode *iface, VARIANT_BOOL *p)
 544 {
 545     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 546     return IHTMLSelectElement_get_disabled(&This->IHTMLSelectElement_iface, p);
 547 }
 548
 549 #define DISPID_OPTIONCOL_0 MSHTML_DISPID_CUSTOM_MIN
 550
 551 static HRESULT HTMLSelectElement_get_dispid(HTMLDOMNode *iface, BSTR name, DWORD flags, DISPID *dispid)
 552 {
 553     const WCHAR *ptr;
 554     DWORD idx = 0;
 555
 556     for(ptr = name; *ptr && isdigitW(*ptr); ptr++) {
 557         idx = idx*10 + (*ptr-'0');
 558         if(idx > MSHTML_CUSTOM_DISPID_CNT) {
 559             WARN("too big idx\n");
 560             return DISP_E_UNKNOWNNAME;
 561         }
 562     }
 563     if(*ptr)
 564         return DISP_E_UNKNOWNNAME;
 565
 566     *dispid = DISPID_OPTIONCOL_0 + idx;
 567     return S_OK;
 568 }
 569
 570 static HRESULT HTMLSelectElement_invoke(HTMLDOMNode *iface, DISPID id, LCID lcid, WORD flags, DISPPARAMS *params,
 571         VARIANT *res, EXCEPINFO *ei, IServiceProvider *caller)
 572 {
 573     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 574
 575     TRACE("(%p)->(%x %x %x %p %p %p %p)\n", This, id, lcid, flags, params, res, ei, caller);
 576
 577     switch(flags) {
 578     case DISPATCH_PROPERTYGET: {
 579         IDispatch *ret;
 580         HRESULT hres;
 581
 582         hres = htmlselect_item(This, id-DISPID_OPTIONCOL_0, &ret);
 583         if(FAILED(hres))
 584             return hres;
 585
 586         if(ret) {
 587             V_VT(res) = VT_DISPATCH;
 588             V_DISPATCH(res) = ret;
 589         }else {
 590             V_VT(res) = VT_NULL;
 591         }
 592         break;
 593     }
 594
 595     default:
 596         FIXME("unimplemented flags %x\n", flags);
 597         return E_NOTIMPL;
 598     }
 599
 600     return S_OK;
 601 }
 602
 603 static const NodeImplVtbl HTMLSelectElementImplVtbl = {
 604     HTMLSelectElement_QI,
 605     HTMLElement_destructor,
 606     HTMLElement_cpc,
 607     HTMLElement_clone,
 608     HTMLElement_handle_event,
 609     HTMLElement_get_attr_col,
 610     NULL,
 611     NULL,
 612     HTMLSelectElementImpl_put_disabled,
 613     HTMLSelectElementImpl_get_disabled,
 614     NULL,
 615     NULL,
 616     HTMLSelectElement_get_dispid,
 617     HTMLSelectElement_invoke
 618 };
 619
 620 static const tid_t HTMLSelectElement_tids[] = {
 621     HTMLELEMENT_TIDS,
 622     IHTMLSelectElement_tid,
 623     0
 624 };
 625
 626 static dispex_static_data_t HTMLSelectElement_dispex = {
 627     NULL,
 628     DispHTMLSelectElement_tid,
 629     NULL,
 630     HTMLSelectElement_tids
 631 };
 632
 633 HRESULT HTMLSelectElement_Create(HTMLDocumentNode *doc, nsIDOMHTMLElement *nselem, HTMLElement **elem)
 634 {
 635     HTMLSelectElement *ret;
 636     nsresult nsres;
 637
 638     ret = heap_alloc_zero(sizeof(HTMLSelectElement));
 639     if(!ret)
 640         return E_OUTOFMEMORY;
 641
 642     ret->IHTMLSelectElement_iface.lpVtbl = &HTMLSelectElementVtbl;
 643     ret->element.node.vtbl = &HTMLSelectElementImplVtbl;
 644
 645     HTMLElement_Init(&ret->element, doc, nselem, &HTMLSelectElement_dispex);
 646
 647     nsres = nsIDOMHTMLElement_QueryInterface(nselem, &IID_nsIDOMHTMLSelectElement,
 648                                              (void**)&ret->nsselect);
 649
 650     /* Share nsselect reference with nsnode */
 651     assert(nsres == NS_OK && (nsIDOMNode*)ret->nsselect == ret->element.node.nsnode);
 652     nsIDOMNode_Release(ret->element.node.nsnode);
 653
 654     *elem = &ret->element;
 655     return S_OK;
 656 }