msi/tests: Replace a printf() by a trace().
[wine] / 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 }