/**
 * $Id$
 *
 * ***** BEGIN GPL LICENSE BLOCK *****
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version. 
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software Foundation,
 * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 *
 * The Original Code is Copyright (C) 2008 Blender Foundation.
 * All rights reserved.
 * 
 * Contributor(s): Blender Foundation.
 *
 * ***** END GPL LICENSE BLOCK *****
 */

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

#ifdef INTERNATIONAL

#include <locale.h>
#include "libintl.h"

#include "MEM_guardedalloc.h"

#include "DNA_listBase.h"
#include "DNA_vec_types.h"

#include "BKE_utildefines.h"

#include "BLI_blenlib.h"
#include "BLI_linklist.h"	/* linknode */
#include "BLI_string.h"

#include "BIF_gl.h"

#ifdef __APPLE__
#include "BKE_utildefines.h"
#endif

#define DOMAIN_NAME "blender"
#define SYSTEM_ENCODING_DEFAULT "UTF-8"
#define FONT_SIZE_DEFAULT 12

/* locale options. */
char global_messagepath[1024];
char global_language[32];
char global_encoding_name[32];

#if defined(__APPLE__)
void BLF_lang_init(void) /* Apple Only, todo - use BLI_gethome_folder  */
{
	char *bundlepath;

	strcpy(global_encoding_name, SYSTEM_ENCODING_DEFAULT);

	/* set messagepath directory */
#ifndef LOCALEDIR
#define LOCALEDIR "/usr/share/locale"
#endif

	strcpy(global_messagepath, ".blender/locale");

	if (!BLI_exist(global_messagepath)) { /* locale not in current dir */
		BLI_make_file_string("/", global_messagepath, BLI_gethome(), ".blender/locale");

		if (!BLI_exist(global_messagepath)) { /* locale not in home dir */
			/* message catalogs are stored inside the application bundle */
			bundlepath= BLI_getbundle();
			strcpy(global_messagepath, bundlepath);
			strcat(global_messagepath, "/Contents/Resources/locale");
			if (!BLI_exist(global_messagepath)) { /* locale not in bundle (now that's odd..) */
				strcpy(global_messagepath, LOCALEDIR);

				if (!BLI_exist(global_messagepath)) { /* locale not in LOCALEDIR */
					strcpy(global_messagepath, "message"); /* old compatibility as last */
				}
			}
		}
	}
}
#elif defined(_WIN32)
void BLF_lang_init(void) /* Windows Only, todo - use BLI_gethome_folder  */
{
	strcpy(global_encoding_name, SYSTEM_ENCODING_DEFAULT);
	
	strcpy(global_messagepath, ".blender/locale");

	if (!BLI_exist(global_messagepath)) { /* locale not in current dir */
		BLI_make_file_string("/", global_messagepath, BLI_gethome(), ".blender/locale");

		if (!BLI_exist(global_messagepath)) { /* locale not in home dir */
			BLI_make_file_string("/", global_messagepath, BLI_gethome(), "/locale");
		}
	}
}
#else
void BLF_lang_init(void)  /* not win or mac */
{
	char *messagepath= BLI_gethome_folder("locale", BLI_GETHOME_ALL);
	
	if(messagepath)
		strncpy(global_messagepath, messagepath, sizeof(global_messagepath));
	else
		global_messagepath[0]= '\0';

}
#endif

void BLF_lang_set(const char *str)
{
#if defined (_WIN32) || defined(__APPLE__)
	BLI_setenv("LANG", str);
#else
	char *locreturn= setlocale(LC_ALL, str);
	if (locreturn == NULL) {
		char *lang;

		lang= (char*)malloc(sizeof(char)*(strlen(str)+7));

		lang[0]= '\0';
		strcat(lang, str);
		strcat(lang, ".UTF-8");

		locreturn= setlocale(LC_ALL, lang);
		if (locreturn == NULL) {
			printf("could not change language to %s nor %s\n", str, lang);
		}

		free(lang);
	}

	setlocale(LC_NUMERIC, "C");
#endif
	textdomain(DOMAIN_NAME);
	bindtextdomain(DOMAIN_NAME, global_messagepath);
	/* bind_textdomain_codeset(DOMAIN_NAME, global_encoding_name); */
	strcpy(global_language, str);
}

void BLF_lang_encoding(const char *str)
{
	strcpy(global_encoding_name, str);
	/* bind_textdomain_codeset(DOMAIN_NAME, encoding_name); */
}

#else /* ! INTERNATIONAL */

void BLF_lang_init(void)
{
	return;
}

void BLF_lang_encoding(char *str)
{
	return;
}

void BLF_lang_set(char *str)
{
	return;
}

#endif /* INTERNATIONAL */