55a65f07759b36ac1464db294d8dc574e138917a
[blender.git] / source / blender / blenfont / intern / blf_lang.c
1 /*
2  * ***** BEGIN GPL LICENSE BLOCK *****
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version. 
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software Foundation,
16  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17  *
18  * The Original Code is Copyright (C) 2008 Blender Foundation.
19  * All rights reserved.
20  * 
21  * Contributor(s): Blender Foundation.
22  *
23  * ***** END GPL LICENSE BLOCK *****
24  */
25
26 /** \file blender/blenfont/intern/blf_lang.c
27  *  \ingroup blf
28  */
29
30
31 #include <stdio.h>
32 #include <stdlib.h>
33 #include <string.h>
34
35 #include "BKE_global.h"
36
37 #include "BLF_api.h"
38
39 #include "BLF_translation.h" /* own include */
40
41 #ifdef WITH_INTERNATIONAL
42
43 #include <locale.h>
44
45 #if defined(_WIN32)
46 #include <windows.h>
47 #endif
48
49 #include "libintl.h"
50
51 #include "DNA_userdef_types.h"
52
53 #include "DNA_listBase.h"
54 #include "DNA_vec_types.h"
55
56 #include "MEM_guardedalloc.h"
57
58 #include "BLI_linklist.h" /* linknode */
59 #include "BLI_string.h"
60 #include "BLI_utildefines.h"
61 #include "BLI_path_util.h"
62
63 #define SYSTEM_ENCODING_DEFAULT "UTF-8"
64 #define FONT_SIZE_DEFAULT 12
65
66 /* locale options. */
67 static char global_messagepath[1024];
68 static char global_language[32];
69 static char global_encoding_name[32];
70
71 /* map from the rna_userdef.c:rna_def_userdef_system(BlenderRNA *brna):language_items */
72 static const char *locales[] = {
73         "", "",
74         "english", "en_US",
75         "japanese", "ja_JP",
76         "dutch", "nl_NL",
77         "italian", "it_IT",
78         "german", "de_DE",
79         "finnish", "fi_FI",
80         "swedish", "sv_SE",
81         "french", "fr_FR",
82         "spanish", "es",
83         "catalan", "ca_AD",
84         "czech", "cs_CZ",
85         "portuguese", "pt_PT",
86 #if defined(_WIN32) && !defined(FREE_WINDOWS)
87         "Chinese (Simplified)_China.1252", "zh_CN",
88         "Chinese (Traditional)_China.1252", "zh_TW",
89 #else
90         "chs", "zh_CN",
91         "cht", "zh_TW",
92 #endif
93         "russian", "ru_RU",
94         "croatian", "hr_HR",
95         "serbian", "sr_RS",
96         "ukrainian", "uk_UA",
97         "polish", "pl_PL",
98         "romanian", "ro_RO",
99         "arabic", "ar_EG",
100         "bulgarian", "bg_BG",
101         "greek", "el_GR",
102         "korean", "ko_KR",
103         "nepali", "ne_NP",
104         "persian", "fa_IR",
105         "indonesian", "id_ID",
106         "serbian (latin)", "sr_RS@latin",
107         "kyrgyz", "ky_KG",
108         "turkish", "tr_TR",
109         "hungarian", "hu_HU",
110         "brazilian portuguese", "pt_BR",
111 };
112
113 void BLF_lang_init(void)
114 {
115         char *messagepath = BLI_get_folder(BLENDER_DATAFILES, "locale");
116 /*      printf("%s\n", messagepath);*/
117
118         BLI_strncpy(global_encoding_name, SYSTEM_ENCODING_DEFAULT, sizeof(global_encoding_name));
119         
120         if (messagepath) {
121                 BLI_strncpy(global_messagepath, messagepath, sizeof(global_messagepath));
122         }
123         else {
124                 printf("%s: 'locale' data path for translations not found, continuing\n", __func__);
125                 global_messagepath[0] = '\0';
126         }
127         
128 }
129
130 /* get LANG/LANGUAGE environment variable */
131 static void get_language_variable(const char *varname, char *var, int maxlen)
132 {
133         char *env = getenv(varname);
134
135         if (env) {
136                 char *s;
137
138                 /* store defaul locale */
139                 BLI_strncpy(var, env, maxlen);
140
141                 /* use first language as default */
142                 s = strchr(var, ':');
143                 if (s)
144                         s[0] = 0;
145         }
146 }
147
148 /* get language to be used based on locale(which might be empty when using default language) and
149  * LANG environment variable
150  */
151 static void get_language(const char *locale, const char *lang, char *language, int maxlen)
152 {
153         if (locale[0]) {
154                 BLI_strncpy(language, locale, maxlen);
155         }
156         else {
157                 char *s;
158
159                 BLI_strncpy(language, lang, maxlen);
160
161                 s = strchr(language, '.');
162                 if (s)
163                         s[0] = 0;
164         }
165 }
166
167 /* XXX WARNING!!! IN osx somehow the previous function call jumps in this one??? (ton, ppc) */
168 void BLF_lang_set(const char *str)
169 {
170         char *locreturn;
171         const char *short_locale;
172         int ok = 1;
173         const char *long_locale = locales[2 * U.language];
174
175         if ((U.transopts & USER_DOTRANSLATE) == 0)
176                 return;
177
178         if (str)
179                 short_locale = str;
180         else
181                 short_locale = locales[2 * U.language + 1];
182
183 #if defined(_WIN32) && !defined(FREE_WINDOWS)
184         if (short_locale) {
185                 char *envStr;
186
187                 if (U.language == 0) /* use system setting */
188                         envStr = BLI_sprintfN("LANG=%s", getenv("LANG"));
189                 else
190                         envStr = BLI_sprintfN("LANG=%s", short_locale);
191
192                 gettext_putenv(envStr);
193                 MEM_freeN(envStr);
194         }
195
196         locreturn = setlocale(LC_ALL, long_locale);
197
198         if (locreturn == NULL) {
199                 if (G.debug & G_DEBUG)
200                         printf("Could not change locale to %s\n", long_locale);
201
202                 ok = 0;
203         }
204 #else
205         {
206                 static char default_lang[64] = "\0";
207                 static char default_language[64] = "\0";
208
209                 if (default_lang[0] == 0)
210                         get_language_variable("LANG", default_lang, sizeof(default_lang));
211
212                 if (default_language[0] == 0)
213                         get_language_variable("LANGUAGE", default_language, sizeof(default_language));
214
215                 if (short_locale[0]) {
216                         if (G.debug & G_DEBUG)
217                                 printf("Setting LANG= and LANGUAGE to %s\n", short_locale);
218
219                         BLI_setenv("LANG", short_locale);
220                         BLI_setenv("LANGUAGE", short_locale);
221                 }
222                 else {
223                         if (G.debug & G_DEBUG)
224                                 printf("Setting LANG=%s and LANGUAGE=%s\n", default_lang, default_language);
225
226                         BLI_setenv("LANG", default_lang);
227                         BLI_setenv("LANGUAGE", default_language);
228                 }
229
230                 locreturn = setlocale(LC_ALL, short_locale);
231
232                 if (locreturn == NULL) {
233                         char *short_locale_utf8 = NULL;
234
235                         if (short_locale[0]) {
236                                 short_locale_utf8 = BLI_sprintfN("%s.UTF-8", short_locale);
237                                 locreturn = setlocale(LC_ALL, short_locale_utf8);
238                         }
239
240                         if (locreturn == NULL) {
241                                 char language[65];
242
243                                 get_language(long_locale, default_lang, language, sizeof(language));
244
245                                 if (G.debug & G_DEBUG) {
246                                         if (short_locale[0])
247                                                 printf("Could not change locale to %s nor %s\n", short_locale, short_locale_utf8);
248                                         else
249                                                 printf("Could not reset locale\n");
250
251                                         printf("Fallback to LANG=%s and LANGUAGE=%s\n", default_lang, language);
252                                 }
253
254                                 /* fallback to default settings */
255                                 BLI_setenv("LANG", default_lang);
256                                 BLI_setenv("LANGUAGE", language);
257
258                                 locreturn = setlocale(LC_ALL, "");
259
260                                 ok = 0;
261                         }
262
263                         if (short_locale_utf8)
264                                 MEM_freeN(short_locale_utf8);
265                 }
266         }
267 #endif
268
269         if (ok) {
270                 /*printf("Change locale to %s\n", locreturn ); */
271                 BLI_strncpy(global_language, locreturn, sizeof(global_language));
272         }
273
274         setlocale(LC_NUMERIC, "C");
275
276         textdomain(TEXT_DOMAIN_NAME);
277         bindtextdomain(TEXT_DOMAIN_NAME, global_messagepath);
278         bind_textdomain_codeset(TEXT_DOMAIN_NAME, global_encoding_name);
279 }
280
281 const char *BLF_lang_get(void)
282 {
283         return locales[2 * U.language + 1];
284 }
285
286 void BLF_lang_encoding(const char *str)
287 {
288         BLI_strncpy(global_encoding_name, str, sizeof(global_encoding_name));
289         /* bind_textdomain_codeset(TEXT_DOMAIN_NAME, encoding_name); */
290 }
291
292 #else /* ! WITH_INTERNATIONAL */
293
294 void BLF_lang_init(void)
295 {
296         return;
297 }
298
299 void BLF_lang_encoding(const char *str)
300 {
301         (void)str;
302         return;
303 }
304
305 void BLF_lang_set(const char *str)
306 {
307         (void)str;
308         return;
309 }
310
311 const char *BLF_lang_get(void)
312 {
313         return "";
314 }
315
316 #endif /* WITH_INTERNATIONAL */