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
14 #include "wine/winbase16.h"
19 #include "winversion.h"
21 DEFAULT_DEBUG_CHANNEL(ver
)
27 OSVERSIONINFOA getVersionEx
;
31 /* FIXME: compare values below with original and fix */
32 static VERSION_DATA VersionData
[NB_WINDOWS_VERSIONS
] =
36 MAKELONG( 0x0a03, 0x0616 ), /* DOS 6.22 */
37 MAKELONG( 0x0a03, 0x8000 ),
39 sizeof(OSVERSIONINFOA
), 3, 10, 0,
40 VER_PLATFORM_WIN32s
, "Win32s 1.3"
48 sizeof(OSVERSIONINFOA
), 4, 0, 0x40003B6,
49 VER_PLATFORM_WIN32_WINDOWS
, "Win95"
57 sizeof(OSVERSIONINFOA
), 3, 51, 0x421,
58 VER_PLATFORM_WIN32_NT
, "Service Pack 2"
66 sizeof(OSVERSIONINFOA
), 4, 0, 0x565,
67 VER_PLATFORM_WIN32_NT
, "Service Pack 3"
72 static const char *WinVersionNames
[NB_WINDOWS_VERSIONS
] =
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
)
91 for (i
= 0; i
< NB_WINDOWS_VERSIONS
; i
++)
93 if (!strcmp( WinVersionNames
[i
], arg
))
95 defaultWinVersion
= (WINDOWS_VERSION
)i
;
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
)
114 if (sscanf( arg
, "%d.%d", &hi
, &lo
) == 2)
116 VersionData
[WIN31
].getVersion16
=
117 MAKELONG(LOWORD(VersionData
[WIN31
].getVersion16
),
121 fprintf( stderr
, "-dosver: Wrong version format. Use \"-dosver x.xx\"\n");
125 /**********************************************************************
128 WINDOWS_VERSION
VERSION_GetVersion(void)
130 PIMAGE_NT_HEADERS peheader
;
132 if (versionForced
) /* user has overridden any sensible checks */
133 return defaultWinVersion
;
134 if (!PROCESS_Current()->exe_modref
)
136 /* HACK: if we have loaded a PE image into this address space,
137 * we are probably using thunks, so Win95 is our best bet
139 if (PROCESS_Current()->modref_list
) return WIN95
;
140 return WIN31
; /* FIXME: hmm, look at DDB.version ? */
142 peheader
= PE_HEADER(PROCESS_Current()->exe_modref
->module
);
143 if (peheader
->OptionalHeader
.MajorSubsystemVersion
== 4) {
144 /* FIXME: check probably not 100% good, verify with win98 too */
145 if (peheader
->OptionalHeader
.MajorOperatingSystemVersion
== 4)
149 if (peheader
->OptionalHeader
.MajorSubsystemVersion
== 3)
152 if (peheader
->OptionalHeader
.MinorSubsystemVersion
<= 11) return WIN31
;
154 if (peheader
->OptionalHeader
.MinorSubsystemVersion
== 50) return NT351
;
155 if (peheader
->OptionalHeader
.MinorSubsystemVersion
== 51) return NT351
;
157 if (peheader
->OptionalHeader
.MajorSubsystemVersion
)
158 ERR(ver
,"unknown subsystem version: %04x.%04x, please report.\n",
159 peheader
->OptionalHeader
.MajorSubsystemVersion
,
160 peheader
->OptionalHeader
.MinorSubsystemVersion
);
161 return defaultWinVersion
;
165 /**********************************************************************
166 * VERSION_GetVersionName
168 char *VERSION_GetVersionName()
170 WINDOWS_VERSION ver
= VERSION_GetVersion();
174 return "Windows 3.1";
178 return "Windows NT 3.51";
180 return "Windows NT 4.0";
182 FIXME(ver
,"Windows version %d not named",ver
);
183 return "Windows <Unknown>";
187 /***********************************************************************
188 * GetVersion16 (KERNEL.3)
190 LONG WINAPI
GetVersion16(void)
192 WINDOWS_VERSION ver
= VERSION_GetVersion();
193 return VersionData
[ver
].getVersion16
;
197 /***********************************************************************
198 * GetVersion32 (KERNEL32.427)
200 LONG WINAPI
GetVersion(void)
202 WINDOWS_VERSION ver
= VERSION_GetVersion();
203 return VersionData
[ver
].getVersion32
;
207 /***********************************************************************
208 * GetVersionEx16 (KERNEL.149)
210 BOOL16 WINAPI
GetVersionEx16(OSVERSIONINFO16
*v
)
212 WINDOWS_VERSION ver
= VERSION_GetVersion();
213 if (v
->dwOSVersionInfoSize
!= sizeof(OSVERSIONINFO16
))
215 WARN(ver
,"wrong OSVERSIONINFO size from app");
218 v
->dwMajorVersion
= VersionData
[ver
].getVersionEx
.dwMajorVersion
;
219 v
->dwMinorVersion
= VersionData
[ver
].getVersionEx
.dwMinorVersion
;
220 v
->dwBuildNumber
= VersionData
[ver
].getVersionEx
.dwBuildNumber
;
221 v
->dwPlatformId
= VersionData
[ver
].getVersionEx
.dwPlatformId
;
222 strcpy( v
->szCSDVersion
, VersionData
[ver
].getVersionEx
.szCSDVersion
);
227 /***********************************************************************
228 * GetVersionEx32A (KERNEL32.428)
230 BOOL WINAPI
GetVersionExA(OSVERSIONINFOA
*v
)
232 WINDOWS_VERSION ver
= VERSION_GetVersion();
233 if (v
->dwOSVersionInfoSize
!= sizeof(OSVERSIONINFOA
))
235 WARN(ver
,"wrong OSVERSIONINFO size from app");
238 v
->dwMajorVersion
= VersionData
[ver
].getVersionEx
.dwMajorVersion
;
239 v
->dwMinorVersion
= VersionData
[ver
].getVersionEx
.dwMinorVersion
;
240 v
->dwBuildNumber
= VersionData
[ver
].getVersionEx
.dwBuildNumber
;
241 v
->dwPlatformId
= VersionData
[ver
].getVersionEx
.dwPlatformId
;
242 strcpy( v
->szCSDVersion
, VersionData
[ver
].getVersionEx
.szCSDVersion
);
247 /***********************************************************************
248 * GetVersionEx32W (KERNEL32.429)
250 BOOL WINAPI
GetVersionExW(OSVERSIONINFOW
*v
)
252 WINDOWS_VERSION ver
= VERSION_GetVersion();
254 if (v
->dwOSVersionInfoSize
!=sizeof(OSVERSIONINFOW
))
256 WARN(ver
,"wrong OSVERSIONINFO size from app");
259 v
->dwMajorVersion
= VersionData
[ver
].getVersionEx
.dwMajorVersion
;
260 v
->dwMinorVersion
= VersionData
[ver
].getVersionEx
.dwMinorVersion
;
261 v
->dwBuildNumber
= VersionData
[ver
].getVersionEx
.dwBuildNumber
;
262 v
->dwPlatformId
= VersionData
[ver
].getVersionEx
.dwPlatformId
;
263 lstrcpyAtoW( v
->szCSDVersion
, VersionData
[ver
].getVersionEx
.szCSDVersion
);
268 /***********************************************************************
269 * GetWinFlags (KERNEL.132)
271 DWORD WINAPI
GetWinFlags16(void)
273 static const long cpuflags
[5] =
274 { WF_CPU086
, WF_CPU186
, WF_CPU286
, WF_CPU386
, WF_CPU486
};
281 /* There doesn't seem to be any Pentium flag. */
282 result
= cpuflags
[MIN (si
.wProcessorLevel
, 4)];
287 result
|= WF_STANDARD
| WF_PMODE
| WF_80x87
;
291 result
|= WF_ENHANCED
| WF_PMODE
| WF_80x87
| WF_PAGING
;
295 ERR(ver
, "Unknown mode set? This shouldn't happen. Check GetWinFlags()!\n");
298 if (si
.wProcessorLevel
>= 4) result
|= WF_HASCPUID
;
299 ovi
.dwOSVersionInfoSize
= sizeof(ovi
);
301 if (ovi
.dwPlatformId
== VER_PLATFORM_WIN32_NT
)
302 result
|= WF_WIN32WOW
; /* undocumented WF_WINNT */
307 /***********************************************************************
308 * GetWinDebugInfo (KERNEL.355)
310 BOOL16 WINAPI
GetWinDebugInfo16(WINDEBUGINFO
*lpwdi
, UINT16 flags
)
312 FIXME(ver
, "(%8lx,%d): stub returning 0\n",
313 (unsigned long)lpwdi
, flags
);
314 /* 0 means not in debugging mode/version */
315 /* Can this type of debugging be used in wine ? */
316 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
321 /***********************************************************************
322 * SetWinDebugInfo (KERNEL.356)
324 BOOL16 WINAPI
SetWinDebugInfo16(WINDEBUGINFO
*lpwdi
)
326 FIXME(ver
, "(%8lx): stub returning 0\n", (unsigned long)lpwdi
);
327 /* 0 means not in debugging mode/version */
328 /* Can this type of debugging be used in wine ? */
329 /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
334 /***********************************************************************
335 * DebugFillBuffer (KERNEL.329)
338 * Should fill lpBuffer only if DBO_BUFFERFILL has been set by SetWinDebugInfo()
340 void WINAPI
DebugFillBuffer(LPSTR lpBuffer
, WORD wBytes
)
342 memset(lpBuffer
, DBGFILL_BUFFER
, wBytes
);
345 /***********************************************************************
346 * DiagQuery (KERNEL.339)
348 * returns TRUE if Win called with "/b" (bootlog.txt)
350 BOOL16 WINAPI
DiagQuery16()
352 /* perhaps implement a Wine "/b" command line flag sometime ? */
356 /***********************************************************************
357 * DiagOutput (KERNEL.340)
359 * writes a debug string into <windir>\bootlog.txt
361 void WINAPI
DiagOutput16(LPCSTR str
)
364 DPRINTF("DIAGOUTPUT:%s\n", debugstr_a(str
));
367 /***********************************************************************
368 * OaBuildVersion [OLEAUT32.170]
370 UINT WINAPI
OaBuildVersion()
372 WINDOWS_VERSION ver
= VERSION_GetVersion();
374 FIXME(ver
, "Please report to a.mohr@mailto.de if you get version error messages !\n");
375 switch(VersionData
[ver
].getVersion32
)
377 case 0x80000a03: /* Win 3.1 */
378 return 0x140fd1; /* from Win32s 1.1e */
379 case 0xc0000004: /* Win 95 */
380 return 0x1e10a9; /* some older version: 0x0a0bd3 */
381 case 0x04213303: /* NT 3.51 */
382 FIXME(ver
, "NT 3.51 version value unknown !\n");
383 return 0x1e10a9; /* value borrowed from Win95 */
384 case 0x05650004: /* NT 4.0 */
390 /***********************************************************************
391 * VERSION_OsIsUnicode [internal]
394 * some functions getting sometimes LPSTR sometimes LPWSTR...
397 BOOL
VERSION_OsIsUnicode(void)
399 switch(VERSION_GetVersion())