[ros-diffs] [akhaldi] 60423: [WBEMPROX_WINETEST] * Import from Wine 1.7.1. CORE-7469

Author: akhaldi
Date: Sat Sep 28 15:17:20 2013
New Revision: 60423

URL: http://svn.reactos.org/svn/reactos?rev=60423&view=rev
Log:
[WBEMPROX_WINETEST]
* Import from Wine 1.7.1.
CORE-7469

Added:
    trunk/rostests/winetests/wbemprox/
    trunk/rostests/winetests/wbemprox/CMakeLists.txt   (with props)
    trunk/rostests/winetests/wbemprox/query.c   (with props)
    trunk/rostests/winetests/wbemprox/services.c   (with props)
    trunk/rostests/winetests/wbemprox/testlist.c   (with props)
Modified:
    trunk/rostests/winetests/CMakeLists.txt

Modified: trunk/rostests/winetests/CMakeLists.txt
URL:
http://svn.reactos.org/svn/reactos/trunk/rostests/winetests/CMakeLists.txt?…
==============================================================================
--- trunk/rostests/winetests/CMakeLists.txt	[iso-8859-1] (original)
+++ trunk/rostests/winetests/CMakeLists.txt	[iso-8859-1] Sat Sep 28 15:17:20 2013
@@ -95,6 +95,7 @@
 add_subdirectory(uxtheme)
 add_subdirectory(vbscript)
 add_subdirectory(version)
+add_subdirectory(wbemprox)
 add_subdirectory(windowscodecs)
 add_subdirectory(winhttp)
 add_subdirectory(wininet)

Added: trunk/rostests/winetests/wbemprox/CMakeLists.txt
URL:
http://svn.reactos.org/svn/reactos/trunk/rostests/winetests/wbemprox/CMakeL…
==============================================================================
--- trunk/rostests/winetests/wbemprox/CMakeLists.txt	(added)
+++ trunk/rostests/winetests/wbemprox/CMakeLists.txt	[iso-8859-1] Sat Sep 28 15:17:20
2013
@@ -0,0 +1,11 @@
+
+list(APPEND SOURCE
+    query.c
+    services.c
+    testlist.c)
+
+add_executable(wbemprox_winetest ${SOURCE})
+target_link_libraries(wbemprox_winetest uuid)
+set_module_type(wbemprox_winetest win32cui)
+add_importlibs(wbemprox_winetest oleaut32 ole32 user32 msvcrt kernel32)
+add_cd_file(TARGET wbemprox_winetest DESTINATION reactos/bin FOR all)

Propchange: trunk/rostests/winetests/wbemprox/CMakeLists.txt
------------------------------------------------------------------------------
    svn:eol-style = native

Added: trunk/rostests/winetests/wbemprox/query.c
URL:
http://svn.reactos.org/svn/reactos/trunk/rostests/winetests/wbemprox/query.…
==============================================================================
--- trunk/rostests/winetests/wbemprox/query.c	(added)
+++ trunk/rostests/winetests/wbemprox/query.c	[iso-8859-1] Sat Sep 28 15:17:20 2013
@@ -0,0 +1,662 @@
+/*
+ * 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, &reg, 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 );
+}
+
+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 );
+
+    if (!winetest_interactive)
+    {
+        skip("test_select( services ), ROSTESTS-120\n");
+    }
+    else
+    {
+        test_select( services );
+    }
+    test_Win32_Process( services );
+    test_Win32_Service( services );
+    test_StdRegProv( services );
+    test_notification_query_async( services );
+    test_query_async( services );
+
+    SysFreeString( path );
+    IWbemServices_Release( services );
+    IWbemLocator_Release( locator );
+    CoUninitialize();
+}

Propchange: trunk/rostests/winetests/wbemprox/query.c
------------------------------------------------------------------------------
    svn:eol-style = native

Added: trunk/rostests/winetests/wbemprox/services.c
URL:
http://svn.reactos.org/svn/reactos/trunk/rostests/winetests/wbemprox/servic…
==============================================================================
--- trunk/rostests/winetests/wbemprox/services.c	(added)
+++ trunk/rostests/winetests/wbemprox/services.c	[iso-8859-1] Sat Sep 28 15:17:20 2013
@@ -0,0 +1,185 @@
+/*
+ * 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 "objidl.h"
+#include "wbemcli.h"
+#include "wine/test.h"
+
+static void test_IClientSecurity(void)
+{
+    static const WCHAR rootW[] =
{'R','O','O','T','\\','C','I','M','V','2',0};
+    HRESULT hr;
+    IWbemLocator *locator;
+    IWbemServices *services;
+    IClientSecurity *security;
+    BSTR path = SysAllocString( rootW );
+    ULONG refs;
+
+    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;
+    }
+    ok( hr == S_OK, "failed to create IWbemLocator interface %08x\n", hr );
+
+    refs = IWbemLocator_Release( locator );
+    ok( refs == 0, "unexpected refcount %u\n", refs );
+
+    hr = CoCreateInstance( &CLSID_WbemLocator, NULL, CLSCTX_INPROC_SERVER,
&IID_IWbemLocator, (void **)&locator );
+    ok( hr == S_OK, "failed to create IWbemLocator interface %08x\n", hr );
+
+    hr = IWbemLocator_ConnectServer( locator, path, NULL, NULL, NULL, 0, NULL, NULL,
&services );
+    ok( hr == S_OK, "failed to get IWbemServices interface %08x\n", hr );
+
+    refs = IWbemServices_Release( services );
+    ok( refs == 0, "unexpected refcount %u\n", refs );
+
+    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 = IWbemServices_QueryInterface( services, &IID_IClientSecurity, (void
**)&security );
+    ok( hr == S_OK, "failed to query IClientSecurity interface %08x\n", hr );
+    ok( (void *)services != (void *)security, "expected pointers to be
different\n" );
+
+    refs = IClientSecurity_Release( security );
+    ok( refs == 1, "unexpected refcount %u\n", refs );
+
+    refs = IWbemServices_Release( services );
+    ok( refs == 0, "unexpected refcount %u\n", refs );
+
+    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 = IWbemServices_QueryInterface( services, &IID_IClientSecurity, (void
**)&security );
+    ok( hr == S_OK, "failed to query IClientSecurity interface %08x\n", hr );
+    ok( (void *)services != (void *)security, "expected pointers to be
different\n" );
+
+    refs = IWbemServices_Release( services );
+    todo_wine ok( refs == 1, "unexpected refcount %u\n", refs );
+
+    refs = IClientSecurity_Release( security );
+    todo_wine ok( refs == 0, "unexpected refcount %u\n", refs );
+
+    IWbemLocator_Release( locator );
+    SysFreeString( path );
+}
+
+static void test_IWbemLocator(void)
+{
+    static const WCHAR path0W[] = {0};
+    static const WCHAR path1W[] = {'\\',0};
+    static const WCHAR path2W[] = {'\\','\\',0};
+    static const WCHAR path3W[] = {'\\','\\','.',0};
+    static const WCHAR path4W[] =
{'\\','\\','.','\\',0};
+    static const WCHAR path5W[] =
{'\\','R','O','O','T',0};
+    static const WCHAR path6W[] =
{'\\','\\','R','O','O','T',0};
+    static const WCHAR path7W[] =
{'\\','\\','.','R','O','O','T',0};
+    static const WCHAR path8W[] =
{'\\','\\','.','\\','N','O','N','E',0};
+    static const WCHAR path9W[] =
{'\\','\\','.','\\','R','O','O','T',0};
+    static const WCHAR path10W[] =
{'\\','\\','\\','.','\\','R','O','O','T',0};
+    static const WCHAR path11W[] =
{'\\','/','.','\\','R','O','O','T',0};
+    static const WCHAR path12W[] =
{'/','/','.','\\','R','O','O','T',0};
+    static const WCHAR path13W[] =
{'\\','\\','.','/','R','O','O','T',0};
+    static const WCHAR path14W[] =
{'/','/','.','/','R','O','O','T',0};
+    static const WCHAR path15W[] = {'N','O','N','E',0};
+    static const WCHAR path16W[] = {'R','O','O','T',0};
+    static const WCHAR path17W[] =
{'R','O','O','T','\\','N','O','N','E',0};
+    static const WCHAR path18W[] =
{'R','O','O','T','\\','C','I','M','V','2',0};
+    static const WCHAR path19W[] =
{'R','O','O','T','\\','\\','C','I','M','V','2',0};
+    static const WCHAR path20W[] =
{'R','O','O','T','\\','C','I','M','V','2','\\',0};
+    static const WCHAR path21W[] =
{'R','O','O','T','/','C','I','M','V','2',0};
+    static const WCHAR path22W[] =
{'r','o','o','t','\\','d','e','f','a','u','l','t',0};
+    static const WCHAR path23W[] =
{'r','o','o','t','\\','c','i','m','v','0',0};
+    static const WCHAR path24W[] =
{'r','o','o','t','\\','c','i','m','v','1',0};
+    static const struct
+    {
+        const WCHAR *path;
+        HRESULT      result;
+        int          todo;
+        HRESULT      result_broken;
+    }
+    test[] =
+    {
+        { path0W, WBEM_E_INVALID_NAMESPACE },
+        { path1W, WBEM_E_INVALID_NAMESPACE },
+        { path2W, WBEM_E_INVALID_NAMESPACE },
+        { path3W, WBEM_E_INVALID_NAMESPACE },
+        { path4W, WBEM_E_INVALID_NAMESPACE, 0, WBEM_E_INVALID_PARAMETER },
+        { path5W, WBEM_E_INVALID_NAMESPACE },
+        { path6W, 0x800706ba, 1 },
+        { path7W, 0x800706ba, 1 },
+        { path8W, WBEM_E_INVALID_NAMESPACE },
+        { path9W, S_OK },
+        { path10W, WBEM_E_INVALID_PARAMETER },
+        { path11W, S_OK },
+        { path12W, S_OK },
+        { path13W, S_OK },
+        { path14W, S_OK },
+        { path15W, WBEM_E_INVALID_NAMESPACE },
+        { path16W, S_OK },
+        { path17W, WBEM_E_INVALID_NAMESPACE },
+        { path18W, S_OK },
+        { path19W, WBEM_E_INVALID_NAMESPACE },
+        { path20W, WBEM_E_INVALID_NAMESPACE },
+        { path21W, S_OK },
+        { path22W, S_OK },
+        { path23W, WBEM_E_INVALID_NAMESPACE },
+        { path24W, WBEM_E_INVALID_NAMESPACE }
+    };
+    IWbemLocator *locator;
+    IWbemServices *services;
+    unsigned int i;
+    HRESULT hr;
+    BSTR resource;
+
+    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;
+    }
+    ok( hr == S_OK, "failed to create IWbemLocator interface %08x\n", hr );
+
+    for (i = 0; i < sizeof(test) / sizeof(test[0]); i++)
+    {
+        resource = SysAllocString( test[i].path );
+        hr = IWbemLocator_ConnectServer( locator, resource, NULL, NULL, NULL, 0, NULL,
NULL, &services );
+        if (test[i].todo) todo_wine
+            ok( hr == test[i].result || broken(hr == test[i].result_broken),
+                "%u: expected %08x got %08x\n", i, test[i].result, hr );
+        else
+            ok( hr == test[i].result || broken(hr == test[i].result_broken),
+                "%u: expected %08x got %08x\n", i, test[i].result, hr );
+        SysFreeString( resource );
+        if (hr == S_OK) IWbemServices_Release( services );
+    }
+    IWbemLocator_Release( locator );
+}
+
+START_TEST(services)
+{
+    CoInitialize( NULL );
+    test_IClientSecurity();
+    test_IWbemLocator();
+    CoUninitialize();
+}

Propchange: trunk/rostests/winetests/wbemprox/services.c
------------------------------------------------------------------------------
    svn:eol-style = native

Added: trunk/rostests/winetests/wbemprox/testlist.c
URL:
http://svn.reactos.org/svn/reactos/trunk/rostests/winetests/wbemprox/testli…
==============================================================================
--- trunk/rostests/winetests/wbemprox/testlist.c	(added)
+++ trunk/rostests/winetests/wbemprox/testlist.c	[iso-8859-1] Sat Sep 28 15:17:20 2013
@@ -0,0 +1,14 @@
+/* Automatically generated file; DO NOT EDIT!! */
+
+#define STANDALONE
+#include <wine/test.h>
+
+extern void func_query(void);
+extern void func_services(void);
+
+const struct test winetest_testlist[] =
+{
+    { "query", func_query },
+    { "services", func_services },
+    { 0, 0 }
+};

Propchange: trunk/rostests/winetests/wbemprox/testlist.c
------------------------------------------------------------------------------
    svn:eol-style = native