Moving Language code from interface/text.c to blenfont library.
[blender-staging.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., 59 Temple Place - Suite 330, Boston, MA  02111-1307, 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 #include <stdio.h>
29 #include <stdlib.h>
30 #include <string.h>
31
32 #include "MEM_guardedalloc.h"
33
34 #include "DNA_listBase.h"
35
36 #include "BKE_utildefines.h"
37
38 #include "BLI_blenlib.h"
39 #include "BLI_linklist.h"       /* linknode */
40 #include "BLI_string.h"
41
42 #include "blf_internal_types.h"
43
44 // XXX 2.50 Remove this later.
45 #include "FTF_Api.h"
46
47 static ListBase global_lang= { NULL, NULL };
48 static int global_tot_lang= 0;
49 static int global_err_lang= 0;
50
51 int BLF_lang_error(void)
52 {
53         return(global_err_lang);
54 }
55
56 char *BLF_lang_pup(void)
57 {
58         LangBLF *lme;
59         static char string[1024];
60         static char tmp[1024];
61
62         if(global_tot_lang == 0)
63                 sprintf(string, "Choose Language: %%t|Language:  English %%x0");
64         else {
65                 lme= global_lang.first;
66                 sprintf(string, "Choose Language: %%t");
67                 while (lme) {
68                         sprintf(tmp, "|Language:  %s %%x%d", lme->language, lme->id);
69                         strcat(string, tmp);
70                         lme= lme->next;
71                 }
72         }
73
74         return(string);
75 }
76
77 LangBLF *blf_lang_find_by_id(short langid)
78 {
79         LangBLF *p;
80
81         p= global_lang.first;
82         while (p) {
83                 if (p->id == langid)
84                         return(p);
85                 p= p->next;
86         }
87         return(NULL);
88 }
89
90 char *BLF_lang_find_code(short langid)
91 {
92         LangBLF *p;
93
94         p= blf_lang_find_by_id(langid);
95         if (p)
96                 return(p->code);
97         return(NULL);
98 }
99
100 void BLF_lang_set(int id)
101 {
102         LangBLF *lme;
103
104         // XXX 2.50 Remove this later, with ftfont
105         lme= blf_lang_find_by_id(id);
106         if(lme) FTF_SetLanguage(lme->code);
107         else FTF_SetLanguage("en_US");
108 }
109
110 static void blf_lang_split(char *line, LangBLF* lme)
111 {
112         char *dpointchar= strchr(line, ':');
113
114         if (dpointchar) {
115                 lme->code= BLI_strdup(dpointchar+1);
116                 *(dpointchar)=0;
117                 lme->language= BLI_strdup(line);
118         } else {
119                 lme->code= NULL;
120                 lme->language= NULL;
121                 /* XXX 2.50 bad call error("Invalid language file");
122                  * If we set this to NULL, the function blf_lang_new
123                  * drop the line and increment the error lang value
124                  * so the init code can call BLF_lang_error to get
125                  * the number of invalid lines and show the error.
126                  */
127         }
128 }
129
130 LangBLF *blf_lang_find(char *s, int find_by)
131 {
132         LangBLF *p;
133
134         p= global_lang.first;
135         while (p) {
136                 if (find_by == BLF_LANG_FIND_BY_LINE) {
137                         if (BLI_streq(s, p->line))
138                                 return(p);
139                 }
140                 else if (find_by == BLF_LANG_FIND_BY_CODE) {
141                         if (BLI_streq(s, p->code))
142                                 return(p);
143                 }
144                 else if (find_by == BLF_LANG_FIND_BY_LANGUAGE) {
145                         if (BLI_streq(s, p->language))
146                                 return(p);
147                 }
148                 p= p->next;
149         }
150         return(NULL);
151 }
152
153 static void blf_lang_new(char *line)
154 {
155         LangBLF *lme;
156
157         lme= blf_lang_find(line, BLF_LANG_FIND_BY_LINE);
158         if (!lme) {
159                 lme= MEM_mallocN(sizeof(LangBLF), "blf_lang_new");
160                 lme->next= NULL;
161                 lme->prev= NULL;
162                 lme->line = BLI_strdup(line);
163                 blf_lang_split(line, lme);
164                 
165                 if (lme->code && lme->language) {
166                         lme->id = global_tot_lang;
167                         global_tot_lang++;
168                         BLI_addhead(&global_lang, lme);
169                 }
170                 else {
171                         global_err_lang++;
172                         MEM_freeN(lme->line);
173                         MEM_freeN(lme);
174                 }
175         }
176 }
177
178 int BLF_lang_init(void) 
179 {
180         char name[FILE_MAXDIR+FILE_MAXFILE];
181         LinkNode *l, *lines;
182         
183         /* .Blanguages, http://www.blender3d.org/cms/Installation_Policy.352.0.html*/
184 #if defined (__APPLE__) || (WIN32)
185         BLI_make_file_string("/", name, BLI_gethome(), ".Blanguages");
186 #else
187         BLI_make_file_string("/", name, BLI_gethome(), ".blender/.Blanguages");
188 #endif
189
190         lines= BLI_read_file_as_lines(name);
191
192         if(lines == NULL) {
193                 /* If not found in home, try current dir 
194                  * (Resources folder of app bundle on OS X) */
195 #if defined (__APPLE__)
196                 char *bundlePath = BLI_getbundle();
197                 strcpy(name, bundlePath);
198                 strcat(name, "/Contents/Resources/.Blanguages");
199 #else
200                 /* Check the CWD. Takes care of the case where users
201                  * unpack blender tarball; cd blender-dir; ./blender */
202                 strcpy(name, ".blender/.Blanguages");
203 #endif
204                 lines= BLI_read_file_as_lines(name);
205
206                 if(lines == NULL) {
207                         /* If not found in .blender, try current dir */
208                         strcpy(name, ".Blanguages");
209                         lines= BLI_read_file_as_lines(name);
210                         if(lines == NULL) {
211 // XXX 2.50                             if(G.f & G_DEBUG)
212                                 printf("File .Blanguages not found\n");
213                                 return(0);
214                         }
215                 }
216         }
217
218         for (l= lines; l; l= l->next) {
219                 char *line= l->link;
220                         
221                 if (!BLI_streq(line, "")) {
222                         blf_lang_new(line);
223                 }
224         }
225
226         BLI_free_file_lines(lines);
227         return(1);
228 }
229
230 void BLF_lang_exit(void)
231 {
232         LangBLF *p;
233
234         while (global_lang.first) {
235                 p= global_lang.first;
236                 BLI_remlink(&global_lang, p);
237                 MEM_freeN(p->line);
238                 MEM_freeN(p->language);
239                 MEM_freeN(p->code);
240                 MEM_freeN(p);
241         }
242 }