Multilingual interface support added.
[blender.git] / source / blender / src / language.c
1 /**
2  * $Id$
3  *
4  * ***** BEGIN GPL/BL DUAL 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. The Blender
10  * Foundation also sells licenses for use in proprietary software under
11  * the Blender License.  See http://www.blender.org/BL/ for information
12  * about this.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software Foundation,
21  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
22  *
23  * The Original Code is written by Rob Haarsma (phase)
24  *
25  * Contributor(s): none yet.
26  *
27  * ***** END GPL/BL DUAL LICENSE BLOCK *****
28  */
29
30 /* dynamic popup generation for languages */
31
32 #ifdef INTERNATIONAL
33
34 #include <string.h>
35 #include <stdlib.h>
36
37 #include "DNA_userdef_types.h"
38
39 #include "BKE_global.h"         /* G */
40 #include "BKE_utildefines.h"
41
42 #include "BLI_blenlib.h"
43 #include "BLI_linklist.h"       /* linknode */
44
45 #include "BIF_language.h"
46 #include "BIF_space.h"          /* allqueue() */
47 #include "BIF_toolbox.h"        /* error() */
48
49 #include "MEM_guardedalloc.h"   /* vprintf, etc ??? */
50
51 #include "mydevice.h"           /* REDRAWALL */
52
53 #include "FTF_Api.h"
54
55 typedef struct _LANGMenuEntry LANGMenuEntry;
56 struct _LANGMenuEntry {
57         LANGMenuEntry *next;
58
59         char *line;
60         char *language;
61         char *code;
62         int id;
63 };
64
65 static LANGMenuEntry *langmenu= 0;
66
67 static int tot_lang = 0;
68
69
70 char *fontsize_pup(void)
71 {
72         static char string[1024];
73         char formatstring[1024];
74
75         strcpy(formatstring, "Choose Font Size: %%t|%s %%x%d|%s %%x%d|%s %%x%d|%s %%x%d|%s %%x%d|%s %%x%d|%s %%x%d|%s %%x%d|%s %%x%d");
76
77         sprintf(string, formatstring,
78                         "Font Size:   8",               8,
79                         "Font Size:   9",               9,
80                         "Font Size:  10",               10,
81                         "Font Size:  11",               11,
82                         "Font Size:  12",               12,
83                         "Font Size:  13",               13,
84                         "Font Size:  14",               14,
85                         "Font Size:  15",               15,
86                         "Font Size:  16",               16
87                );
88
89         return (string);
90 }
91
92
93 char *language_pup(void)
94 {
95         LANGMenuEntry *lme = langmenu;
96         static char string[1024];
97         static char tmp[1024];
98
99         if(tot_lang == 0)
100                 sprintf(string, "Choose Language: %%t|Language:  English %%x0");
101         else {
102                 sprintf(string, "Choose Language: %%t");
103                 while(lme) {
104                         sprintf(tmp, "|Language:  %s %%x%d", lme->language, lme->id);
105                         strcat(string, tmp);
106                         lme= lme->next;
107                 }
108         }
109
110         return string;
111 }
112
113
114 LANGMenuEntry *find_language(short langid){
115         LANGMenuEntry *lme = langmenu;
116
117         while(lme) {
118                 if(lme->id == langid)
119                         return lme;
120
121                 lme=lme->next;
122         }
123         return NULL;
124 }
125
126
127 void lang_setlanguage(void) {
128         LANGMenuEntry *lme;
129
130         lme = find_language(U.language);
131         if(lme) FTF_SetLanguage(lme->code);
132         else FTF_SetLanguage("en_US");
133 }
134
135
136 void set_interface_font(char *str) {
137         char di[FILE_MAXDIR];
138
139         if(FTF_SetFont(str, U.fontsize)) {
140
141                 lang_setlanguage();
142
143                 BLI_split_dirfile(str, di, U.fontname);
144
145                 G.ui_international = TRUE;
146         } else {
147                 sprintf(U.fontname, "Invalid font.");
148                 G.ui_international = FALSE;
149         }
150         allqueue(REDRAWALL, 0);
151 }
152
153
154 void set_ML_interface_font(void) {
155         char tstr[FILE_MAXDIR+FILE_MAXFILE];
156         int result = 0;
157
158         /* dirty hack to find out if we have saved language/font settings,
159            if not, try default font --phase */
160         
161         if(U.fontsize != 0) {
162                 BLI_make_file_string("/", tstr, U.fontdir, U.fontname);
163
164                 result = FTF_SetFont(tstr, U.fontsize);
165         } else {
166                 U.language= 0;
167                 U.fontsize= 12;
168                 U.encoding= 0;
169                 sprintf(U.fontname, ".bfont.ttf\0");
170
171                 result = FTF_SetFont(U.fontname, U.fontsize);
172         }
173
174         if(!result) result = FTF_SetFont(".bfont.ttf", U.fontsize);
175 //      printf(" res = %d\n ", result);
176         if(result) {
177                 lang_setlanguage();
178
179                 G.ui_international = TRUE;
180         } else {
181                 printf("no way ftf\n");
182                 G.ui_international = FALSE;
183         }
184
185         allqueue(REDRAWALL, 0);
186 }
187
188
189 char *first_dpointchar(char *string) {
190         char *dpointchar;
191         
192         dpointchar= strchr(string, ':');        
193
194         return dpointchar;
195 }
196
197
198 void splitlangline(char *line, LANGMenuEntry *lme)
199 {
200         char *dpointchar= first_dpointchar(line);
201
202         if (dpointchar) {
203                 lme->code= BLI_strdup(dpointchar+1);
204                 *(dpointchar)=0;
205                 lme->language= BLI_strdup(line);
206         } else {
207                 error("Invalid language file");
208         }
209 }
210
211
212 void puplang_insert_entry(char *line)
213 {
214         LANGMenuEntry *lme, *prev;
215         int sorted = 0;
216
217         prev= NULL;
218         lme= langmenu;
219
220         for (; lme; prev= lme, lme= lme->next) {
221                 if (lme->line) {
222                         if (BLI_streq(line, lme->line)) {
223                                 return;
224                         } else if (sorted && strcmp(line, lme->line)<0) {
225                                 break;
226                         }
227                 }
228         }
229         
230         lme= MEM_mallocN(sizeof(*lme), "lme");
231         lme->line = BLI_strdup(line);
232         splitlangline(line, lme);
233         lme->id = tot_lang;
234         tot_lang++;
235
236         if (prev) {
237                 lme->next= prev->next;
238                 prev->next= lme;
239         } else {
240                 lme->next= langmenu;
241                 langmenu= lme;
242         }
243 }
244
245
246 int readMultiLingualFiles(void) {
247         char name[FILE_MAXDIR+FILE_MAXFILE];
248         LinkNode *l, *lines;
249
250         /* .Blanguages */
251
252         BLI_make_file_string("/", name, BLI_gethome(), ".Blanguages");
253         lines= BLI_read_file_as_lines(name);
254
255         if(lines == NULL) {
256                 /* If not found in home, try current dir */
257                 strcpy(name, ".Blanguages");
258                 lines= BLI_read_file_as_lines(name);
259                 if(lines == NULL) {
260                         error("File \".Blanguages\" not found");
261                         return 0;
262                 }
263         }
264
265         for (l= lines; l; l= l->next) {
266                 char *line= l->link;
267                         
268                 if (!BLI_streq(line, "")) {
269                         puplang_insert_entry(line);
270                 }
271         }
272
273         BLI_free_file_lines(lines);
274
275         return 1;
276 }
277
278
279 void languagesmenu_free(void)
280 {
281         LANGMenuEntry *lme= langmenu;
282
283         while (lme) {
284                 LANGMenuEntry *n= lme->next;
285
286                 if (lme->line) MEM_freeN(lme->line);
287                 if (lme->language) MEM_freeN(lme->language);
288                 if (lme->code) MEM_freeN(lme->code);
289                 MEM_freeN(lme);
290
291                 lme= n;
292         }
293 }
294
295 #endif /* INTERNATIONAL */