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