git.oblomov.eu Git - wine/blob - dlls/ntdll/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 "wine/unicode.h"
  35 #include "wine/debug.h"
  36 #include "ntdll_misc.h"
  37
  38 WINE_DEFAULT_DEBUG_CHANNEL(ver);
  39
  40 typedef enum
  41 {
  42     WIN20,   /* Windows 2.0 */
  43     WIN30,   /* Windows 3.0 */
  44     WIN31,   /* Windows 3.1 */
  45     WIN95,   /* Windows 95 */
  46     WIN98,   /* Windows 98 */
  47     WINME,   /* Windows Me */
  48     NT351,   /* Windows NT 3.51 */
  49     NT40,    /* Windows NT 4.0 */
  50     NT2K,    /* Windows 2000 */
  51     WINXP,   /* Windows XP */
  52     WIN2K3,  /* Windows 2003 */
  53     NB_WINDOWS_VERSIONS
  54 } WINDOWS_VERSION;
  55
  56 /* FIXME: compare values below with original and fix.
  57  * An *excellent* win9x version page (ALL versions !)
  58  * can be found at www.mdgx.com/ver.htm */
  59 static const RTL_OSVERSIONINFOEXW VersionData[NB_WINDOWS_VERSIONS] =
  60 {
  61     /* WIN20 FIXME: verify values */
  62     {
  63         sizeof(RTL_OSVERSIONINFOEXW), 2, 0, 0, VER_PLATFORM_WIN32s,
  64         {'W','i','n','3','2','s',' ','1','.','3',0},
  65         0, 0, 0, 0, 0
  66     },
  67     /* WIN30 FIXME: verify values */
  68     {
  69         sizeof(RTL_OSVERSIONINFOEXW), 3, 0, 0, VER_PLATFORM_WIN32s,
  70         {'W','i','n','3','2','s',' ','1','.','3',0},
  71         0, 0, 0, 0, 0
  72     },
  73     /* WIN31 */
  74     {
  75         sizeof(RTL_OSVERSIONINFOEXW), 3, 10, 0, VER_PLATFORM_WIN32s,
  76         {'W','i','n','3','2','s',' ','1','.','3',0},
  77         0, 0, 0, 0, 0
  78     },
  79     /* WIN95 */
  80     {
  81         /* Win95:       4, 0, 0x40003B6, ""
  82          * Win95sp1:    4, 0, 0x40003B6, " A " (according to doc)
  83          * Win95osr2:   4, 0, 0x4000457, " B " (according to doc)
  84          * Win95osr2.1: 4, 3, 0x40304BC, " B " (according to doc)
  85          * Win95osr2.5: 4, 3, 0x40304BE, " C " (according to doc)
  86          * Win95a/b can be discerned via regkey SubVersionNumber
  87          * See also:
  88          * http://support.microsoft.com/support/kb/articles/q158/2/38.asp
  89          */
  90         sizeof(RTL_OSVERSIONINFOEXW), 4, 0, 0x40003B6, VER_PLATFORM_WIN32_WINDOWS,
  91         {0},
  92         0, 0, 0, 0, 0
  93     },
  94     /* WIN98 (second edition) */
  95     {
  96         /* Win98:   4, 10, 0x40A07CE, " "   4.10.1998
  97          * Win98SE: 4, 10, 0x40A08AE, " A " 4.10.2222
  98          */
  99         sizeof(RTL_OSVERSIONINFOEXW), 4, 10, 0x40A08AE, VER_PLATFORM_WIN32_WINDOWS,
 100         {' ','A',' ',0},
 101         0, 0, 0, 0, 0
 102     },
 103     /* WINME */
 104     {
 105         sizeof(RTL_OSVERSIONINFOEXW), 4, 90, 0x45A0BB8, VER_PLATFORM_WIN32_WINDOWS,
 106         {' ',0},
 107         0, 0, 0, 0, 0
 108     },
 109     /* NT351 */
 110     {
 111         sizeof(RTL_OSVERSIONINFOEXW), 3, 51, 0x421, VER_PLATFORM_WIN32_NT,
 112         {'S','e','r','v','i','c','e',' ','P','a','c','k',' ','2',0},
 113         0, 0, 0, 0, 0
 114     },
 115     /* NT40 */
 116     {
 117         sizeof(RTL_OSVERSIONINFOEXW), 4, 0, 0x565, VER_PLATFORM_WIN32_NT,
 118         {'S','e','r','v','i','c','e',' ','P','a','c','k',' ','6','a',0},
 119         6, 0, 0, VER_NT_WORKSTATION, 0
 120     },
 121     /* NT2K */
 122     {
 123         sizeof(RTL_OSVERSIONINFOEXW), 5, 0, 0x893, VER_PLATFORM_WIN32_NT,
 124         {'S','e','r','v','i','c','e',' ','P','a','c','k',' ','4',0},
 125         4, 0, 0, VER_NT_WORKSTATION, 30 /* FIXME: Great, a reserved field with a value! */
 126     },
 127     /* WINXP */
 128     {
 129         sizeof(RTL_OSVERSIONINFOEXW), 5, 1, 0xA28, VER_PLATFORM_WIN32_NT,
 130         {'S','e','r','v','i','c','e',' ','P','a','c','k',' ','2',0},
 131         2, 0, VER_SUITE_SINGLEUSERTS, VER_NT_WORKSTATION, 30 /* FIXME: Great, a reserved field with a value! */
 132     },
 133     /* WIN2K3 */
 134     {
 135         sizeof(RTL_OSVERSIONINFOEXW), 5, 2, 0xECE, VER_PLATFORM_WIN32_NT,
 136         {'S','e','r','v','i','c','e',' ','P','a','c','k',' ','1',0},
 137         1, 0, VER_SUITE_SINGLEUSERTS, VER_NT_SERVER, 0
 138     }
 139 };
 140
 141 static const char * const WinVersionNames[NB_WINDOWS_VERSIONS] =
 142 { /* no spaces in here ! */
 143     "win20",                      /* WIN20 */
 144     "win30",                      /* WIN30 */
 145     "win31",                      /* WIN31 */
 146     "win95",                      /* WIN95 */
 147     "win98",                      /* WIN98 */
 148     "winme",                      /* WINME */
 149     "nt351",                      /* NT351 */
 150     "nt40",                       /* NT40 */
 151     "win2000,win2k,nt2k,nt2000",  /* NT2K */
 152     "winxp",                      /* WINXP */
 153     "win2003,win2k3"              /* WIN2K3 */
 154 };
 155
 156
 157 /* initialized to null so that we crash if we try to retrieve the version too early at startup */
 158 static const RTL_OSVERSIONINFOEXW *current_version;
 159
 160
 161 /**********************************************************************
 162  *         get_nt_registry_version
 163  *
 164  * Fetch the version information from the NT-style registry keys.
 165  */
 166 static BOOL get_nt_registry_version( RTL_OSVERSIONINFOEXW *version )
 167 {
 168     static const WCHAR version_keyW[] = {'M','a','c','h','i','n','e','\\',
 169                                          'S','o','f','t','w','a','r','e','\\',
 170                                          'M','i','c','r','o','s','o','f','t','\\',
 171                                          'W','i','n','d','o','w','s',' ','N','T','\\',
 172                                          'C','u','r','r','e','n','t','V','e','r','s','i','o','n',0};
 173     static const WCHAR service_pack_keyW[] = {'M','a','c','h','i','n','e','\\',
 174                                               'S','y','s','t','e','m','\\',
 175                                               'C','u','r','r','e','n','t','C','o','n','t','r','o','l','S','e','t','\\',
 176                                               'C','o','n','t','r','o','l','\\',
 177                                               'W','i','n','d','o','w','s',0};
 178     static const WCHAR product_keyW[] = {'M','a','c','h','i','n','e','\\',
 179                                          'S','y','s','t','e','m','\\',
 180                                          'C','u','r','r','e','n','t','C','o','n','t','r','o','l','S','e','t','\\',
 181                                          'C','o','n','t','r','o','l','\\',
 182                                          'P','r','o','d','u','c','t','O','p','t','i','o','n','s',0};
 183     static const WCHAR CurrentBuildNumberW[] = {'C','u','r','r','e','n','t','B','u','i','l','d','N','u','m','b','e','r',0};
 184     static const WCHAR CSDVersionW[] = {'C','S','D','V','e','r','s','i','o','n',0};
 185     static const WCHAR CurrentVersionW[] = {'C','u','r','r','e','n','t','V','e','r','s','i','o','n',0};
 186     static const WCHAR ProductTypeW[] = {'P','r','o','d','u','c','t','T','y','p','e',0};
 187     static const WCHAR WinNTW[]    = {'W','i','n','N','T',0};
 188     static const WCHAR ServerNTW[] = {'S','e','r','v','e','r','N','T',0};
 189     static const WCHAR LanmanNTW[] = {'L','a','n','m','a','n','N','T',0};
 190
 191     OBJECT_ATTRIBUTES attr;
 192     UNICODE_STRING nameW, valueW;
 193     HANDLE hkey, hkey2;
 194     char tmp[64];
 195     DWORD count;
 196     BOOL ret = FALSE;
 197     KEY_VALUE_PARTIAL_INFORMATION *info = (KEY_VALUE_PARTIAL_INFORMATION *)tmp;
 198
 199     attr.Length = sizeof(attr);
 200     attr.RootDirectory = 0;
 201     attr.ObjectName = &nameW;
 202     attr.Attributes = 0;
 203     attr.SecurityDescriptor = NULL;
 204     attr.SecurityQualityOfService = NULL;
 205     RtlInitUnicodeString( &nameW, version_keyW );
 206
 207     if (NtOpenKey( &hkey, KEY_ALL_ACCESS, &attr )) return FALSE;
 208
 209     memset( version, 0, sizeof(*version) );
 210
 211     RtlInitUnicodeString( &valueW, CurrentVersionW );
 212     if (!NtQueryValueKey( hkey, &valueW, KeyValuePartialInformation, tmp, sizeof(tmp)-1, &count ))
 213     {
 214         WCHAR *p, *str = (WCHAR *)info->Data;
 215         str[info->DataLength / sizeof(WCHAR)] = 0;
 216         p = strchrW( str, '.' );
 217         if (p)
 218         {
 219             *p++ = 0;
 220             version->dwMinorVersion = atoiW( p );
 221         }
 222         version->dwMajorVersion = atoiW( str );
 223     }
 224
 225     if (version->dwMajorVersion)   /* we got the main version, now fetch the other fields */
 226     {
 227         ret = TRUE;
 228         version->dwPlatformId = VER_PLATFORM_WIN32_NT;
 229
 230         /* get build number */
 231
 232         RtlInitUnicodeString( &valueW, CurrentBuildNumberW );
 233         if (!NtQueryValueKey( hkey, &valueW, KeyValuePartialInformation, tmp, sizeof(tmp)-1, &count ))
 234         {
 235             WCHAR *str = (WCHAR *)info->Data;
 236             str[info->DataLength / sizeof(WCHAR)] = 0;
 237             version->dwBuildNumber = atoiW( str );
 238         }
 239
 240         /* get version description */
 241
 242         RtlInitUnicodeString( &valueW, CSDVersionW );
 243         if (!NtQueryValueKey( hkey, &valueW, KeyValuePartialInformation, tmp, sizeof(tmp)-1, &count ))
 244         {
 245             DWORD len = min( info->DataLength, sizeof(version->szCSDVersion) - sizeof(WCHAR) );
 246             memcpy( version->szCSDVersion, info->Data, len );
 247             version->szCSDVersion[len / sizeof(WCHAR)] = 0;
 248         }
 249
 250         /* get service pack version */
 251
 252         RtlInitUnicodeString( &nameW, service_pack_keyW );
 253         if (!NtOpenKey( &hkey2, KEY_ALL_ACCESS, &attr ))
 254         {
 255             RtlInitUnicodeString( &valueW, CSDVersionW );
 256             if (!NtQueryValueKey( hkey2, &valueW, KeyValuePartialInformation, tmp, sizeof(tmp), &count ))
 257             {
 258                 if (info->DataLength >= sizeof(DWORD))
 259                 {
 260                     DWORD dw = *(DWORD *)info->Data;
 261                     version->wServicePackMajor = LOWORD(dw) >> 8;
 262                     version->wServicePackMinor = LOWORD(dw) & 0xff;
 263                 }
 264             }
 265             NtClose( hkey2 );
 266         }
 267
 268         /* get product type */
 269
 270         RtlInitUnicodeString( &nameW, product_keyW );
 271         if (!NtOpenKey( &hkey2, KEY_ALL_ACCESS, &attr ))
 272         {
 273             RtlInitUnicodeString( &valueW, ProductTypeW );
 274             if (!NtQueryValueKey( hkey2, &valueW, KeyValuePartialInformation, tmp, sizeof(tmp)-1, &count ))
 275             {
 276                 WCHAR *str = (WCHAR *)info->Data;
 277                 str[info->DataLength / sizeof(WCHAR)] = 0;
 278                 if (!strcmpiW( str, WinNTW )) version->wProductType = VER_NT_WORKSTATION;
 279                 else if (!strcmpiW( str, LanmanNTW )) version->wProductType = VER_NT_DOMAIN_CONTROLLER;
 280                 else if (!strcmpiW( str, ServerNTW )) version->wProductType = VER_NT_SERVER;
 281             }
 282             NtClose( hkey2 );
 283         }
 284
 285         /* FIXME: get wSuiteMask */
 286     }
 287
 288     NtClose( hkey );
 289     return ret;
 290 }
 291
 292
 293 /**********************************************************************
 294  *         get_win9x_registry_version
 295  *
 296  * Fetch the version information from the Win9x-style registry keys.
 297  */
 298 static BOOL get_win9x_registry_version( RTL_OSVERSIONINFOEXW *version )
 299 {
 300     static const WCHAR version_keyW[] = {'M','a','c','h','i','n','e','\\',
 301                                          'S','o','f','t','w','a','r','e','\\',
 302                                          'M','i','c','r','o','s','o','f','t','\\',
 303                                          'W','i','n','d','o','w','s','\\',
 304                                          'C','u','r','r','e','n','t','V','e','r','s','i','o','n',0};
 305     static const WCHAR VersionNumberW[] = {'V','e','r','s','i','o','n','N','u','m','b','e','r',0};
 306     static const WCHAR SubVersionNumberW[] = {'S','u','b','V','e','r','s','i','o','n','N','u','m','b','e','r',0};
 307
 308     OBJECT_ATTRIBUTES attr;
 309     UNICODE_STRING nameW, valueW;
 310     HANDLE hkey;
 311     char tmp[64];
 312     DWORD count;
 313     BOOL ret = FALSE;
 314     KEY_VALUE_PARTIAL_INFORMATION *info = (KEY_VALUE_PARTIAL_INFORMATION *)tmp;
 315
 316     attr.Length = sizeof(attr);
 317     attr.RootDirectory = 0;
 318     attr.ObjectName = &nameW;
 319     attr.Attributes = 0;
 320     attr.SecurityDescriptor = NULL;
 321     attr.SecurityQualityOfService = NULL;
 322     RtlInitUnicodeString( &nameW, version_keyW );
 323
 324     if (NtOpenKey( &hkey, KEY_ALL_ACCESS, &attr )) return FALSE;
 325
 326     memset( version, 0, sizeof(*version) );
 327
 328     RtlInitUnicodeString( &valueW, VersionNumberW );
 329     if (!NtQueryValueKey( hkey, &valueW, KeyValuePartialInformation, tmp, sizeof(tmp)-1, &count ))
 330     {
 331         WCHAR *p, *str = (WCHAR *)info->Data;
 332         str[info->DataLength / sizeof(WCHAR)] = 0;
 333         p = strchrW( str, '.' );
 334         if (p) *p++ = 0;
 335         version->dwMajorVersion = atoiW( str );
 336         if (p)
 337         {
 338             str = p;
 339             p = strchrW( str, '.' );
 340             if (p)
 341             {
 342                 *p++ = 0;
 343                 version->dwBuildNumber = atoiW( p );
 344             }
 345             version->dwMinorVersion = atoiW( str );
 346         }
 347         /* build number contains version too on Win9x */
 348         version->dwBuildNumber |= MAKEWORD( version->dwMinorVersion, version->dwMajorVersion ) << 16;
 349     }
 350
 351     if (version->dwMajorVersion)   /* we got the main version, now fetch the other fields */
 352     {
 353         ret = TRUE;
 354         version->dwPlatformId = VER_PLATFORM_WIN32_WINDOWS;
 355
 356         RtlInitUnicodeString( &valueW, SubVersionNumberW );
 357         if (!NtQueryValueKey( hkey, &valueW, KeyValuePartialInformation, tmp, sizeof(tmp)-1, &count ))
 358         {
 359             DWORD len = min( info->DataLength, sizeof(version->szCSDVersion) - sizeof(WCHAR) );
 360             memcpy( version->szCSDVersion, info->Data, len );
 361             version->szCSDVersion[len / sizeof(WCHAR)] = 0;
 362         }
 363     }
 364
 365     NtClose( hkey );
 366     return ret;
 367 }
 368
 369
 370 /**********************************************************************
 371  *         parse_win_version
 372  *
 373  * Parse the contents of the Version key.
 374  */
 375 static BOOL parse_win_version( HANDLE hkey )
 376 {
 377     static const WCHAR VersionW[] = {'V','e','r','s','i','o','n',0};
 378
 379     UNICODE_STRING valueW;
 380     char tmp[64], buffer[50];
 381     KEY_VALUE_PARTIAL_INFORMATION *info = (KEY_VALUE_PARTIAL_INFORMATION *)tmp;
 382     DWORD count, len;
 383     int i;
 384
 385     RtlInitUnicodeString( &valueW, VersionW );
 386     if (NtQueryValueKey( hkey, &valueW, KeyValuePartialInformation, tmp, sizeof(tmp), &count ))
 387         return FALSE;
 388
 389     RtlUnicodeToMultiByteN( buffer, sizeof(buffer)-1, &len, (WCHAR *)info->Data, info->DataLength );
 390     buffer[len] = 0;
 391
 392     for (i = 0; i < NB_WINDOWS_VERSIONS; i++)
 393     {
 394         const char *p, *pCurr = WinVersionNames[i];
 395         /* iterate through all winver aliases separated by comma */
 396         do {
 397             p = strchr(pCurr, ',');
 398             len = p ? p - pCurr : strlen(pCurr);
 399             if ( (!strncmp( pCurr, buffer, len )) && (buffer[len] == 0) )
 400             {
 401                 current_version = &VersionData[i];
 402                 TRACE( "got win version %s\n", WinVersionNames[i] );
 403                 return TRUE;
 404             }
 405             pCurr = p+1;
 406         } while (p);
 407     }
 408
 409     MESSAGE("Invalid Windows version value '%s' specified in config file.\n", buffer );
 410     MESSAGE("Valid versions are:" );
 411     for (i = 0; i < NB_WINDOWS_VERSIONS; i++)
 412     {
 413         /* only list the first, "official" alias in case of aliases */
 414         const char *pCurr = WinVersionNames[i];
 415         const char *p = strchr(pCurr, ',');
 416         len = (p) ? p - pCurr : strlen(pCurr);
 417
 418         MESSAGE(" '%.*s'%c", (int)len, pCurr, (i == NB_WINDOWS_VERSIONS - 1) ? '\n' : ',' );
 419     }
 420     return FALSE;
 421 }
 422
 423
 424 /**********************************************************************
 425  *         version_init
 426  */
 427 void version_init( const WCHAR *appname )
 428 {
 429     static const WCHAR configW[] = {'S','o','f','t','w','a','r','e','\\','W','i','n','e',0};
 430     static const WCHAR appdefaultsW[] = {'A','p','p','D','e','f','a','u','l','t','s','\\',0};
 431
 432     OBJECT_ATTRIBUTES attr;
 433     UNICODE_STRING nameW;
 434     HANDLE root, hkey, config_key;
 435     BOOL got_win_ver = FALSE;
 436
 437     current_version = &VersionData[NT2K];  /* default if nothing else is specified */
 438
 439     RtlOpenCurrentUser( KEY_ALL_ACCESS, &root );
 440     attr.Length = sizeof(attr);
 441     attr.RootDirectory = root;
 442     attr.ObjectName = &nameW;
 443     attr.Attributes = 0;
 444     attr.SecurityDescriptor = NULL;
 445     attr.SecurityQualityOfService = NULL;
 446     RtlInitUnicodeString( &nameW, configW );
 447
 448     /* @@ Wine registry key: HKCU\Software\Wine */
 449     if (NtOpenKey( &config_key, KEY_ALL_ACCESS, &attr )) config_key = 0;
 450     NtClose( root );
 451     if (!config_key) goto done;
 452
 453     /* open AppDefaults\\appname key */
 454     if (appname && *appname)
 455     {
 456         const WCHAR *p;
 457         WCHAR appversion[MAX_PATH+20];
 458
 459         if ((p = strrchrW( appname, '/' ))) appname = p + 1;
 460         if ((p = strrchrW( appname, '\\' ))) appname = p + 1;
 461
 462         strcpyW( appversion, appdefaultsW );
 463         strcatW( appversion, appname );
 464         RtlInitUnicodeString( &nameW, appversion );
 465         attr.RootDirectory = config_key;
 466
 467         /* @@ Wine registry key: HKCU\Software\Wine\AppDefaults\app.exe */
 468         if (!NtOpenKey( &hkey, KEY_ALL_ACCESS, &attr ))
 469         {
 470             TRACE( "getting version from %s\n", debugstr_w(appversion) );
 471             got_win_ver = parse_win_version( hkey );
 472             NtClose( hkey );
 473         }
 474     }
 475
 476     if (!got_win_ver)
 477     {
 478         TRACE( "getting default version\n" );
 479         got_win_ver = parse_win_version( config_key );
 480     }
 481     NtClose( config_key );
 482
 483 done:
 484     if (!got_win_ver)
 485     {
 486         static RTL_OSVERSIONINFOEXW registry_version;
 487
 488         TRACE( "getting registry version\n" );
 489         if (get_nt_registry_version( &registry_version ) ||
 490             get_win9x_registry_version( &registry_version ))
 491             current_version = &registry_version;
 492     }
 493
 494
 495     NtCurrentTeb()->Peb->OSMajorVersion = current_version->dwMajorVersion;
 496     NtCurrentTeb()->Peb->OSMinorVersion = current_version->dwMinorVersion;
 497     NtCurrentTeb()->Peb->OSBuildNumber  = current_version->dwBuildNumber;
 498     NtCurrentTeb()->Peb->OSPlatformId   = current_version->dwPlatformId;
 499
 500     TRACE( "got %d.%d plaform %d build %x name %s service pack %d.%d product %d\n",
 501            current_version->dwMajorVersion, current_version->dwMinorVersion,
 502            current_version->dwPlatformId, current_version->dwBuildNumber,
 503            debugstr_w(current_version->szCSDVersion),
 504            current_version->wServicePackMajor, current_version->wServicePackMinor,
 505            current_version->wProductType );
 506 }
 507
 508
 509 /***********************************************************************
 510  *         RtlGetVersion   (NTDLL.@)
 511  */
 512 NTSTATUS WINAPI RtlGetVersion( RTL_OSVERSIONINFOEXW *info )
 513 {
 514     info->dwMajorVersion = current_version->dwMajorVersion;
 515     info->dwMinorVersion = current_version->dwMinorVersion;
 516     info->dwBuildNumber  = current_version->dwBuildNumber;
 517     info->dwPlatformId   = current_version->dwPlatformId;
 518     strcpyW( info->szCSDVersion, current_version->szCSDVersion );
 519     if(info->dwOSVersionInfoSize == sizeof(RTL_OSVERSIONINFOEXW))
 520     {
 521         info->wServicePackMajor = current_version->wServicePackMajor;
 522         info->wServicePackMinor = current_version->wServicePackMinor;
 523         info->wSuiteMask        = current_version->wSuiteMask;
 524         info->wProductType      = current_version->wProductType;
 525     }
 526     return STATUS_SUCCESS;
 527 }
 528
 529
 530 /******************************************************************************
 531  *  RtlGetNtVersionNumbers   (NTDLL.@)
 532  *
 533  * Get the version numbers of the run time library.
 534  *
 535  * PARAMS
 536  *  major [O] Destination for the Major version
 537  *  minor [O] Destination for the Minor version
 538  *  build [O] Destination for the Build version
 539  *
 540  * RETURNS
 541  *  Nothing.
 542  *
 543  * NOTES
 544  * Introduced in Windows XP (NT5.1)
 545  */
 546 void WINAPI RtlGetNtVersionNumbers( LPDWORD major, LPDWORD minor, LPDWORD build )
 547 {
 548     if (major) *major = current_version->dwMajorVersion;
 549     if (minor) *minor = current_version->dwMinorVersion;
 550     /* FIXME: Does anybody know the real formula? */
 551     if (build) *build = (0xF0000000 | current_version->dwBuildNumber);
 552 }
 553
 554
 555 /******************************************************************************
 556  *  RtlGetNtProductType   (NTDLL.@)
 557  */
 558 BOOLEAN WINAPI RtlGetNtProductType( LPDWORD type )
 559 {
 560     if (type) *type = current_version->wProductType;
 561     return TRUE;
 562 }
 563
 564
 565 static inline NTSTATUS version_compare_values(ULONG left, ULONG right, UCHAR condition)
 566 {
 567     switch (condition) {
 568         case VER_EQUAL:
 569             if (left != right) return STATUS_REVISION_MISMATCH;
 570             break;
 571         case VER_GREATER:
 572             if (left <= right) return STATUS_REVISION_MISMATCH;
 573             break;
 574         case VER_GREATER_EQUAL:
 575             if (left < right) return STATUS_REVISION_MISMATCH;
 576             break;
 577         case VER_LESS:
 578             if (left >= right) return STATUS_REVISION_MISMATCH;
 579             break;
 580         case VER_LESS_EQUAL:
 581             if (left > right) return STATUS_REVISION_MISMATCH;
 582             break;
 583         default:
 584             return STATUS_REVISION_MISMATCH;
 585     }
 586     return STATUS_SUCCESS;
 587 }
 588
 589 /******************************************************************************
 590  *        RtlVerifyVersionInfo   (NTDLL.@)
 591  */
 592 NTSTATUS WINAPI RtlVerifyVersionInfo( const RTL_OSVERSIONINFOEXW *info,
 593                                       DWORD dwTypeMask, DWORDLONG dwlConditionMask )
 594 {
 595     RTL_OSVERSIONINFOEXW ver;
 596     NTSTATUS status;
 597
 598     TRACE("(%p,0x%x,0x%s)\n", info, dwTypeMask, wine_dbgstr_longlong(dwlConditionMask));
 599
 600     ver.dwOSVersionInfoSize = sizeof(ver);
 601     if ((status = RtlGetVersion( &ver )) != STATUS_SUCCESS) return status;
 602
 603     if(!(dwTypeMask && dwlConditionMask)) return STATUS_INVALID_PARAMETER;
 604
 605     if(dwTypeMask & VER_PRODUCT_TYPE)
 606     {
 607         status = version_compare_values(ver.wProductType, info->wProductType, dwlConditionMask >> 7*3 & 0x07);
 608         if (status != STATUS_SUCCESS)
 609             return status;
 610     }
 611     if(dwTypeMask & VER_SUITENAME)
 612         switch(dwlConditionMask >> 6*3 & 0x07)
 613         {
 614             case VER_AND:
 615                 if((info->wSuiteMask & ver.wSuiteMask) != info->wSuiteMask)
 616                     return STATUS_REVISION_MISMATCH;
 617                 break;
 618             case VER_OR:
 619                 if(!(info->wSuiteMask & ver.wSuiteMask) && info->wSuiteMask)
 620                     return STATUS_REVISION_MISMATCH;
 621                 break;
 622             default:
 623                 return STATUS_INVALID_PARAMETER;
 624         }
 625     if(dwTypeMask & VER_PLATFORMID)
 626     {
 627         status = version_compare_values(ver.dwPlatformId, info->dwPlatformId, dwlConditionMask >> 3*3 & 0x07);
 628         if (status != STATUS_SUCCESS)
 629             return status;
 630     }
 631     if(dwTypeMask & VER_BUILDNUMBER)
 632     {
 633         status = version_compare_values(ver.dwBuildNumber, info->dwBuildNumber, dwlConditionMask >> 2*3 & 0x07);
 634         if (status != STATUS_SUCCESS)
 635             return status;
 636     }
 637
 638     if(dwTypeMask & (VER_MAJORVERSION|VER_MINORVERSION|VER_SERVICEPACKMAJOR|VER_SERVICEPACKMINOR))
 639     {
 640         unsigned char condition = 0;
 641         BOOLEAN do_next_check = TRUE;
 642
 643         if(dwTypeMask & VER_MAJORVERSION)
 644             condition = dwlConditionMask >> 1*3 & 0x07;
 645         else if(dwTypeMask & VER_MINORVERSION)
 646             condition = dwlConditionMask >> 0*3 & 0x07;
 647         else if(dwTypeMask & VER_SERVICEPACKMAJOR)
 648             condition = dwlConditionMask >> 5*3 & 0x07;
 649         else if(dwTypeMask & VER_SERVICEPACKMINOR)
 650             condition = dwlConditionMask >> 4*3 & 0x07;
 651
 652         if(dwTypeMask & VER_MAJORVERSION)
 653         {
 654             status = version_compare_values(ver.dwMajorVersion, info->dwMajorVersion, condition);
 655             do_next_check = (ver.dwMajorVersion == info->dwMajorVersion) &&
 656                 ((condition != VER_EQUAL) || (status == STATUS_SUCCESS));
 657         }
 658         if((dwTypeMask & VER_MINORVERSION) && do_next_check)
 659         {
 660             status = version_compare_values(ver.dwMinorVersion, info->dwMinorVersion, condition);
 661             do_next_check = (ver.dwMinorVersion == info->dwMinorVersion) &&
 662                 ((condition != VER_EQUAL) || (status == STATUS_SUCCESS));
 663         }
 664         if((dwTypeMask & VER_SERVICEPACKMAJOR) && do_next_check)
 665         {
 666             status = version_compare_values(ver.wServicePackMajor, info->wServicePackMajor, condition);
 667             do_next_check = (ver.wServicePackMajor == info->wServicePackMajor) &&
 668                 ((condition != VER_EQUAL) || (status == STATUS_SUCCESS));
 669         }
 670         if((dwTypeMask & VER_SERVICEPACKMINOR) && do_next_check)
 671         {
 672             status = version_compare_values(ver.wServicePackMinor, info->wServicePackMinor, condition);
 673         }
 674
 675         if (status != STATUS_SUCCESS)
 676             return status;
 677     }
 678
 679     return STATUS_SUCCESS;
 680 }