dlls/combase/roapi.c

   1 /*
   2  * Copyright 2014 Martin Storsjo
   3  * Copyright 2016 Michael Müller
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  */
  19 #define COBJMACROS
  20 #include "objbase.h"
  21 #include "initguid.h"
  22 #include "roapi.h"
  23 #include "roparameterizediid.h"
  24 #include "roerrorapi.h"
  25 #include "winstring.h"
  26
  27 #include "wine/debug.h"
  28
  29 WINE_DEFAULT_DEBUG_CHANNEL(combase);
  30
  31 static const char *debugstr_hstring(HSTRING hstr)
  32 {
  33     const WCHAR *str;
  34     UINT32 len;
  35     if (hstr && !((ULONG_PTR)hstr >> 16)) return "(invalid)";
  36     str = WindowsGetStringRawBuffer(hstr, &len);
  37     return wine_dbgstr_wn(str, len);
  38 }
  39
  40 static HRESULT get_library_for_classid(const WCHAR *classid, WCHAR **out)
  41 {
  42     static const WCHAR classkeyW[] = {'S','o','f','t','w','a','r','e','\\',
  43                                       'M','i','c','r','o','s','o','f','t','\\',
  44                                       'W','i','n','d','o','w','s','R','u','n','t','i','m','e','\\',
  45                                       'A','c','t','i','v','a','t','a','b','l','e','C','l','a','s','s','I','d',0};
  46     static const WCHAR dllpathW[] = {'D','l','l','P','a','t','h',0};
  47     HKEY hkey_root, hkey_class;
  48     DWORD type, size;
  49     HRESULT hr;
  50     WCHAR *buf = NULL;
  51
  52     *out = NULL;
  53
  54     /* load class registry key */
  55     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE, classkeyW, 0, KEY_READ, &hkey_root))
  56         return REGDB_E_READREGDB;
  57     if (RegOpenKeyExW(hkey_root, classid, 0, KEY_READ, &hkey_class))
  58     {
  59         WARN("Class %s not found in registry\n", debugstr_w(classid));
  60         RegCloseKey(hkey_root);
  61         return REGDB_E_CLASSNOTREG;
  62     }
  63     RegCloseKey(hkey_root);
  64
  65     /* load (and expand) DllPath registry value */
  66     if (RegQueryValueExW(hkey_class, dllpathW, NULL, &type, NULL, &size))
  67     {
  68         hr = REGDB_E_READREGDB;
  69         goto done;
  70     }
  71     if (type != REG_SZ && type != REG_EXPAND_SZ)
  72     {
  73         hr = REGDB_E_READREGDB;
  74         goto done;
  75     }
  76     if (!(buf = HeapAlloc(GetProcessHeap(), 0, size)))
  77     {
  78         hr = E_OUTOFMEMORY;
  79         goto done;
  80     }
  81     if (RegQueryValueExW(hkey_class, dllpathW, NULL, NULL, (BYTE *)buf, &size))
  82     {
  83         hr = REGDB_E_READREGDB;
  84         goto done;
  85     }
  86     if (type == REG_EXPAND_SZ)
  87     {
  88         WCHAR *expanded;
  89         DWORD len = ExpandEnvironmentStringsW(buf, NULL, 0);
  90         if (!(expanded = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR))))
  91         {
  92             hr = E_OUTOFMEMORY;
  93             goto done;
  94         }
  95         ExpandEnvironmentStringsW(buf, expanded, len);
  96         HeapFree(GetProcessHeap(), 0, buf);
  97         buf = expanded;
  98     }
  99
 100     *out = buf;
 101     return S_OK;
 102
 103 done:
 104     HeapFree(GetProcessHeap(), 0, buf);
 105     RegCloseKey(hkey_class);
 106     return hr;
 107 }
 108
 109
 110 /***********************************************************************
 111  *      RoInitialize (combase.@)
 112  */
 113 HRESULT WINAPI RoInitialize(RO_INIT_TYPE type)
 114 {
 115     switch (type) {
 116     case RO_INIT_SINGLETHREADED:
 117         return CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
 118     default:
 119         FIXME("type %d\n", type);
 120     case RO_INIT_MULTITHREADED:
 121         return CoInitializeEx(NULL, COINIT_MULTITHREADED);
 122     }
 123 }
 124
 125 /***********************************************************************
 126  *      RoUninitialize (combase.@)
 127  */
 128 void WINAPI RoUninitialize(void)
 129 {
 130     CoUninitialize();
 131 }
 132
 133 /***********************************************************************
 134  *      RoGetActivationFactory (combase.@)
 135  */
 136 HRESULT WINAPI RoGetActivationFactory(HSTRING classid, REFIID iid, void **class_factory)
 137 {
 138     PFNGETACTIVATIONFACTORY pDllGetActivationFactory;
 139     IActivationFactory *factory;
 140     WCHAR *library;
 141     HMODULE module;
 142     HRESULT hr;
 143
 144     FIXME("(%s, %s, %p): semi-stub\n", debugstr_hstring(classid), debugstr_guid(iid), class_factory);
 145
 146     if (!iid || !class_factory)
 147         return E_INVALIDARG;
 148
 149     hr = get_library_for_classid(WindowsGetStringRawBuffer(classid, NULL), &library);
 150     if (FAILED(hr))
 151     {
 152         ERR("Failed to find library for %s\n", debugstr_hstring(classid));
 153         return hr;
 154     }
 155
 156     if (!(module = LoadLibraryW(library)))
 157     {
 158         ERR("Failed to load module %s\n", debugstr_w(library));
 159         hr = HRESULT_FROM_WIN32(GetLastError());
 160         goto done;
 161     }
 162
 163     if (!(pDllGetActivationFactory = (void *)GetProcAddress(module, "DllGetActivationFactory")))
 164     {
 165         ERR("Module %s does not implement DllGetActivationFactory\n", debugstr_w(library));
 166         hr = E_FAIL;
 167         goto done;
 168     }
 169
 170     TRACE("Found library %s for class %s\n", debugstr_w(library), debugstr_hstring(classid));
 171
 172     hr = pDllGetActivationFactory(classid, &factory);
 173     if (SUCCEEDED(hr))
 174     {
 175         hr = IActivationFactory_QueryInterface(factory, iid, class_factory);
 176         if (SUCCEEDED(hr))
 177         {
 178             TRACE("Created interface %p\n", *class_factory);
 179             module = NULL;
 180         }
 181         IActivationFactory_Release(factory);
 182     }
 183
 184 done:
 185     HeapFree(GetProcessHeap(), 0, library);
 186     if (module) FreeLibrary(module);
 187     return hr;
 188 }
 189
 190 /***********************************************************************
 191  *      RoGetParameterizedTypeInstanceIID (combase.@)
 192  */
 193 HRESULT WINAPI RoGetParameterizedTypeInstanceIID(UINT32 name_element_count, const WCHAR **name_elements,
 194                                                  const IRoMetaDataLocator *meta_data_locator, GUID *iid,
 195                                                  ROPARAMIIDHANDLE *hiid)
 196 {
 197     FIXME("stub: %d %p %p %p %p\n", name_element_count, name_elements, meta_data_locator, iid, hiid);
 198     if (iid) *iid = GUID_NULL;
 199     if (hiid) *hiid = INVALID_HANDLE_VALUE;
 200     return E_NOTIMPL;
 201 }
 202
 203 /***********************************************************************
 204  *      RoActivateInstance (combase.@)
 205  */
 206 HRESULT WINAPI RoActivateInstance(HSTRING classid, IInspectable **instance)
 207 {
 208     IActivationFactory *factory;
 209     HRESULT hr;
 210
 211     FIXME("(%p, %p): semi-stub\n", classid, instance);
 212
 213     hr = RoGetActivationFactory(classid, &IID_IActivationFactory, (void **)&factory);
 214     if (SUCCEEDED(hr))
 215     {
 216         hr = IActivationFactory_ActivateInstance(factory, instance);
 217         IActivationFactory_Release(factory);
 218     }
 219
 220     return hr;
 221 }
 222
 223 /***********************************************************************
 224  *      RoGetApartmentIdentifier (combase.@)
 225  */
 226 HRESULT WINAPI RoGetApartmentIdentifier(UINT64 *identifier)
 227 {
 228     FIXME("(%p): stub\n", identifier);
 229
 230     if (!identifier)
 231         return E_INVALIDARG;
 232
 233     *identifier = 0xdeadbeef;
 234     return S_OK;
 235 }
 236
 237 /***********************************************************************
 238  *      RoRegisterForApartmentShutdown (combase.@)
 239  */
 240 HRESULT WINAPI RoRegisterForApartmentShutdown(IApartmentShutdown *callback,
 241         UINT64 *identifier, APARTMENT_SHUTDOWN_REGISTRATION_COOKIE *cookie)
 242 {
 243     HRESULT hr;
 244
 245     FIXME("(%p, %p, %p): stub\n", callback, identifier, cookie);
 246
 247     hr = RoGetApartmentIdentifier(identifier);
 248     if (FAILED(hr))
 249         return hr;
 250
 251     if (cookie)
 252         *cookie = (void *)0xcafecafe;
 253     return S_OK;
 254 }
 255
 256 /***********************************************************************
 257  *      RoGetServerActivatableClasses (combase.@)
 258  */
 259 HRESULT WINAPI RoGetServerActivatableClasses(HSTRING name, HSTRING **classes, DWORD *count)
 260 {
 261     FIXME("(%p, %p, %p): stub\n", name, classes, count);
 262
 263     if (count)
 264         *count = 0;
 265     return S_OK;
 266 }
 267
 268 /***********************************************************************
 269  *      RoRegisterActivationFactories (combase.@)
 270  */
 271 HRESULT WINAPI RoRegisterActivationFactories(HSTRING *classes, PFNGETACTIVATIONFACTORY *callbacks,
 272                                              UINT32 count, RO_REGISTRATION_COOKIE *cookie)
 273 {
 274     FIXME("(%p, %p, %d, %p): stub\n", classes, callbacks, count, cookie);
 275
 276     return S_OK;
 277 }
 278
 279 /***********************************************************************
 280  *      GetRestrictedErrorInfo (combase.@)
 281  */
 282 HRESULT WINAPI GetRestrictedErrorInfo(IRestrictedErrorInfo **info)
 283 {
 284     FIXME( "(%p)\n", info );
 285     return E_NOTIMPL;
 286 }
 287
 288 /***********************************************************************
 289  *      RoOriginateLanguageException (combase.@)
 290  */
 291 BOOL WINAPI RoOriginateLanguageException(HRESULT error, HSTRING message, IUnknown *language_exception)
 292 {
 293     FIXME("(%x %s %p) stub\n", error, debugstr_hstring(message), language_exception);
 294     return FALSE;
 295 }
 296
 297 /***********************************************************************
 298  *      CleanupTlsOleState (combase.@)
 299  */
 300 void WINAPI CleanupTlsOleState(void *unknown)
 301 {
 302     FIXME("(%p): stub\n", unknown);
 303 }
 304
 305 /***********************************************************************
 306  *      DllGetActivationFactory (combase.@)
 307  */
 308 HRESULT WINAPI DllGetActivationFactory(HSTRING classid, IActivationFactory **factory)
 309 {
 310     FIXME("(%s, %p): stub\n", debugstr_hstring(classid), factory);
 311
 312     return REGDB_E_CLASSNOTREG;
 313 }