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