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 typedef struct {
  37     HTMLElement element;
  38
  39     IHTMLSelectElement IHTMLSelectElement_iface;
  40
  41     nsIDOMHTMLSelectElement *nsselect;
  42 } HTMLSelectElement;
  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.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.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.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.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     FIXME("(%p)->(%d)\n", This, v);
 146     return E_NOTIMPL;
 147 }
 148
 149 static HRESULT WINAPI HTMLSelectElement_get_size(IHTMLSelectElement *iface, LONG *p)
 150 {
 151     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 152     FIXME("(%p)->(%p)\n", This, p);
 153     return E_NOTIMPL;
 154 }
 155
 156 static HRESULT WINAPI HTMLSelectElement_put_multiple(IHTMLSelectElement *iface, VARIANT_BOOL v)
 157 {
 158     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 159     nsresult nsres;
 160
 161     TRACE("(%p)->(%x)\n", This, v);
 162
 163     nsres = nsIDOMHTMLSelectElement_SetMultiple(This->nsselect, !!v);
 164     assert(nsres == NS_OK);
 165     return S_OK;
 166 }
 167
 168 static HRESULT WINAPI HTMLSelectElement_get_multiple(IHTMLSelectElement *iface, VARIANT_BOOL *p)
 169 {
 170     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 171     cpp_bool val;
 172     nsresult nsres;
 173
 174     TRACE("(%p)->(%p)\n", This, p);
 175
 176     nsres = nsIDOMHTMLSelectElement_GetMultiple(This->nsselect, &val);
 177     assert(nsres == NS_OK);
 178
 179     *p = val ? VARIANT_TRUE : VARIANT_FALSE;
 180     return S_OK;
 181 }
 182
 183 static HRESULT WINAPI HTMLSelectElement_put_name(IHTMLSelectElement *iface, BSTR v)
 184 {
 185     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 186     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 187     return E_NOTIMPL;
 188 }
 189
 190 static HRESULT WINAPI HTMLSelectElement_get_name(IHTMLSelectElement *iface, BSTR *p)
 191 {
 192     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 193     nsAString name_str;
 194     const PRUnichar *name = NULL;
 195     nsresult nsres;
 196
 197     TRACE("(%p)->(%p)\n", This, p);
 198
 199     nsAString_Init(&name_str, NULL);
 200
 201     nsres = nsIDOMHTMLSelectElement_GetName(This->nsselect, &name_str);
 202     if(NS_SUCCEEDED(nsres)) {
 203         static const WCHAR wszGarbage[] = {'g','a','r','b','a','g','e',0};
 204
 205         nsAString_GetData(&name_str, &name);
 206
 207         /*
 208          * Native never returns empty string here. If an element has no name,
 209          * name of previous element or ramdom data is returned.
 210          */
 211         *p = SysAllocString(*name ? name : wszGarbage);
 212     }else {
 213         ERR("GetName failed: %08x\n", nsres);
 214     }
 215
 216     nsAString_Finish(&name_str);
 217
 218     TRACE("name=%s\n", debugstr_w(*p));
 219     return S_OK;
 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     FIXME("(%p)->(%p)\n", This, p);
 360     return E_NOTIMPL;
 361 }
 362
 363 static HRESULT WINAPI HTMLSelectElement_add(IHTMLSelectElement *iface, IHTMLElement *element,
 364                                             VARIANT before)
 365 {
 366     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 367     nsIWritableVariant *nsvariant;
 368     HTMLElement *element_obj;
 369     nsresult nsres;
 370
 371     TRACE("(%p)->(%p %s)\n", This, element, debugstr_variant(&before));
 372
 373     element_obj = unsafe_impl_from_IHTMLElement(element);
 374     if(!element_obj) {
 375         FIXME("External IHTMLElement implementation?\n");
 376         return E_INVALIDARG;
 377     }
 378
 379     nsvariant = create_nsvariant();
 380     if(!nsvariant)
 381         return E_FAIL;
 382
 383     switch(V_VT(&before)) {
 384     case VT_EMPTY:
 385         nsres = nsIWritableVariant_SetAsEmpty(nsvariant);
 386         break;
 387     case VT_I2:
 388         nsres = nsIWritableVariant_SetAsInt16(nsvariant, V_I2(&before));
 389         break;
 390     default:
 391         FIXME("unhandled before %s\n", debugstr_variant(&before));
 392         nsIWritableVariant_Release(nsvariant);
 393         return E_NOTIMPL;
 394     }
 395
 396     if(NS_SUCCEEDED(nsres))
 397         nsres = nsIDOMHTMLSelectElement_Add(This->nsselect, element_obj->nselem, (nsIVariant*)nsvariant);
 398     nsIWritableVariant_Release(nsvariant);
 399     if(NS_FAILED(nsres)) {
 400         ERR("Add failed: %08x\n", nsres);
 401         return E_FAIL;
 402     }
 403
 404     return S_OK;
 405 }
 406
 407 static HRESULT WINAPI HTMLSelectElement_remove(IHTMLSelectElement *iface, LONG index)
 408 {
 409     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 410     nsresult nsres;
 411     TRACE("(%p)->(%d)\n", This, index);
 412     nsres = nsIDOMHTMLSelectElement_select_Remove(This->nsselect, index);
 413     if(NS_FAILED(nsres)) {
 414         ERR("Remove failed: %08x\n", nsres);
 415         return E_FAIL;
 416     }
 417     return S_OK;
 418 }
 419
 420 static HRESULT WINAPI HTMLSelectElement_put_length(IHTMLSelectElement *iface, LONG v)
 421 {
 422     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 423     nsresult nsres;
 424
 425     TRACE("(%p)->(%d)\n", This, v);
 426
 427     nsres = nsIDOMHTMLSelectElement_SetLength(This->nsselect, v);
 428     if(NS_FAILED(nsres))
 429         ERR("SetLength failed: %08x\n", nsres);
 430
 431     return S_OK;
 432 }
 433
 434 static HRESULT WINAPI HTMLSelectElement_get_length(IHTMLSelectElement *iface, LONG *p)
 435 {
 436     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 437     UINT32 length = 0;
 438     nsresult nsres;
 439
 440     TRACE("(%p)->(%p)\n", This, p);
 441
 442     nsres = nsIDOMHTMLSelectElement_GetLength(This->nsselect, &length);
 443     if(NS_FAILED(nsres))
 444         ERR("GetLength failed: %08x\n", nsres);
 445
 446     *p = length;
 447
 448     TRACE("ret %d\n", *p);
 449     return S_OK;
 450 }
 451
 452 static HRESULT WINAPI HTMLSelectElement_get__newEnum(IHTMLSelectElement *iface, IUnknown **p)
 453 {
 454     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 455     FIXME("(%p)->(%p)\n", This, p);
 456     return E_NOTIMPL;
 457 }
 458
 459 static HRESULT WINAPI HTMLSelectElement_item(IHTMLSelectElement *iface, VARIANT name,
 460                                              VARIANT index, IDispatch **pdisp)
 461 {
 462     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 463
 464     TRACE("(%p)->(%s %s %p)\n", This, debugstr_variant(&name), debugstr_variant(&index), pdisp);
 465
 466     if(!pdisp)
 467         return E_POINTER;
 468     *pdisp = NULL;
 469
 470     if(V_VT(&name) == VT_I4) {
 471         if(V_I4(&name) < 0)
 472             return E_INVALIDARG;
 473         return htmlselect_item(This, V_I4(&name), pdisp);
 474     }
 475
 476     FIXME("Unsupported args\n");
 477     return E_NOTIMPL;
 478 }
 479
 480 static HRESULT WINAPI HTMLSelectElement_tags(IHTMLSelectElement *iface, VARIANT tagName,
 481                                              IDispatch **pdisp)
 482 {
 483     HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
 484     FIXME("(%p)->(v %p)\n", This, pdisp);
 485     return E_NOTIMPL;
 486 }
 487
 488 static const IHTMLSelectElementVtbl HTMLSelectElementVtbl = {
 489     HTMLSelectElement_QueryInterface,
 490     HTMLSelectElement_AddRef,
 491     HTMLSelectElement_Release,
 492     HTMLSelectElement_GetTypeInfoCount,
 493     HTMLSelectElement_GetTypeInfo,
 494     HTMLSelectElement_GetIDsOfNames,
 495     HTMLSelectElement_Invoke,
 496     HTMLSelectElement_put_size,
 497     HTMLSelectElement_get_size,
 498     HTMLSelectElement_put_multiple,
 499     HTMLSelectElement_get_multiple,
 500     HTMLSelectElement_put_name,
 501     HTMLSelectElement_get_name,
 502     HTMLSelectElement_get_options,
 503     HTMLSelectElement_put_onchange,
 504     HTMLSelectElement_get_onchange,
 505     HTMLSelectElement_put_selectedIndex,
 506     HTMLSelectElement_get_selectedIndex,
 507     HTMLSelectElement_get_type,
 508     HTMLSelectElement_put_value,
 509     HTMLSelectElement_get_value,
 510     HTMLSelectElement_put_disabled,
 511     HTMLSelectElement_get_disabled,
 512     HTMLSelectElement_get_form,
 513     HTMLSelectElement_add,
 514     HTMLSelectElement_remove,
 515     HTMLSelectElement_put_length,
 516     HTMLSelectElement_get_length,
 517     HTMLSelectElement_get__newEnum,
 518     HTMLSelectElement_item,
 519     HTMLSelectElement_tags
 520 };
 521
 522 static inline HTMLSelectElement *impl_from_HTMLDOMNode(HTMLDOMNode *iface)
 523 {
 524     return CONTAINING_RECORD(iface, HTMLSelectElement, element.node);
 525 }
 526
 527 static HRESULT HTMLSelectElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
 528 {
 529     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 530
 531     *ppv = NULL;
 532
 533     if(IsEqualGUID(&IID_IUnknown, riid)) {
 534         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 535         *ppv = &This->IHTMLSelectElement_iface;
 536     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
 537         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
 538         *ppv = &This->IHTMLSelectElement_iface;
 539     }else if(IsEqualGUID(&IID_IHTMLSelectElement, riid)) {
 540         TRACE("(%p)->(IID_IHTMLSelectElement %p)\n", This, ppv);
 541         *ppv = &This->IHTMLSelectElement_iface;
 542     }
 543
 544     if(*ppv) {
 545         IUnknown_AddRef((IUnknown*)*ppv);
 546         return S_OK;
 547     }
 548
 549     return HTMLElement_QI(&This->element.node, riid, ppv);
 550 }
 551
 552 static HRESULT HTMLSelectElementImpl_put_disabled(HTMLDOMNode *iface, VARIANT_BOOL v)
 553 {
 554     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 555     return IHTMLSelectElement_put_disabled(&This->IHTMLSelectElement_iface, v);
 556 }
 557
 558 static HRESULT HTMLSelectElementImpl_get_disabled(HTMLDOMNode *iface, VARIANT_BOOL *p)
 559 {
 560     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 561     return IHTMLSelectElement_get_disabled(&This->IHTMLSelectElement_iface, p);
 562 }
 563
 564 #define DISPID_OPTIONCOL_0 MSHTML_DISPID_CUSTOM_MIN
 565
 566 static HRESULT HTMLSelectElement_get_dispid(HTMLDOMNode *iface, BSTR name, DWORD flags, DISPID *dispid)
 567 {
 568     const WCHAR *ptr;
 569     DWORD idx = 0;
 570
 571     for(ptr = name; *ptr && isdigitW(*ptr); ptr++) {
 572         idx = idx*10 + (*ptr-'0');
 573         if(idx > MSHTML_CUSTOM_DISPID_CNT) {
 574             WARN("too big idx\n");
 575             return DISP_E_UNKNOWNNAME;
 576         }
 577     }
 578     if(*ptr)
 579         return DISP_E_UNKNOWNNAME;
 580
 581     *dispid = DISPID_OPTIONCOL_0 + idx;
 582     return S_OK;
 583 }
 584
 585 static HRESULT HTMLSelectElement_invoke(HTMLDOMNode *iface, DISPID id, LCID lcid, WORD flags, DISPPARAMS *params,
 586         VARIANT *res, EXCEPINFO *ei, IServiceProvider *caller)
 587 {
 588     HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
 589
 590     TRACE("(%p)->(%x %x %x %p %p %p %p)\n", This, id, lcid, flags, params, res, ei, caller);
 591
 592     switch(flags) {
 593     case DISPATCH_PROPERTYGET: {
 594         IDispatch *ret;
 595         HRESULT hres;
 596
 597         hres = htmlselect_item(This, id-DISPID_OPTIONCOL_0, &ret);
 598         if(FAILED(hres))
 599             return hres;
 600
 601         if(ret) {
 602             V_VT(res) = VT_DISPATCH;
 603             V_DISPATCH(res) = ret;
 604         }else {
 605             V_VT(res) = VT_NULL;
 606         }
 607         break;
 608     }
 609
 610     default:
 611         FIXME("unimplemented flags %x\n", flags);
 612         return E_NOTIMPL;
 613     }
 614
 615     return S_OK;
 616 }
 617
 618 static const NodeImplVtbl HTMLSelectElementImplVtbl = {
 619     HTMLSelectElement_QI,
 620     HTMLElement_destructor,
 621     HTMLElement_cpc,
 622     HTMLElement_clone,
 623     HTMLElement_handle_event,
 624     HTMLElement_get_attr_col,
 625     NULL,
 626     NULL,
 627     HTMLSelectElementImpl_put_disabled,
 628     HTMLSelectElementImpl_get_disabled,
 629     NULL,
 630     NULL,
 631     HTMLSelectElement_get_dispid,
 632     HTMLSelectElement_invoke
 633 };
 634
 635 static const tid_t HTMLSelectElement_tids[] = {
 636     HTMLELEMENT_TIDS,
 637     IHTMLSelectElement_tid,
 638     0
 639 };
 640
 641 static dispex_static_data_t HTMLSelectElement_dispex = {
 642     NULL,
 643     DispHTMLSelectElement_tid,
 644     NULL,
 645     HTMLSelectElement_tids
 646 };
 647
 648 HRESULT HTMLSelectElement_Create(HTMLDocumentNode *doc, nsIDOMHTMLElement *nselem, HTMLElement **elem)
 649 {
 650     HTMLSelectElement *ret;
 651     nsresult nsres;
 652
 653     ret = heap_alloc_zero(sizeof(HTMLSelectElement));
 654     if(!ret)
 655         return E_OUTOFMEMORY;
 656
 657     ret->IHTMLSelectElement_iface.lpVtbl = &HTMLSelectElementVtbl;
 658     ret->element.node.vtbl = &HTMLSelectElementImplVtbl;
 659
 660     HTMLElement_Init(&ret->element, doc, nselem, &HTMLSelectElement_dispex);
 661
 662     nsres = nsIDOMHTMLElement_QueryInterface(nselem, &IID_nsIDOMHTMLSelectElement,
 663                                              (void**)&ret->nsselect);
 664
 665     /* Share nsselect reference with nsnode */
 666     assert(nsres == NS_OK && (nsIDOMNode*)ret->nsselect == ret->element.node.nsnode);
 667     nsIDOMNode_Release(ret->element.node.nsnode);
 668
 669     *elem = &ret->element;
 670     return S_OK;
 671 }