static HRESULT navigate_history(DocHost *This, unsigned travellog_pos)
{
IPersistHistory *persist_history;
travellog_entry_t *entry;
LARGE_INTEGER li;
HRESULT hres;
if(!This->doc_navigate) {
FIXME("unsupported doc_navigate FALSE\n");
return E_NOTIMPL;
}
This->travellog.loading_pos = travellog_pos;
entry = This->travellog.log + This->travellog.loading_pos;
update_navigation_commands(This);
if(!entry->stream)
return async_doc_navigate(This, entry->url, NULL, NULL, 0, FALSE);
hres = IUnknown_QueryInterface(This->document, &IID_IPersistHistory, (void**)&persist_history);
if(FAILED(hres))
return hres;
li.QuadPart = 0;
IStream_Seek(entry->stream, li, STREAM_SEEK_SET, NULL);
hres = IPersistHistory_LoadHistory(persist_history, entry->stream, NULL);
IPersistHistory_Release(persist_history);
return hres;
}
static HRESULT WINAPI DocObjectService_FireNavigateComplete2(
IDocObjectService* iface,
IHTMLWindow2 *pHTMLWindow2,
DWORD dwFlags)
{
ShellBrowser *This = impl_from_IDocObjectService(iface);
DocHost *doc_host = This->doc_host;
IHTMLPrivateWindow *priv_window;
VARIANTARG params[2];
DISPPARAMS dp = {params, NULL, 2, 0};
VARIANT url_var;
BSTR url;
HRESULT hres;
TRACE("%p %p %x\n", This, pHTMLWindow2, dwFlags);
update_navigation_commands(This->doc_host);
if(doc_host->travellog.loading_pos != -1) {
WARN("histupdate not notified\n");
doc_host->travellog.position = doc_host->travellog.loading_pos;
doc_host->travellog.loading_pos = -1;
}
hres = IHTMLWindow2_QueryInterface(pHTMLWindow2, &IID_IHTMLPrivateWindow, (void**)&priv_window);
if(FAILED(hres))
return hres;
hres = IHTMLPrivateWindow_GetAddressBarUrl(priv_window, &url);
IHTMLPrivateWindow_Release(priv_window);
if(FAILED(hres))
return hres;
TRACE("got URL %s\n", debugstr_w(url));
set_dochost_url(This->doc_host, url);
V_VT(params) = (VT_BYREF|VT_VARIANT);
V_VARIANTREF(params) = &url_var;
V_VT(params+1) = VT_DISPATCH;
V_DISPATCH(params+1) = (IDispatch*)doc_host->wb;
V_VT(&url_var) = VT_BSTR;
V_BSTR(&url_var) = url;
/* Keep reference to This. It may be released in event handler. */
IShellBrowser_AddRef(&This->IShellBrowser_iface);
TRACE(">>>\n");
call_sink(This->doc_host->cps.wbe2, DISPID_NAVIGATECOMPLETE2, &dp);
TRACE("<<<\n");
SysFreeString(url);
This->doc_host->busy = VARIANT_FALSE;
IShellBrowser_Release(&This->IShellBrowser_iface);
return S_OK;
}
