//
// "Extension" implementation of getenv for Windows CE.
//
// I (Simon Howard) release this file to the public domain.
//

#include <stdlib.h>
#include <string.h>

#include <windows.h>
#include <lmcons.h>
#include <secext.h>
#include <shlobj.h>

#include "env.h"

static void WCharToChar(wchar_t *src, char *dest, int buf_len)
{
    unsigned int len;

    len = wcslen(src) + 1;

    WideCharToMultiByte(CP_OEMCP, 0, src, len, dest, buf_len, NULL, NULL);
}

static void SetEnvironment(char *env_string, wchar_t *wvalue)
{
    char value[MAX_PATH + 10];
    int env_len;

    // Construct the string for putenv: NAME=value

    env_len = strlen(env_string);
    strcpy(value, env_string);

    WCharToChar(wvalue, value + env_len, sizeof(value) - env_len);

    // Set the environment variable:

    putenv(value);
}

void PopulateEnvironment(void)
{
    wchar_t temp[MAX_PATH];
    DWORD buf_len;

    // Username:

    buf_len = UNLEN;
    GetUserNameExW(NameDisplay, temp, &buf_len);
    SetEnvironment("USER=", temp);
    SetEnvironment("USERNAME=", temp);

    // Temp dir:

    GetTempPathW(MAX_PATH, temp);
    SetEnvironment("TEMP=", temp);

    // Use My Documents dir as home:

    SHGetSpecialFolderPath(NULL, temp, CSIDL_PERSONAL, 0);
    SetEnvironment("HOME=", temp);
}