dlls/mscoree/tests/mscoree.c

   1 /*
   2  * Copyright 2010 Louis Lenders
   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 #include "corerror.h"
  20 #include "mscoree.h"
  21 #include "wine/test.h"
  22
  23 static HMODULE hmscoree;
  24
  25 static HRESULT (WINAPI *pGetCORVersion)(LPWSTR, DWORD, DWORD*);
  26 static HRESULT (WINAPI *pGetCORSystemDirectory)(LPWSTR, DWORD, DWORD*);
  27 static HRESULT (WINAPI *pGetRequestedRuntimeInfo)(LPCWSTR, LPCWSTR, LPCWSTR, DWORD, DWORD, LPWSTR, DWORD, DWORD*, LPWSTR, DWORD, DWORD*);
  28
  29 static BOOL init_functionpointers(void)
  30 {
  31     hmscoree = LoadLibraryA("mscoree.dll");
  32
  33     if (!hmscoree)
  34     {
  35         win_skip("mscoree.dll not available\n");
  36         return FALSE;
  37     }
  38
  39     pGetCORVersion = (void *)GetProcAddress(hmscoree, "GetCORVersion");
  40     pGetCORSystemDirectory = (void *)GetProcAddress(hmscoree, "GetCORSystemDirectory");
  41     pGetRequestedRuntimeInfo = (void *)GetProcAddress(hmscoree, "GetRequestedRuntimeInfo");
  42
  43     if (!pGetCORVersion || !pGetCORSystemDirectory || !pGetRequestedRuntimeInfo)
  44     {
  45         win_skip("functions not available\n");
  46         FreeLibrary(hmscoree);
  47         return FALSE;
  48     }
  49
  50     return TRUE;
  51 }
  52
  53 static void test_versioninfo(void)
  54 {
  55     const WCHAR v2_0[] = {'v','2','.','0','.','5','0','7','2','7',0};
  56     const WCHAR v1_1[] = {'v','1','.','1','.','4','3','2','2',0};
  57
  58     WCHAR version[MAX_PATH];
  59     WCHAR path[MAX_PATH];
  60     DWORD size, path_len;
  61     HRESULT hr;
  62
  63     if (0)  /* crashes on <= w2k3 */
  64     {
  65         hr = pGetCORVersion(NULL, MAX_PATH, &size);
  66         ok(hr == E_POINTER,"GetCORVersion returned %08x\n", hr);
  67     }
  68
  69     hr =  pGetCORVersion(version, 1, &size);
  70     ok(hr == HRESULT_FROM_WIN32(ERROR_INSUFFICIENT_BUFFER),"GetCORVersion returned %08x\n", hr);
  71
  72     hr =  pGetCORVersion(version, MAX_PATH, &size);
  73     ok(hr == S_OK,"GetCORVersion returned %08x\n", hr);
  74
  75     trace("latest installed .net runtime: %s\n", wine_dbgstr_w(version));
  76
  77     hr = pGetCORSystemDirectory(path, MAX_PATH , &size);
  78     ok(hr == S_OK, "GetCORSystemDirectory returned %08x\n", hr);
  79     /* size includes terminating null-character */
  80     ok(size == (lstrlenW(path) + 1),"size is %d instead of %d\n", size, (lstrlenW(path) + 1));
  81
  82     path_len = size;
  83
  84     hr = pGetCORSystemDirectory(path, path_len-1 , &size);
  85     ok(hr == HRESULT_FROM_WIN32(ERROR_INSUFFICIENT_BUFFER), "GetCORSystemDirectory returned %08x\n", hr);
  86
  87     if (0)  /* crashes on <= w2k3 */
  88     {
  89         hr = pGetCORSystemDirectory(NULL, MAX_PATH , &size);
  90         ok(hr == HRESULT_FROM_WIN32(ERROR_INSUFFICIENT_BUFFER), "GetCORSystemDirectory returned %08x\n", hr);
  91     }
  92
  93     hr = pGetCORSystemDirectory(path, MAX_PATH , NULL);
  94     ok(hr == E_POINTER,"GetCORSystemDirectory returned %08x\n", hr);
  95
  96     trace("latest installed .net installed in directory: %s\n", wine_dbgstr_w(path));
  97
  98     /* test GetRequestedRuntimeInfo, first get info about different versions of runtime */
  99     hr = pGetRequestedRuntimeInfo( NULL, v2_0, NULL, 0, 0, path, MAX_PATH, &path_len, version, MAX_PATH, &size);
 100
 101     if(hr == CLR_E_SHIM_RUNTIME) return; /* skipping rest of tests on win2k as .net 2.0 not installed */
 102
 103     ok(hr == S_OK, "GetRequestedRuntimeInfo returned %08x\n", hr);
 104     trace(" installed in directory %s is .net version %s \n", wine_dbgstr_w(path), wine_dbgstr_w(version));
 105
 106     hr = pGetRequestedRuntimeInfo( NULL, v1_1, NULL, 0, 0, path, MAX_PATH, &path_len, version, MAX_PATH, &size);
 107     ok(hr == S_OK || CLR_E_SHIM_RUNTIME /*v1_1 not installed*/, "GetRequestedRuntimeInfo returned %08x\n", hr);
 108     if(hr == S_OK)
 109         trace(" installed in directory %s is .net version %s \n", wine_dbgstr_w(path), wine_dbgstr_w(version));
 110     /* version number NULL not allowed without RUNTIME_INFO_UPGRADE_VERSION flag */
 111     hr = pGetRequestedRuntimeInfo( NULL, NULL, NULL, 0, 0, path, MAX_PATH, &path_len, version, MAX_PATH, &size);
 112     ok(hr == CLR_E_SHIM_RUNTIME, "GetRequestedRuntimeInfo returned %08x\n", hr);
 113     /* with RUNTIME_INFO_UPGRADE_VERSION flag and version number NULL, latest installed version is returned */
 114     hr = pGetRequestedRuntimeInfo( NULL, NULL, NULL, 0, RUNTIME_INFO_UPGRADE_VERSION, path, MAX_PATH, &path_len, version, MAX_PATH, &size);
 115     ok(hr == S_OK, "GetRequestedRuntimeInfo returned %08x\n", hr);
 116
 117     hr = pGetRequestedRuntimeInfo( NULL, v2_0, NULL, 0, 0, path, 1, &path_len, version, MAX_PATH, &size);
 118     ok(hr == HRESULT_FROM_WIN32(ERROR_INSUFFICIENT_BUFFER), "GetRequestedRuntimeInfo returned %08x\n", hr);
 119
 120     /* if one of the buffers is NULL, the other one is still happily filled */
 121     memset(version, 0, sizeof(version));
 122     hr = pGetRequestedRuntimeInfo( NULL, v2_0, NULL, 0, 0, NULL, MAX_PATH, &path_len, version, MAX_PATH, &size);
 123     ok(hr == S_OK, "GetRequestedRuntimeInfo returned %08x\n", hr);
 124     ok(!lstrcmpW(version, v2_0), "version is %s , expected %s\n", wine_dbgstr_w(version), wine_dbgstr_w(v2_0));
 125     /* With NULL-pointer for bufferlength, the buffer itsself still gets filled with correct string */
 126     memset(version, 0, sizeof(version));
 127     hr = pGetRequestedRuntimeInfo( NULL, v2_0, NULL, 0, 0, path, MAX_PATH, &path_len, version, MAX_PATH, NULL);
 128     ok(hr == S_OK, "GetRequestedRuntimeInfo returned %08x\n", hr);
 129     ok(!lstrcmpW(version, v2_0), "version is %s , expected %s\n", wine_dbgstr_w(version), wine_dbgstr_w(v2_0));
 130 }
 131
 132 START_TEST(mscoree)
 133 {
 134     if (!init_functionpointers())
 135         return;
 136
 137     test_versioninfo();
 138
 139     FreeLibrary(hmscoree);
 140 }