Release 980927
[wine] / misc / version.c
1 /*
2  * Windows version functions
3  *
4  * Copyright 1997 Alexandre Julliard
5  * Copyright 1997 Marcus Meissner
6  * Copyright 1998 Patrik Stridvall
7  */
8
9 #include <string.h>
10 #include "windows.h"
11 #include "winbase.h"
12 #include "process.h"
13 #include "options.h"
14 #include "debug.h"
15 #include "ole.h"
16 #include "winversion.h"
17
18 typedef struct
19 {
20     LONG             getVersion16; 
21     LONG             getVersion32;
22     OSVERSIONINFO32A getVersionEx;
23 } VERSION_DATA;
24
25
26 /* FIXME: compare values below with original and fix */
27 static const VERSION_DATA VersionData[NB_WINDOWS_VERSIONS] =
28 {
29     /* WIN31 */
30     {
31         MAKELONG( 0x0a03, 0x0616 ), /* DOS 6.22 */
32         MAKELONG( 0x0a03, 0x8000 ),
33         {
34             sizeof(OSVERSIONINFO32A), 3, 10, 0,
35             VER_PLATFORM_WIN32s, "Win32s 1.3" 
36         }
37     },
38     /* WIN95 */
39     {
40         0x07005F03,
41         0xC0000004,
42         {
43             sizeof(OSVERSIONINFO32A), 4, 0, 0x40003B6,
44             VER_PLATFORM_WIN32_WINDOWS, "Win95"
45         }
46     },
47     /* NT351 */
48     {
49         0x05000A03,
50         0x04213303,
51         {
52             sizeof(OSVERSIONINFO32A), 3, 51, 0x421,
53             VER_PLATFORM_WIN32_NT, "Service Pack 2"
54         }
55     },
56     /* NT40 */
57     {
58         0x05000A03,
59         0x05650004,
60         {
61             sizeof(OSVERSIONINFO32A), 4, 0, 0x565,
62             VER_PLATFORM_WIN32_NT, "Service Pack 3"
63         }
64     }
65 };
66
67 static const char *VersionNames[NB_WINDOWS_VERSIONS] =
68 {
69     "win31",
70     "win95",
71     "nt351",
72     "nt40"
73 };
74
75 /* the current version has not been autodetected but forced via cmdline */
76 static BOOL32 versionForced = FALSE;
77 static WINDOWS_VERSION defaultVersion = WIN31;
78
79
80 /**********************************************************************
81  *         VERSION_ParseVersion
82  */
83 void VERSION_ParseVersion( char *arg )
84 {
85     int i;
86     for (i = 0; i < NB_WINDOWS_VERSIONS; i++)
87     {
88         if (!strcmp( VersionNames[i], arg ))
89         {
90             defaultVersion = (WINDOWS_VERSION)i;
91             versionForced = TRUE;
92             return;
93         }
94     }
95     MSG("Invalid winver value '%s' specified.\n", arg );
96     MSG("Valid versions are:" );
97     for (i = 0; i < NB_WINDOWS_VERSIONS; i++)
98         MSG(" '%s'%c", VersionNames[i],
99             (i == NB_WINDOWS_VERSIONS - 1) ? '\n' : ',' );
100 }
101
102
103 /**********************************************************************
104  *         VERSION_GetVersion
105  */
106 WINDOWS_VERSION VERSION_GetVersion(void)
107 {
108     LPIMAGE_NT_HEADERS peheader;        
109
110     if (versionForced) /* user has overridden any sensible checks */
111         return defaultVersion;
112     if (!PROCESS_Current()->exe_modref)
113     {
114         /* HACK: if we have loaded a PE image into this address space,
115          * we are probably using thunks, so Win95 is our best bet
116          */
117         if (PROCESS_Current()->modref_list) return WIN95;
118         return WIN31; /* FIXME: hmm, look at DDB.version ? */
119     }
120     peheader = PE_HEADER(PROCESS_Current()->exe_modref->module);
121     if (peheader->OptionalHeader.MajorSubsystemVersion == 4)
122         /* FIXME: NT4 has the same majorversion; add a check here for it. */
123         return WIN95;
124     if (peheader->OptionalHeader.MajorSubsystemVersion == 3)
125     {
126         /* Win3.10 */
127         if (peheader->OptionalHeader.MinorSubsystemVersion <= 11) return WIN31;
128         /* NT 3.51 */
129         if (peheader->OptionalHeader.MinorSubsystemVersion == 50) return NT351;
130         if (peheader->OptionalHeader.MinorSubsystemVersion == 51) return NT351;
131     }
132     ERR(ver,"unknown subsystem version: %04x.%04x, please report.\n",
133         peheader->OptionalHeader.MajorSubsystemVersion,
134         peheader->OptionalHeader.MinorSubsystemVersion );
135     return defaultVersion;
136 }
137
138
139 /**********************************************************************
140  *         VERSION_GetVersionName
141  */
142 char *VERSION_GetVersionName()
143 {
144   WINDOWS_VERSION ver = VERSION_GetVersion();
145   switch(ver)
146     {
147     case WIN31:
148       return "Windows 3.1";
149     case WIN95:  
150       return "Windows 95";
151     case NT351:
152       return "Windows NT 3.51";
153     case NT40:
154       return "Windows NT 4.0";
155     default:
156       FIXME(ver,"Windows version %d not named",ver);
157       return "Windows <Unknown>";
158     }
159 }
160
161 /***********************************************************************
162  *         GetVersion16   (KERNEL.3)
163  */
164 LONG WINAPI GetVersion16(void)
165 {
166     WINDOWS_VERSION ver = VERSION_GetVersion();
167     return VersionData[ver].getVersion16;
168 }
169
170
171 /***********************************************************************
172  *         GetVersion32   (KERNEL32.427)
173  */
174 LONG WINAPI GetVersion32(void)
175 {
176     WINDOWS_VERSION ver = VERSION_GetVersion();
177     return VersionData[ver].getVersion32;
178 }
179
180
181 /***********************************************************************
182  *         GetVersionEx16   (KERNEL.149)
183  */
184 BOOL16 WINAPI GetVersionEx16(OSVERSIONINFO16 *v)
185 {
186     WINDOWS_VERSION ver = VERSION_GetVersion();
187     if (v->dwOSVersionInfoSize != sizeof(OSVERSIONINFO16))
188     {
189         WARN(ver,"wrong OSVERSIONINFO size from app");
190         return FALSE;
191     }
192     v->dwMajorVersion = VersionData[ver].getVersionEx.dwMajorVersion;
193     v->dwMinorVersion = VersionData[ver].getVersionEx.dwMinorVersion;
194     v->dwBuildNumber  = VersionData[ver].getVersionEx.dwBuildNumber;
195     v->dwPlatformId   = VersionData[ver].getVersionEx.dwPlatformId;
196     strcpy( v->szCSDVersion, VersionData[ver].getVersionEx.szCSDVersion );
197     return TRUE;
198 }
199
200
201 /***********************************************************************
202  *         GetVersionEx32A   (KERNEL32.428)
203  */
204 BOOL32 WINAPI GetVersionEx32A(OSVERSIONINFO32A *v)
205 {
206     WINDOWS_VERSION ver = VERSION_GetVersion();
207     if (v->dwOSVersionInfoSize != sizeof(OSVERSIONINFO32A))
208     {
209         WARN(ver,"wrong OSVERSIONINFO size from app");
210         return FALSE;
211     }
212     v->dwMajorVersion = VersionData[ver].getVersionEx.dwMajorVersion;
213     v->dwMinorVersion = VersionData[ver].getVersionEx.dwMinorVersion;
214     v->dwBuildNumber  = VersionData[ver].getVersionEx.dwBuildNumber;
215     v->dwPlatformId   = VersionData[ver].getVersionEx.dwPlatformId;
216     strcpy( v->szCSDVersion, VersionData[ver].getVersionEx.szCSDVersion );
217     return TRUE;
218 }
219
220
221 /***********************************************************************
222  *         GetVersionEx32W   (KERNEL32.429)
223  */
224 BOOL32 WINAPI GetVersionEx32W(OSVERSIONINFO32W *v)
225 {
226     WINDOWS_VERSION ver = VERSION_GetVersion();
227
228     if (v->dwOSVersionInfoSize!=sizeof(OSVERSIONINFO32W))
229     {
230         WARN(ver,"wrong OSVERSIONINFO size from app");
231         return FALSE;
232     }
233     v->dwMajorVersion = VersionData[ver].getVersionEx.dwMajorVersion;
234     v->dwMinorVersion = VersionData[ver].getVersionEx.dwMinorVersion;
235     v->dwBuildNumber  = VersionData[ver].getVersionEx.dwBuildNumber;
236     v->dwPlatformId   = VersionData[ver].getVersionEx.dwPlatformId;
237     lstrcpyAtoW( v->szCSDVersion, VersionData[ver].getVersionEx.szCSDVersion );
238     return TRUE;
239 }
240
241
242 /***********************************************************************
243  *          GetWinFlags   (KERNEL.132)
244  */
245 DWORD WINAPI GetWinFlags(void)
246 {
247   static const long cpuflags[5] =
248     { WF_CPU086, WF_CPU186, WF_CPU286, WF_CPU386, WF_CPU486 };
249   SYSTEM_INFO si;
250   OSVERSIONINFO32A ovi;
251   DWORD result;
252
253   GetSystemInfo(&si);
254
255   /* There doesn't seem to be any Pentium flag.  */
256   result = cpuflags[MIN (si.wProcessorLevel, 4)];
257
258   switch(Options.mode)
259   {
260   case MODE_STANDARD:
261       result |= WF_STANDARD | WF_PMODE | WF_80x87;
262       break;
263
264   case MODE_ENHANCED:
265       result |= WF_ENHANCED | WF_PMODE | WF_80x87 | WF_PAGING;
266       break;
267
268   default:
269       ERR(ver, "Unknown mode set? This shouldn't happen. Check GetWinFlags()!\n");
270       break;
271   }
272   if (si.wProcessorLevel >= 4) result |= WF_HASCPUID;
273   ovi.dwOSVersionInfoSize = sizeof(ovi);
274   GetVersionEx32A(&ovi);
275   if (ovi.dwPlatformId == VER_PLATFORM_WIN32_NT)
276       result |= WF_WIN32WOW; /* undocumented WF_WINNT */
277   return result;
278 }
279
280
281 /***********************************************************************
282  *          GetWinDebugInfo   (KERNEL.355)
283  */
284 BOOL16 WINAPI GetWinDebugInfo(WINDEBUGINFO *lpwdi, UINT16 flags)
285 {
286     FIXME(ver, "(%8lx,%d): stub returning 0\n",
287           (unsigned long)lpwdi, flags);
288     /* 0 means not in debugging mode/version */
289     /* Can this type of debugging be used in wine ? */
290     /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
291     return 0;
292 }
293
294
295 /***********************************************************************
296  *          SetWinDebugInfo   (KERNEL.356)
297  */
298 BOOL16 WINAPI SetWinDebugInfo(WINDEBUGINFO *lpwdi)
299 {
300     FIXME(ver, "(%8lx): stub returning 0\n", (unsigned long)lpwdi);
301     /* 0 means not in debugging mode/version */
302     /* Can this type of debugging be used in wine ? */
303     /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
304     return 0;
305 }
306
307
308 /***********************************************************************
309  *           DebugFillBuffer                    (KERNEL.329)
310  *
311  * TODO:
312  * Should fill lpBuffer only if DBO_BUFFERFILL has been set by SetWinDebugInfo()
313  */
314 void WINAPI DebugFillBuffer(LPSTR lpBuffer, WORD wBytes)
315 {
316         memset(lpBuffer, DBGFILL_BUFFER, wBytes);
317 }
318
319 /***********************************************************************
320  *           DiagQuery                          (KERNEL.339)
321  *
322  * returns TRUE if Win called with "/b" (bootlog.txt)
323  */
324 BOOL16 WINAPI DiagQuery()
325 {
326         /* perhaps implement a Wine "/b" command line flag sometime ? */
327         return FALSE;
328 }
329
330 /***********************************************************************
331  *           DiagOutput                         (KERNEL.340)
332  *
333  * writes a debug string into <windir>\bootlog.txt
334  */
335 void WINAPI DiagOutput(LPCSTR str)
336 {
337         /* FIXME */
338         DPRINTF("DIAGOUTPUT:%s\n", debugstr_a(str));
339 }
340
341 /***********************************************************************
342  *           OaBuildVersion           [OLEAUT32.170]
343  */
344 UINT32 WINAPI OaBuildVersion()
345 {
346     WINDOWS_VERSION ver = VERSION_GetVersion();
347
348     switch(VersionData[ver].getVersion32)
349     {
350         case 0x80000a03: /* Win 3.1 */
351                 return 0x140fd1; /* from Win32s 1.1e */
352         case 0xc0000004: /* Win 95 */
353                 return 0x0a0bd3;
354         case 0x04213303: /* NT 3.51 */
355                 return 0x0; /* FIXME */
356         case 0x05650004: /* NT 4.0 */
357                 return 0x141016;
358         default:
359                 return 0x0;
360     }
361 }