[PATCH v4] wintypes: Implement IApiInformationStatics stubs.

[Zhiyi Zhang]

Required for Iragon: Prologue.

Signed-off-by: Zhiyi Zhang <zzhang(a)codeweavers.com>
---
v3: Supersede 233207. Add tests.
v4: Supersede 233864. Link to combase function directly.

 configure.ac                    |   1 +
 dlls/wintypes/main.c            | 207 ++++++++++++++++
 dlls/wintypes/tests/Makefile.in |   5 +
 dlls/wintypes/tests/wintypes.c  | 427 ++++++++++++++++++++++++++++++++
 4 files changed, 640 insertions(+)
 create mode 100644 dlls/wintypes/tests/Makefile.in
 create mode 100644 dlls/wintypes/tests/wintypes.c

diff --git a/configure.ac b/configure.ac
index 74c80fd7fa8..f0b39d172ba 100644
--- a/configure.ac
+++ b/configure.ac
@@ -3142,6 +3142,7 @@ WINE_CONFIG_MAKEFILE(dlls/wintab32/tests)
 WINE_CONFIG_MAKEFILE(dlls/wintrust)
 WINE_CONFIG_MAKEFILE(dlls/wintrust/tests)
 WINE_CONFIG_MAKEFILE(dlls/wintypes)
+WINE_CONFIG_MAKEFILE(dlls/wintypes/tests)
 WINE_CONFIG_MAKEFILE(dlls/winusb)
 WINE_CONFIG_MAKEFILE(dlls/wlanapi)
 WINE_CONFIG_MAKEFILE(dlls/wlanapi/tests)
diff --git a/dlls/wintypes/main.c b/dlls/wintypes/main.c
index e5fea2f7d30..1ca8d94cd67 100644
--- a/dlls/wintypes/main.c
+++ b/dlls/wintypes/main.c
@@ -28,6 +28,9 @@
 
 #include "activation.h"
 
+#define WIDL_using_Windows_Foundation_Metadata
+#include "windows.foundation.metadata.h"
+
 WINE_DEFAULT_DEBUG_CHANNEL(wintypes);
 
 static const char *debugstr_hstring(HSTRING hstr)
@@ -43,6 +46,7 @@ static const char *debugstr_hstring(HSTRING hstr)
 struct wintypes
 {
     IActivationFactory IActivationFactory_iface;
+    IApiInformationStatics IApiInformationStatics_iface;
     LONG ref;
 };
 
@@ -51,9 +55,16 @@ static inline struct wintypes *impl_from_IActivationFactory(IActivationFactory *
     return CONTAINING_RECORD(iface, struct wintypes, IActivationFactory_iface);
 }
 
+static inline struct wintypes *impl_from_IApiInformationStatics(IApiInformationStatics *iface)
+{
+    return CONTAINING_RECORD(iface, struct wintypes, IApiInformationStatics_iface);
+}
+
 static HRESULT STDMETHODCALLTYPE wintypes_QueryInterface(IActivationFactory *iface, REFIID iid,
         void **out)
 {
+    struct wintypes *impl = impl_from_IActivationFactory(iface);
+
     TRACE("iface %p, iid %s, out %p stub!\n", iface, debugstr_guid(iid), out);
 
     if (IsEqualGUID(iid, &IID_IUnknown)
@@ -66,6 +77,13 @@ static HRESULT STDMETHODCALLTYPE wintypes_QueryInterface(IActivationFactory *ifa
         return S_OK;
     }
 
+    if (IsEqualGUID(iid, &IID_IApiInformationStatics))
+    {
+        IUnknown_AddRef(iface);
+        *out = &impl->IApiInformationStatics_iface;
+        return S_OK;
+    }
+
     FIXME("%s not implemented, returning E_NOINTERFACE.\n", debugstr_guid(iid));
     *out = NULL;
     return E_NOINTERFACE;
@@ -128,9 +146,198 @@ static const struct IActivationFactoryVtbl activation_factory_vtbl =
     wintypes_ActivateInstance,
 };
 
+static HRESULT STDMETHODCALLTYPE api_information_statics_QueryInterface(
+        IApiInformationStatics *iface, REFIID iid, void **out)
+{
+    struct wintypes *impl = impl_from_IApiInformationStatics(iface);
+    return wintypes_QueryInterface(&impl->IActivationFactory_iface, iid, out);
+}
+
+static ULONG STDMETHODCALLTYPE api_information_statics_AddRef(
+        IApiInformationStatics *iface)
+{
+    struct wintypes *impl = impl_from_IApiInformationStatics(iface);
+    return wintypes_AddRef(&impl->IActivationFactory_iface);
+}
+
+static ULONG STDMETHODCALLTYPE api_information_statics_Release(
+        IApiInformationStatics *iface)
+{
+    struct wintypes *impl = impl_from_IApiInformationStatics(iface);
+    return wintypes_Release(&impl->IActivationFactory_iface);
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_GetIids(
+        IApiInformationStatics *iface, ULONG *iid_count, IID **iids)
+{
+    FIXME("iface %p, iid_count %p, iids %p stub!\n", iface, iid_count, iids);
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_GetRuntimeClassName(
+        IApiInformationStatics *iface, HSTRING *class_name)
+{
+    FIXME("iface %p, class_name %p stub!\n", iface, class_name);
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_GetTrustLevel(
+        IApiInformationStatics *iface, TrustLevel *trust_level)
+{
+    FIXME("iface %p, trust_level %p stub!\n", iface, trust_level);
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_IsTypePresent(
+        IApiInformationStatics *iface, HSTRING type_name, BOOLEAN *value)
+{
+    FIXME("iface %p, type_name %s, value %p stub!\n", iface, debugstr_hstring(type_name), value);
+
+    if (!type_name)
+        return E_INVALIDARG;
+
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_IsMethodPresent(
+        IApiInformationStatics *iface, HSTRING type_name, HSTRING method_name, BOOLEAN *value)
+{
+    FIXME("iface %p, type_name %s, method_name %s, value %p stub!\n", iface,
+            debugstr_hstring(type_name), debugstr_hstring(method_name), value);
+
+    if (!type_name)
+        return E_INVALIDARG;
+
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_IsMethodPresentWithArity(
+        IApiInformationStatics *iface, HSTRING type_name, HSTRING method_name,
+        UINT32 input_parameter_count, BOOLEAN *value)
+{
+    FIXME("iface %p, type_name %s, method_name %s, input_parameter_count %u, value %p stub!\n",
+            iface, debugstr_hstring(type_name), debugstr_hstring(method_name),
+            input_parameter_count, value);
+
+    if (!type_name)
+        return E_INVALIDARG;
+
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_IsEventPresent(
+        IApiInformationStatics *iface, HSTRING type_name, HSTRING event_name, BOOLEAN *value)
+{
+    FIXME("iface %p, type_name %s, event_name %s, value %p stub!\n", iface,
+            debugstr_hstring(type_name), debugstr_hstring(event_name), value);
+
+    if (!type_name)
+        return E_INVALIDARG;
+
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_IsPropertyPresent(
+        IApiInformationStatics *iface, HSTRING type_name, HSTRING property_name, BOOLEAN *value)
+{
+    FIXME("iface %p, type_name %s, property_name %s, value %p stub!\n", iface,
+            debugstr_hstring(type_name), debugstr_hstring(property_name), value);
+
+    if (!type_name)
+        return E_INVALIDARG;
+
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_IsReadOnlyPropertyPresent(
+        IApiInformationStatics *iface, HSTRING type_name, HSTRING property_name,
+        BOOLEAN *value)
+{
+    FIXME("iface %p, type_name %s, property_name %s, value %p stub!\n", iface,
+            debugstr_hstring(type_name), debugstr_hstring(property_name), value);
+
+    if (!type_name)
+        return E_INVALIDARG;
+
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_IsWriteablePropertyPresent(
+        IApiInformationStatics *iface, HSTRING type_name, HSTRING property_name, BOOLEAN *value)
+{
+    FIXME("iface %p, type_name %s, property_name %s, value %p stub!\n", iface,
+            debugstr_hstring(type_name), debugstr_hstring(property_name), value);
+
+    if (!type_name)
+        return E_INVALIDARG;
+
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_IsEnumNamedValuePresent(
+        IApiInformationStatics *iface, HSTRING enum_type_name, HSTRING value_name, BOOLEAN *value)
+{
+    FIXME("iface %p, enum_type_name %s, value_name %s, value %p stub!\n", iface,
+            debugstr_hstring(enum_type_name), debugstr_hstring(value_name), value);
+
+    if (!enum_type_name)
+        return E_INVALIDARG;
+
+    return E_NOTIMPL;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_IsApiContractPresentByMajor(
+        IApiInformationStatics *iface, HSTRING contract_name, UINT16 major_version, BOOLEAN *value)
+{
+    FIXME("iface %p, contract_name %s, major_version %u, value %p stub!\n", iface,
+            debugstr_hstring(contract_name), major_version, value);
+
+    if (!contract_name)
+        return E_INVALIDARG;
+
+    *value = FALSE;
+    return S_OK;
+}
+
+static HRESULT STDMETHODCALLTYPE api_information_statics_IsApiContractPresentByMajorAndMinor(
+        IApiInformationStatics *iface, HSTRING contract_name, UINT16 major_version,
+        UINT16 minor_version, BOOLEAN *value)
+{
+    FIXME("iface %p, contract_name %s, major_version %u, minor_version %u, value %p stub!\n", iface,
+            debugstr_hstring(contract_name), major_version, minor_version, value);
+
+    if (!contract_name)
+        return E_INVALIDARG;
+
+    return E_NOTIMPL;
+}
+
+static const struct IApiInformationStaticsVtbl api_information_statics_vtbl =
+{
+    api_information_statics_QueryInterface,
+    api_information_statics_AddRef,
+    api_information_statics_Release,
+    /* IInspectable methods */
+    api_information_statics_GetIids,
+    api_information_statics_GetRuntimeClassName,
+    api_information_statics_GetTrustLevel,
+    /* IApiInformationStatics methods */
+    api_information_statics_IsTypePresent,
+    api_information_statics_IsMethodPresent,
+    api_information_statics_IsMethodPresentWithArity,
+    api_information_statics_IsEventPresent,
+    api_information_statics_IsPropertyPresent,
+    api_information_statics_IsReadOnlyPropertyPresent,
+    api_information_statics_IsWriteablePropertyPresent,
+    api_information_statics_IsEnumNamedValuePresent,
+    api_information_statics_IsApiContractPresentByMajor,
+    api_information_statics_IsApiContractPresentByMajorAndMinor
+};
+
 static struct wintypes wintypes =
 {
     {&activation_factory_vtbl},
+    {&api_information_statics_vtbl},
     1
 };
 
diff --git a/dlls/wintypes/tests/Makefile.in b/dlls/wintypes/tests/Makefile.in
new file mode 100644
index 00000000000..457551548f9
--- /dev/null
+++ b/dlls/wintypes/tests/Makefile.in
@@ -0,0 +1,5 @@
+TESTDLL = wintypes.dll
+IMPORTS = combase uuid
+
+C_SRCS = \
+	wintypes.c
diff --git a/dlls/wintypes/tests/wintypes.c b/dlls/wintypes/tests/wintypes.c
new file mode 100644
index 00000000000..fb81cf86e99
--- /dev/null
+++ b/dlls/wintypes/tests/wintypes.c
@@ -0,0 +1,427 @@
+/*
+ * Copyright 2022 Zhiyi Zhang 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 <stdarg.h>
+
+#include "windef.h"
+#include "winbase.h"
+#include "winerror.h"
+#include "winstring.h"
+
+#include "initguid.h"
+#include "roapi.h"
+
+#define WIDL_using_Windows_Foundation_Metadata
+#include "windows.foundation.metadata.h"
+
+#include "wine/test.h"
+
+static void test_IApiInformationStatics(void)
+{
+    static const WCHAR *class_name = L"Windows.Foundation.Metadata.ApiInformation";
+    IAgileObject *agile_object = NULL, *tmp_agile_object = NULL;
+    IInspectable *inspectable = NULL, *tmp_inspectable = NULL;
+    IApiInformationStatics *statics = NULL;
+    IActivationFactory *factory = NULL;
+    HSTRING str, str2;
+    BOOLEAN ret;
+    HRESULT hr;
+
+    hr = RoInitialize(RO_INIT_MULTITHREADED);
+    ok(hr == S_OK, "RoInitialize failed, hr %#lx.\n", hr);
+
+    hr = WindowsCreateString(class_name, wcslen(class_name), &str);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+
+    hr = RoGetActivationFactory(str, &IID_IActivationFactory, (void **)&factory);
+    ok(hr == S_OK || broken(hr == REGDB_E_CLASSNOTREG), "RoGetActivationFactory failed, hr %#lx.\n", hr);
+    WindowsDeleteString(str);
+    if (hr == REGDB_E_CLASSNOTREG)
+    {
+        win_skip("%s runtimeclass not registered, skipping tests.\n", wine_dbgstr_w(class_name));
+        RoUninitialize();
+        return;
+    }
+
+    hr = IActivationFactory_QueryInterface(factory, &IID_IInspectable, (void **)&inspectable);
+    ok(hr == S_OK, "QueryInterface IID_IInspectable failed, hr %#lx.\n", hr);
+
+    hr = IActivationFactory_QueryInterface(factory, &IID_IAgileObject, (void **)&agile_object);
+    ok(hr == S_OK, "QueryInterface IID_IAgileObject failed, hr %#lx.\n", hr);
+
+    hr = IActivationFactory_QueryInterface(factory, &IID_IApiInformationStatics, (void **)&statics);
+    ok(hr == S_OK, "QueryInterface IID_IApiInformationStatics failed, hr %#lx.\n", hr);
+
+    hr = IApiInformationStatics_QueryInterface(statics, &IID_IInspectable, (void **)&tmp_inspectable);
+    ok(hr == S_OK, "QueryInterface IID_IInspectable failed, hr %#lx.\n", hr);
+    ok(tmp_inspectable == inspectable, "QueryInterface IID_IInspectable returned %p, expected %p.\n",
+            tmp_inspectable, inspectable);
+    IInspectable_Release(tmp_inspectable);
+
+    hr = IApiInformationStatics_QueryInterface(statics, &IID_IAgileObject, (void **)&tmp_agile_object);
+    ok(hr == S_OK, "QueryInterface IID_IAgileObject failed, hr %#lx.\n", hr);
+    ok(tmp_agile_object == agile_object, "QueryInterface IID_IAgileObject returned %p, expected %p.\n",
+            tmp_agile_object, agile_object);
+    IAgileObject_Release(tmp_agile_object);
+
+    /* IsTypePresent() */
+    hr = WindowsCreateString(L"Windows.Foundation.FoundationContract",
+            wcslen(L"Windows.Foundation.FoundationContract"), &str);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+
+    hr = IApiInformationStatics_IsTypePresent(statics, NULL, &ret);
+    ok(hr == E_INVALIDARG, "IsTypePresent failed, hr %#lx.\n", hr);
+
+#if 0 /* Crash on Windows */
+    hr = IApiInformationStatics_IsTypePresent(statics, str, NULL);
+    ok(hr == E_INVALIDARG, "IsTypePresent failed, hr %#lx.\n", hr);
+#endif
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsTypePresent(statics, str, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsTypePresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE, "IsTypePresent returned FALSE.\n");
+
+    WindowsDeleteString(str);
+
+    /* IsMethodPresent() */
+    hr = WindowsCreateString(L"Windows.Foundation.Metadata.IApiInformationStatics",
+            wcslen(L"Windows.Foundation.Metadata.IApiInformationStatics"), &str);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+    hr = WindowsCreateString(L"IsTypePresent", wcslen(L"IsTypePresent"), &str2);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+
+    hr = IApiInformationStatics_IsMethodPresent(statics, NULL, str2, &ret);
+    ok(hr == E_INVALIDARG, "IsMethodPresent failed, hr %#lx.\n", hr);
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsMethodPresent(statics, str, NULL, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsMethodPresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsMethodPresent returned TRUE.\n");
+
+#if 0 /* Crash on Windows */
+    hr = IApiInformationStatics_IsMethodPresent(statics, str, str2, NULL);
+    ok(hr == E_INVALIDARG, "IsMethodPresent failed, hr %#lx.\n", hr);
+#endif
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsMethodPresent(statics, str, str2, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsMethodPresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE, "IsMethodPresent returned FALSE.\n");
+
+    /* IsMethodPresentWithArity() */
+    hr = IApiInformationStatics_IsMethodPresentWithArity(statics, NULL, str2, 1, &ret);
+    ok(hr == E_INVALIDARG, "IsMethodPresentWithArity failed, hr %#lx.\n", hr);
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsMethodPresentWithArity(statics, str, NULL, 1, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsMethodPresentWithArity failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsMethodPresentWithArity returned FALSE.\n");
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsMethodPresentWithArity(statics, str, str2, 0, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsMethodPresentWithArity failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsMethodPresentWithArity returned FALSE.\n");
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsMethodPresentWithArity(statics, str, str2, 2, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsMethodPresentWithArity failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsMethodPresentWithArity returned FALSE.\n");
+
+#if 0 /* Crash on Windows */
+    hr = IApiInformationStatics_IsMethodPresentWithArity(statics, str, str2, 1, NULL);
+    ok(hr == E_INVALIDARG, "IsMethodPresentWithArity failed, hr %#lx.\n", hr);
+#endif
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsMethodPresentWithArity(statics, str, str2, 1, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsMethodPresentWithArity failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE, "IsMethodPresentWithArity returned FALSE.\n");
+
+    WindowsDeleteString(str2);
+    WindowsDeleteString(str);
+
+    /* IsEventPresent() */
+    hr = WindowsCreateString(L"Windows.Devices.Enumeration.IDeviceWatcher",
+            wcslen(L"Windows.Devices.Enumeration.IDeviceWatcher"), &str);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+    hr = WindowsCreateString(L"Added", wcslen(L"Added"), &str2);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+
+    hr = IApiInformationStatics_IsEventPresent(statics, NULL, str2, &ret);
+    ok(hr == E_INVALIDARG, "IsEventPresent failed, hr %#lx.\n", hr);
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsEventPresent(statics, str, NULL, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsEventPresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsEventPresent returned FALSE.\n");
+
+#if 0 /* Crash on Windows */
+    hr = IApiInformationStatics_IsEventPresent(statics, str, str2, NULL);
+    ok(hr == E_INVALIDARG, "IsEventPresent failed, hr %#lx.\n", hr);
+#endif
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsEventPresent(statics, str, str2, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsEventPresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE, "IsEventPresent returned FALSE.\n");
+
+    WindowsDeleteString(str2);
+    WindowsDeleteString(str);
+
+    /* IsPropertyPresent() */
+    hr = WindowsCreateString(L"Windows.Devices.Enumeration.IDeviceWatcher",
+            wcslen(L"Windows.Devices.Enumeration.IDeviceWatcher"), &str);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+    hr = WindowsCreateString(L"Status", wcslen(L"Status"), &str2);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+
+    hr = IApiInformationStatics_IsPropertyPresent(statics, NULL, str2, &ret);
+    ok(hr == E_INVALIDARG, "IsPropertyPresent failed, hr %#lx.\n", hr);
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsPropertyPresent(statics, str, NULL, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsPropertyPresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsPropertyPresent returned TRUE.\n");
+
+#if 0 /* Crash on Windows */
+    hr = IApiInformationStatics_IsPropertyPresent(statics, str, str2, NULL);
+    ok(hr == E_INVALIDARG, "IsPropertyPresent failed, hr %#lx.\n", hr);
+#endif
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsPropertyPresent(statics, str, str2, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsPropertyPresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE, "IsPropertyPresent returned FALSE.\n");
+
+    WindowsDeleteString(str2);
+    WindowsDeleteString(str);
+
+    /* IsReadOnlyPropertyPresent() */
+    hr = WindowsCreateString(L"Windows.Devices.Enumeration.IDeviceWatcher",
+            wcslen(L"Windows.Devices.Enumeration.IDeviceWatcher"), &str);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+    hr = WindowsCreateString(L"Id", wcslen(L"Id"), &str2);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+
+    hr = IApiInformationStatics_IsReadOnlyPropertyPresent(statics, NULL, str2, &ret);
+    ok(hr == E_INVALIDARG, "IsReadOnlyPropertyPresent failed, hr %#lx.\n", hr);
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsReadOnlyPropertyPresent(statics, str, NULL, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsReadOnlyPropertyPresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsReadOnlyPropertyPresent returned TRUE.\n");
+
+#if 0 /* Crash on Windows */
+    hr = IApiInformationStatics_IsReadOnlyPropertyPresent(statics, str, str2, NULL);
+    ok(hr == E_INVALIDARG, "IsReadOnlyPropertyPresent failed, hr %#lx.\n", hr);
+#endif
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsReadOnlyPropertyPresent(statics, str, str2, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsReadOnlyPropertyPresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsReadOnlyPropertyPresent returned TRUE.\n");
+
+    WindowsDeleteString(str2);
+    WindowsDeleteString(str);
+
+    /* IsWriteablePropertyPresent() */
+    hr = WindowsCreateString(L"Windows.Gaming.Input.ForceFeedback.IForceFeedbackEffect",
+            wcslen(L"Windows.Gaming.Input.ForceFeedback.IForceFeedbackEffect"), &str);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+    hr = WindowsCreateString(L"Gain", wcslen(L"Gain"), &str2);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+
+    hr = IApiInformationStatics_IsWriteablePropertyPresent(statics, NULL, str2, &ret);
+    ok(hr == E_INVALIDARG, "IsWriteablePropertyPresent failed, hr %#lx.\n", hr);
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsWriteablePropertyPresent(statics, str, NULL, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsWriteablePropertyPresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsWriteablePropertyPresent returned TRUE.\n");
+
+#if 0 /* Crash on Windows */
+    hr = IApiInformationStatics_IsWriteablePropertyPresent(statics, str, str2, NULL);
+    ok(hr == E_INVALIDARG, "IsWriteablePropertyPresent failed, hr %#lx.\n", hr);
+#endif
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsWriteablePropertyPresent(statics, str, str2, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsWriteablePropertyPresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE || broken(ret == FALSE) /* Win10 1507 */,
+            "IsWriteablePropertyPresent returned FALSE.\n");
+
+    WindowsDeleteString(str2);
+    WindowsDeleteString(str);
+
+    /* IsEnumNamedValuePresent */
+    hr = WindowsCreateString(L"Windows.Foundation.Metadata.GCPressureAmount",
+            wcslen(L"Windows.Foundation.Metadata.GCPressureAmount"), &str);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+    hr = WindowsCreateString(L"Low", wcslen(L"Low"), &str2);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+
+    hr = IApiInformationStatics_IsEnumNamedValuePresent(statics, NULL, str2, &ret);
+    ok(hr == E_INVALIDARG, "IsEnumNamedValuePresent failed, hr %#lx.\n", hr);
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsEnumNamedValuePresent(statics, str, NULL, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsEnumNamedValuePresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsEnumNamedValuePresent returned TRUE.\n");
+
+#if 0 /* Crash on Windows */
+    hr = IApiInformationStatics_IsEnumNamedValuePresent(statics, str, str2, NULL);
+    ok(hr == E_INVALIDARG, "IsEnumNamedValuePresent failed, hr %#lx.\n", hr);
+#endif
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsEnumNamedValuePresent(statics, str, str2, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsEnumNamedValuePresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE, "IsEnumNamedValuePresent returned FALSE.\n");
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsEnumNamedValuePresent(statics, str, str, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsEnumNamedValuePresent failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsEnumNamedValuePresent returned TRUE.\n");
+
+    WindowsDeleteString(str2);
+    WindowsDeleteString(str);
+
+    /* IsApiContractPresentByMajor */
+    hr = WindowsCreateString(L"Windows.Foundation.FoundationContract",
+            wcslen(L"Windows.Foundation.FoundationContract"), &str);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+
+    hr = IApiInformationStatics_IsApiContractPresentByMajor(statics, NULL, 1, &ret);
+    ok(hr == E_INVALIDARG, "IsApiContractPresentByMajor failed, hr %#lx.\n", hr);
+
+#if 0 /* Crash on Windows */
+    hr = IApiInformationStatics_IsApiContractPresentByMajor(statics, str, 1, NULL);
+    ok(hr == E_INVALIDARG, "IsApiContractPresentByMajor failed, hr %#lx.\n", hr);
+#endif
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsApiContractPresentByMajor(statics, str, 1, &ret);
+    ok(hr == S_OK, "IsApiContractPresentByMajor failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE, "IsApiContractPresentByMajor returned FALSE.\n");
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsApiContractPresentByMajor(statics, str, 0, &ret);
+    ok(hr == S_OK, "IsApiContractPresentByMajor failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE, "IsApiContractPresentByMajor returned FALSE.\n");
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsApiContractPresentByMajor(statics, str, 999, &ret);
+    ok(hr == S_OK, "IsApiContractPresentByMajor failed, hr %#lx.\n", hr);
+    ok(ret == FALSE, "IsApiContractPresentByMajor returned TRUE.\n");
+
+    WindowsDeleteString(str);
+
+    /* IsApiContractPresentByMajorAndMinor */
+    hr = WindowsCreateString(L"Windows.Foundation.FoundationContract",
+            wcslen(L"Windows.Foundation.FoundationContract"), &str);
+    ok(hr == S_OK, "WindowsCreateString failed, hr %#lx.\n", hr);
+
+    hr = IApiInformationStatics_IsApiContractPresentByMajorAndMinor(statics, NULL, 1, 0, &ret);
+    ok(hr == E_INVALIDARG, "IsApiContractPresentByMajorAndMinor failed, hr %#lx.\n", hr);
+
+#if 0 /* Crash on Windows */
+    hr = IApiInformationStatics_IsApiContractPresentByMajorAndMinor(statics, str, 1, 0, NULL);
+    ok(hr == E_INVALIDARG, "IsApiContractPresentByMajorAndMinor failed, hr %#lx.\n", hr);
+#endif
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsApiContractPresentByMajorAndMinor(statics, str, 1, 0, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsApiContractPresentByMajorAndMinor failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE, "IsApiContractPresentByMajorAndMinor returned FALSE.\n");
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsApiContractPresentByMajorAndMinor(statics, str, 0, 999, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsApiContractPresentByMajorAndMinor failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE, "IsApiContractPresentByMajorAndMinor returned FALSE.\n");
+
+    ret = FALSE;
+    hr = IApiInformationStatics_IsApiContractPresentByMajorAndMinor(statics, str, 1, 999, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsApiContractPresentByMajorAndMinor failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == TRUE || broken(ret == FALSE) /* Win10 1507 */,
+            "IsApiContractPresentByMajorAndMinor returned FALSE.\n");
+
+    ret = TRUE;
+    hr = IApiInformationStatics_IsApiContractPresentByMajorAndMinor(statics, str, 999, 999, &ret);
+    todo_wine
+    ok(hr == S_OK, "IsApiContractPresentByMajorAndMinor failed, hr %#lx.\n", hr);
+    todo_wine
+    ok(ret == FALSE, "IsApiContractPresentByMajorAndMinor returned TRUE.\n");
+
+    WindowsDeleteString(str);
+
+    IApiInformationStatics_Release(statics);
+    IAgileObject_Release(agile_object);
+    IInspectable_Release(inspectable);
+    IActivationFactory_Release(factory);
+    RoUninitialize();
+}
+
+START_TEST(wintypes)
+{
+    test_IApiInformationStatics();
+}
-- 
2.32.0

[Rémi Bernon]

Signed-off-by: Rémi Bernon <rbernon(a)codeweavers.com>

[Alexandre Julliard]

Zhiyi Zhang <zzhang(a)codeweavers.com> writes:
> +    hr = IApiInformationStatics_IsTypePresent(statics, NULL, &ret);
> +    ok(hr == E_INVALIDARG, "IsTypePresent failed, hr %#lx.\n", hr);
> +
> +#if 0 /* Crash on Windows */
> +    hr = IApiInformationStatics_IsTypePresent(statics, str, NULL);
> +    ok(hr == E_INVALIDARG, "IsTypePresent failed, hr %#lx.\n", hr);
> +#endif

We usually prefer "if (0)" for that sort of things, so that the code can
still be compile checked.

-- 
Alexandre Julliard
julliard(a)winehq.org