dlls/mshtml/htmlform.c

   1 /*
   2  * Copyright 2009 Andrew Eikum 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 struct HTMLFormElement {
  36     HTMLElement element;
  37
  38     IHTMLFormElement IHTMLFormElement_iface;
  39
  40     nsIDOMHTMLFormElement *nsform;
  41 };
  42
  43 static HRESULT htmlform_item(HTMLFormElement *This, int i, IDispatch **ret)
  44 {
  45     nsIDOMHTMLCollection *elements;
  46     nsIDOMNode *item;
  47     HTMLDOMNode *node;
  48     nsresult nsres;
  49     HRESULT hres;
  50
  51     nsres = nsIDOMHTMLFormElement_GetElements(This->nsform, &elements);
  52     if(NS_FAILED(nsres)) {
  53         FIXME("GetElements failed: 0x%08x\n", nsres);
  54         return E_FAIL;
  55     }
  56
  57     nsres = nsIDOMHTMLCollection_Item(elements, i, &item);
  58     nsIDOMHTMLCollection_Release(elements);
  59     if(NS_FAILED(nsres)) {
  60         FIXME("Item failed: 0x%08x\n", nsres);
  61         return E_FAIL;
  62     }
  63
  64     if(item) {
  65         hres = get_node(This->element.node.doc, item, TRUE, &node);
  66         if(FAILED(hres))
  67             return hres;
  68
  69         IHTMLDOMNode_AddRef(&node->IHTMLDOMNode_iface);
  70         nsIDOMNode_Release(item);
  71         *ret = (IDispatch*)&node->IHTMLDOMNode_iface;
  72     }else {
  73         *ret = NULL;
  74     }
  75
  76     return S_OK;
  77 }
  78
  79 static inline HTMLFormElement *impl_from_IHTMLFormElement(IHTMLFormElement *iface)
  80 {
  81     return CONTAINING_RECORD(iface, HTMLFormElement, IHTMLFormElement_iface);
  82 }
  83
  84 static HRESULT WINAPI HTMLFormElement_QueryInterface(IHTMLFormElement *iface,
  85         REFIID riid, void **ppv)
  86 {
  87     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
  88
  89     return IHTMLDOMNode_QueryInterface(&This->element.node.IHTMLDOMNode_iface, riid, ppv);
  90 }
  91
  92 static ULONG WINAPI HTMLFormElement_AddRef(IHTMLFormElement *iface)
  93 {
  94     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
  95
  96     return IHTMLDOMNode_AddRef(&This->element.node.IHTMLDOMNode_iface);
  97 }
  98
  99 static ULONG WINAPI HTMLFormElement_Release(IHTMLFormElement *iface)
 100 {
 101     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 102
 103     return IHTMLDOMNode_Release(&This->element.node.IHTMLDOMNode_iface);
 104 }
 105
 106 static HRESULT WINAPI HTMLFormElement_GetTypeInfoCount(IHTMLFormElement *iface, UINT *pctinfo)
 107 {
 108     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 109     return IDispatchEx_GetTypeInfoCount(&This->element.node.dispex.IDispatchEx_iface, pctinfo);
 110 }
 111
 112 static HRESULT WINAPI HTMLFormElement_GetTypeInfo(IHTMLFormElement *iface, UINT iTInfo,
 113                                               LCID lcid, ITypeInfo **ppTInfo)
 114 {
 115     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 116     return IDispatchEx_GetTypeInfo(&This->element.node.dispex.IDispatchEx_iface, iTInfo, lcid,
 117             ppTInfo);
 118 }
 119
 120 static HRESULT WINAPI HTMLFormElement_GetIDsOfNames(IHTMLFormElement *iface, REFIID riid,
 121                                                 LPOLESTR *rgszNames, UINT cNames,
 122                                                 LCID lcid, DISPID *rgDispId)
 123 {
 124     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 125     return IDispatchEx_GetIDsOfNames(&This->element.node.dispex.IDispatchEx_iface, riid, rgszNames,
 126             cNames, lcid, rgDispId);
 127 }
 128
 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)
 132 {
 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);
 136 }
 137
 138 static HRESULT WINAPI HTMLFormElement_put_action(IHTMLFormElement *iface, BSTR v)
 139 {
 140     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 141     nsAString action_str;
 142     nsresult nsres;
 143
 144     TRACE("(%p)->(%s)\n", This, wine_dbgstr_w(v));
 145
 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);
 151         return E_FAIL;
 152     }
 153
 154     return S_OK;
 155 }
 156
 157 static HRESULT WINAPI HTMLFormElement_get_action(IHTMLFormElement *iface, BSTR *p)
 158 {
 159     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 160     nsAString action_str;
 161     nsresult nsres;
 162     HRESULT hres;
 163
 164     TRACE("(%p)->(%p)\n", This, p);
 165
 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);
 172     }else {
 173         ERR("GetAction failed: %08x\n", nsres);
 174         hres = E_FAIL;
 175     }
 176
 177     nsAString_Finish(&action_str);
 178     return hres;
 179 }
 180
 181 static HRESULT WINAPI HTMLFormElement_put_dir(IHTMLFormElement *iface, BSTR v)
 182 {
 183     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 184     FIXME("(%p)->(%s)\n", This, wine_dbgstr_w(v));
 185     return E_NOTIMPL;
 186 }
 187
 188 static HRESULT WINAPI HTMLFormElement_get_dir(IHTMLFormElement *iface, BSTR *p)
 189 {
 190     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 191     FIXME("(%p)->(%p)\n", This, p);
 192     return E_NOTIMPL;
 193 }
 194
 195 static HRESULT WINAPI HTMLFormElement_put_encoding(IHTMLFormElement *iface, BSTR v)
 196 {
 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};
 202
 203     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 204     nsAString encoding_str;
 205     nsresult nsres;
 206
 207     TRACE("(%p)->(%s)\n", This, wine_dbgstr_w(v));
 208
 209     if(lstrcmpiW(v, urlencodedW) && lstrcmpiW(v, dataW) && lstrcmpiW(v, plainW)) {
 210         WARN("incorrect enctype\n");
 211         return E_INVALIDARG;
 212     }
 213
 214     nsAString_InitDepend(&encoding_str, v);
 215     nsres = nsIDOMHTMLFormElement_SetEnctype(This->nsform, &encoding_str);
 216     nsAString_Finish(&encoding_str);
 217     if(NS_FAILED(nsres))
 218         return E_FAIL;
 219
 220     return S_OK;
 221 }
 222
 223 static HRESULT WINAPI HTMLFormElement_get_encoding(IHTMLFormElement *iface, BSTR *p)
 224 {
 225     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 226     nsAString encoding_str;
 227     nsresult nsres;
 228
 229     TRACE("(%p)->(%p)\n", This, p);
 230
 231     nsAString_Init(&encoding_str, NULL);
 232     nsres = nsIDOMHTMLFormElement_GetEnctype(This->nsform, &encoding_str);
 233     return return_nsstr(nsres, &encoding_str, p);
 234 }
 235
 236 static HRESULT WINAPI HTMLFormElement_put_method(IHTMLFormElement *iface, BSTR v)
 237 {
 238     static const WCHAR postW[] = {'P','O','S','T',0};
 239     static const WCHAR getW[] = {'G','E','T',0};
 240
 241     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 242     nsAString method_str;
 243     nsresult nsres;
 244
 245     TRACE("(%p)->(%s)\n", This, wine_dbgstr_w(v));
 246
 247     if(lstrcmpiW(v, postW) && lstrcmpiW(v, getW)) {
 248         WARN("unrecognized method\n");
 249         return E_INVALIDARG;
 250     }
 251
 252     nsAString_InitDepend(&method_str, v);
 253     nsres = nsIDOMHTMLFormElement_SetMethod(This->nsform, &method_str);
 254     nsAString_Finish(&method_str);
 255     if(NS_FAILED(nsres))
 256         return E_FAIL;
 257
 258     return S_OK;
 259 }
 260
 261 static HRESULT WINAPI HTMLFormElement_get_method(IHTMLFormElement *iface, BSTR *p)
 262 {
 263     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 264     nsAString method_str;
 265     nsresult nsres;
 266
 267     TRACE("(%p)->(%p)\n", This, p);
 268
 269     nsAString_Init(&method_str, NULL);
 270     nsres = nsIDOMHTMLFormElement_GetMethod(This->nsform, &method_str);
 271     return return_nsstr(nsres, &method_str, p);
 272 }
 273
 274 static HRESULT WINAPI HTMLFormElement_get_elements(IHTMLFormElement *iface, IDispatch **p)
 275 {
 276     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 277
 278     TRACE("(%p)->(%p)\n", This, p);
 279
 280     *p = (IDispatch*)&This->IHTMLFormElement_iface;
 281     IDispatch_AddRef(*p);
 282     return S_OK;
 283 }
 284
 285 static HRESULT WINAPI HTMLFormElement_put_target(IHTMLFormElement *iface, BSTR v)
 286 {
 287     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 288     FIXME("(%p)->(%s)\n", This, wine_dbgstr_w(v));
 289     return E_NOTIMPL;
 290 }
 291
 292 static HRESULT WINAPI HTMLFormElement_get_target(IHTMLFormElement *iface, BSTR *p)
 293 {
 294     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 295     FIXME("(%p)->(%p)\n", This, p);
 296     return E_NOTIMPL;
 297 }
 298
 299 static HRESULT WINAPI HTMLFormElement_put_name(IHTMLFormElement *iface, BSTR v)
 300 {
 301     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 302     nsAString name_str;
 303     nsresult nsres;
 304
 305     TRACE("(%p)->(%s)\n", This, wine_dbgstr_w(v));
 306
 307     nsAString_InitDepend(&name_str, v);
 308     nsres = nsIDOMHTMLFormElement_SetName(This->nsform, &name_str);
 309     nsAString_Finish(&name_str);
 310     if(NS_FAILED(nsres))
 311         return E_FAIL;
 312
 313     return S_OK;
 314 }
 315
 316 static HRESULT WINAPI HTMLFormElement_get_name(IHTMLFormElement *iface, BSTR *p)
 317 {
 318     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 319     nsAString name_str;
 320     nsresult nsres;
 321
 322     TRACE("(%p)->(%p)\n", This, p);
 323
 324     nsAString_Init(&name_str, NULL);
 325     nsres = nsIDOMHTMLFormElement_GetName(This->nsform, &name_str);
 326     return return_nsstr(nsres, &name_str, p);
 327 }
 328
 329 static HRESULT WINAPI HTMLFormElement_put_onsubmit(IHTMLFormElement *iface, VARIANT v)
 330 {
 331     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 332
 333     TRACE("(%p)->(%s)\n", This, debugstr_variant(&v));
 334
 335     return set_node_event(&This->element.node, EVENTID_SUBMIT, &v);
 336 }
 337
 338 static HRESULT WINAPI HTMLFormElement_get_onsubmit(IHTMLFormElement *iface, VARIANT *p)
 339 {
 340     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 341
 342     TRACE("(%p)->(%p)\n", This, p);
 343
 344     return get_node_event(&This->element.node, EVENTID_SUBMIT, p);
 345 }
 346
 347 static HRESULT WINAPI HTMLFormElement_put_onreset(IHTMLFormElement *iface, VARIANT v)
 348 {
 349     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 350     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
 351     return E_NOTIMPL;
 352 }
 353
 354 static HRESULT WINAPI HTMLFormElement_get_onreset(IHTMLFormElement *iface, VARIANT *p)
 355 {
 356     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 357     FIXME("(%p)->(%p)\n", This, p);
 358     return E_NOTIMPL;
 359 }
 360
 361 static HRESULT WINAPI HTMLFormElement_submit(IHTMLFormElement *iface)
 362 {
 363     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 364     nsresult nsres;
 365
 366     TRACE("(%p)->()\n", This);
 367
 368     nsres = nsIDOMHTMLFormElement_Submit(This->nsform);
 369     if(NS_FAILED(nsres)) {
 370         ERR("Submit failed: %08x\n", nsres);
 371         return E_FAIL;
 372     }
 373
 374     return S_OK;
 375 }
 376
 377 static HRESULT WINAPI HTMLFormElement_reset(IHTMLFormElement *iface)
 378 {
 379     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 380     FIXME("(%p)->()\n", This);
 381     return E_NOTIMPL;
 382 }
 383
 384 static HRESULT WINAPI HTMLFormElement_put_length(IHTMLFormElement *iface, LONG v)
 385 {
 386     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 387     FIXME("(%p)->(%d)\n", This, v);
 388     return E_NOTIMPL;
 389 }
 390
 391 static HRESULT WINAPI HTMLFormElement_get_length(IHTMLFormElement *iface, LONG *p)
 392 {
 393     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 394     PRInt32 length;
 395     nsresult nsres;
 396
 397     TRACE("(%p)->(%p)\n", This, p);
 398
 399     nsres = nsIDOMHTMLFormElement_GetLength(This->nsform, &length);
 400     if(NS_FAILED(nsres)) {
 401         ERR("GetLength failed: %08x\n", nsres);
 402         return E_FAIL;
 403     }
 404
 405     *p = length;
 406     return S_OK;
 407 }
 408
 409 static HRESULT WINAPI HTMLFormElement__newEnum(IHTMLFormElement *iface, IUnknown **p)
 410 {
 411     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 412     FIXME("(%p)->(%p)\n", This, p);
 413     return E_NOTIMPL;
 414 }
 415
 416 static HRESULT WINAPI HTMLFormElement_item(IHTMLFormElement *iface, VARIANT name,
 417         VARIANT index, IDispatch **pdisp)
 418 {
 419     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 420
 421     TRACE("(%p)->(%s %s %p)\n", This, debugstr_variant(&name), debugstr_variant(&index), pdisp);
 422
 423     if(!pdisp)
 424         return E_INVALIDARG;
 425     *pdisp = NULL;
 426
 427     if(V_VT(&name) == VT_I4) {
 428         if(V_I4(&name) < 0)
 429             return E_INVALIDARG;
 430         return htmlform_item(This, V_I4(&name), pdisp);
 431     }
 432
 433     FIXME("Unsupported args\n");
 434     return E_NOTIMPL;
 435 }
 436
 437 static HRESULT WINAPI HTMLFormElement_tags(IHTMLFormElement *iface, VARIANT tagName,
 438         IDispatch **pdisp)
 439 {
 440     HTMLFormElement *This = impl_from_IHTMLFormElement(iface);
 441     FIXME("(%p)->(v %p)\n", This, pdisp);
 442     return E_NOTIMPL;
 443 }
 444
 445 static const IHTMLFormElementVtbl HTMLFormElementVtbl = {
 446     HTMLFormElement_QueryInterface,
 447     HTMLFormElement_AddRef,
 448     HTMLFormElement_Release,
 449     HTMLFormElement_GetTypeInfoCount,
 450     HTMLFormElement_GetTypeInfo,
 451     HTMLFormElement_GetIDsOfNames,
 452     HTMLFormElement_Invoke,
 453     HTMLFormElement_put_action,
 454     HTMLFormElement_get_action,
 455     HTMLFormElement_put_dir,
 456     HTMLFormElement_get_dir,
 457     HTMLFormElement_put_encoding,
 458     HTMLFormElement_get_encoding,
 459     HTMLFormElement_put_method,
 460     HTMLFormElement_get_method,
 461     HTMLFormElement_get_elements,
 462     HTMLFormElement_put_target,
 463     HTMLFormElement_get_target,
 464     HTMLFormElement_put_name,
 465     HTMLFormElement_get_name,
 466     HTMLFormElement_put_onsubmit,
 467     HTMLFormElement_get_onsubmit,
 468     HTMLFormElement_put_onreset,
 469     HTMLFormElement_get_onreset,
 470     HTMLFormElement_submit,
 471     HTMLFormElement_reset,
 472     HTMLFormElement_put_length,
 473     HTMLFormElement_get_length,
 474     HTMLFormElement__newEnum,
 475     HTMLFormElement_item,
 476     HTMLFormElement_tags
 477 };
 478
 479 static inline HTMLFormElement *impl_from_HTMLDOMNode(HTMLDOMNode *iface)
 480 {
 481     return CONTAINING_RECORD(iface, HTMLFormElement, element.node);
 482 }
 483
 484 static HRESULT HTMLFormElement_QI(HTMLDOMNode *iface, REFIID riid, void **ppv)
 485 {
 486     HTMLFormElement *This = impl_from_HTMLDOMNode(iface);
 487
 488     *ppv = NULL;
 489
 490     if(IsEqualGUID(&IID_IUnknown, riid)) {
 491         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 492         *ppv = &This->IHTMLFormElement_iface;
 493     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
 494         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
 495         *ppv = &This->IHTMLFormElement_iface;
 496     }else if(IsEqualGUID(&IID_IHTMLFormElement, riid)) {
 497         TRACE("(%p)->(IID_IHTMLFormElement %p)\n", This, ppv);
 498         *ppv = &This->IHTMLFormElement_iface;
 499     }
 500
 501     if(*ppv) {
 502         IUnknown_AddRef((IUnknown*)*ppv);
 503         return S_OK;
 504     }
 505
 506     return HTMLElement_QI(&This->element.node, riid, ppv);
 507 }
 508
 509 static void HTMLFormElement_destructor(HTMLDOMNode *iface)
 510 {
 511     HTMLFormElement *This = impl_from_HTMLDOMNode(iface);
 512
 513     if(This->nsform)
 514         nsIDOMHTMLFormElement_Release(This->nsform);
 515
 516     HTMLElement_destructor(&This->element.node);
 517 }
 518
 519 static HRESULT HTMLFormElement_get_dispid(HTMLDOMNode *iface,
 520         BSTR name, DWORD grfdex, DISPID *pid)
 521 {
 522     HTMLFormElement *This = impl_from_HTMLDOMNode(iface);
 523     nsIDOMHTMLCollection *elements;
 524     nsAString nsname, nsstr;
 525     PRUint32 len, i;
 526     nsresult nsres;
 527     HRESULT hres = DISP_E_UNKNOWNNAME;
 528
 529     static const PRUnichar nameW[] = {'n','a','m','e',0};
 530
 531     TRACE("(%p)->(%s %x %p)\n", This, wine_dbgstr_w(name), grfdex, pid);
 532
 533     nsres = nsIDOMHTMLFormElement_GetElements(This->nsform, &elements);
 534     if(NS_FAILED(nsres)) {
 535         FIXME("GetElements failed: 0x%08x\n", nsres);
 536         return E_FAIL;
 537     }
 538
 539     nsres = nsIDOMHTMLCollection_GetLength(elements, &len);
 540     if(NS_FAILED(nsres)) {
 541         FIXME("GetLength failed: 0x%08x\n", nsres);
 542         nsIDOMHTMLCollection_Release(elements);
 543         return E_FAIL;
 544     }
 545
 546     if(len > MSHTML_CUSTOM_DISPID_CNT)
 547         len = MSHTML_CUSTOM_DISPID_CNT;
 548
 549     /* FIXME: Implement in more generic way */
 550     if('0' <= *name && *name <= '9') {
 551         WCHAR *end_ptr;
 552
 553         i = strtoulW(name, &end_ptr, 10);
 554         if(!*end_ptr && i < len) {
 555             *pid = MSHTML_DISPID_CUSTOM_MIN + i;
 556             return S_OK;
 557         }
 558     }
 559
 560     nsAString_InitDepend(&nsname, nameW);
 561     nsAString_Init(&nsstr, NULL);
 562     for(i = 0; i < len; ++i) {
 563         nsIDOMNode *nsitem;
 564         nsIDOMHTMLElement *nshtml_elem;
 565         const PRUnichar *str;
 566
 567         nsres = nsIDOMHTMLCollection_Item(elements, i, &nsitem);
 568         if(NS_FAILED(nsres)) {
 569             FIXME("Item failed: 0x%08x\n", nsres);
 570             hres = E_FAIL;
 571             break;
 572         }
 573
 574         nsres = nsIDOMNode_QueryInterface(nsitem, &IID_nsIDOMHTMLElement, (void**)&nshtml_elem);
 575         nsIDOMNode_Release(nsitem);
 576         if(NS_FAILED(nsres)) {
 577             FIXME("Failed to get nsIDOMHTMLNode interface: 0x%08x\n", nsres);
 578             hres = E_FAIL;
 579             break;
 580         }
 581
 582         /* compare by id attr */
 583         nsres = nsIDOMHTMLElement_GetId(nshtml_elem, &nsstr);
 584         if(NS_FAILED(nsres)) {
 585             FIXME("GetId failed: 0x%08x\n", nsres);
 586             nsIDOMHTMLElement_Release(nshtml_elem);
 587             hres = E_FAIL;
 588             break;
 589         }
 590         nsAString_GetData(&nsstr, &str);
 591         if(!strcmpiW(str, name)) {
 592             nsIDOMHTMLElement_Release(nshtml_elem);
 593             /* FIXME: using index for dispid */
 594             *pid = MSHTML_DISPID_CUSTOM_MIN + i;
 595             hres = S_OK;
 596             break;
 597         }
 598
 599         /* compare by name attr */
 600         nsres = nsIDOMHTMLElement_GetAttribute(nshtml_elem, &nsname, &nsstr);
 601         nsIDOMHTMLElement_Release(nshtml_elem);
 602         nsAString_GetData(&nsstr, &str);
 603         if(!strcmpiW(str, name)) {
 604             /* FIXME: using index for dispid */
 605             *pid = MSHTML_DISPID_CUSTOM_MIN + i;
 606             hres = S_OK;
 607             break;
 608         }
 609     }
 610     nsAString_Finish(&nsname);
 611     nsAString_Finish(&nsstr);
 612
 613     nsIDOMHTMLCollection_Release(elements);
 614
 615     return hres;
 616 }
 617
 618 static HRESULT HTMLFormElement_invoke(HTMLDOMNode *iface,
 619         DISPID id, LCID lcid, WORD flags, DISPPARAMS *params, VARIANT *res,
 620         EXCEPINFO *ei, IServiceProvider *caller)
 621 {
 622     HTMLFormElement *This = impl_from_HTMLDOMNode(iface);
 623     IDispatch *ret;
 624     HRESULT hres;
 625
 626     TRACE("(%p)->(%x %x %x %p %p %p %p)\n", This, id, lcid, flags, params, res, ei, caller);
 627
 628     hres = htmlform_item(This, id - MSHTML_DISPID_CUSTOM_MIN, &ret);
 629     if(FAILED(hres))
 630         return hres;
 631
 632     if(ret) {
 633         V_VT(res) = VT_DISPATCH;
 634         V_DISPATCH(res) = ret;
 635     }else {
 636         V_VT(res) = VT_NULL;
 637     }
 638     return S_OK;
 639 }
 640
 641 static const NodeImplVtbl HTMLFormElementImplVtbl = {
 642     HTMLFormElement_QI,
 643     HTMLFormElement_destructor,
 644     HTMLElement_clone,
 645     HTMLElement_get_attr_col,
 646     NULL,
 647     NULL,
 648     NULL,
 649     NULL,
 650     NULL,
 651     NULL,
 652     NULL,
 653     HTMLFormElement_get_dispid,
 654     HTMLFormElement_invoke
 655 };
 656
 657 static const tid_t HTMLFormElement_iface_tids[] = {
 658     HTMLELEMENT_TIDS,
 659     IHTMLFormElement_tid,
 660     0
 661 };
 662
 663 static dispex_static_data_t HTMLFormElement_dispex = {
 664     NULL,
 665     DispHTMLFormElement_tid,
 666     NULL,
 667     HTMLFormElement_iface_tids
 668 };
 669
 670 HRESULT HTMLFormElement_Create(HTMLDocumentNode *doc, nsIDOMHTMLElement *nselem, HTMLElement **elem)
 671 {
 672     HTMLFormElement *ret;
 673     nsresult nsres;
 674
 675     ret = heap_alloc_zero(sizeof(HTMLFormElement));
 676     if(!ret)
 677         return E_OUTOFMEMORY;
 678
 679     ret->IHTMLFormElement_iface.lpVtbl = &HTMLFormElementVtbl;
 680     ret->element.node.vtbl = &HTMLFormElementImplVtbl;
 681
 682     nsres = nsIDOMHTMLElement_QueryInterface(nselem, &IID_nsIDOMHTMLFormElement, (void**)&ret->nsform);
 683     if(NS_FAILED(nsres)) {
 684         ERR("Could not get nsIDOMHTMLFormElement interface: %08x\n", nsres);
 685         heap_free(ret);
 686         return E_FAIL;
 687     }
 688
 689     HTMLElement_Init(&ret->element, doc, nselem, &HTMLFormElement_dispex);
 690
 691     *elem = &ret->element;
 692     return S_OK;
 693 }