2 * Windows and DOS version functions
4 * Copyright 1997 Alexandre Julliard
5 * Copyright 1997 Marcus Meissner
6 * Copyright 1998 Patrik Stridvall
7 * Copyright 1998 Andreas Mohr
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.
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.
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
32 #include "wine/winbase16.h"
34 #include "wine/debug.h"
37 WINE_DEFAULT_DEBUG_CHANNEL(ver
);
41 WIN20
, /* Windows 2.0 */
42 WIN30
, /* Windows 3.0 */
43 WIN31
, /* Windows 3.1 */
44 WIN95
, /* Windows 95 */
45 WIN98
, /* Windows 98 */
46 WINME
, /* Windows Me */
47 NT351
, /* Windows NT 3.51 */
48 NT40
, /* Windows NT 4.0 */
49 NT2K
, /* Windows 2000 */
50 WINXP
, /* Windows XP */
58 OSVERSIONINFOEXA getVersionEx
;
61 /* FIXME: compare values below with original and fix.
62 * An *excellent* win9x version page (ALL versions !)
63 * can be found at members.aol.com/axcel216/ver.htm */
64 static VERSION_DATA VersionData
[NB_WINDOWS_VERSIONS
] =
66 /* WIN20 FIXME: verify values */
68 MAKELONG( 0x0002, 0x0303 ), /* assume DOS 3.3 */
69 MAKELONG( 0x0002, 0x8000 ),
71 sizeof(OSVERSIONINFOA
), 2, 0, 0,
72 VER_PLATFORM_WIN32s
, "Win32s 1.3",
76 /* WIN30 FIXME: verify values */
78 MAKELONG( 0x0003, 0x0500 ), /* assume DOS 5.00 */
79 MAKELONG( 0x0003, 0x8000 ),
81 sizeof(OSVERSIONINFOA
), 3, 0, 0,
82 VER_PLATFORM_WIN32s
, "Win32s 1.3",
88 MAKELONG( 0x0a03, 0x0616 ), /* DOS 6.22 */
89 MAKELONG( 0x0a03, 0x8000 ),
91 sizeof(OSVERSIONINFOA
), 3, 10, 0,
92 VER_PLATFORM_WIN32s
, "Win32s 1.3",
101 /* Win95: 4, 0, 0x40003B6, ""
102 * Win95sp1: 4, 0, 0x40003B6, " A " (according to doc)
103 * Win95osr2: 4, 0, 0x4000457, " B " (according to doc)
104 * Win95osr2.1: 4, 3, 0x40304BC, " B " (according to doc)
105 * Win95osr2.5: 4, 3, 0x40304BE, " C " (according to doc)
106 * Win95a/b can be discerned via regkey SubVersionNumber
108 * http://support.microsoft.com/support/kb/articles/q158/2/38.asp
110 sizeof(OSVERSIONINFOA
), 4, 0, 0x40003B6,
111 VER_PLATFORM_WIN32_WINDOWS
, "",
115 /* WIN98 (second edition) */
120 /* Win98: 4, 10, 0x40A07CE, " " 4.10.1998
121 * Win98SE: 4, 10, 0x40A08AE, " A " 4.10.2222
123 sizeof(OSVERSIONINFOA
), 4, 10, 0x40A08AE,
124 VER_PLATFORM_WIN32_WINDOWS
, " A ",
133 sizeof(OSVERSIONINFOA
), 4, 90, 0x45A0BB8,
134 VER_PLATFORM_WIN32_WINDOWS
, " ",
143 sizeof(OSVERSIONINFOA
), 3, 51, 0x421,
144 VER_PLATFORM_WIN32_NT
, "Service Pack 2",
153 sizeof(OSVERSIONINFOA
), 4, 0, 0x565,
154 VER_PLATFORM_WIN32_NT
, "Service Pack 6",
155 6, 0, 0, VER_NT_WORKSTATION
, 0
163 sizeof(OSVERSIONINFOA
), 5, 0, 0x893,
164 VER_PLATFORM_WIN32_NT
, "Service Pack 2",
165 2, 0, 0, VER_NT_WORKSTATION
, 30 /* FIXME: Great, a reserved field with a value! */
170 0x05005F03, /* Assuming DOS 5 like the other NT */
173 sizeof(OSVERSIONINFOA
), 5, 1, 0xA28,
174 VER_PLATFORM_WIN32_NT
, "",
175 0, 0, 0, VER_NT_WORKSTATION
, 0 /* FIXME: Verify last 5 values */
180 static const char *WinVersionNames
[NB_WINDOWS_VERSIONS
] =
181 { /* no spaces in here ! */
190 "win2000,win2k,nt2k,nt2000",
194 /* if one of the following dlls is importing ntdll the windows
195 version autodetection switches wine to unicode (nt 3.51 or 4.0) */
196 static char * special_dlls
[] =
206 /* the current version has not been autodetected but forced via cmdline */
207 static BOOL versionForced
= FALSE
;
208 static WINDOWS_VERSION forcedWinVersion
= WIN31
; /* init value irrelevant */
210 /**********************************************************************
211 * VERSION_ParseWinVersion
213 static void VERSION_ParseWinVersion( const char *arg
)
216 const char *pCurr
, *p
;
217 for (i
= 0; i
< NB_WINDOWS_VERSIONS
; i
++)
219 pCurr
= WinVersionNames
[i
];
220 /* iterate through all winver aliases separated by comma */
222 p
= strchr(pCurr
, ',');
223 len
= p
? (int)p
- (int)pCurr
: strlen(pCurr
);
224 if ( (!strncmp( pCurr
, arg
, len
)) && (arg
[len
] == '\0') )
226 forcedWinVersion
= (WINDOWS_VERSION
)i
;
227 versionForced
= TRUE
;
233 MESSAGE("Invalid Windows version value '%s' specified in config file.\n", arg
);
234 MESSAGE("Valid versions are:" );
235 for (i
= 0; i
< NB_WINDOWS_VERSIONS
; i
++)
237 /* only list the first, "official" alias in case of aliases */
238 pCurr
= WinVersionNames
[i
];
239 p
= strchr(pCurr
, ',');
240 len
= (p
) ? (int)p
- (int)pCurr
: strlen(pCurr
);
242 MESSAGE(" '%.*s'%c", len
, pCurr
,
243 (i
== NB_WINDOWS_VERSIONS
- 1) ? '\n' : ',' );
249 /**********************************************************************
250 * VERSION_ParseDosVersion
252 static void VERSION_ParseDosVersion( const char *arg
)
255 if (sscanf( arg
, "%d.%d", &hi
, &lo
) == 2)
257 VersionData
[WIN31
].getVersion16
=
258 MAKELONG(LOWORD(VersionData
[WIN31
].getVersion16
),
263 MESSAGE("Wrong format for DOS version in config file. Use \"x.xx\"\n");
269 /**********************************************************************
272 static void VERSION_Init(void)
276 BOOL got_win_ver
= FALSE
, got_dos_ver
= FALSE
;
277 char buffer
[MAX_PATH
+16], *appname
, *p
;
278 static BOOL init_done
;
280 if (init_done
) return;
281 if (!GetModuleFileNameA( 0, buffer
, MAX_PATH
))
283 WARN( "could not get module file name\n" );
288 if ((p
= strrchr( appname
, '/' ))) appname
= p
+ 1;
289 if ((p
= strrchr( appname
, '\\' ))) appname
= p
+ 1;
291 if (!RegOpenKeyA( HKEY_LOCAL_MACHINE
, "Software\\Wine\\Wine\\Config\\AppDefaults", &hkey
))
293 /* open AppDefaults\\appname\\Version key */
294 strcat( appname
, "\\Version" );
295 if (!RegOpenKeyA( hkey
, appname
, &appkey
))
297 count
= sizeof(buffer
);
298 if (!RegQueryValueExA( appkey
, "Windows", NULL
, &type
, buffer
, &count
))
300 VERSION_ParseWinVersion( buffer
);
301 TRACE( "got app win version %s\n", WinVersionNames
[forcedWinVersion
] );
304 count
= sizeof(buffer
);
305 if (!RegQueryValueExA( appkey
, "DOS", NULL
, &type
, buffer
, &count
))
307 VERSION_ParseDosVersion( buffer
);
308 TRACE( "got app dos version %lx\n", VersionData
[WIN31
].getVersion16
);
311 RegCloseKey( appkey
);
316 if (got_win_ver
&& got_dos_ver
) return;
318 if (!RegOpenKeyA( HKEY_LOCAL_MACHINE
, "Software\\Wine\\Wine\\Config\\Version", &hkey
))
322 count
= sizeof(buffer
);
323 if (!RegQueryValueExA( hkey
, "Windows", NULL
, &type
, buffer
, &count
))
325 VERSION_ParseWinVersion( buffer
);
326 TRACE( "got default win version %s\n", WinVersionNames
[forcedWinVersion
] );
331 count
= sizeof(buffer
);
332 if (!RegQueryValueExA( hkey
, "DOS", NULL
, &type
, buffer
, &count
))
334 VERSION_ParseDosVersion( buffer
);
335 TRACE( "got default dos version %lx\n", VersionData
[WIN31
].getVersion16
);
343 /**********************************************************************
344 * VERSION_GetSystemDLLVersion
346 * This function tries to figure out if a given (native) dll comes from
347 * win95/98 or winnt. Since all values in the OptionalHeader are not a
348 * usable hint, we test if a dll imports the ntdll.
349 * This is at least working for all system dlls like comctl32, comdlg32 and
351 * If you have a better idea to figure this out...
353 static DWORD
VERSION_GetSystemDLLVersion( HMODULE hmod
)
355 IMAGE_DATA_DIRECTORY
*dir
= PE_HEADER(hmod
)->OptionalHeader
.DataDirectory
356 + IMAGE_DIRECTORY_ENTRY_IMPORT
;
357 if (dir
->Size
&& dir
->VirtualAddress
)
359 IMAGE_IMPORT_DESCRIPTOR
*pe_imp
= (IMAGE_IMPORT_DESCRIPTOR
*)((char *)hmod
+ dir
->VirtualAddress
);
360 for ( ; pe_imp
->Name
; pe_imp
++)
362 char * name
= (char *)hmod
+ (unsigned int)pe_imp
->Name
;
365 if (!strncasecmp(name
, "ntdll", 5))
367 switch(PE_HEADER(hmod
)->OptionalHeader
.MajorOperatingSystemVersion
) {
369 MESSAGE("WARNING: very old native DLL (NT 3.x) used, might cause instability.\n");
373 case 6: return WINXP
;
375 FIXME("Unknown DLL OS version, please report !!\n");
383 /**********************************************************************
384 * VERSION_GetLinkedDllVersion
386 * Some version data (not reliable!):
387 * linker/OS/image/subsys
389 * x.xx/1.00/0.00/3.10 Win32s (any version ?)
390 * 2.39/1.00/0.00/3.10 Win32s freecell.exe (any version)
391 * 2.50/1.00/4.00/4.00 Win32s 1.30 winhlp32.exe
392 * 2.60/3.51/3.51/3.51 NT351SP5 system dlls
393 * 2.60/3.51/3.51/4.00 NT351SP5 comctl32 dll
394 * 2.xx/1.00/0.00/4.00 Win95 system files
395 * x.xx/4.00/0.00/4.00 Win95 most applications
396 * 3.10/4.00/0.00/4.00 Win98 notepad
397 * x.xx/5.00/5.00/4.00 Win98 system dlls (e.g. comctl32.dll)
398 * x.xx/4.00/4.00/4.00 NT 4 most apps
399 * 5.12/5.00/5.00/4.00 NT4+IE5 comctl32.dll
400 * 5.12/5.00/5.00/4.00 Win98 calc
401 * x.xx/5.00/5.00/4.00 win95/win98/NT4 IE5 files
403 DWORD
VERSION_GetLinkedDllVersion(void)
406 DWORD WinVersion
= NB_WINDOWS_VERSIONS
;
407 PIMAGE_OPTIONAL_HEADER ophd
;
409 /* First check the native dlls provided. These have to be
410 from one windows version */
411 for ( wm
= MODULE_modref_list
; wm
; wm
=wm
->next
)
413 ophd
= &(PE_HEADER(wm
->module
)->OptionalHeader
);
415 TRACE("%s: %02x.%02x/%02x.%02x/%02x.%02x/%02x.%02x\n",
417 ophd
->MajorLinkerVersion
, ophd
->MinorLinkerVersion
,
418 ophd
->MajorOperatingSystemVersion
, ophd
->MinorOperatingSystemVersion
,
419 ophd
->MajorImageVersion
, ophd
->MinorImageVersion
,
420 ophd
->MajorSubsystemVersion
, ophd
->MinorSubsystemVersion
);
422 /* test if it is an external (native) dll */
423 if (!(wm
->flags
& WINE_MODREF_INTERNAL
))
426 for (i
= 0; special_dlls
[i
]; i
++)
428 /* test if it is a special dll */
429 if (!strncasecmp(wm
->modname
, special_dlls
[i
], strlen(special_dlls
[i
]) ))
431 DWORD DllVersion
= VERSION_GetSystemDLLVersion(wm
->module
);
432 if (WinVersion
== NB_WINDOWS_VERSIONS
)
433 WinVersion
= DllVersion
;
435 if (WinVersion
!= DllVersion
) {
436 ERR("You mixed system DLLs from different windows versions! Expect a crash! (%s: expected version '%s', but is '%s')\n",
438 VersionData
[WinVersion
].getVersionEx
.szCSDVersion
,
439 VersionData
[DllVersion
].getVersionEx
.szCSDVersion
);
440 return WIN20
; /* this may let the exe exiting */
449 if(WinVersion
!= NB_WINDOWS_VERSIONS
) return WinVersion
;
451 /* we are using no external system dlls, look at the exe */
452 ophd
= &(PE_HEADER(GetModuleHandleA(NULL
))->OptionalHeader
);
454 TRACE("%02x.%02x/%02x.%02x/%02x.%02x/%02x.%02x\n",
455 ophd
->MajorLinkerVersion
, ophd
->MinorLinkerVersion
,
456 ophd
->MajorOperatingSystemVersion
, ophd
->MinorOperatingSystemVersion
,
457 ophd
->MajorImageVersion
, ophd
->MinorImageVersion
,
458 ophd
->MajorSubsystemVersion
, ophd
->MinorSubsystemVersion
);
460 /* special nt 3.51 */
461 if (3 == ophd
->MajorOperatingSystemVersion
&& 51 == ophd
->MinorOperatingSystemVersion
)
466 /* the MajorSubsystemVersion is the only usable sign */
467 if (ophd
->MajorSubsystemVersion
< 4)
469 if ( ophd
->MajorOperatingSystemVersion
== 1
470 && ophd
->MinorOperatingSystemVersion
== 0)
472 return WIN31
; /* win32s */
475 if (ophd
->Subsystem
== IMAGE_SUBSYSTEM_WINDOWS_CUI
)
476 return NT351
; /* FIXME: NT 3.1, not tested */
484 /**********************************************************************
488 * Don't call this function too early during the Wine init,
489 * as pdb->exe_modref (required by VERSION_GetImageVersion()) might still
490 * be NULL in such cases, which causes the winver to ALWAYS be detected
492 * And as we cache the winver once it has been determined, this is bad.
493 * This can happen much easier than you might think, as this function
494 * is called by EVERY GetVersion*() API !
497 static WINDOWS_VERSION
VERSION_GetVersion(void)
499 static WORD winver
= 0xffff;
501 if (winver
== 0xffff) /* to be determined */
503 WINDOWS_VERSION retver
;
506 if (versionForced
) /* user has overridden any sensible checks */
507 winver
= forcedWinVersion
;
510 retver
= VERSION_GetLinkedDllVersion();
512 /* cache determined value, but do not store in case of WIN31 */
513 if (retver
!= WIN31
) winver
= retver
;
523 /***********************************************************************
524 * GetVersion (KERNEL.3)
526 LONG WINAPI
GetVersion16(void)
528 WINDOWS_VERSION ver
= VERSION_GetVersion();
529 return VersionData
[ver
].getVersion16
;
533 /***********************************************************************
534 * GetVersion (KERNEL32.@)
536 LONG WINAPI
GetVersion(void)
538 WINDOWS_VERSION ver
= VERSION_GetVersion();
539 return VersionData
[ver
].getVersion32
;
543 /***********************************************************************
544 * GetVersionEx (KERNEL.149)
546 BOOL16 WINAPI
GetVersionEx16(OSVERSIONINFO16
*v
)
548 WINDOWS_VERSION ver
= VERSION_GetVersion();
549 if (v
->dwOSVersionInfoSize
< sizeof(OSVERSIONINFO16
))
551 WARN("wrong OSVERSIONINFO size from app\n");
552 SetLastError(ERROR_INSUFFICIENT_BUFFER
);
555 v
->dwMajorVersion
= VersionData
[ver
].getVersionEx
.dwMajorVersion
;
556 v
->dwMinorVersion
= VersionData
[ver
].getVersionEx
.dwMinorVersion
;
557 v
->dwBuildNumber
= VersionData
[ver
].getVersionEx
.dwBuildNumber
;
558 v
->dwPlatformId
= VersionData
[ver
].getVersionEx
.dwPlatformId
;
559 strcpy( v
->szCSDVersion
, VersionData
[ver
].getVersionEx
.szCSDVersion
);
564 /***********************************************************************
565 * GetVersionExA (KERNEL32.@)
567 BOOL WINAPI
GetVersionExA(OSVERSIONINFOA
*v
)
569 WINDOWS_VERSION ver
= VERSION_GetVersion();
570 LPOSVERSIONINFOEXA vex
;
572 if (v
->dwOSVersionInfoSize
!= sizeof(OSVERSIONINFOA
) &&
573 v
->dwOSVersionInfoSize
!= sizeof(OSVERSIONINFOEXA
))
575 WARN("wrong OSVERSIONINFO size from app (got: %ld, expected: %d or %d)\n",
576 v
->dwOSVersionInfoSize
, sizeof(OSVERSIONINFOA
),
577 sizeof(OSVERSIONINFOEXA
));
578 SetLastError(ERROR_INSUFFICIENT_BUFFER
);
581 v
->dwMajorVersion
= VersionData
[ver
].getVersionEx
.dwMajorVersion
;
582 v
->dwMinorVersion
= VersionData
[ver
].getVersionEx
.dwMinorVersion
;
583 v
->dwBuildNumber
= VersionData
[ver
].getVersionEx
.dwBuildNumber
;
584 v
->dwPlatformId
= VersionData
[ver
].getVersionEx
.dwPlatformId
;
585 strcpy( v
->szCSDVersion
, VersionData
[ver
].getVersionEx
.szCSDVersion
);
586 if(v
->dwOSVersionInfoSize
== sizeof(OSVERSIONINFOEXA
)) {
587 vex
= (LPOSVERSIONINFOEXA
) v
;
588 vex
->wServicePackMajor
= VersionData
[ver
].getVersionEx
.wServicePackMajor
;
589 vex
->wServicePackMinor
= VersionData
[ver
].getVersionEx
.wServicePackMinor
;
590 vex
->wSuiteMask
= VersionData
[ver
].getVersionEx
.wSuiteMask
;
591 vex
->wProductType
= VersionData
[ver
].getVersionEx
.wProductType
;
597 /***********************************************************************
598 * GetVersionExW (KERNEL32.@)
600 BOOL WINAPI
GetVersionExW(OSVERSIONINFOW
*v
)
602 WINDOWS_VERSION ver
= VERSION_GetVersion();
603 LPOSVERSIONINFOEXW vex
;
605 if (v
->dwOSVersionInfoSize
!= sizeof(OSVERSIONINFOW
) &&
606 v
->dwOSVersionInfoSize
!= sizeof(OSVERSIONINFOEXW
))
608 WARN("wrong OSVERSIONINFO size from app (got: %ld, expected: %d or %d)\n",
609 v
->dwOSVersionInfoSize
, sizeof(OSVERSIONINFOW
),
610 sizeof(OSVERSIONINFOEXW
));
611 SetLastError(ERROR_INSUFFICIENT_BUFFER
);
614 v
->dwMajorVersion
= VersionData
[ver
].getVersionEx
.dwMajorVersion
;
615 v
->dwMinorVersion
= VersionData
[ver
].getVersionEx
.dwMinorVersion
;
616 v
->dwBuildNumber
= VersionData
[ver
].getVersionEx
.dwBuildNumber
;
617 v
->dwPlatformId
= VersionData
[ver
].getVersionEx
.dwPlatformId
;
618 MultiByteToWideChar( CP_ACP
, 0, VersionData
[ver
].getVersionEx
.szCSDVersion
, -1,
619 v
->szCSDVersion
, sizeof(v
->szCSDVersion
)/sizeof(WCHAR
) );
620 if(v
->dwOSVersionInfoSize
== sizeof(OSVERSIONINFOEXW
)) {
621 vex
= (LPOSVERSIONINFOEXW
) v
;
622 vex
->wServicePackMajor
= VersionData
[ver
].getVersionEx
.wServicePackMajor
;
623 vex
->wServicePackMinor
= VersionData
[ver
].getVersionEx
.wServicePackMinor
;
624 vex
->wSuiteMask
= VersionData
[ver
].getVersionEx
.wSuiteMask
;
625 vex
->wProductType
= VersionData
[ver
].getVersionEx
.wProductType
;
631 /******************************************************************************
632 * VerifyVersionInfoA (KERNEL32.@)
634 BOOL WINAPI
VerifyVersionInfoA( LPOSVERSIONINFOEXA lpVersionInfo
, DWORD dwTypeMask
,
635 DWORDLONG dwlConditionMask
)
637 OSVERSIONINFOEXW verW
;
639 verW
.dwOSVersionInfoSize
= sizeof(OSVERSIONINFOEXW
);
640 verW
.dwMajorVersion
= lpVersionInfo
->dwMajorVersion
;
641 verW
.dwMinorVersion
= lpVersionInfo
->dwMinorVersion
;
642 verW
.dwBuildNumber
= lpVersionInfo
->dwBuildNumber
;
643 verW
.dwPlatformId
= lpVersionInfo
->dwPlatformId
;
644 verW
.wServicePackMajor
= lpVersionInfo
->wServicePackMajor
;
645 verW
.wServicePackMinor
= lpVersionInfo
->wServicePackMinor
;
646 verW
.wSuiteMask
= lpVersionInfo
->wSuiteMask
;
647 verW
.wProductType
= lpVersionInfo
->wProductType
;
648 verW
.wReserved
= lpVersionInfo
->wReserved
;
650 return VerifyVersionInfoW(&verW
, dwTypeMask
, dwlConditionMask
);
654 /******************************************************************************
655 * VerifyVersionInfoW (KERNEL32.@)
657 BOOL WINAPI
VerifyVersionInfoW( LPOSVERSIONINFOEXW lpVersionInfo
, DWORD dwTypeMask
,
658 DWORDLONG dwlConditionMask
)
660 OSVERSIONINFOEXW ver
;
663 FIXME("(%p,%lu,%llx): Not all cases correctly implemented yet\n", lpVersionInfo
, dwTypeMask
, dwlConditionMask
);
665 - Check the following special case on Windows (various versions):
666 o lp->wSuiteMask == 0 and ver.wSuiteMask != 0 and VER_AND/VER_OR
667 o lp->dwOSVersionInfoSize != sizeof(OSVERSIONINFOEXW)
668 - MSDN talks about some tests being impossible. Check what really happens.
671 ver
.dwOSVersionInfoSize
= sizeof(OSVERSIONINFOEXW
);
672 if(!GetVersionExW((LPOSVERSIONINFOW
) &ver
))
677 if(!(dwTypeMask
&& dwlConditionMask
)) {
679 SetLastError(ERROR_BAD_ARGUMENTS
);
682 if(dwTypeMask
& VER_PRODUCT_TYPE
)
683 switch(dwlConditionMask
>> 7*3 & 0x07) {
685 if(ver
.wProductType
!= lpVersionInfo
->wProductType
)
689 if(ver
.wProductType
<= lpVersionInfo
->wProductType
)
692 case VER_GREATER_EQUAL
:
693 if(ver
.wProductType
< lpVersionInfo
->wProductType
)
697 if(ver
.wProductType
>= lpVersionInfo
->wProductType
)
701 if(ver
.wProductType
> lpVersionInfo
->wProductType
)
706 SetLastError(ERROR_BAD_ARGUMENTS
);
709 if(dwTypeMask
& VER_SUITENAME
&& res
)
710 switch(dwlConditionMask
>> 6*3 & 0x07) {
712 if((lpVersionInfo
->wSuiteMask
& ver
.wSuiteMask
) != lpVersionInfo
->wSuiteMask
)
716 if(!(lpVersionInfo
->wSuiteMask
& ver
.wSuiteMask
) && lpVersionInfo
->wSuiteMask
)
721 SetLastError(ERROR_BAD_ARGUMENTS
);
724 if(dwTypeMask
& VER_PLATFORMID
&& res
)
725 switch(dwlConditionMask
>> 3*3 & 0x07) {
727 if(ver
.dwPlatformId
!= lpVersionInfo
->dwPlatformId
)
731 if(ver
.dwPlatformId
<= lpVersionInfo
->dwPlatformId
)
734 case VER_GREATER_EQUAL
:
735 if(ver
.dwPlatformId
< lpVersionInfo
->dwPlatformId
)
739 if(ver
.dwPlatformId
>= lpVersionInfo
->dwPlatformId
)
743 if(ver
.dwPlatformId
> lpVersionInfo
->dwPlatformId
)
748 SetLastError(ERROR_BAD_ARGUMENTS
);
751 if(dwTypeMask
& VER_BUILDNUMBER
&& res
)
752 switch(dwlConditionMask
>> 2*3 & 0x07) {
754 if(ver
.dwBuildNumber
!= lpVersionInfo
->dwBuildNumber
)
758 if(ver
.dwBuildNumber
<= lpVersionInfo
->dwBuildNumber
)
761 case VER_GREATER_EQUAL
:
762 if(ver
.dwBuildNumber
< lpVersionInfo
->dwBuildNumber
)
766 if(ver
.dwBuildNumber
>= lpVersionInfo
->dwBuildNumber
)
770 if(ver
.dwBuildNumber
> lpVersionInfo
->dwBuildNumber
)
775 SetLastError(ERROR_BAD_ARGUMENTS
);
778 if(dwTypeMask
& VER_MAJORVERSION
&& res
)
779 switch(dwlConditionMask
>> 1*3 & 0x07) {
781 if(ver
.dwMajorVersion
!= lpVersionInfo
->dwMajorVersion
)
785 if(ver
.dwMajorVersion
<= lpVersionInfo
->dwMajorVersion
)
788 case VER_GREATER_EQUAL
:
789 if(ver
.dwMajorVersion
< lpVersionInfo
->dwMajorVersion
)
793 if(ver
.dwMajorVersion
>= lpVersionInfo
->dwMajorVersion
)
797 if(ver
.dwMajorVersion
> lpVersionInfo
->dwMajorVersion
)
802 SetLastError(ERROR_BAD_ARGUMENTS
);
805 if(dwTypeMask
& VER_MINORVERSION
&& res
)
806 switch(dwlConditionMask
>> 0*3 & 0x07) {
808 if(ver
.dwMinorVersion
!= lpVersionInfo
->dwMinorVersion
)
812 if(ver
.dwMinorVersion
<= lpVersionInfo
->dwMinorVersion
)
815 case VER_GREATER_EQUAL
:
816 if(ver
.dwMinorVersion
< lpVersionInfo
->dwMinorVersion
)
820 if(ver
.dwMinorVersion
>= lpVersionInfo
->dwMinorVersion
)
824 if(ver
.dwMinorVersion
> lpVersionInfo
->dwMinorVersion
)
829 SetLastError(ERROR_BAD_ARGUMENTS
);
832 if(dwTypeMask
& VER_SERVICEPACKMAJOR
&& res
)
833 switch(dwlConditionMask
>> 5*3 & 0x07) {
835 if(ver
.wServicePackMajor
!= lpVersionInfo
->wServicePackMajor
)
839 if(ver
.wServicePackMajor
<= lpVersionInfo
->wServicePackMajor
)
842 case VER_GREATER_EQUAL
:
843 if(ver
.wServicePackMajor
< lpVersionInfo
->wServicePackMajor
)
847 if(ver
.wServicePackMajor
>= lpVersionInfo
->wServicePackMajor
)
851 if(ver
.wServicePackMajor
> lpVersionInfo
->wServicePackMajor
)
856 SetLastError(ERROR_BAD_ARGUMENTS
);
859 if(dwTypeMask
& VER_SERVICEPACKMINOR
&& res
)
860 switch(dwlConditionMask
>> 4*3 & 0x07) {
862 if(ver
.wServicePackMinor
!= lpVersionInfo
->wServicePackMinor
)
866 if(ver
.wServicePackMinor
<= lpVersionInfo
->wServicePackMinor
)
869 case VER_GREATER_EQUAL
:
870 if(ver
.wServicePackMinor
< lpVersionInfo
->wServicePackMinor
)
874 if(ver
.wServicePackMinor
>= lpVersionInfo
->wServicePackMinor
)
878 if(ver
.wServicePackMinor
> lpVersionInfo
->wServicePackMinor
)
883 SetLastError(ERROR_BAD_ARGUMENTS
);
887 if(!(res
|| error_set
))
888 SetLastError(ERROR_OLD_WIN_VERSION
);
893 /***********************************************************************
894 * GetWinFlags (KERNEL.132)
896 DWORD WINAPI
GetWinFlags16(void)
898 static const long cpuflags
[5] =
899 { WF_CPU086
, WF_CPU186
, WF_CPU286
, WF_CPU386
, WF_CPU486
};
906 /* There doesn't seem to be any Pentium flag. */
907 result
= cpuflags
[min(si
.wProcessorLevel
, 4)] | WF_ENHANCED
| WF_PMODE
| WF_80x87
| WF_PAGING
;
908 if (si
.wProcessorLevel
>= 4) result
|= WF_HASCPUID
;
909 ovi
.dwOSVersionInfoSize
= sizeof(ovi
);
911 if (ovi
.dwPlatformId
== VER_PLATFORM_WIN32_NT
)
912 result
|= WF_WIN32WOW
; /* undocumented WF_WINNT */
918 /* Not used at this time. This is here for documentation only */
920 /* WINDEBUGINFO flags values */
921 #define WDI_OPTIONS 0x0001
922 #define WDI_FILTER 0x0002
923 #define WDI_ALLOCBREAK 0x0004
925 /* dwOptions values */
926 #define DBO_CHECKHEAP 0x0001
927 #define DBO_BUFFERFILL 0x0004
928 #define DBO_DISABLEGPTRAPPING 0x0010
929 #define DBO_CHECKFREE 0x0020
931 #define DBO_SILENT 0x8000
933 #define DBO_TRACEBREAK 0x2000
934 #define DBO_WARNINGBREAK 0x1000
935 #define DBO_NOERRORBREAK 0x0800
936 #define DBO_NOFATALBREAK 0x0400
937 #define DBO_INT3BREAK 0x0100
939 /* DebugOutput flags values */
940 #define DBF_TRACE 0x0000
941 #define DBF_WARNING 0x4000
942 #define DBF_ERROR 0x8000
943 #define DBF_FATAL 0xc000
945 /* dwFilter values */
946 #define DBF_KERNEL 0x1000
947 #define DBF_KRN_MEMMAN 0x0001
948 #define DBF_KRN_LOADMODULE 0x0002
949 #define DBF_KRN_SEGMENTLOAD 0x0004
950 #define DBF_USER 0x0800
951 #define DBF_GDI 0x0400
952 #define DBF_MMSYSTEM 0x0040
953 #define DBF_PENWIN 0x0020
954 #define DBF_APPLICATION 0x0008
955 #define DBF_DRIVER 0x0010
957 #endif /* NOLOGERROR */
960 /***********************************************************************
961 * GetWinDebugInfo (KERNEL.355)
963 BOOL16 WINAPI
GetWinDebugInfo16(WINDEBUGINFO16
*lpwdi
, UINT16 flags
)
965 FIXME("(%8lx,%d): stub returning 0\n",
966 (unsigned long)lpwdi
, flags
);
967 /* 0 means not in debugging mode/version */
968 /* Can this type of debugging be used in wine ? */
969 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
974 /***********************************************************************
975 * SetWinDebugInfo (KERNEL.356)
977 BOOL16 WINAPI
SetWinDebugInfo16(WINDEBUGINFO16
*lpwdi
)
979 FIXME("(%8lx): stub returning 0\n", (unsigned long)lpwdi
);
980 /* 0 means not in debugging mode/version */
981 /* Can this type of debugging be used in wine ? */
982 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
987 /***********************************************************************
991 * Should fill lpBuffer only if DBO_BUFFERFILL has been set by SetWinDebugInfo()
993 void WINAPI
DebugFillBuffer(LPSTR lpBuffer
, WORD wBytes
)
995 memset(lpBuffer
, DBGFILL_BUFFER
, wBytes
);
998 /***********************************************************************
999 * DiagQuery (KERNEL.339)
1001 * returns TRUE if Win called with "/b" (bootlog.txt)
1003 BOOL16 WINAPI
DiagQuery16()
1005 /* perhaps implement a Wine "/b" command line flag sometime ? */
1009 /***********************************************************************
1010 * DiagOutput (KERNEL.340)
1012 * writes a debug string into <windir>\bootlog.txt
1014 void WINAPI
DiagOutput16(LPCSTR str
)
1017 DPRINTF("DIAGOUTPUT:%s\n", debugstr_a(str
));