Added ExitKernel16 (replacing USER_ExitWindows), ExitProcess16, and
[wine/testsucceed.git] / misc / version.c
blob827fa9b6ce14ad3048a875fa91fb061cfc9264d6
1 /*
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
8 */
10 #include <string.h>
11 #include <stdlib.h>
12 #include "winbase.h"
13 #include "winuser.h"
14 #include "wine/winbase16.h"
15 #include "process.h"
16 #include "options.h"
17 #include "debug.h"
18 #include "neexe.h"
19 #include "winversion.h"
21 DEFAULT_DEBUG_CHANNEL(ver)
23 typedef struct
25 LONG getVersion16;
26 LONG getVersion32;
27 OSVERSIONINFOA getVersionEx;
28 } VERSION_DATA;
31 /* FIXME: compare values below with original and fix */
32 static VERSION_DATA VersionData[NB_WINDOWS_VERSIONS] =
34 /* WIN31 */
36 MAKELONG( 0x0a03, 0x0616 ), /* DOS 6.22 */
37 MAKELONG( 0x0a03, 0x8000 ),
39 sizeof(OSVERSIONINFOA), 3, 10, 0,
40 VER_PLATFORM_WIN32s, "Win32s 1.3"
43 /* WIN95 */
45 0x07005F03,
46 0xC0000004,
48 sizeof(OSVERSIONINFOA), 4, 0, 0x40003B6,
49 VER_PLATFORM_WIN32_WINDOWS, "Win95"
52 /* NT351 */
54 0x05000A03,
55 0x04213303,
57 sizeof(OSVERSIONINFOA), 3, 51, 0x421,
58 VER_PLATFORM_WIN32_NT, "Service Pack 2"
61 /* NT40 */
63 0x05000A03,
64 0x05650004,
66 sizeof(OSVERSIONINFOA), 4, 0, 0x565,
67 VER_PLATFORM_WIN32_NT, "Service Pack 3"
72 static const char *WinVersionNames[NB_WINDOWS_VERSIONS] =
74 "win31",
75 "win95",
76 "nt351",
77 "nt40"
80 /* the current version has not been autodetected but forced via cmdline */
81 static BOOL versionForced = FALSE;
82 static WINDOWS_VERSION defaultWinVersion = WIN31;
85 /**********************************************************************
86 * VERSION_ParseWinVersion
88 void VERSION_ParseWinVersion( const char *arg )
90 int i;
91 for (i = 0; i < NB_WINDOWS_VERSIONS; i++)
93 if (!strcmp( WinVersionNames[i], arg ))
95 defaultWinVersion = (WINDOWS_VERSION)i;
96 versionForced = TRUE;
97 return;
100 MSG("Invalid winver value '%s' specified.\n", arg );
101 MSG("Valid versions are:" );
102 for (i = 0; i < NB_WINDOWS_VERSIONS; i++)
103 MSG(" '%s'%c", WinVersionNames[i],
104 (i == NB_WINDOWS_VERSIONS - 1) ? '\n' : ',' );
108 /**********************************************************************
109 * VERSION_ParseDosVersion
111 void VERSION_ParseDosVersion( const char *arg )
113 int hi, lo;
114 if (sscanf( arg, "%d.%d", &hi, &lo ) == 2)
116 VersionData[WIN31].getVersion16 =
117 MAKELONG(LOWORD(VersionData[WIN31].getVersion16),
118 (hi<<8) + lo);
120 else
121 fprintf( stderr, "-dosver: Wrong version format. Use \"-dosver x.xx\"\n");
125 /**********************************************************************
126 * VERSION_GetVersion
128 * Some version data:
129 * linker/OS/image/subsys Name Intended for
131 * 2.39/1.00/0.00/3.10 freecell.exe Win32s (any version)
132 * 2.55/1.00/0.00/4.00 acrord32.exe Win32s, Win95 supported (?)
134 * 2.50/1.00/4.00/4.00 winhlp32.exe Win32s 1.30
135 * 4.20/4.00/1.00/4.00 Asuslm.exe Win95 (Aaargh !)
136 * 5.12/4.00/1.07/4.00 clikfixi.exe NT 4 (service pack files)
137 * 3.10/4.00/4.00/4.00 PLUMBING.EXE NT
138 * ?.??/4.00/97.01/4.00 sse.exe huh ?? (damn crackerz ;)
139 * 6.00/5.00/5.00/4.00 NT 4 driver update (strange numbers)
141 * Common versions:
142 * x.xx/1.00/0.00/3.10 Win32s (any version ?)
143 * 2.xx/1.00/0.00/4.00 Win95 (Microsoft/system files)
144 * x.xx/4.00/0.00/4.00 Win95 (most applications !)
145 * x.xx/4.00/4.00/4.00 NT 4 (most apps)
146 * x.xx/5.00/5.00/4.00 NT 4 newer files / NT 5 ??
148 WINDOWS_VERSION VERSION_GetVersion(void)
150 PIMAGE_NT_HEADERS peheader;
151 PDB *pdb = PROCESS_Current();
153 if (versionForced) /* user has overridden any sensible checks */
154 return defaultWinVersion;
155 if (!pdb->exe_modref)
157 /* HACK: if we have loaded a PE image into this address space,
158 * we are probably using thunks, so Win95 is our best bet
160 if (pdb->modref_list) return WIN95;
162 /* FIXME: hmm, do anything else ?
163 TDB.version doesn't help here
164 as it always holds version 3.10 */
165 return WIN31;
167 peheader = PE_HEADER(pdb->exe_modref->module);
169 TRACE(ver, "%02x.%02x/%02x.%02x/%02x.%02x/%02x.%02x\n",
170 peheader->OptionalHeader.MajorLinkerVersion,
171 peheader->OptionalHeader.MinorLinkerVersion,
172 peheader->OptionalHeader.MajorOperatingSystemVersion,
173 peheader->OptionalHeader.MinorOperatingSystemVersion,
174 peheader->OptionalHeader.MajorImageVersion,
175 peheader->OptionalHeader.MinorImageVersion,
176 peheader->OptionalHeader.MajorSubsystemVersion,
177 peheader->OptionalHeader.MinorSubsystemVersion);
179 if (peheader->OptionalHeader.MajorSubsystemVersion == 4)
181 if (peheader->OptionalHeader.MajorOperatingSystemVersion == 4)
183 if ((peheader->OptionalHeader.MajorImageVersion == 0) &&
184 (peheader->OptionalHeader.SectionAlignment == 4096))
185 return WIN95;
186 return NT40;
188 if (peheader->OptionalHeader.MajorOperatingSystemVersion == 1) return WIN95;
189 if (peheader->OptionalHeader.MajorOperatingSystemVersion == 5)
190 return NT40; /* FIXME: this is NT 5, isn't it ? */
192 if (peheader->OptionalHeader.MajorSubsystemVersion == 3)
194 /* 3.1x versions */
195 if (peheader->OptionalHeader.MinorSubsystemVersion <= 11)
197 if (peheader->OptionalHeader.Subsystem == IMAGE_SUBSYSTEM_WINDOWS_CUI)
198 return NT351; /* FIXME: NT 3.1 */
199 else
200 return WIN31;
202 /* NT 3.51 */
203 if (peheader->OptionalHeader.MinorSubsystemVersion == 50) return NT351;
204 if (peheader->OptionalHeader.MinorSubsystemVersion == 51) return NT351;
206 if (peheader->OptionalHeader.MajorSubsystemVersion)
207 ERR(ver,"unknown subsystem version: %04x.%04x, please report.\n",
208 peheader->OptionalHeader.MajorSubsystemVersion,
209 peheader->OptionalHeader.MinorSubsystemVersion );
210 return defaultWinVersion;
214 /**********************************************************************
215 * VERSION_GetVersionName
217 char *VERSION_GetVersionName()
219 WINDOWS_VERSION ver = VERSION_GetVersion();
220 switch(ver)
222 case WIN31:
223 return "Windows 3.1";
224 case WIN95:
225 return "Windows 95";
226 case NT351:
227 return "Windows NT 3.51";
228 case NT40:
229 return "Windows NT 4.0";
230 default:
231 FIXME(ver,"Windows version %d not named",ver);
232 return "Windows <Unknown>";
236 /***********************************************************************
237 * GetVersion16 (KERNEL.3)
239 LONG WINAPI GetVersion16(void)
241 WINDOWS_VERSION ver = VERSION_GetVersion();
242 return VersionData[ver].getVersion16;
246 /***********************************************************************
247 * GetVersion32 (KERNEL32.427)
249 LONG WINAPI GetVersion(void)
251 WINDOWS_VERSION ver = VERSION_GetVersion();
252 return VersionData[ver].getVersion32;
256 /***********************************************************************
257 * GetVersionEx16 (KERNEL.149)
259 BOOL16 WINAPI GetVersionEx16(OSVERSIONINFO16 *v)
261 WINDOWS_VERSION ver = VERSION_GetVersion();
262 if (v->dwOSVersionInfoSize != sizeof(OSVERSIONINFO16))
264 WARN(ver,"wrong OSVERSIONINFO size from app");
265 return FALSE;
267 v->dwMajorVersion = VersionData[ver].getVersionEx.dwMajorVersion;
268 v->dwMinorVersion = VersionData[ver].getVersionEx.dwMinorVersion;
269 v->dwBuildNumber = VersionData[ver].getVersionEx.dwBuildNumber;
270 v->dwPlatformId = VersionData[ver].getVersionEx.dwPlatformId;
271 strcpy( v->szCSDVersion, VersionData[ver].getVersionEx.szCSDVersion );
272 return TRUE;
276 /***********************************************************************
277 * GetVersionEx32A (KERNEL32.428)
279 BOOL WINAPI GetVersionExA(OSVERSIONINFOA *v)
281 WINDOWS_VERSION ver = VERSION_GetVersion();
282 if (v->dwOSVersionInfoSize != sizeof(OSVERSIONINFOA))
284 WARN(ver,"wrong OSVERSIONINFO size from app");
285 return FALSE;
287 v->dwMajorVersion = VersionData[ver].getVersionEx.dwMajorVersion;
288 v->dwMinorVersion = VersionData[ver].getVersionEx.dwMinorVersion;
289 v->dwBuildNumber = VersionData[ver].getVersionEx.dwBuildNumber;
290 v->dwPlatformId = VersionData[ver].getVersionEx.dwPlatformId;
291 strcpy( v->szCSDVersion, VersionData[ver].getVersionEx.szCSDVersion );
292 return TRUE;
296 /***********************************************************************
297 * GetVersionEx32W (KERNEL32.429)
299 BOOL WINAPI GetVersionExW(OSVERSIONINFOW *v)
301 WINDOWS_VERSION ver = VERSION_GetVersion();
303 if (v->dwOSVersionInfoSize!=sizeof(OSVERSIONINFOW))
305 WARN(ver,"wrong OSVERSIONINFO size from app");
306 return FALSE;
308 v->dwMajorVersion = VersionData[ver].getVersionEx.dwMajorVersion;
309 v->dwMinorVersion = VersionData[ver].getVersionEx.dwMinorVersion;
310 v->dwBuildNumber = VersionData[ver].getVersionEx.dwBuildNumber;
311 v->dwPlatformId = VersionData[ver].getVersionEx.dwPlatformId;
312 lstrcpyAtoW( v->szCSDVersion, VersionData[ver].getVersionEx.szCSDVersion );
313 return TRUE;
317 /***********************************************************************
318 * GetWinFlags (KERNEL.132)
320 DWORD WINAPI GetWinFlags16(void)
322 static const long cpuflags[5] =
323 { WF_CPU086, WF_CPU186, WF_CPU286, WF_CPU386, WF_CPU486 };
324 SYSTEM_INFO si;
325 OSVERSIONINFOA ovi;
326 DWORD result;
328 GetSystemInfo(&si);
330 /* There doesn't seem to be any Pentium flag. */
331 result = cpuflags[MIN (si.wProcessorLevel, 4)];
333 switch(Options.mode)
335 case MODE_STANDARD:
336 result |= WF_STANDARD | WF_PMODE | WF_80x87;
337 break;
339 case MODE_ENHANCED:
340 result |= WF_ENHANCED | WF_PMODE | WF_80x87 | WF_PAGING;
341 break;
343 default:
344 ERR(ver, "Unknown mode set? This shouldn't happen. Check GetWinFlags()!\n");
345 break;
347 if (si.wProcessorLevel >= 4) result |= WF_HASCPUID;
348 ovi.dwOSVersionInfoSize = sizeof(ovi);
349 GetVersionExA(&ovi);
350 if (ovi.dwPlatformId == VER_PLATFORM_WIN32_NT)
351 result |= WF_WIN32WOW; /* undocumented WF_WINNT */
352 return result;
356 /***********************************************************************
357 * GetWinDebugInfo (KERNEL.355)
359 BOOL16 WINAPI GetWinDebugInfo16(WINDEBUGINFO *lpwdi, UINT16 flags)
361 FIXME(ver, "(%8lx,%d): stub returning 0\n",
362 (unsigned long)lpwdi, flags);
363 /* 0 means not in debugging mode/version */
364 /* Can this type of debugging be used in wine ? */
365 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
366 return 0;
370 /***********************************************************************
371 * SetWinDebugInfo (KERNEL.356)
373 BOOL16 WINAPI SetWinDebugInfo16(WINDEBUGINFO *lpwdi)
375 FIXME(ver, "(%8lx): stub returning 0\n", (unsigned long)lpwdi);
376 /* 0 means not in debugging mode/version */
377 /* Can this type of debugging be used in wine ? */
378 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
379 return 0;
383 /***********************************************************************
384 * DebugFillBuffer (KERNEL.329)
386 * TODO:
387 * Should fill lpBuffer only if DBO_BUFFERFILL has been set by SetWinDebugInfo()
389 void WINAPI DebugFillBuffer(LPSTR lpBuffer, WORD wBytes)
391 memset(lpBuffer, DBGFILL_BUFFER, wBytes);
394 /***********************************************************************
395 * DiagQuery (KERNEL.339)
397 * returns TRUE if Win called with "/b" (bootlog.txt)
399 BOOL16 WINAPI DiagQuery16()
401 /* perhaps implement a Wine "/b" command line flag sometime ? */
402 return FALSE;
405 /***********************************************************************
406 * DiagOutput (KERNEL.340)
408 * writes a debug string into <windir>\bootlog.txt
410 void WINAPI DiagOutput16(LPCSTR str)
412 /* FIXME */
413 DPRINTF("DIAGOUTPUT:%s\n", debugstr_a(str));
416 /***********************************************************************
417 * OaBuildVersion [OLEAUT32.170]
419 UINT WINAPI OaBuildVersion()
421 WINDOWS_VERSION ver = VERSION_GetVersion();
423 FIXME(ver, "Please report to a.mohr@mailto.de if you get version error messages !\n");
424 switch(VersionData[ver].getVersion32)
426 case 0x80000a03: /* Win 3.1 */
427 return 0x140fd1; /* from Win32s 1.1e */
428 case 0xc0000004: /* Win 95 */
429 return 0x1e10a9; /* some older version: 0x0a0bd3 */
430 case 0x04213303: /* NT 3.51 */
431 FIXME(ver, "NT 3.51 version value unknown !\n");
432 return 0x1e10a9; /* value borrowed from Win95 */
433 case 0x05650004: /* NT 4.0 */
434 return 0x141016;
435 default:
436 return 0x0;
439 /***********************************************************************
440 * VERSION_OsIsUnicode [internal]
442 * NOTES
443 * some functions getting sometimes LPSTR sometimes LPWSTR...
446 BOOL VERSION_OsIsUnicode(void)
448 switch(VERSION_GetVersion())
450 case NT351:
451 case NT40:
452 return TRUE;
453 default:
454 return FALSE;