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"
42 WINE_DEFAULT_DEBUG_CHANNEL(mshtml
);
49 } download_proc_task_t
;
51 static BOOL
use_gecko_script(LPCWSTR url
)
53 static const WCHAR fileW
[] = {'f','i','l','e',':'};
54 static const WCHAR aboutW
[] = {'a','b','o','u','t',':'};
55 static const WCHAR resW
[] = {'r','e','s',':'};
57 return strncmpiW(fileW
, url
, sizeof(fileW
)/sizeof(WCHAR
))
58 && strncmpiW(aboutW
, url
, sizeof(aboutW
)/sizeof(WCHAR
))
59 && strncmpiW(resW
, url
, sizeof(resW
)/sizeof(WCHAR
));
62 void set_current_mon(HTMLWindow
*This
, IMoniker
*mon
)
67 IMoniker_Release(This
->mon
);
72 CoTaskMemFree(This
->url
);
82 hres
= IMoniker_GetDisplayName(mon
, NULL
, NULL
, &This
->url
);
84 WARN("GetDisplayName failed: %08x\n", hres
);
86 set_script_mode(This
, use_gecko_script(This
->url
) ? SCRIPTMODE_GECKO
: SCRIPTMODE_ACTIVESCRIPT
);
89 static void set_progress_proc(task_t
*_task
)
91 docobj_task_t
*task
= (docobj_task_t
*)_task
;
92 IOleCommandTarget
*olecmd
= NULL
;
93 HTMLDocumentObj
*doc
= task
->doc
;
99 IOleClientSite_QueryInterface(doc
->client
, &IID_IOleCommandTarget
, (void**)&olecmd
);
102 VARIANT progress_max
, progress
;
104 V_VT(&progress_max
) = VT_I4
;
105 V_I4(&progress_max
) = 0; /* FIXME */
106 IOleCommandTarget_Exec(olecmd
, NULL
, OLECMDID_SETPROGRESSMAX
, OLECMDEXECOPT_DONTPROMPTUSER
,
107 &progress_max
, NULL
);
109 V_VT(&progress
) = VT_I4
;
110 V_I4(&progress
) = 0; /* FIXME */
111 IOleCommandTarget_Exec(olecmd
, NULL
, OLECMDID_SETPROGRESSPOS
, OLECMDEXECOPT_DONTPROMPTUSER
,
113 IOleCommandTarget_Release(olecmd
);
116 if(doc
->usermode
== EDITMODE
&& doc
->hostui
) {
117 DOCHOSTUIINFO hostinfo
;
119 memset(&hostinfo
, 0, sizeof(DOCHOSTUIINFO
));
120 hostinfo
.cbSize
= sizeof(DOCHOSTUIINFO
);
121 hres
= IDocHostUIHandler_GetHostInfo(doc
->hostui
, &hostinfo
);
123 /* FIXME: use hostinfo */
124 TRACE("hostinfo = {%u %08x %08x %s %s}\n",
125 hostinfo
.cbSize
, hostinfo
.dwFlags
, hostinfo
.dwDoubleClick
,
126 debugstr_w(hostinfo
.pchHostCss
), debugstr_w(hostinfo
.pchHostNS
));
130 static void set_downloading_proc(task_t
*_task
)
132 download_proc_task_t
*task
= (download_proc_task_t
*)_task
;
133 HTMLDocumentObj
*doc
= task
->doc
;
134 IOleCommandTarget
*olecmd
;
137 TRACE("(%p)\n", doc
);
139 set_statustext(doc
, IDS_STATUS_DOWNLOADINGFROM
, task
->url
);
140 CoTaskMemFree(task
->url
);
145 if(task
->set_download
) {
146 hres
= IOleClientSite_QueryInterface(doc
->client
, &IID_IOleCommandTarget
, (void**)&olecmd
);
147 if(SUCCEEDED(hres
)) {
153 IOleCommandTarget_Exec(olecmd
, NULL
, OLECMDID_SETDOWNLOADSTATE
,
154 OLECMDEXECOPT_DONTPROMPTUSER
, &var
, NULL
);
155 IOleCommandTarget_Release(olecmd
);
158 doc
->download_state
= 1;
162 IAdviseSink_OnViewChange(doc
->view_sink
, DVASPECT_CONTENT
, -1);
165 IDropTarget
*drop_target
= NULL
;
167 hres
= IDocHostUIHandler_GetDropTarget(doc
->hostui
, NULL
/* FIXME */, &drop_target
);
169 FIXME("Use IDropTarget\n");
170 IDropTarget_Release(drop_target
);
175 HRESULT
set_moniker(HTMLDocument
*This
, IMoniker
*mon
, IBindCtx
*pibc
, nsChannelBSC
*async_bsc
, BOOL set_download
)
177 nsChannelBSC
*bscallback
;
179 download_proc_task_t
*download_task
;
184 hres
= IMoniker_GetDisplayName(mon
, pibc
, NULL
, &url
);
186 WARN("GetDiaplayName failed: %08x\n", hres
);
190 TRACE("got url: %s\n", debugstr_w(url
));
192 if(This
->doc_obj
->client
) {
193 VARIANT silent
, offline
;
195 hres
= get_client_disp_property(This
->doc_obj
->client
, DISPID_AMBIENT_SILENT
, &silent
);
196 if(SUCCEEDED(hres
)) {
197 if(V_VT(&silent
) != VT_BOOL
)
198 WARN("V_VT(silent) = %d\n", V_VT(&silent
));
199 else if(V_BOOL(&silent
))
200 FIXME("silent == true\n");
203 hres
= get_client_disp_property(This
->doc_obj
->client
,
204 DISPID_AMBIENT_OFFLINEIFNOTCONNECTED
, &offline
);
205 if(SUCCEEDED(hres
)) {
206 if(V_VT(&silent
) != VT_BOOL
)
207 WARN("V_VT(offline) = %d\n", V_VT(&silent
));
208 else if(V_BOOL(&silent
))
209 FIXME("offline == true\n");
213 if(This
->window
->mon
) {
214 update_doc(This
, UPDATE_TITLE
|UPDATE_UI
);
216 update_doc(This
, UPDATE_TITLE
);
217 set_current_mon(This
->window
, mon
);
220 set_ready_state(This
->window
, READYSTATE_LOADING
);
222 if(This
->doc_obj
->client
) {
223 IOleCommandTarget
*cmdtrg
= NULL
;
225 hres
= IOleClientSite_QueryInterface(This
->doc_obj
->client
, &IID_IOleCommandTarget
,
227 if(SUCCEEDED(hres
)) {
233 IOleCommandTarget_Exec(cmdtrg
, &CGID_ShellDocView
, 37, 0, &var
, NULL
);
235 V_VT(&var
) = VT_UNKNOWN
;
236 V_UNKNOWN(&var
) = (IUnknown
*)HTMLWINDOW2(This
->window
);
237 V_VT(&out
) = VT_EMPTY
;
238 hres
= IOleCommandTarget_Exec(cmdtrg
, &CGID_ShellDocView
, 63, 0, &var
, &out
);
243 IOleCommandTarget_Release(cmdtrg
);
247 hres
= create_doc_uri(This
->window
, url
, &nsuri
);
252 bscallback
= async_bsc
;
254 hres
= create_channelbsc(mon
, NULL
, NULL
, 0, &bscallback
);
260 hres
= load_nsuri(This
->window
, nsuri
, bscallback
, LOAD_INITIAL_DOCUMENT_URI
);
261 nsISupports_Release((nsISupports
*)nsuri
); /* FIXME */
263 set_window_bscallback(This
->window
, bscallback
);
264 if(bscallback
!= async_bsc
)
265 IUnknown_Release((IUnknown
*)bscallback
);
274 HTMLDocument_LockContainer(This
->doc_obj
, TRUE
);
276 if(This
->doc_obj
->frame
) {
277 task
= heap_alloc(sizeof(docobj_task_t
));
278 task
->doc
= This
->doc_obj
;
279 push_task(&task
->header
, set_progress_proc
, This
->doc_obj
->basedoc
.task_magic
);
282 download_task
= heap_alloc(sizeof(download_proc_task_t
));
283 download_task
->doc
= This
->doc_obj
;
284 download_task
->set_download
= set_download
;
285 download_task
->url
= url
;
286 push_task(&download_task
->header
, set_downloading_proc
, This
->doc_obj
->basedoc
.task_magic
);
291 void set_ready_state(HTMLWindow
*window
, READYSTATE readystate
)
293 window
->readystate
= readystate
;
295 if(window
->doc_obj
&& window
->doc_obj
->basedoc
.window
== window
)
296 call_property_onchanged(&window
->doc_obj
->basedoc
.cp_propnotif
, DISPID_READYSTATE
);
298 fire_event(window
->doc
, EVENTID_READYSTATECHANGE
, FALSE
, window
->doc
->node
.nsnode
, NULL
);
300 if(window
->frame_element
)
301 fire_event(window
->frame_element
->element
.node
.doc
, EVENTID_READYSTATECHANGE
,
302 TRUE
, window
->frame_element
->element
.node
.nsnode
, NULL
);
305 static HRESULT
get_doc_string(HTMLDocumentNode
*This
, char **str
)
313 WARN("NULL nsdoc\n");
317 nsres
= nsIDOMHTMLDocument_QueryInterface(This
->nsdoc
, &IID_nsIDOMNode
, (void**)&nsnode
);
318 if(NS_FAILED(nsres
)) {
319 ERR("Could not get nsIDOMNode failed: %08x\n", nsres
);
323 nsAString_Init(&nsstr
, NULL
);
324 nsnode_to_nsstring(nsnode
, &nsstr
);
325 nsIDOMNode_Release(nsnode
);
327 nsAString_GetData(&nsstr
, &strw
);
328 TRACE("%s\n", debugstr_w(strw
));
330 *str
= heap_strdupWtoA(strw
);
332 nsAString_Finish(&nsstr
);
338 /**********************************************************
339 * IPersistMoniker implementation
342 static inline HTMLDocument
*impl_from_IPersistMoniker(IPersistMoniker
*iface
)
344 return CONTAINING_RECORD(iface
, HTMLDocument
, IPersistMoniker_iface
);
347 static HRESULT WINAPI
PersistMoniker_QueryInterface(IPersistMoniker
*iface
, REFIID riid
, void **ppv
)
349 HTMLDocument
*This
= impl_from_IPersistMoniker(iface
);
350 return htmldoc_query_interface(This
, riid
, ppv
);
353 static ULONG WINAPI
PersistMoniker_AddRef(IPersistMoniker
*iface
)
355 HTMLDocument
*This
= impl_from_IPersistMoniker(iface
);
356 return htmldoc_addref(This
);
359 static ULONG WINAPI
PersistMoniker_Release(IPersistMoniker
*iface
)
361 HTMLDocument
*This
= impl_from_IPersistMoniker(iface
);
362 return htmldoc_release(This
);
365 static HRESULT WINAPI
PersistMoniker_GetClassID(IPersistMoniker
*iface
, CLSID
*pClassID
)
367 HTMLDocument
*This
= impl_from_IPersistMoniker(iface
);
368 return IPersist_GetClassID(&This
->IPersistFile_iface
, pClassID
);
371 static HRESULT WINAPI
PersistMoniker_IsDirty(IPersistMoniker
*iface
)
373 HTMLDocument
*This
= impl_from_IPersistMoniker(iface
);
375 TRACE("(%p)\n", This
);
377 return IPersistStreamInit_IsDirty(&This
->IPersistStreamInit_iface
);
380 static HRESULT WINAPI
PersistMoniker_Load(IPersistMoniker
*iface
, BOOL fFullyAvailable
,
381 IMoniker
*pimkName
, LPBC pibc
, DWORD grfMode
)
383 HTMLDocument
*This
= impl_from_IPersistMoniker(iface
);
386 TRACE("(%p)->(%x %p %p %08x)\n", This
, fFullyAvailable
, pimkName
, pibc
, grfMode
);
389 IUnknown
*unk
= NULL
;
393 * "__PrecreatedObject"
394 * "BIND_CONTEXT_PARAM"
395 * "__HTMLLOADOPTIONS"
398 * "_ITransData_Object_"
402 IBindCtx_GetObjectParam(pibc
, (LPOLESTR
)SZ_HTML_CLIENTSITE_OBJECTPARAM
, &unk
);
404 IOleClientSite
*client
= NULL
;
406 hres
= IUnknown_QueryInterface(unk
, &IID_IOleClientSite
, (void**)&client
);
407 if(SUCCEEDED(hres
)) {
408 TRACE("Got client site %p\n", client
);
409 IOleObject_SetClientSite(OLEOBJ(This
), client
);
410 IOleClientSite_Release(client
);
413 IUnknown_Release(unk
);
417 hres
= set_moniker(This
, pimkName
, pibc
, NULL
, TRUE
);
421 return start_binding(This
->window
, NULL
, (BSCallback
*)This
->window
->bscallback
, pibc
);
424 static HRESULT WINAPI
PersistMoniker_Save(IPersistMoniker
*iface
, IMoniker
*pimkName
,
425 LPBC pbc
, BOOL fRemember
)
427 HTMLDocument
*This
= impl_from_IPersistMoniker(iface
);
428 FIXME("(%p)->(%p %p %x)\n", This
, pimkName
, pbc
, fRemember
);
432 static HRESULT WINAPI
PersistMoniker_SaveCompleted(IPersistMoniker
*iface
, IMoniker
*pimkName
, LPBC pibc
)
434 HTMLDocument
*This
= impl_from_IPersistMoniker(iface
);
435 FIXME("(%p)->(%p %p)\n", This
, pimkName
, pibc
);
439 static HRESULT WINAPI
PersistMoniker_GetCurMoniker(IPersistMoniker
*iface
, IMoniker
**ppimkName
)
441 HTMLDocument
*This
= impl_from_IPersistMoniker(iface
);
443 TRACE("(%p)->(%p)\n", This
, ppimkName
);
445 if(!This
->window
|| !This
->window
->mon
)
448 IMoniker_AddRef(This
->window
->mon
);
449 *ppimkName
= This
->window
->mon
;
453 static const IPersistMonikerVtbl PersistMonikerVtbl
= {
454 PersistMoniker_QueryInterface
,
455 PersistMoniker_AddRef
,
456 PersistMoniker_Release
,
457 PersistMoniker_GetClassID
,
458 PersistMoniker_IsDirty
,
461 PersistMoniker_SaveCompleted
,
462 PersistMoniker_GetCurMoniker
465 /**********************************************************
466 * IMonikerProp implementation
469 static inline HTMLDocument
*impl_from_IMonikerProp(IMonikerProp
*iface
)
471 return CONTAINING_RECORD(iface
, HTMLDocument
, IMonikerProp_iface
);
474 static HRESULT WINAPI
MonikerProp_QueryInterface(IMonikerProp
*iface
, REFIID riid
, void **ppv
)
476 HTMLDocument
*This
= impl_from_IMonikerProp(iface
);
477 return htmldoc_query_interface(This
, riid
, ppv
);
480 static ULONG WINAPI
MonikerProp_AddRef(IMonikerProp
*iface
)
482 HTMLDocument
*This
= impl_from_IMonikerProp(iface
);
483 return htmldoc_addref(This
);
486 static ULONG WINAPI
MonikerProp_Release(IMonikerProp
*iface
)
488 HTMLDocument
*This
= impl_from_IMonikerProp(iface
);
489 return htmldoc_release(This
);
492 static HRESULT WINAPI
MonikerProp_PutProperty(IMonikerProp
*iface
, MONIKERPROPERTY mkp
, LPCWSTR val
)
494 HTMLDocument
*This
= impl_from_IMonikerProp(iface
);
496 TRACE("(%p)->(%d %s)\n", This
, mkp
, debugstr_w(val
));
500 heap_free(This
->doc_obj
->mime
);
501 This
->doc_obj
->mime
= heap_strdupW(val
);
508 FIXME("mkp %d\n", mkp
);
515 static const IMonikerPropVtbl MonikerPropVtbl
= {
516 MonikerProp_QueryInterface
,
519 MonikerProp_PutProperty
522 /**********************************************************
523 * IPersistFile implementation
526 static inline HTMLDocument
*impl_from_IPersistFile(IPersistFile
*iface
)
528 return CONTAINING_RECORD(iface
, HTMLDocument
, IPersistFile_iface
);
531 static HRESULT WINAPI
PersistFile_QueryInterface(IPersistFile
*iface
, REFIID riid
, void **ppv
)
533 HTMLDocument
*This
= impl_from_IPersistFile(iface
);
534 return htmldoc_query_interface(This
, riid
, ppv
);
537 static ULONG WINAPI
PersistFile_AddRef(IPersistFile
*iface
)
539 HTMLDocument
*This
= impl_from_IPersistFile(iface
);
540 return htmldoc_addref(This
);
543 static ULONG WINAPI
PersistFile_Release(IPersistFile
*iface
)
545 HTMLDocument
*This
= impl_from_IPersistFile(iface
);
546 return htmldoc_release(This
);
549 static HRESULT WINAPI
PersistFile_GetClassID(IPersistFile
*iface
, CLSID
*pClassID
)
551 HTMLDocument
*This
= impl_from_IPersistFile(iface
);
553 TRACE("(%p)->(%p)\n", This
, pClassID
);
558 *pClassID
= CLSID_HTMLDocument
;
562 static HRESULT WINAPI
PersistFile_IsDirty(IPersistFile
*iface
)
564 HTMLDocument
*This
= impl_from_IPersistFile(iface
);
566 TRACE("(%p)\n", This
);
568 return IPersistStreamInit_IsDirty(&This
->IPersistStreamInit_iface
);
571 static HRESULT WINAPI
PersistFile_Load(IPersistFile
*iface
, LPCOLESTR pszFileName
, DWORD dwMode
)
573 HTMLDocument
*This
= impl_from_IPersistFile(iface
);
574 FIXME("(%p)->(%s %08x)\n", This
, debugstr_w(pszFileName
), dwMode
);
578 static HRESULT WINAPI
PersistFile_Save(IPersistFile
*iface
, LPCOLESTR pszFileName
, BOOL fRemember
)
580 HTMLDocument
*This
= impl_from_IPersistFile(iface
);
586 TRACE("(%p)->(%s %x)\n", This
, debugstr_w(pszFileName
), fRemember
);
588 file
= CreateFileW(pszFileName
, GENERIC_WRITE
, 0, NULL
, CREATE_ALWAYS
,
589 FILE_ATTRIBUTE_NORMAL
, NULL
);
590 if(file
== INVALID_HANDLE_VALUE
) {
591 WARN("Could not create file: %u\n", GetLastError());
595 hres
= get_doc_string(This
->doc_node
, &str
);
597 WriteFile(file
, str
, strlen(str
), &written
, NULL
);
603 static HRESULT WINAPI
PersistFile_SaveCompleted(IPersistFile
*iface
, LPCOLESTR pszFileName
)
605 HTMLDocument
*This
= impl_from_IPersistFile(iface
);
606 FIXME("(%p)->(%s)\n", This
, debugstr_w(pszFileName
));
610 static HRESULT WINAPI
PersistFile_GetCurFile(IPersistFile
*iface
, LPOLESTR
*pszFileName
)
612 HTMLDocument
*This
= impl_from_IPersistFile(iface
);
613 FIXME("(%p)->(%p)\n", This
, pszFileName
);
617 static const IPersistFileVtbl PersistFileVtbl
= {
618 PersistFile_QueryInterface
,
621 PersistFile_GetClassID
,
625 PersistFile_SaveCompleted
,
626 PersistFile_GetCurFile
629 static inline HTMLDocument
*impl_from_IPersistStreamInit(IPersistStreamInit
*iface
)
631 return CONTAINING_RECORD(iface
, HTMLDocument
, IPersistStreamInit_iface
);
634 static HRESULT WINAPI
PersistStreamInit_QueryInterface(IPersistStreamInit
*iface
,
635 REFIID riid
, void **ppv
)
637 HTMLDocument
*This
= impl_from_IPersistStreamInit(iface
);
638 return htmldoc_query_interface(This
, riid
, ppv
);
641 static ULONG WINAPI
PersistStreamInit_AddRef(IPersistStreamInit
*iface
)
643 HTMLDocument
*This
= impl_from_IPersistStreamInit(iface
);
644 return htmldoc_addref(This
);
647 static ULONG WINAPI
PersistStreamInit_Release(IPersistStreamInit
*iface
)
649 HTMLDocument
*This
= impl_from_IPersistStreamInit(iface
);
650 return htmldoc_release(This
);
653 static HRESULT WINAPI
PersistStreamInit_GetClassID(IPersistStreamInit
*iface
, CLSID
*pClassID
)
655 HTMLDocument
*This
= impl_from_IPersistStreamInit(iface
);
656 return IPersist_GetClassID(&This
->IPersistFile_iface
, pClassID
);
659 static HRESULT WINAPI
PersistStreamInit_IsDirty(IPersistStreamInit
*iface
)
661 HTMLDocument
*This
= impl_from_IPersistStreamInit(iface
);
663 TRACE("(%p)\n", This
);
665 if(This
->doc_obj
->usermode
== EDITMODE
)
666 return editor_is_dirty(This
);
671 static HRESULT WINAPI
PersistStreamInit_Load(IPersistStreamInit
*iface
, LPSTREAM pStm
)
673 HTMLDocument
*This
= impl_from_IPersistStreamInit(iface
);
677 static const WCHAR about_blankW
[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
679 TRACE("(%p)->(%p)\n", This
, pStm
);
681 hres
= CreateURLMoniker(NULL
, about_blankW
, &mon
);
683 WARN("CreateURLMoniker failed: %08x\n", hres
);
687 hres
= set_moniker(This
, mon
, NULL
, NULL
, TRUE
);
688 IMoniker_Release(mon
);
692 return channelbsc_load_stream(This
->window
->bscallback
, pStm
);
695 static HRESULT WINAPI
PersistStreamInit_Save(IPersistStreamInit
*iface
, LPSTREAM pStm
,
698 HTMLDocument
*This
= impl_from_IPersistStreamInit(iface
);
703 TRACE("(%p)->(%p %x)\n", This
, pStm
, fClearDirty
);
705 hres
= get_doc_string(This
->doc_node
, &str
);
709 hres
= IStream_Write(pStm
, str
, strlen(str
), &written
);
711 FIXME("Write failed: %08x\n", hres
);
716 set_dirty(This
, VARIANT_FALSE
);
721 static HRESULT WINAPI
PersistStreamInit_GetSizeMax(IPersistStreamInit
*iface
,
722 ULARGE_INTEGER
*pcbSize
)
724 HTMLDocument
*This
= impl_from_IPersistStreamInit(iface
);
725 FIXME("(%p)->(%p)\n", This
, pcbSize
);
729 static HRESULT WINAPI
PersistStreamInit_InitNew(IPersistStreamInit
*iface
)
731 HTMLDocument
*This
= impl_from_IPersistStreamInit(iface
);
735 static const WCHAR about_blankW
[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
737 TRACE("(%p)\n", This
);
739 hres
= CreateURLMoniker(NULL
, about_blankW
, &mon
);
741 WARN("CreateURLMoniker failed: %08x\n", hres
);
745 hres
= set_moniker(This
, mon
, NULL
, NULL
, FALSE
);
746 IMoniker_Release(mon
);
750 return channelbsc_load_stream(This
->window
->bscallback
, NULL
);
753 static const IPersistStreamInitVtbl PersistStreamInitVtbl
= {
754 PersistStreamInit_QueryInterface
,
755 PersistStreamInit_AddRef
,
756 PersistStreamInit_Release
,
757 PersistStreamInit_GetClassID
,
758 PersistStreamInit_IsDirty
,
759 PersistStreamInit_Load
,
760 PersistStreamInit_Save
,
761 PersistStreamInit_GetSizeMax
,
762 PersistStreamInit_InitNew
765 /**********************************************************
766 * IPersistHistory implementation
769 static inline HTMLDocument
*impl_from_IPersistHistory(IPersistHistory
*iface
)
771 return CONTAINING_RECORD(iface
, HTMLDocument
, IPersistHistory_iface
);
774 static HRESULT WINAPI
PersistHistory_QueryInterface(IPersistHistory
*iface
, REFIID riid
, void **ppv
)
776 HTMLDocument
*This
= impl_from_IPersistHistory(iface
);
777 return htmldoc_query_interface(This
, riid
, ppv
);
780 static ULONG WINAPI
PersistHistory_AddRef(IPersistHistory
*iface
)
782 HTMLDocument
*This
= impl_from_IPersistHistory(iface
);
783 return htmldoc_addref(This
);
786 static ULONG WINAPI
PersistHistory_Release(IPersistHistory
*iface
)
788 HTMLDocument
*This
= impl_from_IPersistHistory(iface
);
789 return htmldoc_release(This
);
792 static HRESULT WINAPI
PersistHistory_GetClassID(IPersistHistory
*iface
, CLSID
*pClassID
)
794 HTMLDocument
*This
= impl_from_IPersistHistory(iface
);
795 return IPersist_GetClassID(&This
->IPersistFile_iface
, pClassID
);
798 static HRESULT WINAPI
PersistHistory_LoadHistory(IPersistHistory
*iface
, IStream
*pStream
, IBindCtx
*pbc
)
800 HTMLDocument
*This
= impl_from_IPersistHistory(iface
);
801 FIXME("(%p)->(%p %p)\n", This
, pStream
, pbc
);
805 static HRESULT WINAPI
PersistHistory_SaveHistory(IPersistHistory
*iface
, IStream
*pStream
)
807 HTMLDocument
*This
= impl_from_IPersistHistory(iface
);
808 FIXME("(%p)->(%p)\n", This
, pStream
);
812 static HRESULT WINAPI
PersistHistory_SetPositionCookie(IPersistHistory
*iface
, DWORD dwPositioncookie
)
814 HTMLDocument
*This
= impl_from_IPersistHistory(iface
);
815 FIXME("(%p)->(%x)\n", This
, dwPositioncookie
);
819 static HRESULT WINAPI
PersistHistory_GetPositionCookie(IPersistHistory
*iface
, DWORD
*pdwPositioncookie
)
821 HTMLDocument
*This
= impl_from_IPersistHistory(iface
);
822 FIXME("(%p)->(%p)\n", This
, pdwPositioncookie
);
826 static const IPersistHistoryVtbl PersistHistoryVtbl
= {
827 PersistHistory_QueryInterface
,
828 PersistHistory_AddRef
,
829 PersistHistory_Release
,
830 PersistHistory_GetClassID
,
831 PersistHistory_LoadHistory
,
832 PersistHistory_SaveHistory
,
833 PersistHistory_SetPositionCookie
,
834 PersistHistory_GetPositionCookie
837 void HTMLDocument_Persist_Init(HTMLDocument
*This
)
839 This
->IPersistMoniker_iface
.lpVtbl
= &PersistMonikerVtbl
;
840 This
->IPersistFile_iface
.lpVtbl
= &PersistFileVtbl
;
841 This
->IMonikerProp_iface
.lpVtbl
= &MonikerPropVtbl
;
842 This
->IPersistStreamInit_iface
.lpVtbl
= &PersistStreamInitVtbl
;
843 This
->IPersistHistory_iface
.lpVtbl
= &PersistHistoryVtbl
;