554 lines
23 KiB
C
554 lines
23 KiB
C
/*
|
|
* Copyright 2012 Hans Leidekker 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
|
|
*/
|
|
|
|
#define COBJMACROS
|
|
|
|
#include <stdio.h>
|
|
#include "windows.h"
|
|
#include "ocidl.h"
|
|
#include "initguid.h"
|
|
#include "objidl.h"
|
|
#include "wbemcli.h"
|
|
#include "wine/test.h"
|
|
|
|
static const WCHAR wqlW[] = {'w','q','l',0};
|
|
|
|
static HRESULT exec_query( IWbemServices *services, const WCHAR *str, IEnumWbemClassObject **result )
|
|
{
|
|
static const WCHAR captionW[] = {'C','a','p','t','i','o','n',0};
|
|
static const WCHAR descriptionW[] = {'D','e','s','c','r','i','p','t','i','o','n',0};
|
|
HRESULT hr;
|
|
IWbemClassObject *obj;
|
|
BSTR wql = SysAllocString( wqlW ), query = SysAllocString( str );
|
|
LONG flags = WBEM_FLAG_RETURN_IMMEDIATELY | WBEM_FLAG_FORWARD_ONLY;
|
|
ULONG count;
|
|
|
|
hr = IWbemServices_ExecQuery( services, wql, query, flags, NULL, result );
|
|
if (hr == S_OK)
|
|
{
|
|
trace("%s\n", wine_dbgstr_w(str));
|
|
for (;;)
|
|
{
|
|
VARIANT var;
|
|
|
|
IEnumWbemClassObject_Next( *result, WBEM_INFINITE, 1, &obj, &count );
|
|
if (!count) break;
|
|
|
|
if (IWbemClassObject_Get( obj, captionW, 0, &var, NULL, NULL ) == WBEM_S_NO_ERROR)
|
|
{
|
|
trace("caption: %s\n", wine_dbgstr_w(V_BSTR(&var)));
|
|
VariantClear( &var );
|
|
}
|
|
if (IWbemClassObject_Get( obj, descriptionW, 0, &var, NULL, NULL ) == WBEM_S_NO_ERROR)
|
|
{
|
|
trace("description: %s\n", wine_dbgstr_w(V_BSTR(&var)));
|
|
VariantClear( &var );
|
|
}
|
|
IWbemClassObject_Release( obj );
|
|
}
|
|
}
|
|
SysFreeString( wql );
|
|
SysFreeString( query );
|
|
return hr;
|
|
}
|
|
|
|
static void test_select( IWbemServices *services )
|
|
{
|
|
static const WCHAR emptyW[] = {0};
|
|
static const WCHAR sqlW[] = {'S','Q','L',0};
|
|
static const WCHAR query1[] =
|
|
{'S','E','L','E','C','T',' ','H','O','T','F','I','X','I','D',' ','F','R','O','M',' ',
|
|
'W','i','n','3','2','_','Q','u','i','c','k','F','i','x','E','n','g','i','n','e','e','r','i','n','g',0};
|
|
static const WCHAR query2[] =
|
|
{'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_','B','I','O','S',0};
|
|
static const WCHAR query3[] =
|
|
{'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_',
|
|
'L','o','g','i','c','a','l','D','i','s','k',' ','W','H','E','R','E',' ',
|
|
'\"','N','T','F','S','\"',' ','=',' ','F','i','l','e','S','y','s','t','e','m',0};
|
|
static const WCHAR query4[] =
|
|
{'S','E','L','E','C','T',' ','a',' ','F','R','O','M',' ','b',0};
|
|
static const WCHAR query5[] =
|
|
{'S','E','L','E','C','T',' ','a',' ','F','R','O','M',' ','W','i','n','3','2','_','B','i','o','s',0};
|
|
static const WCHAR query6[] =
|
|
{'S','E','L','E','C','T',' ','D','e','s','c','r','i','p','t','i','o','n',' ','F','R','O','M',' ',
|
|
'W','i','n','3','2','_','B','i','o','s',0};
|
|
static const WCHAR query7[] =
|
|
{'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_',
|
|
'P','r','o','c','e','s','s',' ','W','H','E','R','E',' ','C','a','p','t','i','o','n',' ',
|
|
'L','I','K','E',' ','\'','%','%','R','E','G','E','D','I','T','%','\'',0};
|
|
static const WCHAR query8[] =
|
|
{'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_',
|
|
'D','i','s','k','D','r','i','v','e',' ','W','H','E','R','E',' ','D','e','v','i','c','e','I','D','=',
|
|
'\"','\\','\\','\\','\\','.','\\','\\','P','H','Y','S','I','C','A','L','D','R','I','V','E','0','\"',0};
|
|
static const WCHAR *test[] = { query1, query2, query3, query4, query5, query6, query7, query8 };
|
|
HRESULT hr;
|
|
IEnumWbemClassObject *result;
|
|
BSTR wql = SysAllocString( wqlW );
|
|
BSTR sql = SysAllocString( sqlW );
|
|
BSTR query = SysAllocString( query1 );
|
|
UINT i;
|
|
|
|
hr = IWbemServices_ExecQuery( services, NULL, NULL, 0, NULL, &result );
|
|
ok( hr == WBEM_E_INVALID_PARAMETER, "query failed %08x\n", hr );
|
|
|
|
hr = IWbemServices_ExecQuery( services, NULL, query, 0, NULL, &result );
|
|
ok( hr == WBEM_E_INVALID_PARAMETER, "query failed %08x\n", hr );
|
|
|
|
hr = IWbemServices_ExecQuery( services, wql, NULL, 0, NULL, &result );
|
|
ok( hr == WBEM_E_INVALID_PARAMETER, "query failed %08x\n", hr );
|
|
|
|
hr = IWbemServices_ExecQuery( services, sql, query, 0, NULL, &result );
|
|
ok( hr == WBEM_E_INVALID_QUERY_TYPE, "query failed %08x\n", hr );
|
|
|
|
hr = IWbemServices_ExecQuery( services, sql, NULL, 0, NULL, &result );
|
|
ok( hr == WBEM_E_INVALID_PARAMETER, "query failed %08x\n", hr );
|
|
|
|
SysFreeString( query );
|
|
query = SysAllocString( emptyW );
|
|
hr = IWbemServices_ExecQuery( services, wql, query, 0, NULL, &result );
|
|
ok( hr == WBEM_E_INVALID_PARAMETER, "query failed %08x\n", hr );
|
|
|
|
for (i = 0; i < sizeof(test)/sizeof(test[0]); i++)
|
|
{
|
|
hr = exec_query( services, test[i], &result );
|
|
ok( hr == S_OK, "query %u failed: %08x\n", i, hr );
|
|
if (result) IEnumWbemClassObject_Release( result );
|
|
}
|
|
|
|
SysFreeString( wql );
|
|
SysFreeString( sql );
|
|
SysFreeString( query );
|
|
}
|
|
|
|
static void test_Win32_Service( IWbemServices *services )
|
|
{
|
|
static const WCHAR returnvalueW[] = {'R','e','t','u','r','n','V','a','l','u','e',0};
|
|
static const WCHAR pauseserviceW[] = {'P','a','u','s','e','S','e','r','v','i','c','e',0};
|
|
static const WCHAR resumeserviceW[] = {'R','e','s','u','m','e','S','e','r','v','i','c','e',0};
|
|
static const WCHAR startserviceW[] = {'S','t','a','r','t','S','e','r','v','i','c','e',0};
|
|
static const WCHAR stopserviceW[] = {'S','t','o','p','S','e','r','v','i','c','e',0};
|
|
static const WCHAR stateW[] = {'S','t','a','t','e',0};
|
|
static const WCHAR stoppedW[] = {'S','t','o','p','p','e','d',0};
|
|
static const WCHAR serviceW[] = {'W','i','n','3','2','_','S','e','r','v','i','c','e','.',
|
|
'N','a','m','e','=','"','S','p','o','o','l','e','r','"',0};
|
|
static const WCHAR emptyW[] = {0};
|
|
BSTR class = SysAllocString( serviceW ), empty = SysAllocString( emptyW ), method;
|
|
IWbemClassObject *service, *out;
|
|
VARIANT state, retval;
|
|
CIMTYPE type;
|
|
HRESULT hr;
|
|
|
|
hr = IWbemServices_GetObject( services, class, 0, NULL, &service, NULL );
|
|
if (hr != S_OK)
|
|
{
|
|
win_skip( "Win32_Service not available\n" );
|
|
return;
|
|
}
|
|
type = 0xdeadbeef;
|
|
VariantInit( &state );
|
|
hr = IWbemClassObject_Get( service, stateW, 0, &state, &type, NULL );
|
|
ok( hr == S_OK, "failed to get service state %08x\n", hr );
|
|
ok( V_VT( &state ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &state ) );
|
|
ok( type == CIM_STRING, "unexpected type 0x%x\n", type );
|
|
|
|
if (!lstrcmpW( V_BSTR( &state ), stoppedW ))
|
|
{
|
|
out = NULL;
|
|
method = SysAllocString( startserviceW );
|
|
hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, NULL, &out, NULL );
|
|
ok( hr == S_OK, "failed to execute method %08x\n", hr );
|
|
SysFreeString( method );
|
|
|
|
VariantInit( &retval );
|
|
hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, NULL, NULL );
|
|
ok( hr == S_OK, "failed to get return value %08x\n", hr );
|
|
ok( !V_I4( &retval ), "unexpected error %u\n", V_UI4( &retval ) );
|
|
IWbemClassObject_Release( out );
|
|
}
|
|
out = NULL;
|
|
method = SysAllocString( pauseserviceW );
|
|
hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, NULL, &out, NULL );
|
|
ok( hr == S_OK, "failed to execute method %08x\n", hr );
|
|
SysFreeString( method );
|
|
|
|
VariantInit( &retval );
|
|
hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, NULL, NULL );
|
|
ok( hr == S_OK, "failed to get return value %08x\n", hr );
|
|
ok( V_I4( &retval ), "unexpected success\n" );
|
|
IWbemClassObject_Release( out );
|
|
|
|
out = NULL;
|
|
method = SysAllocString( resumeserviceW );
|
|
hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, NULL, &out, NULL );
|
|
ok( hr == S_OK, "failed to execute method %08x\n", hr );
|
|
SysFreeString( method );
|
|
|
|
VariantInit( &retval );
|
|
hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, NULL, NULL );
|
|
ok( hr == S_OK, "failed to get return value %08x\n", hr );
|
|
ok( V_I4( &retval ), "unexpected success\n" );
|
|
IWbemClassObject_Release( out );
|
|
|
|
if (!lstrcmpW( V_BSTR( &state ), stoppedW ))
|
|
{
|
|
out = NULL;
|
|
method = SysAllocString( stopserviceW );
|
|
hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, NULL, &out, NULL );
|
|
ok( hr == S_OK, "failed to execute method %08x\n", hr );
|
|
SysFreeString( method );
|
|
|
|
VariantInit( &retval );
|
|
hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, NULL, NULL );
|
|
ok( hr == S_OK, "failed to get return value %08x\n", hr );
|
|
ok( !V_I4( &retval ), "unexpected error %u\n", V_UI4( &retval ) );
|
|
IWbemClassObject_Release( out );
|
|
}
|
|
VariantClear( &state );
|
|
IWbemClassObject_Release( service );
|
|
|
|
service = NULL;
|
|
hr = IWbemServices_GetObject( services, NULL, 0, NULL, &service, NULL );
|
|
ok( hr == S_OK, "got %08x\n", hr );
|
|
if (service) IWbemClassObject_Release( service );
|
|
|
|
service = NULL;
|
|
hr = IWbemServices_GetObject( services, empty, 0, NULL, &service, NULL );
|
|
ok( hr == S_OK, "got %08x\n", hr );
|
|
if (service) IWbemClassObject_Release( service );
|
|
|
|
SysFreeString( empty );
|
|
SysFreeString( class );
|
|
}
|
|
|
|
static void test_Win32_Process( IWbemServices *services )
|
|
{
|
|
static const WCHAR returnvalueW[] = {'R','e','t','u','r','n','V','a','l','u','e',0};
|
|
static const WCHAR getownerW[] = {'G','e','t','O','w','n','e','r',0};
|
|
static const WCHAR userW[] = {'U','s','e','r',0};
|
|
static const WCHAR domainW[] = {'D','o','m','a','i','n',0};
|
|
static const WCHAR processW[] = {'W','i','n','3','2','_','P','r','o','c','e','s','s',0};
|
|
static const WCHAR idW[] = {'I','D',0};
|
|
static const WCHAR fmtW[] = {'W','i','n','3','2','_','P','r','o','c','e','s','s','.',
|
|
'H','a','n','d','l','e','=','"','%','u','"',0};
|
|
static const LONG expected_flavor = WBEM_FLAVOR_FLAG_PROPAGATE_TO_INSTANCE |
|
|
WBEM_FLAVOR_NOT_OVERRIDABLE |
|
|
WBEM_FLAVOR_ORIGIN_PROPAGATED;
|
|
BSTR class, method;
|
|
IWbemClassObject *process, *out;
|
|
IWbemQualifierSet *qualifiers;
|
|
VARIANT user, domain, retval, val;
|
|
LONG flavor;
|
|
CIMTYPE type;
|
|
HRESULT hr;
|
|
|
|
class = SysAllocString( processW );
|
|
hr = IWbemServices_GetObject( services, class, 0, NULL, &process, NULL );
|
|
SysFreeString( class );
|
|
if (hr != S_OK)
|
|
{
|
|
win_skip( "Win32_Process not available\n" );
|
|
return;
|
|
}
|
|
hr = IWbemClassObject_GetMethod( process, getownerW, 0, NULL, NULL );
|
|
ok( hr == S_OK, "failed to get GetOwner method %08x\n", hr );
|
|
|
|
out = NULL;
|
|
method = SysAllocString( getownerW );
|
|
class = SysAllocStringLen( NULL, sizeof(fmtW)/sizeof(fmtW[0]) + 10 );
|
|
wsprintfW( class, fmtW, GetCurrentProcessId() );
|
|
hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, NULL, &out, NULL );
|
|
ok( hr == S_OK, "failed to execute method %08x\n", hr );
|
|
SysFreeString( method );
|
|
SysFreeString( class );
|
|
|
|
type = 0xdeadbeef;
|
|
VariantInit( &retval );
|
|
hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, &type, NULL );
|
|
ok( hr == S_OK, "failed to get return value %08x\n", hr );
|
|
ok( V_VT( &retval ) == VT_I4, "unexpected variant type 0x%x\n", V_VT( &retval ) );
|
|
ok( !V_I4( &retval ), "unexpected error %u\n", V_I4( &retval ) );
|
|
ok( type == CIM_UINT32, "unexpected type 0x%x\n", type );
|
|
|
|
type = 0xdeadbeef;
|
|
VariantInit( &user );
|
|
hr = IWbemClassObject_Get( out, userW, 0, &user, &type, NULL );
|
|
ok( hr == S_OK, "failed to get user %08x\n", hr );
|
|
ok( V_VT( &user ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &user ) );
|
|
ok( type == CIM_STRING, "unexpected type 0x%x\n", type );
|
|
trace("%s\n", wine_dbgstr_w(V_BSTR(&user)));
|
|
|
|
type = 0xdeadbeef;
|
|
VariantInit( &domain );
|
|
hr = IWbemClassObject_Get( out, domainW, 0, &domain, &type, NULL );
|
|
ok( hr == S_OK, "failed to get domain %08x\n", hr );
|
|
ok( V_VT( &domain ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &domain ) );
|
|
ok( type == CIM_STRING, "unexpected type 0x%x\n", type );
|
|
trace("%s\n", wine_dbgstr_w(V_BSTR(&domain)));
|
|
|
|
hr = IWbemClassObject_GetPropertyQualifierSet( out, userW, &qualifiers );
|
|
ok( hr == S_OK, "failed to get qualifier set %08x\n", hr );
|
|
|
|
flavor = -1;
|
|
V_I4(&val) = -1;
|
|
V_VT(&val) = VT_ERROR;
|
|
hr = IWbemQualifierSet_Get( qualifiers, idW, 0, &val, &flavor );
|
|
ok( hr == S_OK, "got %08x\n", hr );
|
|
ok( flavor == expected_flavor, "got %d\n", flavor );
|
|
ok( V_VT(&val) == VT_I4, "got %u\n", V_VT(&val) );
|
|
ok( V_I4(&val) == 0, "got %u\n", V_I4(&val) );
|
|
VariantClear( &val );
|
|
|
|
IWbemQualifierSet_Release( qualifiers );
|
|
hr = IWbemClassObject_GetPropertyQualifierSet( out, domainW, &qualifiers );
|
|
ok( hr == S_OK, "failed to get qualifier set %08x\n", hr );
|
|
|
|
flavor = -1;
|
|
V_I4(&val) = -1;
|
|
V_VT(&val) = VT_ERROR;
|
|
hr = IWbemQualifierSet_Get( qualifiers, idW, 0, &val, &flavor );
|
|
ok( hr == S_OK, "got %08x\n", hr );
|
|
ok( flavor == expected_flavor, "got %d\n", flavor );
|
|
ok( V_VT(&val) == VT_I4, "got %u\n", V_VT(&val) );
|
|
ok( V_I4(&val) == 1, "got %u\n", V_I4(&val) );
|
|
VariantClear( &val );
|
|
|
|
IWbemQualifierSet_Release( qualifiers );
|
|
hr = IWbemClassObject_GetPropertyQualifierSet( out, returnvalueW, &qualifiers );
|
|
ok( hr == S_OK, "failed to get qualifier set %08x\n", hr );
|
|
|
|
hr = IWbemQualifierSet_Get( qualifiers, idW, 0, &val, &flavor );
|
|
ok( hr == WBEM_E_NOT_FOUND, "got %08x\n", hr );
|
|
|
|
IWbemQualifierSet_Release( qualifiers );
|
|
VariantClear( &user );
|
|
VariantClear( &domain );
|
|
IWbemClassObject_Release( out );
|
|
}
|
|
|
|
static void test_StdRegProv( IWbemServices *services )
|
|
{
|
|
static const WCHAR enumkeyW[] = {'E','n','u','m','K','e','y',0};
|
|
static const WCHAR enumvaluesW[] = {'E','n','u','m','V','a','l','u','e','s',0};
|
|
static const WCHAR getstringvalueW[] = {'G','e','t','S','t','r','i','n','g','V','a','l','u','e',0};
|
|
static const WCHAR stdregprovW[] = {'S','t','d','R','e','g','P','r','o','v',0};
|
|
static const WCHAR defkeyW[] = {'h','D','e','f','K','e','y',0};
|
|
static const WCHAR subkeynameW[] = {'s','S','u','b','K','e','y','N','a','m','e',0};
|
|
static const WCHAR returnvalueW[] = {'R','e','t','u','r','n','V','a','l','u','e',0};
|
|
static const WCHAR namesW[] = {'s','N','a','m','e','s',0};
|
|
static const WCHAR typesW[] = {'T','y','p','e','s',0};
|
|
static const WCHAR valueW[] = {'s','V','a','l','u','e',0};
|
|
static const WCHAR valuenameW[] = {'s','V','a','l','u','e','N','a','m','e',0};
|
|
static const WCHAR programfilesW[] = {'P','r','o','g','r','a','m','F','i','l','e','s','D','i','r',0};
|
|
static const WCHAR windowsW[] =
|
|
{'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
|
|
'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n',0};
|
|
BSTR class = SysAllocString( stdregprovW ), method;
|
|
IWbemClassObject *reg, *sig_in, *in, *out;
|
|
VARIANT defkey, subkey, retval, names, types, value, valuename;
|
|
CIMTYPE type;
|
|
HRESULT hr;
|
|
|
|
hr = IWbemServices_GetObject( services, class, 0, NULL, ®, NULL );
|
|
if (hr != S_OK)
|
|
{
|
|
win_skip( "StdRegProv not available\n" );
|
|
return;
|
|
}
|
|
hr = IWbemClassObject_GetMethod( reg, enumkeyW, 0, &sig_in, NULL );
|
|
ok( hr == S_OK, "failed to get EnumKey method %08x\n", hr );
|
|
|
|
hr = IWbemClassObject_SpawnInstance( sig_in, 0, &in );
|
|
ok( hr == S_OK, "failed to spawn instance %08x\n", hr );
|
|
|
|
V_VT( &defkey ) = VT_I4;
|
|
V_I4( &defkey ) = 0x80000002;
|
|
hr = IWbemClassObject_Put( in, defkeyW, 0, &defkey, 0 );
|
|
ok( hr == S_OK, "failed to set root %08x\n", hr );
|
|
|
|
V_VT( &subkey ) = VT_BSTR;
|
|
V_BSTR( &subkey ) = SysAllocString( windowsW );
|
|
hr = IWbemClassObject_Put( in, subkeynameW, 0, &subkey, 0 );
|
|
ok( hr == S_OK, "failed to set subkey %08x\n", hr );
|
|
|
|
out = NULL;
|
|
method = SysAllocString( enumkeyW );
|
|
hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, in, &out, NULL );
|
|
ok( hr == S_OK, "failed to execute method %08x\n", hr );
|
|
SysFreeString( method );
|
|
|
|
type = 0xdeadbeef;
|
|
VariantInit( &retval );
|
|
hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, &type, NULL );
|
|
ok( hr == S_OK, "failed to get return value %08x\n", hr );
|
|
ok( V_VT( &retval ) == VT_I4, "unexpected variant type 0x%x\n", V_VT( &retval ) );
|
|
ok( !V_I4( &retval ), "unexpected error %u\n", V_UI4( &retval ) );
|
|
ok( type == CIM_UINT32, "unexpected type 0x%x\n", type );
|
|
|
|
type = 0xdeadbeef;
|
|
VariantInit( &names );
|
|
hr = IWbemClassObject_Get( out, namesW, 0, &names, &type, NULL );
|
|
ok( hr == S_OK, "failed to get names %08x\n", hr );
|
|
ok( V_VT( &names ) == (VT_BSTR|VT_ARRAY), "unexpected variant type 0x%x\n", V_VT( &names ) );
|
|
ok( type == (CIM_STRING|CIM_FLAG_ARRAY), "unexpected type 0x%x\n", type );
|
|
|
|
VariantClear( &names );
|
|
VariantClear( &subkey );
|
|
IWbemClassObject_Release( in );
|
|
IWbemClassObject_Release( out );
|
|
IWbemClassObject_Release( sig_in );
|
|
|
|
hr = IWbemClassObject_GetMethod( reg, enumvaluesW, 0, &sig_in, NULL );
|
|
ok( hr == S_OK, "failed to get EnumValues method %08x\n", hr );
|
|
|
|
hr = IWbemClassObject_SpawnInstance( sig_in, 0, &in );
|
|
ok( hr == S_OK, "failed to spawn instance %08x\n", hr );
|
|
|
|
V_VT( &defkey ) = VT_I4;
|
|
V_I4( &defkey ) = 0x80000002;
|
|
hr = IWbemClassObject_Put( in, defkeyW, 0, &defkey, 0 );
|
|
ok( hr == S_OK, "failed to set root %08x\n", hr );
|
|
|
|
V_VT( &subkey ) = VT_BSTR;
|
|
V_BSTR( &subkey ) = SysAllocString( windowsW );
|
|
hr = IWbemClassObject_Put( in, subkeynameW, 0, &subkey, 0 );
|
|
ok( hr == S_OK, "failed to set subkey %08x\n", hr );
|
|
|
|
out = NULL;
|
|
method = SysAllocString( enumvaluesW );
|
|
hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, in, &out, NULL );
|
|
ok( hr == S_OK, "failed to execute method %08x\n", hr );
|
|
SysFreeString( method );
|
|
|
|
type = 0xdeadbeef;
|
|
VariantInit( &retval );
|
|
hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, &type, NULL );
|
|
ok( hr == S_OK, "failed to get return value %08x\n", hr );
|
|
ok( V_VT( &retval ) == VT_I4, "unexpected variant type 0x%x\n", V_VT( &retval ) );
|
|
ok( !V_I4( &retval ), "unexpected error %u\n", V_I4( &retval ) );
|
|
ok( type == CIM_UINT32, "unexpected type 0x%x\n", type );
|
|
|
|
type = 0xdeadbeef;
|
|
VariantInit( &names );
|
|
hr = IWbemClassObject_Get( out, namesW, 0, &names, &type, NULL );
|
|
ok( hr == S_OK, "failed to get names %08x\n", hr );
|
|
ok( V_VT( &names ) == (VT_BSTR|VT_ARRAY), "unexpected variant type 0x%x\n", V_VT( &names ) );
|
|
ok( type == (CIM_STRING|CIM_FLAG_ARRAY), "unexpected type 0x%x\n", type );
|
|
|
|
type = 0xdeadbeef;
|
|
VariantInit( &types );
|
|
hr = IWbemClassObject_Get( out, typesW, 0, &types, &type, NULL );
|
|
ok( hr == S_OK, "failed to get names %08x\n", hr );
|
|
ok( V_VT( &types ) == (VT_I4|VT_ARRAY), "unexpected variant type 0x%x\n", V_VT( &types ) );
|
|
ok( type == (CIM_SINT32|CIM_FLAG_ARRAY), "unexpected type 0x%x\n", type );
|
|
|
|
VariantClear( &types );
|
|
VariantClear( &names );
|
|
VariantClear( &subkey );
|
|
IWbemClassObject_Release( in );
|
|
IWbemClassObject_Release( out );
|
|
IWbemClassObject_Release( sig_in );
|
|
|
|
hr = IWbemClassObject_GetMethod( reg, getstringvalueW, 0, &sig_in, NULL );
|
|
ok( hr == S_OK, "failed to get GetStringValue method %08x\n", hr );
|
|
|
|
hr = IWbemClassObject_SpawnInstance( sig_in, 0, &in );
|
|
ok( hr == S_OK, "failed to spawn instance %08x\n", hr );
|
|
|
|
V_VT( &defkey ) = VT_I4;
|
|
V_I4( &defkey ) = 0x80000002;
|
|
hr = IWbemClassObject_Put( in, defkeyW, 0, &defkey, 0 );
|
|
ok( hr == S_OK, "failed to set root %08x\n", hr );
|
|
|
|
V_VT( &subkey ) = VT_BSTR;
|
|
V_BSTR( &subkey ) = SysAllocString( windowsW );
|
|
hr = IWbemClassObject_Put( in, subkeynameW, 0, &subkey, 0 );
|
|
ok( hr == S_OK, "failed to set subkey %08x\n", hr );
|
|
|
|
V_VT( &valuename ) = VT_BSTR;
|
|
V_BSTR( &valuename ) = SysAllocString( programfilesW );
|
|
hr = IWbemClassObject_Put( in, valuenameW, 0, &valuename, 0 );
|
|
ok( hr == S_OK, "failed to set value name %08x\n", hr );
|
|
|
|
out = NULL;
|
|
method = SysAllocString( getstringvalueW );
|
|
hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, in, &out, NULL );
|
|
ok( hr == S_OK, "failed to execute method %08x\n", hr );
|
|
SysFreeString( method );
|
|
|
|
type = 0xdeadbeef;
|
|
VariantInit( &retval );
|
|
hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, &type, NULL );
|
|
ok( hr == S_OK, "failed to get return value %08x\n", hr );
|
|
ok( V_VT( &retval ) == VT_I4, "unexpected variant type 0x%x\n", V_VT( &retval ) );
|
|
ok( !V_I4( &retval ), "unexpected error %u\n", V_I4( &retval ) );
|
|
ok( type == CIM_UINT32, "unexpected type 0x%x\n", type );
|
|
|
|
type = 0xdeadbeef;
|
|
VariantInit( &value );
|
|
hr = IWbemClassObject_Get( out, valueW, 0, &value, &type, NULL );
|
|
ok( hr == S_OK, "failed to get value %08x\n", hr );
|
|
ok( V_VT( &value ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &value ) );
|
|
ok( type == CIM_STRING, "unexpected type 0x%x\n", type );
|
|
|
|
VariantClear( &value );
|
|
VariantClear( &valuename );
|
|
VariantClear( &subkey );
|
|
IWbemClassObject_Release( in );
|
|
IWbemClassObject_Release( out );
|
|
IWbemClassObject_Release( sig_in );
|
|
|
|
IWbemClassObject_Release( reg );
|
|
SysFreeString( class );
|
|
}
|
|
|
|
START_TEST(query)
|
|
{
|
|
static const WCHAR cimv2W[] = {'R','O','O','T','\\','C','I','M','V','2',0};
|
|
BSTR path = SysAllocString( cimv2W );
|
|
IWbemLocator *locator;
|
|
IWbemServices *services;
|
|
HRESULT hr;
|
|
|
|
CoInitialize( NULL );
|
|
CoInitializeSecurity( NULL, -1, NULL, NULL, RPC_C_AUTHN_LEVEL_DEFAULT,
|
|
RPC_C_IMP_LEVEL_IMPERSONATE, NULL, EOAC_NONE, NULL );
|
|
hr = CoCreateInstance( &CLSID_WbemLocator, NULL, CLSCTX_INPROC_SERVER, &IID_IWbemLocator,
|
|
(void **)&locator );
|
|
if (hr != S_OK)
|
|
{
|
|
win_skip("can't create instance of WbemLocator\n");
|
|
return;
|
|
}
|
|
hr = IWbemLocator_ConnectServer( locator, path, NULL, NULL, NULL, 0, NULL, NULL, &services );
|
|
ok( hr == S_OK, "failed to get IWbemServices interface %08x\n", hr );
|
|
|
|
hr = CoSetProxyBlanket( (IUnknown *)services, RPC_C_AUTHN_WINNT, RPC_C_AUTHZ_NONE, NULL,
|
|
RPC_C_AUTHN_LEVEL_CALL, RPC_C_IMP_LEVEL_IMPERSONATE, NULL, EOAC_NONE );
|
|
ok( hr == S_OK, "failed to set proxy blanket %08x\n", hr );
|
|
|
|
test_select( services );
|
|
test_Win32_Process( services );
|
|
test_Win32_Service( services );
|
|
test_StdRegProv( services );
|
|
|
|
SysFreeString( path );
|
|
IWbemServices_Release( services );
|
|
IWbemLocator_Release( locator );
|
|
CoUninitialize();
|
|
}
|