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