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