hal: Add version resource.
[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     const IHTMLSelectElementVtbl *lpHTMLSelectElementVtbl;
39
40     nsIDOMHTMLSelectElement *nsselect;
41 } HTMLSelectElement;
42
43 #define HTMLSELECT(x)      ((IHTMLSelectElement*)         &(x)->lpHTMLSelectElementVtbl)
44
45 #define HTMLSELECT_THIS(iface) DEFINE_THIS(HTMLSelectElement, HTMLSelectElement, iface)
46
47 static HRESULT WINAPI HTMLSelectElement_QueryInterface(IHTMLSelectElement *iface,
48                                                          REFIID riid, void **ppv)
49 {
50     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
51
52     return IHTMLDOMNode_QueryInterface(HTMLDOMNODE(&This->element.node), riid, ppv);
53 }
54
55 static ULONG WINAPI HTMLSelectElement_AddRef(IHTMLSelectElement *iface)
56 {
57     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
58
59     return IHTMLDOMNode_AddRef(HTMLDOMNODE(&This->element.node));
60 }
61
62 static ULONG WINAPI HTMLSelectElement_Release(IHTMLSelectElement *iface)
63 {
64     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
65
66     return IHTMLDOMNode_Release(HTMLDOMNODE(&This->element.node));
67 }
68
69 static HRESULT WINAPI HTMLSelectElement_GetTypeInfoCount(IHTMLSelectElement *iface, UINT *pctinfo)
70 {
71     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
72
73     return IDispatchEx_GetTypeInfoCount(DISPATCHEX(&This->element.node.dispex), pctinfo);
74 }
75
76 static HRESULT WINAPI HTMLSelectElement_GetTypeInfo(IHTMLSelectElement *iface, UINT iTInfo,
77                                               LCID lcid, ITypeInfo **ppTInfo)
78 {
79     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
80
81     return IDispatchEx_GetTypeInfo(DISPATCHEX(&This->element.node.dispex), iTInfo, lcid, ppTInfo);
82 }
83
84 static HRESULT WINAPI HTMLSelectElement_GetIDsOfNames(IHTMLSelectElement *iface, REFIID riid,
85                                                 LPOLESTR *rgszNames, UINT cNames,
86                                                 LCID lcid, DISPID *rgDispId)
87 {
88     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
89
90     return IDispatchEx_GetIDsOfNames(DISPATCHEX(&This->element.node.dispex), riid, rgszNames, cNames, lcid, rgDispId);
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
99     return IDispatchEx_Invoke(DISPATCHEX(&This->element.node.dispex), dispIdMember, riid, lcid,
100             wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
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
181     TRACE("(%p)->()\n", This);
182
183     return set_node_event(&This->element.node, EVENTID_CHANGE, &v);
184 }
185
186 static HRESULT WINAPI HTMLSelectElement_get_onchange(IHTMLSelectElement *iface, VARIANT *p)
187 {
188     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
189     FIXME("(%p)->(%p)\n", This, p);
190     return E_NOTIMPL;
191 }
192
193 static HRESULT WINAPI HTMLSelectElement_put_selectedIndex(IHTMLSelectElement *iface, long v)
194 {
195     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
196     nsresult nsres;
197
198     TRACE("(%p)->(%ld)\n", This, v);
199
200     nsres = nsIDOMHTMLSelectElement_SetSelectedIndex(This->nsselect, v);
201     if(NS_FAILED(nsres))
202         ERR("SetSelectedIndex failed: %08x\n", nsres);
203
204     return S_OK;
205 }
206
207 static HRESULT WINAPI HTMLSelectElement_get_selectedIndex(IHTMLSelectElement *iface, long *p)
208 {
209     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
210     PRInt32 idx = 0;
211     nsresult nsres;
212
213     TRACE("(%p)->(%p)\n", This, p);
214
215     nsres = nsIDOMHTMLSelectElement_GetSelectedIndex(This->nsselect, &idx);
216     if(NS_FAILED(nsres))
217         ERR("GetSelectedIndex failed: %08x\n", nsres);
218
219     *p = idx;
220     return S_OK;
221 }
222
223 static HRESULT WINAPI HTMLSelectElement_get_type(IHTMLSelectElement *iface, BSTR *p)
224 {
225     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
226     const PRUnichar *type;
227     nsAString type_str;
228     nsresult nsres;
229     HRESULT hres = S_OK;
230
231     TRACE("(%p)->(%p)\n", This, p);
232
233     nsAString_Init(&type_str, NULL);
234     nsres = nsIDOMHTMLSelectElement_GetType(This->nsselect, &type_str);
235     if(NS_SUCCEEDED(nsres)) {
236         nsAString_GetData(&type_str, &type);
237         *p = *type ? SysAllocString(type) : NULL;
238     }else {
239         ERR("GetType failed: %08x\n", nsres);
240         hres = E_FAIL;
241     }
242
243     nsAString_Finish(&type_str);
244
245     return hres;
246 }
247
248 static HRESULT WINAPI HTMLSelectElement_put_value(IHTMLSelectElement *iface, BSTR v)
249 {
250     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
251     nsAString value_str;
252     nsresult nsres;
253
254     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
255
256     nsAString_Init(&value_str, v);
257     nsres = nsIDOMHTMLSelectElement_SetValue(This->nsselect, &value_str);
258     nsAString_Finish(&value_str);
259     if(NS_FAILED(nsres))
260         ERR("SetValue failed: %08x\n", nsres);
261
262     return S_OK;
263 }
264
265 static HRESULT WINAPI HTMLSelectElement_get_value(IHTMLSelectElement *iface, BSTR *p)
266 {
267     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
268     nsAString value_str;
269     const PRUnichar *value = NULL;
270     nsresult nsres;
271
272     TRACE("(%p)->(%p)\n", This, p);
273
274     nsAString_Init(&value_str, NULL);
275
276     nsres = nsIDOMHTMLSelectElement_GetValue(This->nsselect, &value_str);
277     if(NS_SUCCEEDED(nsres)) {
278         nsAString_GetData(&value_str, &value);
279         *p = *value ? SysAllocString(value) : NULL;
280     }else {
281         ERR("GetValue failed: %08x\n", nsres);
282     }
283
284     nsAString_Finish(&value_str);
285
286     TRACE("value=%s\n", debugstr_w(*p));
287     return S_OK;
288 }
289
290 static HRESULT WINAPI HTMLSelectElement_put_disabled(IHTMLSelectElement *iface, VARIANT_BOOL v)
291 {
292     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
293     nsresult nsres;
294
295     TRACE("(%p)->(%x)\n", This, v);
296
297     nsres = nsIDOMHTMLSelectElement_SetDisabled(This->nsselect, v != VARIANT_FALSE);
298     if(NS_FAILED(nsres)) {
299         ERR("SetDisabled failed: %08x\n", nsres);
300         return E_FAIL;
301     }
302
303     return S_OK;
304 }
305
306 static HRESULT WINAPI HTMLSelectElement_get_disabled(IHTMLSelectElement *iface, VARIANT_BOOL *p)
307 {
308     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
309     PRBool disabled = FALSE;
310     nsresult nsres;
311
312     TRACE("(%p)->(%p)\n", This, p);
313
314     nsres = nsIDOMHTMLSelectElement_GetDisabled(This->nsselect, &disabled);
315     if(NS_FAILED(nsres)) {
316         ERR("GetDisabled failed: %08x\n", nsres);
317         return E_FAIL;
318     }
319
320     *p = disabled ? VARIANT_TRUE : VARIANT_FALSE;
321     return S_OK;
322 }
323
324 static HRESULT WINAPI HTMLSelectElement_get_form(IHTMLSelectElement *iface, IHTMLFormElement **p)
325 {
326     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
327     FIXME("(%p)->(%p)\n", This, p);
328     return E_NOTIMPL;
329 }
330
331 static HRESULT WINAPI HTMLSelectElement_add(IHTMLSelectElement *iface, IHTMLElement *element,
332                                             VARIANT before)
333 {
334     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
335     FIXME("(%p)->(%p v)\n", This, element);
336     return E_NOTIMPL;
337 }
338
339 static HRESULT WINAPI HTMLSelectElement_remove(IHTMLSelectElement *iface, long index)
340 {
341     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
342     FIXME("(%p)->(%ld)\n", This, index);
343     return E_NOTIMPL;
344 }
345
346 static HRESULT WINAPI HTMLSelectElement_put_length(IHTMLSelectElement *iface, long v)
347 {
348     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
349     FIXME("(%p)->(%ld)\n", This, v);
350     return E_NOTIMPL;
351 }
352
353 static HRESULT WINAPI HTMLSelectElement_get_length(IHTMLSelectElement *iface, long *p)
354 {
355     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
356     PRUint32 length = 0;
357     nsresult nsres;
358
359     TRACE("(%p)->(%p)\n", This, p);
360
361     nsres = nsIDOMHTMLSelectElement_GetLength(This->nsselect, &length);
362     if(NS_FAILED(nsres))
363         ERR("GetLength failed: %08x\n", nsres);
364
365     *p = length;
366
367     TRACE("ret %ld\n", *p);
368     return S_OK;
369 }
370
371 static HRESULT WINAPI HTMLSelectElement_get__newEnum(IHTMLSelectElement *iface, IUnknown **p)
372 {
373     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
374     FIXME("(%p)->(%p)\n", This, p);
375     return E_NOTIMPL;
376 }
377
378 static HRESULT WINAPI HTMLSelectElement_item(IHTMLSelectElement *iface, VARIANT name,
379                                              VARIANT index, IDispatch **pdisp)
380 {
381     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
382     FIXME("(%p)->(v v %p)\n", This, pdisp);
383     return E_NOTIMPL;
384 }
385
386 static HRESULT WINAPI HTMLSelectElement_tags(IHTMLSelectElement *iface, VARIANT tagName,
387                                              IDispatch **pdisp)
388 {
389     HTMLSelectElement *This = HTMLSELECT_THIS(iface);
390     FIXME("(%p)->(v %p)\n", This, pdisp);
391     return E_NOTIMPL;
392 }
393
394 #undef HTMLSELECT_THIS
395
396 static const IHTMLSelectElementVtbl HTMLSelectElementVtbl = {
397     HTMLSelectElement_QueryInterface,
398     HTMLSelectElement_AddRef,
399     HTMLSelectElement_Release,
400     HTMLSelectElement_GetTypeInfoCount,
401     HTMLSelectElement_GetTypeInfo,
402     HTMLSelectElement_GetIDsOfNames,
403     HTMLSelectElement_Invoke,
404     HTMLSelectElement_put_size,
405     HTMLSelectElement_get_size,
406     HTMLSelectElement_put_multiple,
407     HTMLSelectElement_get_multiple,
408     HTMLSelectElement_put_name,
409     HTMLSelectElement_get_name,
410     HTMLSelectElement_get_options,
411     HTMLSelectElement_put_onchange,
412     HTMLSelectElement_get_onchange,
413     HTMLSelectElement_put_selectedIndex,
414     HTMLSelectElement_get_selectedIndex,
415     HTMLSelectElement_get_type,
416     HTMLSelectElement_put_value,
417     HTMLSelectElement_get_value,
418     HTMLSelectElement_put_disabled,
419     HTMLSelectElement_get_disabled,
420     HTMLSelectElement_get_form,
421     HTMLSelectElement_add,
422     HTMLSelectElement_remove,
423     HTMLSelectElement_put_length,
424     HTMLSelectElement_get_length,
425     HTMLSelectElement_get__newEnum,
426     HTMLSelectElement_item,
427     HTMLSelectElement_tags
428 };
429
430 #define HTMLSELECT_NODE_THIS(iface) DEFINE_THIS2(HTMLSelectElement, element.node, iface)
431
432 static HRESULT HTMLSelectElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
433 {
434     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
435
436     *ppv = NULL;
437
438     if(IsEqualGUID(&IID_IUnknown, riid)) {
439         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
440         *ppv = HTMLSELECT(This);
441     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
442         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
443         *ppv = HTMLSELECT(This);
444     }else if(IsEqualGUID(&IID_IHTMLSelectElement, riid)) {
445         TRACE("(%p)->(IID_IHTMLSelectElement %p)\n", This, ppv);
446         *ppv = HTMLSELECT(This);
447     }
448
449     if(*ppv) {
450         IUnknown_AddRef((IUnknown*)*ppv);
451         return S_OK;
452     }
453
454     return HTMLElement_QI(&This->element.node, riid, ppv);
455 }
456
457 static void HTMLSelectElement_destructor(HTMLDOMNode *iface)
458 {
459     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
460
461     nsIDOMHTMLSelectElement_Release(This->nsselect);
462
463     HTMLElement_destructor(&This->element.node);
464 }
465
466 static HRESULT HTMLSelectElementImpl_put_disabled(HTMLDOMNode *iface, VARIANT_BOOL v)
467 {
468     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
469     return IHTMLSelectElement_put_disabled(HTMLSELECT(This), v);
470 }
471
472 static HRESULT HTMLSelectElementImpl_get_disabled(HTMLDOMNode *iface, VARIANT_BOOL *p)
473 {
474     HTMLSelectElement *This = HTMLSELECT_NODE_THIS(iface);
475     return IHTMLSelectElement_get_disabled(HTMLSELECT(This), p);
476 }
477
478 #undef HTMLSELECT_NODE_THIS
479
480 static const NodeImplVtbl HTMLSelectElementImplVtbl = {
481     HTMLSelectElement_QI,
482     HTMLSelectElement_destructor,
483     HTMLSelectElementImpl_put_disabled,
484     HTMLSelectElementImpl_get_disabled
485 };
486
487 static const tid_t HTMLSelectElement_tids[] = {
488     IHTMLDOMNode_tid,
489     IHTMLDOMNode2_tid,
490     IHTMLElement_tid,
491     IHTMLElement2_tid,
492     IHTMLElement3_tid,
493     IHTMLSelectElement_tid,
494     0
495 };
496
497 static dispex_static_data_t HTMLSelectElement_dispex = {
498     NULL,
499     DispHTMLSelectElement_tid,
500     NULL,
501     HTMLSelectElement_tids
502 };
503
504 HTMLElement *HTMLSelectElement_Create(nsIDOMHTMLElement *nselem)
505 {
506     HTMLSelectElement *ret = heap_alloc_zero(sizeof(HTMLSelectElement));
507     nsresult nsres;
508
509     ret->lpHTMLSelectElementVtbl = &HTMLSelectElementVtbl;
510     ret->element.node.vtbl = &HTMLSelectElementImplVtbl;
511
512     init_dispex(&ret->element.node.dispex, (IUnknown*)HTMLSELECT(ret), &HTMLSelectElement_dispex);
513     HTMLElement_Init(&ret->element);
514
515     nsres = nsIDOMHTMLElement_QueryInterface(nselem, &IID_nsIDOMHTMLSelectElement,
516                                              (void**)&ret->nsselect);
517     if(NS_FAILED(nsres))
518         ERR("Could not get nsIDOMHTMLSelectElement interfce: %08x\n", nsres);
519
520     return &ret->element;
521 }