/*
 $HEADER$
 */

#include "ompi_utsname.h"

#ifdef WIN32
#   define WIN32_LEAN_AND_MEAN
#   include <windows.h>
#   undef WIN32_LEAN_AND_MEAN
#endif

/*
    This has to fill in the following information

    1. sysname: name of the operating system -- 
    2. nodename: GetComputerName
    3. release: GetVersionEx
    4. version: GetVersionEx
    5. machine: GetSystemInfo
*/
    
int uname (struct utsname *un) {

    /* 1. get the OS name */
    TCHAR env_variable[] = "OS=%OS%";
    DWORD info_buf_count;
    OSVERSIONINFO version_info;
    SYSTEM_INFO sys_info;
    TCHAR info_buf[OMPI_UTSNAME_LEN];

    info_buf_count = ExpandEnvironmentStrings( env_variable, info_buf, OMPI_UTSNAME_LEN); 
    if (0 == info_buf_count) {
        return 1;
    }

    /* unfortunately, we need to trim the first three characters from un->sysname */
    sprintf (un->sysname,"%s", info_buf+3);

    info_buf_count = OMPI_UTSNAME_LEN;
    if (!GetComputerName( un->nodename, &info_buf_count)) {
        return 1;
    }
    
    version_info.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
    if (!GetVersionEx(&version_info)) {
        return 1;
    } else {
        /* fill in both release and version information */
        sprintf (un->release, "%d.%d.%d", version_info.dwMajorVersion,
                                          version_info.dwMinorVersion,
                                          version_info.dwBuildNumber);
    }

    /* get machine information */
    GetSystemInfo(&sys_info);
    sprintf(un->machine, "%u", sys_info.dwProcessorType);

    /* version : need to ask Jeff */
    sprintf(un->version, "undefined");
    
    return 0;
}