dlls/mshtml/htmldoc3.c

   1 /*
   2  * Copyright 2005 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 "config.h"
  20
  21 #include <stdarg.h>
  22 #include <stdio.h>
  23 #include <assert.h>
  24
  25 #define COBJMACROS
  26
  27 #include "windef.h"
  28 #include "winbase.h"
  29 #include "winuser.h"
  30 #include "ole2.h"
  31
  32 #include "wine/debug.h"
  33
  34 #include "mshtml_private.h"
  35 #include "htmlevent.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  38
  39 HRESULT get_doc_elem_by_id(HTMLDocumentNode *doc, const WCHAR *id, HTMLElement **ret)
  40 {
  41     nsIDOMNodeList *nsnode_list;
  42     nsIDOMElement *nselem;
  43     nsIDOMNode *nsnode;
  44     nsAString id_str;
  45     nsresult nsres;
  46     HRESULT hres;
  47
  48     if(!doc->nsdoc) {
  49         WARN("NULL nsdoc\n");
  50         return E_UNEXPECTED;
  51     }
  52
  53     nsAString_InitDepend(&id_str, id);
  54     /* get element by id attribute */
  55     nsres = nsIDOMHTMLDocument_GetElementById(doc->nsdoc, &id_str, &nselem);
  56     if(FAILED(nsres)) {
  57         ERR("GetElementById failed: %08x\n", nsres);
  58         nsAString_Finish(&id_str);
  59         return E_FAIL;
  60     }
  61
  62     /* get first element by name attribute */
  63     nsres = nsIDOMHTMLDocument_GetElementsByName(doc->nsdoc, &id_str, &nsnode_list);
  64     nsAString_Finish(&id_str);
  65     if(FAILED(nsres)) {
  66         ERR("getElementsByName failed: %08x\n", nsres);
  67         if(nselem)
  68             nsIDOMElement_Release(nselem);
  69         return E_FAIL;
  70     }
  71
  72     nsres = nsIDOMNodeList_Item(nsnode_list, 0, &nsnode);
  73     nsIDOMNodeList_Release(nsnode_list);
  74     assert(nsres == NS_OK);
  75
  76     if(nsnode && nselem) {
  77         UINT16 pos;
  78
  79         nsres = nsIDOMNode_CompareDocumentPosition(nsnode, (nsIDOMNode*)nselem, &pos);
  80         if(NS_FAILED(nsres)) {
  81             FIXME("CompareDocumentPosition failed: 0x%08x\n", nsres);
  82             nsIDOMNode_Release(nsnode);
  83             nsIDOMElement_Release(nselem);
  84             return E_FAIL;
  85         }
  86
  87         TRACE("CompareDocumentPosition gave: 0x%x\n", pos);
  88         if(!(pos & (DOCUMENT_POSITION_PRECEDING | DOCUMENT_POSITION_CONTAINS))) {
  89             nsIDOMElement_Release(nselem);
  90             nselem = NULL;
  91         }
  92     }
  93
  94     if(nsnode) {
  95         if(!nselem) {
  96             nsres = nsIDOMNode_QueryInterface(nsnode, &IID_nsIDOMElement, (void**)&nselem);
  97             assert(nsres == NS_OK);
  98         }
  99         nsIDOMNode_Release(nsnode);
 100     }
 101
 102     if(!nselem) {
 103         *ret = NULL;
 104         return S_OK;
 105     }
 106
 107     hres = get_elem(doc, nselem, ret);
 108     nsIDOMElement_Release(nselem);
 109     return hres;
 110 }
 111
 112 static inline HTMLDocument *impl_from_IHTMLDocument3(IHTMLDocument3 *iface)
 113 {
 114     return CONTAINING_RECORD(iface, HTMLDocument, IHTMLDocument3_iface);
 115 }
 116
 117 static HRESULT WINAPI HTMLDocument3_QueryInterface(IHTMLDocument3 *iface,
 118                                                   REFIID riid, void **ppv)
 119 {
 120     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 121     return htmldoc_query_interface(This, riid, ppv);
 122 }
 123
 124 static ULONG WINAPI HTMLDocument3_AddRef(IHTMLDocument3 *iface)
 125 {
 126     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 127     return htmldoc_addref(This);
 128 }
 129
 130 static ULONG WINAPI HTMLDocument3_Release(IHTMLDocument3 *iface)
 131 {
 132     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 133     return htmldoc_release(This);
 134 }
 135
 136 static HRESULT WINAPI HTMLDocument3_GetTypeInfoCount(IHTMLDocument3 *iface, UINT *pctinfo)
 137 {
 138     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 139     return IDispatchEx_GetTypeInfoCount(&This->IDispatchEx_iface, pctinfo);
 140 }
 141
 142 static HRESULT WINAPI HTMLDocument3_GetTypeInfo(IHTMLDocument3 *iface, UINT iTInfo,
 143                                                 LCID lcid, ITypeInfo **ppTInfo)
 144 {
 145     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 146     return IDispatchEx_GetTypeInfo(&This->IDispatchEx_iface, iTInfo, lcid, ppTInfo);
 147 }
 148
 149 static HRESULT WINAPI HTMLDocument3_GetIDsOfNames(IHTMLDocument3 *iface, REFIID riid,
 150                                                 LPOLESTR *rgszNames, UINT cNames,
 151                                                 LCID lcid, DISPID *rgDispId)
 152 {
 153     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 154     return IDispatchEx_GetIDsOfNames(&This->IDispatchEx_iface, riid, rgszNames, cNames, lcid,
 155             rgDispId);
 156 }
 157
 158 static HRESULT WINAPI HTMLDocument3_Invoke(IHTMLDocument3 *iface, DISPID dispIdMember,
 159                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 160                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 161 {
 162     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 163     return IDispatchEx_Invoke(&This->IDispatchEx_iface, dispIdMember, riid, lcid, wFlags,
 164             pDispParams, pVarResult, pExcepInfo, puArgErr);
 165 }
 166
 167 static HRESULT WINAPI HTMLDocument3_releaseCapture(IHTMLDocument3 *iface)
 168 {
 169     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 170     FIXME("(%p)\n", This);
 171     return E_NOTIMPL;
 172 }
 173
 174 static HRESULT WINAPI HTMLDocument3_recalc(IHTMLDocument3 *iface, VARIANT_BOOL fForce)
 175 {
 176     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 177     FIXME("(%p)->(%x)\n", This, fForce);
 178     return E_NOTIMPL;
 179 }
 180
 181 static HRESULT WINAPI HTMLDocument3_createTextNode(IHTMLDocument3 *iface, BSTR text,
 182                                                    IHTMLDOMNode **newTextNode)
 183 {
 184     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 185     nsIDOMText *nstext;
 186     HTMLDOMNode *node;
 187     nsAString text_str;
 188     nsresult nsres;
 189     HRESULT hres;
 190
 191     TRACE("(%p)->(%s %p)\n", This, debugstr_w(text), newTextNode);
 192
 193     if(!This->doc_node->nsdoc) {
 194         WARN("NULL nsdoc\n");
 195         return E_UNEXPECTED;
 196     }
 197
 198     nsAString_InitDepend(&text_str, text);
 199     nsres = nsIDOMHTMLDocument_CreateTextNode(This->doc_node->nsdoc, &text_str, &nstext);
 200     nsAString_Finish(&text_str);
 201     if(NS_FAILED(nsres)) {
 202         ERR("CreateTextNode failed: %08x\n", nsres);
 203         return E_FAIL;
 204     }
 205
 206     hres = HTMLDOMTextNode_Create(This->doc_node, (nsIDOMNode*)nstext, &node);
 207     nsIDOMText_Release(nstext);
 208     if(FAILED(hres))
 209         return hres;
 210
 211     *newTextNode = &node->IHTMLDOMNode_iface;
 212     return S_OK;
 213 }
 214
 215 static HRESULT WINAPI HTMLDocument3_get_documentElement(IHTMLDocument3 *iface, IHTMLElement **p)
 216 {
 217     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 218     nsIDOMElement *nselem = NULL;
 219     HTMLDOMNode *node;
 220     nsresult nsres;
 221     HRESULT hres;
 222
 223     TRACE("(%p)->(%p)\n", This, p);
 224
 225     if(This->window->readystate == READYSTATE_UNINITIALIZED) {
 226         *p = NULL;
 227         return S_OK;
 228     }
 229
 230     if(!This->doc_node->nsdoc) {
 231         WARN("NULL nsdoc\n");
 232         return E_UNEXPECTED;
 233     }
 234
 235     nsres = nsIDOMHTMLDocument_GetDocumentElement(This->doc_node->nsdoc, &nselem);
 236     if(NS_FAILED(nsres)) {
 237         ERR("GetDocumentElement failed: %08x\n", nsres);
 238         return E_FAIL;
 239     }
 240
 241     if(!nselem) {
 242         *p = NULL;
 243         return S_OK;
 244     }
 245
 246     hres = get_node(This->doc_node, (nsIDOMNode *)nselem, TRUE, &node);
 247     nsIDOMElement_Release(nselem);
 248     if(FAILED(hres))
 249         return hres;
 250
 251     hres = IHTMLDOMNode_QueryInterface(&node->IHTMLDOMNode_iface, &IID_IHTMLElement, (void**)p);
 252     node_release(node);
 253     return hres;
 254 }
 255
 256 static HRESULT WINAPI HTMLDocument3_uniqueID(IHTMLDocument3 *iface, BSTR *p)
 257 {
 258     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 259     FIXME("(%p)->(%p)\n", This, p);
 260     return E_NOTIMPL;
 261 }
 262
 263 static HRESULT WINAPI HTMLDocument3_attachEvent(IHTMLDocument3 *iface, BSTR event,
 264                                                 IDispatch* pDisp, VARIANT_BOOL *pfResult)
 265 {
 266     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 267
 268     TRACE("(%p)->(%s %p %p)\n", This, debugstr_w(event), pDisp, pfResult);
 269
 270     return attach_event(&This->doc_node->node.event_target, This->doc_node->node.nsnode, This, event, pDisp, pfResult);
 271 }
 272
 273 static HRESULT WINAPI HTMLDocument3_detachEvent(IHTMLDocument3 *iface, BSTR event,
 274                                                 IDispatch *pDisp)
 275 {
 276     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 277
 278     TRACE("(%p)->(%s %p)\n", This, debugstr_w(event), pDisp);
 279
 280     return detach_event(This->doc_node->node.event_target, This, event, pDisp);
 281 }
 282
 283 static HRESULT WINAPI HTMLDocument3_put_onrowsdelete(IHTMLDocument3 *iface, VARIANT v)
 284 {
 285     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 286     FIXME("(%p)->()\n", This);
 287     return E_NOTIMPL;
 288 }
 289
 290 static HRESULT WINAPI HTMLDocument3_get_onrowsdelete(IHTMLDocument3 *iface, VARIANT *p)
 291 {
 292     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 293     FIXME("(%p)->(%p)\n", This, p);
 294     return E_NOTIMPL;
 295 }
 296
 297 static HRESULT WINAPI HTMLDocument3_put_onrowsinserted(IHTMLDocument3 *iface, VARIANT v)
 298 {
 299     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 300     FIXME("(%p)->()\n", This);
 301     return E_NOTIMPL;
 302 }
 303
 304 static HRESULT WINAPI HTMLDocument3_get_onrowsinserted(IHTMLDocument3 *iface, VARIANT *p)
 305 {
 306     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 307     FIXME("(%p)->(%p)\n", This, p);
 308     return E_NOTIMPL;
 309 }
 310
 311 static HRESULT WINAPI HTMLDocument3_put_oncellchange(IHTMLDocument3 *iface, VARIANT v)
 312 {
 313     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 314     FIXME("(%p)->()\n", This);
 315     return E_NOTIMPL;
 316 }
 317
 318 static HRESULT WINAPI HTMLDocument3_get_oncellchange(IHTMLDocument3 *iface, VARIANT *p)
 319 {
 320     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 321     FIXME("(%p)->(%p)\n", This, p);
 322     return E_NOTIMPL;
 323 }
 324
 325 static HRESULT WINAPI HTMLDocument3_put_ondatasetchanged(IHTMLDocument3 *iface, VARIANT v)
 326 {
 327     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 328     FIXME("(%p)->()\n", This);
 329     return E_NOTIMPL;
 330 }
 331
 332 static HRESULT WINAPI HTMLDocument3_get_ondatasetchanged(IHTMLDocument3 *iface, VARIANT *p)
 333 {
 334     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 335     FIXME("(%p)->(%p)\n", This, p);
 336     return E_NOTIMPL;
 337 }
 338
 339 static HRESULT WINAPI HTMLDocument3_put_ondataavailable(IHTMLDocument3 *iface, VARIANT v)
 340 {
 341     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 342     FIXME("(%p)->()\n", This);
 343     return E_NOTIMPL;
 344 }
 345
 346 static HRESULT WINAPI HTMLDocument3_get_ondataavailable(IHTMLDocument3 *iface, VARIANT *p)
 347 {
 348     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 349     FIXME("(%p)->(%p)\n", This, p);
 350     return E_NOTIMPL;
 351 }
 352
 353 static HRESULT WINAPI HTMLDocument3_put_ondatasetcomplete(IHTMLDocument3 *iface, VARIANT v)
 354 {
 355     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 356     FIXME("(%p)->()\n", This);
 357     return E_NOTIMPL;
 358 }
 359
 360 static HRESULT WINAPI HTMLDocument3_get_ondatasetcomplete(IHTMLDocument3 *iface, VARIANT *p)
 361 {
 362     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 363     FIXME("(%p)->(%p)\n", This, p);
 364     return E_NOTIMPL;
 365 }
 366
 367 static HRESULT WINAPI HTMLDocument3_put_onpropertychange(IHTMLDocument3 *iface, VARIANT v)
 368 {
 369     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 370     FIXME("(%p)->()\n", This);
 371     return E_NOTIMPL;
 372 }
 373
 374 static HRESULT WINAPI HTMLDocument3_get_onpropertychange(IHTMLDocument3 *iface, VARIANT *p)
 375 {
 376     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 377     FIXME("(%p)->(%p)\n", This, p);
 378     return E_NOTIMPL;
 379 }
 380
 381 static HRESULT WINAPI HTMLDocument3_put_dir(IHTMLDocument3 *iface, BSTR v)
 382 {
 383     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 384     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 385     return E_NOTIMPL;
 386 }
 387
 388 static HRESULT WINAPI HTMLDocument3_get_dir(IHTMLDocument3 *iface, BSTR *p)
 389 {
 390     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 391     FIXME("(%p)->(%p)\n", This, p);
 392     return E_NOTIMPL;
 393 }
 394
 395 static HRESULT WINAPI HTMLDocument3_put_oncontextmenu(IHTMLDocument3 *iface, VARIANT v)
 396 {
 397     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 398
 399     TRACE("(%p)->()\n", This);
 400
 401     return set_doc_event(This, EVENTID_CONTEXTMENU, &v);
 402 }
 403
 404 static HRESULT WINAPI HTMLDocument3_get_oncontextmenu(IHTMLDocument3 *iface, VARIANT *p)
 405 {
 406     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 407
 408     TRACE("(%p)->(%p)\n", This, p);
 409
 410     return get_doc_event(This, EVENTID_CONTEXTMENU, p);
 411 }
 412
 413 static HRESULT WINAPI HTMLDocument3_put_onstop(IHTMLDocument3 *iface, VARIANT v)
 414 {
 415     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 416     FIXME("(%p)->()\n", This);
 417     return E_NOTIMPL;
 418 }
 419
 420 static HRESULT WINAPI HTMLDocument3_get_onstop(IHTMLDocument3 *iface, VARIANT *p)
 421 {
 422     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 423     FIXME("(%p)->(%p)\n", This, p);
 424     return E_NOTIMPL;
 425 }
 426
 427 static HRESULT WINAPI HTMLDocument3_createDocumentFragment(IHTMLDocument3 *iface,
 428                                                            IHTMLDocument2 **ppNewDoc)
 429 {
 430     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 431     nsIDOMDocumentFragment *doc_frag;
 432     HTMLDocumentNode *docnode;
 433     nsresult nsres;
 434     HRESULT hres;
 435
 436     TRACE("(%p)->(%p)\n", This, ppNewDoc);
 437
 438     if(!This->doc_node->nsdoc) {
 439         FIXME("NULL nsdoc\n");
 440         return E_NOTIMPL;
 441     }
 442
 443     nsres = nsIDOMHTMLDocument_CreateDocumentFragment(This->doc_node->nsdoc, &doc_frag);
 444     if(NS_FAILED(nsres)) {
 445         ERR("CreateDocumentFragment failed: %08x\n", nsres);
 446         return E_FAIL;
 447     }
 448
 449     hres = create_document_fragment((nsIDOMNode*)doc_frag, This->doc_node, &docnode);
 450     nsIDOMDocumentFragment_Release(doc_frag);
 451     if(FAILED(hres))
 452         return hres;
 453
 454     *ppNewDoc = &docnode->basedoc.IHTMLDocument2_iface;
 455     return S_OK;
 456 }
 457
 458 static HRESULT WINAPI HTMLDocument3_get_parentDocument(IHTMLDocument3 *iface,
 459                                                        IHTMLDocument2 **p)
 460 {
 461     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 462     FIXME("(%p)->(%p)\n", This, p);
 463     return E_NOTIMPL;
 464 }
 465
 466 static HRESULT WINAPI HTMLDocument3_put_enableDownload(IHTMLDocument3 *iface,
 467                                                        VARIANT_BOOL v)
 468 {
 469     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 470     FIXME("(%p)->(%x)\n", This, v);
 471     return E_NOTIMPL;
 472 }
 473
 474 static HRESULT WINAPI HTMLDocument3_get_enableDownload(IHTMLDocument3 *iface,
 475                                                        VARIANT_BOOL *p)
 476 {
 477     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 478     FIXME("(%p)->(%p)\n", This, p);
 479     return E_NOTIMPL;
 480 }
 481
 482 static HRESULT WINAPI HTMLDocument3_put_baseUrl(IHTMLDocument3 *iface, BSTR v)
 483 {
 484     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 485     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 486     return E_NOTIMPL;
 487 }
 488
 489 static HRESULT WINAPI HTMLDocument3_get_baseUrl(IHTMLDocument3 *iface, BSTR *p)
 490 {
 491     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 492     FIXME("(%p)->(%p)\n", This, p);
 493     return E_NOTIMPL;
 494 }
 495
 496 static HRESULT WINAPI HTMLDocument3_get_childNodes(IHTMLDocument3 *iface, IDispatch **p)
 497 {
 498     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 499
 500     TRACE("(%p)->(%p)\n", This, p);
 501
 502     return IHTMLDOMNode_get_childNodes(&This->doc_node->node.IHTMLDOMNode_iface, p);
 503 }
 504
 505 static HRESULT WINAPI HTMLDocument3_put_inheritStyleSheets(IHTMLDocument3 *iface,
 506                                                            VARIANT_BOOL v)
 507 {
 508     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 509     FIXME("(%p)->()\n", This);
 510     return E_NOTIMPL;
 511 }
 512
 513 static HRESULT WINAPI HTMLDocument3_get_inheritStyleSheets(IHTMLDocument3 *iface,
 514                                                            VARIANT_BOOL *p)
 515 {
 516     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 517     FIXME("(%p)->(%p)\n", This, p);
 518     return E_NOTIMPL;
 519 }
 520
 521 static HRESULT WINAPI HTMLDocument3_put_onbeforeeditfocus(IHTMLDocument3 *iface, VARIANT v)
 522 {
 523     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 524     FIXME("(%p)->()\n", This);
 525     return E_NOTIMPL;
 526 }
 527
 528 static HRESULT WINAPI HTMLDocument3_get_onbeforeeditfocus(IHTMLDocument3 *iface, VARIANT *p)
 529 {
 530     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 531     FIXME("(%p)->(%p)\n", This, p);
 532     return E_NOTIMPL;
 533 }
 534
 535 static HRESULT WINAPI HTMLDocument3_getElementsByName(IHTMLDocument3 *iface, BSTR v,
 536                                                       IHTMLElementCollection **ppelColl)
 537 {
 538     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 539     nsIDOMNodeList *node_list;
 540     nsAString selector_str;
 541     WCHAR *selector;
 542     nsresult nsres;
 543
 544     static const WCHAR formatW[] = {'*','[','i','d','=','%','s',']',',','*','[','n','a','m','e','=','%','s',']',0};
 545
 546     TRACE("(%p)->(%s %p)\n", This, debugstr_w(v), ppelColl);
 547
 548     if(!This->doc_node || !This->doc_node->nsdoc) {
 549         /* We should probably return an empty collection. */
 550         FIXME("No nsdoc\n");
 551         return E_NOTIMPL;
 552     }
 553
 554     selector = heap_alloc(2*SysStringLen(v)*sizeof(WCHAR) + sizeof(formatW));
 555     if(!selector)
 556         return E_OUTOFMEMORY;
 557     sprintfW(selector, formatW, v, v);
 558
 559     /*
 560      * NOTE: IE getElementsByName implementation differs from Gecko. It searches both name and id attributes.
 561      * That's why we use CSS selector instead. We should also use name only when it applies to given element
 562      * types and search should be case insensitive. Those are currently not supported properly.
 563      */
 564     nsAString_InitDepend(&selector_str, selector);
 565     nsres = nsIDOMNodeSelector_QuerySelectorAll(This->doc_node->nsnode_selector, &selector_str, &node_list);
 566     nsAString_Finish(&selector_str);
 567     heap_free(selector);
 568     if(NS_FAILED(nsres)) {
 569         ERR("QuerySelectorAll failed: %08x\n", nsres);
 570         return E_FAIL;
 571     }
 572
 573     *ppelColl = create_collection_from_nodelist(This->doc_node, node_list);
 574     nsIDOMNodeList_Release(node_list);
 575     return S_OK;
 576 }
 577
 578
 579 static HRESULT WINAPI HTMLDocument3_getElementById(IHTMLDocument3 *iface, BSTR v,
 580                                                    IHTMLElement **pel)
 581 {
 582     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 583     HTMLElement *elem;
 584     HRESULT hres;
 585
 586     TRACE("(%p)->(%s %p)\n", This, debugstr_w(v), pel);
 587
 588     hres = get_doc_elem_by_id(This->doc_node, v, &elem);
 589     if(FAILED(hres) || !elem) {
 590         *pel = NULL;
 591         return hres;
 592     }
 593
 594     *pel = &elem->IHTMLElement_iface;
 595     return S_OK;
 596 }
 597
 598
 599 static HRESULT WINAPI HTMLDocument3_getElementsByTagName(IHTMLDocument3 *iface, BSTR v,
 600                                                          IHTMLElementCollection **pelColl)
 601 {
 602     HTMLDocument *This = impl_from_IHTMLDocument3(iface);
 603     nsIDOMNodeList *nslist;
 604     nsAString id_str;
 605     nsresult nsres;
 606
 607     TRACE("(%p)->(%s %p)\n", This, debugstr_w(v), pelColl);
 608
 609     if(!This->doc_node->nsdoc) {
 610         WARN("NULL nsdoc\n");
 611         return E_UNEXPECTED;
 612     }
 613
 614     nsAString_InitDepend(&id_str, v);
 615     nsres = nsIDOMHTMLDocument_GetElementsByTagName(This->doc_node->nsdoc, &id_str, &nslist);
 616     nsAString_Finish(&id_str);
 617     if(FAILED(nsres)) {
 618         ERR("GetElementByName failed: %08x\n", nsres);
 619         return E_FAIL;
 620     }
 621
 622     *pelColl = create_collection_from_nodelist(This->doc_node, nslist);
 623     nsIDOMNodeList_Release(nslist);
 624
 625     return S_OK;
 626 }
 627
 628 static const IHTMLDocument3Vtbl HTMLDocument3Vtbl = {
 629     HTMLDocument3_QueryInterface,
 630     HTMLDocument3_AddRef,
 631     HTMLDocument3_Release,
 632     HTMLDocument3_GetTypeInfoCount,
 633     HTMLDocument3_GetTypeInfo,
 634     HTMLDocument3_GetIDsOfNames,
 635     HTMLDocument3_Invoke,
 636     HTMLDocument3_releaseCapture,
 637     HTMLDocument3_recalc,
 638     HTMLDocument3_createTextNode,
 639     HTMLDocument3_get_documentElement,
 640     HTMLDocument3_uniqueID,
 641     HTMLDocument3_attachEvent,
 642     HTMLDocument3_detachEvent,
 643     HTMLDocument3_put_onrowsdelete,
 644     HTMLDocument3_get_onrowsdelete,
 645     HTMLDocument3_put_onrowsinserted,
 646     HTMLDocument3_get_onrowsinserted,
 647     HTMLDocument3_put_oncellchange,
 648     HTMLDocument3_get_oncellchange,
 649     HTMLDocument3_put_ondatasetchanged,
 650     HTMLDocument3_get_ondatasetchanged,
 651     HTMLDocument3_put_ondataavailable,
 652     HTMLDocument3_get_ondataavailable,
 653     HTMLDocument3_put_ondatasetcomplete,
 654     HTMLDocument3_get_ondatasetcomplete,
 655     HTMLDocument3_put_onpropertychange,
 656     HTMLDocument3_get_onpropertychange,
 657     HTMLDocument3_put_dir,
 658     HTMLDocument3_get_dir,
 659     HTMLDocument3_put_oncontextmenu,
 660     HTMLDocument3_get_oncontextmenu,
 661     HTMLDocument3_put_onstop,
 662     HTMLDocument3_get_onstop,
 663     HTMLDocument3_createDocumentFragment,
 664     HTMLDocument3_get_parentDocument,
 665     HTMLDocument3_put_enableDownload,
 666     HTMLDocument3_get_enableDownload,
 667     HTMLDocument3_put_baseUrl,
 668     HTMLDocument3_get_baseUrl,
 669     HTMLDocument3_get_childNodes,
 670     HTMLDocument3_put_inheritStyleSheets,
 671     HTMLDocument3_get_inheritStyleSheets,
 672     HTMLDocument3_put_onbeforeeditfocus,
 673     HTMLDocument3_get_onbeforeeditfocus,
 674     HTMLDocument3_getElementsByName,
 675     HTMLDocument3_getElementById,
 676     HTMLDocument3_getElementsByTagName
 677 };
 678
 679 static inline HTMLDocument *impl_from_IHTMLDocument4(IHTMLDocument4 *iface)
 680 {
 681     return CONTAINING_RECORD(iface, HTMLDocument, IHTMLDocument4_iface);
 682 }
 683
 684 static HRESULT WINAPI HTMLDocument4_QueryInterface(IHTMLDocument4 *iface,
 685                                                    REFIID riid, void **ppv)
 686 {
 687     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 688     return htmldoc_query_interface(This, riid, ppv);
 689 }
 690
 691 static ULONG WINAPI HTMLDocument4_AddRef(IHTMLDocument4 *iface)
 692 {
 693     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 694     return htmldoc_addref(This);
 695 }
 696
 697 static ULONG WINAPI HTMLDocument4_Release(IHTMLDocument4 *iface)
 698 {
 699     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 700     return htmldoc_release(This);
 701 }
 702
 703 static HRESULT WINAPI HTMLDocument4_GetTypeInfoCount(IHTMLDocument4 *iface, UINT *pctinfo)
 704 {
 705     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 706     return IDispatchEx_GetTypeInfoCount(&This->IDispatchEx_iface, pctinfo);
 707 }
 708
 709 static HRESULT WINAPI HTMLDocument4_GetTypeInfo(IHTMLDocument4 *iface, UINT iTInfo,
 710                                                 LCID lcid, ITypeInfo **ppTInfo)
 711 {
 712     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 713     return IDispatchEx_GetTypeInfo(&This->IDispatchEx_iface, iTInfo, lcid, ppTInfo);
 714 }
 715
 716 static HRESULT WINAPI HTMLDocument4_GetIDsOfNames(IHTMLDocument4 *iface, REFIID riid,
 717                                                 LPOLESTR *rgszNames, UINT cNames,
 718                                                 LCID lcid, DISPID *rgDispId)
 719 {
 720     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 721     return IDispatchEx_GetIDsOfNames(&This->IDispatchEx_iface, riid, rgszNames, cNames, lcid,
 722             rgDispId);
 723 }
 724
 725 static HRESULT WINAPI HTMLDocument4_Invoke(IHTMLDocument4 *iface, DISPID dispIdMember,
 726                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 727                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 728 {
 729     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 730     return IDispatchEx_Invoke(&This->IDispatchEx_iface, dispIdMember, riid, lcid, wFlags,
 731             pDispParams, pVarResult, pExcepInfo, puArgErr);
 732 }
 733
 734 static HRESULT WINAPI HTMLDocument4_focus(IHTMLDocument4 *iface)
 735 {
 736     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 737     nsIDOMHTMLElement *nsbody;
 738     nsresult nsres;
 739
 740     TRACE("(%p)->()\n", This);
 741
 742     nsres = nsIDOMHTMLDocument_GetBody(This->doc_node->nsdoc, &nsbody);
 743     if(NS_FAILED(nsres) || !nsbody) {
 744         ERR("GetBody failed: %08x\n", nsres);
 745         return E_FAIL;
 746     }
 747
 748     nsres = nsIDOMHTMLElement_Focus(nsbody);
 749     nsIDOMHTMLElement_Release(nsbody);
 750     if(NS_FAILED(nsres)) {
 751         ERR("Focus failed: %08x\n", nsres);
 752         return E_FAIL;
 753     }
 754
 755     return S_OK;
 756 }
 757
 758 static HRESULT WINAPI HTMLDocument4_hasFocus(IHTMLDocument4 *iface, VARIANT_BOOL *pfFocus)
 759 {
 760     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 761     FIXME("(%p)->(%p)\n", This, pfFocus);
 762     return E_NOTIMPL;
 763 }
 764
 765 static HRESULT WINAPI HTMLDocument4_put_onselectionchange(IHTMLDocument4 *iface, VARIANT v)
 766 {
 767     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 768     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
 769     return E_NOTIMPL;
 770 }
 771
 772 static HRESULT WINAPI HTMLDocument4_get_onselectionchange(IHTMLDocument4 *iface, VARIANT *p)
 773 {
 774     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 775     FIXME("(%p)->(%p)\n", This, p);
 776     return E_NOTIMPL;
 777 }
 778
 779 static HRESULT WINAPI HTMLDocument4_get_namespace(IHTMLDocument4 *iface, IDispatch **p)
 780 {
 781     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 782     FIXME("(%p)->(%p)\n", This, p);
 783     return E_NOTIMPL;
 784 }
 785
 786 static HRESULT WINAPI HTMLDocument4_createDocumentFromUrl(IHTMLDocument4 *iface, BSTR bstrUrl,
 787         BSTR bstrOptions, IHTMLDocument2 **newDoc)
 788 {
 789     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 790     FIXME("(%p)->(%s %s %p)\n", This, debugstr_w(bstrUrl), debugstr_w(bstrOptions), newDoc);
 791     return E_NOTIMPL;
 792 }
 793
 794 static HRESULT WINAPI HTMLDocument4_put_media(IHTMLDocument4 *iface, BSTR v)
 795 {
 796     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 797     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 798     return E_NOTIMPL;
 799 }
 800
 801 static HRESULT WINAPI HTMLDocument4_get_media(IHTMLDocument4 *iface, BSTR *p)
 802 {
 803     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 804     FIXME("(%p)->(%p)\n", This, p);
 805     return E_NOTIMPL;
 806 }
 807
 808 static HRESULT WINAPI HTMLDocument4_createEventObject(IHTMLDocument4 *iface,
 809         VARIANT *pvarEventObject, IHTMLEventObj **ppEventObj)
 810 {
 811     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 812
 813     TRACE("(%p)->(%s %p)\n", This, debugstr_variant(pvarEventObject), ppEventObj);
 814
 815     if(pvarEventObject && V_VT(pvarEventObject) != VT_ERROR && V_VT(pvarEventObject) != VT_EMPTY) {
 816         FIXME("unsupported pvarEventObject %s\n", debugstr_variant(pvarEventObject));
 817         return E_NOTIMPL;
 818     }
 819
 820     return create_event_obj(ppEventObj);
 821 }
 822
 823 static HRESULT WINAPI HTMLDocument4_fireEvent(IHTMLDocument4 *iface, BSTR bstrEventName,
 824         VARIANT *pvarEventObject, VARIANT_BOOL *pfCanceled)
 825 {
 826     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 827
 828     TRACE("(%p)->(%s %p %p)\n", This, debugstr_w(bstrEventName), pvarEventObject, pfCanceled);
 829
 830     return dispatch_event(&This->doc_node->node, bstrEventName, pvarEventObject, pfCanceled);
 831 }
 832
 833 static HRESULT WINAPI HTMLDocument4_createRenderStyle(IHTMLDocument4 *iface, BSTR v,
 834         IHTMLRenderStyle **ppIHTMLRenderStyle)
 835 {
 836     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 837     FIXME("(%p)->(%s %p)\n", This, debugstr_w(v), ppIHTMLRenderStyle);
 838     return E_NOTIMPL;
 839 }
 840
 841 static HRESULT WINAPI HTMLDocument4_put_oncontrolselect(IHTMLDocument4 *iface, VARIANT v)
 842 {
 843     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 844     FIXME("(%p)->(%s)\n", This, debugstr_variant(&v));
 845     return E_NOTIMPL;
 846 }
 847
 848 static HRESULT WINAPI HTMLDocument4_get_oncontrolselect(IHTMLDocument4 *iface, VARIANT *p)
 849 {
 850     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 851     FIXME("(%p)->(%p)\n", This, p);
 852     return E_NOTIMPL;
 853 }
 854
 855 static HRESULT WINAPI HTMLDocument4_get_URLEncoded(IHTMLDocument4 *iface, BSTR *p)
 856 {
 857     HTMLDocument *This = impl_from_IHTMLDocument4(iface);
 858     FIXME("(%p)->(%p)\n", This, p);
 859     return E_NOTIMPL;
 860 }
 861
 862 static const IHTMLDocument4Vtbl HTMLDocument4Vtbl = {
 863     HTMLDocument4_QueryInterface,
 864     HTMLDocument4_AddRef,
 865     HTMLDocument4_Release,
 866     HTMLDocument4_GetTypeInfoCount,
 867     HTMLDocument4_GetTypeInfo,
 868     HTMLDocument4_GetIDsOfNames,
 869     HTMLDocument4_Invoke,
 870     HTMLDocument4_focus,
 871     HTMLDocument4_hasFocus,
 872     HTMLDocument4_put_onselectionchange,
 873     HTMLDocument4_get_onselectionchange,
 874     HTMLDocument4_get_namespace,
 875     HTMLDocument4_createDocumentFromUrl,
 876     HTMLDocument4_put_media,
 877     HTMLDocument4_get_media,
 878     HTMLDocument4_createEventObject,
 879     HTMLDocument4_fireEvent,
 880     HTMLDocument4_createRenderStyle,
 881     HTMLDocument4_put_oncontrolselect,
 882     HTMLDocument4_get_oncontrolselect,
 883     HTMLDocument4_get_URLEncoded
 884 };
 885
 886 void HTMLDocument_HTMLDocument3_Init(HTMLDocument *This)
 887 {
 888     This->IHTMLDocument3_iface.lpVtbl = &HTMLDocument3Vtbl;
 889     This->IHTMLDocument4_iface.lpVtbl = &HTMLDocument4Vtbl;
 890 }