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