2 * Copyright 2005 Jacek Caban
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.
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.
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
25 #define NONAMELESSUNION
26 #define NONAMELESSSTRUCT
35 #include "wine/debug.h"
36 #include "wine/unicode.h"
38 #include "mshtml_private.h"
39 #include "htmlevent.h"
41 WINE_DEFAULT_DEBUG_CHANNEL(mshtml
);
47 } download_proc_task_t
;
49 static BOOL
use_gecko_script(LPCWSTR url
)
51 static const WCHAR fileW
[] = {'f','i','l','e',':'};
52 static const WCHAR aboutW
[] = {'a','b','o','u','t',':'};
53 static const WCHAR resW
[] = {'r','e','s',':'};
55 return strncmpiW(fileW
, url
, sizeof(fileW
)/sizeof(WCHAR
))
56 && strncmpiW(aboutW
, url
, sizeof(aboutW
)/sizeof(WCHAR
))
57 && strncmpiW(resW
, url
, sizeof(resW
)/sizeof(WCHAR
));
60 void set_current_mon(HTMLWindow
*This
, IMoniker
*mon
)
65 IMoniker_Release(This
->mon
);
70 CoTaskMemFree(This
->url
);
80 hres
= IMoniker_GetDisplayName(mon
, NULL
, NULL
, &This
->url
);
82 WARN("GetDisplayName failed: %08x\n", hres
);
84 set_script_mode(This
, use_gecko_script(This
->url
) ? SCRIPTMODE_GECKO
: SCRIPTMODE_ACTIVESCRIPT
);
87 static void set_progress_proc(task_t
*_task
)
89 docobj_task_t
*task
= (docobj_task_t
*)_task
;
90 IOleCommandTarget
*olecmd
= NULL
;
91 HTMLDocumentObj
*doc
= task
->doc
;
97 IOleClientSite_QueryInterface(doc
->client
, &IID_IOleCommandTarget
, (void**)&olecmd
);
100 VARIANT progress_max
, progress
;
102 V_VT(&progress_max
) = VT_I4
;
103 V_I4(&progress_max
) = 0; /* FIXME */
104 IOleCommandTarget_Exec(olecmd
, NULL
, OLECMDID_SETPROGRESSMAX
, OLECMDEXECOPT_DONTPROMPTUSER
,
105 &progress_max
, NULL
);
107 V_VT(&progress
) = VT_I4
;
108 V_I4(&progress
) = 0; /* FIXME */
109 IOleCommandTarget_Exec(olecmd
, NULL
, OLECMDID_SETPROGRESSPOS
, OLECMDEXECOPT_DONTPROMPTUSER
,
113 if(doc
->usermode
== EDITMODE
&& doc
->hostui
) {
114 DOCHOSTUIINFO hostinfo
;
116 memset(&hostinfo
, 0, sizeof(DOCHOSTUIINFO
));
117 hostinfo
.cbSize
= sizeof(DOCHOSTUIINFO
);
118 hres
= IDocHostUIHandler_GetHostInfo(doc
->hostui
, &hostinfo
);
120 /* FIXME: use hostinfo */
121 TRACE("hostinfo = {%u %08x %08x %s %s}\n",
122 hostinfo
.cbSize
, hostinfo
.dwFlags
, hostinfo
.dwDoubleClick
,
123 debugstr_w(hostinfo
.pchHostCss
), debugstr_w(hostinfo
.pchHostNS
));
127 static void set_downloading_proc(task_t
*_task
)
129 download_proc_task_t
*task
= (download_proc_task_t
*)_task
;
130 HTMLDocumentObj
*doc
= task
->doc
;
131 IOleCommandTarget
*olecmd
;
134 TRACE("(%p)\n", doc
);
137 IOleInPlaceFrame_SetStatusText(doc
->frame
, NULL
/* FIXME */);
142 if(task
->set_download
) {
143 hres
= IOleClientSite_QueryInterface(doc
->client
, &IID_IOleCommandTarget
, (void**)&olecmd
);
144 if(SUCCEEDED(hres
)) {
150 IOleCommandTarget_Exec(olecmd
, NULL
, OLECMDID_SETDOWNLOADSTATE
,
151 OLECMDEXECOPT_DONTPROMPTUSER
, &var
, NULL
);
152 IOleCommandTarget_Release(olecmd
);
155 doc
->download_state
= 1;
159 IAdviseSink_OnViewChange(doc
->view_sink
, DVASPECT_CONTENT
, -1);
162 IDropTarget
*drop_target
= NULL
;
164 hres
= IDocHostUIHandler_GetDropTarget(doc
->hostui
, NULL
/* FIXME */, &drop_target
);
166 FIXME("Use IDropTarget\n");
167 IDropTarget_Release(drop_target
);
172 HRESULT
set_moniker(HTMLDocument
*This
, IMoniker
*mon
, IBindCtx
*pibc
, nsChannelBSC
*async_bsc
, BOOL set_download
)
174 nsChannelBSC
*bscallback
;
176 download_proc_task_t
*download_task
;
181 hres
= IMoniker_GetDisplayName(mon
, pibc
, NULL
, &url
);
183 WARN("GetDiaplayName failed: %08x\n", hres
);
187 TRACE("got url: %s\n", debugstr_w(url
));
189 if(This
->doc_obj
->client
) {
190 VARIANT silent
, offline
;
192 hres
= get_client_disp_property(This
->doc_obj
->client
, DISPID_AMBIENT_SILENT
, &silent
);
193 if(SUCCEEDED(hres
)) {
194 if(V_VT(&silent
) != VT_BOOL
)
195 WARN("V_VT(silent) = %d\n", V_VT(&silent
));
196 else if(V_BOOL(&silent
))
197 FIXME("silent == true\n");
200 hres
= get_client_disp_property(This
->doc_obj
->client
,
201 DISPID_AMBIENT_OFFLINEIFNOTCONNECTED
, &offline
);
202 if(SUCCEEDED(hres
)) {
203 if(V_VT(&silent
) != VT_BOOL
)
204 WARN("V_VT(offline) = %d\n", V_VT(&silent
));
205 else if(V_BOOL(&silent
))
206 FIXME("offline == true\n");
210 if(This
->window
->mon
) {
211 update_doc(This
, UPDATE_TITLE
|UPDATE_UI
);
213 update_doc(This
, UPDATE_TITLE
);
214 set_current_mon(This
->window
, mon
);
217 set_ready_state(This
->window
, READYSTATE_LOADING
);
219 if(This
->doc_obj
->client
) {
220 IOleCommandTarget
*cmdtrg
= NULL
;
222 hres
= IOleClientSite_QueryInterface(This
->doc_obj
->client
, &IID_IOleCommandTarget
,
224 if(SUCCEEDED(hres
)) {
230 IOleCommandTarget_Exec(cmdtrg
, &CGID_ShellDocView
, 37, 0, &var
, NULL
);
232 V_VT(&var
) = VT_UNKNOWN
;
233 V_UNKNOWN(&var
) = (IUnknown
*)HTMLWINDOW2(This
->window
);
234 V_VT(&out
) = VT_EMPTY
;
235 hres
= IOleCommandTarget_Exec(cmdtrg
, &CGID_ShellDocView
, 63, 0, &var
, &out
);
240 IOleCommandTarget_Release(cmdtrg
);
244 hres
= create_doc_uri(This
->window
, url
, &nsuri
);
250 bscallback
= async_bsc
;
252 hres
= create_channelbsc(mon
, NULL
, NULL
, 0, &bscallback
);
257 hres
= load_nsuri(This
->window
, nsuri
, bscallback
, LOAD_INITIAL_DOCUMENT_URI
);
258 nsISupports_Release((nsISupports
*)nsuri
); /* FIXME */
260 set_window_bscallback(This
->window
, bscallback
);
261 if(bscallback
!= async_bsc
)
262 IUnknown_Release((IUnknown
*)bscallback
);
266 HTMLDocument_LockContainer(This
->doc_obj
, TRUE
);
268 if(This
->doc_obj
->frame
) {
269 task
= heap_alloc(sizeof(docobj_task_t
));
270 task
->doc
= This
->doc_obj
;
271 push_task(&task
->header
, set_progress_proc
, This
->doc_obj
->basedoc
.task_magic
);
274 download_task
= heap_alloc(sizeof(download_proc_task_t
));
275 download_task
->doc
= This
->doc_obj
;
276 download_task
->set_download
= set_download
;
277 push_task(&download_task
->header
, set_downloading_proc
, This
->doc_obj
->basedoc
.task_magic
);
282 void set_ready_state(HTMLWindow
*window
, READYSTATE readystate
)
284 window
->readystate
= readystate
;
285 if(window
->doc_obj
&& window
->doc_obj
->basedoc
.window
== window
)
286 call_property_onchanged(&window
->doc_obj
->basedoc
.cp_propnotif
, DISPID_READYSTATE
);
287 if(window
->frame_element
)
288 fire_event(window
->frame_element
->element
.node
.doc
, EVENTID_READYSTATECHANGE
,
289 window
->frame_element
->element
.node
.nsnode
, NULL
);
292 static HRESULT
get_doc_string(HTMLDocumentNode
*This
, char **str
)
300 WARN("NULL nsdoc\n");
304 nsres
= nsIDOMHTMLDocument_QueryInterface(This
->nsdoc
, &IID_nsIDOMNode
, (void**)&nsnode
);
305 if(NS_FAILED(nsres
)) {
306 ERR("Could not get nsIDOMNode failed: %08x\n", nsres
);
310 nsAString_Init(&nsstr
, NULL
);
311 nsnode_to_nsstring(nsnode
, &nsstr
);
312 nsIDOMNode_Release(nsnode
);
314 nsAString_GetData(&nsstr
, &strw
);
315 TRACE("%s\n", debugstr_w(strw
));
317 *str
= heap_strdupWtoA(strw
);
319 nsAString_Finish(&nsstr
);
325 /**********************************************************
326 * IPersistMoniker implementation
329 #define PERSISTMON_THIS(iface) DEFINE_THIS(HTMLDocument, PersistMoniker, iface)
331 static HRESULT WINAPI
PersistMoniker_QueryInterface(IPersistMoniker
*iface
, REFIID riid
,
334 HTMLDocument
*This
= PERSISTMON_THIS(iface
);
335 return IHTMLDocument2_QueryInterface(HTMLDOC(This
), riid
, ppvObject
);
338 static ULONG WINAPI
PersistMoniker_AddRef(IPersistMoniker
*iface
)
340 HTMLDocument
*This
= PERSISTMON_THIS(iface
);
341 return IHTMLDocument2_AddRef(HTMLDOC(This
));
344 static ULONG WINAPI
PersistMoniker_Release(IPersistMoniker
*iface
)
346 HTMLDocument
*This
= PERSISTMON_THIS(iface
);
347 return IHTMLDocument2_Release(HTMLDOC(This
));
350 static HRESULT WINAPI
PersistMoniker_GetClassID(IPersistMoniker
*iface
, CLSID
*pClassID
)
352 HTMLDocument
*This
= PERSISTMON_THIS(iface
);
353 return IPersist_GetClassID(PERSIST(This
), pClassID
);
356 static HRESULT WINAPI
PersistMoniker_IsDirty(IPersistMoniker
*iface
)
358 HTMLDocument
*This
= PERSISTMON_THIS(iface
);
360 TRACE("(%p)\n", This
);
362 return IPersistStreamInit_IsDirty(PERSTRINIT(This
));
365 static HRESULT WINAPI
PersistMoniker_Load(IPersistMoniker
*iface
, BOOL fFullyAvailable
,
366 IMoniker
*pimkName
, LPBC pibc
, DWORD grfMode
)
368 HTMLDocument
*This
= PERSISTMON_THIS(iface
);
371 TRACE("(%p)->(%x %p %p %08x)\n", This
, fFullyAvailable
, pimkName
, pibc
, grfMode
);
374 IUnknown
*unk
= NULL
;
378 * "__PrecreatedObject"
379 * "BIND_CONTEXT_PARAM"
380 * "__HTMLLOADOPTIONS"
383 * "_ITransData_Object_"
387 IBindCtx_GetObjectParam(pibc
, (LPOLESTR
)SZ_HTML_CLIENTSITE_OBJECTPARAM
, &unk
);
389 IOleClientSite
*client
= NULL
;
391 hres
= IUnknown_QueryInterface(unk
, &IID_IOleClientSite
, (void**)&client
);
392 if(SUCCEEDED(hres
)) {
393 TRACE("Got client site %p\n", client
);
394 IOleObject_SetClientSite(OLEOBJ(This
), client
);
395 IOleClientSite_Release(client
);
398 IUnknown_Release(unk
);
402 hres
= set_moniker(This
, pimkName
, pibc
, NULL
, TRUE
);
406 return start_binding(This
->window
, NULL
, (BSCallback
*)This
->window
->bscallback
, pibc
);
409 static HRESULT WINAPI
PersistMoniker_Save(IPersistMoniker
*iface
, IMoniker
*pimkName
,
410 LPBC pbc
, BOOL fRemember
)
412 HTMLDocument
*This
= PERSISTMON_THIS(iface
);
413 FIXME("(%p)->(%p %p %x)\n", This
, pimkName
, pbc
, fRemember
);
417 static HRESULT WINAPI
PersistMoniker_SaveCompleted(IPersistMoniker
*iface
, IMoniker
*pimkName
, LPBC pibc
)
419 HTMLDocument
*This
= PERSISTMON_THIS(iface
);
420 FIXME("(%p)->(%p %p)\n", This
, pimkName
, pibc
);
424 static HRESULT WINAPI
PersistMoniker_GetCurMoniker(IPersistMoniker
*iface
, IMoniker
**ppimkName
)
426 HTMLDocument
*This
= PERSISTMON_THIS(iface
);
428 TRACE("(%p)->(%p)\n", This
, ppimkName
);
430 if(!This
->window
|| !This
->window
->mon
)
433 IMoniker_AddRef(This
->window
->mon
);
434 *ppimkName
= This
->window
->mon
;
438 static const IPersistMonikerVtbl PersistMonikerVtbl
= {
439 PersistMoniker_QueryInterface
,
440 PersistMoniker_AddRef
,
441 PersistMoniker_Release
,
442 PersistMoniker_GetClassID
,
443 PersistMoniker_IsDirty
,
446 PersistMoniker_SaveCompleted
,
447 PersistMoniker_GetCurMoniker
450 /**********************************************************
451 * IMonikerProp implementation
454 #define MONPROP_THIS(iface) DEFINE_THIS(HTMLDocument, MonikerProp, iface)
456 static HRESULT WINAPI
MonikerProp_QueryInterface(IMonikerProp
*iface
, REFIID riid
, void **ppvObject
)
458 HTMLDocument
*This
= MONPROP_THIS(iface
);
459 return IHTMLDocument2_QueryInterface(HTMLDOC(This
), riid
, ppvObject
);
462 static ULONG WINAPI
MonikerProp_AddRef(IMonikerProp
*iface
)
464 HTMLDocument
*This
= MONPROP_THIS(iface
);
465 return IHTMLDocument2_AddRef(HTMLDOC(This
));
468 static ULONG WINAPI
MonikerProp_Release(IMonikerProp
*iface
)
470 HTMLDocument
*This
= MONPROP_THIS(iface
);
471 return IHTMLDocument_Release(HTMLDOC(This
));
474 static HRESULT WINAPI
MonikerProp_PutProperty(IMonikerProp
*iface
, MONIKERPROPERTY mkp
, LPCWSTR val
)
476 HTMLDocument
*This
= MONPROP_THIS(iface
);
478 TRACE("(%p)->(%d %s)\n", This
, mkp
, debugstr_w(val
));
482 heap_free(This
->doc_obj
->mime
);
483 This
->doc_obj
->mime
= heap_strdupW(val
);
490 FIXME("mkp %d\n", mkp
);
497 static const IMonikerPropVtbl MonikerPropVtbl
= {
498 MonikerProp_QueryInterface
,
501 MonikerProp_PutProperty
504 /**********************************************************
505 * IPersistFile implementation
508 #define PERSISTFILE_THIS(iface) DEFINE_THIS(HTMLDocument, PersistFile, iface)
510 static HRESULT WINAPI
PersistFile_QueryInterface(IPersistFile
*iface
, REFIID riid
, void **ppvObject
)
512 HTMLDocument
*This
= PERSISTFILE_THIS(iface
);
513 return IHTMLDocument2_QueryInterface(HTMLDOC(This
), riid
, ppvObject
);
516 static ULONG WINAPI
PersistFile_AddRef(IPersistFile
*iface
)
518 HTMLDocument
*This
= PERSISTFILE_THIS(iface
);
519 return IHTMLDocument2_AddRef(HTMLDOC(This
));
522 static ULONG WINAPI
PersistFile_Release(IPersistFile
*iface
)
524 HTMLDocument
*This
= PERSISTFILE_THIS(iface
);
525 return IHTMLDocument2_Release(HTMLDOC(This
));
528 static HRESULT WINAPI
PersistFile_GetClassID(IPersistFile
*iface
, CLSID
*pClassID
)
530 HTMLDocument
*This
= PERSISTFILE_THIS(iface
);
532 TRACE("(%p)->(%p)\n", This
, pClassID
);
537 *pClassID
= CLSID_HTMLDocument
;
541 static HRESULT WINAPI
PersistFile_IsDirty(IPersistFile
*iface
)
543 HTMLDocument
*This
= PERSISTFILE_THIS(iface
);
545 TRACE("(%p)\n", This
);
547 return IPersistStreamInit_IsDirty(PERSTRINIT(This
));
550 static HRESULT WINAPI
PersistFile_Load(IPersistFile
*iface
, LPCOLESTR pszFileName
, DWORD dwMode
)
552 HTMLDocument
*This
= PERSISTFILE_THIS(iface
);
553 FIXME("(%p)->(%s %08x)\n", This
, debugstr_w(pszFileName
), dwMode
);
557 static HRESULT WINAPI
PersistFile_Save(IPersistFile
*iface
, LPCOLESTR pszFileName
, BOOL fRemember
)
559 HTMLDocument
*This
= PERSISTFILE_THIS(iface
);
565 TRACE("(%p)->(%s %x)\n", This
, debugstr_w(pszFileName
), fRemember
);
567 file
= CreateFileW(pszFileName
, GENERIC_WRITE
, 0, NULL
, CREATE_ALWAYS
,
568 FILE_ATTRIBUTE_NORMAL
, NULL
);
569 if(file
== INVALID_HANDLE_VALUE
) {
570 WARN("Could not create file: %u\n", GetLastError());
574 hres
= get_doc_string(This
->doc_node
, &str
);
576 WriteFile(file
, str
, strlen(str
), &written
, NULL
);
582 static HRESULT WINAPI
PersistFile_SaveCompleted(IPersistFile
*iface
, LPCOLESTR pszFileName
)
584 HTMLDocument
*This
= PERSISTFILE_THIS(iface
);
585 FIXME("(%p)->(%s)\n", This
, debugstr_w(pszFileName
));
589 static HRESULT WINAPI
PersistFile_GetCurFile(IPersistFile
*iface
, LPOLESTR
*pszFileName
)
591 HTMLDocument
*This
= PERSISTFILE_THIS(iface
);
592 FIXME("(%p)->(%p)\n", This
, pszFileName
);
596 static const IPersistFileVtbl PersistFileVtbl
= {
597 PersistFile_QueryInterface
,
600 PersistFile_GetClassID
,
604 PersistFile_SaveCompleted
,
605 PersistFile_GetCurFile
608 #define PERSTRINIT_THIS(iface) DEFINE_THIS(HTMLDocument, PersistStreamInit, iface)
610 static HRESULT WINAPI
PersistStreamInit_QueryInterface(IPersistStreamInit
*iface
,
611 REFIID riid
, void **ppv
)
613 HTMLDocument
*This
= PERSTRINIT_THIS(iface
);
614 return IHTMLDocument2_QueryInterface(HTMLDOC(This
), riid
, ppv
);
617 static ULONG WINAPI
PersistStreamInit_AddRef(IPersistStreamInit
*iface
)
619 HTMLDocument
*This
= PERSTRINIT_THIS(iface
);
620 return IHTMLDocument2_AddRef(HTMLDOC(This
));
623 static ULONG WINAPI
PersistStreamInit_Release(IPersistStreamInit
*iface
)
625 HTMLDocument
*This
= PERSTRINIT_THIS(iface
);
626 return IHTMLDocument2_Release(HTMLDOC(This
));
629 static HRESULT WINAPI
PersistStreamInit_GetClassID(IPersistStreamInit
*iface
, CLSID
*pClassID
)
631 HTMLDocument
*This
= PERSTRINIT_THIS(iface
);
632 return IPersist_GetClassID(PERSIST(This
), pClassID
);
635 static HRESULT WINAPI
PersistStreamInit_IsDirty(IPersistStreamInit
*iface
)
637 HTMLDocument
*This
= PERSTRINIT_THIS(iface
);
639 TRACE("(%p)\n", This
);
641 if(This
->doc_obj
->usermode
== EDITMODE
)
642 return editor_is_dirty(This
);
647 static HRESULT WINAPI
PersistStreamInit_Load(IPersistStreamInit
*iface
, LPSTREAM pStm
)
649 HTMLDocument
*This
= PERSTRINIT_THIS(iface
);
653 static const WCHAR about_blankW
[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
655 TRACE("(%p)->(%p)\n", This
, pStm
);
657 hres
= CreateURLMoniker(NULL
, about_blankW
, &mon
);
659 WARN("CreateURLMoniker failed: %08x\n", hres
);
663 hres
= set_moniker(This
, mon
, NULL
, NULL
, TRUE
);
664 IMoniker_Release(mon
);
668 return channelbsc_load_stream(This
->window
->bscallback
, pStm
);
671 static HRESULT WINAPI
PersistStreamInit_Save(IPersistStreamInit
*iface
, LPSTREAM pStm
,
674 HTMLDocument
*This
= PERSTRINIT_THIS(iface
);
679 TRACE("(%p)->(%p %x)\n", This
, pStm
, fClearDirty
);
681 hres
= get_doc_string(This
->doc_node
, &str
);
685 hres
= IStream_Write(pStm
, str
, strlen(str
), &written
);
687 FIXME("Write failed: %08x\n", hres
);
692 set_dirty(This
, VARIANT_FALSE
);
697 static HRESULT WINAPI
PersistStreamInit_GetSizeMax(IPersistStreamInit
*iface
,
698 ULARGE_INTEGER
*pcbSize
)
700 HTMLDocument
*This
= PERSTRINIT_THIS(iface
);
701 FIXME("(%p)->(%p)\n", This
, pcbSize
);
705 static HRESULT WINAPI
PersistStreamInit_InitNew(IPersistStreamInit
*iface
)
707 HTMLDocument
*This
= PERSTRINIT_THIS(iface
);
711 static const WCHAR about_blankW
[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
713 TRACE("(%p)\n", This
);
715 hres
= CreateURLMoniker(NULL
, about_blankW
, &mon
);
717 WARN("CreateURLMoniker failed: %08x\n", hres
);
721 hres
= set_moniker(This
, mon
, NULL
, NULL
, FALSE
);
722 IMoniker_Release(mon
);
726 return start_binding(This
->window
, NULL
, (BSCallback
*)This
->window
->bscallback
, NULL
);
729 #undef PERSTRINIT_THIS
731 static const IPersistStreamInitVtbl PersistStreamInitVtbl
= {
732 PersistStreamInit_QueryInterface
,
733 PersistStreamInit_AddRef
,
734 PersistStreamInit_Release
,
735 PersistStreamInit_GetClassID
,
736 PersistStreamInit_IsDirty
,
737 PersistStreamInit_Load
,
738 PersistStreamInit_Save
,
739 PersistStreamInit_GetSizeMax
,
740 PersistStreamInit_InitNew
743 /**********************************************************
744 * IPersistHistory implementation
747 #define PERSISTHIST_THIS(iface) DEFINE_THIS(HTMLDocument, PersistHistory, iface)
749 static HRESULT WINAPI
PersistHistory_QueryInterface(IPersistHistory
*iface
, REFIID riid
, void **ppvObject
)
751 HTMLDocument
*This
= PERSISTHIST_THIS(iface
);
752 return IHTMLDocument2_QueryInterface(HTMLDOC(This
), riid
, ppvObject
);
755 static ULONG WINAPI
PersistHistory_AddRef(IPersistHistory
*iface
)
757 HTMLDocument
*This
= PERSISTHIST_THIS(iface
);
758 return IHTMLDocument2_AddRef(HTMLDOC(This
));
761 static ULONG WINAPI
PersistHistory_Release(IPersistHistory
*iface
)
763 HTMLDocument
*This
= PERSISTHIST_THIS(iface
);
764 return IHTMLDocument2_Release(HTMLDOC(This
));
767 static HRESULT WINAPI
PersistHistory_GetClassID(IPersistHistory
*iface
, CLSID
*pClassID
)
769 HTMLDocument
*This
= PERSISTHIST_THIS(iface
);
770 return IPersist_GetClassID(PERSIST(This
), pClassID
);
773 static HRESULT WINAPI
PersistHistory_LoadHistory(IPersistHistory
*iface
, IStream
*pStream
, IBindCtx
*pbc
)
775 HTMLDocument
*This
= PERSISTHIST_THIS(iface
);
776 FIXME("(%p)->(%p %p)\n", This
, pStream
, pbc
);
780 static HRESULT WINAPI
PersistHistory_SaveHistory(IPersistHistory
*iface
, IStream
*pStream
)
782 HTMLDocument
*This
= PERSISTHIST_THIS(iface
);
783 FIXME("(%p)->(%p)\n", This
, pStream
);
787 static HRESULT WINAPI
PersistHistory_SetPositionCookie(IPersistHistory
*iface
, DWORD dwPositioncookie
)
789 HTMLDocument
*This
= PERSISTHIST_THIS(iface
);
790 FIXME("(%p)->(%x)\n", This
, dwPositioncookie
);
794 static HRESULT WINAPI
PersistHistory_GetPositionCookie(IPersistHistory
*iface
, DWORD
*pdwPositioncookie
)
796 HTMLDocument
*This
= PERSISTHIST_THIS(iface
);
797 FIXME("(%p)->(%p)\n", This
, pdwPositioncookie
);
801 #undef PERSISTHIST_THIS
803 static const IPersistHistoryVtbl PersistHistoryVtbl
= {
804 PersistHistory_QueryInterface
,
805 PersistHistory_AddRef
,
806 PersistHistory_Release
,
807 PersistHistory_GetClassID
,
808 PersistHistory_LoadHistory
,
809 PersistHistory_SaveHistory
,
810 PersistHistory_SetPositionCookie
,
811 PersistHistory_GetPositionCookie
814 void HTMLDocument_Persist_Init(HTMLDocument
*This
)
816 This
->lpPersistMonikerVtbl
= &PersistMonikerVtbl
;
817 This
->lpPersistFileVtbl
= &PersistFileVtbl
;
818 This
->lpMonikerPropVtbl
= &MonikerPropVtbl
;
819 This
->lpPersistStreamInitVtbl
= &PersistStreamInitVtbl
;
820 This
->lpPersistHistoryVtbl
= &PersistHistoryVtbl
;