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