mshtml: Added IDispatchEx support to HTMLInputElement.
[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
32 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
33
34 typedef struct {
35     HTMLElement element;
36
37     const IHTMLSelectElementVtbl *lpHTMLSelectElementVtbl;
38
39     nsIDOMHTMLSelectElement *nsselect;
40 } HTMLSelectElement;
41
42 #define HTMLSELECT(x)      ((IHTMLSelectElement*)         &(x)->lpHTMLSelectElementVtbl)
43
44 #define HTMLSELECT_THIS(iface) DEFINE_THIS(HTMLSelectElement, HTMLSelectElement, iface)
45
46 static HRESULT WINAPI HTMLSelectElement_QueryInterface(IHTMLSelectElement *iface,
47                                                          REFIID riid, void **ppv)
48 {
49     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
50
51     return IHTMLDOMNode_QueryInterface(HTMLDOMNODE(&This->element.node), riid, ppv);
52 }
53
54 static ULONG WINAPI HTMLSelectElement_AddRef(IHTMLSelectElement *iface)
55 {
56     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
57
58     return IHTMLDOMNode_AddRef(HTMLDOMNODE(&This->element.node));
59 }
60
61 static ULONG WINAPI HTMLSelectElement_Release(IHTMLSelectElement *iface)
62 {
63     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
64
65     return IHTMLDOMNode_Release(HTMLDOMNODE(&This->element.node));
66 }
67
68 static HRESULT WINAPI HTMLSelectElement_GetTypeInfoCount(IHTMLSelectElement *iface, UINT *pctinfo)
69 {
70     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
71     FIXME("(%p)->(%p)\n", This, pctinfo);
72     return E_NOTIMPL;
73 }
74
75 static HRESULT WINAPI HTMLSelectElement_GetTypeInfo(IHTMLSelectElement *iface, UINT iTInfo,
76                                               LCID lcid, ITypeInfo **ppTInfo)
77 {
78     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
79     FIXME("(%p)->(%u %u %p)\n", This, iTInfo, lcid, ppTInfo);
80     return E_NOTIMPL;
81 }
82
83 static HRESULT WINAPI HTMLSelectElement_GetIDsOfNames(IHTMLSelectElement *iface, REFIID riid,
84                                                 LPOLESTR *rgszNames, UINT cNames,
85                                                 LCID lcid, DISPID *rgDispId)
86 {
87     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
88     FIXME("(%p)->(%s %p %u %u %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
89                                         lcid, rgDispId);
90     return E_NOTIMPL;
91 }
92
93 static HRESULT WINAPI HTMLSelectElement_Invoke(IHTMLSelectElement *iface, DISPID dispIdMember,
94                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
95                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
96 {
97     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
98     FIXME("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
99             lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
100     return E_NOTIMPL;
101 }
102
103 static HRESULT WINAPI HTMLSelectElement_put_size(IHTMLSelectElement *iface, long v)
104 {
105     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
106     FIXME("(%p)->(%ld)\n", This, v);
107     return E_NOTIMPL;
108 }
109
110 static HRESULT WINAPI HTMLSelectElement_get_size(IHTMLSelectElement *iface, long *p)
111 {
112     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
113     FIXME("(%p)->(%p)\n", This, p);
114     return E_NOTIMPL;
115 }
116
117 static HRESULT WINAPI HTMLSelectElement_put_multiple(IHTMLSelectElement *iface, VARIANT_BOOL v)
118 {
119     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
120     FIXME("(%p)->(%x)\n", This, v);
121     return E_NOTIMPL;
122 }
123
124 static HRESULT WINAPI HTMLSelectElement_get_multiple(IHTMLSelectElement *iface, VARIANT_BOOL *p)
125 {
126     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
127     FIXME("(%p)->(%p)\n", This, p);
128     return E_NOTIMPL;
129 }
130
131 static HRESULT WINAPI HTMLSelectElement_put_name(IHTMLSelectElement *iface, BSTR v)
132 {
133     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
134     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
135     return E_NOTIMPL;
136 }
137
138 static HRESULT WINAPI HTMLSelectElement_get_name(IHTMLSelectElement *iface, BSTR *p)
139 {
140     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
141     nsAString name_str;
142     const PRUnichar *name = NULL;
143     nsresult nsres;
144
145     TRACE("(%p)->(%p)\n", This, p);
146
147     nsAString_Init(&name_str, NULL);
148
149     nsres = nsIDOMHTMLSelectElement_GetName(This->nsselect, &name_str);
150     if(NS_SUCCEEDED(nsres)) {
151         static const WCHAR wszGarbage[] = {'g','a','r','b','a','g','e',0};
152
153         nsAString_GetData(&name_str, &name);
154
155         /*
156          * Native never returns empty string here. If an element has no name,
157          * name of previous element or ramdom data is returned.
158          */
159         *p = SysAllocString(*name ? name : wszGarbage);
160     }else {
161         ERR("GetName failed: %08x\n", nsres);
162     }
163
164     nsAString_Finish(&name_str);
165
166     TRACE("name=%s\n", debugstr_w(*p));
167     return S_OK;
168 }
169
170 static HRESULT WINAPI HTMLSelectElement_get_options(IHTMLSelectElement *iface, IDispatch **p)
171 {
172     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
173     FIXME("(%p)->(%p)\n", This, p);
174     return E_NOTIMPL;
175 }
176
177 static HRESULT WINAPI HTMLSelectElement_put_onchange(IHTMLSelectElement *iface, VARIANT v)
178 {
179     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
180     FIXME("(%p)->()\n", This);
181     return E_NOTIMPL;
182 }
183
184 static HRESULT WINAPI HTMLSelectElement_get_onchange(IHTMLSelectElement *iface, VARIANT *p)
185 {
186     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
187     FIXME("(%p)->(%p)\n", This, p);
188     return E_NOTIMPL;
189 }
190
191 static HRESULT WINAPI HTMLSelectElement_put_selectedIndex(IHTMLSelectElement *iface, long v)
192 {
193     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
194     nsresult nsres;
195
196     TRACE("(%p)->(%ld)\n", This, v);
197
198     nsres = nsIDOMHTMLSelectElement_SetSelectedIndex(This->nsselect, v);
199     if(NS_FAILED(nsres))
200         ERR("SetSelectedIndex failed: %08x\n", nsres);
201
202     return S_OK;
203 }
204
205 static HRESULT WINAPI HTMLSelectElement_get_selectedIndex(IHTMLSelectElement *iface, long *p)
206 {
207     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
208     PRInt32 idx = 0;
209     nsresult nsres;
210
211     TRACE("(%p)->(%p)\n", This, p);
212
213     nsres = nsIDOMHTMLSelectElement_GetSelectedIndex(This->nsselect, &idx);
214     if(NS_FAILED(nsres))
215         ERR("GetSelectedIndex failed: %08x\n", nsres);
216
217     *p = idx;
218     return S_OK;
219 }
220
221 static HRESULT WINAPI HTMLSelectElement_get_type(IHTMLSelectElement *iface, BSTR *p)
222 {
223     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
224     FIXME("(%p)->(%p)\n", This, p);
225     return E_NOTIMPL;
226 }
227
228 static HRESULT WINAPI HTMLSelectElement_put_value(IHTMLSelectElement *iface, BSTR v)
229 {
230     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
231     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
232     return E_NOTIMPL;
233 }
234
235 static HRESULT WINAPI HTMLSelectElement_get_value(IHTMLSelectElement *iface, BSTR *p)
236 {
237     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
238     nsAString value_str;
239     const PRUnichar *value = NULL;
240     nsresult nsres;
241
242     TRACE("(%p)->(%p)\n", This, p);
243
244     nsAString_Init(&value_str, NULL);
245
246     nsres = nsIDOMHTMLSelectElement_GetValue(This->nsselect, &value_str);
247     if(NS_SUCCEEDED(nsres)) {
248         nsAString_GetData(&value_str, &value);
249         *p = SysAllocString(value);
250     }else {
251         ERR("GetValue failed: %08x\n", nsres);
252     }
253
254     nsAString_Finish(&value_str);
255
256     TRACE("value=%s\n", debugstr_w(*p));
257     return S_OK;
258 }
259
260 static HRESULT WINAPI HTMLSelectElement_put_disabled(IHTMLSelectElement *iface, VARIANT_BOOL v)
261 {
262     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
263     FIXME("(%p)->(%x)\n", This, v);
264     return E_NOTIMPL;
265 }
266
267 static HRESULT WINAPI HTMLSelectElement_get_disabled(IHTMLSelectElement *iface, VARIANT_BOOL *p)
268 {
269     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
270     FIXME("(%p)->(%p)\n", This, p);
271     return E_NOTIMPL;
272 }
273
274 static HRESULT WINAPI HTMLSelectElement_get_form(IHTMLSelectElement *iface, IHTMLFormElement **p)
275 {
276     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
277     FIXME("(%p)->(%p)\n", This, p);
278     return E_NOTIMPL;
279 }
280
281 static HRESULT WINAPI HTMLSelectElement_add(IHTMLSelectElement *iface, IHTMLElement *element,
282                                             VARIANT before)
283 {
284     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
285     FIXME("(%p)->(%p v)\n", This, element);
286     return E_NOTIMPL;
287 }
288
289 static HRESULT WINAPI HTMLSelectElement_remove(IHTMLSelectElement *iface, long index)
290 {
291     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
292     FIXME("(%p)->(%ld)\n", This, index);
293     return E_NOTIMPL;
294 }
295
296 static HRESULT WINAPI HTMLSelectElement_put_length(IHTMLSelectElement *iface, long v)
297 {
298     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
299     FIXME("(%p)->(%ld)\n", This, v);
300     return E_NOTIMPL;
301 }
302
303 static HRESULT WINAPI HTMLSelectElement_get_length(IHTMLSelectElement *iface, long *p)
304 {
305     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
306     PRUint32 length = 0;
307     nsresult nsres;
308
309     TRACE("(%p)->(%p)\n", This, p);
310
311     nsres = nsIDOMHTMLSelectElement_GetLength(This->nsselect, &length);
312     if(NS_FAILED(nsres))
313         ERR("GetLength failed: %08x\n", nsres);
314
315     *p = length;
316
317     TRACE("ret %ld\n", *p);
318     return S_OK;
319 }
320
321 static HRESULT WINAPI HTMLSelectElement_get__newEnum(IHTMLSelectElement *iface, IUnknown **p)
322 {
323     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
324     FIXME("(%p)->(%p)\n", This, p);
325     return E_NOTIMPL;
326 }
327
328 static HRESULT WINAPI HTMLSelectElement_item(IHTMLSelectElement *iface, VARIANT name,
329                                              VARIANT index, IDispatch **pdisp)
330 {
331     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
332     FIXME("(%p)->(v v %p)\n", This, pdisp);
333     return E_NOTIMPL;
334 }
335
336 static HRESULT WINAPI HTMLSelectElement_tags(IHTMLSelectElement *iface, VARIANT tagName,
337                                              IDispatch **pdisp)
338 {
339     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
340     FIXME("(%p)->(v %p)\n", This, pdisp);
341     return E_NOTIMPL;
342 }
343
344 #undef HTMLSELECT_THIS
345
346 static const IHTMLSelectElementVtbl HTMLSelectElementVtbl = {
347     HTMLSelectElement_QueryInterface,
348     HTMLSelectElement_AddRef,
349     HTMLSelectElement_Release,
350     HTMLSelectElement_GetTypeInfoCount,
351     HTMLSelectElement_GetTypeInfo,
352     HTMLSelectElement_GetIDsOfNames,
353     HTMLSelectElement_Invoke,
354     HTMLSelectElement_put_size,
355     HTMLSelectElement_get_size,
356     HTMLSelectElement_put_multiple,
357     HTMLSelectElement_get_multiple,
358     HTMLSelectElement_put_name,
359     HTMLSelectElement_get_name,
360     HTMLSelectElement_get_options,
361     HTMLSelectElement_put_onchange,
362     HTMLSelectElement_get_onchange,
363     HTMLSelectElement_put_selectedIndex,
364     HTMLSelectElement_get_selectedIndex,
365     HTMLSelectElement_get_type,
366     HTMLSelectElement_put_value,
367     HTMLSelectElement_get_value,
368     HTMLSelectElement_put_disabled,
369     HTMLSelectElement_get_disabled,
370     HTMLSelectElement_get_form,
371     HTMLSelectElement_add,
372     HTMLSelectElement_remove,
373     HTMLSelectElement_put_length,
374     HTMLSelectElement_get_length,
375     HTMLSelectElement_get__newEnum,
376     HTMLSelectElement_item,
377     HTMLSelectElement_tags
378 };
379
380 #define HTMLSELECT_NODE_THIS(iface) DEFINE_THIS2(HTMLSelectElement, element.node, iface)
381
382 static HRESULT HTMLSelectElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
383 {
384     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
385
386     *ppv = NULL;
387
388     if(IsEqualGUID(&IID_IUnknown, riid)) {
389         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
390         *ppv = HTMLSELECT(This);
391     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
392         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
393         *ppv = HTMLSELECT(This);
394     }else if(IsEqualGUID(&IID_IHTMLSelectElement, riid)) {
395         TRACE("(%p)->(IID_IHTMLSelectElement %p)\n", This, ppv);
396         *ppv = HTMLSELECT(This);
397     }
398
399     if(*ppv) {
400         IUnknown_AddRef((IUnknown*)*ppv);
401         return S_OK;
402     }
403
404     return HTMLElement_QI(&This->element.node, riid, ppv);
405 }
406
407 static void HTMLSelectElement_destructor(HTMLDOMNode *iface)
408 {
409     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
410
411     nsIDOMHTMLSelectElement_Release(This->nsselect);
412
413     HTMLElement_destructor(&This->element.node);
414 }
415
416 #undef HTMLSELECT_NODE_THIS
417
418 static const NodeImplVtbl HTMLSelectElementImplVtbl = {
419     HTMLSelectElement_QI,
420     HTMLSelectElement_destructor
421 };
422
423 HTMLElement *HTMLSelectElement_Create(nsIDOMHTMLElement *nselem)
424 {
425     HTMLSelectElement *ret = heap_alloc_zero(sizeof(HTMLSelectElement));
426     nsresult nsres;
427
428     HTMLElement_Init(&ret->element);
429
430     ret->lpHTMLSelectElementVtbl = &HTMLSelectElementVtbl;
431     ret->element.node.vtbl = &HTMLSelectElementImplVtbl;
432     
433     nsres = nsIDOMHTMLElement_QueryInterface(nselem, &IID_nsIDOMHTMLSelectElement,
434                                              (void**)&ret->nsselect);
435     if(NS_FAILED(nsres))
436         ERR("Could not get nsIDOMHTMLSelectElement interfce: %08x\n", nsres);
437
438     return &ret->element;
439 }