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"
38 #include "wine/winbase16.h"
39 #include "wine/unicode.h"
40 #include "wine/debug.h"
42 WINE_DEFAULT_DEBUG_CHANNEL(ver);
45 /***********************************************************************
46 * GetVersion (KERNEL.3)
48 DWORD WINAPI GetVersion16(void)
50 static WORD dosver, winver;
52 if (!dosver) /* not determined yet */
54 RTL_OSVERSIONINFOEXW info;
56 info.dwOSVersionInfoSize = sizeof(info);
57 if (RtlGetVersion( &info ) != STATUS_SUCCESS) return 0;
59 if (info.dwMajorVersion <= 3)
60 winver = MAKEWORD( info.dwMajorVersion, info.dwMinorVersion );
62 winver = MAKEWORD( 3, 95 );
64 switch(info.dwPlatformId)
66 case VER_PLATFORM_WIN32s:
67 switch(MAKELONG( info.dwMinorVersion, info.dwMajorVersion ))
70 dosver = 0x0303; /* DOS 3.3 for Windows 2.0 */
73 dosver = 0x0500; /* DOS 5.0 for Windows 3.0 */
76 dosver = 0x0616; /* DOS 6.22 for Windows 3.1 and later */
80 case VER_PLATFORM_WIN32_WINDOWS:
81 /* DOS 8.0 for WinME, 7.0 for Win95/98 */
82 if (info.dwMinorVersion >= 90) dosver = 0x0800;
85 case VER_PLATFORM_WIN32_NT:
86 dosver = 0x0500; /* always DOS 5.0 for NT */
89 TRACE( "DOS %d.%02d Win %d.%02d\n",
90 HIBYTE(dosver), LOBYTE(dosver), LOBYTE(winver), HIBYTE(winver) );
92 return MAKELONG( winver, dosver );
96 /***********************************************************************
97 * GetVersion (KERNEL32.@)
108 DWORD WINAPI GetVersion(void)
110 RTL_OSVERSIONINFOEXW info;
113 info.dwOSVersionInfoSize = sizeof(info);
114 if (RtlGetVersion( &info ) != STATUS_SUCCESS) return 0;
116 result = MAKELONG( MAKEWORD( info.dwMajorVersion, info.dwMinorVersion ),
117 (info.dwPlatformId ^ 2) << 14 );
118 if (info.dwPlatformId == VER_PLATFORM_WIN32_NT) result |= LOWORD(info.dwBuildNumber) << 16;
123 /***********************************************************************
124 * GetVersionEx (KERNEL.149)
126 BOOL16 WINAPI GetVersionEx16(OSVERSIONINFO16 *v)
130 if (v->dwOSVersionInfoSize < sizeof(OSVERSIONINFO16))
132 WARN("wrong OSVERSIONINFO size from app\n");
136 info.dwOSVersionInfoSize = sizeof(info);
137 if (!GetVersionExA( &info )) return FALSE;
139 v->dwMajorVersion = info.dwMajorVersion;
140 v->dwMinorVersion = info.dwMinorVersion;
141 v->dwBuildNumber = info.dwBuildNumber;
142 v->dwPlatformId = info.dwPlatformId;
143 strcpy( v->szCSDVersion, info.szCSDVersion );
148 /***********************************************************************
149 * GetVersionExA (KERNEL32.@)
151 BOOL WINAPI GetVersionExA(OSVERSIONINFOA *v)
153 RTL_OSVERSIONINFOEXW infoW;
155 if (v->dwOSVersionInfoSize != sizeof(OSVERSIONINFOA) &&
156 v->dwOSVersionInfoSize != sizeof(OSVERSIONINFOEXA))
158 WARN("wrong OSVERSIONINFO size from app (got: %ld)\n",
159 v->dwOSVersionInfoSize );
163 infoW.dwOSVersionInfoSize = sizeof(infoW);
164 if (RtlGetVersion( &infoW ) != STATUS_SUCCESS) return FALSE;
166 v->dwMajorVersion = infoW.dwMajorVersion;
167 v->dwMinorVersion = infoW.dwMinorVersion;
168 v->dwBuildNumber = infoW.dwBuildNumber;
169 v->dwPlatformId = infoW.dwPlatformId;
170 WideCharToMultiByte( CP_ACP, 0, infoW.szCSDVersion, -1,
171 v->szCSDVersion, sizeof(v->szCSDVersion), NULL, NULL );
173 if(v->dwOSVersionInfoSize == sizeof(OSVERSIONINFOEXA))
175 LPOSVERSIONINFOEXA vex = (LPOSVERSIONINFOEXA) v;
176 vex->wServicePackMajor = infoW.wServicePackMajor;
177 vex->wServicePackMinor = infoW.wServicePackMinor;
178 vex->wSuiteMask = infoW.wSuiteMask;
179 vex->wProductType = infoW.wProductType;
185 /***********************************************************************
186 * GetVersionExW (KERNEL32.@)
188 BOOL WINAPI GetVersionExW( OSVERSIONINFOW *info )
190 if (info->dwOSVersionInfoSize != sizeof(OSVERSIONINFOW) &&
191 info->dwOSVersionInfoSize != sizeof(OSVERSIONINFOEXW))
193 WARN("wrong OSVERSIONINFO size from app (got: %ld)\n",
194 info->dwOSVersionInfoSize);
197 return (RtlGetVersion( (RTL_OSVERSIONINFOEXW *)info ) == STATUS_SUCCESS);
201 /******************************************************************************
202 * VerifyVersionInfoA (KERNEL32.@)
204 BOOL WINAPI VerifyVersionInfoA( LPOSVERSIONINFOEXA lpVersionInfo, DWORD dwTypeMask,
205 DWORDLONG dwlConditionMask)
207 OSVERSIONINFOEXW verW;
209 verW.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEXW);
210 verW.dwMajorVersion = lpVersionInfo->dwMajorVersion;
211 verW.dwMinorVersion = lpVersionInfo->dwMinorVersion;
212 verW.dwBuildNumber = lpVersionInfo->dwBuildNumber;
213 verW.dwPlatformId = lpVersionInfo->dwPlatformId;
214 verW.wServicePackMajor = lpVersionInfo->wServicePackMajor;
215 verW.wServicePackMinor = lpVersionInfo->wServicePackMinor;
216 verW.wSuiteMask = lpVersionInfo->wSuiteMask;
217 verW.wProductType = lpVersionInfo->wProductType;
218 verW.wReserved = lpVersionInfo->wReserved;
220 return VerifyVersionInfoW(&verW, dwTypeMask, dwlConditionMask);
224 /******************************************************************************
225 * VerifyVersionInfoW (KERNEL32.@)
227 BOOL WINAPI VerifyVersionInfoW( LPOSVERSIONINFOEXW lpVersionInfo, DWORD dwTypeMask,
228 DWORDLONG dwlConditionMask)
230 switch(RtlVerifyVersionInfo( lpVersionInfo, dwTypeMask, dwlConditionMask ))
232 case STATUS_INVALID_PARAMETER:
233 SetLastError( ERROR_BAD_ARGUMENTS );
235 case STATUS_REVISION_MISMATCH:
236 SetLastError( ERROR_OLD_WIN_VERSION );
243 /***********************************************************************
244 * GetWinFlags (KERNEL.132)
246 DWORD WINAPI GetWinFlags16(void)
248 static const long cpuflags[5] =
249 { WF_CPU086, WF_CPU186, WF_CPU286, WF_CPU386, WF_CPU486 };
256 /* There doesn't seem to be any Pentium flag. */
257 result = cpuflags[min(si.wProcessorLevel, 4)] | WF_ENHANCED | WF_PMODE | WF_80x87 | WF_PAGING;
258 if (si.wProcessorLevel >= 4) result |= WF_HASCPUID;
259 ovi.dwOSVersionInfoSize = sizeof(ovi);
261 if (ovi.dwPlatformId == VER_PLATFORM_WIN32_NT)
262 result |= WF_WIN32WOW; /* undocumented WF_WINNT */
268 /* Not used at this time. This is here for documentation only */
270 /* WINDEBUGINFO flags values */
271 #define WDI_OPTIONS 0x0001
272 #define WDI_FILTER 0x0002
273 #define WDI_ALLOCBREAK 0x0004
275 /* dwOptions values */
276 #define DBO_CHECKHEAP 0x0001
277 #define DBO_BUFFERFILL 0x0004
278 #define DBO_DISABLEGPTRAPPING 0x0010
279 #define DBO_CHECKFREE 0x0020
281 #define DBO_SILENT 0x8000
283 #define DBO_TRACEBREAK 0x2000
284 #define DBO_WARNINGBREAK 0x1000
285 #define DBO_NOERRORBREAK 0x0800
286 #define DBO_NOFATALBREAK 0x0400
287 #define DBO_INT3BREAK 0x0100
289 /* DebugOutput flags values */
290 #define DBF_TRACE 0x0000
291 #define DBF_WARNING 0x4000
292 #define DBF_ERROR 0x8000
293 #define DBF_FATAL 0xc000
295 /* dwFilter values */
296 #define DBF_KERNEL 0x1000
297 #define DBF_KRN_MEMMAN 0x0001
298 #define DBF_KRN_LOADMODULE 0x0002
299 #define DBF_KRN_SEGMENTLOAD 0x0004
300 #define DBF_USER 0x0800
301 #define DBF_GDI 0x0400
302 #define DBF_MMSYSTEM 0x0040
303 #define DBF_PENWIN 0x0020
304 #define DBF_APPLICATION 0x0008
305 #define DBF_DRIVER 0x0010
307 #endif /* NOLOGERROR */
310 /***********************************************************************
311 * GetWinDebugInfo (KERNEL.355)
313 BOOL16 WINAPI GetWinDebugInfo16(WINDEBUGINFO16 *lpwdi, UINT16 flags)
315 FIXME("(%8lx,%d): stub returning 0\n",
316 (unsigned long)lpwdi, flags);
317 /* 0 means not in debugging mode/version */
318 /* Can this type of debugging be used in wine ? */
319 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
324 /***********************************************************************
325 * SetWinDebugInfo (KERNEL.356)
327 BOOL16 WINAPI SetWinDebugInfo16(WINDEBUGINFO16 *lpwdi)
329 FIXME("(%8lx): stub returning 0\n", (unsigned long)lpwdi);
330 /* 0 means not in debugging mode/version */
331 /* Can this type of debugging be used in wine ? */
332 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
337 /***********************************************************************
341 * Should fill lpBuffer only if DBO_BUFFERFILL has been set by SetWinDebugInfo()
343 void WINAPI DebugFillBuffer(LPSTR lpBuffer, WORD wBytes)
345 memset(lpBuffer, DBGFILL_BUFFER, wBytes);
348 /***********************************************************************
349 * DiagQuery (KERNEL.339)
351 * returns TRUE if Win called with "/b" (bootlog.txt)
353 BOOL16 WINAPI DiagQuery16(void)
355 /* perhaps implement a Wine "/b" command line flag sometime ? */
359 /***********************************************************************
360 * DiagOutput (KERNEL.340)
362 * writes a debug string into <windir>\bootlog.txt
364 void WINAPI DiagOutput16(LPCSTR str)
367 DPRINTF("DIAGOUTPUT:%s\n", debugstr_a(str));