fix NULL check for getenv("LANGUAGE")
[blender.git] / source / blender / blenfont / intern / blf_lang.c
1 /*
2  * $Id$
3  *
4  * ***** BEGIN GPL LICENSE BLOCK *****
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version. 
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software Foundation,
18  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
19  *
20  * The Original Code is Copyright (C) 2008 Blender Foundation.
21  * All rights reserved.
22  * 
23  * Contributor(s): Blender Foundation.
24  *
25  * ***** END GPL LICENSE BLOCK *****
26  */
27
28 /** \file blender/blenfont/intern/blf_lang.c
29  *  \ingroup blf
30  */
31
32
33 #include <stdio.h>
34 #include <stdlib.h>
35 #include <string.h>
36
37 #include "BLF_api.h"
38
39 #ifdef INTERNATIONAL
40
41 #include <locale.h>
42
43 #if defined (_WIN32)
44 #include <windows.h>
45 #endif
46
47 #include "libintl.h"
48
49 #include "DNA_userdef_types.h"
50
51 #include "DNA_listBase.h"
52 #include "DNA_vec_types.h"
53
54 #include "MEM_guardedalloc.h"
55
56 #include "BLI_linklist.h"       /* linknode */
57 #include "BLI_string.h"
58 #include "BLI_path_util.h"
59
60 #define DOMAIN_NAME "blender"
61 #define SYSTEM_ENCODING_DEFAULT "UTF-8"
62 #define FONT_SIZE_DEFAULT 12
63
64 /* locale options. */
65 static char global_messagepath[1024];
66 static char global_language[32];
67 static char global_encoding_name[32];
68
69 /* map from the rna_userdef.c:rna_def_userdef_system(BlenderRNA *brna):language_items */
70 static const char *locales[] = {
71         "", "",
72         "english", "en_US",
73         "japanese", "ja_JP",
74         "dutch", "nl_NL",
75         "italian", "it_IT",
76         "german", "de_DE",
77         "finnish", "fi_FI",
78         "swedish", "sv_SE",
79         "french", "fr_FR",
80         "spanish", "es_ES",
81         "catalan", "ca_AD",
82         "czech", "cs_CZ",
83         "ptb", "pt_BR",
84         "chs", "zh_CN",
85         "cht", "zh_TW",
86         "russian", "ru_RU",
87         "croatian", "hr_HR",
88         "serbian", "sr_RS",
89         "ukrainian", "uk_UA",
90         "polish", "pl_PL",
91         "romanian", "ro_RO",
92         "arabic", "ar_EG",
93         "bulgarian", "bg_BG",
94         "greek", "el_GR",
95         "korean" "ko_KR",
96         "nepali" "ne_NP",
97 };
98
99 void BLF_lang_init(void)
100 {
101         char *messagepath= BLI_get_folder(BLENDER_DATAFILES, "locale");
102         
103         BLI_strncpy(global_encoding_name, SYSTEM_ENCODING_DEFAULT, sizeof(global_encoding_name));
104         
105         if (messagepath)
106                 BLI_strncpy(global_messagepath, messagepath, sizeof(global_messagepath));
107         else
108                 global_messagepath[0]= '\0';
109         
110 }
111
112 /* XXX WARNING!!! IN osx somehow the previous function call jumps in this one??? (ton, ppc) */
113 void BLF_lang_set(const char *str)
114 {
115         char *locreturn;
116         const char *short_locale;
117         int ok= 1;
118 #if defined (_WIN32)
119         char *long_locale = locales[ 2 * U.language];
120 #endif
121
122         if((U.transopts&USER_DOTRANSLATE)==0)
123                 return;
124
125         if(str)
126                 short_locale = str;
127         else
128                 short_locale = locales[ 2 * U.language + 1];
129
130 #if defined (_WIN32)
131         if(short_locale) {
132                 char *envStr;
133
134                 if( U.language==0 )/* use system setting */
135                         envStr = BLI_sprintfN( "LANG=%s", getenv("LANG") );
136                 else
137                         envStr = BLI_sprintfN( "LANG=%s", short_locale );
138
139                 gettext_putenv(envStr);
140                 MEM_freeN(envStr);
141         }
142
143         locreturn= setlocale(LC_ALL, long_locale);
144
145         if (locreturn == NULL) {
146                 printf("Could not change locale to %s\n", long_locale);
147                 ok= 0;
148         }
149 #else
150         {
151                 const char *locale;
152                 static char default_locale[64]="\0";
153                 static char *env_language = getenv("LANGUAGE");
154
155                 if(default_locale[0]==0 && env_language!=NULL) /* store defaul locale */
156                         strncpy(default_locale, env_language, sizeof(default_locale));
157
158                 if(short_locale[0])
159                         locale= short_locale;
160                 else
161                         locale= default_locale;
162
163                 BLI_setenv("LANG", locale);
164                 BLI_setenv("LANGUAGE", locale);
165
166                 locreturn= setlocale(LC_ALL, locale);
167
168                 if (locreturn == NULL) {
169                         char *short_locale_utf8= BLI_sprintfN("%s", short_locale);
170
171                         locreturn= setlocale(LC_ALL, short_locale_utf8);
172
173                         if (locreturn == NULL) {
174                                 printf("Could not change locale to %s nor %s\n", short_locale, short_locale_utf8);
175                                 ok= 0;
176                         }
177
178                         MEM_freeN(short_locale_utf8);
179                 }
180         }
181 #endif
182
183         if(ok) {
184                 //printf("Change locale to %s\n", locreturn );
185                 BLI_strncpy(global_language, locreturn, sizeof(global_language));
186         }
187
188         setlocale(LC_NUMERIC, "C");
189
190         textdomain(DOMAIN_NAME);
191         bindtextdomain(DOMAIN_NAME, global_messagepath);
192         bind_textdomain_codeset(DOMAIN_NAME, global_encoding_name);
193 }
194
195 void BLF_lang_encoding(const char *str)
196 {
197         BLI_strncpy(global_encoding_name, str, sizeof(global_encoding_name));
198         /* bind_textdomain_codeset(DOMAIN_NAME, encoding_name); */
199 }
200
201 #else /* ! INTERNATIONAL */
202
203 void BLF_lang_init(void)
204 {
205         return;
206 }
207
208 void BLF_lang_encoding(const char *str)
209 {
210         (void)str;
211         return;
212 }
213
214 void BLF_lang_set(const char *str)
215 {
216         (void)str;
217         return;
218 }
219
220 #endif /* INTERNATIONAL */