2 * Windows and DOS version functions
4 * Copyright 1997 Marcus Meissner
5 * Copyright 1998 Patrik Stridvall
6 * Copyright 1998, 2003 Andreas Mohr
7 * Copyright 1997, 2003 Alexandre Julliard
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
25 #include "wine/port.h"
39 #include "wine/winbase16.h"
40 #include "wine/unicode.h"
41 #include "wine/debug.h"
43 WINE_DEFAULT_DEBUG_CHANNEL(ver
);
45 /**********************************************************************
48 * Parse the contents of the Version key.
50 static WORD
parse_dos_version( HKEY hkey
)
52 static const WCHAR DosW
[] = {'D','O','S',0};
54 UNICODE_STRING valueW
;
56 char tmp
[64], buffer
[50];
57 KEY_VALUE_PARTIAL_INFORMATION
*info
= (KEY_VALUE_PARTIAL_INFORMATION
*)tmp
;
61 RtlInitUnicodeString( &valueW
, DosW
);
62 if (!NtQueryValueKey( hkey
, &valueW
, KeyValuePartialInformation
, tmp
, sizeof(tmp
), &count
))
64 RtlUnicodeToMultiByteN( buffer
, sizeof(buffer
)-1, &len
,
65 (WCHAR
*)info
->Data
, info
->DataLength
);
68 if (sscanf( buffer
, "%d.%d", &hi
, &lo
) == 2) ret
= MAKEWORD( lo
, hi
);
69 else MESSAGE("Wrong format for DOS version in config file. Use \"x.xx\"\n");
75 /**********************************************************************
78 WORD
get_dos_version(void)
80 OBJECT_ATTRIBUTES attr
;
82 HKEY hkey
, config_key
;
83 WCHAR buffer
[MAX_PATH
];
87 static const WCHAR configW
[] = {'M','a','c','h','i','n','e','\\',
88 'S','o','f','t','w','a','r','e','\\',
91 'C','o','n','f','i','g',0};
92 static const WCHAR appdefaultsW
[] = {'A','p','p','D','e','f','a','u','l','t','s','\\',0};
93 static const WCHAR versionW
[] = {'\\','V','e','r','s','i','o','n',0};
95 attr
.Length
= sizeof(attr
);
96 attr
.RootDirectory
= 0;
97 attr
.ObjectName
= &nameW
;
99 attr
.SecurityDescriptor
= NULL
;
100 attr
.SecurityQualityOfService
= NULL
;
101 RtlInitUnicodeString( &nameW
, configW
);
103 if (NtOpenKey( &config_key
, KEY_ALL_ACCESS
, &attr
)) return 0;
104 attr
.RootDirectory
= config_key
;
106 /* open AppDefaults\\appname\\Version key */
107 len
= GetModuleFileNameW( 0, buffer
, sizeof(buffer
)/sizeof(WCHAR
) );
108 if (len
&& len
< sizeof(buffer
)/sizeof(WCHAR
))
110 WCHAR
*p
, *appname
, appversion
[MAX_PATH
+20];
113 if ((p
= strrchrW( appname
, '/' ))) appname
= p
+ 1;
114 if ((p
= strrchrW( appname
, '\\' ))) appname
= p
+ 1;
116 strcpyW( appversion
, appdefaultsW
);
117 strcatW( appversion
, appname
);
118 strcatW( appversion
, versionW
);
120 TRACE( "getting version from %s\n", debugstr_w(appversion
) );
121 RtlInitUnicodeString( &nameW
, appversion
);
123 if (!NtOpenKey( &hkey
, KEY_ALL_ACCESS
, &attr
))
125 ret
= parse_dos_version( hkey
);
132 TRACE( "getting default version\n" );
133 RtlInitUnicodeString( &nameW
, versionW
+ 1 );
134 if (!NtOpenKey( &hkey
, KEY_ALL_ACCESS
, &attr
))
136 ret
= parse_dos_version( hkey
);
141 NtClose( config_key
);
146 /***********************************************************************
147 * GetVersion (KERNEL.3)
149 DWORD WINAPI
GetVersion16(void)
151 static WORD dosver
, winver
;
153 if (!dosver
) /* not determined yet */
155 RTL_OSVERSIONINFOEXW info
;
157 info
.dwOSVersionInfoSize
= sizeof(info
);
158 if (RtlGetVersion( &info
) != STATUS_SUCCESS
) return 0;
160 if (info
.dwMajorVersion
<= 3)
161 winver
= MAKEWORD( info
.dwMajorVersion
, info
.dwMinorVersion
);
163 winver
= MAKEWORD( 3, 95 );
165 switch(info
.dwPlatformId
)
167 case VER_PLATFORM_WIN32s
:
168 if ((dosver
= get_dos_version())) break; /* got the configured version */
170 switch(MAKELONG( info
.dwMinorVersion
, info
.dwMajorVersion
))
173 dosver
= 0x0303; /* DOS 3.3 for Windows 2.0 */
176 dosver
= 0x0500; /* DOS 5.0 for Windows 3.0 */
179 dosver
= 0x0616; /* DOS 6.22 for Windows 3.1 and later */
183 case VER_PLATFORM_WIN32_WINDOWS
:
184 /* DOS 8.0 for WinME, 7.0 for Win95/98 */
185 if (info
.dwMinorVersion
>= 90) dosver
= 0x0800;
186 else dosver
= 0x0700;
188 case VER_PLATFORM_WIN32_NT
:
189 dosver
= 0x0500; /* always DOS 5.0 for NT */
192 TRACE( "DOS %d.%02d Win %d.%02d\n",
193 HIBYTE(dosver
), LOBYTE(dosver
), LOBYTE(winver
), HIBYTE(winver
) );
195 return MAKELONG( winver
, dosver
);
199 /***********************************************************************
200 * GetVersion (KERNEL32.@)
211 DWORD WINAPI
GetVersion(void)
213 RTL_OSVERSIONINFOEXW info
;
216 info
.dwOSVersionInfoSize
= sizeof(info
);
217 if (RtlGetVersion( &info
) != STATUS_SUCCESS
) return 0;
219 result
= MAKELONG( MAKEWORD( info
.dwMajorVersion
, info
.dwMinorVersion
),
220 (info
.dwPlatformId
^ 2) << 14 );
221 if (info
.dwPlatformId
== VER_PLATFORM_WIN32_NT
) result
|= LOWORD(info
.dwBuildNumber
) << 16;
226 /***********************************************************************
227 * GetVersionEx (KERNEL.149)
229 BOOL16 WINAPI
GetVersionEx16(OSVERSIONINFO16
*v
)
233 if (v
->dwOSVersionInfoSize
< sizeof(OSVERSIONINFO16
))
235 WARN("wrong OSVERSIONINFO size from app\n");
239 info
.dwOSVersionInfoSize
= sizeof(info
);
240 if (!GetVersionExA( &info
)) return FALSE
;
242 v
->dwMajorVersion
= info
.dwMajorVersion
;
243 v
->dwMinorVersion
= info
.dwMinorVersion
;
244 v
->dwBuildNumber
= info
.dwBuildNumber
;
245 v
->dwPlatformId
= info
.dwPlatformId
;
246 strcpy( v
->szCSDVersion
, info
.szCSDVersion
);
251 /***********************************************************************
252 * GetVersionExA (KERNEL32.@)
254 BOOL WINAPI
GetVersionExA(OSVERSIONINFOA
*v
)
256 RTL_OSVERSIONINFOEXW infoW
;
258 if (v
->dwOSVersionInfoSize
!= sizeof(OSVERSIONINFOA
) &&
259 v
->dwOSVersionInfoSize
!= sizeof(OSVERSIONINFOEXA
))
261 WARN("wrong OSVERSIONINFO size from app (got: %ld, expected: %d or %d)\n",
262 v
->dwOSVersionInfoSize
, sizeof(OSVERSIONINFOA
),
263 sizeof(OSVERSIONINFOEXA
));
267 infoW
.dwOSVersionInfoSize
= sizeof(infoW
);
268 if (RtlGetVersion( &infoW
) != STATUS_SUCCESS
) return FALSE
;
270 v
->dwMajorVersion
= infoW
.dwMajorVersion
;
271 v
->dwMinorVersion
= infoW
.dwMinorVersion
;
272 v
->dwBuildNumber
= infoW
.dwBuildNumber
;
273 v
->dwPlatformId
= infoW
.dwPlatformId
;
274 WideCharToMultiByte( CP_ACP
, 0, infoW
.szCSDVersion
, -1,
275 v
->szCSDVersion
, sizeof(v
->szCSDVersion
), NULL
, NULL
);
277 if(v
->dwOSVersionInfoSize
== sizeof(OSVERSIONINFOEXA
))
279 LPOSVERSIONINFOEXA vex
= (LPOSVERSIONINFOEXA
) v
;
280 vex
->wServicePackMajor
= infoW
.wServicePackMajor
;
281 vex
->wServicePackMinor
= infoW
.wServicePackMinor
;
282 vex
->wSuiteMask
= infoW
.wSuiteMask
;
283 vex
->wProductType
= infoW
.wProductType
;
289 /***********************************************************************
290 * GetVersionExW (KERNEL32.@)
292 BOOL WINAPI
GetVersionExW( OSVERSIONINFOW
*info
)
294 if (info
->dwOSVersionInfoSize
!= sizeof(OSVERSIONINFOW
) &&
295 info
->dwOSVersionInfoSize
!= sizeof(OSVERSIONINFOEXW
))
297 WARN("wrong OSVERSIONINFO size from app (got: %ld, expected: %d or %d)\n",
298 info
->dwOSVersionInfoSize
, sizeof(OSVERSIONINFOW
),
299 sizeof(OSVERSIONINFOEXW
));
302 return (RtlGetVersion( (RTL_OSVERSIONINFOEXW
*)info
) == STATUS_SUCCESS
);
306 /******************************************************************************
307 * VerifyVersionInfoA (KERNEL32.@)
309 BOOL WINAPI
VerifyVersionInfoA( LPOSVERSIONINFOEXA lpVersionInfo
, DWORD dwTypeMask
,
310 DWORDLONG dwlConditionMask
)
312 OSVERSIONINFOEXW verW
;
314 verW
.dwOSVersionInfoSize
= sizeof(OSVERSIONINFOEXW
);
315 verW
.dwMajorVersion
= lpVersionInfo
->dwMajorVersion
;
316 verW
.dwMinorVersion
= lpVersionInfo
->dwMinorVersion
;
317 verW
.dwBuildNumber
= lpVersionInfo
->dwBuildNumber
;
318 verW
.dwPlatformId
= lpVersionInfo
->dwPlatformId
;
319 verW
.wServicePackMajor
= lpVersionInfo
->wServicePackMajor
;
320 verW
.wServicePackMinor
= lpVersionInfo
->wServicePackMinor
;
321 verW
.wSuiteMask
= lpVersionInfo
->wSuiteMask
;
322 verW
.wProductType
= lpVersionInfo
->wProductType
;
323 verW
.wReserved
= lpVersionInfo
->wReserved
;
325 return VerifyVersionInfoW(&verW
, dwTypeMask
, dwlConditionMask
);
329 /******************************************************************************
330 * VerifyVersionInfoW (KERNEL32.@)
332 BOOL WINAPI
VerifyVersionInfoW( LPOSVERSIONINFOEXW lpVersionInfo
, DWORD dwTypeMask
,
333 DWORDLONG dwlConditionMask
)
335 switch(RtlVerifyVersionInfo( lpVersionInfo
, dwTypeMask
, dwlConditionMask
))
337 case STATUS_INVALID_PARAMETER
:
338 SetLastError( ERROR_BAD_ARGUMENTS
);
340 case STATUS_REVISION_MISMATCH
:
341 SetLastError( ERROR_OLD_WIN_VERSION
);
348 /***********************************************************************
349 * GetWinFlags (KERNEL.132)
351 DWORD WINAPI
GetWinFlags16(void)
353 static const long cpuflags
[5] =
354 { WF_CPU086
, WF_CPU186
, WF_CPU286
, WF_CPU386
, WF_CPU486
};
361 /* There doesn't seem to be any Pentium flag. */
362 result
= cpuflags
[min(si
.wProcessorLevel
, 4)] | WF_ENHANCED
| WF_PMODE
| WF_80x87
| WF_PAGING
;
363 if (si
.wProcessorLevel
>= 4) result
|= WF_HASCPUID
;
364 ovi
.dwOSVersionInfoSize
= sizeof(ovi
);
366 if (ovi
.dwPlatformId
== VER_PLATFORM_WIN32_NT
)
367 result
|= WF_WIN32WOW
; /* undocumented WF_WINNT */
373 /* Not used at this time. This is here for documentation only */
375 /* WINDEBUGINFO flags values */
376 #define WDI_OPTIONS 0x0001
377 #define WDI_FILTER 0x0002
378 #define WDI_ALLOCBREAK 0x0004
380 /* dwOptions values */
381 #define DBO_CHECKHEAP 0x0001
382 #define DBO_BUFFERFILL 0x0004
383 #define DBO_DISABLEGPTRAPPING 0x0010
384 #define DBO_CHECKFREE 0x0020
386 #define DBO_SILENT 0x8000
388 #define DBO_TRACEBREAK 0x2000
389 #define DBO_WARNINGBREAK 0x1000
390 #define DBO_NOERRORBREAK 0x0800
391 #define DBO_NOFATALBREAK 0x0400
392 #define DBO_INT3BREAK 0x0100
394 /* DebugOutput flags values */
395 #define DBF_TRACE 0x0000
396 #define DBF_WARNING 0x4000
397 #define DBF_ERROR 0x8000
398 #define DBF_FATAL 0xc000
400 /* dwFilter values */
401 #define DBF_KERNEL 0x1000
402 #define DBF_KRN_MEMMAN 0x0001
403 #define DBF_KRN_LOADMODULE 0x0002
404 #define DBF_KRN_SEGMENTLOAD 0x0004
405 #define DBF_USER 0x0800
406 #define DBF_GDI 0x0400
407 #define DBF_MMSYSTEM 0x0040
408 #define DBF_PENWIN 0x0020
409 #define DBF_APPLICATION 0x0008
410 #define DBF_DRIVER 0x0010
412 #endif /* NOLOGERROR */
415 /***********************************************************************
416 * GetWinDebugInfo (KERNEL.355)
418 BOOL16 WINAPI
GetWinDebugInfo16(WINDEBUGINFO16
*lpwdi
, UINT16 flags
)
420 FIXME("(%8lx,%d): stub returning 0\n",
421 (unsigned long)lpwdi
, flags
);
422 /* 0 means not in debugging mode/version */
423 /* Can this type of debugging be used in wine ? */
424 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
429 /***********************************************************************
430 * SetWinDebugInfo (KERNEL.356)
432 BOOL16 WINAPI
SetWinDebugInfo16(WINDEBUGINFO16
*lpwdi
)
434 FIXME("(%8lx): stub returning 0\n", (unsigned long)lpwdi
);
435 /* 0 means not in debugging mode/version */
436 /* Can this type of debugging be used in wine ? */
437 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
442 /***********************************************************************
446 * Should fill lpBuffer only if DBO_BUFFERFILL has been set by SetWinDebugInfo()
448 void WINAPI
DebugFillBuffer(LPSTR lpBuffer
, WORD wBytes
)
450 memset(lpBuffer
, DBGFILL_BUFFER
, wBytes
);
453 /***********************************************************************
454 * DiagQuery (KERNEL.339)
456 * returns TRUE if Win called with "/b" (bootlog.txt)
458 BOOL16 WINAPI
DiagQuery16(void)
460 /* perhaps implement a Wine "/b" command line flag sometime ? */
464 /***********************************************************************
465 * DiagOutput (KERNEL.340)
467 * writes a debug string into <windir>\bootlog.txt
469 void WINAPI
DiagOutput16(LPCSTR str
)
472 DPRINTF("DIAGOUTPUT:%s\n", debugstr_a(str
));