git.oblomov.eu Git - wine/blob - dlls/wbemprox/tests/query.c

   1 /*
   2  * Copyright 2012 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 #define COBJMACROS
  20
  21 #include <stdio.h>
  22 #include "windows.h"
  23 #include "ocidl.h"
  24 #include "initguid.h"
  25 #include "objidl.h"
  26 #include "wbemcli.h"
  27 #include "wine/test.h"
  28
  29 static const WCHAR wqlW[] = {'w','q','l',0};
  30
  31 static HRESULT exec_query( IWbemServices *services, const WCHAR *str, IEnumWbemClassObject **result )
  32 {
  33     static const WCHAR captionW[] = {'C','a','p','t','i','o','n',0};
  34     static const WCHAR descriptionW[] = {'D','e','s','c','r','i','p','t','i','o','n',0};
  35     HRESULT hr;
  36     IWbemClassObject *obj;
  37     BSTR wql = SysAllocString( wqlW ), query = SysAllocString( str );
  38     LONG flags = WBEM_FLAG_RETURN_IMMEDIATELY | WBEM_FLAG_FORWARD_ONLY;
  39     ULONG count;
  40
  41     hr = IWbemServices_ExecQuery( services, wql, query, flags, NULL, result );
  42     if (hr == S_OK)
  43     {
  44         trace("%s\n", wine_dbgstr_w(str));
  45         for (;;)
  46         {
  47             VARIANT var;
  48
  49             IEnumWbemClassObject_Next( *result, WBEM_INFINITE, 1, &obj, &count );
  50             if (!count) break;
  51
  52             if (IWbemClassObject_Get( obj, captionW, 0, &var, NULL, NULL ) == WBEM_S_NO_ERROR)
  53             {
  54                 trace("caption: %s\n", wine_dbgstr_w(V_BSTR(&var)));
  55                 VariantClear( &var );
  56             }
  57             if (IWbemClassObject_Get( obj, descriptionW, 0, &var, NULL, NULL ) == WBEM_S_NO_ERROR)
  58             {
  59                 trace("description: %s\n", wine_dbgstr_w(V_BSTR(&var)));
  60                 VariantClear( &var );
  61             }
  62             IWbemClassObject_Release( obj );
  63         }
  64     }
  65     SysFreeString( wql );
  66     SysFreeString( query );
  67     return hr;
  68 }
  69
  70 static void test_select( IWbemServices *services )
  71 {
  72     static const WCHAR sqlW[] = {'S','Q','L',0};
  73     static const WCHAR query1[] =
  74         {'S','E','L','E','C','T',' ','H','O','T','F','I','X','I','D',' ','F','R','O','M',' ',
  75          '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};
  76     static const WCHAR query2[] =
  77         {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_','B','I','O','S',0};
  78     static const WCHAR query3[] =
  79         {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_',
  80          'L','o','g','i','c','a','l','D','i','s','k',' ','W','H','E','R','E',' ',
  81          '\"','N','T','F','S','\"',' ','=',' ','F','i','l','e','S','y','s','t','e','m',0};
  82     static const WCHAR query4[] =
  83         {'S','E','L','E','C','T',' ','a',' ','F','R','O','M',' ','b',0};
  84     static const WCHAR query5[] =
  85         {'S','E','L','E','C','T',' ','a',' ','F','R','O','M',' ','W','i','n','3','2','_','B','i','o','s',0};
  86     static const WCHAR query6[] =
  87         {'S','E','L','E','C','T',' ','D','e','s','c','r','i','p','t','i','o','n',' ','F','R','O','M',' ',
  88          'W','i','n','3','2','_','B','i','o','s',0};
  89     static const WCHAR query7[] =
  90         {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','W','i','n','3','2','_',
  91          'P','r','o','c','e','s','s',' ','W','H','E','R','E',' ','C','a','p','t','i','o','n',' ',
  92          'L','I','K','E',' ','\'','%','%','R','E','G','E','D','I','T','%','\'',0};
  93     static const WCHAR *test[] = { query1, query2, query3, query4, query5, query6, query7 };
  94     HRESULT hr;
  95     IEnumWbemClassObject *result;
  96     BSTR wql = SysAllocString( wqlW );
  97     BSTR sql = SysAllocString( sqlW );
  98     BSTR query = SysAllocString( query1 );
  99     UINT i;
 100
 101     hr = IWbemServices_ExecQuery( services, NULL, NULL, 0, NULL, &result );
 102     ok( hr == WBEM_E_INVALID_PARAMETER, "query failed %08x\n", hr );
 103
 104     hr = IWbemServices_ExecQuery( services, NULL, query, 0, NULL, &result );
 105     ok( hr == WBEM_E_INVALID_PARAMETER, "query failed %08x\n", hr );
 106
 107     hr = IWbemServices_ExecQuery( services, wql, NULL, 0, NULL, &result );
 108     ok( hr == WBEM_E_INVALID_PARAMETER, "query failed %08x\n", hr );
 109
 110     hr = IWbemServices_ExecQuery( services, sql, query, 0, NULL, &result );
 111     ok( hr == WBEM_E_INVALID_QUERY_TYPE, "query failed %08x\n", hr );
 112
 113     hr = IWbemServices_ExecQuery( services, sql, NULL, 0, NULL, &result );
 114     ok( hr == WBEM_E_INVALID_PARAMETER, "query failed %08x\n", hr );
 115
 116     for (i = 0; i < sizeof(test)/sizeof(test[0]); i++)
 117     {
 118         hr = exec_query( services, test[i], &result );
 119         ok( hr == S_OK, "query %u failed: %08x\n", i, hr );
 120         if (result) IEnumWbemClassObject_Release( result );
 121     }
 122
 123     SysFreeString( wql );
 124     SysFreeString( sql );
 125     SysFreeString( query );
 126 }
 127
 128 static void test_StdRegProv( IWbemServices *services )
 129 {
 130     static const WCHAR enumkeyW[] = {'E','n','u','m','K','e','y',0};
 131     static const WCHAR enumvaluesW[] = {'E','n','u','m','V','a','l','u','e','s',0};
 132     static const WCHAR getstringvalueW[] = {'G','e','t','S','t','r','i','n','g','V','a','l','u','e',0};
 133     static const WCHAR stdregprovW[] = {'S','t','d','R','e','g','P','r','o','v',0};
 134     static const WCHAR defkeyW[] = {'h','D','e','f','K','e','y',0};
 135     static const WCHAR subkeynameW[] = {'s','S','u','b','K','e','y','N','a','m','e',0};
 136     static const WCHAR returnvalueW[] = {'R','e','t','u','r','n','V','a','l','u','e',0};
 137     static const WCHAR namesW[] = {'s','N','a','m','e','s',0};
 138     static const WCHAR typesW[] = {'T','y','p','e','s',0};
 139     static const WCHAR valueW[] = {'s','V','a','l','u','e',0};
 140     static const WCHAR valuenameW[] = {'s','V','a','l','u','e','N','a','m','e',0};
 141     static const WCHAR programfilesW[] = {'P','r','o','g','r','a','m','F','i','l','e','s','D','i','r',0};
 142     static const WCHAR windowsW[] =
 143         {'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
 144          'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n',0};
 145     BSTR class = SysAllocString( stdregprovW ), method;
 146     IWbemClassObject *reg, *sig_in, *sig_out, *in, *out;
 147     VARIANT defkey, subkey, retval, names, types, value, valuename;
 148     CIMTYPE type;
 149     HRESULT hr;
 150
 151     hr = IWbemServices_GetObject( services, class, 0, NULL, &reg, NULL );
 152     if (hr != S_OK)
 153     {
 154         win_skip( "StdRegProv not available\n" );
 155         return;
 156     }
 157     hr = IWbemClassObject_GetMethod( reg, enumkeyW, 0, &sig_in, &sig_out );
 158     ok( hr == S_OK, "failed to get EnumKey method %08x\n", hr );
 159
 160     hr = IWbemClassObject_SpawnInstance( sig_in, 0, &in );
 161     ok( hr == S_OK, "failed to spawn instance %08x\n", hr );
 162
 163     V_VT( &defkey ) = VT_I4;
 164     V_I4( &defkey ) = 0x80000002;
 165     hr = IWbemClassObject_Put( in, defkeyW, 0, &defkey, 0 );
 166     ok( hr == S_OK, "failed to set root %08x\n", hr );
 167
 168     V_VT( &subkey ) = VT_BSTR;
 169     V_BSTR( &subkey ) = SysAllocString( windowsW );
 170     hr = IWbemClassObject_Put( in, subkeynameW, 0, &subkey, 0 );
 171     ok( hr == S_OK, "failed to set subkey %08x\n", hr );
 172
 173     out = NULL;
 174     method = SysAllocString( enumkeyW );
 175     hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, in, &out, NULL );
 176     ok( hr == S_OK, "failed to execute method %08x\n", hr );
 177     SysFreeString( method );
 178
 179     type = 0xdeadbeef;
 180     VariantInit( &retval );
 181     hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, &type, NULL );
 182     ok( hr == S_OK, "failed to get return value %08x\n", hr );
 183     ok( V_VT( &retval ) == VT_I4, "unexpected variant type 0x%x\n", V_VT( &retval ) );
 184     ok( !V_I4( &retval ), "unexpected error %u\n", V_UI4( &retval ) );
 185     ok( type == CIM_UINT32, "unexpected type 0x%x\n", type );
 186
 187     type = 0xdeadbeef;
 188     VariantInit( &names );
 189     hr = IWbemClassObject_Get( out, namesW, 0, &names, &type, NULL );
 190     ok( hr == S_OK, "failed to get names %08x\n", hr );
 191     ok( V_VT( &names ) == (VT_BSTR|VT_ARRAY), "unexpected variant type 0x%x\n", V_VT( &names ) );
 192     ok( type == (CIM_STRING|CIM_FLAG_ARRAY), "unexpected type 0x%x\n", type );
 193
 194     VariantClear( &names );
 195     VariantClear( &subkey );
 196     IWbemClassObject_Release( in );
 197     IWbemClassObject_Release( out );
 198     IWbemClassObject_Release( sig_in );
 199     IWbemClassObject_Release( sig_out );
 200
 201     hr = IWbemClassObject_GetMethod( reg, enumvaluesW, 0, &sig_in, &sig_out );
 202     ok( hr == S_OK, "failed to get EnumValues method %08x\n", hr );
 203
 204     hr = IWbemClassObject_SpawnInstance( sig_in, 0, &in );
 205     ok( hr == S_OK, "failed to spawn instance %08x\n", hr );
 206
 207     V_VT( &defkey ) = VT_I4;
 208     V_I4( &defkey ) = 0x80000002;
 209     hr = IWbemClassObject_Put( in, defkeyW, 0, &defkey, 0 );
 210     ok( hr == S_OK, "failed to set root %08x\n", hr );
 211
 212     V_VT( &subkey ) = VT_BSTR;
 213     V_BSTR( &subkey ) = SysAllocString( windowsW );
 214     hr = IWbemClassObject_Put( in, subkeynameW, 0, &subkey, 0 );
 215     ok( hr == S_OK, "failed to set subkey %08x\n", hr );
 216
 217     out = NULL;
 218     method = SysAllocString( enumvaluesW );
 219     hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, in, &out, NULL );
 220     ok( hr == S_OK, "failed to execute method %08x\n", hr );
 221     SysFreeString( method );
 222
 223     type = 0xdeadbeef;
 224     VariantInit( &retval );
 225     hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, &type, NULL );
 226     ok( hr == S_OK, "failed to get return value %08x\n", hr );
 227     ok( V_VT( &retval ) == VT_I4, "unexpected variant type 0x%x\n", V_VT( &retval ) );
 228     ok( !V_I4( &retval ), "unexpected error %u\n", V_I4( &retval ) );
 229     ok( type == CIM_UINT32, "unexpected type 0x%x\n", type );
 230
 231     type = 0xdeadbeef;
 232     VariantInit( &names );
 233     hr = IWbemClassObject_Get( out, namesW, 0, &names, &type, NULL );
 234     ok( hr == S_OK, "failed to get names %08x\n", hr );
 235     ok( V_VT( &names ) == (VT_BSTR|VT_ARRAY), "unexpected variant type 0x%x\n", V_VT( &names ) );
 236     ok( type == (CIM_STRING|CIM_FLAG_ARRAY), "unexpected type 0x%x\n", type );
 237
 238     type = 0xdeadbeef;
 239     VariantInit( &types );
 240     hr = IWbemClassObject_Get( out, typesW, 0, &types, &type, NULL );
 241     ok( hr == S_OK, "failed to get names %08x\n", hr );
 242     ok( V_VT( &types ) == (VT_I4|VT_ARRAY), "unexpected variant type 0x%x\n", V_VT( &types ) );
 243     ok( type == (CIM_SINT32|CIM_FLAG_ARRAY), "unexpected type 0x%x\n", type );
 244
 245     VariantClear( &types );
 246     VariantClear( &names );
 247     VariantClear( &subkey );
 248     IWbemClassObject_Release( in );
 249     IWbemClassObject_Release( out );
 250     IWbemClassObject_Release( sig_in );
 251     IWbemClassObject_Release( sig_out );
 252
 253     hr = IWbemClassObject_GetMethod( reg, getstringvalueW, 0, &sig_in, &sig_out );
 254     ok( hr == S_OK, "failed to get GetStringValue method %08x\n", hr );
 255
 256     hr = IWbemClassObject_SpawnInstance( sig_in, 0, &in );
 257     ok( hr == S_OK, "failed to spawn instance %08x\n", hr );
 258
 259     V_VT( &defkey ) = VT_I4;
 260     V_I4( &defkey ) = 0x80000002;
 261     hr = IWbemClassObject_Put( in, defkeyW, 0, &defkey, 0 );
 262     ok( hr == S_OK, "failed to set root %08x\n", hr );
 263
 264     V_VT( &subkey ) = VT_BSTR;
 265     V_BSTR( &subkey ) = SysAllocString( windowsW );
 266     hr = IWbemClassObject_Put( in, subkeynameW, 0, &subkey, 0 );
 267     ok( hr == S_OK, "failed to set subkey %08x\n", hr );
 268
 269     V_VT( &valuename ) = VT_BSTR;
 270     V_BSTR( &valuename ) = SysAllocString( programfilesW );
 271     hr = IWbemClassObject_Put( in, valuenameW, 0, &valuename, 0 );
 272     ok( hr == S_OK, "failed to set value name %08x\n", hr );
 273
 274     out = NULL;
 275     method = SysAllocString( getstringvalueW );
 276     hr = IWbemServices_ExecMethod( services, class, method, 0, NULL, in, &out, NULL );
 277     ok( hr == S_OK, "failed to execute method %08x\n", hr );
 278     SysFreeString( method );
 279
 280     type = 0xdeadbeef;
 281     VariantInit( &retval );
 282     hr = IWbemClassObject_Get( out, returnvalueW, 0, &retval, &type, NULL );
 283     ok( hr == S_OK, "failed to get return value %08x\n", hr );
 284     ok( V_VT( &retval ) == VT_I4, "unexpected variant type 0x%x\n", V_VT( &retval ) );
 285     ok( !V_I4( &retval ), "unexpected error %u\n", V_I4( &retval ) );
 286     ok( type == CIM_UINT32, "unexpected type 0x%x\n", type );
 287
 288     type = 0xdeadbeef;
 289     VariantInit( &value );
 290     hr = IWbemClassObject_Get( out, valueW, 0, &value, &type, NULL );
 291     ok( hr == S_OK, "failed to get value %08x\n", hr );
 292     ok( V_VT( &value ) == VT_BSTR, "unexpected variant type 0x%x\n", V_VT( &value ) );
 293     ok( type == CIM_STRING, "unexpected type 0x%x\n", type );
 294
 295     VariantClear( &value );
 296     VariantClear( &valuename );
 297     VariantClear( &subkey );
 298     IWbemClassObject_Release( in );
 299     IWbemClassObject_Release( out );
 300     IWbemClassObject_Release( sig_in );
 301     IWbemClassObject_Release( sig_out );
 302
 303     IWbemClassObject_Release( reg );
 304     SysFreeString( class );
 305 }
 306
 307 START_TEST(query)
 308 {
 309     static const WCHAR cimv2W[] = {'R','O','O','T','\\','C','I','M','V','2',0};
 310     BSTR path = SysAllocString( cimv2W );
 311     IWbemLocator *locator;
 312     IWbemServices *services;
 313     HRESULT hr;
 314
 315     CoInitialize( NULL );
 316     CoInitializeSecurity( NULL, -1, NULL, NULL, RPC_C_AUTHN_LEVEL_DEFAULT,
 317                           RPC_C_IMP_LEVEL_IMPERSONATE, NULL, EOAC_NONE, NULL );
 318     hr = CoCreateInstance( &CLSID_WbemLocator, NULL, CLSCTX_INPROC_SERVER, &IID_IWbemLocator,
 319                            (void **)&locator );
 320     if (hr != S_OK)
 321     {
 322         win_skip("can't create instance of WbemLocator\n");
 323         return;
 324     }
 325     hr = IWbemLocator_ConnectServer( locator, path, NULL, NULL, NULL, 0, NULL, NULL, &services );
 326     ok( hr == S_OK, "failed to get IWbemServices interface %08x\n", hr );
 327
 328     hr = CoSetProxyBlanket( (IUnknown *)services, RPC_C_AUTHN_WINNT, RPC_C_AUTHZ_NONE, NULL,
 329                             RPC_C_AUTHN_LEVEL_CALL, RPC_C_IMP_LEVEL_IMPERSONATE, NULL, EOAC_NONE );
 330     ok( hr == S_OK, "failed to set proxy blanket %08x\n", hr );
 331
 332     test_select( services );
 333     test_StdRegProv( services );
 334
 335     SysFreeString( path );
 336     IWbemServices_Release( services );
 337     IWbemLocator_Release( locator );
 338     CoUninitialize();
 339 }