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