misc/version.c

   1 /*
   2  * Windows and DOS version functions
   3  *
   4  * Copyright 1997 Alexandre Julliard
   5  * Copyright 1997 Marcus Meissner
   6  * Copyright 1998 Patrik Stridvall
   7  * Copyright 1998 Andreas Mohr
   8  */
   9
  10 #include <string.h>
  11 #include <stdlib.h>
  12 #include <stdio.h>
  13 #include "windef.h"
  14 #include "winbase.h"
  15 #include "wingdi.h"
  16 #include "winuser.h"
  17 #include "wine/winbase16.h"
  18 #include "wine/winestring.h"
  19 #include "process.h"
  20 #include "options.h"
  21 #include "debugtools.h"
  22 #include "neexe.h"
  23 #include "winerror.h"
  24
  25 DEFAULT_DEBUG_CHANNEL(ver);
  26
  27 typedef enum
  28 {
  29     WIN31, /* Windows 3.1 */
  30     WIN95,   /* Windows 95 */
  31     WIN98,   /* Windows 98 */
  32     NT351,   /* Windows NT 3.51 */
  33     NT40,    /* Windows NT 4.0 */
  34     NB_WINDOWS_VERSIONS
  35 } WINDOWS_VERSION;
  36
  37 typedef struct
  38 {
  39     LONG             getVersion16;
  40     LONG             getVersion32;
  41     OSVERSIONINFOA getVersionEx;
  42 } VERSION_DATA;
  43
  44 /* FIXME: compare values below with original and fix */
  45 static VERSION_DATA VersionData[NB_WINDOWS_VERSIONS] =
  46 {
  47     /* WIN31 */
  48     {
  49         MAKELONG( 0x0a03, 0x0616 ), /* DOS 6.22 */
  50         MAKELONG( 0x0a03, 0x8000 ),
  51         {
  52             sizeof(OSVERSIONINFOA), 3, 10, 0,
  53             VER_PLATFORM_WIN32s, "Win32s 1.3"
  54         }
  55     },
  56     /* WIN95 */
  57     {
  58         0x07005F03,
  59         0xC0000004,
  60         {
  61             sizeof(OSVERSIONINFOA), 4, 0, 0x40003B6,
  62             VER_PLATFORM_WIN32_WINDOWS, "Win95"
  63         }
  64     },
  65     /* WIN98 */
  66     {
  67         0x070A5F03,
  68         0xC0000A04,
  69         {
  70             sizeof(OSVERSIONINFOA), 4, 10, 0x40A07CE,
  71             VER_PLATFORM_WIN32_WINDOWS, "Win98"
  72         }
  73     },
  74     /* NT351 */
  75     {
  76         0x05000A03,
  77         0x04213303,
  78         {
  79             sizeof(OSVERSIONINFOA), 3, 51, 0x421,
  80             VER_PLATFORM_WIN32_NT, "Service Pack 2"
  81         }
  82     },
  83     /* NT40 */
  84     {
  85         0x05000A03,
  86         0x05650004,
  87         {
  88             sizeof(OSVERSIONINFOA), 4, 0, 0x565,
  89             VER_PLATFORM_WIN32_NT, "Service Pack 3"
  90         }
  91     }
  92 };
  93
  94 static const char *WinVersionNames[NB_WINDOWS_VERSIONS] =
  95 {
  96     "win31",
  97     "win95",
  98     "win98",
  99     "nt351",
 100     "nt40"
 101 };
 102
 103 /* if one of the following dlls is importing ntdll the windows
 104 version autodetection switches wine to unicode (nt 3.51 or 4.0) */
 105 static char * special_dlls[] =
 106 {
 107         "COMDLG32",
 108         "COMCTL32",
 109         "SHELL32",
 110         "OLE32",
 111         "RPCRT4",
 112         NULL
 113 };
 114
 115 /* the current version has not been autodetected but forced via cmdline */
 116 static BOOL versionForced = FALSE;
 117 static WINDOWS_VERSION defaultWinVersion = WIN31;
 118
 119 /**********************************************************************
 120  *         VERSION_ParseWinVersion
 121  */
 122 void VERSION_ParseWinVersion( const char *arg )
 123 {
 124     int i;
 125     for (i = 0; i < NB_WINDOWS_VERSIONS; i++)
 126     {
 127         if (!strcmp( WinVersionNames[i], arg ))
 128         {
 129             defaultWinVersion = (WINDOWS_VERSION)i;
 130             versionForced = TRUE;
 131             return;
 132         }
 133     }
 134     MESSAGE("Invalid winver value '%s' specified.\n", arg );
 135     MESSAGE("Valid versions are:" );
 136     for (i = 0; i < NB_WINDOWS_VERSIONS; i++)
 137         MESSAGE(" '%s'%c", WinVersionNames[i],
 138             (i == NB_WINDOWS_VERSIONS - 1) ? '\n' : ',' );
 139     ExitProcess(1);
 140 }
 141
 142
 143 /**********************************************************************
 144  *         VERSION_ParseDosVersion
 145  */
 146 void VERSION_ParseDosVersion( const char *arg )
 147 {
 148     int hi, lo;
 149     if (sscanf( arg, "%d.%d", &hi, &lo ) == 2)
 150     {
 151         VersionData[WIN31].getVersion16 =
 152             MAKELONG(LOWORD(VersionData[WIN31].getVersion16),
 153                      (hi<<8) + lo);
 154     }
 155     else
 156     {
 157         MESSAGE("--dosver: Wrong version format. Use \"--dosver x.xx\"\n");
 158         ExitProcess(1);
 159     }
 160 }
 161
 162 /**********************************************************************
 163  *      VERSION_GetSystemDLLVersion
 164  *
 165  * This function tryes to figure out if a given (native) dll comes from
 166  * win95/98 or winnt. Since all values in the OptionalHeader are not a
 167  * usable hint, we test if a dll imports the ntdll.
 168  * This is at least working for all system-dlls like comctl32, comdlg32 and
 169  * shell32.
 170  * If you have a better idea to figure this out...
 171  */
 172 static DWORD VERSION_GetSystemDLLVersion( HMODULE hmod )
 173 {
 174     IMAGE_DATA_DIRECTORY *dir = PE_HEADER(hmod)->OptionalHeader.DataDirectory
 175                                 + IMAGE_DIRECTORY_ENTRY_IMPORT;
 176     if (dir->Size && dir->VirtualAddress)
 177     {
 178         IMAGE_IMPORT_DESCRIPTOR *pe_imp = (IMAGE_IMPORT_DESCRIPTOR *)((char *)hmod + dir->VirtualAddress);
 179         for ( ; pe_imp->Name; pe_imp++)
 180         {
 181             char * name = (char *)hmod + (unsigned int)pe_imp->Name;
 182             TRACE("%s\n", name);
 183
 184             if (!strncasecmp(name, "ntdll", 5))
 185             {
 186               if (3 == PE_HEADER(hmod)->OptionalHeader.MajorOperatingSystemVersion)
 187                 return NT351;
 188               else
 189                 return NT40;
 190             }
 191         }
 192     }
 193     return WIN95;
 194 }
 195 /**********************************************************************
 196  *      VERSION_GetLinkedDllVersion
 197  *
 198  * Some version data (not reliable!):
 199  * linker/OS/image/subsys
 200  *
 201  * x.xx/1.00/0.00/3.10  Win32s          (any version ?)
 202  * 2.39/1.00/0.00/3.10  Win32s          freecell.exe (any version)
 203  * 2.50/1.00/4.00/4.00  Win32s 1.30     winhlp32.exe
 204  * 2.60/3.51/3.51/3.51  NT351SP5        system dlls
 205  * 2.60/3.51/3.51/4.00  NT351SP5        comctl32 dll
 206  * 2.xx/1.00/0.00/4.00  Win95           system files
 207  * x.xx/4.00/0.00/4.00  Win95           most applications
 208  * 3.10/4.00/0.00/4.00  Win98           notepad
 209  * x.xx/5.00/5.00/4.00  Win98           system dlls
 210  * x.xx/4.00/4.00/4.00  NT 4            most apps
 211  * 5.12/5.00/5.00/4.00  NT4+IE5         comctl32.dll
 212  * 5.12/5.00/5.00/4.00  Win98           calc
 213  * x.xx/5.00/5.00/4.00  win95/win98/NT4 IE5 files
 214  */
 215 DWORD VERSION_GetLinkedDllVersion(PDB *pdb)
 216 {
 217         WINE_MODREF *wm;
 218         DWORD WinVersion = NB_WINDOWS_VERSIONS;
 219         PIMAGE_OPTIONAL_HEADER ophd;
 220
 221         if (!pdb->exe_modref)
 222         {
 223           if (!pdb->modref_list)
 224             return WIN31;
 225
 226           /* FIXME: The above condition will never trigger, since all our
 227            * standard dlls load their win32 equivalents. We have usually at
 228            * this point: kernel32.dll and ntdll.dll.
 229            */
 230           return WIN95;
 231         }
 232         /* First check the native dlls provided. These have to be
 233         from one windows version */
 234         for ( wm = pdb->modref_list; wm; wm=wm->next )
 235         {
 236           ophd = &(PE_HEADER(wm->module)->OptionalHeader);
 237
 238           TRACE("%s: %02x.%02x/%02x.%02x/%02x.%02x/%02x.%02x\n",
 239             wm->modname,
 240             ophd->MajorLinkerVersion, ophd->MinorLinkerVersion,
 241             ophd->MajorOperatingSystemVersion, ophd->MinorOperatingSystemVersion,
 242             ophd->MajorImageVersion, ophd->MinorImageVersion,
 243             ophd->MajorSubsystemVersion, ophd->MinorSubsystemVersion);
 244
 245           /* test if it is a external (native) dll */
 246           if (!(wm->flags & WINE_MODREF_INTERNAL))
 247           {
 248             int i;
 249             for (i = 0; special_dlls[i]; i++)
 250             {
 251               /* test if it a special dll */
 252               if (!strncasecmp(wm->modname, special_dlls[i], strlen(special_dlls[i]) ))
 253               {
 254                 DWORD DllVersion = VERSION_GetSystemDLLVersion(wm->module);
 255                 if (WinVersion == NB_WINDOWS_VERSIONS)
 256                   WinVersion = DllVersion;
 257                 else {
 258                   if (WinVersion != DllVersion) {
 259                     ERR("You mixed system dlls from different windows versions! Expect a crash! (%s: expected version '%s', but is '%s')\n",
 260                         wm->modname,
 261                         VersionData[WinVersion].getVersionEx.szCSDVersion,
 262                         VersionData[DllVersion].getVersionEx.szCSDVersion);
 263                     return WIN31; /* this may let the exe exiting */
 264                   }
 265                 }
 266                 break;
 267               }
 268             }
 269           }
 270         }
 271
 272         if(WinVersion != NB_WINDOWS_VERSIONS) return WinVersion;
 273
 274         /* we are using no external system dlls, look at the exe */
 275         ophd = &(PE_HEADER(pdb->exe_modref->module)->OptionalHeader);
 276
 277         TRACE("-%s: %02x.%02x/%02x.%02x/%02x.%02x/%02x.%02x\n",
 278             pdb->exe_modref->modname,
 279             ophd->MajorLinkerVersion, ophd->MinorLinkerVersion,
 280             ophd->MajorOperatingSystemVersion, ophd->MinorOperatingSystemVersion,
 281             ophd->MajorImageVersion, ophd->MinorImageVersion,
 282             ophd->MajorSubsystemVersion, ophd->MinorSubsystemVersion);
 283
 284         /* special nt 3.51 */
 285         if (3 == ophd->MajorOperatingSystemVersion && 51 == ophd->MinorOperatingSystemVersion)
 286         {
 287             return NT351;
 288         }
 289
 290         /* the MajorSubsystemVersion is the only usable singn */
 291         if (ophd->MajorSubsystemVersion < 4)
 292         {
 293           if ( ophd->MajorOperatingSystemVersion == 1
 294             && ophd->MinorOperatingSystemVersion == 0)
 295           {
 296             return WIN31; /* win32s */
 297           }
 298
 299           if (ophd->Subsystem == IMAGE_SUBSYSTEM_WINDOWS_CUI)
 300             return NT351; /* FIXME: NT 3.1, not tested */
 301           else
 302             return WIN95;
 303         }
 304
 305         return WIN95;
 306 }
 307
 308 /**********************************************************************
 309  *         VERSION_GetVersion
 310  *
 311  * WARNING !!!
 312  * Don't call this function too early during the Wine init,
 313  * as pdb->exe_modref (required by VERSION_GetImageVersion()) might still
 314  * be NULL in such cases, which causes the winver to ALWAYS be detected
 315  * as WIN31.
 316  * And as we cache the winver once it has been determined, this is bad.
 317  * This can happen much easier than you might think, as this function
 318  * is called by EVERY GetVersion*() API !
 319  *
 320  */
 321 static WINDOWS_VERSION VERSION_GetVersion(void)
 322 {
 323         static WORD winver = 0xffff;
 324
 325         if (versionForced) /* user has overridden any sensible checks */
 326           return defaultWinVersion;
 327
 328         if (winver == 0xffff) /* to be determined */ {
 329           WINDOWS_VERSION retver = VERSION_GetLinkedDllVersion( PROCESS_Current() );
 330
 331           if (retver != WIN31) winver = retver;
 332           return retver;
 333         }
 334         return winver;
 335 }
 336
 337
 338 /***********************************************************************
 339  *         GetVersion16   (KERNEL.3)
 340  */
 341 LONG WINAPI GetVersion16(void)
 342 {
 343     WINDOWS_VERSION ver = VERSION_GetVersion();
 344     return VersionData[ver].getVersion16;
 345 }
 346
 347
 348 /***********************************************************************
 349  *         GetVersion   (KERNEL32.427)
 350  */
 351 LONG WINAPI GetVersion(void)
 352 {
 353     WINDOWS_VERSION ver = VERSION_GetVersion();
 354     return VersionData[ver].getVersion32;
 355 }
 356
 357
 358 /***********************************************************************
 359  *         GetVersionEx16   (KERNEL.149)
 360  */
 361 BOOL16 WINAPI GetVersionEx16(OSVERSIONINFO16 *v)
 362 {
 363     WINDOWS_VERSION ver = VERSION_GetVersion();
 364     if (v->dwOSVersionInfoSize != sizeof(OSVERSIONINFO16))
 365     {
 366         WARN("wrong OSVERSIONINFO size from app");
 367         SetLastError(ERROR_INSUFFICIENT_BUFFER);
 368         return FALSE;
 369     }
 370     v->dwMajorVersion = VersionData[ver].getVersionEx.dwMajorVersion;
 371     v->dwMinorVersion = VersionData[ver].getVersionEx.dwMinorVersion;
 372     v->dwBuildNumber  = VersionData[ver].getVersionEx.dwBuildNumber;
 373     v->dwPlatformId   = VersionData[ver].getVersionEx.dwPlatformId;
 374     strcpy( v->szCSDVersion, VersionData[ver].getVersionEx.szCSDVersion );
 375     return TRUE;
 376 }
 377
 378
 379 /***********************************************************************
 380  *         GetVersionExA   (KERNEL32.428)
 381  */
 382 BOOL WINAPI GetVersionExA(OSVERSIONINFOA *v)
 383 {
 384     WINDOWS_VERSION ver = VERSION_GetVersion();
 385     if (v->dwOSVersionInfoSize != sizeof(OSVERSIONINFOA))
 386     {
 387         WARN("wrong OSVERSIONINFO size from app (got: %ld, expected: %d)",
 388                         v->dwOSVersionInfoSize, sizeof(OSVERSIONINFOA));
 389         SetLastError(ERROR_INSUFFICIENT_BUFFER);
 390         return FALSE;
 391     }
 392     v->dwMajorVersion = VersionData[ver].getVersionEx.dwMajorVersion;
 393     v->dwMinorVersion = VersionData[ver].getVersionEx.dwMinorVersion;
 394     v->dwBuildNumber  = VersionData[ver].getVersionEx.dwBuildNumber;
 395     v->dwPlatformId   = VersionData[ver].getVersionEx.dwPlatformId;
 396     strcpy( v->szCSDVersion, VersionData[ver].getVersionEx.szCSDVersion );
 397     return TRUE;
 398 }
 399
 400
 401 /***********************************************************************
 402  *         GetVersionExW   (KERNEL32.429)
 403  */
 404 BOOL WINAPI GetVersionExW(OSVERSIONINFOW *v)
 405 {
 406     WINDOWS_VERSION ver = VERSION_GetVersion();
 407
 408     if (v->dwOSVersionInfoSize!=sizeof(OSVERSIONINFOW))
 409     {
 410         WARN("wrong OSVERSIONINFO size from app (got: %ld, expected: %d)",
 411                         v->dwOSVersionInfoSize, sizeof(OSVERSIONINFOW));
 412         SetLastError(ERROR_INSUFFICIENT_BUFFER);
 413         return FALSE;
 414     }
 415     v->dwMajorVersion = VersionData[ver].getVersionEx.dwMajorVersion;
 416     v->dwMinorVersion = VersionData[ver].getVersionEx.dwMinorVersion;
 417     v->dwBuildNumber  = VersionData[ver].getVersionEx.dwBuildNumber;
 418     v->dwPlatformId   = VersionData[ver].getVersionEx.dwPlatformId;
 419     lstrcpyAtoW( v->szCSDVersion, VersionData[ver].getVersionEx.szCSDVersion );
 420     return TRUE;
 421 }
 422
 423
 424 /***********************************************************************
 425  *          GetWinFlags   (KERNEL.132)
 426  */
 427 DWORD WINAPI GetWinFlags16(void)
 428 {
 429   static const long cpuflags[5] =
 430     { WF_CPU086, WF_CPU186, WF_CPU286, WF_CPU386, WF_CPU486 };
 431   SYSTEM_INFO si;
 432   OSVERSIONINFOA ovi;
 433   DWORD result;
 434
 435   GetSystemInfo(&si);
 436
 437   /* There doesn't seem to be any Pentium flag.  */
 438   result = cpuflags[min(si.wProcessorLevel, 4)] | WF_ENHANCED | WF_PMODE | WF_80x87 | WF_PAGING;
 439   if (si.wProcessorLevel >= 4) result |= WF_HASCPUID;
 440   ovi.dwOSVersionInfoSize = sizeof(ovi);
 441   GetVersionExA(&ovi);
 442   if (ovi.dwPlatformId == VER_PLATFORM_WIN32_NT)
 443       result |= WF_WIN32WOW; /* undocumented WF_WINNT */
 444   return result;
 445 }
 446
 447
 448 /***********************************************************************
 449  *          GetWinDebugInfo   (KERNEL.355)
 450  */
 451 BOOL16 WINAPI GetWinDebugInfo16(WINDEBUGINFO *lpwdi, UINT16 flags)
 452 {
 453     FIXME("(%8lx,%d): stub returning 0\n",
 454           (unsigned long)lpwdi, flags);
 455     /* 0 means not in debugging mode/version */
 456     /* Can this type of debugging be used in wine ? */
 457     /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
 458     return 0;
 459 }
 460
 461
 462 /***********************************************************************
 463  *          SetWinDebugInfo   (KERNEL.356)
 464  */
 465 BOOL16 WINAPI SetWinDebugInfo16(WINDEBUGINFO *lpwdi)
 466 {
 467     FIXME("(%8lx): stub returning 0\n", (unsigned long)lpwdi);
 468     /* 0 means not in debugging mode/version */
 469     /* Can this type of debugging be used in wine ? */
 470     /* Constants: WDI_OPTIONS WDI_FILTER WDI_ALLOCBREAK */
 471     return 0;
 472 }
 473
 474
 475 /***********************************************************************
 476  *           DebugFillBuffer                    (KERNEL.329)
 477  *
 478  * TODO:
 479  * Should fill lpBuffer only if DBO_BUFFERFILL has been set by SetWinDebugInfo()
 480  */
 481 void WINAPI DebugFillBuffer(LPSTR lpBuffer, WORD wBytes)
 482 {
 483         memset(lpBuffer, DBGFILL_BUFFER, wBytes);
 484 }
 485
 486 /***********************************************************************
 487  *           DiagQuery                          (KERNEL.339)
 488  *
 489  * returns TRUE if Win called with "/b" (bootlog.txt)
 490  */
 491 BOOL16 WINAPI DiagQuery16()
 492 {
 493         /* perhaps implement a Wine "/b" command line flag sometime ? */
 494         return FALSE;
 495 }
 496
 497 /***********************************************************************
 498  *           DiagOutput                         (KERNEL.340)
 499  *
 500  * writes a debug string into <windir>\bootlog.txt
 501  */
 502 void WINAPI DiagOutput16(LPCSTR str)
 503 {
 504         /* FIXME */
 505         DPRINTF("DIAGOUTPUT:%s\n", debugstr_a(str));
 506 }