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