dlls/mshtml/htmldoc.c

   1 /*
   2  * Copyright 2005 Jacek Caban
   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
  24 #define COBJMACROS
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "winuser.h"
  29 #include "ole2.h"
  30
  31 #include "wine/debug.h"
  32
  33 #include "mshtml_private.h"
  34
  35 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  36
  37 #define HTMLDOC_THIS(iface) DEFINE_THIS(HTMLDocument, HTMLDocument2, iface)
  38
  39 static HRESULT WINAPI HTMLDocument_QueryInterface(IHTMLDocument2 *iface, REFIID riid, void **ppvObject)
  40 {
  41     HTMLDocument *This = HTMLDOC_THIS(iface);
  42
  43     *ppvObject = NULL;
  44     if(IsEqualGUID(&IID_IUnknown, riid)) {
  45         TRACE("(%p)->(IID_IUnknown, %p)\n", This, ppvObject);
  46         *ppvObject = HTMLDOC(This);
  47     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
  48         TRACE("(%p)->(IID_IDispatch, %p)\n", This, ppvObject);
  49         *ppvObject = HTMLDOC(This);
  50     }else if(IsEqualGUID(&IID_IHTMLDocument, riid)) {
  51         TRACE("(%p)->(IID_IHTMLDocument, %p)\n", This, ppvObject);
  52         *ppvObject = HTMLDOC(This);
  53     }else if(IsEqualGUID(&IID_IHTMLDocument2, riid)) {
  54         TRACE("(%p)->(IID_IHTMLDocument2, %p)\n", This, ppvObject);
  55         *ppvObject = HTMLDOC(This);
  56     }else if(IsEqualGUID(&IID_IHTMLDocument3, riid)) {
  57         TRACE("(%p)->(IID_IHTMLDocument3, %p)\n", This, ppvObject);
  58         *ppvObject = HTMLDOC3(This);
  59     }else if(IsEqualGUID(&IID_IPersist, riid)) {
  60         TRACE("(%p)->(IID_IPersist, %p)\n", This, ppvObject);
  61         *ppvObject = PERSIST(This);
  62     }else if(IsEqualGUID(&IID_IPersistMoniker, riid)) {
  63         TRACE("(%p)->(IID_IPersistMoniker, %p)\n", This, ppvObject);
  64         *ppvObject = PERSISTMON(This);
  65     }else if(IsEqualGUID(&IID_IPersistFile, riid)) {
  66         TRACE("(%p)->(IID_IPersistFile, %p)\n", This, ppvObject);
  67         *ppvObject = PERSISTFILE(This);
  68     }else if(IsEqualGUID(&IID_IMonikerProp, riid)) {
  69         TRACE("(%p)->(IID_IMonikerProp, %p)\n", This, ppvObject);
  70         *ppvObject = MONPROP(This);
  71     }else if(IsEqualGUID(&IID_IOleObject, riid)) {
  72         TRACE("(%p)->(IID_IOleObject, %p)\n", This, ppvObject);
  73         *ppvObject = OLEOBJ(This);
  74     }else if(IsEqualGUID(&IID_IOleDocument, riid)) {
  75         TRACE("(%p)->(IID_IOleDocument, %p)\n", This, ppvObject);
  76         *ppvObject = OLEDOC(This);
  77     }else if(IsEqualGUID(&IID_IOleDocumentView, riid)) {
  78         TRACE("(%p)->(IID_IOleDocumentView, %p)\n", This, ppvObject);
  79         *ppvObject = DOCVIEW(This);
  80     }else if(IsEqualGUID(&IID_IOleInPlaceActiveObject, riid)) {
  81         TRACE("(%p)->(IID_IOleInPlaceActiveObject, %p)\n", This, ppvObject);
  82         *ppvObject = ACTOBJ(This);
  83     }else if(IsEqualGUID(&IID_IViewObject, riid)) {
  84         TRACE("(%p)->(IID_IViewObject, %p)\n", This, ppvObject);
  85         *ppvObject = VIEWOBJ(This);
  86     }else if(IsEqualGUID(&IID_IViewObject2, riid)) {
  87         TRACE("(%p)->(IID_IViewObject2, %p)\n", This, ppvObject);
  88         *ppvObject = VIEWOBJ2(This);
  89     }else if(IsEqualGUID(&IID_IOleWindow, riid)) {
  90         TRACE("(%p)->(IID_IOleWindow, %p)\n", This, ppvObject);
  91         *ppvObject = OLEWIN(This);
  92     }else if(IsEqualGUID(&IID_IOleInPlaceObject, riid)) {
  93         TRACE("(%p)->(IID_IOleInPlaceObject, %p)\n", This, ppvObject);
  94         *ppvObject = INPLACEOBJ(This);
  95     }else if(IsEqualGUID(&IID_IOleInPlaceObjectWindowless, riid)) {
  96         TRACE("(%p)->(IID_IOleInPlaceObjectWindowless, %p)\n", This, ppvObject);
  97         *ppvObject = INPLACEWIN(This);
  98     }else if(IsEqualGUID(&IID_IServiceProvider, riid)) {
  99         TRACE("(%p)->(IID_IServiceProvider, %p)\n", This, ppvObject);
 100         *ppvObject = SERVPROV(This);
 101     }else if(IsEqualGUID(&IID_IOleCommandTarget, riid)) {
 102         TRACE("(%p)->(IID_IOleCommandTarget, %p)\n", This, ppvObject);
 103         *ppvObject = CMDTARGET(This);
 104     }else if(IsEqualGUID(&IID_IOleControl, riid)) {
 105         TRACE("(%p)->(IID_IOleControl, %p)\n", This, ppvObject);
 106         *ppvObject = CONTROL(This);
 107     }else if(IsEqualGUID(&IID_IHlinkTarget, riid)) {
 108         TRACE("(%p)->(IID_IHlinkTarget, %p)\n", This, ppvObject);
 109         *ppvObject = HLNKTARGET(This);
 110     }else if(IsEqualGUID(&IID_IConnectionPointContainer, riid)) {
 111         TRACE("(%p)->(IID_IConnectionPointContainer %p)\n", This, ppvObject);
 112         *ppvObject = CONPTCONT(This);
 113     }else if(IsEqualGUID(&IID_IPersistStreamInit, riid)) {
 114         TRACE("(%p)->(IID_IPersistStreamInit %p)\n", This, ppvObject);
 115         *ppvObject = PERSTRINIT(This);
 116     }else if(IsEqualGUID(&CLSID_CMarkup, riid)) {
 117         FIXME("(%p)->(CLSID_CMarkup %p)\n", This, ppvObject);
 118         return E_NOINTERFACE;
 119     }
 120
 121     if(*ppvObject) {
 122         IHTMLDocument2_AddRef(iface);
 123         return S_OK;
 124     }
 125
 126     FIXME("(%p)->(%s %p) interface not supported\n", This, debugstr_guid(riid), ppvObject);
 127     return E_NOINTERFACE;
 128 }
 129
 130 static ULONG WINAPI HTMLDocument_AddRef(IHTMLDocument2 *iface)
 131 {
 132     HTMLDocument *This = HTMLDOC_THIS(iface);
 133     ULONG ref = InterlockedIncrement(&This->ref);
 134     TRACE("(%p) ref = %lu\n", This, ref);
 135     return ref;
 136 }
 137
 138 static ULONG WINAPI HTMLDocument_Release(IHTMLDocument2 *iface)
 139 {
 140     HTMLDocument *This = HTMLDOC_THIS(iface);
 141     ULONG ref = InterlockedDecrement(&This->ref);
 142
 143     TRACE("(%p) ref = %lu\n", This, ref);
 144
 145     if(!ref) {
 146         remove_doc_tasks(This);
 147
 148         if(This->client)
 149             IOleObject_SetClientSite(OLEOBJ(This), NULL);
 150         if(This->in_place_active)
 151             IOleInPlaceObjectWindowless_InPlaceDeactivate(INPLACEWIN(This));
 152         if(This->ipsite)
 153             IOleDocumentView_SetInPlaceSite(DOCVIEW(This), NULL);
 154
 155         set_document_bscallback(This, NULL);
 156
 157         if(This->tooltips_hwnd)
 158             DestroyWindow(This->tooltips_hwnd);
 159         if(This->hwnd)
 160             DestroyWindow(This->hwnd);
 161
 162         release_nodes(This);
 163
 164         HTMLDocument_ConnectionPoints_Destroy(This);
 165
 166         if(This->nscontainer)
 167             NSContainer_Release(This->nscontainer);
 168
 169         mshtml_free(This);
 170
 171         UNLOCK_MODULE();
 172     }
 173
 174     return ref;
 175 }
 176
 177 static HRESULT WINAPI HTMLDocument_GetTypeInfoCount(IHTMLDocument2 *iface, UINT *pctinfo)
 178 {
 179     FIXME("(%p)->(%p)\n", iface, pctinfo);
 180     return E_NOTIMPL;
 181 }
 182
 183 static HRESULT WINAPI HTMLDocument_GetTypeInfo(IHTMLDocument2 *iface, UINT iTInfo,
 184                                                 LCID lcid, ITypeInfo **ppTInfo)
 185 {
 186     FIXME("(%p)->(%u %lu %p)\n", iface, iTInfo, lcid, ppTInfo);
 187     return E_NOTIMPL;
 188 }
 189
 190 static HRESULT WINAPI HTMLDocument_GetIDsOfNames(IHTMLDocument2 *iface, REFIID riid,
 191                                                 LPOLESTR *rgszNames, UINT cNames,
 192                                                 LCID lcid, DISPID *rgDispId)
 193 {
 194     FIXME("(%p)->(%s %p %u %lu %p)\n", iface, debugstr_guid(riid), rgszNames, cNames,
 195                                         lcid, rgDispId);
 196     return E_NOTIMPL;
 197 }
 198
 199 static HRESULT WINAPI HTMLDocument_Invoke(IHTMLDocument2 *iface, DISPID dispIdMember,
 200                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 201                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 202 {
 203     FIXME("(%p)->(%ld %s %ld %d %p %p %p %p)\n", iface, dispIdMember, debugstr_guid(riid),
 204             lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 205     return E_NOTIMPL;
 206 }
 207
 208 static HRESULT WINAPI HTMLDocument_get_Script(IHTMLDocument2 *iface, IDispatch **p)
 209 {
 210     FIXME("(%p)->(%p)\n", iface, p);
 211     return E_NOTIMPL;
 212 }
 213
 214 static HRESULT WINAPI HTMLDocument_get_all(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 215 {
 216     HTMLDocument *This = HTMLDOC_THIS(iface);
 217     IHTMLElement *doc;
 218     IDispatch *disp;
 219     HRESULT hres;
 220
 221     TRACE("(%p)->(%p)\n", This, p);
 222
 223     hres = IHTMLDocument3_get_documentElement(HTMLDOC3(This), &doc);
 224     if(FAILED(hres))
 225         return hres;
 226
 227     hres = IHTMLElement_get_all(doc, &disp);
 228     IHTMLElement_Release(doc);
 229     if(FAILED(hres))
 230         return hres;
 231
 232     hres = IDispatch_QueryInterface(disp, &IID_IHTMLElementCollection, (void**)p);
 233     IDispatch_Release(disp);
 234
 235     return hres;
 236 }
 237
 238 static HRESULT WINAPI HTMLDocument_get_body(IHTMLDocument2 *iface, IHTMLElement **p)
 239 {
 240     HTMLDocument *This = HTMLDOC_THIS(iface);
 241     nsIDOMDocument *nsdoc;
 242     nsIDOMHTMLDocument *nshtmldoc;
 243     nsIDOMHTMLElement *nsbody = NULL;
 244     HTMLDOMNode *node;
 245     nsresult nsres;
 246
 247     TRACE("(%p)->(%p)\n", This, p);
 248
 249     *p = NULL;
 250
 251     if(!This->nscontainer)
 252         return S_OK;
 253
 254     nsres = nsIWebNavigation_GetDocument(This->nscontainer->navigation, &nsdoc);
 255     if(NS_FAILED(nsres)) {
 256         ERR("GetDocument failed: %08lx\n", nsres);
 257         return S_OK;
 258     }
 259
 260     if(NS_FAILED(nsres) || !nsdoc)
 261         return S_OK;
 262
 263     nsIDOMDocument_QueryInterface(nsdoc, &IID_nsIDOMHTMLDocument, (void**)&nshtmldoc);
 264     nsIDOMDocument_Release(nsdoc);
 265
 266     nsres = nsIDOMHTMLDocument_GetBody(nshtmldoc, &nsbody);
 267     nsIDOMHTMLDocument_Release(nshtmldoc);
 268
 269     if(NS_FAILED(nsres) || !nsbody) {
 270         TRACE("Could not get body: %08lx\n", nsres);
 271         return S_OK;
 272     }
 273
 274     node = get_node(This, (nsIDOMNode*)nsbody);
 275     nsIDOMHTMLElement_Release(nsbody);
 276
 277     IHTMLDOMNode_QueryInterface(HTMLDOMNODE(node), &IID_IHTMLElement, (void**)p);
 278
 279     TRACE("*p = %p\n", *p);
 280     return S_OK;
 281 }
 282
 283 static HRESULT WINAPI HTMLDocument_get_activeElement(IHTMLDocument2 *iface, IHTMLElement **p)
 284 {
 285     FIXME("(%p)->(%p)\n", iface, p);
 286     return E_NOTIMPL;
 287 }
 288
 289 static HRESULT WINAPI HTMLDocument_get_images(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 290 {
 291     FIXME("(%p)->(%p)\n", iface, p);
 292     return E_NOTIMPL;
 293 }
 294
 295 static HRESULT WINAPI HTMLDocument_get_applets(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 296 {
 297     FIXME("(%p)->(%p)\n", iface, p);
 298     return E_NOTIMPL;
 299 }
 300
 301 static HRESULT WINAPI HTMLDocument_get_links(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 302 {
 303     FIXME("(%p)->(%p)\n", iface, p);
 304     return E_NOTIMPL;
 305 }
 306
 307 static HRESULT WINAPI HTMLDocument_get_forms(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 308 {
 309     FIXME("(%p)->(%p)\n", iface, p);
 310     return E_NOTIMPL;
 311 }
 312
 313 static HRESULT WINAPI HTMLDocument_get_anchors(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 314 {
 315     FIXME("(%p)->(%p)\n", iface, p);
 316     return E_NOTIMPL;
 317 }
 318
 319 static HRESULT WINAPI HTMLDocument_put_title(IHTMLDocument2 *iface, BSTR v)
 320 {
 321     FIXME("(%p)->(%s)\n", iface, debugstr_w(v));
 322     return E_NOTIMPL;
 323 }
 324
 325 static HRESULT WINAPI HTMLDocument_get_title(IHTMLDocument2 *iface, BSTR *p)
 326 {
 327     FIXME("(%p)->(%p)\n", iface, p);
 328     return E_NOTIMPL;
 329 }
 330
 331 static HRESULT WINAPI HTMLDocument_get_scripts(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 332 {
 333     FIXME("(%p)->(%p)\n", iface, p);
 334     return E_NOTIMPL;
 335 }
 336
 337 static HRESULT WINAPI HTMLDocument_put_designMode(IHTMLDocument2 *iface, BSTR v)
 338 {
 339     FIXME("(%p)->(%s)\n", iface, debugstr_w(v));
 340     return E_NOTIMPL;
 341 }
 342
 343 static HRESULT WINAPI HTMLDocument_get_designMode(IHTMLDocument2 *iface, BSTR *p)
 344 {
 345     FIXME("(%p)->(%p)\n", iface, p);
 346     return E_NOTIMPL;
 347 }
 348
 349 static HRESULT WINAPI HTMLDocument_get_selection(IHTMLDocument2 *iface, IHTMLSelectionObject **p)
 350 {
 351     HTMLDocument *This = HTMLDOC_THIS(iface);
 352     nsISelection *nsselection = NULL;
 353
 354     TRACE("(%p)->(%p)\n", This, p);
 355
 356     if(This->nscontainer) {
 357         nsIDOMWindow *dom_window = NULL;
 358
 359         nsIWebBrowser_GetContentDOMWindow(This->nscontainer->webbrowser, &dom_window);
 360         if(dom_window) {
 361             nsIDOMWindow_GetSelection(dom_window, &nsselection);
 362             nsIDOMWindow_Release(dom_window);
 363         }
 364     }
 365
 366     *p = HTMLSelectionObject_Create(nsselection);
 367     return S_OK;
 368 }
 369
 370 static HRESULT WINAPI HTMLDocument_get_readyState(IHTMLDocument2 *iface, BSTR *p)
 371 {
 372     HTMLDocument *This = HTMLDOC_THIS(iface);
 373
 374     static const WCHAR wszUninitialized[] = {'u','n','i','n','i','t','i','a','l','i','z','e','d',0};
 375     static const WCHAR wszLoading[] = {'l','o','a','d','i','n','g',0};
 376     static const WCHAR wszLoaded[] = {'l','o','a','d','e','d',0};
 377     static const WCHAR wszInteractive[] = {'i','n','t','e','r','a','c','t','i','v','e',0};
 378     static const WCHAR wszComplete[] = {'c','o','m','p','l','e','t','e',0};
 379
 380     static const LPCWSTR readystate_str[] = {
 381         wszUninitialized,
 382         wszLoading,
 383         wszLoaded,
 384         wszInteractive,
 385         wszComplete
 386     };
 387
 388     TRACE("(%p)->(%p)\n", iface, p);
 389
 390     if(!p)
 391         return E_POINTER;
 392
 393     *p = SysAllocString(readystate_str[This->readystate]);
 394     return S_OK;
 395 }
 396
 397 static HRESULT WINAPI HTMLDocument_get_frames(IHTMLDocument2 *iface, IHTMLFramesCollection2 **p)
 398 {
 399     FIXME("(%p)->(%p)\n", iface, p);
 400     return E_NOTIMPL;
 401 }
 402
 403 static HRESULT WINAPI HTMLDocument_get_embeds(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 404 {
 405     FIXME("(%p)->(%p)\n", iface, p);
 406     return E_NOTIMPL;
 407 }
 408
 409 static HRESULT WINAPI HTMLDocument_get_plugins(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 410 {
 411     FIXME("(%p)->(%p)\n", iface, p);
 412     return E_NOTIMPL;
 413 }
 414
 415 static HRESULT WINAPI HTMLDocument_put_alinkColor(IHTMLDocument2 *iface, VARIANT v)
 416 {
 417     FIXME("(%p)\n", iface);
 418     return E_NOTIMPL;
 419 }
 420
 421 static HRESULT WINAPI HTMLDocument_get_alinkColor(IHTMLDocument2 *iface, VARIANT *p)
 422 {
 423     FIXME("(%p)->(%p)\n", iface, p);
 424     return E_NOTIMPL;
 425 }
 426
 427 static HRESULT WINAPI HTMLDocument_put_bgColor(IHTMLDocument2 *iface, VARIANT v)
 428 {
 429     FIXME("(%p)\n", iface);
 430     return E_NOTIMPL;
 431 }
 432
 433 static HRESULT WINAPI HTMLDocument_get_bgColor(IHTMLDocument2 *iface, VARIANT *p)
 434 {
 435     FIXME("(%p)->(%p)\n", iface, p);
 436     return E_NOTIMPL;
 437 }
 438
 439 static HRESULT WINAPI HTMLDocument_put_fgColor(IHTMLDocument2 *iface, VARIANT v)
 440 {
 441     FIXME("(%p)\n", iface);
 442     return E_NOTIMPL;
 443 }
 444
 445 static HRESULT WINAPI HTMLDocument_get_fgColor(IHTMLDocument2 *iface, VARIANT *p)
 446 {
 447     FIXME("(%p)->(%p)\n", iface, p);
 448     return E_NOTIMPL;
 449 }
 450
 451 static HRESULT WINAPI HTMLDocument_put_linkColor(IHTMLDocument2 *iface, VARIANT v)
 452 {
 453     FIXME("(%p)->()\n", iface);
 454     return E_NOTIMPL;
 455 }
 456
 457 static HRESULT WINAPI HTMLDocument_get_linkColor(IHTMLDocument2 *iface, VARIANT *p)
 458 {
 459     FIXME("(%p)->(%p)\n", iface, p);
 460     return E_NOTIMPL;
 461 }
 462
 463 static HRESULT WINAPI HTMLDocument_put_vlinkColor(IHTMLDocument2 *iface, VARIANT v)
 464 {
 465     FIXME("(%p)\n", iface);
 466     return E_NOTIMPL;
 467 }
 468
 469 static HRESULT WINAPI HTMLDocument_get_vlinkColor(IHTMLDocument2 *iface, VARIANT *p)
 470 {
 471     FIXME("(%p)->(%p)\n", iface, p);
 472     return E_NOTIMPL;
 473 }
 474
 475 static HRESULT WINAPI HTMLDocument_get_referrer(IHTMLDocument2 *iface, BSTR *p)
 476 {
 477     FIXME("(%p)->(%p)\n", iface, p);
 478     return E_NOTIMPL;
 479 }
 480
 481 static HRESULT WINAPI HTMLDocument_get_location(IHTMLDocument2 *iface, IHTMLLocation **p)
 482 {
 483     FIXME("(%p)->(%p)\n", iface, p);
 484     return E_NOTIMPL;
 485 }
 486
 487 static HRESULT WINAPI HTMLDocument_get_lastModified(IHTMLDocument2 *iface, BSTR *p)
 488 {
 489     FIXME("(%p)->(%p)\n", iface, p);
 490     return E_NOTIMPL;
 491 }
 492
 493 static HRESULT WINAPI HTMLDocument_put_URL(IHTMLDocument2 *iface, BSTR v)
 494 {
 495     FIXME("(%p)->(%s)\n", iface, debugstr_w(v));
 496     return E_NOTIMPL;
 497 }
 498
 499 static HRESULT WINAPI HTMLDocument_get_URL(IHTMLDocument2 *iface, BSTR *p)
 500 {
 501     FIXME("(%p)->(%p)\n", iface, p);
 502     return E_NOTIMPL;
 503 }
 504
 505 static HRESULT WINAPI HTMLDocument_put_domain(IHTMLDocument2 *iface, BSTR v)
 506 {
 507     FIXME("(%p)->(%s)\n", iface, debugstr_w(v));
 508     return E_NOTIMPL;
 509 }
 510
 511 static HRESULT WINAPI HTMLDocument_get_domain(IHTMLDocument2 *iface, BSTR *p)
 512 {
 513     FIXME("(%p)->(%p)\n", iface, p);
 514     return E_NOTIMPL;
 515 }
 516
 517 static HRESULT WINAPI HTMLDocument_put_cookie(IHTMLDocument2 *iface, BSTR v)
 518 {
 519     FIXME("(%p)->(%s)\n", iface, debugstr_w(v));
 520     return E_NOTIMPL;
 521 }
 522
 523 static HRESULT WINAPI HTMLDocument_get_cookie(IHTMLDocument2 *iface, BSTR *p)
 524 {
 525     FIXME("(%p)->(%p)\n", iface, p);
 526     return E_NOTIMPL;
 527 }
 528
 529 static HRESULT WINAPI HTMLDocument_put_expando(IHTMLDocument2 *iface, VARIANT_BOOL v)
 530 {
 531     FIXME("(%p)->(%x)\n", iface, v);
 532     return E_NOTIMPL;
 533 }
 534
 535 static HRESULT WINAPI HTMLDocument_get_expando(IHTMLDocument2 *iface, VARIANT_BOOL *p)
 536 {
 537     FIXME("(%p)->(%p)\n", iface, p);
 538     return E_NOTIMPL;
 539 }
 540
 541 static HRESULT WINAPI HTMLDocument_put_charset(IHTMLDocument2 *iface, BSTR v)
 542 {
 543     FIXME("(%p)->(%s)\n", iface, debugstr_w(v));
 544     return E_NOTIMPL;
 545 }
 546
 547 static HRESULT WINAPI HTMLDocument_get_charset(IHTMLDocument2 *iface, BSTR *p)
 548 {
 549     FIXME("(%p)->(%p)\n", iface, p);
 550     return E_NOTIMPL;
 551 }
 552
 553 static HRESULT WINAPI HTMLDocument_put_defaultCharset(IHTMLDocument2 *iface, BSTR v)
 554 {
 555     FIXME("(%p)->(%s)\n", iface, debugstr_w(v));
 556     return E_NOTIMPL;
 557 }
 558
 559 static HRESULT WINAPI HTMLDocument_get_defaultCharset(IHTMLDocument2 *iface, BSTR *p)
 560 {
 561     FIXME("(%p)->(%p)\n", iface, p);
 562     return E_NOTIMPL;
 563 }
 564
 565 static HRESULT WINAPI HTMLDocument_get_mimeType(IHTMLDocument2 *iface, BSTR *p)
 566 {
 567     FIXME("(%p)->(%p)\n", iface, p);
 568     return E_NOTIMPL;
 569 }
 570
 571 static HRESULT WINAPI HTMLDocument_get_fileSize(IHTMLDocument2 *iface, BSTR *p)
 572 {
 573     FIXME("(%p)->(%p)\n", iface, p);
 574     return E_NOTIMPL;
 575 }
 576
 577 static HRESULT WINAPI HTMLDocument_get_fileCreatedDate(IHTMLDocument2 *iface, BSTR *p)
 578 {
 579     FIXME("(%p)->(%p)\n", iface, p);
 580     return E_NOTIMPL;
 581 }
 582
 583 static HRESULT WINAPI HTMLDocument_get_fileModifiedDate(IHTMLDocument2 *iface, BSTR *p)
 584 {
 585     FIXME("(%p)->(%p)\n", iface, p);
 586     return E_NOTIMPL;
 587 }
 588
 589 static HRESULT WINAPI HTMLDocument_get_fileUpdatedDate(IHTMLDocument2 *iface, BSTR *p)
 590 {
 591     FIXME("(%p)->(%p)\n", iface, p);
 592     return E_NOTIMPL;
 593 }
 594
 595 static HRESULT WINAPI HTMLDocument_get_security(IHTMLDocument2 *iface, BSTR *p)
 596 {
 597     FIXME("(%p)->(%p)\n", iface, p);
 598     return E_NOTIMPL;
 599 }
 600
 601 static HRESULT WINAPI HTMLDocument_get_protocol(IHTMLDocument2 *iface, BSTR *p)
 602 {
 603     FIXME("(%p)->(%p)\n", iface, p);
 604     return E_NOTIMPL;
 605 }
 606
 607 static HRESULT WINAPI HTMLDocument_get_nameProp(IHTMLDocument2 *iface, BSTR *p)
 608 {
 609     FIXME("(%p)->(%p)\n", iface, p);
 610     return E_NOTIMPL;
 611 }
 612
 613 static HRESULT WINAPI HTMLDocument_write(IHTMLDocument2 *iface, SAFEARRAY *psarray)
 614 {
 615     FIXME("(%p)->(%p)\n", iface, psarray);
 616     return E_NOTIMPL;
 617 }
 618
 619 static HRESULT WINAPI HTMLDocument_writeln(IHTMLDocument2 *iface, SAFEARRAY *psarray)
 620 {
 621     FIXME("(%p)->(%p)\n", iface, psarray);
 622     return E_NOTIMPL;
 623 }
 624
 625 static HRESULT WINAPI HTMLDocument_open(IHTMLDocument2 *iface, BSTR url, VARIANT name,
 626                         VARIANT features, VARIANT replace, IDispatch **pomWindowResult)
 627 {
 628     FIXME("(%p)->(%s %p)\n", iface, debugstr_w(url), pomWindowResult);
 629     return E_NOTIMPL;
 630 }
 631
 632 static HRESULT WINAPI HTMLDocument_close(IHTMLDocument2 *iface)
 633 {
 634     FIXME("(%p)\n", iface);
 635     return E_NOTIMPL;
 636 }
 637
 638 static HRESULT WINAPI HTMLDocument_clear(IHTMLDocument2 *iface)
 639 {
 640     FIXME("(%p)\n", iface);
 641     return E_NOTIMPL;
 642 }
 643
 644 static HRESULT WINAPI HTMLDocument_queryCommandSupported(IHTMLDocument2 *iface, BSTR cmdID,
 645                                                         VARIANT_BOOL *pfRet)
 646 {
 647     FIXME("(%p)->(%s %p)\n", iface, debugstr_w(cmdID), pfRet);
 648     return E_NOTIMPL;
 649 }
 650
 651 static HRESULT WINAPI HTMLDocument_queryCommandEnabled(IHTMLDocument2 *iface, BSTR cmdID,
 652                                                         VARIANT_BOOL *pfRet)
 653 {
 654     FIXME("(%p)->(%s %p)\n", iface, debugstr_w(cmdID), pfRet);
 655     return E_NOTIMPL;
 656 }
 657
 658 static HRESULT WINAPI HTMLDocument_queryCommandState(IHTMLDocument2 *iface, BSTR cmdID,
 659                                                         VARIANT_BOOL *pfRet)
 660 {
 661     FIXME("(%p)->(%s %p)\n", iface, debugstr_w(cmdID), pfRet);
 662     return E_NOTIMPL;
 663 }
 664
 665 static HRESULT WINAPI HTMLDocument_queryCommandIndeterm(IHTMLDocument2 *iface, BSTR cmdID,
 666                                                         VARIANT_BOOL *pfRet)
 667 {
 668     FIXME("(%p)->(%s %p)\n", iface, debugstr_w(cmdID), pfRet);
 669     return E_NOTIMPL;
 670 }
 671
 672 static HRESULT WINAPI HTMLDocument_queryCommandText(IHTMLDocument2 *iface, BSTR cmdID,
 673                                                         BSTR *pfRet)
 674 {
 675     FIXME("(%p)->(%s %p)\n", iface, debugstr_w(cmdID), pfRet);
 676     return E_NOTIMPL;
 677 }
 678
 679 static HRESULT WINAPI HTMLDocument_queryCommandValue(IHTMLDocument2 *iface, BSTR cmdID,
 680                                                         VARIANT *pfRet)
 681 {
 682     FIXME("(%p)->(%s %p)\n", iface, debugstr_w(cmdID), pfRet);
 683     return E_NOTIMPL;
 684 }
 685
 686 static HRESULT WINAPI HTMLDocument_execCommand(IHTMLDocument2 *iface, BSTR cmdID,
 687                                 VARIANT_BOOL showUI, VARIANT value, VARIANT_BOOL *pfRet)
 688 {
 689     FIXME("(%p)->(%s %x %p)\n", iface, debugstr_w(cmdID), showUI, pfRet);
 690     return E_NOTIMPL;
 691 }
 692
 693 static HRESULT WINAPI HTMLDocument_execCommandShowHelp(IHTMLDocument2 *iface, BSTR cmdID,
 694                                                         VARIANT_BOOL *pfRet)
 695 {
 696     FIXME("(%p)->(%s %p)\n", iface, debugstr_w(cmdID), pfRet);
 697     return E_NOTIMPL;
 698 }
 699
 700 static HRESULT WINAPI HTMLDocument_createElement(IHTMLDocument2 *iface, BSTR eTag,
 701                                                     IHTMLElement **newElem)
 702 {
 703     FIXME("(%p)->(%s %p)\n", iface, debugstr_w(eTag), newElem);
 704     return E_NOTIMPL;
 705 }
 706
 707 static HRESULT WINAPI HTMLDocument_put_onhelp(IHTMLDocument2 *iface, VARIANT v)
 708 {
 709     FIXME("(%p)\n", iface);
 710     return E_NOTIMPL;
 711 }
 712
 713 static HRESULT WINAPI HTMLDocument_get_onhelp(IHTMLDocument2 *iface, VARIANT *p)
 714 {
 715     FIXME("(%p)->(%p)\n", iface, p);
 716     return E_NOTIMPL;
 717 }
 718
 719 static HRESULT WINAPI HTMLDocument_put_onclick(IHTMLDocument2 *iface, VARIANT v)
 720 {
 721     FIXME("(%p)\n", iface);
 722     return E_NOTIMPL;
 723 }
 724
 725 static HRESULT WINAPI HTMLDocument_get_onclick(IHTMLDocument2 *iface, VARIANT *p)
 726 {
 727     FIXME("(%p)->(%p)\n", iface, p);
 728     return E_NOTIMPL;
 729 }
 730
 731 static HRESULT WINAPI HTMLDocument_put_ondblclick(IHTMLDocument2 *iface, VARIANT v)
 732 {
 733     FIXME("(%p)\n", iface);
 734     return E_NOTIMPL;
 735 }
 736
 737 static HRESULT WINAPI HTMLDocument_get_ondblclick(IHTMLDocument2 *iface, VARIANT *p)
 738 {
 739     FIXME("(%p)->(%p)\n", iface, p);
 740     return E_NOTIMPL;
 741 }
 742
 743 static HRESULT WINAPI HTMLDocument_put_onkeyup(IHTMLDocument2 *iface, VARIANT v)
 744 {
 745     FIXME("(%p)\n", iface);
 746     return E_NOTIMPL;
 747 }
 748
 749 static HRESULT WINAPI HTMLDocument_get_onkeyup(IHTMLDocument2 *iface, VARIANT *p)
 750 {
 751     FIXME("(%p)->(%p)\n", iface, p);
 752     return E_NOTIMPL;
 753 }
 754
 755 static HRESULT WINAPI HTMLDocument_put_onkeydown(IHTMLDocument2 *iface, VARIANT v)
 756 {
 757     FIXME("(%p)\n", iface);
 758     return E_NOTIMPL;
 759 }
 760
 761 static HRESULT WINAPI HTMLDocument_get_onkeydown(IHTMLDocument2 *iface, VARIANT *p)
 762 {
 763     FIXME("(%p)->(%p)\n", iface, p);
 764     return E_NOTIMPL;
 765 }
 766
 767 static HRESULT WINAPI HTMLDocument_put_onkeypress(IHTMLDocument2 *iface, VARIANT v)
 768 {
 769     FIXME("(%p)\n", iface);
 770     return E_NOTIMPL;
 771 }
 772
 773 static HRESULT WINAPI HTMLDocument_get_onkeypress(IHTMLDocument2 *iface, VARIANT *p)
 774 {
 775     FIXME("(%p)->(%p)\n", iface, p);
 776     return E_NOTIMPL;
 777 }
 778
 779 static HRESULT WINAPI HTMLDocument_put_onmouseup(IHTMLDocument2 *iface, VARIANT v)
 780 {
 781     FIXME("(%p)\n", iface);
 782     return E_NOTIMPL;
 783 }
 784
 785 static HRESULT WINAPI HTMLDocument_get_onmouseup(IHTMLDocument2 *iface, VARIANT *p)
 786 {
 787     FIXME("(%p)->(%p)\n", iface, p);
 788     return E_NOTIMPL;
 789 }
 790
 791 static HRESULT WINAPI HTMLDocument_put_onmousedown(IHTMLDocument2 *iface, VARIANT v)
 792 {
 793     FIXME("(%p)\n", iface);
 794     return E_NOTIMPL;
 795 }
 796
 797 static HRESULT WINAPI HTMLDocument_get_onmousedown(IHTMLDocument2 *iface, VARIANT *p)
 798 {
 799     FIXME("(%p)->(%p)\n", iface, p);
 800     return E_NOTIMPL;
 801 }
 802
 803 static HRESULT WINAPI HTMLDocument_put_onmousemove(IHTMLDocument2 *iface, VARIANT v)
 804 {
 805     FIXME("(%p)\n", iface);
 806     return E_NOTIMPL;
 807 }
 808
 809 static HRESULT WINAPI HTMLDocument_get_onmousemove(IHTMLDocument2 *iface, VARIANT *p)
 810 {
 811     FIXME("(%p)->(%p)\n", iface, p);
 812     return E_NOTIMPL;
 813 }
 814
 815 static HRESULT WINAPI HTMLDocument_put_onmouseout(IHTMLDocument2 *iface, VARIANT v)
 816 {
 817     FIXME("(%p)\n", iface);
 818     return E_NOTIMPL;
 819 }
 820
 821 static HRESULT WINAPI HTMLDocument_get_onmouseout(IHTMLDocument2 *iface, VARIANT *p)
 822 {
 823     FIXME("(%p)->(%p)\n", iface, p);
 824     return E_NOTIMPL;
 825 }
 826
 827 static HRESULT WINAPI HTMLDocument_put_onmouseover(IHTMLDocument2 *iface, VARIANT v)
 828 {
 829     FIXME("(%p)\n", iface);
 830     return E_NOTIMPL;
 831 }
 832
 833 static HRESULT WINAPI HTMLDocument_get_onmouseover(IHTMLDocument2 *iface, VARIANT *p)
 834 {
 835     FIXME("(%p)->(%p)\n", iface, p);
 836     return E_NOTIMPL;
 837 }
 838
 839 static HRESULT WINAPI HTMLDocument_put_onreadystatechange(IHTMLDocument2 *iface, VARIANT v)
 840 {
 841     FIXME("(%p)\n", iface);
 842     return E_NOTIMPL;
 843 }
 844
 845 static HRESULT WINAPI HTMLDocument_get_onreadystatechange(IHTMLDocument2 *iface, VARIANT *p)
 846 {
 847     FIXME("(%p)->(%p)\n", iface, p);
 848     return E_NOTIMPL;
 849 }
 850
 851 static HRESULT WINAPI HTMLDocument_put_onafterupdate(IHTMLDocument2 *iface, VARIANT v)
 852 {
 853     FIXME("(%p)\n", iface);
 854     return E_NOTIMPL;
 855 }
 856
 857 static HRESULT WINAPI HTMLDocument_get_onafterupdate(IHTMLDocument2 *iface, VARIANT *p)
 858 {
 859     FIXME("(%p)->(%p)\n", iface, p);
 860     return E_NOTIMPL;
 861 }
 862
 863 static HRESULT WINAPI HTMLDocument_put_onrowexit(IHTMLDocument2 *iface, VARIANT v)
 864 {
 865     FIXME("(%p)\n", iface);
 866     return E_NOTIMPL;
 867 }
 868
 869 static HRESULT WINAPI HTMLDocument_get_onrowexit(IHTMLDocument2 *iface, VARIANT *p)
 870 {
 871     FIXME("(%p)->(%p)\n", iface, p);
 872     return E_NOTIMPL;
 873 }
 874
 875 static HRESULT WINAPI HTMLDocument_put_onrowenter(IHTMLDocument2 *iface, VARIANT v)
 876 {
 877     FIXME("(%p)\n", iface);
 878     return E_NOTIMPL;
 879 }
 880
 881 static HRESULT WINAPI HTMLDocument_get_onrowenter(IHTMLDocument2 *iface, VARIANT *p)
 882 {
 883     FIXME("(%p)->(%p)\n", iface, p);
 884     return E_NOTIMPL;
 885 }
 886
 887 static HRESULT WINAPI HTMLDocument_put_ondragstart(IHTMLDocument2 *iface, VARIANT v)
 888 {
 889     FIXME("(%p)\n", iface);
 890     return E_NOTIMPL;
 891 }
 892
 893 static HRESULT WINAPI HTMLDocument_get_ondragstart(IHTMLDocument2 *iface, VARIANT *p)
 894 {
 895     FIXME("(%p)->(%p)\n", iface, p);
 896     return E_NOTIMPL;
 897 }
 898
 899 static HRESULT WINAPI HTMLDocument_put_onselectstart(IHTMLDocument2 *iface, VARIANT v)
 900 {
 901     FIXME("(%p)\n", iface);
 902     return E_NOTIMPL;
 903 }
 904
 905 static HRESULT WINAPI HTMLDocument_get_onselectstart(IHTMLDocument2 *iface, VARIANT *p)
 906 {
 907     FIXME("(%p)->(%p)\n", iface, p);
 908     return E_NOTIMPL;
 909 }
 910
 911 static HRESULT WINAPI HTMLDocument_elementFromPoint(IHTMLDocument2 *iface, long x, long y,
 912                                                         IHTMLElement **elementHit)
 913 {
 914     FIXME("(%p)->(%ld %ld %p)\n", iface, x, y, elementHit);
 915     return E_NOTIMPL;
 916 }
 917
 918 static HRESULT WINAPI HTMLDocument_get_parentWindow(IHTMLDocument2 *iface, IHTMLWindow2 **p)
 919 {
 920     FIXME("(%p)->(%p)\n", iface, p);
 921     return E_NOTIMPL;
 922 }
 923
 924 static HRESULT WINAPI HTMLDocument_get_styleSheets(IHTMLDocument2 *iface,
 925                                                     IHTMLStyleSheetsCollection **p)
 926 {
 927     FIXME("(%p)->(%p)\n", iface, p);
 928     return E_NOTIMPL;
 929 }
 930
 931 static HRESULT WINAPI HTMLDocument_put_onbeforeupdate(IHTMLDocument2 *iface, VARIANT v)
 932 {
 933     FIXME("(%p)\n", iface);
 934     return E_NOTIMPL;
 935 }
 936
 937 static HRESULT WINAPI HTMLDocument_get_onbeforeupdate(IHTMLDocument2 *iface, VARIANT *p)
 938 {
 939     FIXME("(%p)->(%p)\n", iface, p);
 940     return E_NOTIMPL;
 941 }
 942
 943 static HRESULT WINAPI HTMLDocument_put_onerrorupdate(IHTMLDocument2 *iface, VARIANT v)
 944 {
 945     FIXME("(%p)\n", iface);
 946     return E_NOTIMPL;
 947 }
 948
 949 static HRESULT WINAPI HTMLDocument_get_onerrorupdate(IHTMLDocument2 *iface, VARIANT *p)
 950 {
 951     FIXME("(%p)->(%p)\n", iface, p);
 952     return E_NOTIMPL;
 953 }
 954
 955 static HRESULT WINAPI HTMLDocument_toString(IHTMLDocument2 *iface, BSTR *String)
 956 {
 957     FIXME("(%p)->(%p)\n", iface, String);
 958     return E_NOTIMPL;
 959 }
 960
 961 static HRESULT WINAPI HTMLDocument_createStyleSheet(IHTMLDocument2 *iface, BSTR bstrHref,
 962                                             long lIndex, IHTMLStyleSheet **ppnewStyleSheet)
 963 {
 964     FIXME("(%p)->(%s %ld %p)\n", iface, debugstr_w(bstrHref), lIndex, ppnewStyleSheet);
 965     return E_NOTIMPL;
 966 }
 967
 968 static const IHTMLDocument2Vtbl HTMLDocumentVtbl = {
 969     HTMLDocument_QueryInterface,
 970     HTMLDocument_AddRef,
 971     HTMLDocument_Release,
 972     HTMLDocument_GetTypeInfoCount,
 973     HTMLDocument_GetTypeInfo,
 974     HTMLDocument_GetIDsOfNames,
 975     HTMLDocument_Invoke,
 976     HTMLDocument_get_Script,
 977     HTMLDocument_get_all,
 978     HTMLDocument_get_body,
 979     HTMLDocument_get_activeElement,
 980     HTMLDocument_get_images,
 981     HTMLDocument_get_applets,
 982     HTMLDocument_get_links,
 983     HTMLDocument_get_forms,
 984     HTMLDocument_get_anchors,
 985     HTMLDocument_put_title,
 986     HTMLDocument_get_title,
 987     HTMLDocument_get_scripts,
 988     HTMLDocument_put_designMode,
 989     HTMLDocument_get_designMode,
 990     HTMLDocument_get_selection,
 991     HTMLDocument_get_readyState,
 992     HTMLDocument_get_frames,
 993     HTMLDocument_get_embeds,
 994     HTMLDocument_get_plugins,
 995     HTMLDocument_put_alinkColor,
 996     HTMLDocument_get_alinkColor,
 997     HTMLDocument_put_bgColor,
 998     HTMLDocument_get_bgColor,
 999     HTMLDocument_put_fgColor,
1000     HTMLDocument_get_fgColor,
1001     HTMLDocument_put_linkColor,
1002     HTMLDocument_get_linkColor,
1003     HTMLDocument_put_vlinkColor,
1004     HTMLDocument_get_vlinkColor,
1005     HTMLDocument_get_referrer,
1006     HTMLDocument_get_location,
1007     HTMLDocument_get_lastModified,
1008     HTMLDocument_put_URL,
1009     HTMLDocument_get_URL,
1010     HTMLDocument_put_domain,
1011     HTMLDocument_get_domain,
1012     HTMLDocument_put_cookie,
1013     HTMLDocument_get_cookie,
1014     HTMLDocument_put_expando,
1015     HTMLDocument_get_expando,
1016     HTMLDocument_put_charset,
1017     HTMLDocument_get_charset,
1018     HTMLDocument_put_defaultCharset,
1019     HTMLDocument_get_defaultCharset,
1020     HTMLDocument_get_mimeType,
1021     HTMLDocument_get_fileSize,
1022     HTMLDocument_get_fileCreatedDate,
1023     HTMLDocument_get_fileModifiedDate,
1024     HTMLDocument_get_fileUpdatedDate,
1025     HTMLDocument_get_security,
1026     HTMLDocument_get_protocol,
1027     HTMLDocument_get_nameProp,
1028     HTMLDocument_write,
1029     HTMLDocument_writeln,
1030     HTMLDocument_open,
1031     HTMLDocument_close,
1032     HTMLDocument_clear,
1033     HTMLDocument_queryCommandSupported,
1034     HTMLDocument_queryCommandEnabled,
1035     HTMLDocument_queryCommandState,
1036     HTMLDocument_queryCommandIndeterm,
1037     HTMLDocument_queryCommandText,
1038     HTMLDocument_queryCommandValue,
1039     HTMLDocument_execCommand,
1040     HTMLDocument_execCommandShowHelp,
1041     HTMLDocument_createElement,
1042     HTMLDocument_put_onhelp,
1043     HTMLDocument_get_onhelp,
1044     HTMLDocument_put_onclick,
1045     HTMLDocument_get_onclick,
1046     HTMLDocument_put_ondblclick,
1047     HTMLDocument_get_ondblclick,
1048     HTMLDocument_put_onkeyup,
1049     HTMLDocument_get_onkeyup,
1050     HTMLDocument_put_onkeydown,
1051     HTMLDocument_get_onkeydown,
1052     HTMLDocument_put_onkeypress,
1053     HTMLDocument_get_onkeypress,
1054     HTMLDocument_put_onmouseup,
1055     HTMLDocument_get_onmouseup,
1056     HTMLDocument_put_onmousedown,
1057     HTMLDocument_get_onmousedown,
1058     HTMLDocument_put_onmousemove,
1059     HTMLDocument_get_onmousemove,
1060     HTMLDocument_put_onmouseout,
1061     HTMLDocument_get_onmouseout,
1062     HTMLDocument_put_onmouseover,
1063     HTMLDocument_get_onmouseover,
1064     HTMLDocument_put_onreadystatechange,
1065     HTMLDocument_get_onreadystatechange,
1066     HTMLDocument_put_onafterupdate,
1067     HTMLDocument_get_onafterupdate,
1068     HTMLDocument_put_onrowexit,
1069     HTMLDocument_get_onrowexit,
1070     HTMLDocument_put_onrowenter,
1071     HTMLDocument_get_onrowenter,
1072     HTMLDocument_put_ondragstart,
1073     HTMLDocument_get_ondragstart,
1074     HTMLDocument_put_onselectstart,
1075     HTMLDocument_get_onselectstart,
1076     HTMLDocument_elementFromPoint,
1077     HTMLDocument_get_parentWindow,
1078     HTMLDocument_get_styleSheets,
1079     HTMLDocument_put_onbeforeupdate,
1080     HTMLDocument_get_onbeforeupdate,
1081     HTMLDocument_put_onerrorupdate,
1082     HTMLDocument_get_onerrorupdate,
1083     HTMLDocument_toString,
1084     HTMLDocument_createStyleSheet
1085 };
1086
1087 HRESULT HTMLDocument_Create(IUnknown *pUnkOuter, REFIID riid, void** ppvObject)
1088 {
1089     HTMLDocument *ret;
1090     HRESULT hres;
1091
1092     TRACE("(%p %s %p)\n", pUnkOuter, debugstr_guid(riid), ppvObject);
1093
1094     ret = mshtml_alloc(sizeof(HTMLDocument));
1095     ret->lpHTMLDocument2Vtbl = &HTMLDocumentVtbl;
1096     ret->ref = 0;
1097     ret->nscontainer = NULL;
1098     ret->nodes = NULL;
1099     ret->readystate = READYSTATE_UNINITIALIZED;
1100
1101     hres = IHTMLDocument_QueryInterface(HTMLDOC(ret), riid, ppvObject);
1102     if(FAILED(hres)) {
1103         mshtml_free(ret);
1104         return hres;
1105     }
1106
1107     LOCK_MODULE();
1108
1109     HTMLDocument_HTMLDocument3_Init(ret);
1110     HTMLDocument_Persist_Init(ret);
1111     HTMLDocument_OleCmd_Init(ret);
1112     HTMLDocument_OleObj_Init(ret);
1113     HTMLDocument_View_Init(ret);
1114     HTMLDocument_Window_Init(ret);
1115     HTMLDocument_Service_Init(ret);
1116     HTMLDocument_Hlink_Init(ret);
1117     HTMLDocument_ConnectionPoints_Init(ret);
1118
1119     ret->nscontainer = NSContainer_Create(ret, NULL);
1120
1121     get_thread_hwnd();
1122
1123     return hres;
1124 }