mscoree/tests: Added some simple tests for GetCORVersion.

configure

@@ -14713,6 +14713,7 @@ wine_fn_config_dll mscat32 enable_mscat32
 wine_fn_config_dll mscms enable_mscms mscms
 wine_fn_config_test dlls/mscms/tests mscms_test
 wine_fn_config_dll mscoree enable_mscoree
+wine_fn_config_test dlls/mscoree/tests mscoree_test
 wine_fn_config_dll msctf enable_msctf
 wine_fn_config_test dlls/msctf/tests msctf_test
 wine_fn_config_dll msdaps enable_msdaps

configure.ac

@@ -2492,6 +2492,7 @@ WINE_CONFIG_DLL(mscat32)
 WINE_CONFIG_DLL(mscms,,[mscms])
 WINE_CONFIG_TEST(dlls/mscms/tests)
 WINE_CONFIG_DLL(mscoree)
+WINE_CONFIG_TEST(dlls/mscoree/tests)
 WINE_CONFIG_DLL(msctf)
 WINE_CONFIG_TEST(dlls/msctf/tests)
 WINE_CONFIG_DLL(msdaps)

dlls/mscoree/tests/Makefile.in

+TOPSRCDIR = @top_srcdir@
+TOPOBJDIR = ../../..
+SRCDIR    = @srcdir@
+VPATH     = @srcdir@
+TESTDLL   = mscoree.dll
+
+C_SRCS = \
+	mscoree.c
+
+@MAKE_TEST_RULES@

dlls/mscoree/tests/mscoree.c

+/*
+ * Copyright 2010 Louis Lenders
+ *
+ * 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
+ */
+
+#include "wine/test.h"
+
+static HMODULE hmscoree;
+
+static HRESULT (WINAPI *pGetCORVersion)(LPWSTR, DWORD, DWORD*);
+
+static BOOL init_functionpointers(void)
+{
+    hmscoree = LoadLibraryA("mscoree.dll");
+
+    if (!hmscoree)
+    {
+        win_skip("mscoree.dll not available\n");
+        return FALSE;
+    }
+
+    pGetCORVersion = (void *)GetProcAddress(hmscoree, "GetCORVersion");
+
+    if (!pGetCORVersion)
+    {
+        win_skip("functions not available\n");
+        FreeLibrary(hmscoree);
+        return FALSE;
+    }
+
+    return TRUE;
+}
+
+static void test_versioninfo(void)
+{
+    WCHAR version[MAX_PATH];
+    DWORD size;
+    HRESULT hr;
+
+    hr =  pGetCORVersion(NULL, MAX_PATH, &size);
+    todo_wine ok(hr == E_POINTER,"GetCORVersion returned %08x\n", hr);
+
+    hr =  pGetCORVersion(version, 1, &size);
+    todo_wine ok(hr == HRESULT_FROM_WIN32(ERROR_INSUFFICIENT_BUFFER),"GetCORVersion returned %08x\n", hr);
+
+    hr =  pGetCORVersion(version, MAX_PATH, &size);
+    ok(hr == S_OK,"GetCORVersion returned %08x\n", hr);
+
+    trace("latest installed .net runtime: %s\n", wine_dbgstr_w(version));
+}
+
+START_TEST(mscoree)
+{
+    if (!init_functionpointers())
+        return;
+
+    test_versioninfo();
+
+    FreeLibrary(hmscoree);
+}