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