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