kernel32/tests: Get the test to run on Windows 95.
[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         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         heap_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(NULL);
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 = heap_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->bindings);
1189     list_init(&ret->selection_list);
1190     list_init(&ret->range_list);
1191
1192     hres = IHTMLDocument_QueryInterface(HTMLDOC(ret), riid, ppvObject);
1193     if(FAILED(hres)) {
1194         heap_free(ret);
1195         return hres;
1196     }
1197
1198     LOCK_MODULE();
1199
1200     HTMLDocument_HTMLDocument3_Init(ret);
1201     HTMLDocument_HTMLDocument5_Init(ret);
1202     HTMLDocument_Persist_Init(ret);
1203     HTMLDocument_OleCmd_Init(ret);
1204     HTMLDocument_OleObj_Init(ret);
1205     HTMLDocument_View_Init(ret);
1206     HTMLDocument_Window_Init(ret);
1207     HTMLDocument_Service_Init(ret);
1208     HTMLDocument_Hlink_Init(ret);
1209
1210     ConnectionPointContainer_Init(&ret->cp_container, (IUnknown*)HTMLDOC(ret));
1211     ConnectionPoint_Init(&ret->cp_propnotif, &ret->cp_container, &IID_IPropertyNotifySink);
1212     ConnectionPoint_Init(&ret->cp_htmldocevents, &ret->cp_container, &DIID_HTMLDocumentEvents);
1213     ConnectionPoint_Init(&ret->cp_htmldocevents2, &ret->cp_container, &DIID_HTMLDocumentEvents2);
1214
1215     ret->nscontainer = NSContainer_Create(ret, NULL);
1216     ret->window = HTMLWindow_Create(ret);
1217
1218     get_thread_hwnd();
1219
1220     return hres;
1221 }