2 * Copyright 2009 Andrew Eikum 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
28 #include "wine/debug.h"
30 #include "mshtml_private.h"
31 #include "htmlevent.h"
33 WINE_DEFAULT_DEBUG_CHANNEL(mshtml
);
35 struct HTMLFormElement
{
38 IHTMLFormElement IHTMLFormElement_iface
;
40 nsIDOMHTMLFormElement
*nsform
;
43 static HRESULT
htmlform_item(HTMLFormElement
*This
, int i
, IDispatch
**ret
)
45 nsIDOMHTMLCollection
*elements
;
51 nsres
= nsIDOMHTMLFormElement_GetElements(This
->nsform
, &elements
);
52 if(NS_FAILED(nsres
)) {
53 FIXME("GetElements failed: 0x%08x\n", nsres
);
57 nsres
= nsIDOMHTMLCollection_Item(elements
, i
, &item
);
58 nsIDOMHTMLCollection_Release(elements
);
59 if(NS_FAILED(nsres
)) {
60 FIXME("Item failed: 0x%08x\n", nsres
);
65 hres
= get_node(This
->element
.node
.doc
, item
, TRUE
, &node
);
69 IHTMLDOMNode_AddRef(&node
->IHTMLDOMNode_iface
);
70 nsIDOMNode_Release(item
);
71 *ret
= (IDispatch
*)&node
->IHTMLDOMNode_iface
;
79 static inline HTMLFormElement
*impl_from_IHTMLFormElement(IHTMLFormElement
*iface
)
81 return CONTAINING_RECORD(iface
, HTMLFormElement
, IHTMLFormElement_iface
);
84 static HRESULT WINAPI
HTMLFormElement_QueryInterface(IHTMLFormElement
*iface
,
85 REFIID riid
, void **ppv
)
87 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
89 return IHTMLDOMNode_QueryInterface(&This
->element
.node
.IHTMLDOMNode_iface
, riid
, ppv
);
92 static ULONG WINAPI
HTMLFormElement_AddRef(IHTMLFormElement
*iface
)
94 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
96 return IHTMLDOMNode_AddRef(&This
->element
.node
.IHTMLDOMNode_iface
);
99 static ULONG WINAPI
HTMLFormElement_Release(IHTMLFormElement
*iface
)
101 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
103 return IHTMLDOMNode_Release(&This
->element
.node
.IHTMLDOMNode_iface
);
106 static HRESULT WINAPI
HTMLFormElement_GetTypeInfoCount(IHTMLFormElement
*iface
, UINT
*pctinfo
)
108 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
109 return IDispatchEx_GetTypeInfoCount(&This
->element
.node
.dispex
.IDispatchEx_iface
, pctinfo
);
112 static HRESULT WINAPI
HTMLFormElement_GetTypeInfo(IHTMLFormElement
*iface
, UINT iTInfo
,
113 LCID lcid
, ITypeInfo
**ppTInfo
)
115 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
116 return IDispatchEx_GetTypeInfo(&This
->element
.node
.dispex
.IDispatchEx_iface
, iTInfo
, lcid
,
120 static HRESULT WINAPI
HTMLFormElement_GetIDsOfNames(IHTMLFormElement
*iface
, REFIID riid
,
121 LPOLESTR
*rgszNames
, UINT cNames
,
122 LCID lcid
, DISPID
*rgDispId
)
124 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
125 return IDispatchEx_GetIDsOfNames(&This
->element
.node
.dispex
.IDispatchEx_iface
, riid
, rgszNames
,
126 cNames
, lcid
, rgDispId
);
129 static HRESULT WINAPI
HTMLFormElement_Invoke(IHTMLFormElement
*iface
, DISPID dispIdMember
,
130 REFIID riid
, LCID lcid
, WORD wFlags
, DISPPARAMS
*pDispParams
,
131 VARIANT
*pVarResult
, EXCEPINFO
*pExcepInfo
, UINT
*puArgErr
)
133 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
134 return IDispatchEx_Invoke(&This
->element
.node
.dispex
.IDispatchEx_iface
, dispIdMember
, riid
,
135 lcid
, wFlags
, pDispParams
, pVarResult
, pExcepInfo
, puArgErr
);
138 static HRESULT WINAPI
HTMLFormElement_put_action(IHTMLFormElement
*iface
, BSTR v
)
140 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
141 nsAString action_str
;
144 TRACE("(%p)->(%s)\n", This
, wine_dbgstr_w(v
));
146 nsAString_InitDepend(&action_str
, v
);
147 nsres
= nsIDOMHTMLFormElement_SetAction(This
->nsform
, &action_str
);
148 nsAString_Finish(&action_str
);
149 if(NS_FAILED(nsres
)) {
150 ERR("SetAction failed: %08x\n", nsres
);
157 static HRESULT WINAPI
HTMLFormElement_get_action(IHTMLFormElement
*iface
, BSTR
*p
)
159 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
160 nsAString action_str
;
164 TRACE("(%p)->(%p)\n", This
, p
);
166 nsAString_Init(&action_str
, NULL
);
167 nsres
= nsIDOMHTMLFormElement_GetAction(This
->nsform
, &action_str
);
168 if(NS_SUCCEEDED(nsres
)) {
169 const PRUnichar
*action
;
170 nsAString_GetData(&action_str
, &action
);
171 hres
= nsuri_to_url(action
, FALSE
, p
);
173 ERR("GetAction failed: %08x\n", nsres
);
177 nsAString_Finish(&action_str
);
181 static HRESULT WINAPI
HTMLFormElement_put_dir(IHTMLFormElement
*iface
, BSTR v
)
183 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
184 FIXME("(%p)->(%s)\n", This
, wine_dbgstr_w(v
));
188 static HRESULT WINAPI
HTMLFormElement_get_dir(IHTMLFormElement
*iface
, BSTR
*p
)
190 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
191 FIXME("(%p)->(%p)\n", This
, p
);
195 static HRESULT WINAPI
HTMLFormElement_put_encoding(IHTMLFormElement
*iface
, BSTR v
)
197 static const WCHAR urlencodedW
[] = {'a','p','p','l','i','c','a','t','i','o','n','/',
198 'x','-','w','w','w','-','f','o','r','m','-','u','r','l','e','n','c','o','d','e','d',0};
199 static const WCHAR dataW
[] = {'m','u','l','t','i','p','a','r','t','/',
200 'f','o','r','m','-','d','a','t','a',0};
201 static const WCHAR plainW
[] = {'t','e','x','t','/','p','l','a','i','n',0};
203 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
204 nsAString encoding_str
;
207 TRACE("(%p)->(%s)\n", This
, wine_dbgstr_w(v
));
209 if(lstrcmpiW(v
, urlencodedW
) && lstrcmpiW(v
, dataW
) && lstrcmpiW(v
, plainW
)) {
210 WARN("incorrect enctype\n");
214 nsAString_InitDepend(&encoding_str
, v
);
215 nsres
= nsIDOMHTMLFormElement_SetEnctype(This
->nsform
, &encoding_str
);
216 nsAString_Finish(&encoding_str
);
223 static HRESULT WINAPI
HTMLFormElement_get_encoding(IHTMLFormElement
*iface
, BSTR
*p
)
225 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
226 nsAString encoding_str
;
229 TRACE("(%p)->(%p)\n", This
, p
);
231 nsAString_Init(&encoding_str
, NULL
);
232 nsres
= nsIDOMHTMLFormElement_GetEnctype(This
->nsform
, &encoding_str
);
233 return return_nsstr(nsres
, &encoding_str
, p
);
236 static HRESULT WINAPI
HTMLFormElement_put_method(IHTMLFormElement
*iface
, BSTR v
)
238 static const WCHAR postW
[] = {'P','O','S','T',0};
239 static const WCHAR getW
[] = {'G','E','T',0};
241 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
242 nsAString method_str
;
245 TRACE("(%p)->(%s)\n", This
, wine_dbgstr_w(v
));
247 if(lstrcmpiW(v
, postW
) && lstrcmpiW(v
, getW
)) {
248 WARN("unrecognized method\n");
252 nsAString_InitDepend(&method_str
, v
);
253 nsres
= nsIDOMHTMLFormElement_SetMethod(This
->nsform
, &method_str
);
254 nsAString_Finish(&method_str
);
261 static HRESULT WINAPI
HTMLFormElement_get_method(IHTMLFormElement
*iface
, BSTR
*p
)
263 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
264 nsAString method_str
;
267 TRACE("(%p)->(%p)\n", This
, p
);
269 nsAString_Init(&method_str
, NULL
);
270 nsres
= nsIDOMHTMLFormElement_GetMethod(This
->nsform
, &method_str
);
271 return return_nsstr(nsres
, &method_str
, p
);
274 static HRESULT WINAPI
HTMLFormElement_get_elements(IHTMLFormElement
*iface
, IDispatch
**p
)
276 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
278 TRACE("(%p)->(%p)\n", This
, p
);
280 *p
= (IDispatch
*)&This
->IHTMLFormElement_iface
;
281 IDispatch_AddRef(*p
);
285 static HRESULT WINAPI
HTMLFormElement_put_target(IHTMLFormElement
*iface
, BSTR v
)
287 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
288 FIXME("(%p)->(%s)\n", This
, wine_dbgstr_w(v
));
292 static HRESULT WINAPI
HTMLFormElement_get_target(IHTMLFormElement
*iface
, BSTR
*p
)
294 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
295 FIXME("(%p)->(%p)\n", This
, p
);
299 static HRESULT WINAPI
HTMLFormElement_put_name(IHTMLFormElement
*iface
, BSTR v
)
301 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
305 TRACE("(%p)->(%s)\n", This
, wine_dbgstr_w(v
));
307 nsAString_InitDepend(&name_str
, v
);
308 nsres
= nsIDOMHTMLFormElement_SetName(This
->nsform
, &name_str
);
309 nsAString_Finish(&name_str
);
316 static HRESULT WINAPI
HTMLFormElement_get_name(IHTMLFormElement
*iface
, BSTR
*p
)
318 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
322 TRACE("(%p)->(%p)\n", This
, p
);
324 nsAString_Init(&name_str
, NULL
);
325 nsres
= nsIDOMHTMLFormElement_GetName(This
->nsform
, &name_str
);
326 return return_nsstr(nsres
, &name_str
, p
);
329 static HRESULT WINAPI
HTMLFormElement_put_onsubmit(IHTMLFormElement
*iface
, VARIANT v
)
331 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
333 TRACE("(%p)->(%s)\n", This
, debugstr_variant(&v
));
335 return set_node_event(&This
->element
.node
, EVENTID_SUBMIT
, &v
);
338 static HRESULT WINAPI
HTMLFormElement_get_onsubmit(IHTMLFormElement
*iface
, VARIANT
*p
)
340 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
342 TRACE("(%p)->(%p)\n", This
, p
);
344 return get_node_event(&This
->element
.node
, EVENTID_SUBMIT
, p
);
347 static HRESULT WINAPI
HTMLFormElement_put_onreset(IHTMLFormElement
*iface
, VARIANT v
)
349 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
350 FIXME("(%p)->(v)\n", This
);
354 static HRESULT WINAPI
HTMLFormElement_get_onreset(IHTMLFormElement
*iface
, VARIANT
*p
)
356 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
357 FIXME("(%p)->(%p)\n", This
, p
);
361 static HRESULT WINAPI
HTMLFormElement_submit(IHTMLFormElement
*iface
)
363 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
364 FIXME("(%p)->()\n", This
);
368 static HRESULT WINAPI
HTMLFormElement_reset(IHTMLFormElement
*iface
)
370 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
371 FIXME("(%p)->()\n", This
);
375 static HRESULT WINAPI
HTMLFormElement_put_length(IHTMLFormElement
*iface
, LONG v
)
377 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
378 FIXME("(%p)->(%d)\n", This
, v
);
382 static HRESULT WINAPI
HTMLFormElement_get_length(IHTMLFormElement
*iface
, LONG
*p
)
384 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
388 TRACE("(%p)->(%p)\n", This
, p
);
390 nsres
= nsIDOMHTMLFormElement_GetLength(This
->nsform
, &length
);
391 if(NS_FAILED(nsres
)) {
392 ERR("GetLength failed: %08x\n", nsres
);
400 static HRESULT WINAPI
HTMLFormElement__newEnum(IHTMLFormElement
*iface
, IUnknown
**p
)
402 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
403 FIXME("(%p)->(%p)\n", This
, p
);
407 static HRESULT WINAPI
HTMLFormElement_item(IHTMLFormElement
*iface
, VARIANT name
,
408 VARIANT index
, IDispatch
**pdisp
)
410 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
412 TRACE("(%p)->(%s %s %p)\n", This
, debugstr_variant(&name
), debugstr_variant(&index
), pdisp
);
418 if(V_VT(&name
) == VT_I4
) {
421 return htmlform_item(This
, V_I4(&name
), pdisp
);
424 FIXME("Unsupported args\n");
428 static HRESULT WINAPI
HTMLFormElement_tags(IHTMLFormElement
*iface
, VARIANT tagName
,
431 HTMLFormElement
*This
= impl_from_IHTMLFormElement(iface
);
432 FIXME("(%p)->(v %p)\n", This
, pdisp
);
436 static const IHTMLFormElementVtbl HTMLFormElementVtbl
= {
437 HTMLFormElement_QueryInterface
,
438 HTMLFormElement_AddRef
,
439 HTMLFormElement_Release
,
440 HTMLFormElement_GetTypeInfoCount
,
441 HTMLFormElement_GetTypeInfo
,
442 HTMLFormElement_GetIDsOfNames
,
443 HTMLFormElement_Invoke
,
444 HTMLFormElement_put_action
,
445 HTMLFormElement_get_action
,
446 HTMLFormElement_put_dir
,
447 HTMLFormElement_get_dir
,
448 HTMLFormElement_put_encoding
,
449 HTMLFormElement_get_encoding
,
450 HTMLFormElement_put_method
,
451 HTMLFormElement_get_method
,
452 HTMLFormElement_get_elements
,
453 HTMLFormElement_put_target
,
454 HTMLFormElement_get_target
,
455 HTMLFormElement_put_name
,
456 HTMLFormElement_get_name
,
457 HTMLFormElement_put_onsubmit
,
458 HTMLFormElement_get_onsubmit
,
459 HTMLFormElement_put_onreset
,
460 HTMLFormElement_get_onreset
,
461 HTMLFormElement_submit
,
462 HTMLFormElement_reset
,
463 HTMLFormElement_put_length
,
464 HTMLFormElement_get_length
,
465 HTMLFormElement__newEnum
,
466 HTMLFormElement_item
,
470 static inline HTMLFormElement
*impl_from_HTMLDOMNode(HTMLDOMNode
*iface
)
472 return CONTAINING_RECORD(iface
, HTMLFormElement
, element
.node
);
475 static HRESULT
HTMLFormElement_QI(HTMLDOMNode
*iface
, REFIID riid
, void **ppv
)
477 HTMLFormElement
*This
= impl_from_HTMLDOMNode(iface
);
481 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
482 TRACE("(%p)->(IID_IUnknown %p)\n", This
, ppv
);
483 *ppv
= &This
->IHTMLFormElement_iface
;
484 }else if(IsEqualGUID(&IID_IDispatch
, riid
)) {
485 TRACE("(%p)->(IID_IDispatch %p)\n", This
, ppv
);
486 *ppv
= &This
->IHTMLFormElement_iface
;
487 }else if(IsEqualGUID(&IID_IHTMLFormElement
, riid
)) {
488 TRACE("(%p)->(IID_IHTMLFormElement %p)\n", This
, ppv
);
489 *ppv
= &This
->IHTMLFormElement_iface
;
493 IUnknown_AddRef((IUnknown
*)*ppv
);
497 return HTMLElement_QI(&This
->element
.node
, riid
, ppv
);
500 static void HTMLFormElement_destructor(HTMLDOMNode
*iface
)
502 HTMLFormElement
*This
= impl_from_HTMLDOMNode(iface
);
505 nsIDOMHTMLFormElement_Release(This
->nsform
);
507 HTMLElement_destructor(&This
->element
.node
);
510 static HRESULT
HTMLFormElement_get_dispid(HTMLDOMNode
*iface
,
511 BSTR name
, DWORD grfdex
, DISPID
*pid
)
513 HTMLFormElement
*This
= impl_from_HTMLDOMNode(iface
);
514 nsIDOMHTMLCollection
*elements
;
515 nsAString nsname
, nsstr
;
518 HRESULT hres
= DISP_E_UNKNOWNNAME
;
520 static const PRUnichar nameW
[] = {'n','a','m','e',0};
522 TRACE("(%p)->(%s %x %p)\n", This
, wine_dbgstr_w(name
), grfdex
, pid
);
524 nsres
= nsIDOMHTMLFormElement_GetElements(This
->nsform
, &elements
);
525 if(NS_FAILED(nsres
)) {
526 FIXME("GetElements failed: 0x%08x\n", nsres
);
530 nsres
= nsIDOMHTMLCollection_GetLength(elements
, &len
);
531 if(NS_FAILED(nsres
)) {
532 FIXME("GetLength failed: 0x%08x\n", nsres
);
533 nsIDOMHTMLCollection_Release(elements
);
537 if(len
> MSHTML_CUSTOM_DISPID_CNT
)
538 len
= MSHTML_CUSTOM_DISPID_CNT
;
540 /* FIXME: Implement in more generic way */
541 if('0' <= *name
&& *name
<= '9') {
544 i
= strtoulW(name
, &end_ptr
, 10);
545 if(!*end_ptr
&& i
< len
) {
546 *pid
= MSHTML_DISPID_CUSTOM_MIN
+ i
;
551 nsAString_InitDepend(&nsname
, nameW
);
552 nsAString_Init(&nsstr
, NULL
);
553 for(i
= 0; i
< len
; ++i
) {
555 nsIDOMHTMLElement
*nshtml_elem
;
556 const PRUnichar
*str
;
558 nsres
= nsIDOMHTMLCollection_Item(elements
, i
, &nsitem
);
559 if(NS_FAILED(nsres
)) {
560 FIXME("Item failed: 0x%08x\n", nsres
);
565 nsres
= nsIDOMNode_QueryInterface(nsitem
, &IID_nsIDOMHTMLElement
, (void**)&nshtml_elem
);
566 nsIDOMNode_Release(nsitem
);
567 if(NS_FAILED(nsres
)) {
568 FIXME("Failed to get nsIDOMHTMLNode interface: 0x%08x\n", nsres
);
573 /* compare by id attr */
574 nsres
= nsIDOMHTMLElement_GetId(nshtml_elem
, &nsstr
);
575 if(NS_FAILED(nsres
)) {
576 FIXME("GetId failed: 0x%08x\n", nsres
);
577 nsIDOMHTMLElement_Release(nshtml_elem
);
581 nsAString_GetData(&nsstr
, &str
);
582 if(!strcmpiW(str
, name
)) {
583 nsIDOMHTMLElement_Release(nshtml_elem
);
584 /* FIXME: using index for dispid */
585 *pid
= MSHTML_DISPID_CUSTOM_MIN
+ i
;
590 /* compare by name attr */
591 nsres
= nsIDOMHTMLElement_GetAttribute(nshtml_elem
, &nsname
, &nsstr
);
592 nsIDOMHTMLElement_Release(nshtml_elem
);
593 nsAString_GetData(&nsstr
, &str
);
594 if(!strcmpiW(str
, name
)) {
595 /* FIXME: using index for dispid */
596 *pid
= MSHTML_DISPID_CUSTOM_MIN
+ i
;
601 nsAString_Finish(&nsname
);
602 nsAString_Finish(&nsstr
);
604 nsIDOMHTMLCollection_Release(elements
);
609 static HRESULT
HTMLFormElement_invoke(HTMLDOMNode
*iface
,
610 DISPID id
, LCID lcid
, WORD flags
, DISPPARAMS
*params
, VARIANT
*res
,
611 EXCEPINFO
*ei
, IServiceProvider
*caller
)
613 HTMLFormElement
*This
= impl_from_HTMLDOMNode(iface
);
617 TRACE("(%p)->(%x %x %x %p %p %p %p)\n", This
, id
, lcid
, flags
, params
, res
, ei
, caller
);
619 hres
= htmlform_item(This
, id
- MSHTML_DISPID_CUSTOM_MIN
, &ret
);
624 V_VT(res
) = VT_DISPATCH
;
625 V_DISPATCH(res
) = ret
;
632 static const NodeImplVtbl HTMLFormElementImplVtbl
= {
634 HTMLFormElement_destructor
,
643 HTMLFormElement_get_dispid
,
644 HTMLFormElement_invoke
647 static const tid_t HTMLFormElement_iface_tids
[] = {
649 IHTMLFormElement_tid
,
653 static dispex_static_data_t HTMLFormElement_dispex
= {
655 DispHTMLFormElement_tid
,
657 HTMLFormElement_iface_tids
660 HRESULT
HTMLFormElement_Create(HTMLDocumentNode
*doc
, nsIDOMHTMLElement
*nselem
, HTMLElement
**elem
)
662 HTMLFormElement
*ret
;
665 ret
= heap_alloc_zero(sizeof(HTMLFormElement
));
667 return E_OUTOFMEMORY
;
669 ret
->IHTMLFormElement_iface
.lpVtbl
= &HTMLFormElementVtbl
;
670 ret
->element
.node
.vtbl
= &HTMLFormElementImplVtbl
;
672 nsres
= nsIDOMHTMLElement_QueryInterface(nselem
, &IID_nsIDOMHTMLFormElement
, (void**)&ret
->nsform
);
673 if(NS_FAILED(nsres
)) {
674 ERR("Could not get nsIDOMHTMLFormElement interface: %08x\n", nsres
);
679 HTMLElement_Init(&ret
->element
, doc
, nselem
, &HTMLFormElement_dispex
);
681 *elem
= &ret
->element
;