622 lines
18 KiB
C
622 lines
18 KiB
C
/*
|
|
* 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_PROCESS_ATTACH:
|
|
DisableThreadLibraryCalls(hinstDLL);
|
|
break;
|
|
case DLL_PROCESS_DETACH:
|
|
break;
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* DllCanUnloadNow (HLINK.@)
|
|
*/
|
|
HRESULT WINAPI DllCanUnloadNow( void )
|
|
{
|
|
return S_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkCreateFromMoniker (HLINK.@)
|
|
*/
|
|
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;
|
|
|
|
IHlink_SetMonikerReference(hl, HLINKSETF_LOCATION | HLINKSETF_TARGET, pimkTrgt, pwzLocation);
|
|
|
|
if (pwzFriendlyName)
|
|
IHlink_SetFriendlyName(hl, pwzFriendlyName);
|
|
if (pihlsite)
|
|
IHlink_SetHlinkSite(hl, pihlsite, dwSiteData);
|
|
|
|
*ppvObj = hl;
|
|
|
|
TRACE("Returning %i\n",r);
|
|
|
|
return r;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkCreateFromString (HLINK.@)
|
|
*/
|
|
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;
|
|
WCHAR *hash, *tgt;
|
|
const WCHAR *loc;
|
|
|
|
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 (pwzTarget)
|
|
{
|
|
hash = strchrW(pwzTarget, '#');
|
|
if (hash)
|
|
{
|
|
if (hash == pwzTarget)
|
|
tgt = NULL;
|
|
else
|
|
{
|
|
int tgt_len = hash - pwzTarget;
|
|
tgt = heap_alloc((tgt_len + 1) * sizeof(WCHAR));
|
|
if (!tgt)
|
|
return E_OUTOFMEMORY;
|
|
memcpy(tgt, pwzTarget, tgt_len * sizeof(WCHAR));
|
|
tgt[tgt_len] = 0;
|
|
}
|
|
if (!pwzLocation)
|
|
loc = hash + 1;
|
|
else
|
|
loc = pwzLocation;
|
|
}
|
|
else
|
|
{
|
|
tgt = hlink_strdupW(pwzTarget);
|
|
if (!tgt)
|
|
return E_OUTOFMEMORY;
|
|
loc = pwzLocation;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
tgt = NULL;
|
|
loc = pwzLocation;
|
|
}
|
|
|
|
IHlink_SetStringReference(hl, HLINKSETF_TARGET | HLINKSETF_LOCATION, tgt, loc);
|
|
|
|
heap_free(tgt);
|
|
|
|
if (pwzFriendlyName)
|
|
IHlink_SetFriendlyName(hl, pwzFriendlyName);
|
|
|
|
if (pihlsite)
|
|
IHlink_SetHlinkSite(hl, pihlsite, dwSiteData);
|
|
|
|
TRACE("Returning %i\n",r);
|
|
*ppvObj = hl;
|
|
|
|
return r;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* HlinkCreateBrowseContext (HLINK.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkNavigate (HLINK.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkOnNavigate (HLINK.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkCreateFromData (HLINK.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkQueryCreateFromData (HLINK.@)
|
|
*/
|
|
HRESULT WINAPI HlinkQueryCreateFromData(IDataObject* piDataObj)
|
|
{
|
|
FIXME("%p\n", piDataObj);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkNavigateToStringReference (HLINK.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkIsShortcut (HLINK.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkGetSpecialReference (HLINK.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkTranslateURL (HLINK.@)
|
|
*/
|
|
HRESULT WINAPI HlinkTranslateURL(LPCWSTR pwzURL, DWORD grfFlags, LPWSTR *ppwzTranslatedURL)
|
|
{
|
|
FIXME("(%s %08x %p)\n", debugstr_w(pwzURL), grfFlags, ppwzTranslatedURL);
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkUpdateStackItem (HLINK.@)
|
|
*/
|
|
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;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkParseDisplayName (HLINK.@)
|
|
*/
|
|
HRESULT WINAPI HlinkParseDisplayName(LPBC pibc, LPCWSTR pwzDisplayName, BOOL fNoForceAbs,
|
|
ULONG *pcchEaten, IMoniker **ppimk)
|
|
{
|
|
HRESULT hres;
|
|
|
|
TRACE("(%p %s %x %p %p)\n", pibc, debugstr_w(pwzDisplayName), fNoForceAbs, pcchEaten, ppimk);
|
|
|
|
if(fNoForceAbs)
|
|
FIXME("Unsupported fNoForceAbs\n");
|
|
|
|
hres = MkParseDisplayNameEx(pibc, pwzDisplayName, pcchEaten, ppimk);
|
|
if(SUCCEEDED(hres))
|
|
return hres;
|
|
|
|
hres = MkParseDisplayName(pibc, pwzDisplayName, pcchEaten, ppimk);
|
|
if(SUCCEEDED(hres))
|
|
return hres;
|
|
|
|
hres = CreateFileMoniker(pwzDisplayName, ppimk);
|
|
if(SUCCEEDED(hres))
|
|
*pcchEaten = strlenW(pwzDisplayName);
|
|
|
|
return hres;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkResolveMonikerForData (HLINK.@)
|
|
*/
|
|
HRESULT WINAPI HlinkResolveMonikerForData(LPMONIKER pimkReference, DWORD reserved, LPBC pibc,
|
|
ULONG cFmtetc, FORMATETC *rgFmtetc, IBindStatusCallback *pibsc, LPMONIKER pimkBase)
|
|
{
|
|
LPOLESTR name = NULL;
|
|
IBindCtx *bctx;
|
|
DWORD mksys = 0;
|
|
void *obj = NULL;
|
|
HRESULT hres;
|
|
|
|
TRACE("(%p %x %p %d %p %p %p)\n", pimkReference, reserved, pibc, cFmtetc, rgFmtetc, pibsc, pimkBase);
|
|
|
|
if(cFmtetc || rgFmtetc || pimkBase)
|
|
FIXME("Unsupported args\n");
|
|
|
|
hres = RegisterBindStatusCallback(pibc, pibsc, NULL /* FIXME */, 0);
|
|
if(FAILED(hres))
|
|
return hres;
|
|
|
|
hres = IMoniker_IsSystemMoniker(pimkReference, &mksys);
|
|
if(SUCCEEDED(hres) && mksys != MKSYS_URLMONIKER)
|
|
WARN("sysmk = %x\n", mksys);
|
|
|
|
/* FIXME: What is it for? */
|
|
CreateBindCtx(0, &bctx);
|
|
hres = IMoniker_GetDisplayName(pimkReference, bctx, NULL, &name);
|
|
IBindCtx_Release(bctx);
|
|
if(SUCCEEDED(hres)) {
|
|
TRACE("got display name %s\n", debugstr_w(name));
|
|
CoTaskMemFree(name);
|
|
}
|
|
|
|
return IMoniker_BindToStorage(pimkReference, pibc, NULL, &IID_IUnknown, &obj);
|
|
}
|
|
|
|
/***********************************************************************
|
|
* HlinkClone (HLINK.@)
|
|
*/
|
|
HRESULT WINAPI HlinkClone(IHlink *hlink, REFIID riid, IHlinkSite *hls,
|
|
DWORD site_data, void **obj)
|
|
{
|
|
IMoniker *mk, *clone_mk = NULL;
|
|
WCHAR *loc, *name = NULL;
|
|
HRESULT hres;
|
|
|
|
if(!hlink || !riid || !obj)
|
|
return E_INVALIDARG;
|
|
|
|
*obj = NULL;
|
|
|
|
hres = IHlink_GetMonikerReference(hlink, HLINKGETREF_DEFAULT, &mk, &loc);
|
|
if(FAILED(hres))
|
|
return hres;
|
|
|
|
if(mk) {
|
|
IStream *strm;
|
|
LARGE_INTEGER lgint;
|
|
|
|
hres = CreateStreamOnHGlobal(NULL, TRUE, &strm);
|
|
if(FAILED(hres)) {
|
|
IMoniker_Release(mk);
|
|
goto cleanup;
|
|
}
|
|
|
|
hres = OleSaveToStream((IPersistStream*)mk, strm);
|
|
if(FAILED(hres)) {
|
|
IStream_Release(strm);
|
|
IMoniker_Release(mk);
|
|
goto cleanup;
|
|
}
|
|
IMoniker_Release(mk);
|
|
|
|
lgint.QuadPart = 0;
|
|
hres = IStream_Seek(strm, lgint, STREAM_SEEK_SET, NULL);
|
|
if(FAILED(hres)) {
|
|
IStream_Release(strm);
|
|
goto cleanup;
|
|
}
|
|
|
|
hres = OleLoadFromStream(strm, &IID_IMoniker, (void**)&clone_mk);
|
|
IStream_Release(strm);
|
|
if(FAILED(hres))
|
|
goto cleanup;
|
|
}
|
|
|
|
hres = IHlink_GetFriendlyName(hlink, HLFNAMEF_DEFAULT, &name);
|
|
if(FAILED(hres))
|
|
goto cleanup;
|
|
|
|
hres = HlinkCreateFromMoniker(clone_mk, loc, name, hls, site_data, NULL,
|
|
&IID_IHlink, obj);
|
|
|
|
cleanup:
|
|
if(clone_mk)
|
|
IMoniker_Release(clone_mk);
|
|
CoTaskMemFree(loc);
|
|
CoTaskMemFree(name);
|
|
return hres;
|
|
}
|
|
|
|
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;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* DllRegisterServer (HLINK.@)
|
|
*/
|
|
HRESULT WINAPI DllRegisterServer(void)
|
|
{
|
|
HRESULT r;
|
|
|
|
r = register_clsid(&CLSID_StdHlink);
|
|
if (SUCCEEDED(r))
|
|
r = register_clsid(&CLSID_StdHlinkBrowseContext);
|
|
|
|
return S_OK;
|
|
}
|