Author: hpoussin Date: Sat Jan 5 00:53:35 2008 New Revision: 31597
URL: http://svn.reactos.org/svn/reactos?rev=31597&view=rev Log: Autosyncing with Wine HEAD
Added: trunk/reactos/dll/win32/hlink/ trunk/reactos/dll/win32/hlink/browse_ctx.c (with props) trunk/reactos/dll/win32/hlink/extserv.c (with props) trunk/reactos/dll/win32/hlink/hlink.rbuild (with props) trunk/reactos/dll/win32/hlink/hlink.spec (with props) trunk/reactos/dll/win32/hlink/hlink_main.c (with props) trunk/reactos/dll/win32/hlink/hlink_private.h (with props) trunk/reactos/dll/win32/hlink/link.c (with props)
Added: trunk/reactos/dll/win32/hlink/browse_ctx.c URL: http://svn.reactos.org/svn/reactos/trunk/reactos/dll/win32/hlink/browse_ctx.... ============================================================================== --- trunk/reactos/dll/win32/hlink/browse_ctx.c (added) +++ trunk/reactos/dll/win32/hlink/browse_ctx.c Sat Jan 5 00:53:35 2008 @@ -1,0 +1,270 @@ +/* + * Implementation of hyperlinking (hlink.dll) + * + * Copyright 2005 Aric Stewart for CodeWeavers + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2.1 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA + */ + +#include "hlink_private.h" + +#include "wine/debug.h" + +WINE_DEFAULT_DEBUG_CHANNEL(hlink); + +static const IHlinkBrowseContextVtbl hlvt; + +typedef struct +{ + const IHlinkBrowseContextVtbl *lpVtbl; + LONG ref; + HLBWINFO* BrowseWindowInfo; + IHlink* CurrentPage; +} HlinkBCImpl; + + +HRESULT WINAPI HLinkBrowseContext_Constructor(IUnknown *pUnkOuter, REFIID riid, + LPVOID *ppv) +{ + HlinkBCImpl * hl; + + TRACE("unkOut=%p riid=%s\n", pUnkOuter, debugstr_guid(riid)); + *ppv = NULL; + + if (pUnkOuter) + return CLASS_E_NOAGGREGATION; + + hl = heap_alloc_zero(sizeof(HlinkBCImpl)); + if (!hl) + return E_OUTOFMEMORY; + + hl->ref = 1; + hl->lpVtbl = &hlvt; + + *ppv = hl; + return S_OK; +} + +static HRESULT WINAPI IHlinkBC_fnQueryInterface( IHlinkBrowseContext *iface, + REFIID riid, LPVOID* ppvObj) +{ + HlinkBCImpl *This = (HlinkBCImpl*)iface; + TRACE ("(%p)->(%s,%p)\n", This, debugstr_guid (riid), ppvObj); + + if (IsEqualIID(riid, &IID_IUnknown) || + IsEqualIID(riid, &IID_IHlinkBrowseContext)) + *ppvObj = This; + + if (*ppvObj) + { + IUnknown_AddRef((IUnknown*)(*ppvObj)); + return S_OK; + } + return E_NOINTERFACE; +} + +static ULONG WINAPI IHlinkBC_fnAddRef (IHlinkBrowseContext* iface) +{ + HlinkBCImpl *This = (HlinkBCImpl*)iface; + ULONG refCount = InterlockedIncrement(&This->ref); + + TRACE("(%p)->(count=%u)\n", This, refCount - 1); + + return refCount; +} + +static ULONG WINAPI IHlinkBC_fnRelease (IHlinkBrowseContext* iface) +{ + HlinkBCImpl *This = (HlinkBCImpl*)iface; + ULONG refCount = InterlockedDecrement(&This->ref); + + TRACE("(%p)->(count=%u)\n", This, refCount + 1); + if (refCount) + return refCount; + + TRACE("-- destroying IHlinkBrowseContext (%p)\n", This); + heap_free(This->BrowseWindowInfo); + if (This->CurrentPage) + IHlink_Release(This->CurrentPage); + heap_free(This); + return 0; +} + +static HRESULT WINAPI IHlinkBC_Register(IHlinkBrowseContext* iface, + DWORD dwReserved, IUnknown *piunk, IMoniker *pimk, DWORD *pdwRegister) +{ + static const WCHAR szIdent[] = {'W','I','N','E','H','L','I','N','K',0}; + HlinkBCImpl *This = (HlinkBCImpl*)iface; + IMoniker *mon; + IMoniker *composite; + IRunningObjectTable *ROT; + + FIXME("(%p)->(%i %p %p %p)\n", This, dwReserved, piunk, pimk, pdwRegister); + + CreateItemMoniker(NULL, szIdent, &mon); + CreateGenericComposite(mon, pimk, &composite); + + GetRunningObjectTable(0, &ROT); + IRunningObjectTable_Register(ROT, 0, piunk, composite, pdwRegister); + + IRunningObjectTable_Release(ROT); + IMoniker_Release(composite); + IMoniker_Release(mon); + + return S_OK; +} + +static HRESULT WINAPI IHlinkBC_GetObject(IHlinkBrowseContext* face, + IMoniker *pimk, BOOL fBindifRootRegistered, IUnknown **ppiunk) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IHlinkBC_Revoke(IHlinkBrowseContext* iface, + DWORD dwRegister) +{ + HRESULT r = S_OK; + IRunningObjectTable *ROT; + HlinkBCImpl *This = (HlinkBCImpl*)iface; + + FIXME("(%p)->(%i)\n", This, dwRegister); + + GetRunningObjectTable(0, &ROT); + r = IRunningObjectTable_Revoke(ROT, dwRegister); + IRunningObjectTable_Release(ROT); + + return r; +} + +static HRESULT WINAPI IHlinkBC_SetBrowseWindowInfo(IHlinkBrowseContext* iface, + HLBWINFO *phlbwi) +{ + HlinkBCImpl *This = (HlinkBCImpl*)iface; + TRACE("(%p)->(%p)\n", This, phlbwi); + + heap_free(This->BrowseWindowInfo); + This->BrowseWindowInfo = heap_alloc(phlbwi->cbSize); + memcpy(This->BrowseWindowInfo, phlbwi, phlbwi->cbSize); + + return S_OK; +} + +static HRESULT WINAPI IHlinkBC_GetBrowseWindowInfo(IHlinkBrowseContext* iface, + HLBWINFO *phlbwi) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IHlinkBC_SetInitialHlink(IHlinkBrowseContext* iface, + IMoniker *pimkTarget, LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName) +{ + HlinkBCImpl *This = (HlinkBCImpl*)iface; + + FIXME("(%p)->(%p %s %s)\n", This, pimkTarget, + debugstr_w(pwzLocation), debugstr_w(pwzFriendlyName)); + + if (This->CurrentPage) + IHlink_Release(This->CurrentPage); + + HlinkCreateFromMoniker(pimkTarget, pwzLocation, pwzFriendlyName, NULL, + 0, NULL, &IID_IHlink, (LPVOID*) &This->CurrentPage); + + return S_OK; +} + +static HRESULT WINAPI IHlinkBC_OnNavigateHlink(IHlinkBrowseContext *iface, + DWORD grfHLNF, IMoniker* pmkTarget, LPCWSTR pwzLocation, LPCWSTR + pwzFriendlyName, ULONG *puHLID) +{ + HlinkBCImpl *This = (HlinkBCImpl*)iface; + + FIXME("(%p)->(%i %p %s %s %p)\n", This, grfHLNF, pmkTarget, + debugstr_w(pwzLocation), debugstr_w(pwzFriendlyName), puHLID); + + return S_OK; +} + +static HRESULT WINAPI IHlinkBC_UpdateHlink(IHlinkBrowseContext* iface, + ULONG uHLID, IMoniker* pimkTarget, LPCWSTR pwzLocation, + LPCWSTR pwzFriendlyName) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IHlinkBC_EnumNavigationStack( IHlinkBrowseContext *iface, + DWORD dwReserved, DWORD grfHLFNAMEF, IEnumHLITEM** ppienumhlitem) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IHlinkBC_QueryHlink( IHlinkBrowseContext* iface, + DWORD grfHLONG, ULONG uHLID) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IHlinkBC_GetHlink( IHlinkBrowseContext* iface, + ULONG uHLID, IHlink** ppihl) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IHlinkBC_SetCurrentHlink( IHlinkBrowseContext* iface, + ULONG uHLID) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IHlinkBC_Clone( IHlinkBrowseContext* iface, + IUnknown* piunkOuter, REFIID riid, IUnknown** ppiunkOjb) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IHlinkBC_Close(IHlinkBrowseContext* iface, + DWORD reserverd) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static const IHlinkBrowseContextVtbl hlvt = +{ + IHlinkBC_fnQueryInterface, + IHlinkBC_fnAddRef, + IHlinkBC_fnRelease, + IHlinkBC_Register, + IHlinkBC_GetObject, + IHlinkBC_Revoke, + IHlinkBC_SetBrowseWindowInfo, + IHlinkBC_GetBrowseWindowInfo, + IHlinkBC_SetInitialHlink, + IHlinkBC_OnNavigateHlink, + IHlinkBC_UpdateHlink, + IHlinkBC_EnumNavigationStack, + IHlinkBC_QueryHlink, + IHlinkBC_GetHlink, + IHlinkBC_SetCurrentHlink, + IHlinkBC_Clone, + IHlinkBC_Close +};
Propchange: trunk/reactos/dll/win32/hlink/browse_ctx.c ------------------------------------------------------------------------------ svn:eol-style = native
Added: trunk/reactos/dll/win32/hlink/extserv.c URL: http://svn.reactos.org/svn/reactos/trunk/reactos/dll/win32/hlink/extserv.c?r... ============================================================================== --- trunk/reactos/dll/win32/hlink/extserv.c (added) +++ trunk/reactos/dll/win32/hlink/extserv.c Sat Jan 5 00:53:35 2008 @@ -1,0 +1,259 @@ +/* + * Copyright 2007 Jacek Caban for CodeWeavers + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2.1 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA + */ + +#include "hlink_private.h" + +#include "wine/debug.h" +#include "wine/unicode.h" + +WINE_DEFAULT_DEBUG_CHANNEL(hlink); + +#define DEFINE_THIS(cls,ifc,iface) ((cls*)((BYTE*)(iface)-offsetof(cls,lp ## ifc ## Vtbl))) + +typedef struct { + const IUnknownVtbl *lpIUnknownVtbl; + const IAuthenticateVtbl *lpIAuthenticateVtbl; + const IHttpNegotiateVtbl *lpIHttpNegotiateVtbl; + + LONG ref; + IUnknown *outer; + + HWND hwnd; + LPWSTR username; + LPWSTR password; + LPWSTR headers; +} ExtensionService; + +#define EXTSERVUNK(x) ((IUnknown*) &(x)->lpIUnknownVtbl) +#define AUTHENTICATE(x) ((IAuthenticate*) &(x)->lpIAuthenticateVtbl) +#define HTTPNEGOTIATE(x) ((IHttpNegotiate*) &(x)->lpIHttpNegotiateVtbl) + +#define EXTSERVUNK_THIS(iface) DEFINE_THIS(ExtensionService, IUnknown, iface) + +static HRESULT WINAPI ExtServUnk_QueryInterface(IUnknown *iface, REFIID riid, void **ppv) +{ + ExtensionService *This = EXTSERVUNK_THIS(iface); + + *ppv = NULL; + + if(IsEqualGUID(&IID_IUnknown, riid)) { + TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv); + *ppv = EXTSERVUNK(This); + }else if(IsEqualGUID(&IID_IAuthenticate, riid)) { + TRACE("(%p)->(IID_IAuthenticate %p)\n", This, ppv); + *ppv = AUTHENTICATE(This); + }else if(IsEqualGUID(&IID_IHttpNegotiate, riid)) { + TRACE("(%p)->(IID_IHttpNegotiate %p)\n", This, ppv); + *ppv = HTTPNEGOTIATE(This); + } + + if(*ppv) { + IUnknown_AddRef(EXTSERVUNK(This)); + return S_OK; + } + + FIXME("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv); + return E_NOINTERFACE; +} + +static ULONG WINAPI ExtServUnk_AddRef(IUnknown *iface) +{ + ExtensionService *This = EXTSERVUNK_THIS(iface); + LONG ref = InterlockedIncrement(&This->ref); + + TRACE("(%p) ref=%d\n", This, ref); + + return ref; +} + +static ULONG WINAPI ExtServUnk_Release(IUnknown *iface) +{ + ExtensionService *This = EXTSERVUNK_THIS(iface); + LONG ref = InterlockedDecrement(&This->ref); + + TRACE("(%p) ref=%d\n", This, ref); + + if(!ref) { + heap_free(This->username); + heap_free(This->password); + heap_free(This->headers); + heap_free(This); + } + + return ref; +} + +#undef EXTSERVUNK_THIS + +static const IUnknownVtbl ExtServUnkVtbl = { + ExtServUnk_QueryInterface, + ExtServUnk_AddRef, + ExtServUnk_Release +}; + +#define AUTHENTICATE_THIS(iface) DEFINE_THIS(ExtensionService, IAuthenticate, iface) + +static HRESULT WINAPI Authenticate_QueryInterface(IAuthenticate *iface, REFIID riid, void **ppv) +{ + ExtensionService *This = AUTHENTICATE_THIS(iface); + return IUnknown_QueryInterface(This->outer, riid, ppv); +} + +static ULONG WINAPI Authenticate_AddRef(IAuthenticate *iface) +{ + ExtensionService *This = AUTHENTICATE_THIS(iface); + return IUnknown_AddRef(This->outer); +} + +static ULONG WINAPI Authenticate_Release(IAuthenticate *iface) +{ + ExtensionService *This = AUTHENTICATE_THIS(iface); + return IUnknown_Release(This->outer); +} + +static HRESULT WINAPI Authenticate_Authenticate(IAuthenticate *iface, + HWND *phwnd, LPWSTR *pszUsername, LPWSTR *pszPassword) +{ + ExtensionService *This = AUTHENTICATE_THIS(iface); + + TRACE("(%p)->(%p %p %p)\n", This, phwnd, pszUsername, pszPassword); + + if(!phwnd || !pszUsername || !pszPassword) + return E_INVALIDARG; + + *phwnd = This->hwnd; + *pszUsername = hlink_co_strdupW(This->username); + *pszPassword = hlink_co_strdupW(This->password); + + return S_OK; +} + +#undef AUTHENTICATE_THIS + +static const IAuthenticateVtbl AuthenticateVtbl = { + Authenticate_QueryInterface, + Authenticate_AddRef, + Authenticate_Release, + Authenticate_Authenticate +}; + +#define HTTPNEGOTIATE_THIS(iface) DEFINE_THIS(ExtensionService, IHttpNegotiate, iface) + +static HRESULT WINAPI HttpNegotiate_QueryInterface(IHttpNegotiate *iface, REFIID riid, void **ppv) +{ + ExtensionService *This = HTTPNEGOTIATE_THIS(iface); + return IUnknown_QueryInterface(This->outer, riid, ppv); +} + +static ULONG WINAPI HttpNegotiate_AddRef(IHttpNegotiate *iface) +{ + ExtensionService *This = HTTPNEGOTIATE_THIS(iface); + return IUnknown_AddRef(This->outer); +} + +static ULONG WINAPI HttpNegotiate_Release(IHttpNegotiate *iface) +{ + ExtensionService *This = HTTPNEGOTIATE_THIS(iface); + return IUnknown_Release(This->outer); +} + +static HRESULT WINAPI HttpNegotiate_BeginningTransaction(IHttpNegotiate *iface, + LPCWSTR szURL, LPCWSTR szHeaders, DWORD dwReserved, LPWSTR *pszAdditionalHeaders) +{ + ExtensionService *This = HTTPNEGOTIATE_THIS(iface); + + TRACE("(%p)->(%s %s %x %p)\n", This, debugstr_w(szURL), debugstr_w(szHeaders), dwReserved, + pszAdditionalHeaders); + + if(!pszAdditionalHeaders) + return E_INVALIDARG; + + *pszAdditionalHeaders = hlink_co_strdupW(This->headers); + return S_OK; +} + +static HRESULT WINAPI HttpNegotiate_OnResponse(IHttpNegotiate *iface, DWORD dwResponseCode, + LPCWSTR szResponseHeaders, LPCWSTR szRequestHeaders, LPWSTR *pszAdditionalRequestHeaders) +{ + ExtensionService *This = HTTPNEGOTIATE_THIS(iface); + + TRACE("(%p)->(%d %s %s %p)\n", This, dwResponseCode, debugstr_w(szResponseHeaders), + debugstr_w(szRequestHeaders), pszAdditionalRequestHeaders); + + *pszAdditionalRequestHeaders = NULL; + return S_OK; +} + +#undef HTTPNEGOTIATE_THIS + +static const IHttpNegotiateVtbl HttpNegotiateVtbl = { + HttpNegotiate_QueryInterface, + HttpNegotiate_AddRef, + HttpNegotiate_Release, + HttpNegotiate_BeginningTransaction, + HttpNegotiate_OnResponse +}; + +HRESULT WINAPI HlinkCreateExtensionServices(LPCWSTR pwzAdditionalHeaders, + HWND phwnd, LPCWSTR pszUsername, LPCWSTR pszPassword, + IUnknown *punkOuter, REFIID riid, void** ppv) +{ + ExtensionService *ret; + int len = 0; + HRESULT hres = S_OK; + + TRACE("%s %p %s %s %p %s %p\n",debugstr_w(pwzAdditionalHeaders), + phwnd, debugstr_w(pszUsername), debugstr_w(pszPassword), + punkOuter, debugstr_guid(riid), ppv); + + ret = heap_alloc(sizeof(*ret)); + + ret->lpIUnknownVtbl = &ExtServUnkVtbl; + ret->lpIAuthenticateVtbl = &AuthenticateVtbl; + ret->lpIHttpNegotiateVtbl = &HttpNegotiateVtbl; + ret->ref = 1; + ret->hwnd = phwnd; + ret->username = hlink_strdupW(pszUsername); + ret->password = hlink_strdupW(pszPassword); + + if(pwzAdditionalHeaders) + len = strlenW(pwzAdditionalHeaders); + + if(len && pwzAdditionalHeaders[len-1] != '\n' && pwzAdditionalHeaders[len-1] != '\r') { + static const WCHAR endlW[] = {'\r','\n',0}; + ret->headers = heap_alloc(len*sizeof(WCHAR) + sizeof(endlW)); + memcpy(ret->headers, pwzAdditionalHeaders, len*sizeof(WCHAR)); + memcpy(ret->headers+len, endlW, sizeof(endlW)); + }else { + ret->headers = hlink_strdupW(pwzAdditionalHeaders); + } + + if(!punkOuter) { + ret->outer = EXTSERVUNK(ret); + hres = IUnknown_QueryInterface(EXTSERVUNK(ret), riid, ppv); + IUnknown_Release(EXTSERVUNK(ret)); + }else if(IsEqualGUID(&IID_IUnknown, riid)) { + ret->outer = punkOuter; + *ppv = EXTSERVUNK(ret); + }else { + IUnknown_Release(EXTSERVUNK(ret)); + hres = E_INVALIDARG; + } + + return hres; +}
Propchange: trunk/reactos/dll/win32/hlink/extserv.c ------------------------------------------------------------------------------ svn:eol-style = native
Added: trunk/reactos/dll/win32/hlink/hlink.rbuild URL: http://svn.reactos.org/svn/reactos/trunk/reactos/dll/win32/hlink/hlink.rbuil... ============================================================================== --- trunk/reactos/dll/win32/hlink/hlink.rbuild (added) +++ trunk/reactos/dll/win32/hlink/hlink.rbuild Sat Jan 5 00:53:35 2008 @@ -1,0 +1,24 @@ +<?xml version="1.0"?> +<!DOCTYPE module SYSTEM "../../../tools/rbuild/project.dtd"> +<module name="hlink" type="win32dll" baseaddress="${BASEADDRESS_HLINK}" installbase="system32" installname="hlink.dll" allowwarnings="true"> + <autoregister infsection="OleControlDlls" type="DllRegisterServer" /> + <importlibrary definition="hlink.spec.def" /> + <include base="hlink">.</include> + <include base="ReactOS">include/reactos/wine</include> + <define name="__WINESRC__" /> + <define name="WINVER">0x600</define> + <define name="_WIN32_WINNT">0x600</define> + <library>wine</library> + <library>shell32</library> + <library>ole32</library> + <library>advapi32</library> + <library>kernel32</library> + <library>urlmon</library> + <library>uuid</library> + <library>ntdll</library> + <file>browse_ctx.c</file> + <file>extserv.c</file> + <file>hlink_main.c</file> + <file>link.c</file> + <file>hlink.spec</file> +</module>
Propchange: trunk/reactos/dll/win32/hlink/hlink.rbuild ------------------------------------------------------------------------------ svn:eol-style = native
Added: trunk/reactos/dll/win32/hlink/hlink.spec URL: http://svn.reactos.org/svn/reactos/trunk/reactos/dll/win32/hlink/hlink.spec?... ============================================================================== --- trunk/reactos/dll/win32/hlink/hlink.spec (added) +++ trunk/reactos/dll/win32/hlink/hlink.spec Sat Jan 5 00:53:35 2008 @@ -1,0 +1,33 @@ +3 stdcall HlinkCreateFromMoniker(ptr wstr wstr ptr long ptr ptr ptr) +4 stdcall HlinkCreateFromString(wstr wstr wstr ptr long ptr ptr ptr) +5 stdcall HlinkCreateFromData(ptr ptr long ptr ptr ptr) +6 stdcall HlinkCreateBrowseContext(ptr ptr ptr) +7 stub HlinkClone +8 stdcall HlinkNavigateToStringReference(wstr wstr ptr long ptr long ptr ptr ptr) +9 stdcall HlinkOnNavigate(ptr ptr long ptr wstr wstr ptr) +10 stdcall HlinkNavigate(ptr ptr long ptr ptr ptr) +11 stdcall HlinkUpdateStackItem(ptr ptr long ptr wstr wstr) +12 stub HlinkOnRenameDocument +14 stub HlinkResolveMonikerForData +15 stub HlinkResolveStringForData +16 stub OleSaveToStreamEx +18 stub HlinkParseDisplayName +20 stdcall HlinkQueryCreateFromData(ptr) +21 stub HlinkSetSpecialReference +22 stdcall HlinkGetSpecialReference(long ptr) +23 stub HlinkCreateShortcut +24 stub HlinkResolveShortcut +25 stdcall HlinkIsShortcut(wstr) +26 stub HlinkResolveShortcutToString +27 stub HlinkCreateShortcutFromString +28 stub HlinkGetValueFromParams +29 stub HlinkCreateShortcutFromMoniker +30 stub HlinkResolveShortcutToMoniker +31 stdcall HlinkTranslateURL(wstr long ptr) +32 stdcall HlinkCreateExtensionServices(wstr long wstr wstr ptr ptr ptr) +33 stub HlinkPreprocessMoniker + +@ stdcall -private DllCanUnloadNow() +@ stdcall -private DllGetClassObject(ptr ptr ptr) +@ stdcall -private DllRegisterServer() +# @ stub -private DllUnregisterServer
Propchange: trunk/reactos/dll/win32/hlink/hlink.spec ------------------------------------------------------------------------------ svn:eol-style = native
Added: trunk/reactos/dll/win32/hlink/hlink_main.c URL: http://svn.reactos.org/svn/reactos/trunk/reactos/dll/win32/hlink/hlink_main.... ============================================================================== --- trunk/reactos/dll/win32/hlink/hlink_main.c (added) +++ trunk/reactos/dll/win32/hlink/hlink_main.c Sat Jan 5 00:53:35 2008 @@ -1,0 +1,447 @@ +/* + * Implementation of hyperlinking (hlink.dll) + * + * Copyright 2005 Aric Stewart for CodeWeavers + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2.1 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA + */ + +#include "hlink_private.h" + +#include "winreg.h" +#include "hlguids.h" + +#include "wine/debug.h" + +WINE_DEFAULT_DEBUG_CHANNEL(hlink); + +typedef HRESULT (CALLBACK *LPFNCREATEINSTANCE)(IUnknown*, REFIID, LPVOID*); + +typedef struct +{ + const IClassFactoryVtbl *lpVtbl; + LPFNCREATEINSTANCE lpfnCI; +} CFImpl; + +BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) +{ + TRACE("%p %d %p\n", hinstDLL, fdwReason, lpvReserved); + + switch (fdwReason) + { + case DLL_WINE_PREATTACH: + return FALSE; /* prefer native version */ + case DLL_PROCESS_ATTACH: + DisableThreadLibraryCalls(hinstDLL); + break; + case DLL_PROCESS_DETACH: + break; + } + return TRUE; +} + +HRESULT WINAPI DllCanUnloadNow( void ) +{ + FIXME("\n"); + return S_OK; +} + +HRESULT WINAPI HlinkCreateFromMoniker( IMoniker *pimkTrgt, LPCWSTR pwzLocation, + LPCWSTR pwzFriendlyName, IHlinkSite* pihlsite, DWORD dwSiteData, + IUnknown* piunkOuter, REFIID riid, void** ppvObj) +{ + IHlink *hl = NULL; + HRESULT r = S_OK; + + TRACE("%p %s %s %p %i %p %s %p\n", pimkTrgt, debugstr_w(pwzLocation), + debugstr_w(pwzFriendlyName), pihlsite, dwSiteData, piunkOuter, + debugstr_guid(riid), ppvObj); + + r = CoCreateInstance(&CLSID_StdHlink, piunkOuter, CLSCTX_INPROC_SERVER, riid, (LPVOID*)&hl); + if (FAILED(r)) + return r; + + if (pwzLocation) + IHlink_SetStringReference(hl, HLINKSETF_LOCATION, NULL, pwzLocation); + if (pwzFriendlyName) + IHlink_SetFriendlyName(hl, pwzFriendlyName); + if (pihlsite) + IHlink_SetHlinkSite(hl, pihlsite, dwSiteData); + if (pimkTrgt) + IHlink_SetMonikerReference(hl, 0, pimkTrgt, pwzLocation); + + *ppvObj = hl; + + TRACE("Returning %i\n",r); + + return r; +} + +HRESULT WINAPI HlinkCreateFromString( LPCWSTR pwzTarget, LPCWSTR pwzLocation, + LPCWSTR pwzFriendlyName, IHlinkSite* pihlsite, DWORD dwSiteData, + IUnknown* piunkOuter, REFIID riid, void** ppvObj) +{ + IHlink *hl = NULL; + HRESULT r = S_OK; + + TRACE("%s %s %s %p %i %p %s %p\n", debugstr_w(pwzTarget), + debugstr_w(pwzLocation), debugstr_w(pwzFriendlyName), pihlsite, + dwSiteData, piunkOuter, debugstr_guid(riid), ppvObj); + + r = CoCreateInstance(&CLSID_StdHlink, piunkOuter, CLSCTX_INPROC_SERVER, riid, (LPVOID*)&hl); + if (FAILED(r)) + return r; + + if (pwzLocation) + IHlink_SetStringReference(hl, HLINKSETF_LOCATION, NULL, pwzLocation); + + if (pwzTarget) + { + IMoniker *pTgtMk = NULL; + IBindCtx *pbc = NULL; + ULONG eaten; + + CreateBindCtx(0, &pbc); + r = MkParseDisplayName(pbc, pwzTarget, &eaten, &pTgtMk); + IBindCtx_Release(pbc); + + if (FAILED(r)) + { + LPCWSTR p = strchrW(pwzTarget, ':'); + if (p && (p - pwzTarget > 1)) + r = CreateURLMoniker(NULL, pwzTarget, &pTgtMk); + else + r = CreateFileMoniker(pwzTarget,&pTgtMk); + } + + if (FAILED(r)) + { + ERR("couldn't create moniker for %s, failed with error 0x%08x\n", + debugstr_w(pwzTarget), r); + return r; + } + + IHlink_SetMonikerReference(hl, 0, pTgtMk, pwzLocation); + IMoniker_Release(pTgtMk); + + IHlink_SetStringReference(hl, HLINKSETF_TARGET, pwzTarget, NULL); + } + + if (pwzFriendlyName) + IHlink_SetFriendlyName(hl, pwzFriendlyName); + if (pihlsite) + IHlink_SetHlinkSite(hl, pihlsite, dwSiteData); + + TRACE("Returning %i\n",r); + *ppvObj = hl; + + return r; +} + + +HRESULT WINAPI HlinkCreateBrowseContext( IUnknown* piunkOuter, REFIID riid, void** ppvObj) +{ + HRESULT r = S_OK; + + TRACE("%p %s %p\n", piunkOuter, debugstr_guid(riid), ppvObj); + + r = CoCreateInstance(&CLSID_StdHlinkBrowseContext, piunkOuter, CLSCTX_INPROC_SERVER, riid, ppvObj); + + TRACE("returning %i\n",r); + + return r; +} + +HRESULT WINAPI HlinkNavigate(IHlink *phl, IHlinkFrame *phlFrame, + DWORD grfHLNF, LPBC pbc, IBindStatusCallback *pbsc, + IHlinkBrowseContext *phlbc) +{ + HRESULT r = S_OK; + + TRACE("%p %p %i %p %p %p\n", phl, phlFrame, grfHLNF, pbc, pbsc, phlbc); + + if (phlFrame) + r = IHlinkFrame_Navigate(phlFrame, grfHLNF, pbc, pbsc, phl); + else if (phl) + r = IHlink_Navigate(phl, grfHLNF, pbc, pbsc, phlbc); + + return r; +} + +HRESULT WINAPI HlinkOnNavigate( IHlinkFrame *phlFrame, + IHlinkBrowseContext* phlbc, DWORD grfHLNF, IMoniker *pmkTarget, + LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName, ULONG* puHLID) +{ + HRESULT r = S_OK; + + TRACE("%p %p %i %p %s %s %p\n",phlFrame, phlbc, grfHLNF, pmkTarget, + debugstr_w(pwzLocation), debugstr_w(pwzFriendlyName), puHLID); + + r = IHlinkBrowseContext_OnNavigateHlink(phlbc, grfHLNF, pmkTarget, + pwzLocation, pwzFriendlyName, puHLID); + + if (phlFrame) + r = IHlinkFrame_OnNavigate(phlFrame,grfHLNF,pmkTarget, pwzLocation, + pwzFriendlyName, 0); + + return r; +} + +HRESULT WINAPI HlinkCreateFromData(IDataObject *piDataObj, + IHlinkSite *pihlsite, DWORD dwSiteData, IUnknown *piunkOuter, + REFIID riid, void **ppvObj) +{ + FIXME("%p %p %d %p %p %p\n", + piDataObj, pihlsite, dwSiteData, piunkOuter, riid, ppvObj); + *ppvObj = NULL; + return E_NOTIMPL; +} + +HRESULT WINAPI HlinkQueryCreateFromData(IDataObject* piDataObj) +{ + FIXME("%p\n", piDataObj); + return E_NOTIMPL; +} + +HRESULT WINAPI HlinkNavigateToStringReference( LPCWSTR pwzTarget, + LPCWSTR pwzLocation, IHlinkSite *pihlsite, DWORD dwSiteData, + IHlinkFrame *pihlframe, DWORD grfHLNF, LPBC pibc, + IBindStatusCallback *pibsc, IHlinkBrowseContext *pihlbc) +{ + HRESULT r; + IHlink *hlink = NULL; + + FIXME("%s %s %p %08x %p %08x %p %p %p\n", + debugstr_w(pwzTarget), debugstr_w(pwzLocation), pihlsite, + dwSiteData, pihlframe, grfHLNF, pibc, pibsc, pihlbc); + + r = HlinkCreateFromString( pwzTarget, pwzLocation, NULL, pihlsite, + dwSiteData, NULL, &IID_IHlink, (LPVOID*) &hlink ); + if (SUCCEEDED(r)) + r = HlinkNavigate(hlink, pihlframe, grfHLNF, pibc, pibsc, pihlbc); + + return r; +} + +HRESULT WINAPI HlinkIsShortcut(LPCWSTR pwzFileName) +{ + int len; + + static const WCHAR url_ext[] = {'.','u','r','l',0}; + + TRACE("(%s)\n", debugstr_w(pwzFileName)); + + if(!pwzFileName) + return E_INVALIDARG; + + len = strlenW(pwzFileName)-4; + if(len < 0) + return S_FALSE; + + return strcmpiW(pwzFileName+len, url_ext) ? S_FALSE : S_OK; +} + +HRESULT WINAPI HlinkGetSpecialReference(ULONG uReference, LPWSTR *ppwzReference) +{ + DWORD res, type, size = 100; + LPCWSTR value_name; + WCHAR *buf; + HKEY hkey; + + static const WCHAR start_pageW[] = {'S','t','a','r','t',' ','P','a','g','e',0}; + static const WCHAR search_pageW[] = {'S','e','a','r','c','h',' ','P','a','g','e',0}; + + static const WCHAR ie_main_keyW[] = + {'S','o','f','t','w','a','r','e', + '\','M','i','c','r','o','s','o','f','t','\', + 'I','n','t','e','r','n','e','t',' ','E','x','p','l','o','r','e','r', + '\','M','a','i','n',0}; + + TRACE("(%u %p)\n", uReference, ppwzReference); + + *ppwzReference = NULL; + + switch(uReference) { + case HLSR_HOME: + value_name = start_pageW; + break; + case HLSR_SEARCHPAGE: + value_name = search_pageW; + break; + case HLSR_HISTORYFOLDER: + return E_NOTIMPL; + default: + return E_INVALIDARG; + } + + res = RegOpenKeyW(HKEY_CURRENT_USER, ie_main_keyW, &hkey); + if(res != ERROR_SUCCESS) { + WARN("Could not open key: %u\n", res); + return HRESULT_FROM_WIN32(res); + } + + buf = CoTaskMemAlloc(size); + res = RegQueryValueExW(hkey, value_name, NULL, &type, (PBYTE)buf, &size); + buf = CoTaskMemRealloc(buf, size); + if(res == ERROR_MORE_DATA) + res = RegQueryValueExW(hkey, value_name, NULL, &type, (PBYTE)buf, &size); + RegCloseKey(hkey); + if(res != ERROR_SUCCESS) { + WARN("Could not query value %s: %u\n", debugstr_w(value_name), res); + CoTaskMemFree(buf); + return HRESULT_FROM_WIN32(res); + } + + *ppwzReference = buf; + return S_OK; +} + +HRESULT WINAPI HlinkTranslateURL(LPCWSTR pwzURL, DWORD grfFlags, LPWSTR *ppwzTranslatedURL) +{ + FIXME("(%s %08x %p)\n", debugstr_w(pwzURL), grfFlags, ppwzTranslatedURL); + return E_NOTIMPL; +} + +HRESULT WINAPI HlinkUpdateStackItem(IHlinkFrame *pihlframe, IHlinkBrowseContext *pihlbc, + ULONG uHLID, IMoniker *pimkTrgt, LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName) +{ + FIXME("(%p %p %u %p %s %s)\n", pihlframe, pihlbc, uHLID, pimkTrgt, debugstr_w(pwzLocation), + debugstr_w(pwzFriendlyName)); + return E_NOTIMPL; +} + +static HRESULT WINAPI HLinkCF_fnQueryInterface ( LPCLASSFACTORY iface, + REFIID riid, LPVOID *ppvObj) +{ + CFImpl *This = (CFImpl *)iface; + + TRACE("(%p)->(%s)\n",This,debugstr_guid(riid)); + + *ppvObj = NULL; + + if (IsEqualIID(riid, &IID_IUnknown) || + IsEqualIID(riid, &IID_IClassFactory)) + { + *ppvObj = This; + return S_OK; + } + + TRACE("-- E_NOINTERFACE\n"); + return E_NOINTERFACE; +} + +static ULONG WINAPI HLinkCF_fnAddRef (LPCLASSFACTORY iface) +{ + return 2; +} + +static ULONG WINAPI HLinkCF_fnRelease(LPCLASSFACTORY iface) +{ + return 1; +} + +static HRESULT WINAPI HLinkCF_fnCreateInstance( LPCLASSFACTORY iface, + LPUNKNOWN pUnkOuter, REFIID riid, LPVOID *ppvObject) +{ + CFImpl *This = (CFImpl *)iface; + + TRACE("%p->(%p,%s,%p)\n", This, pUnkOuter, debugstr_guid(riid), ppvObject); + + *ppvObject = NULL; + + return This->lpfnCI(pUnkOuter, riid, ppvObject); +} + +static HRESULT WINAPI HLinkCF_fnLockServer(LPCLASSFACTORY iface, BOOL fLock) +{ + FIXME("%p %d\n", iface, fLock); + return E_NOTIMPL; +} + +static const IClassFactoryVtbl hlcfvt = +{ + HLinkCF_fnQueryInterface, + HLinkCF_fnAddRef, + HLinkCF_fnRelease, + HLinkCF_fnCreateInstance, + HLinkCF_fnLockServer +}; + +static CFImpl HLink_cf = { &hlcfvt, &HLink_Constructor }; +static CFImpl HLinkBrowseContext_cf = { &hlcfvt, &HLinkBrowseContext_Constructor }; + +/*********************************************************************** + * DllGetClassObject (HLINK.@) + */ +HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID iid, LPVOID *ppv) +{ + IClassFactory *pcf = NULL; + + TRACE("%s %s %p\n", debugstr_guid(rclsid), debugstr_guid(iid), ppv); + + if (!ppv) + return E_INVALIDARG; + *ppv = NULL; + + if (IsEqualIID(rclsid, &CLSID_StdHlink)) + pcf = (IClassFactory*) &HLink_cf; + else if (IsEqualIID(rclsid, &CLSID_StdHlinkBrowseContext)) + pcf = (IClassFactory*) &HLinkBrowseContext_cf; + else + return CLASS_E_CLASSNOTAVAILABLE; + + return IClassFactory_QueryInterface(pcf, iid, ppv); +} + +static HRESULT register_clsid(LPCGUID guid) +{ + static const WCHAR clsid[] = + {'C','L','S','I','D','\',0}; + static const WCHAR ips[] = + {'\','I','n','p','r','o','c','S','e','r','v','e','r','3','2',0}; + static const WCHAR hlink[] = + {'h','l','i','n','k','.','d','l','l',0}; + static const WCHAR threading_model[] = + {'T','h','r','e','a','d','i','n','g','M','o','d','e','l',0}; + static const WCHAR apartment[] = + {'A','p','a','r','t','m','e','n','t',0}; + WCHAR path[80]; + HKEY key = NULL; + LONG r; + + lstrcpyW(path, clsid); + StringFromGUID2(guid, &path[6], 80); + lstrcatW(path, ips); + r = RegCreateKeyW(HKEY_CLASSES_ROOT, path, &key); + if (r != ERROR_SUCCESS) + return E_FAIL; + + RegSetValueExW(key, NULL, 0, REG_SZ, (const BYTE *)hlink, sizeof hlink); + RegSetValueExW(key, threading_model, 0, REG_SZ, (const BYTE *)apartment, sizeof apartment); + RegCloseKey(key); + + return S_OK; +} + +HRESULT WINAPI DllRegisterServer(void) +{ + HRESULT r; + + r = register_clsid(&CLSID_StdHlink); + if (SUCCEEDED(r)) + r = register_clsid(&CLSID_StdHlinkBrowseContext); + + return S_OK; +}
Propchange: trunk/reactos/dll/win32/hlink/hlink_main.c ------------------------------------------------------------------------------ svn:eol-style = native
Added: trunk/reactos/dll/win32/hlink/hlink_private.h URL: http://svn.reactos.org/svn/reactos/trunk/reactos/dll/win32/hlink/hlink_priva... ============================================================================== --- trunk/reactos/dll/win32/hlink/hlink_private.h (added) +++ trunk/reactos/dll/win32/hlink/hlink_private.h Sat Jan 5 00:53:35 2008 @@ -1,0 +1,78 @@ +/* + * Copyright 2007 Jacek Caban for CodeWeavers + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2.1 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA + */ + +#include <stdarg.h> + +#define COBJMACROS + +#include "winerror.h" +#include "windef.h" +#include "winbase.h" +#include "winuser.h" +#include "ole2.h" +#include "hlink.h" + +#include "wine/unicode.h" + +extern HRESULT WINAPI HLink_Constructor(IUnknown*,REFIID,void**); +extern HRESULT WINAPI HLinkBrowseContext_Constructor(IUnknown*,REFIID,void**); + +static inline void *heap_alloc(size_t len) +{ + return HeapAlloc(GetProcessHeap(), 0, len); +} + +static inline void *heap_alloc_zero(size_t len) +{ + return HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len); +} + +static inline BOOL heap_free(void *mem) +{ + return HeapFree(GetProcessHeap(), 0, mem); +} + +static inline LPWSTR hlink_strdupW(LPCWSTR str) +{ + LPWSTR ret = NULL; + + if(str) { + DWORD size; + + size = (strlenW(str)+1)*sizeof(WCHAR); + ret = heap_alloc(size); + memcpy(ret, str, size); + } + + return ret; +} + +static inline LPWSTR hlink_co_strdupW(LPCWSTR str) +{ + LPWSTR ret = NULL; + + if(str) { + DWORD size; + + size = (strlenW(str)+1)*sizeof(WCHAR); + ret = CoTaskMemAlloc(size); + memcpy(ret, str, size); + } + + return ret; +}
Propchange: trunk/reactos/dll/win32/hlink/hlink_private.h ------------------------------------------------------------------------------ svn:eol-style = native
Added: trunk/reactos/dll/win32/hlink/link.c URL: http://svn.reactos.org/svn/reactos/trunk/reactos/dll/win32/hlink/link.c?rev=... ============================================================================== --- trunk/reactos/dll/win32/hlink/link.c (added) +++ trunk/reactos/dll/win32/hlink/link.c Sat Jan 5 00:53:35 2008 @@ -1,0 +1,843 @@ +/* + * Implementation of hyperlinking (hlink.dll) + * + * Copyright 2005 Aric Stewart for CodeWeavers + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2.1 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA + */ + +#include "hlink_private.h" + +#include "shellapi.h" +#include "hlguids.h" + +#include "wine/debug.h" + +WINE_DEFAULT_DEBUG_CHANNEL(hlink); + +#define HLINK_SAVE_MAGIC 0x00000002 +#define HLINK_SAVE_MONIKER_PRESENT 0x01 +#define HLINK_SAVE_MONIKER_IS_ABSOLUTE 0x02 +#define HLINK_SAVE_LOCATION_PRESENT 0x08 +#define HLINK_SAVE_FRIENDLY_PRESENT 0x10 +/* 0x20, 0x40 unknown */ +#define HLINK_SAVE_TARGET_FRAME_PRESENT 0x80 +/* known flags */ +#define HLINK_SAVE_ALL (HLINK_SAVE_TARGET_FRAME_PRESENT|HLINK_SAVE_FRIENDLY_PRESENT|HLINK_SAVE_LOCATION_PRESENT|0x04|HLINK_SAVE_MONIKER_IS_ABSOLUTE|HLINK_SAVE_MONIKER_PRESENT) + +static const IHlinkVtbl hlvt; +static const IPersistStreamVtbl psvt; +static const IDataObjectVtbl dovt; + +typedef struct +{ + const IHlinkVtbl *lpVtbl; + LONG ref; + + const IPersistStreamVtbl *lpPSVtbl; + const IDataObjectVtbl *lpDOVtbl; + + LPWSTR FriendlyName; + LPWSTR Location; + LPWSTR Target; + LPWSTR TargetFrameName; + IMoniker *Moniker; + IHlinkSite *Site; + DWORD SiteData; + BOOL absolute; +} HlinkImpl; + + +static inline HlinkImpl* HlinkImpl_from_IPersistStream( IPersistStream* iface) +{ + return (HlinkImpl*) ((CHAR*)iface - FIELD_OFFSET(HlinkImpl, lpPSVtbl)); +} + +static inline HlinkImpl* HlinkImpl_from_IDataObject( IDataObject* iface) +{ + return (HlinkImpl*) ((CHAR*)iface - FIELD_OFFSET(HlinkImpl, lpDOVtbl)); +} + +static inline void __GetMoniker(HlinkImpl* This, IMoniker** moniker) +{ + *moniker = NULL; + if (This->Moniker) + { + *moniker = This->Moniker; + if (*moniker) + IMoniker_AddRef(*moniker); + } + else if (This->Site) + { + IHlinkSite_GetMoniker(This->Site, This->SiteData, + OLEGETMONIKER_FORCEASSIGN, OLEWHICHMK_CONTAINER, + (LPVOID)moniker); + } +} + +HRESULT WINAPI HLink_Constructor(IUnknown *pUnkOuter, REFIID riid, + LPVOID *ppv) +{ + HlinkImpl * hl; + + TRACE("unkOut=%p riid=%s\n", pUnkOuter, debugstr_guid(riid)); + *ppv = NULL; + + if (pUnkOuter) + return CLASS_E_NOAGGREGATION; + + hl = heap_alloc_zero(sizeof(HlinkImpl)); + if (!hl) + return E_OUTOFMEMORY; + + hl->ref = 1; + hl->lpVtbl = &hlvt; + hl->lpPSVtbl = &psvt; + hl->lpDOVtbl = &dovt; + + *ppv = hl; + return S_OK; +} + +static HRESULT WINAPI IHlink_fnQueryInterface(IHlink* iface, REFIID riid, + LPVOID *ppvObj) +{ + HlinkImpl *This = (HlinkImpl*)iface; + + TRACE ("(%p)->(%s,%p)\n", This, debugstr_guid (riid), ppvObj); + + *ppvObj = NULL; + + if (IsEqualIID(riid, &IID_IUnknown) || (IsEqualIID(riid, &IID_IHlink))) + *ppvObj = This; + else if (IsEqualIID(riid, &IID_IPersistStream)) + *ppvObj = (LPVOID*)&(This->lpPSVtbl); + else if (IsEqualIID(riid, &IID_IDataObject)) + *ppvObj = (LPVOID*)&(This->lpDOVtbl); + + if (*ppvObj) + { + IUnknown_AddRef((IUnknown*)(*ppvObj)); + return S_OK; + } + return E_NOINTERFACE; +} + +static ULONG WINAPI IHlink_fnAddRef (IHlink* iface) +{ + HlinkImpl *This = (HlinkImpl*)iface; + ULONG refCount = InterlockedIncrement(&This->ref); + + TRACE("(%p)->(count=%u)\n", This, refCount - 1); + + return refCount; +} + +static ULONG WINAPI IHlink_fnRelease (IHlink* iface) +{ + HlinkImpl *This = (HlinkImpl*)iface; + ULONG refCount = InterlockedDecrement(&This->ref); + + TRACE("(%p)->(count=%u)\n", This, refCount + 1); + if (refCount) + return refCount; + + TRACE("-- destroying IHlink (%p)\n", This); + heap_free(This->FriendlyName); + heap_free(This->Target); + heap_free(This->TargetFrameName); + heap_free(This->Location); + if (This->Moniker) + IMoniker_Release(This->Moniker); + if (This->Site) + IHlinkSite_Release(This->Site); + heap_free(This); + return 0; +} + +static HRESULT WINAPI IHlink_fnSetHlinkSite( IHlink* iface, + IHlinkSite* pihlSite, DWORD dwSiteData) +{ + HlinkImpl *This = (HlinkImpl*)iface; + + TRACE("(%p)->(%p %i)\n", This, pihlSite, dwSiteData); + + if (This->Site) + IHlinkSite_Release(This->Site); + + This->Site = pihlSite; + if (This->Site) + IHlinkSite_AddRef(This->Site); + + This->SiteData = dwSiteData; + + return S_OK; +} + +static HRESULT WINAPI IHlink_fnGetHlinkSite( IHlink* iface, + IHlinkSite** ppihlSite, DWORD *pdwSiteData) +{ + HlinkImpl *This = (HlinkImpl*)iface; + + TRACE("(%p)->(%p %p)\n", This, ppihlSite, pdwSiteData); + + *ppihlSite = This->Site; + *pdwSiteData = This->SiteData; + + if (This->Site) + IHlinkSite_AddRef(This->Site); + + return S_OK; +} + +static HRESULT WINAPI IHlink_fnSetMonikerReference( IHlink* iface, + DWORD rfHLSETF, IMoniker *pmkTarget, LPCWSTR pwzLocation) +{ + HlinkImpl *This = (HlinkImpl*)iface; + + FIXME("(%p)->(%i %p %s)\n", This, rfHLSETF, pmkTarget, + debugstr_w(pwzLocation)); + + if (This->Moniker) + IMoniker_Release(This->Moniker); + + This->Moniker = pmkTarget; + if (This->Moniker) + { + LPOLESTR display_name; + IMoniker_AddRef(This->Moniker); + IMoniker_GetDisplayName(This->Moniker, NULL, NULL, &display_name); + This->absolute = display_name && strchrW(display_name, ':'); + CoTaskMemFree(display_name); + } + + heap_free(This->Location); + This->Location = hlink_strdupW( pwzLocation ); + + return S_OK; +} + +static HRESULT WINAPI IHlink_fnSetStringReference(IHlink* iface, + DWORD grfHLSETF, LPCWSTR pwzTarget, LPCWSTR pwzLocation) +{ + HlinkImpl *This = (HlinkImpl*)iface; + + TRACE("(%p)->(%i %s %s)\n", This, grfHLSETF, debugstr_w(pwzTarget), + debugstr_w(pwzLocation)); + + if (grfHLSETF & HLINKSETF_TARGET) + { + heap_free(This->Target); + This->Target = hlink_strdupW( pwzTarget ); + } + if (grfHLSETF & HLINKSETF_LOCATION) + { + heap_free(This->Location); + This->Location = hlink_strdupW( pwzLocation ); + } + + return S_OK; +} + +static HRESULT WINAPI IHlink_fnGetMonikerReference(IHlink* iface, + DWORD dwWhichRef, IMoniker **ppimkTarget, LPWSTR *ppwzLocation) +{ + HlinkImpl *This = (HlinkImpl*)iface; + + TRACE("(%p) -> (%i %p %p)\n", This, dwWhichRef, ppimkTarget, + ppwzLocation); + + if(ppimkTarget) + __GetMoniker(This, ppimkTarget); + + if (ppwzLocation) + IHlink_GetStringReference(iface, dwWhichRef, NULL, ppwzLocation); + + return S_OK; +} + +static HRESULT WINAPI IHlink_fnGetStringReference (IHlink* iface, + DWORD dwWhichRef, LPWSTR *ppwzTarget, LPWSTR *ppwzLocation) +{ + HlinkImpl *This = (HlinkImpl*)iface; + + FIXME("(%p) -> (%i %p %p)\n", This, dwWhichRef, ppwzTarget, ppwzLocation); + + if (ppwzTarget) + { + *ppwzTarget = hlink_co_strdupW( This->Target ); + + if (!This->Target) + { + IMoniker* mon; + __GetMoniker(This, &mon); + if (mon) + { + IBindCtx *pbc; + + CreateBindCtx( 0, &pbc); + IMoniker_GetDisplayName(mon, pbc, NULL, ppwzTarget); + IBindCtx_Release(pbc); + IMoniker_Release(mon); + } + else + FIXME("Unhandled case, no set Target and no moniker\n"); + } + } + if (ppwzLocation) + *ppwzLocation = hlink_co_strdupW( This->Location ); + + TRACE("(Target: %s Location: %s)\n", + (ppwzTarget)?debugstr_w(*ppwzTarget):"<NULL>", + (ppwzLocation)?debugstr_w(*ppwzLocation):"<NULL>"); + + return S_OK; +} + +static HRESULT WINAPI IHlink_fnSetFriendlyName (IHlink *iface, + LPCWSTR pwzFriendlyName) +{ + HlinkImpl *This = (HlinkImpl*)iface; + + TRACE("(%p) -> (%s)\n", This, debugstr_w(pwzFriendlyName)); + + heap_free(This->FriendlyName); + This->FriendlyName = hlink_strdupW( pwzFriendlyName ); + + return S_OK; +} + +static HRESULT WINAPI IHlink_fnGetFriendlyName (IHlink* iface, + DWORD grfHLFNAMEF, LPWSTR* ppwzFriendlyName) +{ + HlinkImpl *This = (HlinkImpl*)iface; + + TRACE("(%p) -> (%i %p)\n", This, grfHLFNAMEF, ppwzFriendlyName); + + /* FIXME: Only using explicitly set and cached friendly names */ + + if (This->FriendlyName) + *ppwzFriendlyName = hlink_co_strdupW( This->FriendlyName ); + else + { + IMoniker *moniker; + __GetMoniker(This, &moniker); + if (moniker) + { + IBindCtx *bcxt; + CreateBindCtx(0, &bcxt); + + IMoniker_GetDisplayName(moniker, bcxt, NULL, ppwzFriendlyName); + IBindCtx_Release(bcxt); + IMoniker_Release(moniker); + } + else + *ppwzFriendlyName = NULL; + } + + return S_OK; +} + +static HRESULT WINAPI IHlink_fnSetTargetFrameName(IHlink* iface, + LPCWSTR pwzTargetFramename) +{ + HlinkImpl *This = (HlinkImpl*)iface; + TRACE("(%p)->(%s)\n", This, debugstr_w(pwzTargetFramename)); + + heap_free(This->TargetFrameName); + This->TargetFrameName = hlink_strdupW( pwzTargetFramename ); + + return S_OK; +} + +static HRESULT WINAPI IHlink_fnGetTargetFrameName(IHlink* iface, + LPWSTR *ppwzTargetFrameName) +{ + HlinkImpl *This = (HlinkImpl*)iface; + + TRACE("(%p)->(%p)\n", This, ppwzTargetFrameName); + *ppwzTargetFrameName = hlink_co_strdupW( This->TargetFrameName ); + + return S_OK; +} + +static HRESULT WINAPI IHlink_fnGetMiscStatus(IHlink* iface, DWORD* pdwStatus) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IHlink_fnNavigate(IHlink* iface, DWORD grfHLNF, LPBC pbc, + IBindStatusCallback *pbsc, IHlinkBrowseContext *phbc) +{ + HlinkImpl *This = (HlinkImpl*)iface; + IMoniker *mon = NULL; + + FIXME("Semi-Stub:(%p)->(%i %p %p %p)\n", This, grfHLNF, pbc, pbsc, phbc); + + if (This->Site) + IHlinkSite_ReadyToNavigate(This->Site, This->SiteData, 0); + + __GetMoniker(This, &mon); + TRACE("Moniker %p\n", mon); + + if (mon) + { + IBindCtx *bcxt; + IHlinkTarget *target = NULL; + HRESULT r = S_OK; + + CreateBindCtx(0, &bcxt); + + RegisterBindStatusCallback(bcxt, pbsc, NULL, 0); + + r = IMoniker_BindToObject(mon, bcxt, NULL, &IID_IHlinkTarget, + (LPVOID*)&target); + TRACE("IHlinkTarget returned 0x%x\n", r); + if (r == S_OK) + { + IHlinkTarget_SetBrowseContext(target, phbc); + IHlinkTarget_Navigate(target, grfHLNF, This->Location); + IHlinkTarget_Release(target); + } + else + { + static const WCHAR szOpen[] = {'o','p','e','n',0}; + LPWSTR target = NULL; + + r = IHlink_GetStringReference(iface, HLINKGETREF_DEFAULT, &target, NULL); + if (SUCCEEDED(r) && target) + { + ShellExecuteW(NULL, szOpen, target, NULL, NULL, SW_SHOW); + CoTaskMemFree(target); + } + } + + RevokeBindStatusCallback(bcxt, pbsc); + + IBindCtx_Release(bcxt); + IMoniker_Release(mon); + } + + if (This->Site) + IHlinkSite_OnNavigationComplete(This->Site, This->SiteData, 0, 0, NULL); + + TRACE("Finished Navigation\n"); + return S_OK; +} + +static HRESULT WINAPI IHlink_fnSetAdditonalParams(IHlink* iface, + LPCWSTR pwzAdditionalParams) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IHlink_fnGetAdditionalParams(IHlink* iface, + LPWSTR* ppwzAdditionalParams) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static const IHlinkVtbl hlvt = +{ + IHlink_fnQueryInterface, + IHlink_fnAddRef, + IHlink_fnRelease, + IHlink_fnSetHlinkSite, + IHlink_fnGetHlinkSite, + IHlink_fnSetMonikerReference, + IHlink_fnGetMonikerReference, + IHlink_fnSetStringReference, + IHlink_fnGetStringReference, + IHlink_fnSetFriendlyName, + IHlink_fnGetFriendlyName, + IHlink_fnSetTargetFrameName, + IHlink_fnGetTargetFrameName, + IHlink_fnGetMiscStatus, + IHlink_fnNavigate, + IHlink_fnSetAdditonalParams, + IHlink_fnGetAdditionalParams +}; + +static HRESULT WINAPI IDataObject_fnQueryInterface(IDataObject* iface, + REFIID riid, LPVOID *ppvObj) +{ + HlinkImpl *This = HlinkImpl_from_IDataObject(iface); + TRACE("%p\n", This); + return IHlink_QueryInterface((IHlink*)This, riid, ppvObj); +} + +static ULONG WINAPI IDataObject_fnAddRef (IDataObject* iface) +{ + HlinkImpl *This = HlinkImpl_from_IDataObject(iface); + TRACE("%p\n", This); + return IHlink_AddRef((IHlink*)This); +} + +static ULONG WINAPI IDataObject_fnRelease (IDataObject* iface) +{ + HlinkImpl *This = HlinkImpl_from_IDataObject(iface); + TRACE("%p\n", This); + return IHlink_Release((IHlink*)This); +} + +static HRESULT WINAPI IDataObject_fnGetData(IDataObject* iface, + FORMATETC* pformatetcIn, STGMEDIUM* pmedium) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IDataObject_fnGetDataHere(IDataObject* iface, + FORMATETC* pformatetc, STGMEDIUM* pmedium) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IDataObject_fnQueryGetData(IDataObject* iface, + FORMATETC* pformatetc) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IDataObject_fnGetConicalFormatEtc(IDataObject* iface, + FORMATETC* pformatetcIn, FORMATETC* pformatetcOut) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IDataObject_fnSetData(IDataObject* iface, + FORMATETC* pformatetc, STGMEDIUM* pmedium, BOOL fRelease) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IDataObject_fnEnumFormatEtc(IDataObject* iface, + DWORD dwDirection, IEnumFORMATETC** ppenumFormatEtc) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IDataObject_fnDAdvise(IDataObject* iface, + FORMATETC* pformatetc, DWORD advf, IAdviseSink* pAdvSink, + DWORD* pdwConnection) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IDataObject_fnDUnadvise(IDataObject* iface, + DWORD dwConnection) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT WINAPI IDataObject_fnEnumDAdvise(IDataObject* iface, + IEnumSTATDATA** ppenumAdvise) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static const IDataObjectVtbl dovt = +{ + IDataObject_fnQueryInterface, + IDataObject_fnAddRef, + IDataObject_fnRelease, + IDataObject_fnGetData, + IDataObject_fnGetDataHere, + IDataObject_fnQueryGetData, + IDataObject_fnGetConicalFormatEtc, + IDataObject_fnSetData, + IDataObject_fnEnumFormatEtc, + IDataObject_fnDAdvise, + IDataObject_fnDUnadvise, + IDataObject_fnEnumDAdvise +}; + +static HRESULT WINAPI IPersistStream_fnQueryInterface(IPersistStream* iface, + REFIID riid, LPVOID *ppvObj) +{ + HlinkImpl *This = HlinkImpl_from_IPersistStream(iface); + TRACE("(%p)\n", This); + return IHlink_QueryInterface((IHlink*)This, riid, ppvObj); +} + +static ULONG WINAPI IPersistStream_fnAddRef (IPersistStream* iface) +{ + HlinkImpl *This = HlinkImpl_from_IPersistStream(iface); + TRACE("(%p)\n", This); + return IHlink_AddRef((IHlink*)This); +} + +static ULONG WINAPI IPersistStream_fnRelease (IPersistStream* iface) +{ + HlinkImpl *This = HlinkImpl_from_IPersistStream(iface); + TRACE("(%p)\n", This); + return IHlink_Release((IHlink*)This); +} + +static HRESULT WINAPI IPersistStream_fnGetClassID(IPersistStream* iface, + CLSID* pClassID) +{ + HlinkImpl *This = HlinkImpl_from_IPersistStream(iface); + TRACE("(%p)\n", This); + memcpy(pClassID, &CLSID_StdHlink, sizeof(CLSID)); + return S_OK; +} + +static HRESULT WINAPI IPersistStream_fnIsDirty(IPersistStream* iface) +{ + FIXME("\n"); + return E_NOTIMPL; +} + +static HRESULT write_hlink_string(IStream *pStm, LPCWSTR str) +{ + DWORD len; + HRESULT hr; + + TRACE("(%p, %s)\n", pStm, debugstr_w(str)); + + len = strlenW(str) + 1; + + hr = IStream_Write(pStm, &len, sizeof(len), NULL); + if (FAILED(hr)) return hr; + + hr = IStream_Write(pStm, str, len * sizeof(WCHAR), NULL); + if (FAILED(hr)) return hr; + + return S_OK; +} + +static inline ULONG size_hlink_string(LPCWSTR str) +{ + return sizeof(DWORD) + (strlenW(str) + 1) * sizeof(WCHAR); +} + +static HRESULT read_hlink_string(IStream *pStm, LPWSTR *out_str) +{ + LPWSTR str; + DWORD len; + ULONG read; + HRESULT hr; + + hr = IStream_Read(pStm, &len, sizeof(len), &read); + if (FAILED(hr)) return hr; + if (read != sizeof(len)) return STG_E_READFAULT; + + TRACE("read len %d\n", len); + + str = heap_alloc(len * sizeof(WCHAR)); + if (!str) return E_OUTOFMEMORY; + + hr = IStream_Read(pStm, str, len * sizeof(WCHAR), &read); + if (FAILED(hr)) + { + heap_free(str); + return hr; + } + if (read != len * sizeof(WCHAR)) + { + heap_free(str); + return STG_E_READFAULT; + } + TRACE("read string %s\n", debugstr_w(str)); + + *out_str = str; + return S_OK; +} + +static HRESULT WINAPI IPersistStream_fnLoad(IPersistStream* iface, + IStream* pStm) +{ + HRESULT r; + DWORD hdr[2]; + DWORD read; + HlinkImpl *This = HlinkImpl_from_IPersistStream(iface); + + r = IStream_Read(pStm, &hdr, sizeof(hdr), &read); + if (read != sizeof(hdr) || (hdr[0] != HLINK_SAVE_MAGIC)) + { + r = E_FAIL; + goto end; + } + if (hdr[1] & ~HLINK_SAVE_ALL) + FIXME("unknown flag(s) 0x%x\n", hdr[1] & ~HLINK_SAVE_ALL); + + if (hdr[1] & HLINK_SAVE_TARGET_FRAME_PRESENT) + { + TRACE("loading target frame name\n"); + r = read_hlink_string(pStm, &This->TargetFrameName); + if (FAILED(r)) goto end; + } + + if (hdr[1] & HLINK_SAVE_FRIENDLY_PRESENT) + { + TRACE("loading target friendly name\n"); + if (!(hdr[1] & 0x4)) + FIXME("0x4 flag not present with friendly name flag - not sure what this means\n"); + r = read_hlink_string(pStm, &This->FriendlyName); + if (FAILED(r)) goto end; + } + + if (hdr[1] & HLINK_SAVE_MONIKER_PRESENT) + { + TRACE("loading moniker\n"); + r = OleLoadFromStream(pStm, &IID_IMoniker, (LPVOID*)&(This->Moniker)); + if (FAILED(r)) + goto end; + This->absolute = hdr[1] & HLINK_SAVE_MONIKER_IS_ABSOLUTE ? TRUE : FALSE; + } + + if (hdr[1] & HLINK_SAVE_LOCATION_PRESENT) + { + TRACE("loading location\n"); + r = read_hlink_string(pStm, &This->Location); + if (FAILED(r)) goto end; + } + +end: + TRACE("Load Result 0x%x (%p)\n", r, This->Moniker); + + return r; +} + +static HRESULT WINAPI IPersistStream_fnSave(IPersistStream* iface, + IStream* pStm, BOOL fClearDirty) +{ + HRESULT r = E_FAIL; + HlinkImpl *This = HlinkImpl_from_IPersistStream(iface); + DWORD hdr[2]; + IMoniker *moniker; + + TRACE("(%p) Moniker(%p)\n", This, This->Moniker); + + __GetMoniker(This, &moniker); + + hdr[0] = HLINK_SAVE_MAGIC; + hdr[1] = 0; + + if (moniker) + hdr[1] |= HLINK_SAVE_MONIKER_PRESENT; + if (This->absolute) + hdr[1] |= HLINK_SAVE_MONIKER_IS_ABSOLUTE; + if (This->Location) + hdr[1] |= HLINK_SAVE_LOCATION_PRESENT; + if (This->FriendlyName) + hdr[1] |= HLINK_SAVE_FRIENDLY_PRESENT | 4 /* FIXME */; + if (This->TargetFrameName) + hdr[1] |= HLINK_SAVE_TARGET_FRAME_PRESENT; + + IStream_Write(pStm, &hdr, sizeof(hdr), NULL); + + if (This->TargetFrameName) + { + r = write_hlink_string(pStm, This->TargetFrameName); + if (FAILED(r)) goto end; + } + + if (This->FriendlyName) + { + r = write_hlink_string(pStm, This->FriendlyName); + if (FAILED(r)) goto end; + } + + if (moniker) + { + IPersistStream* monstream; + + monstream = NULL; + IMoniker_QueryInterface(moniker, &IID_IPersistStream, + (LPVOID*)&monstream); + if (monstream) + { + r = OleSaveToStream(monstream, pStm); + IPersistStream_Release(monstream); + } + if (FAILED(r)) goto end; + } + + if (This->Location) + { + r = write_hlink_string(pStm, This->Location); + if (FAILED(r)) goto end; + } + +end: + if (moniker) IMoniker_Release(moniker); + TRACE("Save Result 0x%x\n", r); + + return r; +} + +static HRESULT WINAPI IPersistStream_fnGetSizeMax(IPersistStream* iface, + ULARGE_INTEGER* pcbSize) +{ + HRESULT r = E_FAIL; + HlinkImpl *This = HlinkImpl_from_IPersistStream(iface); + IMoniker *moniker; + + TRACE("(%p) Moniker(%p)\n", This, This->Moniker); + + pcbSize->QuadPart = sizeof(DWORD)*2; + + if (This->TargetFrameName) + pcbSize->QuadPart += size_hlink_string(This->TargetFrameName); + + if (This->FriendlyName) + pcbSize->QuadPart += size_hlink_string(This->FriendlyName); + + __GetMoniker(This, &moniker); + if (moniker) + { + IPersistStream* monstream = NULL; + IMoniker_QueryInterface(moniker, &IID_IPersistStream, + (LPVOID*)&monstream); + if (monstream) + { + ULARGE_INTEGER mon_size; + r = IPersistStream_GetSizeMax(monstream, &mon_size); + pcbSize->QuadPart += mon_size.QuadPart; + IPersistStream_Release(monstream); + } + IMoniker_Release(moniker); + } + + if (This->Location) + pcbSize->QuadPart += size_hlink_string(This->Location); + + return r; +} + +static const IPersistStreamVtbl psvt = +{ + IPersistStream_fnQueryInterface, + IPersistStream_fnAddRef, + IPersistStream_fnRelease, + IPersistStream_fnGetClassID, + IPersistStream_fnIsDirty, + IPersistStream_fnLoad, + IPersistStream_fnSave, + IPersistStream_fnGetSizeMax, +};
Propchange: trunk/reactos/dll/win32/hlink/link.c ------------------------------------------------------------------------------ svn:eol-style = native
-
hpoussin＠svn.reactos.org