dlls/kernel32/version.c

   1 /*
   2  * Windows and DOS version functions
   3  *
   4  * Copyright 1997 Marcus Meissner
   5  * Copyright 1998 Patrik Stridvall
   6  * Copyright 1998, 2003 Andreas Mohr
   7  * Copyright 1997, 2003 Alexandre Julliard
   8  *
   9  * This library is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Lesser General Public
  11  * License as published by the Free Software Foundation; either
  12  * version 2.1 of the License, or (at your option) any later version.
  13  *
  14  * This library is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Lesser General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Lesser General Public
  20  * License along with this library; if not, write to the Free Software
  21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  22  */
  23
  24 #include "config.h"
  25 #include "wine/port.h"
  26
  27 #include <string.h>
  28 #include <stdlib.h>
  29 #include <stdarg.h>
  30 #include <stdio.h>
  31 #include "ntstatus.h"
  32 #define WIN32_NO_STATUS
  33 #include "windef.h"
  34 #include "winbase.h"
  35 #include "wingdi.h"
  36 #include "winuser.h"
  37 #include "winternl.h"
  38 #include "winerror.h"
  39 #include "wine/unicode.h"
  40 #include "wine/debug.h"
  41
  42 WINE_DEFAULT_DEBUG_CHANNEL(ver);
  43
  44
  45 static inline UCHAR version_update_condition(UCHAR *last_condition, UCHAR condition)
  46 {
  47     switch (*last_condition)
  48     {
  49         case 0:
  50             *last_condition = condition;
  51             break;
  52         case VER_EQUAL:
  53             if (condition >= VER_EQUAL && condition <= VER_LESS_EQUAL)
  54             {
  55                 *last_condition = condition;
  56                 return condition;
  57             }
  58             break;
  59         case VER_GREATER:
  60         case VER_GREATER_EQUAL:
  61             if (condition >= VER_EQUAL && condition <= VER_GREATER_EQUAL)
  62                 return condition;
  63             break;
  64         case VER_LESS:
  65         case VER_LESS_EQUAL:
  66             if (condition == VER_EQUAL || (condition >= VER_LESS && condition <= VER_LESS_EQUAL))
  67                 return condition;
  68             break;
  69     }
  70     if (!condition) *last_condition |= 0x10;
  71     return *last_condition & 0xf;
  72 }
  73
  74 static inline BOOL version_compare_values(ULONG left, ULONG right, UCHAR condition)
  75 {
  76     switch (condition)
  77     {
  78         case VER_EQUAL:
  79             if (left != right) return FALSE;
  80             break;
  81         case VER_GREATER:
  82             if (left <= right) return FALSE;
  83             break;
  84         case VER_GREATER_EQUAL:
  85             if (left < right) return FALSE;
  86             break;
  87         case VER_LESS:
  88             if (left >= right) return FALSE;
  89             break;
  90         case VER_LESS_EQUAL:
  91             if (left > right) return FALSE;
  92             break;
  93         default:
  94             return FALSE;
  95     }
  96     return TRUE;
  97 }
  98
  99
 100 /******************************************************************************
 101  *        VerifyVersionInfoA   (KERNEL32.@)
 102  */
 103 BOOL WINAPI VerifyVersionInfoA( LPOSVERSIONINFOEXA lpVersionInfo, DWORD dwTypeMask,
 104                                 DWORDLONG dwlConditionMask)
 105 {
 106     OSVERSIONINFOEXW verW;
 107
 108     verW.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEXW);
 109     verW.dwMajorVersion = lpVersionInfo->dwMajorVersion;
 110     verW.dwMinorVersion = lpVersionInfo->dwMinorVersion;
 111     verW.dwBuildNumber = lpVersionInfo->dwBuildNumber;
 112     verW.dwPlatformId = lpVersionInfo->dwPlatformId;
 113     verW.wServicePackMajor = lpVersionInfo->wServicePackMajor;
 114     verW.wServicePackMinor = lpVersionInfo->wServicePackMinor;
 115     verW.wSuiteMask = lpVersionInfo->wSuiteMask;
 116     verW.wProductType = lpVersionInfo->wProductType;
 117     verW.wReserved = lpVersionInfo->wReserved;
 118
 119     return VerifyVersionInfoW(&verW, dwTypeMask, dwlConditionMask);
 120 }
 121
 122
 123 /******************************************************************************
 124  *        VerifyVersionInfoW   (KERNEL32.@)
 125  */
 126 BOOL WINAPI VerifyVersionInfoW( LPOSVERSIONINFOEXW info, DWORD dwTypeMask,
 127                                 DWORDLONG dwlConditionMask)
 128 {
 129     OSVERSIONINFOEXW ver;
 130
 131     TRACE("(%p 0x%x 0x%s)\n", info, dwTypeMask, wine_dbgstr_longlong(dwlConditionMask));
 132
 133     ver.dwOSVersionInfoSize = sizeof(ver);
 134     if (!GetVersionExW((OSVERSIONINFOW*)&ver)) return FALSE;
 135
 136     if (!dwTypeMask || !dwlConditionMask)
 137     {
 138         SetLastError(ERROR_BAD_ARGUMENTS);
 139         return FALSE;
 140     }
 141
 142     if (dwTypeMask & VER_PRODUCT_TYPE)
 143     {
 144         if (!version_compare_values(ver.wProductType, info->wProductType, dwlConditionMask >> 7*3 & 0x07))
 145             goto mismatch;
 146     }
 147     if (dwTypeMask & VER_SUITENAME)
 148         switch (dwlConditionMask >> 6*3 & 0x07)
 149         {
 150             case VER_AND:
 151                 if ((info->wSuiteMask & ver.wSuiteMask) != info->wSuiteMask)
 152                     goto mismatch;
 153                 break;
 154             case VER_OR:
 155                 if (!(info->wSuiteMask & ver.wSuiteMask) && info->wSuiteMask)
 156                     goto mismatch;
 157                 break;
 158             default:
 159                 SetLastError(ERROR_BAD_ARGUMENTS);
 160                 return FALSE;
 161         }
 162     if (dwTypeMask & VER_PLATFORMID)
 163     {
 164         if (!version_compare_values(ver.dwPlatformId, info->dwPlatformId, dwlConditionMask >> 3*3 & 0x07))
 165             goto mismatch;
 166     }
 167     if (dwTypeMask & VER_BUILDNUMBER)
 168     {
 169         if (!version_compare_values(ver.dwBuildNumber, info->dwBuildNumber, dwlConditionMask >> 2*3 & 0x07))
 170             goto mismatch;
 171     }
 172
 173     if (dwTypeMask & (VER_MAJORVERSION | VER_MINORVERSION | VER_SERVICEPACKMAJOR | VER_SERVICEPACKMINOR))
 174     {
 175         unsigned char condition, last_condition = 0;
 176         BOOL succeeded = TRUE, do_next_check = TRUE;
 177
 178         if (dwTypeMask & VER_MAJORVERSION)
 179         {
 180             condition = version_update_condition(&last_condition, dwlConditionMask >> 1*3 & 0x07);
 181             succeeded = version_compare_values(ver.dwMajorVersion, info->dwMajorVersion, condition);
 182             do_next_check = (ver.dwMajorVersion == info->dwMajorVersion) &&
 183                 ((condition >= VER_EQUAL) && (condition <= VER_LESS_EQUAL));
 184         }
 185         if ((dwTypeMask & VER_MINORVERSION) && do_next_check)
 186         {
 187             condition = version_update_condition(&last_condition, dwlConditionMask >> 0*3 & 0x07);
 188             succeeded = version_compare_values(ver.dwMinorVersion, info->dwMinorVersion, condition);
 189             do_next_check = (ver.dwMinorVersion == info->dwMinorVersion) &&
 190                 ((condition >= VER_EQUAL) && (condition <= VER_LESS_EQUAL));
 191         }
 192         if ((dwTypeMask & VER_SERVICEPACKMAJOR) && do_next_check)
 193         {
 194             condition = version_update_condition(&last_condition, dwlConditionMask >> 5*3 & 0x07);
 195             succeeded = version_compare_values(ver.wServicePackMajor, info->wServicePackMajor, condition);
 196             do_next_check = (ver.wServicePackMajor == info->wServicePackMajor) &&
 197                 ((condition >= VER_EQUAL) && (condition <= VER_LESS_EQUAL));
 198         }
 199         if ((dwTypeMask & VER_SERVICEPACKMINOR) && do_next_check)
 200         {
 201             condition = version_update_condition(&last_condition, dwlConditionMask >> 4*3 & 0x07);
 202             succeeded = version_compare_values(ver.wServicePackMinor, info->wServicePackMinor, condition);
 203         }
 204
 205         if (!succeeded) goto mismatch;
 206     }
 207
 208     return TRUE;
 209
 210 mismatch:
 211     SetLastError(ERROR_OLD_WIN_VERSION);
 212     return FALSE;
 213 }
 214
 215 /***********************************************************************
 216  *           TermsrvAppInstallMode       (KERNEL32.@)
 217  *
 218  * Find out whether the terminal server is in INSTALL or EXECUTE mode.
 219  */
 220 BOOL WINAPI TermsrvAppInstallMode(void)
 221 {
 222     FIXME("stub\n");
 223     return FALSE;
 224 }
 225
 226 /***********************************************************************
 227  *           SetTermsrvAppInstallMode       (KERNEL32.@)
 228  *
 229  * This function is said to switch between the INSTALL (TRUE) or
 230  * EXECUTE (FALSE) terminal server modes.
 231  *
 232  * This function always returns zero on WinXP Home so it's probably
 233  * safe to return that value in most cases. However, if a terminal
 234  * server is running it will probably return something else.
 235  */
 236 DWORD WINAPI SetTermsrvAppInstallMode(BOOL bInstallMode)
 237 {
 238     FIXME("(%d): stub\n", bInstallMode);
 239     return 0;
 240 }
 241
 242 /***********************************************************************
 243  *           GetCurrentPackageId       (KERNEL32.@)
 244  */
 245 LONG WINAPI GetCurrentPackageId(UINT32 *len, BYTE *buffer)
 246 {
 247     FIXME("(%p %p): stub\n", len, buffer);
 248     return APPMODEL_ERROR_NO_PACKAGE;
 249 }
 250
 251 /***********************************************************************
 252  *           GetCurrentPackageFamilyName       (KERNEL32.@)
 253  */
 254 LONG WINAPI GetCurrentPackageFamilyName(UINT32 *length, PWSTR name)
 255 {
 256     FIXME("(%p %p): stub\n", length, name);
 257     return APPMODEL_ERROR_NO_PACKAGE;
 258 }
 259
 260 /***********************************************************************
 261  *           GetCurrentPackageFullName       (KERNEL32.@)
 262  */
 263 LONG WINAPI GetCurrentPackageFullName(UINT32 *length, PWSTR name)
 264 {
 265     FIXME("(%p %p): stub\n", length, name);
 266     return APPMODEL_ERROR_NO_PACKAGE;
 267 }
 268
 269 /***********************************************************************
 270  *           GetPackageFullName       (KERNEL32.@)
 271  */
 272 LONG WINAPI GetPackageFullName(HANDLE process, UINT32 *length, PWSTR name)
 273 {
 274     FIXME("(%p %p %p): stub\n", process, length, name);
 275     return APPMODEL_ERROR_NO_PACKAGE;
 276 }