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 "winbase.h"
35 #include "wingdi.h"
36 #include "winuser.h"
37 #include "winternl.h"
38 #include "winerror.h"
39 #include "wine/winbase16.h"
40 #include "wine/unicode.h"
41 #include "wine/debug.h"
42
43 WINE_DEFAULT_DEBUG_CHANNEL(ver);
44
45
46 /***********************************************************************
47 * GetVersion (KERNEL.3)
48 */
49 DWORD WINAPI GetVersion16(void)
50 {
51 static WORD dosver, winver;
52
53 if (!dosver) /* not determined yet */
54 {
55 RTL_OSVERSIONINFOEXW info;
56
57 info.dwOSVersionInfoSize = sizeof(info);
58 if (RtlGetVersion( &info ) != STATUS_SUCCESS) return 0;
59
60 if (info.dwMajorVersion <= 3)
61 winver = MAKEWORD( info.dwMajorVersion, info.dwMinorVersion );
62 else
63 winver = MAKEWORD( 3, 95 );
64
65 switch(info.dwPlatformId)
66 {
67 case VER_PLATFORM_WIN32s:
68 switch(MAKELONG( info.dwMinorVersion, info.dwMajorVersion ))
69 {
70 case 0x0200:
71 dosver = 0x0303; /* DOS 3.3 for Windows 2.0 */
72 break;
73 case 0x0300:
74 dosver = 0x0500; /* DOS 5.0 for Windows 3.0 */
75 break;
76 default:
77 dosver = 0x0616; /* DOS 6.22 for Windows 3.1 and later */
78 break;
79 }
80 break;
81 case VER_PLATFORM_WIN32_WINDOWS:
82 /* DOS 8.0 for WinME, 7.0 for Win95/98 */
83 if (info.dwMinorVersion >= 90) dosver = 0x0800;
84 else dosver = 0x0700;
85 break;
86 case VER_PLATFORM_WIN32_NT:
87 dosver = 0x0500; /* always DOS 5.0 for NT */
88 break;
89 }
90 TRACE( "DOS %d.%02d Win %d.%02d\n",
91 HIBYTE(dosver), LOBYTE(dosver), LOBYTE(winver), HIBYTE(winver) );
92 }
93 return MAKELONG( winver, dosver );
94 }
95
96
97 /***********************************************************************
98 * GetVersion (KERNEL32.@)
99 *
100 * Win31 0x80000a03
101 * Win95 0xc0000004
102 * Win98 0xc0000a04
103 * WinME 0xc0005a04
104 * NT351 0x04213303
105 * NT4 0x05650004
106 * Win2000 0x08930005
107 * WinXP 0x0a280105
108 */
109 DWORD WINAPI GetVersion(void)
110 {
111 DWORD result = MAKELONG( MAKEWORD( NtCurrentTeb()->Peb->OSMajorVersion,
112 NtCurrentTeb()->Peb->OSMinorVersion ),
113 (NtCurrentTeb()->Peb->OSPlatformId ^ 2) << 14 );
114 if (NtCurrentTeb()->Peb->OSPlatformId == VER_PLATFORM_WIN32_NT)
115 result |= LOWORD(NtCurrentTeb()->Peb->OSBuildNumber) << 16;
116 return result;
117 }
118
119
120 /***********************************************************************
121 * GetVersionEx (KERNEL.149)
122 */
123 BOOL16 WINAPI GetVersionEx16(OSVERSIONINFO16 *v)
124 {
125 OSVERSIONINFOA info;
126
127 if (v->dwOSVersionInfoSize < sizeof(OSVERSIONINFO16))
128 {
129 WARN("wrong OSVERSIONINFO size from app\n");
130 return FALSE;
131 }
132
133 info.dwOSVersionInfoSize = sizeof(info);
134 if (!GetVersionExA( &info )) return FALSE;
135
136 v->dwMajorVersion = info.dwMajorVersion;
137 v->dwMinorVersion = info.dwMinorVersion;
138 v->dwBuildNumber = info.dwBuildNumber;
139 v->dwPlatformId = info.dwPlatformId;
140 strcpy( v->szCSDVersion, info.szCSDVersion );
141 return TRUE;
142 }
143
144
145 /***********************************************************************
146 * GetVersionExA (KERNEL32.@)
147 */
148 BOOL WINAPI GetVersionExA(OSVERSIONINFOA *v)
149 {
150 RTL_OSVERSIONINFOEXW infoW;
151
152 if (v->dwOSVersionInfoSize != sizeof(OSVERSIONINFOA) &&
153 v->dwOSVersionInfoSize != sizeof(OSVERSIONINFOEXA))
154 {
155 WARN("wrong OSVERSIONINFO size from app (got: %d)\n",
156 v->dwOSVersionInfoSize );
157 SetLastError(ERROR_INSUFFICIENT_BUFFER);
158 return FALSE;
159 }
160
161 infoW.dwOSVersionInfoSize = sizeof(infoW);
162 if (RtlGetVersion( &infoW ) != STATUS_SUCCESS) return FALSE;
163
164 v->dwMajorVersion = infoW.dwMajorVersion;
165 v->dwMinorVersion = infoW.dwMinorVersion;
166 v->dwBuildNumber = infoW.dwBuildNumber;
167 v->dwPlatformId = infoW.dwPlatformId;
168 WideCharToMultiByte( CP_ACP, 0, infoW.szCSDVersion, -1,
169 v->szCSDVersion, sizeof(v->szCSDVersion), NULL, NULL );
170
171 if(v->dwOSVersionInfoSize == sizeof(OSVERSIONINFOEXA))
172 {
173 LPOSVERSIONINFOEXA vex = (LPOSVERSIONINFOEXA) v;
174 vex->wServicePackMajor = infoW.wServicePackMajor;
175 vex->wServicePackMinor = infoW.wServicePackMinor;
176 vex->wSuiteMask = infoW.wSuiteMask;
177 vex->wProductType = infoW.wProductType;
178 }
179 return TRUE;
180 }
181
182
183 /***********************************************************************
184 * GetVersionExW (KERNEL32.@)
185 */
186 BOOL WINAPI GetVersionExW( OSVERSIONINFOW *info )
187 {
188 if (info->dwOSVersionInfoSize != sizeof(OSVERSIONINFOW) &&
189 info->dwOSVersionInfoSize != sizeof(OSVERSIONINFOEXW))
190 {
191 WARN("wrong OSVERSIONINFO size from app (got: %d)\n",
192 info->dwOSVersionInfoSize);
193 return FALSE;
194 }
195 return (RtlGetVersion( (RTL_OSVERSIONINFOEXW *)info ) == STATUS_SUCCESS);
196 }
197
198
199 /******************************************************************************
200 * VerifyVersionInfoA (KERNEL32.@)
201 */
202 BOOL WINAPI VerifyVersionInfoA( LPOSVERSIONINFOEXA lpVersionInfo, DWORD dwTypeMask,
203 DWORDLONG dwlConditionMask)
204 {
205 OSVERSIONINFOEXW verW;
206
207 verW.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEXW);
208 verW.dwMajorVersion = lpVersionInfo->dwMajorVersion;
209 verW.dwMinorVersion = lpVersionInfo->dwMinorVersion;
210 verW.dwBuildNumber = lpVersionInfo->dwBuildNumber;
211 verW.dwPlatformId = lpVersionInfo->dwPlatformId;
212 verW.wServicePackMajor = lpVersionInfo->wServicePackMajor;
213 verW.wServicePackMinor = lpVersionInfo->wServicePackMinor;
214 verW.wSuiteMask = lpVersionInfo->wSuiteMask;
215 verW.wProductType = lpVersionInfo->wProductType;
216 verW.wReserved = lpVersionInfo->wReserved;
217
218 return VerifyVersionInfoW(&verW, dwTypeMask, dwlConditionMask);
219 }
220
221
222 /******************************************************************************
223 * VerifyVersionInfoW (KERNEL32.@)
224 */
225 BOOL WINAPI VerifyVersionInfoW( LPOSVERSIONINFOEXW lpVersionInfo, DWORD dwTypeMask,
226 DWORDLONG dwlConditionMask)
227 {
228 switch(RtlVerifyVersionInfo( lpVersionInfo, dwTypeMask, dwlConditionMask ))
229 {
230 case STATUS_INVALID_PARAMETER:
231 SetLastError( ERROR_BAD_ARGUMENTS );
232 return FALSE;
233 case STATUS_REVISION_MISMATCH:
234 SetLastError( ERROR_OLD_WIN_VERSION );
235 return FALSE;
236 }
237 return TRUE;
238 }
239
240
241 /***********************************************************************
242 * GetWinFlags (KERNEL.132)
243 */
244 DWORD WINAPI GetWinFlags16(void)
245 {
246 static const long cpuflags[5] =
247 { WF_CPU086, WF_CPU186, WF_CPU286, WF_CPU386, WF_CPU486 };
248 SYSTEM_INFO si;
249 OSVERSIONINFOA ovi;
250 DWORD result;
251
252 GetSystemInfo(&si);
253
254 /* There doesn't seem to be any Pentium flag. */
255 result = cpuflags[min(si.wProcessorLevel, 4)] | WF_ENHANCED | WF_PMODE | WF_80x87 | WF_PAGING;
256 if (si.wProcessorLevel >= 4) result |= WF_HASCPUID;
257 ovi.dwOSVersionInfoSize = sizeof(ovi);
258 GetVersionExA(&ovi);
259 if (ovi.dwPlatformId == VER_PLATFORM_WIN32_NT)
260 result |= WF_WIN32WOW; /* undocumented WF_WINNT */
261 return result;
262 }
263
264
265 #if 0
266 /* Not used at this time. This is here for documentation only */
267
268 /* WINDEBUGINFO flags values */
269 #define WDI_OPTIONS 0x0001
270 #define WDI_FILTER 0x0002
271 #define WDI_ALLOCBREAK 0x0004
272
273 /* dwOptions values */
274 #define DBO_CHECKHEAP 0x0001
275 #define DBO_BUFFERFILL 0x0004
276 #define DBO_DISABLEGPTRAPPING 0x0010
277 #define DBO_CHECKFREE 0x0020
278
279 #define DBO_SILENT 0x8000
280
281 #define DBO_TRACEBREAK 0x2000
282 #define DBO_WARNINGBREAK 0x1000
283 #define DBO_NOERRORBREAK 0x0800
284 #define DBO_NOFATALBREAK 0x0400
285 #define DBO_INT3BREAK 0x0100
286
287 /* DebugOutput flags values */
288 #define DBF_TRACE 0x0000
289 #define DBF_WARNING 0x4000
290 #define DBF_ERROR 0x8000
291 #define DBF_FATAL 0xc000
292
293 /* dwFilter values */
294 #define DBF_KERNEL 0x1000
295 #define DBF_KRN_MEMMAN 0x0001
296 #define DBF_KRN_LOADMODULE 0x0002
297 #define DBF_KRN_SEGMENTLOAD 0x0004
298 #define DBF_USER 0x0800
299 #define DBF_GDI 0x0400
300 #define DBF_MMSYSTEM 0x0040
301 #define DBF_PENWIN 0x0020
302 #define DBF_APPLICATION 0x0008
303 #define DBF_DRIVER 0x0010
304
305 #endif /* NOLOGERROR */
306
307
308 /***********************************************************************
309 * GetWinDebugInfo (KERNEL.355)
310 */
311 BOOL16 WINAPI GetWinDebugInfo16(WINDEBUGINFO16 *lpwdi, UINT16 flags)
312 {
313 FIXME("(%8lx,%d): stub returning 0\n",
314 (unsigned long)lpwdi, flags);
315 /* 0 means not in debugging mode/version */
316 /* Can this type of debugging be used in wine ? */
317 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
318 return 0;
319 }
320
321
322 /***********************************************************************
323 * SetWinDebugInfo (KERNEL.356)
324 */
325 BOOL16 WINAPI SetWinDebugInfo16(WINDEBUGINFO16 *lpwdi)
326 {
327 FIXME("(%8lx): stub returning 0\n", (unsigned long)lpwdi);
328 /* 0 means not in debugging mode/version */
329 /* Can this type of debugging be used in wine ? */
330 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
331 return 0;
332 }
333
334
335 /***********************************************************************
336 * K329 (KERNEL.329)
337 *
338 * TODO:
339 * Should fill lpBuffer only if DBO_BUFFERFILL has been set by SetWinDebugInfo()
340 */
341 void WINAPI DebugFillBuffer(LPSTR lpBuffer, WORD wBytes)
342 {
343 memset(lpBuffer, DBGFILL_BUFFER, wBytes);
344 }
345
346 /***********************************************************************
347 * DiagQuery (KERNEL.339)
348 *
349 * returns TRUE if Win called with "/b" (bootlog.txt)
350 */
351 BOOL16 WINAPI DiagQuery16(void)
352 {
353 /* perhaps implement a Wine "/b" command line flag sometime ? */
354 return FALSE;
355 }
356
357 /***********************************************************************
358 * DiagOutput (KERNEL.340)
359 *
360 * writes a debug string into <windir>\bootlog.txt
361 */
362 void WINAPI DiagOutput16(LPCSTR str)
363 {
364 /* FIXME */
365 TRACE("DIAGOUTPUT:%s\n", debugstr_a(str));
366 }
367
368 /***********************************************************************
369 * TermsrvAppInstallMode (KERNEL32.@)
370 *
371 * Find out whether the terminal server is in INSTALL or EXECUTE mode.
372 */
373 BOOL WINAPI TermsrvAppInstallMode(void)
374 {
375 FIXME("stub\n");
376 return FALSE;
377 }
378
379 /***********************************************************************
380 * SetTermsrvAppInstallMode (KERNEL32.@)
381 *
382 * This function is said to switch between the INSTALL (TRUE) or
383 * EXECUTE (FALSE) terminal server modes.
384 *
385 * This function always returns zero on WinXP Home so it's probably
386 * safe to return that value in most cases. However, if a terminal
387 * server is running it will probably return something else.
388 */
389 DWORD WINAPI SetTermsrvAppInstallMode(BOOL bInstallMode)
390 {
391 FIXME("(%d): stub\n", bInstallMode);
392 return 0;
393 }
394
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.