cleaned up language support for a release.
[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                 lang_setlanguage();
141                 BLI_split_dirfile(str, di, U.fontname);
142
143                 G.ui_international = TRUE;
144         } else {
145                 sprintf(U.fontname, "Invalid font.");
146                 G.ui_international = FALSE;
147         }
148         allqueue(REDRAWALL, 0);
149 }
150
151
152 void start_interface_font(void) {
153         char tstr[FILE_MAXDIR+FILE_MAXFILE];
154         int result = 0;
155
156         /* hack to find out if we have saved language/font settings.
157            if not, set defaults and try Vera font (or else .bfont.tff) --phase */
158         
159         if(U.fontsize != 0) {
160                 BLI_make_file_string("/", tstr, U.fontdir, U.fontname);
161
162                 result = FTF_SetFont(tstr, U.fontsize);
163         } else {
164                 U.language= 0;
165                 U.fontsize= 11;
166                 U.encoding= 0;
167                 sprintf(U.fontname, "Vera.ttf\0");
168
169                 result = FTF_SetFont(U.fontname, U.fontsize);
170         }
171
172         if(!result) {
173                 U.fontsize= 12;
174                 sprintf(U.fontname, ".bfont.ttf\0");
175                 result = FTF_SetFont(U.fontname, U.fontsize);
176         }
177
178         if(result) {
179                 lang_setlanguage();
180
181                 G.ui_international = TRUE;
182         } else {
183                 printf("no font found for international support\n");
184                 G.ui_international = FALSE;
185         }
186
187         allqueue(REDRAWALL, 0);
188 }
189
190
191 char *first_dpointchar(char *string) {
192         char *dpointchar;
193         
194         dpointchar= strchr(string, ':');        
195
196         return dpointchar;
197 }
198
199
200 void splitlangline(char *line, LANGMenuEntry *lme)
201 {
202         char *dpointchar= first_dpointchar(line);
203
204         if (dpointchar) {
205                 lme->code= BLI_strdup(dpointchar+1);
206                 *(dpointchar)=0;
207                 lme->language= BLI_strdup(line);
208         } else {
209                 error("Invalid language file");
210         }
211 }
212
213
214 void puplang_insert_entry(char *line)
215 {
216         LANGMenuEntry *lme, *prev;
217         int sorted = 0;
218
219         prev= NULL;
220         lme= langmenu;
221
222         for (; lme; prev= lme, lme= lme->next) {
223                 if (lme->line) {
224                         if (BLI_streq(line, lme->line)) {
225                                 return;
226                         } else if (sorted && strcmp(line, lme->line)<0) {
227                                 break;
228                         }
229                 }
230         }
231         
232         lme= MEM_mallocN(sizeof(*lme), "lme");
233         lme->line = BLI_strdup(line);
234         splitlangline(line, lme);
235         lme->id = tot_lang;
236         tot_lang++;
237
238         if (prev) {
239                 lme->next= prev->next;
240                 prev->next= lme;
241         } else {
242                 lme->next= langmenu;
243                 langmenu= lme;
244         }
245 }
246
247
248 int read_languagefile(void) {
249         char name[FILE_MAXDIR+FILE_MAXFILE];
250         LinkNode *l, *lines;
251
252         /* .Blanguages */
253
254         BLI_make_file_string("/", name, BLI_gethome(), ".Blanguages");
255         lines= BLI_read_file_as_lines(name);
256
257         if(lines == NULL) {
258                 /* If not found in home, try current dir */
259                 strcpy(name, ".Blanguages");
260                 lines= BLI_read_file_as_lines(name);
261                 if(lines == NULL) {
262                         error("File \".Blanguages\" not found");
263                         return 0;
264                 }
265         }
266
267         for (l= lines; l; l= l->next) {
268                 char *line= l->link;
269                         
270                 if (!BLI_streq(line, "")) {
271                         puplang_insert_entry(line);
272                 }
273         }
274
275         BLI_free_file_lines(lines);
276
277         return 1;
278 }
279
280
281 void free_languagemenu(void)
282 {
283         LANGMenuEntry *lme= langmenu;
284
285         while (lme) {
286                 LANGMenuEntry *n= lme->next;
287
288                 if (lme->line) MEM_freeN(lme->line);
289                 if (lme->language) MEM_freeN(lme->language);
290                 if (lme->code) MEM_freeN(lme->code);
291                 MEM_freeN(lme);
292
293                 lme= n;
294         }
295 }
296
297 #endif /* INTERNATIONAL */