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