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