/* $Id: version.cpp,v 1.9 2002-07-05 14:48:06 sandervl Exp $ */

/*
 * Win32 compatibility file functions for OS/2
 *
 * Copyright 1998-2000 Sander van Leeuwen
 * Copyright 1998 Patrick Haller
 *
 * Based on Wine code: (misc\version.c)
 * Copyright 1997 Alexandre Julliard
 * Copyright 1997 Marcus Meissner
 * Copyright 1998 Patrik Stridvall
 * Copyright 1998 Andreas Mohr
 *
 * Project Odin Software License can be found in LICENSE.TXT
 *
 */

#include <odin.h>
#include <odinwrap.h>
#include <os2sel.h>

#include <os2win.h>
#include <winnt.h>
#include <winnls.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <heapstring.h>

#include <misc.h>
#include "heap.h"
#include <handlemanager.h>
#include "wprocess.h"
#include "oslibdos.h"
#include <versionos2.h>
#include "profile.h"

#define DBG_LOCALLOG	DBG_version
#include "dbglocal.h"
#include "debugtools.h"

typedef struct
{
    LONG             getVersion16;
    LONG             getVersion;
    OSVERSIONINFOEXA getVersionEx;
} VERSION_DATA;

static VERSION_DATA VersionData[WINVERSION_MAX] =
{
    // Windows 98
    {
        0x070A5F03,
	0xC0000A04,
	{
	    sizeof(OSVERSIONINFOA), 4, 10, 0x40A07CE,
	    VER_PLATFORM_WIN32_WINDOWS, "Win98",
            0, 0, 0, 0
	}
    },
    // Windows ME
    {
        0x07005F03, /* Assuming DOS 7 like the other Win9x */
        0xC0005A04,
        {
            sizeof(OSVERSIONINFOA), 4, 90, 0x45A0BB8,
            VER_PLATFORM_WIN32_WINDOWS, " ",
            0, 0, 0, 0
        }
    },
    // Windows NT 4.0 (SP6)
    {
        0x05000A03,
        ODINNT_VERSION,
        {
            sizeof(OSVERSIONINFOA), ODINNT_MAJOR_VERSION, ODINNT_MINOR_VERSION, 
            ODINNT_BUILD_NR, VER_PLATFORM_WIN32_NT, ODINNT_CSDVERSION,
            6, 0, 0, 0
        }
    },
    // Windows 2000 (SP2)
    {
        0x05005F03,
        0x08930005,
        {
            sizeof(OSVERSIONINFOA), 5, 0, 0x893,
            VER_PLATFORM_WIN32_NT, "Service Pack 2",
            2, 0, 0, 0
        }
    },
    // Windows XP
    {
        0x05005F03, /* Assuming DOS 5 like the other NT */
        0x0A280105,
        {
            sizeof(OSVERSIONINFOA), 5, 1, 0xA28,
            VER_PLATFORM_WIN32_NT, "",
            0, 0, 0, 0
        }
    },
    // Windows XP SP3
    {
        0x05005F03, /* Assuming DOS 5 like the other NT */
        0x0A280105,
        {
            sizeof(OSVERSIONINFOA), 5, 1, 0xA28,
            VER_PLATFORM_WIN32_NT, "Service Pack 3",
            +3, 0, 0, 0
        }
    }
};

static BOOL fCheckVersion = FALSE;
static int  winversion    = WINVERSION_WINXPSP3;

//******************************************************************************
//******************************************************************************
void WIN32API OdinSetVersion(ULONG version) 
{
    switch(version) {
    case WINVERSION_WIN98:
    case WINVERSION_WINME:
    case WINVERSION_NT40:
    case WINVERSION_WIN2000:
    case WINVERSION_WINXP:
    case WINVERSION_WINXPSP3:
        break;
    default: 
        DebugInt3();
        return;
    }
    winversion = version;
}
//******************************************************************************
//******************************************************************************
void CheckVersion()
{
    char szVersion[16];

    if(PROFILE_GetOdinIniString(PROFILE_WINVERSION_SECTION, PROFILE_WINVERSION_KEY, 
                                "", szVersion, sizeof(szVersion)-1) > 1) 
    {
    	if(!stricmp(szVersion, PROFILE_WINVERSION_WIN98)) {
		    winversion = WINVERSION_WIN98;
	    }
	    else
	    if(!stricmp(szVersion, PROFILE_WINVERSION_WINME)) {
    		winversion = WINVERSION_WINME;
    	}
    	else
    	if(!stricmp(szVersion, PROFILE_WINVERSION_NT40)) {
		    winversion = WINVERSION_NT40;
	    }
	    else
	    if(!stricmp(szVersion, PROFILE_WINVERSION_WIN2000)) {
    		winversion = WINVERSION_WIN2000;
    	}
    	else
    	if(!stricmp(szVersion, PROFILE_WINVERSION_WINXP)) {
		    winversion = WINVERSION_WINXP;
	    }
    	else
    	if(!stricmp(szVersion, PROFILE_WINVERSION_WINXPSP3)) {
		    winversion = WINVERSION_WINXPSP3;
	    }
    }
    fCheckVersion = TRUE;
}
//******************************************************************************
//******************************************************************************
BOOL WIN32API GetVersionExA(OSVERSIONINFOA *lpVersionInformation)
{
    dprintf(("KERNEL32: GetVersionExA %x", lpVersionInformation));

    if(lpVersionInformation == NULL)
    {
    	dprintf(("ERROR: invalid parameter"));
    	SetLastError(ERROR_INVALID_PARAMETER);
        return(FALSE);
    }
    if(lpVersionInformation->dwOSVersionInfoSize < sizeof(OSVERSIONINFOA))
    {
    	dprintf(("ERROR: buffer too small (%d != %d)", lpVersionInformation->dwOSVersionInfoSize, sizeof(OSVERSIONINFOA)));
    	SetLastError(ERROR_INSUFFICIENT_BUFFER);
        return(FALSE);
    }

    if(fCheckVersion == FALSE) {
    	CheckVersion();
    }
    lpVersionInformation->dwMajorVersion = VersionData[winversion].getVersionEx.dwMajorVersion;
    lpVersionInformation->dwMinorVersion = VersionData[winversion].getVersionEx.dwMinorVersion;
    lpVersionInformation->dwBuildNumber  = VersionData[winversion].getVersionEx.dwBuildNumber;
    lpVersionInformation->dwPlatformId   = VersionData[winversion].getVersionEx.dwPlatformId;
    strcpy(lpVersionInformation->szCSDVersion, VersionData[winversion].getVersionEx.szCSDVersion );

    dprintf(("version      %x.%x", lpVersionInformation->dwMajorVersion, lpVersionInformation->dwMinorVersion));
    dprintf(("build nr     %x", lpVersionInformation->dwBuildNumber));
    dprintf(("Platform Id  %x", lpVersionInformation->dwPlatformId));
    dprintf(("szCSDVersion %s", lpVersionInformation->szCSDVersion));

    if(lpVersionInformation->dwOSVersionInfoSize == sizeof(OSVERSIONINFOEXA)) 
    {//Windows 2000 (and up) extension
        LPOSVERSIONINFOEXA lpVersionExInformation = (LPOSVERSIONINFOEXA)lpVersionInformation;

        lpVersionExInformation->wServicePackMajor = VersionData[winversion].getVersionEx.wServicePackMajor;
        lpVersionExInformation->wServicePackMinor = VersionData[winversion].getVersionEx.wServicePackMinor;
        lpVersionExInformation->wReserved[0]      = VersionData[winversion].getVersionEx.wReserved[0];
        lpVersionExInformation->wReserved[1]      = VersionData[winversion].getVersionEx.wReserved[1];
    
        dprintf(("service pack version %x.%x", lpVersionExInformation->wServicePackMajor, lpVersionExInformation->wServicePackMinor));
    }
    
    SetLastError(ERROR_SUCCESS);
    return(TRUE);
}
//******************************************************************************
//******************************************************************************
BOOL WIN32API GetVersionExW(OSVERSIONINFOW *lpVersionInformation)
{
    dprintf(("KERNEL32: GetVersionExW %x", lpVersionInformation));

    if(lpVersionInformation == NULL)
    {
	    dprintf(("ERROR: invalid parameter"));
	    SetLastError(ERROR_INVALID_PARAMETER);
        return(FALSE);
    }
    if(lpVersionInformation->dwOSVersionInfoSize < sizeof(OSVERSIONINFOW))
    {
    	dprintf(("ERROR: buffer too small"));
    	SetLastError(ERROR_INSUFFICIENT_BUFFER);
        return(FALSE);
    }

    if(fCheckVersion == FALSE) {
    	CheckVersion();
    }
    lpVersionInformation->dwMajorVersion = VersionData[winversion].getVersionEx.dwMajorVersion;
    lpVersionInformation->dwMinorVersion = VersionData[winversion].getVersionEx.dwMinorVersion;
    lpVersionInformation->dwBuildNumber  = VersionData[winversion].getVersionEx.dwBuildNumber;
    lpVersionInformation->dwPlatformId   = VersionData[winversion].getVersionEx.dwPlatformId;
    lstrcpyAtoW(lpVersionInformation->szCSDVersion, VersionData[winversion].getVersionEx.szCSDVersion);

    if(lpVersionInformation->dwOSVersionInfoSize == sizeof(OSVERSIONINFOEXW)) 
    {//Windows 2000 (and up) extension
        LPOSVERSIONINFOEXW lpVersionExInformation = (LPOSVERSIONINFOEXW)lpVersionInformation;
    
        lpVersionExInformation->wServicePackMajor = VersionData[winversion].getVersionEx.wServicePackMajor;
        lpVersionExInformation->wServicePackMinor = VersionData[winversion].getVersionEx.wServicePackMinor;
        lpVersionExInformation->wReserved[0]      = VersionData[winversion].getVersionEx.wReserved[0];
        lpVersionExInformation->wReserved[1]      = VersionData[winversion].getVersionEx.wReserved[1];
    }
    SetLastError(ERROR_SUCCESS);
    return(TRUE);
}
//******************************************************************************
//******************************************************************************
LONG WIN32API GetVersion()
{
    dprintf(("KERNEL32: GetVersion"));
    if(fCheckVersion == FALSE) {
	    CheckVersion();
    }
    return VersionData[winversion].getVersion;
}
//******************************************************************************
//******************************************************************************
 /******************************************************************************
  *        VerifyVersionInfoW   (KERNEL32.@)
  */
BOOL WINAPI VerifyVersionInfoW( /* LPOSVERSIONINFOEXW */ LPVOID lpVersionInfo, DWORD dwTypeMask,
                                 DWORDLONG dwlConditionMask)
 {
    FIXME("%p %lu %llx\n", lpVersionInfo, dwTypeMask, dwlConditionMask);
    return TRUE;
}