| /* |
| * 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 "sddl.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, 10000, 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 query9[] = |
| {'S','E','L','E','C','T','\n','a','\r','F','R','O','M','\t','b',0}; |
| static const WCHAR query10[] = |
| {'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',' ','"','%','f','i','r','e','f','o','x','.','e','x','e','"',0}; |
| static const WCHAR *test[] = { query1, query2, query3, query4, query5, query6, query7, query8, query9, query10 }; |
| 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" ); |
| goto out; |
| } |
| 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 ); |
| |
| out: |
| SysFreeString( empty ); |
| SysFreeString( class ); |
| } |
| |
| static void test_Win32_Bios( IWbemServices *services ) |
| { |
| static const WCHAR queryW[] = |
| {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_', 'B','i','o','s',0}; |
| static const WCHAR descriptionW[] = {'D','e','s','c','r','i','p','t','i','o','n',0}; |
| static const WCHAR identificationcodeW[] = {'I','d','e','n','t','i','f','i','c','a','t','i','o','n','C','o','d','e',0}; |
| static const WCHAR manufacturerW[] = {'M','a','n','u','f','a','c','t','u','r','e','r',0}; |
| static const WCHAR nameW[] = {'N','a','m','e',0}; |
| static const WCHAR releasedateW[] = {'R','e','l','e','a','s','e','D','a','t','e',0}; |
| static const WCHAR serialnumberW[] = {'S','e','r','i','a','l','N','u','m','b','e','r',0}; |
| static const WCHAR smbiosbiosversionW[] = {'S','M','B','I','O','S','B','I','O','S','V','e','r','s','i','o','n',0}; |
| static const WCHAR versionW[] = {'V','e','r','s','i','o','n',0}; |
| BSTR wql = SysAllocString( wqlW ), query = SysAllocString( queryW ); |
| IEnumWbemClassObject *result; |
| IWbemClassObject *obj; |
| CIMTYPE type; |
| ULONG count; |
| VARIANT val; |
| HRESULT hr; |
| |
| hr = IWbemServices_ExecQuery( services, wql, query, 0, NULL, &result ); |
| ok( hr == S_OK, "IWbemServices_ExecQuery failed %08x\n", hr ); |
| |
| hr = IEnumWbemClassObject_Next( result, 10000, 1, &obj, &count ); |
| ok( hr == S_OK, "IEnumWbemClassObject_Next failed %08x\n", hr ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, descriptionW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get description %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| trace( "description: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, identificationcodeW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get identication code %08x\n", hr ); |
| todo_wine |
| ok( V_VT( &val ) == VT_NULL, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, manufacturerW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get manufacturer %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| trace( "manufacturer: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, nameW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get name %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| trace( "name: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, releasedateW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get release date %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_DATETIME, "unexpected type 0x%x\n", type ); |
| trace( "release date: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, serialnumberW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get serial number %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR || V_VT( &val ) == VT_NULL /* Testbot VMs */, |
| "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, smbiosbiosversionW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get bios version %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| trace( "bios version: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, versionW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get version %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| trace( "version: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| IWbemClassObject_Release( obj ); |
| IEnumWbemClassObject_Release( result ); |
| SysFreeString( query ); |
| SysFreeString( wql ); |
| } |
| |
| 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 ); |
| IWbemClassObject_Release( process ); |
| |
| 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_Win32_ComputerSystem( IWbemServices *services ) |
| { |
| static const WCHAR nameW[] = {'N','a','m','e',0}; |
| static const WCHAR usernameW[] = {'U','s','e','r','N','a','m','e',0}; |
| static const WCHAR backslashW[] = {'\\',0}; |
| static const WCHAR queryW[] = |
| {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_', |
| 'C','o','m','p','u','t','e','r','S','y','s','t','e','m',0}; |
| BSTR wql = SysAllocString( wqlW ), query = SysAllocString( queryW ); |
| IEnumWbemClassObject *result; |
| IWbemClassObject *service; |
| VARIANT value; |
| CIMTYPE type; |
| HRESULT hr; |
| WCHAR compname[MAX_COMPUTERNAME_LENGTH + 1]; |
| WCHAR username[128]; |
| DWORD len, count; |
| |
| len = sizeof(compname) / sizeof(compname[0]); |
| if (!GetComputerNameW( compname, &len )) |
| compname[0] = 0; |
| |
| lstrcpyW( username, compname ); |
| lstrcatW( username, backslashW ); |
| len = sizeof(username) / sizeof(username[0]) - lstrlenW( username ); |
| if (!GetUserNameW( username + lstrlenW( username ), &len )) |
| username[0] = 0; |
| |
| if (!compname[0] || !username[0]) |
| { |
| skip( "Failed to get user or computer name\n" ); |
| goto out; |
| } |
| |
| hr = IWbemServices_ExecQuery( services, wql, query, 0, NULL, &result ); |
| if (hr != S_OK) |
| { |
| win_skip( "Win32_ComputerSystem not available\n" ); |
| goto out; |
| } |
| |
| hr = IEnumWbemClassObject_Next( result, 10000, 1, &service, &count ); |
| ok( hr == S_OK, "got %08x\n", hr ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &value ); |
| hr = IWbemClassObject_Get( service, nameW, 0, &value, &type, NULL ); |
| ok( hr == S_OK, "failed to get computer name %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 ); |
| ok( !lstrcmpiW( V_BSTR( &value ), compname ), "got %s, expected %s\n", wine_dbgstr_w(V_BSTR(&value)), wine_dbgstr_w(compname) ); |
| VariantClear( &value ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &value ); |
| hr = IWbemClassObject_Get( service, usernameW, 0, &value, &type, NULL ); |
| ok( hr == S_OK, "failed to get computer name %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 ); |
| ok( !lstrcmpiW( V_BSTR( &value ), username ), "got %s, expected %s\n", wine_dbgstr_w(V_BSTR(&value)), wine_dbgstr_w(username) ); |
| VariantClear( &value ); |
| |
| IWbemClassObject_Release( service ); |
| IEnumWbemClassObject_Release( result ); |
| out: |
| SysFreeString( query ); |
| SysFreeString( wql ); |
| } |
| |
| static void test_Win32_SystemEnclosure( IWbemServices *services ) |
| { |
| static const WCHAR queryW[] = |
| {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_', |
| 'S','y','s','t','e','m','E','n','c','l','o','s','u','r','e',0}; |
| static const WCHAR captionW[] = {'C','a','p','t','i','o','n',0}; |
| static const WCHAR chassistypesW[] = {'C','h','a','s','s','i','s','T','y','p','e','s',0}; |
| static const WCHAR descriptionW[] = {'D','e','s','c','r','i','p','t','i','o','n',0}; |
| static const WCHAR lockpresentW[] = {'L','o','c','k','P','r','e','s','e','n','t',0}; |
| static const WCHAR manufacturerW[] = {'M','a','n','u','f','a','c','t','u','r','e','r',0}; |
| static const WCHAR nameW[] = {'N','a','m','e',0}; |
| static const WCHAR tagW[] = {'T','a','g',0}; |
| BSTR wql = SysAllocString( wqlW ), query = SysAllocString( queryW ); |
| IEnumWbemClassObject *result; |
| IWbemClassObject *obj; |
| CIMTYPE type; |
| ULONG count; |
| VARIANT val; |
| DWORD *data; |
| HRESULT hr; |
| |
| hr = IWbemServices_ExecQuery( services, wql, query, 0, NULL, &result ); |
| ok( hr == S_OK, "IWbemServices_ExecQuery failed %08x\n", hr ); |
| |
| hr = IEnumWbemClassObject_Next( result, 10000, 1, &obj, &count ); |
| ok( hr == S_OK, "IEnumWbemClassObject_Next failed %08x\n", hr ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, captionW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get caption %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| trace( "caption: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, chassistypesW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get chassis types %08x\n", hr ); |
| todo_wine |
| ok( V_VT( &val ) == (VT_I4|VT_ARRAY), "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == (CIM_UINT16|CIM_FLAG_ARRAY), "unexpected type 0x%x\n", type ); |
| hr = SafeArrayAccessData( V_ARRAY( &val ), (void **)&data ); |
| ok( hr == S_OK, "SafeArrayAccessData failed %x\n", hr ); |
| if (SUCCEEDED(hr)) |
| { |
| LONG i, lower, upper; |
| |
| hr = SafeArrayGetLBound( V_ARRAY( &val ), 1, &lower ); |
| ok( hr == S_OK, "SafeArrayGetLBound failed %x\n", hr ); |
| hr = SafeArrayGetUBound( V_ARRAY( &val ), 1, &upper ); |
| ok( hr == S_OK, "SafeArrayGetUBound failed %x\n", hr ); |
| if (V_VT( &val ) == (VT_I4|VT_ARRAY)) |
| { |
| for (i = 0; i < upper - lower + 1; i++) |
| trace( "chassis type: %u\n", data[i] ); |
| } |
| hr = SafeArrayUnaccessData( V_ARRAY( &val ) ); |
| ok( hr == S_OK, "SafeArrayUnaccessData failed %x\n", hr ); |
| } |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, descriptionW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get description %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| trace( "description: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, lockpresentW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get lockpresent %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BOOL, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_BOOLEAN, "unexpected type 0x%x\n", type ); |
| trace( "lockpresent: %u\n", V_BOOL( &val ) ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, manufacturerW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get manufacturer %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| trace( "manufacturer: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, nameW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get name %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| trace( "name: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| type = 0xdeadbeef; |
| VariantInit( &val ); |
| hr = IWbemClassObject_Get( obj, tagW, 0, &val, &type, NULL ); |
| ok( hr == S_OK, "failed to get tag %08x\n", hr ); |
| ok( V_VT( &val ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &val ) ); |
| ok( type == CIM_STRING, "unexpected type 0x%x\n", type ); |
| trace( "tag: %s\n", wine_dbgstr_w(V_BSTR( &val )) ); |
| VariantClear( &val ); |
| |
| IWbemClassObject_Release( obj ); |
| IEnumWbemClassObject_Release( result ); |
| SysFreeString( query ); |
| SysFreeString( wql ); |
| } |
| |
| 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 ); |
| } |
| |
| static HRESULT WINAPI sink_QueryInterface( |
| IWbemObjectSink *iface, REFIID riid, void **ppv ) |
| { |
| *ppv = NULL; |
| if (IsEqualGUID( &IID_IUnknown, riid ) || IsEqualGUID( &IID_IWbemObjectSink, riid )) |
| { |
| *ppv = iface; |
| IWbemObjectSink_AddRef( iface ); |
| return S_OK; |
| } |
| return E_NOINTERFACE; |
| } |
| |
| static ULONG sink_refs; |
| |
| static ULONG WINAPI sink_AddRef( |
| IWbemObjectSink *iface ) |
| { |
| return ++sink_refs; |
| } |
| |
| static ULONG WINAPI sink_Release( |
| IWbemObjectSink *iface ) |
| { |
| return --sink_refs; |
| } |
| |
| static HRESULT WINAPI sink_Indicate( |
| IWbemObjectSink *iface, LONG count, IWbemClassObject **objects ) |
| { |
| trace("Indicate: %d, %p\n", count, objects); |
| return S_OK; |
| } |
| |
| static HRESULT WINAPI sink_SetStatus( |
| IWbemObjectSink *iface, LONG flags, HRESULT hresult, BSTR str_param, IWbemClassObject *obj_param ) |
| { |
| trace("SetStatus: %08x, %08x, %s, %p\n", flags, hresult, wine_dbgstr_w(str_param), obj_param); |
| return S_OK; |
| } |
| |
| static IWbemObjectSinkVtbl sink_vtbl = |
| { |
| sink_QueryInterface, |
| sink_AddRef, |
| sink_Release, |
| sink_Indicate, |
| sink_SetStatus |
| }; |
| |
| static IWbemObjectSink sink = { &sink_vtbl }; |
| |
| static void test_notification_query_async( IWbemServices *services ) |
| { |
| static const WCHAR queryW[] = |
| {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_', |
| 'D','e','v','i','c','e','C','h','a','n','g','e','E','v','e','n','t',0}; |
| BSTR wql = SysAllocString( wqlW ), query = SysAllocString( queryW ); |
| ULONG prev_sink_refs; |
| HRESULT hr; |
| |
| hr = IWbemServices_ExecNotificationQueryAsync( services, wql, query, 0, NULL, NULL ); |
| ok( hr == WBEM_E_INVALID_PARAMETER, "got %08x\n", hr ); |
| |
| prev_sink_refs = sink_refs; |
| hr = IWbemServices_ExecNotificationQueryAsync( services, wql, query, 0, NULL, &sink ); |
| ok( hr == S_OK || broken(hr == WBEM_E_NOT_FOUND), "got %08x\n", hr ); |
| ok( sink_refs > prev_sink_refs || broken(!sink_refs), "got %u refs\n", sink_refs ); |
| |
| hr = IWbemServices_CancelAsyncCall( services, &sink ); |
| ok( hr == S_OK || broken(hr == WBEM_E_NOT_FOUND), "got %08x\n", hr ); |
| |
| SysFreeString( wql ); |
| SysFreeString( query ); |
| } |
| |
| static void test_query_async( IWbemServices *services ) |
| { |
| static const WCHAR queryW[] = |
| {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_', |
| 'P','r','o','c','e','s','s',0}; |
| BSTR wql = SysAllocString( wqlW ), query = SysAllocString( queryW ); |
| HRESULT hr; |
| |
| hr = IWbemServices_ExecQueryAsync( services, wql, query, 0, NULL, NULL ); |
| ok( hr == WBEM_E_INVALID_PARAMETER, "got %08x\n", hr ); |
| |
| hr = IWbemServices_ExecQueryAsync( services, wql, query, 0, NULL, &sink ); |
| ok( hr == S_OK || broken(hr == WBEM_E_NOT_FOUND), "got %08x\n", hr ); |
| |
| hr = IWbemServices_CancelAsyncCall( services, NULL ); |
| ok( hr == WBEM_E_INVALID_PARAMETER, "got %08x\n", hr ); |
| |
| hr = IWbemServices_CancelAsyncCall( services, &sink ); |
| ok( hr == S_OK, "got %08x\n", hr ); |
| |
| SysFreeString( wql ); |
| SysFreeString( query ); |
| } |
| |
| static void test_GetNames( IWbemServices *services ) |
| { |
| static const WCHAR queryW[] = |
| {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_', |
| 'O','p','e','r','a','t','i','n','g','S','y','s','t','e','m',0}; |
| BSTR wql = SysAllocString( wqlW ), query = SysAllocString( queryW ); |
| IEnumWbemClassObject *result; |
| HRESULT hr; |
| |
| hr = IWbemServices_ExecQuery( services, wql, query, 0, NULL, &result ); |
| ok( hr == S_OK, "got %08x\n", hr ); |
| |
| for (;;) |
| { |
| IWbemClassObject *obj; |
| SAFEARRAY *names; |
| ULONG count; |
| VARIANT val; |
| |
| IEnumWbemClassObject_Next( result, 10000, 1, &obj, &count ); |
| if (!count) break; |
| |
| VariantInit( &val ); |
| hr = IWbemClassObject_GetNames( obj, NULL, WBEM_FLAG_NONSYSTEM_ONLY, &val, &names ); |
| ok( hr == S_OK, "got %08x\n", hr ); |
| |
| SafeArrayDestroy( names ); |
| IWbemClassObject_Release( obj ); |
| } |
| IEnumWbemClassObject_Release( result ); |
| SysFreeString( query ); |
| SysFreeString( wql ); |
| } |
| |
| static void test_SystemSecurity( IWbemServices *services ) |
| { |
| static const WCHAR systemsecurityW[] = {'_','_','S','y','s','t','e','m','S','e','c','u','r','i','t','y',0}; |
| static const WCHAR getsdW[] = {'G','e','t','S','D',0}; |
| static const WCHAR returnvalueW[] = {'R','e','t','u','r','n','V','a','l','u','e',0}; |
| static const WCHAR sdW[] = {'S','D',0}; |
| BSTR class = SysAllocString( systemsecurityW ), method; |
| IWbemClassObject *reg, *out; |
| VARIANT retval, var_sd; |
| void *data; |
| SECURITY_DESCRIPTOR_RELATIVE *sd; |
| CIMTYPE type; |
| HRESULT hr; |
| BYTE sid_admin_buffer[SECURITY_MAX_SID_SIZE]; |
| SID *sid_admin = (SID*)sid_admin_buffer; |
| DWORD sid_size; |
| BOOL ret; |
| |
| hr = IWbemServices_GetObject( services, class, 0, NULL, ®, NULL ); |
| if (hr != S_OK) |
| { |
| win_skip( "__SystemSecurity not available\n" ); |
| return; |
| } |
| |
| sid_size = sizeof(sid_admin_buffer); |
| ret = CreateWellKnownSid( WinBuiltinAdministratorsSid, NULL, sid_admin, &sid_size ); |
| ok( ret, "CreateWellKnownSid failed\n" ); |
| |
| out = NULL; |
| method = SysAllocString( getsdW ); |
| hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, NULL, &out, NULL ); |
| ok( hr == S_OK || hr == WBEM_E_ACCESS_DENIED, "failed to execute method %08x\n", hr ); |
| SysFreeString( method ); |
| |
| if (SUCCEEDED(hr)) |
| { |
| 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( &var_sd ); |
| hr = IWbemClassObject_Get( out, sdW, 0, &var_sd, &type, NULL ); |
| ok( hr == S_OK, "failed to get names %08x\n", hr ); |
| ok( V_VT( &var_sd ) == (VT_UI1|VT_ARRAY), "unexpected variant type 0x%x\n", V_VT( &var_sd ) ); |
| ok( type == (CIM_UINT8|CIM_FLAG_ARRAY), "unexpected type 0x%x\n", type ); |
| |
| hr = SafeArrayAccessData( V_ARRAY( &var_sd ), &data ); |
| ok( hr == S_OK, "SafeArrayAccessData failed %x\n", hr ); |
| if (SUCCEEDED(hr)) |
| { |
| sd = data; |
| |
| ok( (sd->Control & SE_SELF_RELATIVE) == SE_SELF_RELATIVE, "relative flag unset\n" ); |
| ok( sd->Owner != 0, "no owner SID\n"); |
| ok( sd->Group != 0, "no owner SID\n"); |
| ok( EqualSid( (PSID)((LPBYTE)sd + sd->Owner), sid_admin ), "unexpected owner SID\n" ); |
| ok( EqualSid( (PSID)((LPBYTE)sd + sd->Group), sid_admin ), "unexpected group SID\n" ); |
| |
| hr = SafeArrayUnaccessData( V_ARRAY( &var_sd ) ); |
| ok( hr == S_OK, "SafeArrayUnaccessData failed %x\n", hr ); |
| } |
| |
| VariantClear( &var_sd ); |
| IWbemClassObject_Release( out ); |
| } |
| else if (hr == WBEM_E_ACCESS_DENIED) |
| win_skip( "insufficient privs to test __SystemSecurity\n" ); |
| |
| 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_Bios( services ); |
| test_Win32_Process( services ); |
| test_Win32_Service( services ); |
| test_Win32_ComputerSystem( services ); |
| test_Win32_SystemEnclosure( services ); |
| test_StdRegProv( services ); |
| test_notification_query_async( services ); |
| test_query_async( services ); |
| test_GetNames( services ); |
| test_SystemSecurity( services ); |
| |
| SysFreeString( path ); |
| IWbemServices_Release( services ); |
| IWbemLocator_Release( locator ); |
| CoUninitialize(); |
| } |