August 2010 - Wine-commits - list.winehq.org

Eric Pouech : dbghelp: dwarf debug info: a few more fixes to dwarf parsing.
by Alexandre Julliard 26 Aug '10

26 Aug '10

Module: wine Branch: master Commit: 1e0af22ad2ed5a0dc9bf7f39814b00b223ce453f URL: http://source.winehq.org/git/wine.git/?a=commit;h=1e0af22ad2ed5a0dc9bf7f398… Author: Eric Pouech <eric.pouech(a)orange.fr> Date: Wed Aug 25 21:43:46 2010 +0200 dbghelp: dwarf debug info: a few more fixes to dwarf parsing. --- dlls/dbghelp/dbghelp_private.h | 1 + dlls/dbghelp/dwarf.c | 16 ++++++++++++++++ programs/winedbg/memory.c | 5 ++++- 3 files changed, 21 insertions(+), 1 deletions(-) diff --git a/dlls/dbghelp/dbghelp_private.h b/dlls/dbghelp/dbghelp_private.h index f4c88a0..531a740 100644 --- a/dlls/dbghelp/dbghelp_private.h +++ b/dlls/dbghelp/dbghelp_private.h @@ -132,6 +132,7 @@ enum location_error {loc_err_internal = -1, /* internal while computing */ loc_err_too_complex = -2, /* couldn't compute location (even at runtime) */ loc_err_out_of_scope = -3, /* variable isn't available at current address */ loc_err_cant_read = -4, /* couldn't read memory at given address */ + loc_err_no_location = -5, /* likely optimized away (by compiler) */ }; struct location diff --git a/dlls/dbghelp/dwarf.c b/dlls/dbghelp/dwarf.c index a0fcc12..d67c72a 100644 --- a/dlls/dbghelp/dwarf.c +++ b/dlls/dbghelp/dwarf.c @@ -1511,6 +1511,22 @@ static void dwarf2_parse_variable(dwarf2_subprogram_t* subpgm, di->symt = &symt_new_constant(subpgm->ctx->module, subpgm->compiland, name.u.string, param_type, &v)->symt; } + else + { + /* variable has been optimiezd away... report anyway */ + loc.kind = loc_error; + loc.reg = loc_err_no_location; + if (subpgm->func) + { + symt_add_func_local(subpgm->ctx->module, subpgm->func, + is_pmt ? DataIsParam : DataIsLocal, + &loc, block, param_type, name.u.string); + } + else + { + WARN("dropping global variable %s which has been optimized away\n", name.u.string); + } + } if (is_pmt && subpgm->func && subpgm->func->type) symt_add_function_signature_parameter(subpgm->ctx->module, (struct symt_function_signature*)subpgm->func->type, diff --git a/programs/winedbg/memory.c b/programs/winedbg/memory.c index 7d6112a..1c8388c 100644 --- a/programs/winedbg/memory.c +++ b/programs/winedbg/memory.c @@ -676,7 +676,7 @@ BOOL memory_get_register(DWORD regno, DWORD_PTR** value, char* buffer, int len) const struct dbg_internal_var* div; /* negative register values are wine's dbghelp hacks - * see dlls/dbghelp/dbghelp_internal.h for the details + * see dlls/dbghelp/dbghelp_private.h for the details */ switch (regno) { @@ -692,6 +692,9 @@ BOOL memory_get_register(DWORD regno, DWORD_PTR** value, char* buffer, int len) case -4: if (buffer) snprintf(buffer, len, "<couldn't read memory>"); return FALSE; + case -5: + if (buffer) snprintf(buffer, len, "<has been optimized away by compiler>"); + return FALSE; } for (div = be_cpu->context_vars; div->name; div++)

1 0

Alexandre Julliard : oleaut32: Add tests for DispCallFunc and fix a number of corner cases.
by Alexandre Julliard 26 Aug '10

26 Aug '10

Module: wine Branch: master Commit: a0a4667fde59023da2f338e060732df9f1108a4a URL: http://source.winehq.org/git/wine.git/?a=commit;h=a0a4667fde59023da2f338e06… Author: Alexandre Julliard <julliard(a)winehq.org> Date: Thu Aug 26 12:22:20 2010 +0200 oleaut32: Add tests for DispCallFunc and fix a number of corner cases. --- dlls/oleaut32/tests/typelib.c | 192 ++++++++++++++++++++++++++++++++++++++++- dlls/oleaut32/typelib.c | 165 +++++++++++++++++++++-------------- 2 files changed, 288 insertions(+), 69 deletions(-) Diff: http://source.winehq.org/git/wine.git/?a=commitdiff;h=a0a4667fde59023da2f33…

1 0

Jacek Caban : mshtml: Use IActiveScriptSiteDebug64 instead of IActiveScriptSiteDebug32 on win64.
by Alexandre Julliard 26 Aug '10

26 Aug '10

Module: wine Branch: master Commit: 4f16b73fa4b67716624a2f9aa17ef1a1b07e308d URL: http://source.winehq.org/git/wine.git/?a=commit;h=4f16b73fa4b67716624a2f9aa… Author: Jacek Caban <jacek(a)codeweavers.com> Date: Wed Aug 25 20:20:29 2010 +0200 mshtml: Use IActiveScriptSiteDebug64 instead of IActiveScriptSiteDebug32 on win64. --- dlls/mshtml/script.c | 73 ++++++++++++++++++++++++++++---------------------- 1 files changed, 41 insertions(+), 32 deletions(-) diff --git a/dlls/mshtml/script.c b/dlls/mshtml/script.c index 1d21da9..0b78e17 100644 --- a/dlls/mshtml/script.c +++ b/dlls/mshtml/script.c @@ -36,6 +36,14 @@ WINE_DEFAULT_DEBUG_CHANNEL(mshtml); +#ifdef _WIN64 +#define CTXARG_T DWORDLONG +#define IActiveScriptSiteDebugVtbl IActiveScriptSiteDebug64Vtbl +#else +#define CTXARG_T DWORD +#define IActiveScriptSiteDebugVtbl IActiveScriptSiteDebug32Vtbl +#endif + static const WCHAR windowW[] = {'w','i','n','d','o','w',0}; static const WCHAR emptyW[] = {0}; @@ -46,7 +54,7 @@ struct ScriptHost { const IActiveScriptSiteVtbl *lpIActiveScriptSiteVtbl; const IActiveScriptSiteInterruptPollVtbl *lpIActiveScriptSiteInterruptPollVtbl; const IActiveScriptSiteWindowVtbl *lpIActiveScriptSiteWindowVtbl; - const IActiveScriptSiteDebug32Vtbl *lpIActiveScriptSiteDebug32Vtbl; + const IActiveScriptSiteDebugVtbl *lpIActiveScriptSiteDebugVtbl; const IServiceProviderVtbl *lpServiceProviderVtbl; LONG ref; @@ -66,7 +74,7 @@ struct ScriptHost { #define ACTSCPSITE(x) ((IActiveScriptSite*) &(x)->lpIActiveScriptSiteVtbl) #define ACTSCPPOLL(x) (&(x)->lpIActiveScriptSiteInterruptPollVtbl) #define ACTSCPWIN(x) (&(x)->lpIActiveScriptSiteWindowVtbl) -#define ACTSCPDBG32(x) (&(x)->lpIActiveScriptSiteDebug32Vtbl) +#define ACTSCPDBG(x) (&(x)->lpIActiveScriptSiteDebugVtbl) static void set_script_prop(ScriptHost *script_host, DWORD property, VARIANT *val) { @@ -237,9 +245,9 @@ static HRESULT WINAPI ActiveScriptSite_QueryInterface(IActiveScriptSite *iface, }else if(IsEqualGUID(&IID_IActiveScriptSiteWindow, riid)) { TRACE("(%p)->(IID_IActiveScriptSiteWindow %p)\n", This, ppv); *ppv = ACTSCPWIN(This); - }else if(IsEqualGUID(&IID_IActiveScriptSiteDebug32, riid)) { - TRACE("(%p)->(IID_IActiveScriptSiteDebug32 %p)\n", This, ppv); - *ppv = ACTSCPDBG32(This); + }else if(IsEqualGUID(&IID_IActiveScriptSiteDebug, riid)) { + TRACE("(%p)->(IID_IActiveScriptSiteDebug %p)\n", This, ppv); + *ppv = ACTSCPDBG(This); }else if(IsEqualGUID(&IID_IServiceProvider, riid)) { TRACE("(%p)->(IID_IServiceProvider %p)\n", This, ppv); *ppv = SERVPROV(This); @@ -469,68 +477,69 @@ static const IActiveScriptSiteWindowVtbl ActiveScriptSiteWindowVtbl = { ActiveScriptSiteWindow_EnableModeless }; -#define ACTSCPDBG32_THIS(iface) DEFINE_THIS(ScriptHost, IActiveScriptSiteDebug32, iface) +#define ACTSCPDBG_THIS(iface) DEFINE_THIS(ScriptHost, IActiveScriptSiteDebug, iface) -static HRESULT WINAPI ActiveScriptSiteDebug32_QueryInterface(IActiveScriptSiteDebug32 *iface, +static HRESULT WINAPI ActiveScriptSiteDebug_QueryInterface(IActiveScriptSiteDebug *iface, REFIID riid, void **ppv) { - ScriptHost *This = ACTSCPDBG32_THIS(iface); + ScriptHost *This = ACTSCPDBG_THIS(iface); return IActiveScriptSite_QueryInterface(ACTSCPSITE(This), riid, ppv); } -static ULONG WINAPI ActiveScriptSiteDebug32_AddRef(IActiveScriptSiteDebug32 *iface) +static ULONG WINAPI ActiveScriptSiteDebug_AddRef(IActiveScriptSiteDebug *iface) { - ScriptHost *This = ACTSCPDBG32_THIS(iface); + ScriptHost *This = ACTSCPDBG_THIS(iface); return IActiveScriptSite_AddRef(ACTSCPSITE(This)); } -static ULONG WINAPI ActiveScriptSiteDebug32_Release(IActiveScriptSiteDebug32 *iface) +static ULONG WINAPI ActiveScriptSiteDebug_Release(IActiveScriptSiteDebug *iface) { - ScriptHost *This = ACTSCPDBG32_THIS(iface); + ScriptHost *This = ACTSCPDBG_THIS(iface); return IActiveScriptSite_Release(ACTSCPSITE(This)); } -static HRESULT WINAPI ActiveScriptSiteDebug32_GetDocumentContextFromPosition(IActiveScriptSiteDebug32 *iface, - DWORD dwSourceContext, ULONG uCharacterOffset, ULONG uNumChars, IDebugDocumentContext **ppsc) +static HRESULT WINAPI ActiveScriptSiteDebug_GetDocumentContextFromPosition(IActiveScriptSiteDebug *iface, + CTXARG_T dwSourceContext, ULONG uCharacterOffset, ULONG uNumChars, IDebugDocumentContext **ppsc) { - ScriptHost *This = ACTSCPDBG32_THIS(iface); - FIXME("(%p)->(%x %u %u %p)\n", This, dwSourceContext, uCharacterOffset, uNumChars, ppsc); + ScriptHost *This = ACTSCPDBG_THIS(iface); + FIXME("(%p)->(%s %u %u %p)\n", This, wine_dbgstr_longlong(dwSourceContext), uCharacterOffset, + uNumChars, ppsc); return E_NOTIMPL; } -static HRESULT WINAPI ActiveScriptSiteDebug32_GetApplication(IActiveScriptSiteDebug32 *iface, IDebugApplication32 **ppda) +static HRESULT WINAPI ActiveScriptSiteDebug_GetApplication(IActiveScriptSiteDebug *iface, IDebugApplication **ppda) { - ScriptHost *This = ACTSCPDBG32_THIS(iface); + ScriptHost *This = ACTSCPDBG_THIS(iface); FIXME("(%p)->(%p)\n", This, ppda); return E_NOTIMPL; } -static HRESULT WINAPI ActiveScriptSiteDebug32_GetRootApplicationNode(IActiveScriptSiteDebug32 *iface, +static HRESULT WINAPI ActiveScriptSiteDebug_GetRootApplicationNode(IActiveScriptSiteDebug *iface, IDebugApplicationNode **ppdanRoot) { - ScriptHost *This = ACTSCPDBG32_THIS(iface); + ScriptHost *This = ACTSCPDBG_THIS(iface); FIXME("(%p)->(%p)\n", This, ppdanRoot); return E_NOTIMPL; } -static HRESULT WINAPI ActiveScriptSiteDebug32_OnScriptErrorDebug(IActiveScriptSiteDebug32 *iface, +static HRESULT WINAPI ActiveScriptSiteDebug_OnScriptErrorDebug(IActiveScriptSiteDebug *iface, IActiveScriptErrorDebug *pErrorDebug, BOOL *pfEnterDebugger, BOOL *pfCallOnScriptErrorWhenContinuing) { - ScriptHost *This = ACTSCPDBG32_THIS(iface); + ScriptHost *This = ACTSCPDBG_THIS(iface); FIXME("(%p)->(%p %p %p)\n", This, pErrorDebug, pfEnterDebugger, pfCallOnScriptErrorWhenContinuing); return E_NOTIMPL; } -#undef ACTSCPDBG32_THIS +#undef ACTSCPDBG_THIS -static const IActiveScriptSiteDebug32Vtbl ActiveScriptSiteDebug32Vtbl = { - ActiveScriptSiteDebug32_QueryInterface, - ActiveScriptSiteDebug32_AddRef, - ActiveScriptSiteDebug32_Release, - ActiveScriptSiteDebug32_GetDocumentContextFromPosition, - ActiveScriptSiteDebug32_GetApplication, - ActiveScriptSiteDebug32_GetRootApplicationNode, - ActiveScriptSiteDebug32_OnScriptErrorDebug +static const IActiveScriptSiteDebugVtbl ActiveScriptSiteDebugVtbl = { + ActiveScriptSiteDebug_QueryInterface, + ActiveScriptSiteDebug_AddRef, + ActiveScriptSiteDebug_Release, + ActiveScriptSiteDebug_GetDocumentContextFromPosition, + ActiveScriptSiteDebug_GetApplication, + ActiveScriptSiteDebug_GetRootApplicationNode, + ActiveScriptSiteDebug_OnScriptErrorDebug }; #define SERVPROV_THIS(iface) DEFINE_THIS(ScriptHost, ServiceProvider, iface) @@ -589,7 +598,7 @@ static ScriptHost *create_script_host(HTMLWindow *window, const GUID *guid) ret->lpIActiveScriptSiteVtbl = &ActiveScriptSiteVtbl; ret->lpIActiveScriptSiteInterruptPollVtbl = &ActiveScriptSiteInterruptPollVtbl; ret->lpIActiveScriptSiteWindowVtbl = &ActiveScriptSiteWindowVtbl; - ret->lpIActiveScriptSiteDebug32Vtbl = &ActiveScriptSiteDebug32Vtbl; + ret->lpIActiveScriptSiteDebugVtbl = &ActiveScriptSiteDebugVtbl; ret->lpServiceProviderVtbl = &ASServiceProviderVtbl; ret->ref = 1; ret->window = window;

1 0

David Hedberg : shell32: Implement IExplorerBrowser::BrowseToObject.
by Alexandre Julliard 25 Aug '10

25 Aug '10

Module: wine Branch: master Commit: 00889f17230474556a0f38be3c23da2a1f8b27d4 URL: http://source.winehq.org/git/wine.git/?a=commit;h=00889f17230474556a0f38be3… Author: David Hedberg <david.hedberg(a)gmail.com> Date: Wed Aug 25 15:24:32 2010 +0200 shell32: Implement IExplorerBrowser::BrowseToObject. --- dlls/shell32/ebrowser.c | 16 ++++++++++++++-- dlls/shell32/tests/ebrowser.c | 33 +++++++++++++++++++++++++++++++++ 2 files changed, 47 insertions(+), 2 deletions(-) diff --git a/dlls/shell32/ebrowser.c b/dlls/shell32/ebrowser.c index daf5d4a..0d11d13 100644 --- a/dlls/shell32/ebrowser.c +++ b/dlls/shell32/ebrowser.c @@ -633,9 +633,21 @@ static HRESULT WINAPI IExplorerBrowser_fnBrowseToObject(IExplorerBrowser *iface, IUnknown *punk, UINT uFlags) { ExplorerBrowserImpl *This = (ExplorerBrowserImpl*)iface; - FIXME("stub, %p (%p, 0x%x)\n", This, punk, uFlags); + LPITEMIDLIST pidl; + HRESULT hr; + TRACE("%p (%p, 0x%x)\n", This, punk, uFlags); - return E_NOTIMPL; + if(!punk) + return IExplorerBrowser_fnBrowseToIDList(iface, NULL, uFlags); + + hr = SHGetIDListFromObject(punk, &pidl); + if(SUCCEEDED(hr)) + { + hr = IExplorerBrowser_BrowseToIDList(iface, pidl, uFlags); + ILFree(pidl); + } + + return hr; } static HRESULT WINAPI IExplorerBrowser_fnFillFromObject(IExplorerBrowser *iface, diff --git a/dlls/shell32/tests/ebrowser.c b/dlls/shell32/tests/ebrowser.c index 60472a4..442d8dc 100644 --- a/dlls/shell32/tests/ebrowser.c +++ b/dlls/shell32/tests/ebrowser.c @@ -760,6 +760,7 @@ static void test_navigation(void) { IExplorerBrowser *peb, *peb2; IFolderView *pfv; + IShellItem *psi; IShellFolder *psf; LPITEMIDLIST pidl_current, pidl_child; DWORD cookie, cookie2; @@ -920,6 +921,38 @@ static void test_navigation(void) lres = IExplorerBrowser_Release(peb); ok(lres == 0, "Got lres %d\n", lres); + /* BrowseToObject tests */ + ebrowser_instantiate(&peb); + ebrowser_initialize(peb); + + /* Browse to the desktop by passing an IShellFolder */ + hr = SHGetDesktopFolder(&psf); + ok(hr == S_OK, "Got 0x%08x\n", hr); + if(SUCCEEDED(hr)) + { + hr = IExplorerBrowser_BrowseToObject(peb, (IUnknown*)psf, SBSP_DEFBROWSER); + ok(hr == S_OK, "got (0x%08x)\n", hr); + if(hr == S_OK) process_msgs(); + + IShellFolder_Release(psf); + } + + /* Browse to the current directory by passing a ShellItem */ + hr = pSHCreateShellItem(NULL, NULL, pidl_current, &psi); + ok(hr == S_OK, "Got 0x%08x\n", hr); + if(SUCCEEDED(hr)) + { + hr = IExplorerBrowser_BrowseToObject(peb, (IUnknown*)psi, SBSP_DEFBROWSER); + ok(hr == S_OK, "got (0x%08x)\n", hr); + process_msgs(); + + IShellItem_Release(psi); + } + + IExplorerBrowser_Destroy(peb); + lres = IExplorerBrowser_Release(peb); + ok(lres == 0, "Got lres %d\n", lres); + /* Cleanup */ RemoveDirectoryW(child_path); ILFree(pidl_current);

1 0

David Hedberg : shell32: Add a travellog to the ExplorerBrowser control.
by Alexandre Julliard 25 Aug '10

25 Aug '10

Module: wine Branch: master Commit: fdccbd91af671a022b2e0b6f2d11c25c1b9cc906 URL: http://source.winehq.org/git/wine.git/?a=commit;h=fdccbd91af671a022b2e0b6f2… Author: David Hedberg <david.hedberg(a)gmail.com> Date: Wed Aug 25 15:24:33 2010 +0200 shell32: Add a travellog to the ExplorerBrowser control. --- dlls/shell32/ebrowser.c | 138 +++++++++++++++++++++++++++++++++++++++- dlls/shell32/tests/ebrowser.c | 24 +++++++- 2 files changed, 156 insertions(+), 6 deletions(-) diff --git a/dlls/shell32/ebrowser.c b/dlls/shell32/ebrowser.c index 0d11d13..e753a79 100644 --- a/dlls/shell32/ebrowser.c +++ b/dlls/shell32/ebrowser.c @@ -43,6 +43,11 @@ typedef struct _event_client { DWORD cookie; } event_client; +typedef struct _travellog_entry { + struct list entry; + LPITEMIDLIST pidl; +} travellog_entry; + typedef struct _ExplorerBrowserImpl { const IExplorerBrowserVtbl *lpVtbl; const IShellBrowserVtbl *lpsbVtbl; @@ -57,6 +62,9 @@ typedef struct _ExplorerBrowserImpl { struct list event_clients; DWORD events_next_cookie; + struct list travellog; + travellog_entry *travellog_cursor; + int travellog_count; IShellView *psv; RECT sv_rc; @@ -140,6 +148,99 @@ static void events_ViewCreated(ExplorerBrowserImpl *This, IShellView *psv) } /************************************************************************** + * Travellog functions. + */ +static void travellog_remove_entry(ExplorerBrowserImpl *This, travellog_entry *entry) +{ + TRACE("Removing %p\n", entry); + + list_remove(&entry->entry); + HeapFree(GetProcessHeap(), 0, entry); + This->travellog_count--; +} + +static void travellog_remove_all_entries(ExplorerBrowserImpl *This) +{ + travellog_entry *cursor, *cursor2; + TRACE("%p\n", This); + + LIST_FOR_EACH_ENTRY_SAFE(cursor, cursor2, &This->travellog, travellog_entry, entry) + travellog_remove_entry(This, cursor); + + This->travellog_cursor = NULL; +} + +static void travellog_add_entry(ExplorerBrowserImpl *This, LPITEMIDLIST pidl) +{ + travellog_entry *new, *cursor, *cursor2; + TRACE("%p (old count %d)\n", pidl, This->travellog_count); + + /* Replace the old tail, if any, with the new entry */ + if(This->travellog_cursor) + { + LIST_FOR_EACH_ENTRY_SAFE_REV(cursor, cursor2, &This->travellog, travellog_entry, entry) + { + if(cursor == This->travellog_cursor) + break; + travellog_remove_entry(This, cursor); + } + } + + /* Create and add the new entry */ + new = HeapAlloc(GetProcessHeap(), 0, sizeof(travellog_entry)); + new->pidl = ILClone(pidl); + list_add_tail(&This->travellog, &new->entry); + This->travellog_cursor = new; + This->travellog_count++; + + /* Remove the first few entries if the size limit is reached. */ + if(This->travellog_count > 200) + { + UINT i = 0; + LIST_FOR_EACH_ENTRY_SAFE(cursor, cursor2, &This->travellog, travellog_entry, entry) + { + if(i++ > 10) + break; + travellog_remove_entry(This, cursor); + } + } +} + +static LPCITEMIDLIST travellog_go_back(ExplorerBrowserImpl *This) +{ + travellog_entry *prev; + TRACE("%p, %p\n", This, This->travellog_cursor); + + if(!This->travellog_cursor) + return NULL; + + prev = LIST_ENTRY(list_prev(&This->travellog, &This->travellog_cursor->entry), + travellog_entry, entry); + if(!prev) + return NULL; + + This->travellog_cursor = prev; + return prev->pidl; +} + +static LPCITEMIDLIST travellog_go_forward(ExplorerBrowserImpl *This) +{ + travellog_entry *next; + TRACE("%p, %p\n", This, This->travellog_cursor); + + if(!This->travellog_cursor) + return NULL; + + next = LIST_ENTRY(list_next(&This->travellog, &This->travellog_cursor->entry), + travellog_entry, entry); + if(!next) + return NULL; + + This->travellog_cursor = next; + return next->pidl; +} + +/************************************************************************** * Helper functions */ static void update_layout(ExplorerBrowserImpl *This) @@ -386,6 +487,7 @@ static HRESULT WINAPI IExplorerBrowser_fnDestroy(IExplorerBrowser *iface) } events_unadvise_all(This); + travellog_remove_all_entries(This); ILFree(This->current_pidl); This->current_pidl = NULL; @@ -520,9 +622,6 @@ static HRESULT WINAPI IExplorerBrowser_fnGetOptions(IExplorerBrowser *iface, return S_OK; } -static const UINT unsupported_browse_flags = - SBSP_NAVIGATEBACK | SBSP_NAVIGATEFORWARD | SBSP_NEWBROWSER | - EBF_SELECTFROMDATAOBJECT | EBF_NODROPTARGET; static HRESULT WINAPI IExplorerBrowser_fnBrowseToIDList(IExplorerBrowser *iface, PCUIDLIST_RELATIVE pidl, UINT uFlags) @@ -530,6 +629,8 @@ static HRESULT WINAPI IExplorerBrowser_fnBrowseToIDList(IExplorerBrowser *iface, ExplorerBrowserImpl *This = (ExplorerBrowserImpl*)iface; LPITEMIDLIST absolute_pidl = NULL; HRESULT hr; + static const UINT unsupported_browse_flags = + SBSP_NEWBROWSER | EBF_SELECTFROMDATAOBJECT | EBF_NODROPTARGET; TRACE("%p (%p, 0x%x)\n", This, pidl, uFlags); if(!This->hwnd_main) @@ -547,7 +648,27 @@ static HRESULT WINAPI IExplorerBrowser_fnBrowseToIDList(IExplorerBrowser *iface, if(uFlags & unsupported_browse_flags) FIXME("Argument 0x%x contains unsupported flags.\n", uFlags); - if(uFlags & SBSP_PARENT) + if(uFlags & SBSP_NAVIGATEBACK) + { + TRACE("SBSP_NAVIGATEBACK\n"); + absolute_pidl = ILClone(travellog_go_back(This)); + if(!absolute_pidl && !This->current_pidl) + return E_FAIL; + else if(!absolute_pidl) + return S_OK; + + } + else if(uFlags & SBSP_NAVIGATEFORWARD) + { + TRACE("SBSP_NAVIGATEFORWARD\n"); + absolute_pidl = ILClone(travellog_go_forward(This)); + if(!absolute_pidl && !This->current_pidl) + return E_FAIL; + else if(!absolute_pidl) + return S_OK; + + } + else if(uFlags & SBSP_PARENT) { if(This->current_pidl) { @@ -618,6 +739,14 @@ static HRESULT WINAPI IExplorerBrowser_fnBrowseToIDList(IExplorerBrowser *iface, IShellItem_Release(psi); return E_FAIL; } + + /* Add to travellog */ + if( !(This->eb_options & EBO_NOTRAVELLOG) && + !(uFlags & (SBSP_NAVIGATEFORWARD|SBSP_NAVIGATEBACK)) ) + { + travellog_add_entry(This, absolute_pidl); + } + IShellItem_Release(psi); } } @@ -928,6 +1057,7 @@ HRESULT WINAPI ExplorerBrowser_Constructor(IUnknown *pUnkOuter, REFIID riid, voi eb->lpsbVtbl = &vt_IShellBrowser; list_init(&eb->event_clients); + list_init(&eb->travellog); ret = IExplorerBrowser_QueryInterface((IExplorerBrowser*)eb, riid, ppv); IExplorerBrowser_Release((IExplorerBrowser*)eb); diff --git a/dlls/shell32/tests/ebrowser.c b/dlls/shell32/tests/ebrowser.c index 442d8dc..809a7fc 100644 --- a/dlls/shell32/tests/ebrowser.c +++ b/dlls/shell32/tests/ebrowser.c @@ -811,14 +811,34 @@ static void test_navigation(void) test_browse_pidl_sb(peb2, &ebev, 0, SBSP_RELATIVE, E_FAIL, 0, 0, 0, 0); test_browse_pidl(peb, &ebev, 0, SBSP_PARENT, E_FAIL, 0, 0, 0, 0); test_browse_pidl_sb(peb2, &ebev, 0, SBSP_PARENT, E_FAIL, 0, 0, 0, 0); + test_browse_pidl(peb, &ebev, 0, SBSP_NAVIGATEFORWARD, E_FAIL, 0, 0, 0, 0); + test_browse_pidl_sb(peb2, &ebev, 0, SBSP_NAVIGATEFORWARD, E_FAIL, 0, 0, 0, 0); + test_browse_pidl(peb, &ebev, 0, SBSP_NAVIGATEBACK, E_FAIL, 0, 0, 0, 0); + test_browse_pidl_sb(peb2, &ebev, 0, SBSP_NAVIGATEBACK, E_FAIL, 0, 0, 0, 0); /* "The first browse is synchronous" */ test_browse_pidl(peb, &ebev, pidl_child, SBSP_ABSOLUTE, S_OK, 1, 1, 0, 1); test_browse_pidl_sb(peb2, &ebev, pidl_child, SBSP_ABSOLUTE, S_OK, 1, 1, 0, 1); + /* Navigate empty history */ + test_browse_pidl(peb, &ebev, 0, SBSP_NAVIGATEFORWARD, S_OK, 0, 0, 0, 0); + test_browse_pidl_sb(peb2, &ebev, 0, SBSP_NAVIGATEFORWARD, S_OK, 0, 0, 0, 0); + test_browse_pidl(peb, &ebev, 0, SBSP_NAVIGATEBACK, S_OK, 0, 0, 0, 0); + test_browse_pidl_sb(peb2, &ebev, 0, SBSP_NAVIGATEBACK, S_OK, 0, 0, 0, 0); + + /* Navigate history */ + test_browse_pidl(peb, &ebev, 0, SBSP_PARENT, S_OK, 1, 1, 0, 1); + test_browse_pidl_sb(peb2, &ebev, 0, SBSP_PARENT, S_OK, 1, 1, 0, 1); + test_browse_pidl(peb, &ebev, 0, SBSP_NAVIGATEBACK, S_OK, 1, 1, 0, 1); + test_browse_pidl_sb(peb2, &ebev, 0, SBSP_NAVIGATEBACK, S_OK, 1, 1, 0, 1); + test_browse_pidl(peb, &ebev, 0, SBSP_NAVIGATEFORWARD, S_OK, 1, 1, 0, 1); + test_browse_pidl_sb(peb2, &ebev, 0, SBSP_NAVIGATEFORWARD, S_OK, 1, 1, 0, 1); + test_browse_pidl(peb, &ebev, 0, SBSP_ABSOLUTE, S_OK, 0, 0, 0, 0); + test_browse_pidl_sb(peb2, &ebev, 0, SBSP_ABSOLUTE, S_OK, 0, 0, 0, 0); + /* Relative navigation */ - test_browse_pidl(peb, &ebev, pidl_current, SBSP_ABSOLUTE, S_OK, 1, 1, 0, 1); - test_browse_pidl_sb(peb2, &ebev, pidl_current, SBSP_ABSOLUTE, S_OK, 1, 1, 0, 1); + test_browse_pidl(peb, &ebev, pidl_current, SBSP_ABSOLUTE, S_OK, 1, 0, 0, 1); + test_browse_pidl_sb(peb2, &ebev, pidl_current, SBSP_ABSOLUTE, S_OK, 1, 0, 0, 1); hr = IExplorerBrowser_GetCurrentView(peb, &IID_IFolderView, (void**)&pfv); ok(hr == S_OK, "Got 0x%08x\n", hr);

1 0

David Hedberg : shell32: Add ICommDlgBrowser3 stub to the ExplorerBrowser control.
by Alexandre Julliard 25 Aug '10

25 Aug '10

Module: wine Branch: master Commit: 59965f9c80f1c112a59e48b307e88e328ca411b5 URL: http://source.winehq.org/git/wine.git/?a=commit;h=59965f9c80f1c112a59e48b30… Author: David Hedberg <david.hedberg(a)gmail.com> Date: Wed Aug 25 15:24:34 2010 +0200 shell32: Add ICommDlgBrowser3 stub to the ExplorerBrowser control. --- dlls/shell32/ebrowser.c | 128 +++++++++++++++++++++++++++++++++++++++++ dlls/shell32/tests/ebrowser.c | 6 +- 2 files changed, 131 insertions(+), 3 deletions(-) diff --git a/dlls/shell32/ebrowser.c b/dlls/shell32/ebrowser.c index e753a79..d53d08e 100644 --- a/dlls/shell32/ebrowser.c +++ b/dlls/shell32/ebrowser.c @@ -51,6 +51,7 @@ typedef struct _travellog_entry { typedef struct _ExplorerBrowserImpl { const IExplorerBrowserVtbl *lpVtbl; const IShellBrowserVtbl *lpsbVtbl; + const ICommDlgBrowser3Vtbl *lpcdb3Vtbl; LONG ref; BOOL destroyed; @@ -382,6 +383,12 @@ static HRESULT WINAPI IExplorerBrowser_fnQueryInterface(IExplorerBrowser *iface, { *ppvObject = &This->lpsbVtbl; } + else if(IsEqualIID(riid, &IID_ICommDlgBrowser) || + IsEqualIID(riid, &IID_ICommDlgBrowser2) || + IsEqualIID(riid, &IID_ICommDlgBrowser3)) + { + *ppvObject = &This->lpcdb3Vtbl; + } if(*ppvObject) { @@ -1039,6 +1046,126 @@ static const IShellBrowserVtbl vt_IShellBrowser = { IShellBrowser_fnSetToolbarItems }; +/************************************************************************** + * ICommDlgBrowser3 Implementation + */ + +static inline ExplorerBrowserImpl *impl_from_ICommDlgBrowser3(ICommDlgBrowser3 *iface) +{ + return (ExplorerBrowserImpl *)((char*)iface - FIELD_OFFSET(ExplorerBrowserImpl, lpcdb3Vtbl)); +} + +static HRESULT WINAPI ICommDlgBrowser3_fnQueryInterface(ICommDlgBrowser3 *iface, + REFIID riid, + void **ppvObject) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + TRACE("%p\n", This); + return IUnknown_QueryInterface((IUnknown*) This, riid, ppvObject); +} + +static ULONG WINAPI ICommDlgBrowser3_fnAddRef(ICommDlgBrowser3 *iface) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + TRACE("%p\n", This); + return IUnknown_AddRef((IUnknown*) This); +} + +static ULONG WINAPI ICommDlgBrowser3_fnRelease(ICommDlgBrowser3 *iface) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + TRACE("%p\n", This); + return IUnknown_Release((IUnknown*) This); +} + +static HRESULT WINAPI ICommDlgBrowser3_fnOnDefaultCommand(ICommDlgBrowser3 *iface, + IShellView *shv) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + FIXME("stub, %p (%p)\n", This, shv); + return E_NOTIMPL; +} +static HRESULT WINAPI ICommDlgBrowser3_fnOnStateChange(ICommDlgBrowser3 *iface, + IShellView *shv, ULONG uChange) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + FIXME("stub, %p (%p, %d)\n", This, shv, uChange); + return E_NOTIMPL; +} +static HRESULT WINAPI ICommDlgBrowser3_fnIncludeObject(ICommDlgBrowser3 *iface, + IShellView *pshv, LPCITEMIDLIST pidl) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + FIXME("stub, %p (%p, %p)\n", This, pshv, pidl); + return S_OK; +} + +static HRESULT WINAPI ICommDlgBrowser3_fnNotify(ICommDlgBrowser3 *iface, + IShellView *pshv, + DWORD dwNotifyType) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + FIXME("stub, %p (%p, 0x%x)\n", This, pshv, dwNotifyType); + return S_OK; +} + +static HRESULT WINAPI ICommDlgBrowser3_fnGetDefaultMenuText(ICommDlgBrowser3 *iface, + IShellView *pshv, + LPWSTR pszText, int cchMax) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + FIXME("stub, %p (%p, %s, %d)\n", This, pshv, debugstr_w(pszText), cchMax); + return S_OK; +} + +static HRESULT WINAPI ICommDlgBrowser3_fnGetViewFlags(ICommDlgBrowser3 *iface, + DWORD *pdwFlags) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + FIXME("stub, %p (%p)\n", This, pdwFlags); + return S_OK; +} + +static HRESULT WINAPI ICommDlgBrowser3_fnOnColumnClicked(ICommDlgBrowser3 *iface, + IShellView *pshv, int iColumn) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + FIXME("stub, %p (%p, %d)\n", This, pshv, iColumn); + return S_OK; +} + +static HRESULT WINAPI ICommDlgBrowser3_fnGetCurrentFilter(ICommDlgBrowser3 *iface, + LPWSTR pszFileSpec, + int cchFileSpec) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + FIXME("stub, %p (%s, %d)\n", This, debugstr_w(pszFileSpec), cchFileSpec); + return S_OK; +} + +static HRESULT WINAPI ICommDlgBrowser3_fnOnPreviewCreated(ICommDlgBrowser3 *iface, + IShellView *pshv) +{ + ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); + FIXME("stub, %p (%p)\n", This, pshv); + return S_OK; +} + +static const ICommDlgBrowser3Vtbl vt_ICommDlgBrowser3 = { + ICommDlgBrowser3_fnQueryInterface, + ICommDlgBrowser3_fnAddRef, + ICommDlgBrowser3_fnRelease, + ICommDlgBrowser3_fnOnDefaultCommand, + ICommDlgBrowser3_fnOnStateChange, + ICommDlgBrowser3_fnIncludeObject, + ICommDlgBrowser3_fnNotify, + ICommDlgBrowser3_fnGetDefaultMenuText, + ICommDlgBrowser3_fnGetViewFlags, + ICommDlgBrowser3_fnOnColumnClicked, + ICommDlgBrowser3_fnGetCurrentFilter, + ICommDlgBrowser3_fnOnPreviewCreated +}; + HRESULT WINAPI ExplorerBrowser_Constructor(IUnknown *pUnkOuter, REFIID riid, void **ppv) { ExplorerBrowserImpl *eb; @@ -1055,6 +1182,7 @@ HRESULT WINAPI ExplorerBrowser_Constructor(IUnknown *pUnkOuter, REFIID riid, voi eb->ref = 1; eb->lpVtbl = &vt_IExplorerBrowser; eb->lpsbVtbl = &vt_IShellBrowser; + eb->lpcdb3Vtbl = &vt_ICommDlgBrowser3; list_init(&eb->event_clients); list_init(&eb->travellog); diff --git a/dlls/shell32/tests/ebrowser.c b/dlls/shell32/tests/ebrowser.c index 809a7fc..1dd866d 100644 --- a/dlls/shell32/tests/ebrowser.c +++ b/dlls/shell32/tests/ebrowser.c @@ -167,9 +167,9 @@ static void test_QueryInterface(void) test_qinterface(IID_IExplorerBrowser, S_OK); test_qinterface(IID_IShellBrowser, S_OK); todo_wine test_qinterface(IID_IOleWindow, S_OK); - todo_wine test_qinterface(IID_ICommDlgBrowser, S_OK); - todo_wine test_qinterface(IID_ICommDlgBrowser2, S_OK); - todo_wine test_qinterface(IID_ICommDlgBrowser3, S_OK); + test_qinterface(IID_ICommDlgBrowser, S_OK); + test_qinterface(IID_ICommDlgBrowser2, S_OK); + test_qinterface(IID_ICommDlgBrowser3, S_OK); todo_wine test_qinterface(IID_IServiceProvider, S_OK); todo_wine test_qinterface(IID_IObjectWithSite, S_OK); todo_wine test_qinterface(IID_IConnectionPointContainer, S_OK);

1 0

David Hedberg : shell32: Implement CommDlgBrowser:: OnDefaultCommand in the ExplorerBrowser control.
by Alexandre Julliard 25 Aug '10

25 Aug '10

Module: wine Branch: master Commit: f118c64d6241edf5c5ee2e442973e2fd23bc29ac URL: http://source.winehq.org/git/wine.git/?a=commit;h=f118c64d6241edf5c5ee2e442… Author: David Hedberg <david.hedberg(a)gmail.com> Date: Wed Aug 25 15:24:35 2010 +0200 shell32: Implement CommDlgBrowser::OnDefaultCommand in the ExplorerBrowser control. --- dlls/shell32/ebrowser.c | 42 ++++++++++++++++++++++++++++++++++++++++-- 1 files changed, 40 insertions(+), 2 deletions(-) diff --git a/dlls/shell32/ebrowser.c b/dlls/shell32/ebrowser.c index d53d08e..3ba15b9 100644 --- a/dlls/shell32/ebrowser.c +++ b/dlls/shell32/ebrowser.c @@ -1082,8 +1082,46 @@ static HRESULT WINAPI ICommDlgBrowser3_fnOnDefaultCommand(ICommDlgBrowser3 *ifac IShellView *shv) { ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface); - FIXME("stub, %p (%p)\n", This, shv); - return E_NOTIMPL; + IDataObject *pdo; + HRESULT hr; + HRESULT ret = S_FALSE; + + TRACE("%p (%p)\n", This, shv); + + hr = IShellView_GetItemObject(shv, SVGIO_SELECTION, &IID_IDataObject, (void**)&pdo); + if(SUCCEEDED(hr)) + { + FORMATETC fmt; + STGMEDIUM medium; + + fmt.cfFormat = RegisterClipboardFormatW(CFSTR_SHELLIDLISTW); + fmt.ptd = NULL; + fmt.dwAspect = DVASPECT_CONTENT; + fmt.lindex = -1; + fmt.tymed = TYMED_HGLOBAL; + + hr = IDataObject_GetData(pdo, &fmt ,&medium); + IDataObject_Release(pdo); + if(SUCCEEDED(hr)) + { + LPIDA pida = GlobalLock(medium.u.hGlobal); + LPCITEMIDLIST pidl_child = (LPCITEMIDLIST) ((LPBYTE)pida+pida->aoffset[1]); + + /* Handle folders by browsing to them. */ + if(_ILIsFolder(pidl_child) || _ILIsDrive(pidl_child) || _ILIsSpecialFolder(pidl_child)) + { + IExplorerBrowser_BrowseToIDList((IExplorerBrowser*)This, pidl_child, SBSP_RELATIVE); + ret = S_OK; + } + GlobalUnlock(medium.u.hGlobal); + GlobalFree(medium.u.hGlobal); + } + else + ERR("Failed to get data from IDataObject.\n"); + } else + ERR("Failed to get IDataObject.\n"); + + return ret; } static HRESULT WINAPI ICommDlgBrowser3_fnOnStateChange(ICommDlgBrowser3 *iface, IShellView *shv, ULONG uChange)

1 0

David Hedberg : shell32: Add IObjectWithSite implementation to the ExplorerBrowser control.
by Alexandre Julliard 25 Aug '10

25 Aug '10

Module: wine Branch: master Commit: 56b8d5d38429097a7e0c62f74e9d56e09c05d315 URL: http://source.winehq.org/git/wine.git/?a=commit;h=56b8d5d38429097a7e0c62f74… Author: David Hedberg <david.hedberg(a)gmail.com> Date: Wed Aug 25 15:24:36 2010 +0200 shell32: Add IObjectWithSite implementation to the ExplorerBrowser control. --- dlls/shell32/ebrowser.c | 104 +++++++++++++++ dlls/shell32/tests/ebrowser.c | 283 ++++++++++++++++++++++++++++++++++++++++- 2 files changed, 386 insertions(+), 1 deletions(-) Diff: http://source.winehq.org/git/wine.git/?a=commitdiff;h=56b8d5d38429097a7e0c6…

1 0

Kai Tietz : include: Fixed LIST_ENTRY macro type casts for win64.
by Alexandre Julliard 25 Aug '10

25 Aug '10

Module: wine Branch: master Commit: c74f7496486ac9436c40cd0dc43b85c0c31b3629 URL: http://source.winehq.org/git/wine.git/?a=commit;h=c74f7496486ac9436c40cd0dc… Author: Kai Tietz <ktietz70(a)googlemail.com> Date: Wed Aug 25 15:14:24 2010 +0200 include: Fixed LIST_ENTRY macro type casts for win64. --- include/wine/list.h | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/include/wine/list.h b/include/wine/list.h index da3ce91..9712603 100644 --- a/include/wine/list.h +++ b/include/wine/list.h @@ -227,6 +227,6 @@ static inline void list_move_head( struct list *dst, struct list *src ) /* get pointer to object containing list element */ #undef LIST_ENTRY #define LIST_ENTRY(elem, type, field) \ - ((type *)((char *)(elem) - (unsigned long)(&((type *)0)->field))) + ((type *)((char *)(elem) - (size_t)(&((type *)0)->field))) #endif /* __WINE_SERVER_LIST_H */

1 0

Louis Lenders : mscoree/tests: Add a few tests for GetCORSytemDirectory.
by Alexandre Julliard 25 Aug '10

25 Aug '10

Module: wine Branch: master Commit: f317d6b32d1f6e3a68879b139aa9a3bdbc3d8a55 URL: http://source.winehq.org/git/wine.git/?a=commit;h=f317d6b32d1f6e3a68879b139… Author: Louis Lenders <xerox_xerox2000(a)yahoo.co.uk> Date: Wed Aug 25 14:34:04 2010 +0200 mscoree/tests: Add a few tests for GetCORSytemDirectory. --- dlls/mscoree/tests/mscoree.c | 26 +++++++++++++++++++++++--- 1 files changed, 23 insertions(+), 3 deletions(-) diff --git a/dlls/mscoree/tests/mscoree.c b/dlls/mscoree/tests/mscoree.c index ba1e938..e66a44b 100644 --- a/dlls/mscoree/tests/mscoree.c +++ b/dlls/mscoree/tests/mscoree.c @@ -21,6 +21,7 @@ static HMODULE hmscoree; static HRESULT (WINAPI *pGetCORVersion)(LPWSTR, DWORD, DWORD*); +static HRESULT (WINAPI *pGetCORSystemDirectory)(LPWSTR, DWORD, DWORD*); static BOOL init_functionpointers(void) { @@ -33,8 +34,8 @@ static BOOL init_functionpointers(void) } pGetCORVersion = (void *)GetProcAddress(hmscoree, "GetCORVersion"); - - if (!pGetCORVersion) + pGetCORSystemDirectory = (void *)GetProcAddress(hmscoree, "GetCORSystemDirectory"); + if (!pGetCORVersion || !pGetCORSystemDirectory) { win_skip("functions not available\n"); FreeLibrary(hmscoree); @@ -47,7 +48,8 @@ static BOOL init_functionpointers(void) static void test_versioninfo(void) { WCHAR version[MAX_PATH]; - DWORD size; + WCHAR path[MAX_PATH]; + DWORD size, path_len; HRESULT hr; hr = pGetCORVersion(NULL, MAX_PATH, &size); @@ -60,6 +62,24 @@ static void test_versioninfo(void) ok(hr == S_OK,"GetCORVersion returned %08x\n", hr); trace("latest installed .net runtime: %s\n", wine_dbgstr_w(version)); + + hr = pGetCORSystemDirectory(path, MAX_PATH , &size); + ok(hr == S_OK, "GetCORSystemDirectory returned %08x\n", hr); + /* size includes terminating null-character */ + ok(size == (lstrlenW(path) + 1),"size is %d instead of %d\n", size, (lstrlenW(path) + 1)); + + path_len = size; + + hr = pGetCORSystemDirectory(path, path_len-1 , &size); + todo_wine ok(hr == HRESULT_FROM_WIN32(ERROR_INSUFFICIENT_BUFFER), "GetCORSystemDirectory returned %08x\n", hr); + + hr = pGetCORSystemDirectory(NULL, MAX_PATH , &size); + todo_wine ok(hr == HRESULT_FROM_WIN32(ERROR_INSUFFICIENT_BUFFER), "GetCORSystemDirectory returned %08x\n", hr); + + hr = pGetCORSystemDirectory(path, MAX_PATH , NULL); + ok(hr == E_POINTER,"GetCORSystemDirectory returned %08x\n", hr); + + trace("latest installed .net installed in directory: %s\n", wine_dbgstr_w(path)); } START_TEST(mscoree)

1 0