git.oblomov.eu Git - wine/blob - 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 = DISPATCHEX(This);
  50     }else if(IsEqualGUID(&IID_IDispatchEx, riid)) {
  51         TRACE("(%p)->(IID_IDispatchEx, %p)\n", This, ppvObject);
  52         *ppvObject = DISPATCHEX(This);
  53     }else if(IsEqualGUID(&IID_IHTMLDocument, riid)) {
  54         TRACE("(%p)->(IID_IHTMLDocument, %p)\n", This, ppvObject);
  55         *ppvObject = HTMLDOC(This);
  56     }else if(IsEqualGUID(&IID_IHTMLDocument2, riid)) {
  57         TRACE("(%p)->(IID_IHTMLDocument2, %p)\n", This, ppvObject);
  58         *ppvObject = HTMLDOC(This);
  59     }else if(IsEqualGUID(&IID_IHTMLDocument3, riid)) {
  60         TRACE("(%p)->(IID_IHTMLDocument3, %p)\n", This, ppvObject);
  61         *ppvObject = HTMLDOC3(This);
  62     }else if(IsEqualGUID(&IID_IHTMLDocument4, riid)) {
  63         TRACE("(%p)->(IID_IHTMLDocument4, %p)\n", This, ppvObject);
  64         *ppvObject = HTMLDOC4(This);
  65     }else if(IsEqualGUID(&IID_IHTMLDocument5, riid)) {
  66         TRACE("(%p)->(IID_IHTMLDocument5, %p)\n", This, ppvObject);
  67         *ppvObject = HTMLDOC5(This);
  68     }else if(IsEqualGUID(&IID_IPersist, riid)) {
  69         TRACE("(%p)->(IID_IPersist, %p)\n", This, ppvObject);
  70         *ppvObject = PERSIST(This);
  71     }else if(IsEqualGUID(&IID_IPersistMoniker, riid)) {
  72         TRACE("(%p)->(IID_IPersistMoniker, %p)\n", This, ppvObject);
  73         *ppvObject = PERSISTMON(This);
  74     }else if(IsEqualGUID(&IID_IPersistFile, riid)) {
  75         TRACE("(%p)->(IID_IPersistFile, %p)\n", This, ppvObject);
  76         *ppvObject = PERSISTFILE(This);
  77     }else if(IsEqualGUID(&IID_IMonikerProp, riid)) {
  78         TRACE("(%p)->(IID_IMonikerProp, %p)\n", This, ppvObject);
  79         *ppvObject = MONPROP(This);
  80     }else if(IsEqualGUID(&IID_IOleObject, riid)) {
  81         TRACE("(%p)->(IID_IOleObject, %p)\n", This, ppvObject);
  82         *ppvObject = OLEOBJ(This);
  83     }else if(IsEqualGUID(&IID_IOleDocument, riid)) {
  84         TRACE("(%p)->(IID_IOleDocument, %p)\n", This, ppvObject);
  85         *ppvObject = OLEDOC(This);
  86     }else if(IsEqualGUID(&IID_IOleDocumentView, riid)) {
  87         TRACE("(%p)->(IID_IOleDocumentView, %p)\n", This, ppvObject);
  88         *ppvObject = DOCVIEW(This);
  89     }else if(IsEqualGUID(&IID_IOleInPlaceActiveObject, riid)) {
  90         TRACE("(%p)->(IID_IOleInPlaceActiveObject, %p)\n", This, ppvObject);
  91         *ppvObject = ACTOBJ(This);
  92     }else if(IsEqualGUID(&IID_IViewObject, riid)) {
  93         TRACE("(%p)->(IID_IViewObject, %p)\n", This, ppvObject);
  94         *ppvObject = VIEWOBJ(This);
  95     }else if(IsEqualGUID(&IID_IViewObject2, riid)) {
  96         TRACE("(%p)->(IID_IViewObject2, %p)\n", This, ppvObject);
  97         *ppvObject = VIEWOBJ2(This);
  98     }else if(IsEqualGUID(&IID_IOleWindow, riid)) {
  99         TRACE("(%p)->(IID_IOleWindow, %p)\n", This, ppvObject);
 100         *ppvObject = OLEWIN(This);
 101     }else if(IsEqualGUID(&IID_IOleInPlaceObject, riid)) {
 102         TRACE("(%p)->(IID_IOleInPlaceObject, %p)\n", This, ppvObject);
 103         *ppvObject = INPLACEOBJ(This);
 104     }else if(IsEqualGUID(&IID_IOleInPlaceObjectWindowless, riid)) {
 105         TRACE("(%p)->(IID_IOleInPlaceObjectWindowless, %p)\n", This, ppvObject);
 106         *ppvObject = INPLACEWIN(This);
 107     }else if(IsEqualGUID(&IID_IServiceProvider, riid)) {
 108         TRACE("(%p)->(IID_IServiceProvider, %p)\n", This, ppvObject);
 109         *ppvObject = SERVPROV(This);
 110     }else if(IsEqualGUID(&IID_IOleCommandTarget, riid)) {
 111         TRACE("(%p)->(IID_IOleCommandTarget, %p)\n", This, ppvObject);
 112         *ppvObject = CMDTARGET(This);
 113     }else if(IsEqualGUID(&IID_IOleControl, riid)) {
 114         TRACE("(%p)->(IID_IOleControl, %p)\n", This, ppvObject);
 115         *ppvObject = CONTROL(This);
 116     }else if(IsEqualGUID(&IID_IHlinkTarget, riid)) {
 117         TRACE("(%p)->(IID_IHlinkTarget, %p)\n", This, ppvObject);
 118         *ppvObject = HLNKTARGET(This);
 119     }else if(IsEqualGUID(&IID_IConnectionPointContainer, riid)) {
 120         TRACE("(%p)->(IID_IConnectionPointContainer %p)\n", This, ppvObject);
 121         *ppvObject = CONPTCONT(&This->cp_container);
 122     }else if(IsEqualGUID(&IID_IPersistStreamInit, riid)) {
 123         TRACE("(%p)->(IID_IPersistStreamInit %p)\n", This, ppvObject);
 124         *ppvObject = PERSTRINIT(This);
 125     }else if(IsEqualGUID(&IID_ICustomDoc, riid)) {
 126         TRACE("(%p)->(IID_ICustomDoc %p)\n", This, ppvObject);
 127         *ppvObject = CUSTOMDOC(This);
 128     }else if(IsEqualGUID(&DIID_DispHTMLDocument, riid)) {
 129         TRACE("(%p)->(DIID_DispHTMLDocument %p)\n", This, ppvObject);
 130         *ppvObject = HTMLDOC(This);
 131     }else if(IsEqualGUID(&CLSID_CMarkup, riid)) {
 132         FIXME("(%p)->(CLSID_CMarkup %p)\n", This, ppvObject);
 133         return E_NOINTERFACE;
 134     }else if(IsEqualGUID(&IID_IRunnableObject, riid)) {
 135         TRACE("(%p)->(IID_IRunnableObject %p) returning NULL\n", This, ppvObject);
 136         return E_NOINTERFACE;
 137     }else if(IsEqualGUID(&IID_IPersistPropertyBag, riid)) {
 138         TRACE("(%p)->(IID_IPersistPropertyBag %p) returning NULL\n", This, ppvObject);
 139         return E_NOINTERFACE;
 140     }else if(dispex_query_interface(&This->dispex, riid, ppvObject)) {
 141         return *ppvObject ? S_OK : E_NOINTERFACE;
 142     }
 143
 144     if(*ppvObject) {
 145         IHTMLDocument2_AddRef(iface);
 146         return S_OK;
 147     }
 148
 149     FIXME("(%p)->(%s %p) interface not supported\n", This, debugstr_guid(riid), ppvObject);
 150     return E_NOINTERFACE;
 151 }
 152
 153 static ULONG WINAPI HTMLDocument_AddRef(IHTMLDocument2 *iface)
 154 {
 155     HTMLDocument *This = HTMLDOC_THIS(iface);
 156     ULONG ref = InterlockedIncrement(&This->ref);
 157     TRACE("(%p) ref = %u\n", This, ref);
 158     return ref;
 159 }
 160
 161 static ULONG WINAPI HTMLDocument_Release(IHTMLDocument2 *iface)
 162 {
 163     HTMLDocument *This = HTMLDOC_THIS(iface);
 164     ULONG ref = InterlockedDecrement(&This->ref);
 165
 166     TRACE("(%p) ref = %u\n", This, ref);
 167
 168     if(!ref) {
 169         remove_doc_tasks(This);
 170         release_script_hosts(This);
 171
 172         if(This->client)
 173             IOleObject_SetClientSite(OLEOBJ(This), NULL);
 174         if(This->in_place_active)
 175             IOleInPlaceObjectWindowless_InPlaceDeactivate(INPLACEWIN(This));
 176         if(This->ipsite)
 177             IOleDocumentView_SetInPlaceSite(DOCVIEW(This), NULL);
 178         if(This->undomgr)
 179             IOleUndoManager_Release(This->undomgr);
 180
 181         set_document_bscallback(This, NULL);
 182         set_current_mon(This, NULL);
 183
 184         if(This->tooltips_hwnd)
 185             DestroyWindow(This->tooltips_hwnd);
 186         if(This->hwnd)
 187             DestroyWindow(This->hwnd);
 188
 189         if(This->option_factory) {
 190             This->option_factory->doc = NULL;
 191             IHTMLOptionElementFactory_Release(HTMLOPTFACTORY(This->option_factory));
 192         }
 193
 194         if(This->location)
 195             This->location->doc = NULL;
 196
 197         if(This->window)
 198             IHTMLWindow2_Release(HTMLWINDOW2(This->window));
 199
 200         heap_free(This->mime);
 201         detach_selection(This);
 202         detach_ranges(This);
 203         release_nodes(This);
 204
 205         ConnectionPointContainer_Destroy(&This->cp_container);
 206
 207         if(This->nsdoc)
 208             nsIDOMHTMLDocument_Release(This->nsdoc);
 209         if(This->nscontainer)
 210             NSContainer_Release(This->nscontainer);
 211
 212         heap_free(This);
 213
 214         UNLOCK_MODULE();
 215     }
 216
 217     return ref;
 218 }
 219
 220 static HRESULT WINAPI HTMLDocument_GetTypeInfoCount(IHTMLDocument2 *iface, UINT *pctinfo)
 221 {
 222     HTMLDocument *This = HTMLDOC_THIS(iface);
 223
 224     return IDispatchEx_GetTypeInfoCount(DISPATCHEX(This), pctinfo);
 225 }
 226
 227 static HRESULT WINAPI HTMLDocument_GetTypeInfo(IHTMLDocument2 *iface, UINT iTInfo,
 228                                                 LCID lcid, ITypeInfo **ppTInfo)
 229 {
 230     HTMLDocument *This = HTMLDOC_THIS(iface);
 231
 232     return IDispatchEx_GetTypeInfo(DISPATCHEX(This), iTInfo, lcid, ppTInfo);
 233 }
 234
 235 static HRESULT WINAPI HTMLDocument_GetIDsOfNames(IHTMLDocument2 *iface, REFIID riid,
 236                                                 LPOLESTR *rgszNames, UINT cNames,
 237                                                 LCID lcid, DISPID *rgDispId)
 238 {
 239     HTMLDocument *This = HTMLDOC_THIS(iface);
 240
 241     return IDispatchEx_GetIDsOfNames(DISPATCHEX(This), riid, rgszNames, cNames, lcid, rgDispId);
 242 }
 243
 244 static HRESULT WINAPI HTMLDocument_Invoke(IHTMLDocument2 *iface, DISPID dispIdMember,
 245                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 246                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 247 {
 248     HTMLDocument *This = HTMLDOC_THIS(iface);
 249
 250     return IDispatchEx_Invoke(DISPATCHEX(This), dispIdMember, riid, lcid, wFlags, pDispParams,
 251             pVarResult, pExcepInfo, puArgErr);
 252 }
 253
 254 static HRESULT WINAPI HTMLDocument_get_Script(IHTMLDocument2 *iface, IDispatch **p)
 255 {
 256     HTMLDocument *This = HTMLDOC_THIS(iface);
 257
 258     TRACE("(%p)->(%p)\n", This, p);
 259
 260     *p = (IDispatch*)HTMLWINDOW2(This->window);
 261     IDispatch_AddRef(*p);
 262     return S_OK;
 263 }
 264
 265 static HRESULT WINAPI HTMLDocument_get_all(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 266 {
 267     HTMLDocument *This = HTMLDOC_THIS(iface);
 268     nsIDOMElement *nselem = NULL;
 269     nsresult nsres;
 270
 271     TRACE("(%p)->(%p)\n", This, p);
 272
 273     if(!This->nsdoc) {
 274         WARN("NULL nsdoc\n");
 275         return E_UNEXPECTED;
 276     }
 277
 278     nsres = nsIDOMHTMLDocument_GetDocumentElement(This->nsdoc, &nselem);
 279     if(NS_FAILED(nsres)) {
 280         ERR("GetDocumentElement failed: %08x\n", nsres);
 281         return E_FAIL;
 282     }
 283
 284     if(nselem) {
 285         *p = create_all_collection(get_node(This, (nsIDOMNode*)nselem, TRUE), TRUE);
 286         nsIDOMElement_Release(nselem);
 287     }else {
 288         *p = NULL;
 289     }
 290
 291     return S_OK;
 292 }
 293
 294 static HRESULT WINAPI HTMLDocument_get_body(IHTMLDocument2 *iface, IHTMLElement **p)
 295 {
 296     HTMLDocument *This = HTMLDOC_THIS(iface);
 297     nsIDOMHTMLElement *nsbody = NULL;
 298     HTMLDOMNode *node;
 299     nsresult nsres;
 300
 301     TRACE("(%p)->(%p)\n", This, p);
 302
 303     if(!This->nsdoc) {
 304         WARN("NULL nsdoc\n");
 305         return E_UNEXPECTED;
 306     }
 307
 308     nsres = nsIDOMHTMLDocument_GetBody(This->nsdoc, &nsbody);
 309     if(NS_FAILED(nsres)) {
 310         TRACE("Could not get body: %08x\n", nsres);
 311         return E_UNEXPECTED;
 312     }
 313
 314     if(nsbody) {
 315         node = get_node(This, (nsIDOMNode*)nsbody, TRUE);
 316         nsIDOMHTMLElement_Release(nsbody);
 317
 318         IHTMLDOMNode_QueryInterface(HTMLDOMNODE(node), &IID_IHTMLElement, (void**)p);
 319     }else {
 320         *p = NULL;
 321     }
 322
 323     TRACE("*p = %p\n", *p);
 324     return S_OK;
 325 }
 326
 327 static HRESULT WINAPI HTMLDocument_get_activeElement(IHTMLDocument2 *iface, IHTMLElement **p)
 328 {
 329     HTMLDocument *This = HTMLDOC_THIS(iface);
 330     FIXME("(%p)->(%p)\n", This, p);
 331     return E_NOTIMPL;
 332 }
 333
 334 static HRESULT WINAPI HTMLDocument_get_images(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 335 {
 336     HTMLDocument *This = HTMLDOC_THIS(iface);
 337     FIXME("(%p)->(%p)\n", This, p);
 338     return E_NOTIMPL;
 339 }
 340
 341 static HRESULT WINAPI HTMLDocument_get_applets(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 342 {
 343     HTMLDocument *This = HTMLDOC_THIS(iface);
 344     FIXME("(%p)->(%p)\n", This, p);
 345     return E_NOTIMPL;
 346 }
 347
 348 static HRESULT WINAPI HTMLDocument_get_links(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 349 {
 350     HTMLDocument *This = HTMLDOC_THIS(iface);
 351     FIXME("(%p)->(%p)\n", This, p);
 352     return E_NOTIMPL;
 353 }
 354
 355 static HRESULT WINAPI HTMLDocument_get_forms(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 356 {
 357     HTMLDocument *This = HTMLDOC_THIS(iface);
 358     FIXME("(%p)->(%p)\n", This, p);
 359     return E_NOTIMPL;
 360 }
 361
 362 static HRESULT WINAPI HTMLDocument_get_anchors(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 363 {
 364     HTMLDocument *This = HTMLDOC_THIS(iface);
 365     FIXME("(%p)->(%p)\n", This, p);
 366     return E_NOTIMPL;
 367 }
 368
 369 static HRESULT WINAPI HTMLDocument_put_title(IHTMLDocument2 *iface, BSTR v)
 370 {
 371     HTMLDocument *This = HTMLDOC_THIS(iface);
 372     nsAString nsstr;
 373     nsresult nsres;
 374
 375     TRACE("(%p)->(%s)\n", This, debugstr_w(v));
 376
 377     if(!This->nsdoc) {
 378         WARN("NULL nsdoc\n");
 379         return E_UNEXPECTED;
 380     }
 381
 382     nsAString_Init(&nsstr, v);
 383     nsres = nsIDOMHTMLDocument_SetTitle(This->nsdoc, &nsstr);
 384     nsAString_Finish(&nsstr);
 385     if(NS_FAILED(nsres))
 386         ERR("SetTitle failed: %08x\n", nsres);
 387
 388     return S_OK;
 389 }
 390
 391 static HRESULT WINAPI HTMLDocument_get_title(IHTMLDocument2 *iface, BSTR *p)
 392 {
 393     HTMLDocument *This = HTMLDOC_THIS(iface);
 394     const PRUnichar *ret;
 395     nsAString nsstr;
 396     nsresult nsres;
 397
 398     TRACE("(%p)->(%p)\n", This, p);
 399
 400     if(!This->nsdoc) {
 401         WARN("NULL nsdoc\n");
 402         return E_UNEXPECTED;
 403     }
 404
 405
 406     nsAString_Init(&nsstr, NULL);
 407     nsres = nsIDOMHTMLDocument_GetTitle(This->nsdoc, &nsstr);
 408     if (NS_SUCCEEDED(nsres)) {
 409         nsAString_GetData(&nsstr, &ret);
 410         *p = SysAllocString(ret);
 411     }
 412     nsAString_Finish(&nsstr);
 413
 414     if(NS_FAILED(nsres)) {
 415         ERR("GetTitle failed: %08x\n", nsres);
 416         return E_FAIL;
 417     }
 418
 419     return S_OK;
 420 }
 421
 422 static HRESULT WINAPI HTMLDocument_get_scripts(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 423 {
 424     HTMLDocument *This = HTMLDOC_THIS(iface);
 425     FIXME("(%p)->(%p)\n", This, p);
 426     return E_NOTIMPL;
 427 }
 428
 429 static HRESULT WINAPI HTMLDocument_put_designMode(IHTMLDocument2 *iface, BSTR v)
 430 {
 431     HTMLDocument *This = HTMLDOC_THIS(iface);
 432     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 433     return E_NOTIMPL;
 434 }
 435
 436 static HRESULT WINAPI HTMLDocument_get_designMode(IHTMLDocument2 *iface, BSTR *p)
 437 {
 438     HTMLDocument *This = HTMLDOC_THIS(iface);
 439     FIXME("(%p)->(%p)\n", This, p);
 440     return E_NOTIMPL;
 441 }
 442
 443 static HRESULT WINAPI HTMLDocument_get_selection(IHTMLDocument2 *iface, IHTMLSelectionObject **p)
 444 {
 445     HTMLDocument *This = HTMLDOC_THIS(iface);
 446     nsISelection *nsselection = NULL;
 447
 448     TRACE("(%p)->(%p)\n", This, p);
 449
 450     if(This->nscontainer) {
 451         nsIDOMWindow *dom_window = NULL;
 452
 453         nsIWebBrowser_GetContentDOMWindow(This->nscontainer->webbrowser, &dom_window);
 454         if(dom_window) {
 455             nsIDOMWindow_GetSelection(dom_window, &nsselection);
 456             nsIDOMWindow_Release(dom_window);
 457         }
 458     }
 459
 460     *p = HTMLSelectionObject_Create(This, nsselection);
 461     return S_OK;
 462 }
 463
 464 static HRESULT WINAPI HTMLDocument_get_readyState(IHTMLDocument2 *iface, BSTR *p)
 465 {
 466     HTMLDocument *This = HTMLDOC_THIS(iface);
 467
 468     static const WCHAR wszUninitialized[] = {'u','n','i','n','i','t','i','a','l','i','z','e','d',0};
 469     static const WCHAR wszLoading[] = {'l','o','a','d','i','n','g',0};
 470     static const WCHAR wszLoaded[] = {'l','o','a','d','e','d',0};
 471     static const WCHAR wszInteractive[] = {'i','n','t','e','r','a','c','t','i','v','e',0};
 472     static const WCHAR wszComplete[] = {'c','o','m','p','l','e','t','e',0};
 473
 474     static const LPCWSTR readystate_str[] = {
 475         wszUninitialized,
 476         wszLoading,
 477         wszLoaded,
 478         wszInteractive,
 479         wszComplete
 480     };
 481
 482     TRACE("(%p)->(%p)\n", iface, p);
 483
 484     if(!p)
 485         return E_POINTER;
 486
 487     *p = SysAllocString(readystate_str[This->readystate]);
 488     return S_OK;
 489 }
 490
 491 static HRESULT WINAPI HTMLDocument_get_frames(IHTMLDocument2 *iface, IHTMLFramesCollection2 **p)
 492 {
 493     HTMLDocument *This = HTMLDOC_THIS(iface);
 494     FIXME("(%p)->(%p)\n", This, p);
 495     return E_NOTIMPL;
 496 }
 497
 498 static HRESULT WINAPI HTMLDocument_get_embeds(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 499 {
 500     HTMLDocument *This = HTMLDOC_THIS(iface);
 501     FIXME("(%p)->(%p)\n", This, p);
 502     return E_NOTIMPL;
 503 }
 504
 505 static HRESULT WINAPI HTMLDocument_get_plugins(IHTMLDocument2 *iface, IHTMLElementCollection **p)
 506 {
 507     HTMLDocument *This = HTMLDOC_THIS(iface);
 508     FIXME("(%p)->(%p)\n", This, p);
 509     return E_NOTIMPL;
 510 }
 511
 512 static HRESULT WINAPI HTMLDocument_put_alinkColor(IHTMLDocument2 *iface, VARIANT v)
 513 {
 514     HTMLDocument *This = HTMLDOC_THIS(iface);
 515     FIXME("(%p)\n", This);
 516     return E_NOTIMPL;
 517 }
 518
 519 static HRESULT WINAPI HTMLDocument_get_alinkColor(IHTMLDocument2 *iface, VARIANT *p)
 520 {
 521     HTMLDocument *This = HTMLDOC_THIS(iface);
 522     FIXME("(%p)->(%p)\n", This, p);
 523     return E_NOTIMPL;
 524 }
 525
 526 static HRESULT WINAPI HTMLDocument_put_bgColor(IHTMLDocument2 *iface, VARIANT v)
 527 {
 528     HTMLDocument *This = HTMLDOC_THIS(iface);
 529     FIXME("(%p)\n", This);
 530     return E_NOTIMPL;
 531 }
 532
 533 static HRESULT WINAPI HTMLDocument_get_bgColor(IHTMLDocument2 *iface, VARIANT *p)
 534 {
 535     HTMLDocument *This = HTMLDOC_THIS(iface);
 536     FIXME("(%p)->(%p)\n", This, p);
 537     return E_NOTIMPL;
 538 }
 539
 540 static HRESULT WINAPI HTMLDocument_put_fgColor(IHTMLDocument2 *iface, VARIANT v)
 541 {
 542     HTMLDocument *This = HTMLDOC_THIS(iface);
 543     FIXME("(%p)\n", This);
 544     return E_NOTIMPL;
 545 }
 546
 547 static HRESULT WINAPI HTMLDocument_get_fgColor(IHTMLDocument2 *iface, VARIANT *p)
 548 {
 549     HTMLDocument *This = HTMLDOC_THIS(iface);
 550     FIXME("(%p)->(%p)\n", This, p);
 551     return E_NOTIMPL;
 552 }
 553
 554 static HRESULT WINAPI HTMLDocument_put_linkColor(IHTMLDocument2 *iface, VARIANT v)
 555 {
 556     HTMLDocument *This = HTMLDOC_THIS(iface);
 557     FIXME("(%p)->()\n", This);
 558     return E_NOTIMPL;
 559 }
 560
 561 static HRESULT WINAPI HTMLDocument_get_linkColor(IHTMLDocument2 *iface, VARIANT *p)
 562 {
 563     HTMLDocument *This = HTMLDOC_THIS(iface);
 564     FIXME("(%p)->(%p)\n", This, p);
 565     return E_NOTIMPL;
 566 }
 567
 568 static HRESULT WINAPI HTMLDocument_put_vlinkColor(IHTMLDocument2 *iface, VARIANT v)
 569 {
 570     HTMLDocument *This = HTMLDOC_THIS(iface);
 571     FIXME("(%p)\n", This);
 572     return E_NOTIMPL;
 573 }
 574
 575 static HRESULT WINAPI HTMLDocument_get_vlinkColor(IHTMLDocument2 *iface, VARIANT *p)
 576 {
 577     HTMLDocument *This = HTMLDOC_THIS(iface);
 578     FIXME("(%p)->(%p)\n", This, p);
 579     return E_NOTIMPL;
 580 }
 581
 582 static HRESULT WINAPI HTMLDocument_get_referrer(IHTMLDocument2 *iface, BSTR *p)
 583 {
 584     HTMLDocument *This = HTMLDOC_THIS(iface);
 585     FIXME("(%p)->(%p)\n", This, p);
 586     return E_NOTIMPL;
 587 }
 588
 589 static HRESULT WINAPI HTMLDocument_get_location(IHTMLDocument2 *iface, IHTMLLocation **p)
 590 {
 591     HTMLDocument *This = HTMLDOC_THIS(iface);
 592
 593     TRACE("(%p)->(%p)\n", This, p);
 594
 595     if(This->location)
 596         IHTMLLocation_AddRef(HTMLLOCATION(This->location));
 597     else
 598         This->location = HTMLLocation_Create(This);
 599
 600     *p = HTMLLOCATION(This->location);
 601     return S_OK;
 602 }
 603
 604 static HRESULT WINAPI HTMLDocument_get_lastModified(IHTMLDocument2 *iface, BSTR *p)
 605 {
 606     HTMLDocument *This = HTMLDOC_THIS(iface);
 607     FIXME("(%p)->(%p)\n", This, p);
 608     return E_NOTIMPL;
 609 }
 610
 611 static HRESULT WINAPI HTMLDocument_put_URL(IHTMLDocument2 *iface, BSTR v)
 612 {
 613     HTMLDocument *This = HTMLDOC_THIS(iface);
 614     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 615     return E_NOTIMPL;
 616 }
 617
 618 static HRESULT WINAPI HTMLDocument_get_URL(IHTMLDocument2 *iface, BSTR *p)
 619 {
 620     HTMLDocument *This = HTMLDOC_THIS(iface);
 621
 622     static const WCHAR about_blank_url[] =
 623         {'a','b','o','u','t',':','b','l','a','n','k',0};
 624
 625     TRACE("(%p)->(%p)\n", iface, p);
 626
 627     *p = SysAllocString(This->url ? This->url : about_blank_url);
 628     return S_OK;
 629 }
 630
 631 static HRESULT WINAPI HTMLDocument_put_domain(IHTMLDocument2 *iface, BSTR v)
 632 {
 633     HTMLDocument *This = HTMLDOC_THIS(iface);
 634     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 635     return E_NOTIMPL;
 636 }
 637
 638 static HRESULT WINAPI HTMLDocument_get_domain(IHTMLDocument2 *iface, BSTR *p)
 639 {
 640     HTMLDocument *This = HTMLDOC_THIS(iface);
 641     FIXME("(%p)->(%p)\n", This, p);
 642     return E_NOTIMPL;
 643 }
 644
 645 static HRESULT WINAPI HTMLDocument_put_cookie(IHTMLDocument2 *iface, BSTR v)
 646 {
 647     HTMLDocument *This = HTMLDOC_THIS(iface);
 648     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 649     return E_NOTIMPL;
 650 }
 651
 652 static HRESULT WINAPI HTMLDocument_get_cookie(IHTMLDocument2 *iface, BSTR *p)
 653 {
 654     HTMLDocument *This = HTMLDOC_THIS(iface);
 655     FIXME("(%p)->(%p)\n", This, p);
 656     return E_NOTIMPL;
 657 }
 658
 659 static HRESULT WINAPI HTMLDocument_put_expando(IHTMLDocument2 *iface, VARIANT_BOOL v)
 660 {
 661     HTMLDocument *This = HTMLDOC_THIS(iface);
 662     FIXME("(%p)->(%x)\n", This, v);
 663     return E_NOTIMPL;
 664 }
 665
 666 static HRESULT WINAPI HTMLDocument_get_expando(IHTMLDocument2 *iface, VARIANT_BOOL *p)
 667 {
 668     HTMLDocument *This = HTMLDOC_THIS(iface);
 669     FIXME("(%p)->(%p)\n", This, p);
 670     return E_NOTIMPL;
 671 }
 672
 673 static HRESULT WINAPI HTMLDocument_put_charset(IHTMLDocument2 *iface, BSTR v)
 674 {
 675     HTMLDocument *This = HTMLDOC_THIS(iface);
 676     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 677     return E_NOTIMPL;
 678 }
 679
 680 static HRESULT WINAPI HTMLDocument_get_charset(IHTMLDocument2 *iface, BSTR *p)
 681 {
 682     HTMLDocument *This = HTMLDOC_THIS(iface);
 683     FIXME("(%p)->(%p)\n", This, p);
 684     return E_NOTIMPL;
 685 }
 686
 687 static HRESULT WINAPI HTMLDocument_put_defaultCharset(IHTMLDocument2 *iface, BSTR v)
 688 {
 689     HTMLDocument *This = HTMLDOC_THIS(iface);
 690     FIXME("(%p)->(%s)\n", This, debugstr_w(v));
 691     return E_NOTIMPL;
 692 }
 693
 694 static HRESULT WINAPI HTMLDocument_get_defaultCharset(IHTMLDocument2 *iface, BSTR *p)
 695 {
 696     HTMLDocument *This = HTMLDOC_THIS(iface);
 697     FIXME("(%p)->(%p)\n", This, p);
 698     return E_NOTIMPL;
 699 }
 700
 701 static HRESULT WINAPI HTMLDocument_get_mimeType(IHTMLDocument2 *iface, BSTR *p)
 702 {
 703     HTMLDocument *This = HTMLDOC_THIS(iface);
 704     FIXME("(%p)->(%p)\n", This, p);
 705     return E_NOTIMPL;
 706 }
 707
 708 static HRESULT WINAPI HTMLDocument_get_fileSize(IHTMLDocument2 *iface, BSTR *p)
 709 {
 710     HTMLDocument *This = HTMLDOC_THIS(iface);
 711     FIXME("(%p)->(%p)\n", This, p);
 712     return E_NOTIMPL;
 713 }
 714
 715 static HRESULT WINAPI HTMLDocument_get_fileCreatedDate(IHTMLDocument2 *iface, BSTR *p)
 716 {
 717     HTMLDocument *This = HTMLDOC_THIS(iface);
 718     FIXME("(%p)->(%p)\n", This, p);
 719     return E_NOTIMPL;
 720 }
 721
 722 static HRESULT WINAPI HTMLDocument_get_fileModifiedDate(IHTMLDocument2 *iface, BSTR *p)
 723 {
 724     HTMLDocument *This = HTMLDOC_THIS(iface);
 725     FIXME("(%p)->(%p)\n", This, p);
 726     return E_NOTIMPL;
 727 }
 728
 729 static HRESULT WINAPI HTMLDocument_get_fileUpdatedDate(IHTMLDocument2 *iface, BSTR *p)
 730 {
 731     HTMLDocument *This = HTMLDOC_THIS(iface);
 732     FIXME("(%p)->(%p)\n", This, p);
 733     return E_NOTIMPL;
 734 }
 735
 736 static HRESULT WINAPI HTMLDocument_get_security(IHTMLDocument2 *iface, BSTR *p)
 737 {
 738     HTMLDocument *This = HTMLDOC_THIS(iface);
 739     FIXME("(%p)->(%p)\n", This, p);
 740     return E_NOTIMPL;
 741 }
 742
 743 static HRESULT WINAPI HTMLDocument_get_protocol(IHTMLDocument2 *iface, BSTR *p)
 744 {
 745     HTMLDocument *This = HTMLDOC_THIS(iface);
 746     FIXME("(%p)->(%p)\n", This, p);
 747     return E_NOTIMPL;
 748 }
 749
 750 static HRESULT WINAPI HTMLDocument_get_nameProp(IHTMLDocument2 *iface, BSTR *p)
 751 {
 752     HTMLDocument *This = HTMLDOC_THIS(iface);
 753     FIXME("(%p)->(%p)\n", This, p);
 754     return E_NOTIMPL;
 755 }
 756
 757 static HRESULT WINAPI HTMLDocument_write(IHTMLDocument2 *iface, SAFEARRAY *psarray)
 758 {
 759     HTMLDocument *This = HTMLDOC_THIS(iface);
 760     nsAString nsstr;
 761     VARIANT *var;
 762     int i;
 763     nsresult nsres;
 764     HRESULT hres;
 765
 766     TRACE("(%p)->(%p)\n", iface, psarray);
 767
 768     if(!This->nsdoc) {
 769         WARN("NULL nsdoc\n");
 770         return E_UNEXPECTED;
 771     }
 772
 773     if(psarray->cDims != 1) {
 774         FIXME("cDims=%d\n", psarray->cDims);
 775         return E_INVALIDARG;
 776     }
 777
 778     hres = SafeArrayAccessData(psarray, (void**)&var);
 779     if(FAILED(hres)) {
 780         WARN("SafeArrayAccessData failed: %08x\n", hres);
 781         return hres;
 782     }
 783
 784     nsAString_Init(&nsstr, NULL);
 785
 786     for(i=0; i < psarray->rgsabound[0].cElements; i++) {
 787         if(V_VT(var+i) == VT_BSTR) {
 788             nsAString_SetData(&nsstr, V_BSTR(var+i));
 789             nsres = nsIDOMHTMLDocument_Write(This->nsdoc, &nsstr);
 790             if(NS_FAILED(nsres))
 791                 ERR("Write failed: %08x\n", nsres);
 792         }else {
 793             FIXME("vt=%d\n", V_VT(var+i));
 794         }
 795     }
 796
 797     nsAString_Finish(&nsstr);
 798     SafeArrayUnaccessData(psarray);
 799
 800     return S_OK;
 801 }
 802
 803 static HRESULT WINAPI HTMLDocument_writeln(IHTMLDocument2 *iface, SAFEARRAY *psarray)
 804 {
 805     HTMLDocument *This = HTMLDOC_THIS(iface);
 806     FIXME("(%p)->(%p)\n", This, psarray);
 807     return E_NOTIMPL;
 808 }
 809
 810 static HRESULT WINAPI HTMLDocument_open(IHTMLDocument2 *iface, BSTR url, VARIANT name,
 811                         VARIANT features, VARIANT replace, IDispatch **pomWindowResult)
 812 {
 813     HTMLDocument *This = HTMLDOC_THIS(iface);
 814     FIXME("(%p)->(%s %p)\n", This, debugstr_w(url), pomWindowResult);
 815     return E_NOTIMPL;
 816 }
 817
 818 static HRESULT WINAPI HTMLDocument_close(IHTMLDocument2 *iface)
 819 {
 820     HTMLDocument *This = HTMLDOC_THIS(iface);
 821     FIXME("(%p)\n", This);
 822     return E_NOTIMPL;
 823 }
 824
 825 static HRESULT WINAPI HTMLDocument_clear(IHTMLDocument2 *iface)
 826 {
 827     HTMLDocument *This = HTMLDOC_THIS(iface);
 828     FIXME("(%p)\n", This);
 829     return E_NOTIMPL;
 830 }
 831
 832 static HRESULT WINAPI HTMLDocument_queryCommandSupported(IHTMLDocument2 *iface, BSTR cmdID,
 833                                                         VARIANT_BOOL *pfRet)
 834 {
 835     HTMLDocument *This = HTMLDOC_THIS(iface);
 836     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 837     return E_NOTIMPL;
 838 }
 839
 840 static HRESULT WINAPI HTMLDocument_queryCommandEnabled(IHTMLDocument2 *iface, BSTR cmdID,
 841                                                         VARIANT_BOOL *pfRet)
 842 {
 843     HTMLDocument *This = HTMLDOC_THIS(iface);
 844     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 845     return E_NOTIMPL;
 846 }
 847
 848 static HRESULT WINAPI HTMLDocument_queryCommandState(IHTMLDocument2 *iface, BSTR cmdID,
 849                                                         VARIANT_BOOL *pfRet)
 850 {
 851     HTMLDocument *This = HTMLDOC_THIS(iface);
 852     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 853     return E_NOTIMPL;
 854 }
 855
 856 static HRESULT WINAPI HTMLDocument_queryCommandIndeterm(IHTMLDocument2 *iface, BSTR cmdID,
 857                                                         VARIANT_BOOL *pfRet)
 858 {
 859     HTMLDocument *This = HTMLDOC_THIS(iface);
 860     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 861     return E_NOTIMPL;
 862 }
 863
 864 static HRESULT WINAPI HTMLDocument_queryCommandText(IHTMLDocument2 *iface, BSTR cmdID,
 865                                                         BSTR *pfRet)
 866 {
 867     HTMLDocument *This = HTMLDOC_THIS(iface);
 868     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 869     return E_NOTIMPL;
 870 }
 871
 872 static HRESULT WINAPI HTMLDocument_queryCommandValue(IHTMLDocument2 *iface, BSTR cmdID,
 873                                                         VARIANT *pfRet)
 874 {
 875     HTMLDocument *This = HTMLDOC_THIS(iface);
 876     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 877     return E_NOTIMPL;
 878 }
 879
 880 static HRESULT WINAPI HTMLDocument_execCommand(IHTMLDocument2 *iface, BSTR cmdID,
 881                                 VARIANT_BOOL showUI, VARIANT value, VARIANT_BOOL *pfRet)
 882 {
 883     HTMLDocument *This = HTMLDOC_THIS(iface);
 884     FIXME("(%p)->(%s %x %p)\n", This, debugstr_w(cmdID), showUI, pfRet);
 885     return E_NOTIMPL;
 886 }
 887
 888 static HRESULT WINAPI HTMLDocument_execCommandShowHelp(IHTMLDocument2 *iface, BSTR cmdID,
 889                                                         VARIANT_BOOL *pfRet)
 890 {
 891     HTMLDocument *This = HTMLDOC_THIS(iface);
 892     FIXME("(%p)->(%s %p)\n", This, debugstr_w(cmdID), pfRet);
 893     return E_NOTIMPL;
 894 }
 895
 896 static HRESULT WINAPI HTMLDocument_createElement(IHTMLDocument2 *iface, BSTR eTag,
 897                                                  IHTMLElement **newElem)
 898 {
 899     HTMLDocument *This = HTMLDOC_THIS(iface);
 900     nsIDOMElement *nselem;
 901     HTMLElement *elem;
 902     nsAString tag_str;
 903     nsresult nsres;
 904
 905     TRACE("(%p)->(%s %p)\n", This, debugstr_w(eTag), newElem);
 906
 907     if(!This->nsdoc) {
 908         WARN("NULL nsdoc\n");
 909         return E_UNEXPECTED;
 910     }
 911
 912     nsAString_Init(&tag_str, eTag);
 913     nsres = nsIDOMDocument_CreateElement(This->nsdoc, &tag_str, &nselem);
 914     nsAString_Finish(&tag_str);
 915     if(NS_FAILED(nsres)) {
 916         ERR("CreateElement failed: %08x\n", nsres);
 917         return E_FAIL;
 918     }
 919
 920     elem = HTMLElement_Create(This, (nsIDOMNode*)nselem, TRUE);
 921     nsIDOMElement_Release(nselem);
 922
 923     *newElem = HTMLELEM(elem);
 924     IHTMLElement_AddRef(HTMLELEM(elem));
 925     return S_OK;
 926 }
 927
 928 static HRESULT WINAPI HTMLDocument_put_onhelp(IHTMLDocument2 *iface, VARIANT v)
 929 {
 930     HTMLDocument *This = HTMLDOC_THIS(iface);
 931     FIXME("(%p)\n", This);
 932     return E_NOTIMPL;
 933 }
 934
 935 static HRESULT WINAPI HTMLDocument_get_onhelp(IHTMLDocument2 *iface, VARIANT *p)
 936 {
 937     HTMLDocument *This = HTMLDOC_THIS(iface);
 938     FIXME("(%p)->(%p)\n", This, p);
 939     return E_NOTIMPL;
 940 }
 941
 942 static HRESULT WINAPI HTMLDocument_put_onclick(IHTMLDocument2 *iface, VARIANT v)
 943 {
 944     HTMLDocument *This = HTMLDOC_THIS(iface);
 945     FIXME("(%p)\n", This);
 946     return E_NOTIMPL;
 947 }
 948
 949 static HRESULT WINAPI HTMLDocument_get_onclick(IHTMLDocument2 *iface, VARIANT *p)
 950 {
 951     HTMLDocument *This = HTMLDOC_THIS(iface);
 952     FIXME("(%p)->(%p)\n", This, p);
 953     return E_NOTIMPL;
 954 }
 955
 956 static HRESULT WINAPI HTMLDocument_put_ondblclick(IHTMLDocument2 *iface, VARIANT v)
 957 {
 958     HTMLDocument *This = HTMLDOC_THIS(iface);
 959     FIXME("(%p)\n", This);
 960     return E_NOTIMPL;
 961 }
 962
 963 static HRESULT WINAPI HTMLDocument_get_ondblclick(IHTMLDocument2 *iface, VARIANT *p)
 964 {
 965     HTMLDocument *This = HTMLDOC_THIS(iface);
 966     FIXME("(%p)->(%p)\n", This, p);
 967     return E_NOTIMPL;
 968 }
 969
 970 static HRESULT WINAPI HTMLDocument_put_onkeyup(IHTMLDocument2 *iface, VARIANT v)
 971 {
 972     HTMLDocument *This = HTMLDOC_THIS(iface);
 973     FIXME("(%p)\n", This);
 974     return E_NOTIMPL;
 975 }
 976
 977 static HRESULT WINAPI HTMLDocument_get_onkeyup(IHTMLDocument2 *iface, VARIANT *p)
 978 {
 979     HTMLDocument *This = HTMLDOC_THIS(iface);
 980     FIXME("(%p)->(%p)\n", This, p);
 981     return E_NOTIMPL;
 982 }
 983
 984 static HRESULT WINAPI HTMLDocument_put_onkeydown(IHTMLDocument2 *iface, VARIANT v)
 985 {
 986     HTMLDocument *This = HTMLDOC_THIS(iface);
 987     FIXME("(%p)\n", This);
 988     return E_NOTIMPL;
 989 }
 990
 991 static HRESULT WINAPI HTMLDocument_get_onkeydown(IHTMLDocument2 *iface, VARIANT *p)
 992 {
 993     HTMLDocument *This = HTMLDOC_THIS(iface);
 994     FIXME("(%p)->(%p)\n", This, p);
 995     return E_NOTIMPL;
 996 }
 997
 998 static HRESULT WINAPI HTMLDocument_put_onkeypress(IHTMLDocument2 *iface, VARIANT v)
 999 {
1000     HTMLDocument *This = HTMLDOC_THIS(iface);
1001     FIXME("(%p)\n", This);
1002     return E_NOTIMPL;
1003 }
1004
1005 static HRESULT WINAPI HTMLDocument_get_onkeypress(IHTMLDocument2 *iface, VARIANT *p)
1006 {
1007     HTMLDocument *This = HTMLDOC_THIS(iface);
1008     FIXME("(%p)->(%p)\n", This, p);
1009     return E_NOTIMPL;
1010 }
1011
1012 static HRESULT WINAPI HTMLDocument_put_onmouseup(IHTMLDocument2 *iface, VARIANT v)
1013 {
1014     HTMLDocument *This = HTMLDOC_THIS(iface);
1015     FIXME("(%p)\n", This);
1016     return E_NOTIMPL;
1017 }
1018
1019 static HRESULT WINAPI HTMLDocument_get_onmouseup(IHTMLDocument2 *iface, VARIANT *p)
1020 {
1021     HTMLDocument *This = HTMLDOC_THIS(iface);
1022     FIXME("(%p)->(%p)\n", This, p);
1023     return E_NOTIMPL;
1024 }
1025
1026 static HRESULT WINAPI HTMLDocument_put_onmousedown(IHTMLDocument2 *iface, VARIANT v)
1027 {
1028     HTMLDocument *This = HTMLDOC_THIS(iface);
1029     FIXME("(%p)\n", This);
1030     return E_NOTIMPL;
1031 }
1032
1033 static HRESULT WINAPI HTMLDocument_get_onmousedown(IHTMLDocument2 *iface, VARIANT *p)
1034 {
1035     HTMLDocument *This = HTMLDOC_THIS(iface);
1036     FIXME("(%p)->(%p)\n", This, p);
1037     return E_NOTIMPL;
1038 }
1039
1040 static HRESULT WINAPI HTMLDocument_put_onmousemove(IHTMLDocument2 *iface, VARIANT v)
1041 {
1042     HTMLDocument *This = HTMLDOC_THIS(iface);
1043     FIXME("(%p)\n", This);
1044     return E_NOTIMPL;
1045 }
1046
1047 static HRESULT WINAPI HTMLDocument_get_onmousemove(IHTMLDocument2 *iface, VARIANT *p)
1048 {
1049     HTMLDocument *This = HTMLDOC_THIS(iface);
1050     FIXME("(%p)->(%p)\n", This, p);
1051     return E_NOTIMPL;
1052 }
1053
1054 static HRESULT WINAPI HTMLDocument_put_onmouseout(IHTMLDocument2 *iface, VARIANT v)
1055 {
1056     HTMLDocument *This = HTMLDOC_THIS(iface);
1057     FIXME("(%p)\n", This);
1058     return E_NOTIMPL;
1059 }
1060
1061 static HRESULT WINAPI HTMLDocument_get_onmouseout(IHTMLDocument2 *iface, VARIANT *p)
1062 {
1063     HTMLDocument *This = HTMLDOC_THIS(iface);
1064     FIXME("(%p)->(%p)\n", This, p);
1065     return E_NOTIMPL;
1066 }
1067
1068 static HRESULT WINAPI HTMLDocument_put_onmouseover(IHTMLDocument2 *iface, VARIANT v)
1069 {
1070     HTMLDocument *This = HTMLDOC_THIS(iface);
1071     FIXME("(%p)\n", This);
1072     return E_NOTIMPL;
1073 }
1074
1075 static HRESULT WINAPI HTMLDocument_get_onmouseover(IHTMLDocument2 *iface, VARIANT *p)
1076 {
1077     HTMLDocument *This = HTMLDOC_THIS(iface);
1078     FIXME("(%p)->(%p)\n", This, p);
1079     return E_NOTIMPL;
1080 }
1081
1082 static HRESULT WINAPI HTMLDocument_put_onreadystatechange(IHTMLDocument2 *iface, VARIANT v)
1083 {
1084     HTMLDocument *This = HTMLDOC_THIS(iface);
1085     FIXME("(%p)\n", This);
1086     return E_NOTIMPL;
1087 }
1088
1089 static HRESULT WINAPI HTMLDocument_get_onreadystatechange(IHTMLDocument2 *iface, VARIANT *p)
1090 {
1091     HTMLDocument *This = HTMLDOC_THIS(iface);
1092     FIXME("(%p)->(%p)\n", This, p);
1093     return E_NOTIMPL;
1094 }
1095
1096 static HRESULT WINAPI HTMLDocument_put_onafterupdate(IHTMLDocument2 *iface, VARIANT v)
1097 {
1098     HTMLDocument *This = HTMLDOC_THIS(iface);
1099     FIXME("(%p)\n", This);
1100     return E_NOTIMPL;
1101 }
1102
1103 static HRESULT WINAPI HTMLDocument_get_onafterupdate(IHTMLDocument2 *iface, VARIANT *p)
1104 {
1105     HTMLDocument *This = HTMLDOC_THIS(iface);
1106     FIXME("(%p)->(%p)\n", This, p);
1107     return E_NOTIMPL;
1108 }
1109
1110 static HRESULT WINAPI HTMLDocument_put_onrowexit(IHTMLDocument2 *iface, VARIANT v)
1111 {
1112     HTMLDocument *This = HTMLDOC_THIS(iface);
1113     FIXME("(%p)\n", This);
1114     return E_NOTIMPL;
1115 }
1116
1117 static HRESULT WINAPI HTMLDocument_get_onrowexit(IHTMLDocument2 *iface, VARIANT *p)
1118 {
1119     HTMLDocument *This = HTMLDOC_THIS(iface);
1120     FIXME("(%p)->(%p)\n", This, p);
1121     return E_NOTIMPL;
1122 }
1123
1124 static HRESULT WINAPI HTMLDocument_put_onrowenter(IHTMLDocument2 *iface, VARIANT v)
1125 {
1126     HTMLDocument *This = HTMLDOC_THIS(iface);
1127     FIXME("(%p)\n", This);
1128     return E_NOTIMPL;
1129 }
1130
1131 static HRESULT WINAPI HTMLDocument_get_onrowenter(IHTMLDocument2 *iface, VARIANT *p)
1132 {
1133     HTMLDocument *This = HTMLDOC_THIS(iface);
1134     FIXME("(%p)->(%p)\n", This, p);
1135     return E_NOTIMPL;
1136 }
1137
1138 static HRESULT WINAPI HTMLDocument_put_ondragstart(IHTMLDocument2 *iface, VARIANT v)
1139 {
1140     HTMLDocument *This = HTMLDOC_THIS(iface);
1141     FIXME("(%p)\n", This);
1142     return E_NOTIMPL;
1143 }
1144
1145 static HRESULT WINAPI HTMLDocument_get_ondragstart(IHTMLDocument2 *iface, VARIANT *p)
1146 {
1147     HTMLDocument *This = HTMLDOC_THIS(iface);
1148     FIXME("(%p)->(%p)\n", This, p);
1149     return E_NOTIMPL;
1150 }
1151
1152 static HRESULT WINAPI HTMLDocument_put_onselectstart(IHTMLDocument2 *iface, VARIANT v)
1153 {
1154     HTMLDocument *This = HTMLDOC_THIS(iface);
1155     FIXME("(%p)\n", This);
1156     return E_NOTIMPL;
1157 }
1158
1159 static HRESULT WINAPI HTMLDocument_get_onselectstart(IHTMLDocument2 *iface, VARIANT *p)
1160 {
1161     HTMLDocument *This = HTMLDOC_THIS(iface);
1162     FIXME("(%p)->(%p)\n", This, p);
1163     return E_NOTIMPL;
1164 }
1165
1166 static HRESULT WINAPI HTMLDocument_elementFromPoint(IHTMLDocument2 *iface, long x, long y,
1167                                                         IHTMLElement **elementHit)
1168 {
1169     HTMLDocument *This = HTMLDOC_THIS(iface);
1170     FIXME("(%p)->(%ld %ld %p)\n", This, x, y, elementHit);
1171     return E_NOTIMPL;
1172 }
1173
1174 static HRESULT WINAPI HTMLDocument_get_parentWindow(IHTMLDocument2 *iface, IHTMLWindow2 **p)
1175 {
1176     HTMLDocument *This = HTMLDOC_THIS(iface);
1177
1178     TRACE("(%p)->(%p)\n", This, p);
1179
1180     *p = HTMLWINDOW2(This->window);
1181     IHTMLWindow2_AddRef(*p);
1182     return S_OK;
1183 }
1184
1185 static HRESULT WINAPI HTMLDocument_get_styleSheets(IHTMLDocument2 *iface,
1186                                                    IHTMLStyleSheetsCollection **p)
1187 {
1188     HTMLDocument *This = HTMLDOC_THIS(iface);
1189     nsIDOMStyleSheetList *nsstylelist;
1190     nsIDOMDocumentStyle *nsdocstyle;
1191     nsresult nsres;
1192
1193     TRACE("(%p)->(%p)\n", This, p);
1194
1195     *p = NULL;
1196
1197     if(!This->nsdoc) {
1198         WARN("NULL nsdoc\n");
1199         return E_UNEXPECTED;
1200     }
1201
1202     nsIDOMHTMLDocument_QueryInterface(This->nsdoc, &IID_nsIDOMDocumentStyle, (void**)&nsdocstyle);
1203     nsres = nsIDOMDocumentStyle_GetStyleSheets(nsdocstyle, &nsstylelist);
1204     nsIDOMDocumentStyle_Release(nsdocstyle);
1205     if(NS_FAILED(nsres)) {
1206         ERR("GetStyleSheets failed: %08x\n", nsres);
1207         return E_FAIL;
1208     }
1209
1210     *p = HTMLStyleSheetsCollection_Create(nsstylelist);
1211     nsIDOMDocumentStyle_Release(nsstylelist);
1212
1213     return S_OK;
1214 }
1215
1216 static HRESULT WINAPI HTMLDocument_put_onbeforeupdate(IHTMLDocument2 *iface, VARIANT v)
1217 {
1218     HTMLDocument *This = HTMLDOC_THIS(iface);
1219     FIXME("(%p)\n", This);
1220     return E_NOTIMPL;
1221 }
1222
1223 static HRESULT WINAPI HTMLDocument_get_onbeforeupdate(IHTMLDocument2 *iface, VARIANT *p)
1224 {
1225     HTMLDocument *This = HTMLDOC_THIS(iface);
1226     FIXME("(%p)->(%p)\n", This, p);
1227     return E_NOTIMPL;
1228 }
1229
1230 static HRESULT WINAPI HTMLDocument_put_onerrorupdate(IHTMLDocument2 *iface, VARIANT v)
1231 {
1232     HTMLDocument *This = HTMLDOC_THIS(iface);
1233     FIXME("(%p)\n", This);
1234     return E_NOTIMPL;
1235 }
1236
1237 static HRESULT WINAPI HTMLDocument_get_onerrorupdate(IHTMLDocument2 *iface, VARIANT *p)
1238 {
1239     HTMLDocument *This = HTMLDOC_THIS(iface);
1240     FIXME("(%p)->(%p)\n", This, p);
1241     return E_NOTIMPL;
1242 }
1243
1244 static HRESULT WINAPI HTMLDocument_toString(IHTMLDocument2 *iface, BSTR *String)
1245 {
1246     HTMLDocument *This = HTMLDOC_THIS(iface);
1247     FIXME("(%p)->(%p)\n", This, String);
1248     return E_NOTIMPL;
1249 }
1250
1251 static HRESULT WINAPI HTMLDocument_createStyleSheet(IHTMLDocument2 *iface, BSTR bstrHref,
1252                                             long lIndex, IHTMLStyleSheet **ppnewStyleSheet)
1253 {
1254     HTMLDocument *This = HTMLDOC_THIS(iface);
1255
1256     FIXME("(%p)->(%s %ld %p) semi-stub\n", This, debugstr_w(bstrHref), lIndex, ppnewStyleSheet);
1257
1258     *ppnewStyleSheet = HTMLStyleSheet_Create(NULL);
1259     return S_OK;
1260 }
1261
1262 static const IHTMLDocument2Vtbl HTMLDocumentVtbl = {
1263     HTMLDocument_QueryInterface,
1264     HTMLDocument_AddRef,
1265     HTMLDocument_Release,
1266     HTMLDocument_GetTypeInfoCount,
1267     HTMLDocument_GetTypeInfo,
1268     HTMLDocument_GetIDsOfNames,
1269     HTMLDocument_Invoke,
1270     HTMLDocument_get_Script,
1271     HTMLDocument_get_all,
1272     HTMLDocument_get_body,
1273     HTMLDocument_get_activeElement,
1274     HTMLDocument_get_images,
1275     HTMLDocument_get_applets,
1276     HTMLDocument_get_links,
1277     HTMLDocument_get_forms,
1278     HTMLDocument_get_anchors,
1279     HTMLDocument_put_title,
1280     HTMLDocument_get_title,
1281     HTMLDocument_get_scripts,
1282     HTMLDocument_put_designMode,
1283     HTMLDocument_get_designMode,
1284     HTMLDocument_get_selection,
1285     HTMLDocument_get_readyState,
1286     HTMLDocument_get_frames,
1287     HTMLDocument_get_embeds,
1288     HTMLDocument_get_plugins,
1289     HTMLDocument_put_alinkColor,
1290     HTMLDocument_get_alinkColor,
1291     HTMLDocument_put_bgColor,
1292     HTMLDocument_get_bgColor,
1293     HTMLDocument_put_fgColor,
1294     HTMLDocument_get_fgColor,
1295     HTMLDocument_put_linkColor,
1296     HTMLDocument_get_linkColor,
1297     HTMLDocument_put_vlinkColor,
1298     HTMLDocument_get_vlinkColor,
1299     HTMLDocument_get_referrer,
1300     HTMLDocument_get_location,
1301     HTMLDocument_get_lastModified,
1302     HTMLDocument_put_URL,
1303     HTMLDocument_get_URL,
1304     HTMLDocument_put_domain,
1305     HTMLDocument_get_domain,
1306     HTMLDocument_put_cookie,
1307     HTMLDocument_get_cookie,
1308     HTMLDocument_put_expando,
1309     HTMLDocument_get_expando,
1310     HTMLDocument_put_charset,
1311     HTMLDocument_get_charset,
1312     HTMLDocument_put_defaultCharset,
1313     HTMLDocument_get_defaultCharset,
1314     HTMLDocument_get_mimeType,
1315     HTMLDocument_get_fileSize,
1316     HTMLDocument_get_fileCreatedDate,
1317     HTMLDocument_get_fileModifiedDate,
1318     HTMLDocument_get_fileUpdatedDate,
1319     HTMLDocument_get_security,
1320     HTMLDocument_get_protocol,
1321     HTMLDocument_get_nameProp,
1322     HTMLDocument_write,
1323     HTMLDocument_writeln,
1324     HTMLDocument_open,
1325     HTMLDocument_close,
1326     HTMLDocument_clear,
1327     HTMLDocument_queryCommandSupported,
1328     HTMLDocument_queryCommandEnabled,
1329     HTMLDocument_queryCommandState,
1330     HTMLDocument_queryCommandIndeterm,
1331     HTMLDocument_queryCommandText,
1332     HTMLDocument_queryCommandValue,
1333     HTMLDocument_execCommand,
1334     HTMLDocument_execCommandShowHelp,
1335     HTMLDocument_createElement,
1336     HTMLDocument_put_onhelp,
1337     HTMLDocument_get_onhelp,
1338     HTMLDocument_put_onclick,
1339     HTMLDocument_get_onclick,
1340     HTMLDocument_put_ondblclick,
1341     HTMLDocument_get_ondblclick,
1342     HTMLDocument_put_onkeyup,
1343     HTMLDocument_get_onkeyup,
1344     HTMLDocument_put_onkeydown,
1345     HTMLDocument_get_onkeydown,
1346     HTMLDocument_put_onkeypress,
1347     HTMLDocument_get_onkeypress,
1348     HTMLDocument_put_onmouseup,
1349     HTMLDocument_get_onmouseup,
1350     HTMLDocument_put_onmousedown,
1351     HTMLDocument_get_onmousedown,
1352     HTMLDocument_put_onmousemove,
1353     HTMLDocument_get_onmousemove,
1354     HTMLDocument_put_onmouseout,
1355     HTMLDocument_get_onmouseout,
1356     HTMLDocument_put_onmouseover,
1357     HTMLDocument_get_onmouseover,
1358     HTMLDocument_put_onreadystatechange,
1359     HTMLDocument_get_onreadystatechange,
1360     HTMLDocument_put_onafterupdate,
1361     HTMLDocument_get_onafterupdate,
1362     HTMLDocument_put_onrowexit,
1363     HTMLDocument_get_onrowexit,
1364     HTMLDocument_put_onrowenter,
1365     HTMLDocument_get_onrowenter,
1366     HTMLDocument_put_ondragstart,
1367     HTMLDocument_get_ondragstart,
1368     HTMLDocument_put_onselectstart,
1369     HTMLDocument_get_onselectstart,
1370     HTMLDocument_elementFromPoint,
1371     HTMLDocument_get_parentWindow,
1372     HTMLDocument_get_styleSheets,
1373     HTMLDocument_put_onbeforeupdate,
1374     HTMLDocument_get_onbeforeupdate,
1375     HTMLDocument_put_onerrorupdate,
1376     HTMLDocument_get_onerrorupdate,
1377     HTMLDocument_toString,
1378     HTMLDocument_createStyleSheet
1379 };
1380
1381 #define DISPEX_THIS(iface) DEFINE_THIS(HTMLDocument, IDispatchEx, iface)
1382
1383 static HRESULT WINAPI DocDispatchEx_QueryInterface(IDispatchEx *iface, REFIID riid, void **ppv)
1384 {
1385     HTMLDocument *This = DISPEX_THIS(iface);
1386
1387     return IHTMLDocument2_QueryInterface(HTMLDOC(This), riid, ppv);
1388 }
1389
1390 static ULONG WINAPI DocDispatchEx_AddRef(IDispatchEx *iface)
1391 {
1392     HTMLDocument *This = DISPEX_THIS(iface);
1393
1394     return IHTMLDocument2_AddRef(HTMLDOC(This));
1395 }
1396
1397 static ULONG WINAPI DocDispatchEx_Release(IDispatchEx *iface)
1398 {
1399     HTMLDocument *This = DISPEX_THIS(iface);
1400
1401     return IHTMLDocument2_Release(HTMLDOC(This));
1402 }
1403
1404 static HRESULT WINAPI DocDispatchEx_GetTypeInfoCount(IDispatchEx *iface, UINT *pctinfo)
1405 {
1406     HTMLDocument *This = DISPEX_THIS(iface);
1407
1408     return IDispatchEx_GetTypeInfoCount(DISPATCHEX(&This->dispex), pctinfo);
1409 }
1410
1411 static HRESULT WINAPI DocDispatchEx_GetTypeInfo(IDispatchEx *iface, UINT iTInfo,
1412                                                LCID lcid, ITypeInfo **ppTInfo)
1413 {
1414     HTMLDocument *This = DISPEX_THIS(iface);
1415
1416     return IDispatchEx_GetTypeInfo(DISPATCHEX(&This->dispex), iTInfo, lcid, ppTInfo);
1417 }
1418
1419 static HRESULT WINAPI DocDispatchEx_GetIDsOfNames(IDispatchEx *iface, REFIID riid,
1420                                                  LPOLESTR *rgszNames, UINT cNames,
1421                                                  LCID lcid, DISPID *rgDispId)
1422 {
1423     HTMLDocument *This = DISPEX_THIS(iface);
1424
1425     return IDispatchEx_GetIDsOfNames(DISPATCHEX(&This->dispex), riid, rgszNames, cNames, lcid, rgDispId);
1426 }
1427
1428 static HRESULT WINAPI DocDispatchEx_Invoke(IDispatchEx *iface, DISPID dispIdMember,
1429                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
1430                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
1431 {
1432     HTMLDocument *This = DISPEX_THIS(iface);
1433
1434     TRACE("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
1435           lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
1436
1437     switch(dispIdMember) {
1438     case DISPID_READYSTATE:
1439         TRACE("DISPID_READYSTATE\n");
1440
1441         if(!(wFlags & DISPATCH_PROPERTYGET))
1442             return E_INVALIDARG;
1443
1444         V_VT(pVarResult) = VT_I4;
1445         V_I4(pVarResult) = This->readystate;
1446         return S_OK;
1447     }
1448
1449     return IDispatchEx_Invoke(DISPATCHEX(&This->dispex), dispIdMember, riid, lcid, wFlags, pDispParams,
1450                               pVarResult, pExcepInfo, puArgErr);
1451 }
1452
1453 static HRESULT WINAPI DocDispatchEx_GetDispID(IDispatchEx *iface, BSTR bstrName, DWORD grfdex, DISPID *pid)
1454 {
1455     HTMLDocument *This = DISPEX_THIS(iface);
1456
1457     return IDispatchEx_GetDispID(DISPATCHEX(&This->dispex), bstrName, grfdex, pid);
1458 }
1459
1460 static HRESULT WINAPI DocDispatchEx_InvokeEx(IDispatchEx *iface, DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp,
1461         VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller)
1462 {
1463     HTMLDocument *This = DISPEX_THIS(iface);
1464
1465     return IDispatchEx_InvokeEx(DISPATCHEX(&This->dispex), id, lcid, wFlags, pdp, pvarRes, pei, pspCaller);
1466 }
1467
1468 static HRESULT WINAPI DocDispatchEx_DeleteMemberByName(IDispatchEx *iface, BSTR bstrName, DWORD grfdex)
1469 {
1470     HTMLDocument *This = DISPEX_THIS(iface);
1471
1472     return IDispatchEx_DeleteMemberByName(DISPATCHEX(&This->dispex), bstrName, grfdex);
1473 }
1474
1475 static HRESULT WINAPI DocDispatchEx_DeleteMemberByDispID(IDispatchEx *iface, DISPID id)
1476 {
1477     HTMLDocument *This = DISPEX_THIS(iface);
1478
1479     return IDispatchEx_DeleteMemberByDispID(DISPATCHEX(&This->dispex), id);
1480 }
1481
1482 static HRESULT WINAPI DocDispatchEx_GetMemberProperties(IDispatchEx *iface, DISPID id, DWORD grfdexFetch, DWORD *pgrfdex)
1483 {
1484     HTMLDocument *This = DISPEX_THIS(iface);
1485
1486     return IDispatchEx_GetMemberProperties(DISPATCHEX(&This->dispex), id, grfdexFetch, pgrfdex);
1487 }
1488
1489 static HRESULT WINAPI DocDispatchEx_GetMemberName(IDispatchEx *iface, DISPID id, BSTR *pbstrName)
1490 {
1491     HTMLDocument *This = DISPEX_THIS(iface);
1492
1493     return IDispatchEx_GetMemberName(DISPATCHEX(&This->dispex), id, pbstrName);
1494 }
1495
1496 static HRESULT WINAPI DocDispatchEx_GetNextDispID(IDispatchEx *iface, DWORD grfdex, DISPID id, DISPID *pid)
1497 {
1498     HTMLDocument *This = DISPEX_THIS(iface);
1499
1500     return IDispatchEx_GetNextDispID(DISPATCHEX(&This->dispex), grfdex, id, pid);
1501 }
1502
1503 static HRESULT WINAPI DocDispatchEx_GetNameSpaceParent(IDispatchEx *iface, IUnknown **ppunk)
1504 {
1505     HTMLDocument *This = DISPEX_THIS(iface);
1506
1507     return IDispatchEx_GetNameSpaceParent(DISPATCHEX(&This->dispex), ppunk);
1508 }
1509
1510 #undef DISPEX_THIS
1511
1512 static const IDispatchExVtbl DocDispatchExVtbl = {
1513     DocDispatchEx_QueryInterface,
1514     DocDispatchEx_AddRef,
1515     DocDispatchEx_Release,
1516     DocDispatchEx_GetTypeInfoCount,
1517     DocDispatchEx_GetTypeInfo,
1518     DocDispatchEx_GetIDsOfNames,
1519     DocDispatchEx_Invoke,
1520     DocDispatchEx_GetDispID,
1521     DocDispatchEx_InvokeEx,
1522     DocDispatchEx_DeleteMemberByName,
1523     DocDispatchEx_DeleteMemberByDispID,
1524     DocDispatchEx_GetMemberProperties,
1525     DocDispatchEx_GetMemberName,
1526     DocDispatchEx_GetNextDispID,
1527     DocDispatchEx_GetNameSpaceParent
1528 };
1529
1530 static const tid_t HTMLDocument_iface_tids[] = {
1531     IHTMLDocument2_tid,
1532     IHTMLDocument3_tid,
1533     IHTMLDocument4_tid,
1534     IHTMLDocument5_tid,
1535     0
1536 };
1537 static dispex_static_data_t HTMLDocument_dispex = {
1538     NULL,
1539     DispHTMLDocument_tid,
1540     NULL,
1541     HTMLDocument_iface_tids
1542 };
1543
1544 HRESULT HTMLDocument_Create(IUnknown *pUnkOuter, REFIID riid, void** ppvObject)
1545 {
1546     HTMLDocument *ret;
1547     HRESULT hres;
1548
1549     TRACE("(%p %s %p)\n", pUnkOuter, debugstr_guid(riid), ppvObject);
1550
1551     ret = heap_alloc_zero(sizeof(HTMLDocument));
1552     ret->lpHTMLDocument2Vtbl = &HTMLDocumentVtbl;
1553     ret->lpIDispatchExVtbl = &DocDispatchExVtbl;
1554     ret->ref = 0;
1555     ret->readystate = READYSTATE_UNINITIALIZED;
1556     ret->scriptmode = SCRIPTMODE_GECKO;
1557
1558     list_init(&ret->bindings);
1559     list_init(&ret->script_hosts);
1560     list_init(&ret->selection_list);
1561     list_init(&ret->range_list);
1562
1563     hres = IHTMLDocument_QueryInterface(HTMLDOC(ret), riid, ppvObject);
1564     if(FAILED(hres)) {
1565         heap_free(ret);
1566         return hres;
1567     }
1568
1569     LOCK_MODULE();
1570
1571     HTMLDocument_HTMLDocument3_Init(ret);
1572     HTMLDocument_HTMLDocument5_Init(ret);
1573     HTMLDocument_Persist_Init(ret);
1574     HTMLDocument_OleCmd_Init(ret);
1575     HTMLDocument_OleObj_Init(ret);
1576     HTMLDocument_View_Init(ret);
1577     HTMLDocument_Window_Init(ret);
1578     HTMLDocument_Service_Init(ret);
1579     HTMLDocument_Hlink_Init(ret);
1580
1581     ConnectionPointContainer_Init(&ret->cp_container, (IUnknown*)HTMLDOC(ret));
1582     ConnectionPoint_Init(&ret->cp_propnotif, &ret->cp_container, &IID_IPropertyNotifySink);
1583     ConnectionPoint_Init(&ret->cp_htmldocevents, &ret->cp_container, &DIID_HTMLDocumentEvents);
1584     ConnectionPoint_Init(&ret->cp_htmldocevents2, &ret->cp_container, &DIID_HTMLDocumentEvents2);
1585
1586     init_dispex(&ret->dispex, (IUnknown*)HTMLDOC(ret), &HTMLDocument_dispex);
1587
1588     ret->nscontainer = NSContainer_Create(ret, NULL);
1589     update_nsdocument(ret);
1590
1591     ret->window = HTMLWindow_Create(ret);
1592
1593     get_thread_hwnd();
1594
1595     return hres;
1596 }