/*
 * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
 * Copyright (C) 2008 - INRIA - Allan CORNET
 * Copyright (C) 2008 - Yung-Jang Lee
 *
 * This file must be used under the terms of the CeCILL.
 * This source file is licensed as described in the file COPYING, which
 * you should have received as part of this distribution.  The terms
 * are also available at
 * http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
 *
 */

/*--------------------------------------------------------------------------*/
#include <windows.h>
#include <stdio.h>
#include "getLocaleInfo_Windows.h"
#include "MALLOC.h"
/*--------------------------------------------------------------------------*/
char* getLocaleSystemInfo(void)
{
#define LENGTH_BUFFER 1024
    char buffer_LOCALE_SISO639LANGNAME[LENGTH_BUFFER];
    char buffer_LOCALE_SISO3166CTRYNAME[LENGTH_BUFFER];
    char *localeStr = NULL;
    int ret = 0;
    ret = GetLocaleInfo(LOCALE_SYSTEM_DEFAULT,
                        LOCALE_SISO639LANGNAME,
                        &buffer_LOCALE_SISO639LANGNAME[0],
                        LENGTH_BUFFER);
    if (ret > 0)
    {
        ret = GetLocaleInfo(LOCALE_SYSTEM_DEFAULT,
                            LOCALE_SISO3166CTRYNAME,
                            &buffer_LOCALE_SISO3166CTRYNAME[0],
                            LENGTH_BUFFER);
        if (ret > 0)
        {
            int length_localeStr = (int)(strlen(buffer_LOCALE_SISO639LANGNAME) +
                                         strlen(buffer_LOCALE_SISO3166CTRYNAME) +
                                         strlen("_"));
            localeStr = (char*)MALLOC(sizeof(char) * (length_localeStr) + 1);
            if (localeStr)
            {
#ifdef FORMAT_LOCALE
#undef FORMAT_LOCALE
#endif
#define FORMAT_LOCALE "%s_%s"
                sprintf(localeStr, FORMAT_LOCALE, buffer_LOCALE_SISO639LANGNAME, buffer_LOCALE_SISO3166CTRYNAME);
            }
        }
    }
    return localeStr;
}
/*--------------------------------------------------------------------------*/
char* getLocaleUserInfo(void)
{
#define LENGTH_BUFFER 1024
    char buffer_LOCALE_SISO639LANGNAME[LENGTH_BUFFER];
    char buffer_LOCALE_SISO3166CTRYNAME[LENGTH_BUFFER];
    char buffer_LOCALE_IDEFAULTANSICODEPAGE[LENGTH_BUFFER];
    char *localeStr = NULL;
    int ret = 0;
    ret = GetLocaleInfo(LOCALE_USER_DEFAULT,
                        LOCALE_SISO639LANGNAME,
                        &buffer_LOCALE_SISO639LANGNAME[0],
                        LENGTH_BUFFER);
    if (ret > 0)
    {

        ret = GetLocaleInfo(LOCALE_USER_DEFAULT,
                            LOCALE_SISO3166CTRYNAME,
                            &buffer_LOCALE_SISO3166CTRYNAME[0],
                            LENGTH_BUFFER);
        if (ret > 0)
        {
            // BY YJLee get Windows CODE Page Information
            int ret = GetLocaleInfo(LOCALE_USER_DEFAULT,
                                    LOCALE_IDEFAULTANSICODEPAGE,
                                    &buffer_LOCALE_IDEFAULTANSICODEPAGE[0],
                                    LENGTH_BUFFER);

            int length_localeStr = (int)(strlen(buffer_LOCALE_SISO639LANGNAME) +
                                         strlen(buffer_LOCALE_SISO3166CTRYNAME) +
                                         strlen(buffer_LOCALE_IDEFAULTANSICODEPAGE) +
                                         strlen("_.CP") );
            localeStr = (char*)MALLOC(sizeof(char) * (length_localeStr) + 1);
            if (localeStr)
            {
#ifdef FORMAT_LOCALE
#undef FORMAT_LOCALE
#endif
#define FORMAT_LOCALE "%s_%s.CP%s"
                // in lang_contry.CPxxx format
                sprintf(localeStr, FORMAT_LOCALE,
                        buffer_LOCALE_SISO639LANGNAME,
                        buffer_LOCALE_SISO3166CTRYNAME,
                        buffer_LOCALE_IDEFAULTANSICODEPAGE
                       );
            }
        }
    }
    return localeStr;
}
/*--------------------------------------------------------------------------*/