git.oblomov.eu Git - wine/blob - dlls/mshtml/htmlselect.c

   1 /*
   2  * Copyright 2006 Jacek Caban for CodeWeavers
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include <stdarg.h>
  20
  21 #define COBJMACROS
  22
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "winuser.h"
  26 #include "ole2.h"
  27
  28 #include "wine/debug.h"
  29
  30 #include "mshtml_private.h"
  31 #include "htmlevent.h"
  32
  33 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  34
  35 typedef struct {
  36     HTMLElement element;
  37
  38     const IHTMLSelectElementVtbl *lpHTMLSelectElementVtbl;
  39
  40     nsIDOMHTMLSelectElement *nsselect;
  41 } HTMLSelectElement;
  42
  43 #define HTMLSELECT(x)      ((IHTMLSelectElement*)         &(x)->lpHTMLSelectElementVtbl)
  44
  45 static HRESULT htmlselect_item(HTMLSelectElement *This, int i, IDispatch **ret)
  46 {
  47     nsIDOMHTMLOptionsCollection *nscol;
  48     nsIDOMNode *nsnode;
  49     nsresult nsres;
  50     HRESULT hres;
  51
  52     nsres = nsIDOMHTMLSelectElement_GetOptions(This->nsselect, &nscol);
  53     if(NS_FAILED(nsres)) {
  54         ERR("GetOptions failed: %08x\n", nsres);
  55         return E_FAIL;
  56     }
  57
  58     nsres = nsIDOMHTMLOptionsCollection_Item(nscol, i, &nsnode);
  59     nsIDOMHTMLOptionsCollection_Release(nscol);
  60     if(NS_FAILED(nsres)) {
  61         ERR("Item failed: %08x\n", nsres);
  62         return E_FAIL;
  63     }
  64
  65     if(nsnode) {
  66         HTMLDOMNode *node;
  67
  68         hres = get_node(This->element.node.doc, nsnode, TRUE, &node);
  69         nsIDOMNode_Release(nsnode);
  70         if(FAILED(hres))
  71             return hres;
  72
  73         IHTMLDOMNode_AddRef(HTMLDOMNODE(node));
  74         *ret = (IDispatch*)HTMLDOMNODE(node);
  75     }else {
  76         *ret = NULL;
  77     }
  78     return S_OK;
  79 }
  80
  81 #define HTMLSELECT_THIS(iface) DEFINE_THIS(HTMLSelectElement, HTMLSelectElement, iface)
  82
  83 static HRESULT WINAPI HTMLSelectElement_QueryInterface(IHTMLSelectElement *iface,
  84                                                          REFIID riid, void **ppv)
  85 {
  86     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
  87
  88     return IHTMLDOMNode_QueryInterface(HTMLDOMNODE(&This->element.node), riid, ppv);
  89 }
  90
  91 static ULONG WINAPI HTMLSelectElement_AddRef(IHTMLSelectElement *iface)
  92 {
  93     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
  94
  95     return IHTMLDOMNode_AddRef(HTMLDOMNODE(&This->element.node));
  96 }
  97
  98 static ULONG WINAPI HTMLSelectElement_Release(IHTMLSelectElement *iface)
  99 {
 100     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 101
 102     return IHTMLDOMNode_Release(HTMLDOMNODE(&This->element.node));
 103 }
 104
 105 static HRESULT WINAPI HTMLSelectElement_GetTypeInfoCount(IHTMLSelectElement *iface, UINT *pctinfo)
 106 {
 107     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 108
 109     return IDispatchEx_GetTypeInfoCount(DISPATCHEX(&This->element.node.dispex), pctinfo);
 110 }
 111
 112 static HRESULT WINAPI HTMLSelectElement_GetTypeInfo(IHTMLSelectElement *iface, UINT iTInfo,
 113                                               LCID lcid, ITypeInfo **ppTInfo)
 114 {
 115     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 116
 117     return IDispatchEx_GetTypeInfo(DISPATCHEX(&This->element.node.dispex), iTInfo, lcid, ppTInfo);
 118 }
 119
 120 static HRESULT WINAPI HTMLSelectElement_GetIDsOfNames(IHTMLSelectElement *iface, REFIID riid,
 121                                                 LPOLESTR *rgszNames, UINT cNames,
 122                                                 LCID lcid, DISPID *rgDispId)
 123 {
 124     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 125
 126     return IDispatchEx_GetIDsOfNames(DISPATCHEX(&This->element.node.dispex), riid, rgszNames, cNames, lcid, rgDispId);
 127 }
 128
 129 static HRESULT WINAPI HTMLSelectElement_Invoke(IHTMLSelectElement *iface, DISPID dispIdMember,
 130                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 131                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 132 {
 133     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 134
 135     return IDispatchEx_Invoke(DISPATCHEX(&This->element.node.dispex), dispIdMember, riid, lcid,
 136             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 137 }
 138
 139 static HRESULT WINAPI HTMLSelectElement_put_size(IHTMLSelectElement *iface, LONG v)
 140 {
 141     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 142     FIXME("(%p)->(%d)\n", This, v);
 143     return E_NOTIMPL;
 144 }
 145
 146 static HRESULT WINAPI HTMLSelectElement_get_size(IHTMLSelectElement *iface, LONG *p)
 147 {
 148     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 149     FIXME("(%p)->(%p)\n", This, p);
 150     return E_NOTIMPL;
 151 }
 152
 153 static HRESULT WINAPI HTMLSelectElement_put_multiple(IHTMLSelectElement *iface, VARIANT_BOOL v)
 154 {
 155     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 156     FIXME("(%p)->(%x)\n", This, v);
 157     return E_NOTIMPL;
 158 }
 159
 160 static HRESULT WINAPI HTMLSelectElement_get_multiple(IHTMLSelectElement *iface, VARIANT_BOOL *p)
 161 {
 162     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 163     FIXME("(%p)->(%p)\n", This, p);
 164     return E_NOTIMPL;
 165 }
 166
 167 static HRESULT WINAPI HTMLSelectElement_put_name(IHTMLSelectElement *iface, BSTR v)
 168 {
 169     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 170     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 171     return E_NOTIMPL;
 172 }
 173
 174 static HRESULT WINAPI HTMLSelectElement_get_name(IHTMLSelectElement *iface, BSTR *p)
 175 {
 176     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 177     nsAString name_str;
 178     const PRUnichar *name = NULL;
 179     nsresult nsres;
 180
 181     TRACE("(%p)->(%p)\n", This, p);
 182
 183     nsAString_Init(&name_str, NULL);
 184
 185     nsres = nsIDOMHTMLSelectElement_GetName(This->nsselect, &name_str);
 186     if(NS_SUCCEEDED(nsres)) {
 187         static const WCHAR wszGarbage[] = {'g','a','r','b','a','g','e',0};
 188
 189         nsAString_GetData(&name_str, &name);
 190
 191         /*
 192          * Native never returns empty string here. If an element has no name,
 193          * name of previous element or ramdom data is returned.
 194          */
 195         *p = SysAllocString(*name ? name : wszGarbage);
 196     }else {
 197         ERR("GetName failed: %08x\n", nsres);
 198     }
 199
 200     nsAString_Finish(&name_str);
 201
 202     TRACE("name=%s\n", debugstr_w(*p));
 203     return S_OK;
 204 }
 205
 206 static HRESULT WINAPI HTMLSelectElement_get_options(IHTMLSelectElement *iface, IDispatch **p)
 207 {
 208     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 209
 210     TRACE("(%p)->(%p)\n", This, p);
 211
 212     *p = (IDispatch*)HTMLSELECT(This);
 213     IDispatch_AddRef(*p);
 214     return S_OK;
 215 }
 216
 217 static HRESULT WINAPI HTMLSelectElement_put_onchange(IHTMLSelectElement *iface, VARIANT v)
 218 {
 219     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 220
 221     TRACE("(%p)->()\n", This);
 222
 223     return set_node_event(&This->element.node, EVENTID_CHANGE, &v);
 224 }
 225
 226 static HRESULT WINAPI HTMLSelectElement_get_onchange(IHTMLSelectElement *iface, VARIANT *p)
 227 {
 228     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 229     FIXME("(%p)->(%p)\n", This, p);
 230     return E_NOTIMPL;
 231 }
 232
 233 static HRESULT WINAPI HTMLSelectElement_put_selectedIndex(IHTMLSelectElement *iface, LONG v)
 234 {
 235     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 236     nsresult nsres;
 237
 238     TRACE("(%p)->(%d)\n", This, v);
 239
 240     nsres = nsIDOMHTMLSelectElement_SetSelectedIndex(This->nsselect, v);
 241     if(NS_FAILED(nsres))
 242         ERR("SetSelectedIndex failed: %08x\n", nsres);
 243
 244     return S_OK;
 245 }
 246
 247 static HRESULT WINAPI HTMLSelectElement_get_selectedIndex(IHTMLSelectElement *iface, LONG *p)
 248 {
 249     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 250     PRInt32 idx = 0;
 251     nsresult nsres;
 252
 253     TRACE("(%p)->(%p)\n", This, p);
 254
 255     nsres = nsIDOMHTMLSelectElement_GetSelectedIndex(This->nsselect, &idx);
 256     if(NS_FAILED(nsres))
 257         ERR("GetSelectedIndex failed: %08x\n", nsres);
 258
 259     *p = idx;
 260     return S_OK;
 261 }
 262
 263 static HRESULT WINAPI HTMLSelectElement_get_type(IHTMLSelectElement *iface, BSTR *p)
 264 {
 265     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 266     const PRUnichar *type;
 267     nsAString type_str;
 268     nsresult nsres;
 269     HRESULT hres = S_OK;
 270
 271     TRACE("(%p)->(%p)\n", This, p);
 272
 273     nsAString_Init(&type_str, NULL);
 274     nsres = nsIDOMHTMLSelectElement_GetType(This->nsselect, &type_str);
 275     if(NS_SUCCEEDED(nsres)) {
 276         nsAString_GetData(&type_str, &type);
 277         *p = *type ? SysAllocString(type) : NULL;
 278     }else {
 279         ERR("GetType failed: %08x\n", nsres);
 280         hres = E_FAIL;
 281     }
 282
 283     nsAString_Finish(&type_str);
 284
 285     return hres;
 286 }
 287
 288 static HRESULT WINAPI HTMLSelectElement_put_value(IHTMLSelectElement *iface, BSTR v)
 289 {
 290     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 291     nsAString value_str;
 292     nsresult nsres;
 293
 294     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 295
 296     nsAString_InitDepend(&value_str, v);
 297     nsres = nsIDOMHTMLSelectElement_SetValue(This->nsselect, &value_str);
 298     nsAString_Finish(&value_str);
 299     if(NS_FAILED(nsres))
 300         ERR("SetValue failed: %08x\n", nsres);
 301
 302     return S_OK;
 303 }
 304
 305 static HRESULT WINAPI HTMLSelectElement_get_value(IHTMLSelectElement *iface, BSTR *p)
 306 {
 307     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 308     nsAString value_str;
 309     const PRUnichar *value = NULL;
 310     nsresult nsres;
 311
 312     TRACE("(%p)->(%p)\n", This, p);
 313
 314     nsAString_Init(&value_str, NULL);
 315
 316     nsres = nsIDOMHTMLSelectElement_GetValue(This->nsselect, &value_str);
 317     if(NS_SUCCEEDED(nsres)) {
 318         nsAString_GetData(&value_str, &value);
 319         *p = *value ? SysAllocString(value) : NULL;
 320     }else {
 321         ERR("GetValue failed: %08x\n", nsres);
 322     }
 323
 324     nsAString_Finish(&value_str);
 325
 326     TRACE("value=%s\n", debugstr_w(*p));
 327     return S_OK;
 328 }
 329
 330 static HRESULT WINAPI HTMLSelectElement_put_disabled(IHTMLSelectElement *iface, VARIANT_BOOL v)
 331 {
 332     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 333     nsresult nsres;
 334
 335     TRACE("(%p)->(%x)\n", This, v);
 336
 337     nsres = nsIDOMHTMLSelectElement_SetDisabled(This->nsselect, v != VARIANT_FALSE);
 338     if(NS_FAILED(nsres)) {
 339         ERR("SetDisabled failed: %08x\n", nsres);
 340         return E_FAIL;
 341     }
 342
 343     return S_OK;
 344 }
 345
 346 static HRESULT WINAPI HTMLSelectElement_get_disabled(IHTMLSelectElement *iface, VARIANT_BOOL *p)
 347 {
 348     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 349     PRBool disabled = FALSE;
 350     nsresult nsres;
 351
 352     TRACE("(%p)->(%p)\n", This, p);
 353
 354     nsres = nsIDOMHTMLSelectElement_GetDisabled(This->nsselect, &disabled);
 355     if(NS_FAILED(nsres)) {
 356         ERR("GetDisabled failed: %08x\n", nsres);
 357         return E_FAIL;
 358     }
 359
 360     *p = disabled ? VARIANT_TRUE : VARIANT_FALSE;
 361     return S_OK;
 362 }
 363
 364 static HRESULT WINAPI HTMLSelectElement_get_form(IHTMLSelectElement *iface, IHTMLFormElement **p)
 365 {
 366     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 367     FIXME("(%p)->(%p)\n", This, p);
 368     return E_NOTIMPL;
 369 }
 370
 371 static HRESULT WINAPI HTMLSelectElement_add(IHTMLSelectElement *iface, IHTMLElement *element,
 372                                             VARIANT before)
 373 {
 374     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 375     IHTMLDOMNode *node, *tmp;
 376     HRESULT hres;
 377
 378     FIXME("(%p)->(%p %s): semi-stub\n", This, element, debugstr_variant(&before));
 379
 380     if(V_VT(&before) != VT_EMPTY) {
 381         FIXME("unhandled before %s\n", debugstr_variant(&before));
 382         return E_NOTIMPL;
 383     }
 384
 385     hres = IHTMLElement_QueryInterface(element, &IID_IHTMLDOMNode, (void**)&node);
 386     if(FAILED(hres))
 387         return hres;
 388
 389     hres = IHTMLDOMNode_appendChild(HTMLDOMNODE(&This->element.node), node, &tmp);
 390     IHTMLDOMNode_Release(node);
 391     if(SUCCEEDED(hres) && tmp)
 392         IHTMLDOMNode_Release(tmp);
 393
 394     return hres;
 395 }
 396
 397 static HRESULT WINAPI HTMLSelectElement_remove(IHTMLSelectElement *iface, LONG index)
 398 {
 399     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 400     FIXME("(%p)->(%d)\n", This, index);
 401     return E_NOTIMPL;
 402 }
 403
 404 static HRESULT WINAPI HTMLSelectElement_put_length(IHTMLSelectElement *iface, LONG v)
 405 {
 406     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 407     nsresult nsres;
 408
 409     TRACE("(%p)->(%d)\n", This, v);
 410
 411     nsres = nsIDOMHTMLSelectElement_SetLength(This->nsselect, v);
 412     if(NS_FAILED(nsres))
 413         ERR("SetLength failed: %08x\n", nsres);
 414
 415     return S_OK;
 416 }
 417
 418 static HRESULT WINAPI HTMLSelectElement_get_length(IHTMLSelectElement *iface, LONG *p)
 419 {
 420     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 421     PRUint32 length = 0;
 422     nsresult nsres;
 423
 424     TRACE("(%p)->(%p)\n", This, p);
 425
 426     nsres = nsIDOMHTMLSelectElement_GetLength(This->nsselect, &length);
 427     if(NS_FAILED(nsres))
 428         ERR("GetLength failed: %08x\n", nsres);
 429
 430     *p = length;
 431
 432     TRACE("ret %d\n", *p);
 433     return S_OK;
 434 }
 435
 436 static HRESULT WINAPI HTMLSelectElement_get__newEnum(IHTMLSelectElement *iface, IUnknown **p)
 437 {
 438     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 439     FIXME("(%p)->(%p)\n", This, p);
 440     return E_NOTIMPL;
 441 }
 442
 443 static HRESULT WINAPI HTMLSelectElement_item(IHTMLSelectElement *iface, VARIANT name,
 444                                              VARIANT index, IDispatch **pdisp)
 445 {
 446     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 447
 448     TRACE("(%p)->(%s %s %p)\n", This, debugstr_variant(&name), debugstr_variant(&index), pdisp);
 449
 450     if(!pdisp)
 451         return E_POINTER;
 452     *pdisp = NULL;
 453
 454     if(V_VT(&name) == VT_I4) {
 455         if(V_I4(&name) < 0)
 456             return E_INVALIDARG;
 457         return htmlselect_item(This, V_I4(&name), pdisp);
 458     }
 459
 460     FIXME("Unsupported args\n");
 461     return E_NOTIMPL;
 462 }
 463
 464 static HRESULT WINAPI HTMLSelectElement_tags(IHTMLSelectElement *iface, VARIANT tagName,
 465                                              IDispatch **pdisp)
 466 {
 467     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
 468     FIXME("(%p)->(v %p)\n", This, pdisp);
 469     return E_NOTIMPL;
 470 }
 471
 472 #undef HTMLSELECT_THIS
 473
 474 static const IHTMLSelectElementVtbl HTMLSelectElementVtbl = {
 475     HTMLSelectElement_QueryInterface,
 476     HTMLSelectElement_AddRef,
 477     HTMLSelectElement_Release,
 478     HTMLSelectElement_GetTypeInfoCount,
 479     HTMLSelectElement_GetTypeInfo,
 480     HTMLSelectElement_GetIDsOfNames,
 481     HTMLSelectElement_Invoke,
 482     HTMLSelectElement_put_size,
 483     HTMLSelectElement_get_size,
 484     HTMLSelectElement_put_multiple,
 485     HTMLSelectElement_get_multiple,
 486     HTMLSelectElement_put_name,
 487     HTMLSelectElement_get_name,
 488     HTMLSelectElement_get_options,
 489     HTMLSelectElement_put_onchange,
 490     HTMLSelectElement_get_onchange,
 491     HTMLSelectElement_put_selectedIndex,
 492     HTMLSelectElement_get_selectedIndex,
 493     HTMLSelectElement_get_type,
 494     HTMLSelectElement_put_value,
 495     HTMLSelectElement_get_value,
 496     HTMLSelectElement_put_disabled,
 497     HTMLSelectElement_get_disabled,
 498     HTMLSelectElement_get_form,
 499     HTMLSelectElement_add,
 500     HTMLSelectElement_remove,
 501     HTMLSelectElement_put_length,
 502     HTMLSelectElement_get_length,
 503     HTMLSelectElement_get__newEnum,
 504     HTMLSelectElement_item,
 505     HTMLSelectElement_tags
 506 };
 507
 508 #define HTMLSELECT_NODE_THIS(iface) DEFINE_THIS2(HTMLSelectElement, element.node, iface)
 509
 510 static HRESULT HTMLSelectElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
 511 {
 512     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
 513
 514     *ppv = NULL;
 515
 516     if(IsEqualGUID(&IID_IUnknown, riid)) {
 517         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 518         *ppv = HTMLSELECT(This);
 519     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
 520         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
 521         *ppv = HTMLSELECT(This);
 522     }else if(IsEqualGUID(&IID_IHTMLSelectElement, riid)) {
 523         TRACE("(%p)->(IID_IHTMLSelectElement %p)\n", This, ppv);
 524         *ppv = HTMLSELECT(This);
 525     }
 526
 527     if(*ppv) {
 528         IUnknown_AddRef((IUnknown*)*ppv);
 529         return S_OK;
 530     }
 531
 532     return HTMLElement_QI(&This->element.node, riid, ppv);
 533 }
 534
 535 static void HTMLSelectElement_destructor(HTMLDOMNode *iface)
 536 {
 537     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
 538
 539     nsIDOMHTMLSelectElement_Release(This->nsselect);
 540
 541     HTMLElement_destructor(&This->element.node);
 542 }
 543
 544 static HRESULT HTMLSelectElementImpl_put_disabled(HTMLDOMNode *iface, VARIANT_BOOL v)
 545 {
 546     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
 547     return IHTMLSelectElement_put_disabled(HTMLSELECT(This), v);
 548 }
 549
 550 static HRESULT HTMLSelectElementImpl_get_disabled(HTMLDOMNode *iface, VARIANT_BOOL *p)
 551 {
 552     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
 553     return IHTMLSelectElement_get_disabled(HTMLSELECT(This), p);
 554 }
 555
 556 #define DISPID_OPTIONCOL_0 MSHTML_DISPID_CUSTOM_MIN
 557
 558 static HRESULT HTMLSelectElement_get_dispid(HTMLDOMNode *iface, BSTR name, DWORD flags, DISPID *dispid)
 559 {
 560     const WCHAR *ptr;
 561     DWORD idx = 0;
 562
 563     for(ptr = name; *ptr && isdigitW(*ptr); ptr++) {
 564         idx = idx*10 + (*ptr-'0');
 565         if(idx > MSHTML_CUSTOM_DISPID_CNT) {
 566             WARN("too big idx\n");
 567             return DISP_E_UNKNOWNNAME;
 568         }
 569     }
 570     if(*ptr)
 571         return DISP_E_UNKNOWNNAME;
 572
 573     *dispid = DISPID_OPTIONCOL_0 + idx;
 574     return S_OK;
 575 }
 576
 577 static HRESULT HTMLSelectElement_invoke(HTMLDOMNode *iface, DISPID id, LCID lcid, WORD flags, DISPPARAMS *params,
 578         VARIANT *res, EXCEPINFO *ei, IServiceProvider *caller)
 579 {
 580     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
 581
 582     TRACE("(%p)->(%x %x %x %p %p %p %p)\n", This, id, lcid, flags, params, res, ei, caller);
 583
 584     switch(flags) {
 585     case DISPATCH_PROPERTYGET: {
 586         IDispatch *ret;
 587         HRESULT hres;
 588
 589         hres = htmlselect_item(This, id-DISPID_OPTIONCOL_0, &ret);
 590         if(FAILED(hres))
 591             return hres;
 592
 593         if(ret) {
 594             V_VT(res) = VT_DISPATCH;
 595             V_DISPATCH(res) = ret;
 596         }else {
 597             V_VT(res) = VT_NULL;
 598         }
 599         break;
 600     }
 601
 602     default:
 603         FIXME("unimplemented flags %x\n", flags);
 604         return E_NOTIMPL;
 605     }
 606
 607     return S_OK;
 608 }
 609
 610 #undef HTMLSELECT_NODE_THIS
 611
 612 static const NodeImplVtbl HTMLSelectElementImplVtbl = {
 613     HTMLSelectElement_QI,
 614     HTMLSelectElement_destructor,
 615     HTMLElement_clone,
 616     NULL,
 617     NULL,
 618     HTMLSelectElementImpl_put_disabled,
 619     HTMLSelectElementImpl_get_disabled,
 620     NULL,
 621     NULL,
 622     HTMLSelectElement_get_dispid,
 623     HTMLSelectElement_invoke
 624 };
 625
 626 static const tid_t HTMLSelectElement_tids[] = {
 627     HTMLELEMENT_TIDS,
 628     IHTMLSelectElement_tid,
 629     0
 630 };
 631
 632 static dispex_static_data_t HTMLSelectElement_dispex = {
 633     NULL,
 634     DispHTMLSelectElement_tid,
 635     NULL,
 636     HTMLSelectElement_tids
 637 };
 638
 639 HRESULT HTMLSelectElement_Create(HTMLDocumentNode *doc, nsIDOMHTMLElement *nselem, HTMLElement **elem)
 640 {
 641     HTMLSelectElement *ret;
 642     nsresult nsres;
 643
 644     ret = heap_alloc_zero(sizeof(HTMLSelectElement));
 645     if(!ret)
 646         return E_OUTOFMEMORY;
 647
 648     ret->lpHTMLSelectElementVtbl = &HTMLSelectElementVtbl;
 649     ret->element.node.vtbl = &HTMLSelectElementImplVtbl;
 650
 651     nsres = nsIDOMHTMLElement_QueryInterface(nselem, &IID_nsIDOMHTMLSelectElement,
 652                                              (void**)&ret->nsselect);
 653     if(NS_FAILED(nsres)) {
 654         ERR("Could not get nsIDOMHTMLSelectElement interfce: %08x\n", nsres);
 655         heap_free(ret);
 656         return E_FAIL;
 657     }
 658
 659     HTMLElement_Init(&ret->element, doc, nselem, &HTMLSelectElement_dispex);
 660
 661     *elem = &ret->element;
 662     return S_OK;
 663 }