2 * Copyright 2006 Jacek Caban for CodeWeavers
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.
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.
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
29 #include "wine/debug.h"
31 #include "mshtml_private.h"
32 #include "htmlevent.h"
34 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
39 IHTMLSelectElement IHTMLSelectElement_iface;
41 nsIDOMHTMLSelectElement *nsselect;
44 static inline HTMLSelectElement *impl_from_IHTMLSelectElement(IHTMLSelectElement *iface)
46 return CONTAINING_RECORD(iface, HTMLSelectElement, IHTMLSelectElement_iface);
49 static HRESULT htmlselect_item(HTMLSelectElement *This, int i, IDispatch **ret)
51 nsIDOMHTMLOptionsCollection *nscol;
56 nsres = nsIDOMHTMLSelectElement_GetOptions(This->nsselect, &nscol);
57 if(NS_FAILED(nsres)) {
58 ERR("GetOptions failed: %08x\n", nsres);
62 nsres = nsIDOMHTMLOptionsCollection_Item(nscol, i, &nsnode);
63 nsIDOMHTMLOptionsCollection_Release(nscol);
64 if(NS_FAILED(nsres)) {
65 ERR("Item failed: %08x\n", nsres);
72 hres = get_node(This->element.node.doc, nsnode, TRUE, &node);
73 nsIDOMNode_Release(nsnode);
77 *ret = (IDispatch*)&node->IHTMLDOMNode_iface;
84 static HRESULT WINAPI HTMLSelectElement_QueryInterface(IHTMLSelectElement *iface,
85 REFIID riid, void **ppv)
87 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
89 return IHTMLDOMNode_QueryInterface(&This->element.node.IHTMLDOMNode_iface, riid, ppv);
92 static ULONG WINAPI HTMLSelectElement_AddRef(IHTMLSelectElement *iface)
94 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
96 return IHTMLDOMNode_AddRef(&This->element.node.IHTMLDOMNode_iface);
99 static ULONG WINAPI HTMLSelectElement_Release(IHTMLSelectElement *iface)
101 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
103 return IHTMLDOMNode_Release(&This->element.node.IHTMLDOMNode_iface);
106 static HRESULT WINAPI HTMLSelectElement_GetTypeInfoCount(IHTMLSelectElement *iface, UINT *pctinfo)
108 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
110 return IDispatchEx_GetTypeInfoCount(&This->element.node.dispex.IDispatchEx_iface, pctinfo);
113 static HRESULT WINAPI HTMLSelectElement_GetTypeInfo(IHTMLSelectElement *iface, UINT iTInfo,
114 LCID lcid, ITypeInfo **ppTInfo)
116 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
118 return IDispatchEx_GetTypeInfo(&This->element.node.dispex.IDispatchEx_iface, iTInfo, lcid,
122 static HRESULT WINAPI HTMLSelectElement_GetIDsOfNames(IHTMLSelectElement *iface, REFIID riid,
123 LPOLESTR *rgszNames, UINT cNames,
124 LCID lcid, DISPID *rgDispId)
126 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
128 return IDispatchEx_GetIDsOfNames(&This->element.node.dispex.IDispatchEx_iface, riid, rgszNames,
129 cNames, lcid, rgDispId);
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)
136 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
138 return IDispatchEx_Invoke(&This->element.node.dispex.IDispatchEx_iface, dispIdMember, riid,
139 lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
142 static HRESULT WINAPI HTMLSelectElement_put_size(IHTMLSelectElement *iface, LONG v)
144 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
145 FIXME("(%p)->(%d)\n", This, v);
149 static HRESULT WINAPI HTMLSelectElement_get_size(IHTMLSelectElement *iface, LONG *p)
151 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
152 FIXME("(%p)->(%p)\n", This, p);
156 static HRESULT WINAPI HTMLSelectElement_put_multiple(IHTMLSelectElement *iface, VARIANT_BOOL v)
158 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
159 FIXME("(%p)->(%x)\n", This, v);
163 static HRESULT WINAPI HTMLSelectElement_get_multiple(IHTMLSelectElement *iface, VARIANT_BOOL *p)
165 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
166 FIXME("(%p)->(%p)\n", This, p);
170 static HRESULT WINAPI HTMLSelectElement_put_name(IHTMLSelectElement *iface, BSTR v)
172 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
173 FIXME("(%p)->(%s)\n", This, debugstr_w(v));
177 static HRESULT WINAPI HTMLSelectElement_get_name(IHTMLSelectElement *iface, BSTR *p)
179 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
181 const PRUnichar *name = NULL;
184 TRACE("(%p)->(%p)\n", This, p);
186 nsAString_Init(&name_str, NULL);
188 nsres = nsIDOMHTMLSelectElement_GetName(This->nsselect, &name_str);
189 if(NS_SUCCEEDED(nsres)) {
190 static const WCHAR wszGarbage[] = {'g','a','r','b','a','g','e',0};
192 nsAString_GetData(&name_str, &name);
195 * Native never returns empty string here. If an element has no name,
196 * name of previous element or ramdom data is returned.
198 *p = SysAllocString(*name ? name : wszGarbage);
200 ERR("GetName failed: %08x\n", nsres);
203 nsAString_Finish(&name_str);
205 TRACE("name=%s\n", debugstr_w(*p));
209 static HRESULT WINAPI HTMLSelectElement_get_options(IHTMLSelectElement *iface, IDispatch **p)
211 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
213 TRACE("(%p)->(%p)\n", This, p);
215 *p = (IDispatch*)&This->IHTMLSelectElement_iface;
216 IDispatch_AddRef(*p);
220 static HRESULT WINAPI HTMLSelectElement_put_onchange(IHTMLSelectElement *iface, VARIANT v)
222 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
224 TRACE("(%p)->()\n", This);
226 return set_node_event(&This->element.node, EVENTID_CHANGE, &v);
229 static HRESULT WINAPI HTMLSelectElement_get_onchange(IHTMLSelectElement *iface, VARIANT *p)
231 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
232 FIXME("(%p)->(%p)\n", This, p);
236 static HRESULT WINAPI HTMLSelectElement_put_selectedIndex(IHTMLSelectElement *iface, LONG v)
238 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
241 TRACE("(%p)->(%d)\n", This, v);
243 nsres = nsIDOMHTMLSelectElement_SetSelectedIndex(This->nsselect, v);
245 ERR("SetSelectedIndex failed: %08x\n", nsres);
250 static HRESULT WINAPI HTMLSelectElement_get_selectedIndex(IHTMLSelectElement *iface, LONG *p)
252 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
256 TRACE("(%p)->(%p)\n", This, p);
258 nsres = nsIDOMHTMLSelectElement_GetSelectedIndex(This->nsselect, &idx);
260 ERR("GetSelectedIndex failed: %08x\n", nsres);
266 static HRESULT WINAPI HTMLSelectElement_get_type(IHTMLSelectElement *iface, BSTR *p)
268 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
272 TRACE("(%p)->(%p)\n", This, p);
274 nsAString_Init(&type_str, NULL);
275 nsres = nsIDOMHTMLSelectElement_GetType(This->nsselect, &type_str);
276 return return_nsstr(nsres, &type_str, p);
279 static HRESULT WINAPI HTMLSelectElement_put_value(IHTMLSelectElement *iface, BSTR v)
281 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
285 TRACE("(%p)->(%s)\n", This, debugstr_w(v));
287 nsAString_InitDepend(&value_str, v);
288 nsres = nsIDOMHTMLSelectElement_SetValue(This->nsselect, &value_str);
289 nsAString_Finish(&value_str);
291 ERR("SetValue failed: %08x\n", nsres);
296 static HRESULT WINAPI HTMLSelectElement_get_value(IHTMLSelectElement *iface, BSTR *p)
298 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
302 TRACE("(%p)->(%p)\n", This, p);
304 nsAString_Init(&value_str, NULL);
305 nsres = nsIDOMHTMLSelectElement_GetValue(This->nsselect, &value_str);
306 return return_nsstr(nsres, &value_str, p);
309 static HRESULT WINAPI HTMLSelectElement_put_disabled(IHTMLSelectElement *iface, VARIANT_BOOL v)
311 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
314 TRACE("(%p)->(%x)\n", This, v);
316 nsres = nsIDOMHTMLSelectElement_SetDisabled(This->nsselect, v != VARIANT_FALSE);
317 if(NS_FAILED(nsres)) {
318 ERR("SetDisabled failed: %08x\n", nsres);
325 static HRESULT WINAPI HTMLSelectElement_get_disabled(IHTMLSelectElement *iface, VARIANT_BOOL *p)
327 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
328 cpp_bool disabled = FALSE;
331 TRACE("(%p)->(%p)\n", This, p);
333 nsres = nsIDOMHTMLSelectElement_GetDisabled(This->nsselect, &disabled);
334 if(NS_FAILED(nsres)) {
335 ERR("GetDisabled failed: %08x\n", nsres);
339 *p = disabled ? VARIANT_TRUE : VARIANT_FALSE;
343 static HRESULT WINAPI HTMLSelectElement_get_form(IHTMLSelectElement *iface, IHTMLFormElement **p)
345 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
346 FIXME("(%p)->(%p)\n", This, p);
350 static HRESULT WINAPI HTMLSelectElement_add(IHTMLSelectElement *iface, IHTMLElement *element,
353 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
354 nsIWritableVariant *nsvariant;
355 HTMLElement *element_obj;
358 TRACE("(%p)->(%p %s)\n", This, element, debugstr_variant(&before));
360 element_obj = unsafe_impl_from_IHTMLElement(element);
362 FIXME("External IHTMLElement implementation?\n");
366 nsvariant = create_nsvariant();
370 switch(V_VT(&before)) {
372 nsres = nsIWritableVariant_SetAsEmpty(nsvariant);
375 nsres = nsIWritableVariant_SetAsInt16(nsvariant, V_I2(&before));
378 FIXME("unhandled before %s\n", debugstr_variant(&before));
379 nsIWritableVariant_Release(nsvariant);
383 if(NS_SUCCEEDED(nsres))
384 nsres = nsIDOMHTMLSelectElement_Add(This->nsselect, element_obj->nselem, (nsIVariant*)nsvariant);
385 nsIWritableVariant_Release(nsvariant);
386 if(NS_FAILED(nsres)) {
387 ERR("Add failed: %08x\n", nsres);
394 static HRESULT WINAPI HTMLSelectElement_remove(IHTMLSelectElement *iface, LONG index)
396 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
397 FIXME("(%p)->(%d)\n", This, index);
401 static HRESULT WINAPI HTMLSelectElement_put_length(IHTMLSelectElement *iface, LONG v)
403 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
406 TRACE("(%p)->(%d)\n", This, v);
408 nsres = nsIDOMHTMLSelectElement_SetLength(This->nsselect, v);
410 ERR("SetLength failed: %08x\n", nsres);
415 static HRESULT WINAPI HTMLSelectElement_get_length(IHTMLSelectElement *iface, LONG *p)
417 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
421 TRACE("(%p)->(%p)\n", This, p);
423 nsres = nsIDOMHTMLSelectElement_GetLength(This->nsselect, &length);
425 ERR("GetLength failed: %08x\n", nsres);
429 TRACE("ret %d\n", *p);
433 static HRESULT WINAPI HTMLSelectElement_get__newEnum(IHTMLSelectElement *iface, IUnknown **p)
435 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
436 FIXME("(%p)->(%p)\n", This, p);
440 static HRESULT WINAPI HTMLSelectElement_item(IHTMLSelectElement *iface, VARIANT name,
441 VARIANT index, IDispatch **pdisp)
443 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
445 TRACE("(%p)->(%s %s %p)\n", This, debugstr_variant(&name), debugstr_variant(&index), pdisp);
451 if(V_VT(&name) == VT_I4) {
454 return htmlselect_item(This, V_I4(&name), pdisp);
457 FIXME("Unsupported args\n");
461 static HRESULT WINAPI HTMLSelectElement_tags(IHTMLSelectElement *iface, VARIANT tagName,
464 HTMLSelectElement *This = impl_from_IHTMLSelectElement(iface);
465 FIXME("(%p)->(v %p)\n", This, pdisp);
469 static const IHTMLSelectElementVtbl HTMLSelectElementVtbl = {
470 HTMLSelectElement_QueryInterface,
471 HTMLSelectElement_AddRef,
472 HTMLSelectElement_Release,
473 HTMLSelectElement_GetTypeInfoCount,
474 HTMLSelectElement_GetTypeInfo,
475 HTMLSelectElement_GetIDsOfNames,
476 HTMLSelectElement_Invoke,
477 HTMLSelectElement_put_size,
478 HTMLSelectElement_get_size,
479 HTMLSelectElement_put_multiple,
480 HTMLSelectElement_get_multiple,
481 HTMLSelectElement_put_name,
482 HTMLSelectElement_get_name,
483 HTMLSelectElement_get_options,
484 HTMLSelectElement_put_onchange,
485 HTMLSelectElement_get_onchange,
486 HTMLSelectElement_put_selectedIndex,
487 HTMLSelectElement_get_selectedIndex,
488 HTMLSelectElement_get_type,
489 HTMLSelectElement_put_value,
490 HTMLSelectElement_get_value,
491 HTMLSelectElement_put_disabled,
492 HTMLSelectElement_get_disabled,
493 HTMLSelectElement_get_form,
494 HTMLSelectElement_add,
495 HTMLSelectElement_remove,
496 HTMLSelectElement_put_length,
497 HTMLSelectElement_get_length,
498 HTMLSelectElement_get__newEnum,
499 HTMLSelectElement_item,
500 HTMLSelectElement_tags
503 static inline HTMLSelectElement *impl_from_HTMLDOMNode(HTMLDOMNode *iface)
505 return CONTAINING_RECORD(iface, HTMLSelectElement, element.node);
508 static HRESULT HTMLSelectElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
510 HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
514 if(IsEqualGUID(&IID_IUnknown, riid)) {
515 TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
516 *ppv = &This->IHTMLSelectElement_iface;
517 }else if(IsEqualGUID(&IID_IDispatch, riid)) {
518 TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
519 *ppv = &This->IHTMLSelectElement_iface;
520 }else if(IsEqualGUID(&IID_IHTMLSelectElement, riid)) {
521 TRACE("(%p)->(IID_IHTMLSelectElement %p)\n", This, ppv);
522 *ppv = &This->IHTMLSelectElement_iface;
526 IUnknown_AddRef((IUnknown*)*ppv);
530 return HTMLElement_QI(&This->element.node, riid, ppv);
533 static HRESULT HTMLSelectElementImpl_put_disabled(HTMLDOMNode *iface, VARIANT_BOOL v)
535 HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
536 return IHTMLSelectElement_put_disabled(&This->IHTMLSelectElement_iface, v);
539 static HRESULT HTMLSelectElementImpl_get_disabled(HTMLDOMNode *iface, VARIANT_BOOL *p)
541 HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
542 return IHTMLSelectElement_get_disabled(&This->IHTMLSelectElement_iface, p);
545 #define DISPID_OPTIONCOL_0 MSHTML_DISPID_CUSTOM_MIN
547 static HRESULT HTMLSelectElement_get_dispid(HTMLDOMNode *iface, BSTR name, DWORD flags, DISPID *dispid)
552 for(ptr = name; *ptr && isdigitW(*ptr); ptr++) {
553 idx = idx*10 + (*ptr-'0');
554 if(idx > MSHTML_CUSTOM_DISPID_CNT) {
555 WARN("too big idx\n");
556 return DISP_E_UNKNOWNNAME;
560 return DISP_E_UNKNOWNNAME;
562 *dispid = DISPID_OPTIONCOL_0 + idx;
566 static HRESULT HTMLSelectElement_invoke(HTMLDOMNode *iface, DISPID id, LCID lcid, WORD flags, DISPPARAMS *params,
567 VARIANT *res, EXCEPINFO *ei, IServiceProvider *caller)
569 HTMLSelectElement *This = impl_from_HTMLDOMNode(iface);
571 TRACE("(%p)->(%x %x %x %p %p %p %p)\n", This, id, lcid, flags, params, res, ei, caller);
574 case DISPATCH_PROPERTYGET: {
578 hres = htmlselect_item(This, id-DISPID_OPTIONCOL_0, &ret);
583 V_VT(res) = VT_DISPATCH;
584 V_DISPATCH(res) = ret;
592 FIXME("unimplemented flags %x\n", flags);
599 static const NodeImplVtbl HTMLSelectElementImplVtbl = {
600 HTMLSelectElement_QI,
601 HTMLElement_destructor,
603 HTMLElement_handle_event,
604 HTMLElement_get_attr_col,
607 HTMLSelectElementImpl_put_disabled,
608 HTMLSelectElementImpl_get_disabled,
611 HTMLSelectElement_get_dispid,
612 HTMLSelectElement_invoke
615 static const tid_t HTMLSelectElement_tids[] = {
617 IHTMLSelectElement_tid,
621 static dispex_static_data_t HTMLSelectElement_dispex = {
623 DispHTMLSelectElement_tid,
625 HTMLSelectElement_tids
628 HRESULT HTMLSelectElement_Create(HTMLDocumentNode *doc, nsIDOMHTMLElement *nselem, HTMLElement **elem)
630 HTMLSelectElement *ret;
633 ret = heap_alloc_zero(sizeof(HTMLSelectElement));
635 return E_OUTOFMEMORY;
637 ret->IHTMLSelectElement_iface.lpVtbl = &HTMLSelectElementVtbl;
638 ret->element.node.vtbl = &HTMLSelectElementImplVtbl;
640 HTMLElement_Init(&ret->element, doc, nselem, &HTMLSelectElement_dispex);
642 nsres = nsIDOMHTMLElement_QueryInterface(nselem, &IID_nsIDOMHTMLSelectElement,
643 (void**)&ret->nsselect);
645 /* Share nsselect reference with nsnode */
646 assert(nsres == NS_OK && (nsIDOMNode*)ret->nsselect == ret->element.node.nsnode);
647 nsIDOMNode_Release(ret->element.node.nsnode);
649 *elem = &ret->element;