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