dlls/wbemdisp/main.c

   1 /*
   2  * Copyright 2013 Hans Leidekker for CodeWeavers
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include <stdarg.h>
  20
  21 #define COBJMACROS
  22
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "objbase.h"
  26 #include "wmiutils.h"
  27 #include "wbemdisp.h"
  28 #include "rpcproxy.h"
  29
  30 #include "wine/debug.h"
  31 #include "wbemdisp_private.h"
  32 #include "wbemdisp_classes.h"
  33
  34 WINE_DEFAULT_DEBUG_CHANNEL(wbemdisp);
  35
  36 static HRESULT WINAPI WinMGMTS_QueryInterface(IParseDisplayName *iface, REFIID riid, void **ppv)
  37 {
  38     if(IsEqualGUID(riid, &IID_IUnknown)) {
  39         TRACE("(IID_IUnknown %p)\n", ppv);
  40         *ppv = iface;
  41     }else if(IsEqualGUID(riid, &IID_IParseDisplayName)) {
  42         TRACE("(IID_IParseDisplayName %p)\n", ppv);
  43         *ppv = iface;
  44     }else {
  45         WARN("Unsupported riid %s\n", debugstr_guid(riid));
  46         *ppv = NULL;
  47         return E_NOINTERFACE;
  48     }
  49
  50     IUnknown_AddRef((IUnknown*)*ppv);
  51     return S_OK;
  52 }
  53
  54 static ULONG WINAPI WinMGMTS_AddRef(IParseDisplayName *iface)
  55 {
  56     return 2;
  57 }
  58
  59 static ULONG WINAPI WinMGMTS_Release(IParseDisplayName *iface)
  60 {
  61     return 1;
  62 }
  63
  64 static HRESULT parse_path( const WCHAR *str, BSTR *server, BSTR *namespace, BSTR *relative )
  65 {
  66     IWbemPath *path;
  67     ULONG len;
  68     HRESULT hr;
  69
  70     *server = *namespace = *relative = NULL;
  71
  72     hr = CoCreateInstance( &CLSID_WbemDefPath, NULL, CLSCTX_INPROC_SERVER, &IID_IWbemPath, (void **)&path );
  73     if (hr != S_OK) return hr;
  74
  75     hr = IWbemPath_SetText( path, WBEMPATH_CREATE_ACCEPT_ALL, str );
  76     if (hr != S_OK) goto done;
  77
  78     len = 0;
  79     hr = IWbemPath_GetServer( path, &len, NULL );
  80     if (hr == S_OK)
  81     {
  82         if (!(*server = SysAllocStringLen( NULL, len )))
  83         {
  84             hr = E_OUTOFMEMORY;
  85             goto done;
  86         }
  87         hr = IWbemPath_GetServer( path, &len, *server );
  88         if (hr != S_OK) goto done;
  89     }
  90
  91     len = 0;
  92     hr = IWbemPath_GetText( path, WBEMPATH_GET_NAMESPACE_ONLY, &len, NULL );
  93     if (hr == S_OK)
  94     {
  95         if (!(*namespace = SysAllocStringLen( NULL, len )))
  96         {
  97             hr = E_OUTOFMEMORY;
  98             goto done;
  99         }
 100         hr = IWbemPath_GetText( path, WBEMPATH_GET_NAMESPACE_ONLY, &len, *namespace );
 101         if (hr != S_OK) goto done;
 102     }
 103     len = 0;
 104     hr = IWbemPath_GetText( path, WBEMPATH_GET_RELATIVE_ONLY, &len, NULL );
 105     if (hr == S_OK)
 106     {
 107         if (!(*relative = SysAllocStringLen( NULL, len )))
 108         {
 109             hr = E_OUTOFMEMORY;
 110             goto done;
 111         }
 112         hr = IWbemPath_GetText( path, WBEMPATH_GET_RELATIVE_ONLY, &len, *relative );
 113     }
 114
 115 done:
 116     IWbemPath_Release( path );
 117     if (hr != S_OK)
 118     {
 119         SysFreeString( *server );
 120         SysFreeString( *namespace );
 121         SysFreeString( *relative );
 122     }
 123     return hr;
 124 }
 125
 126 static HRESULT WINAPI WinMGMTS_ParseDisplayName(IParseDisplayName *iface, IBindCtx *pbc, LPOLESTR pszDisplayName,
 127         ULONG *pchEaten, IMoniker **ppmkOut)
 128 {
 129     const DWORD prefix_len = ARRAY_SIZE(L"winmgmts:") - 1;
 130     ISWbemLocator *locator = NULL;
 131     ISWbemServices *services = NULL;
 132     ISWbemObject *obj = NULL;
 133     BSTR server, namespace, relative;
 134     WCHAR *p;
 135     HRESULT hr;
 136
 137     TRACE( "%p, %p, %s, %p, %p\n", iface, pbc, debugstr_w(pszDisplayName), pchEaten, ppmkOut );
 138
 139     if (wcsnicmp( pszDisplayName, L"winmgmts:", prefix_len )) return MK_E_SYNTAX;
 140
 141     p = pszDisplayName + prefix_len;
 142     if (*p == '{')
 143     {
 144         FIXME( "ignoring security settings\n" );
 145         while (*p && *p != '}') p++;
 146         if (*p == '}') p++;
 147         if (*p == '!') p++;
 148     }
 149     hr = parse_path( p, &server, &namespace, &relative );
 150     if (hr != S_OK) return hr;
 151
 152     hr = SWbemLocator_create( (void **)&locator );
 153     if (hr != S_OK) goto done;
 154
 155     hr = ISWbemLocator_ConnectServer( locator, server, namespace, NULL, NULL, NULL, NULL, 0, NULL, &services );
 156     if (hr != S_OK) goto done;
 157
 158     if (!relative || !*relative) CreatePointerMoniker( (IUnknown *)services, ppmkOut );
 159     else
 160     {
 161         hr = ISWbemServices_Get( services, relative, 0, NULL, &obj );
 162         if (hr != S_OK) goto done;
 163         hr = CreatePointerMoniker( (IUnknown *)obj, ppmkOut );
 164     }
 165
 166 done:
 167     if (obj) ISWbemObject_Release( obj );
 168     if (services) ISWbemServices_Release( services );
 169     if (locator) ISWbemLocator_Release( locator );
 170     SysFreeString( server );
 171     SysFreeString( namespace );
 172     SysFreeString( relative );
 173     if (hr == S_OK) *pchEaten = lstrlenW( pszDisplayName );
 174     return hr;
 175 }
 176
 177 static const IParseDisplayNameVtbl WinMGMTSVtbl = {
 178     WinMGMTS_QueryInterface,
 179     WinMGMTS_AddRef,
 180     WinMGMTS_Release,
 181     WinMGMTS_ParseDisplayName
 182 };
 183
 184 static IParseDisplayName winmgmts = { &WinMGMTSVtbl };
 185
 186 static HRESULT WinMGMTS_create(void **ppv)
 187 {
 188     *ppv = &winmgmts;
 189     return S_OK;
 190 }
 191
 192 struct factory
 193 {
 194     IClassFactory IClassFactory_iface;
 195     HRESULT (*fnCreateInstance)( LPVOID * );
 196 };
 197
 198 static inline struct factory *impl_from_IClassFactory( IClassFactory *iface )
 199 {
 200     return CONTAINING_RECORD( iface, struct factory, IClassFactory_iface );
 201 }
 202
 203 static HRESULT WINAPI factory_QueryInterface( IClassFactory *iface, REFIID riid, LPVOID *obj )
 204 {
 205     if (IsEqualGUID( riid, &IID_IUnknown ) || IsEqualGUID( riid, &IID_IClassFactory ))
 206     {
 207         IClassFactory_AddRef( iface );
 208         *obj = iface;
 209         return S_OK;
 210     }
 211     WARN( "interface %s not implemented\n", debugstr_guid(riid) );
 212     return E_NOINTERFACE;
 213 }
 214
 215 static ULONG WINAPI factory_AddRef( IClassFactory *iface )
 216 {
 217     return 2;
 218 }
 219
 220 static ULONG WINAPI factory_Release( IClassFactory *iface )
 221 {
 222     return 1;
 223 }
 224
 225 static HRESULT WINAPI factory_CreateInstance( IClassFactory *iface, LPUNKNOWN outer, REFIID riid,
 226                                               LPVOID *obj )
 227 {
 228     struct factory *factory = impl_from_IClassFactory( iface );
 229     IUnknown *unk;
 230     HRESULT hr;
 231
 232     TRACE( "%p, %s, %p\n", outer, debugstr_guid(riid), obj );
 233
 234     *obj = NULL;
 235     if (outer) return CLASS_E_NOAGGREGATION;
 236
 237     hr = factory->fnCreateInstance( (LPVOID *)&unk );
 238     if (FAILED( hr ))
 239         return hr;
 240
 241     hr = IUnknown_QueryInterface( unk, riid, obj );
 242     IUnknown_Release( unk );
 243     return hr;
 244 }
 245
 246 static HRESULT WINAPI factory_LockServer( IClassFactory *iface, BOOL lock )
 247 {
 248     FIXME( "%p, %d\n", iface, lock );
 249     return S_OK;
 250 }
 251
 252 static const struct IClassFactoryVtbl factory_vtbl =
 253 {
 254     factory_QueryInterface,
 255     factory_AddRef,
 256     factory_Release,
 257     factory_CreateInstance,
 258     factory_LockServer
 259 };
 260
 261 static struct factory swbem_locator_cf = { { &factory_vtbl }, SWbemLocator_create };
 262 static struct factory swbem_namedvalueset_cf = { { &factory_vtbl }, SWbemNamedValueSet_create };
 263 static struct factory winmgmts_cf = { { &factory_vtbl }, WinMGMTS_create };
 264
 265 HRESULT WINAPI DllGetClassObject( REFCLSID rclsid, REFIID iid, LPVOID *obj )
 266 {
 267     IClassFactory *cf = NULL;
 268
 269     TRACE( "%s, %s, %p\n", debugstr_guid(rclsid), debugstr_guid(iid), obj );
 270
 271     if (IsEqualGUID( rclsid, &CLSID_SWbemLocator ))
 272         cf = &swbem_locator_cf.IClassFactory_iface;
 273     else if (IsEqualGUID( rclsid, &CLSID_WinMGMTS ))
 274         cf = &winmgmts_cf.IClassFactory_iface;
 275     else if (IsEqualGUID( rclsid, &CLSID_SWbemNamedValueSet ))
 276         cf = &swbem_namedvalueset_cf.IClassFactory_iface;
 277     else
 278         return CLASS_E_CLASSNOTAVAILABLE;
 279
 280     return IClassFactory_QueryInterface( cf, iid, obj );
 281 }