source: ps2launchargs/source/uLaunchELF/lang.c@ 1101

Last change on this file since 1101 was 1101, checked in by iritscen, 7 years ago

Added following to ps2launchargs:\n-Source code.\n-DLL needed to run ps2client.\n-Instructions for building uLaunchELF.
  • Property svn:executable set to *
File size: 15.1 KB
RevLine 
[1101]1//---------------------------------------------------------------------------
2//File name: lang.c
3//---------------------------------------------------------------------------
4#include "launchelf.h"
5
6#define lang(id, name, value) u8 Str_##name [] = value;
7#include "lang.h"
8#undef lang
9
10Language Lang_Default[]={
11#define lang(id, name, value) {Str_##name},
12#include "lang.h"
13#undef lang
14 {NULL}
15};
16
17Language Lang_String[sizeof(Lang_Default) / sizeof(Lang_Default[0])];
18Language Lang_Extern[sizeof(Lang_Default) / sizeof(Lang_Default[0])];
19
20Language *External_Lang_Buffer = NULL;
21
22//---------------------------------------------------------------------------
23// get_LANG_string is the main parser called for each language dependent
24// string in a language header file. (eg: "Francais.h" or "Francais.lng")
25// Call values for all input arguments should be addresses of string pointers
26// LANG_p_p is for file to be scanned, moved to point beyond scanned data.
27// id_p_p is for a string defining the index value (suitable for 'atoi')
28// value_p_p is for the string value itself (not NUL-terminated)
29// The function returns the length of each string found, but -1 at EOF,
30// and various error codes less than -1 (-2 etc) for various syntax errors,
31// which also applies to EOF occurring where valid macro parts are expected.
32//---------------------------------------------------------------------------
33int get_LANG_string(u8 **LANG_p_p, u8 **id_p_p, u8 **value_p_p)
34{
35 u8 *cp, *ip, *vp, *tp = *LANG_p_p;
36 int ret, length;
37
38 ip = NULL;
39 vp = NULL;
40 ret = -1;
41
42start_line:
43 while(*tp<=' ' && *tp>'\0') tp+=1; //Skip leading whitespace, if any
44 if(*tp=='\0') goto exit; //but exit at EOF
45 //Current pos is potential "lang(" entry, but we must verify this
46 if(tp[0]=='/' && tp[1]=='/') //It may be a comment line
47 { //We must skip a comment line
48 while(*tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //Seek line end
49 goto start_line; //Go back to try next line
50 }
51 ret = -2;
52 //Here tp points to a non-zero string that is not a comment
53 if(strncmp(tp, "lang", 4)) goto exit; //Return error if not 'lang' macro
54 tp+=4; //but if it is, step past that name
55 ret = -3;
56 while(*tp<=' ' && *tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //skip inline whitespace
57 if(*tp=='\0') goto exit; //but exit at EOF
58 ret = -4;
59 //Here tp points to a non-zero string that should be an opening parenthesis
60 if(*tp!='(') goto exit; //Return error if no opening parenthesis
61 tp+=1; //but if it is, step past this character
62 ret = -5;
63 while(*tp<=' ' && *tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //skip inline whitespace
64 if(*tp=='\0') goto exit; //but exit at EOF
65 ret = -6;
66 //Here tp points to a non-zero string that should be an index number
67 if(*tp<'0' || *tp>'9') goto exit; //Return error if it's not a number
68 ip = tp; //but if it is, save this pos as id start
69 while(*tp>='0' && *tp<='9') tp+=1; //skip past the index number
70 ret = -7;
71 while(*tp<=' ' && *tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //skip inline whitespace
72 if(*tp=='\0') goto exit; //but exit at EOF
73 ret = -8;
74 //Here tp points to a non-zero string that should be a comma
75 if(*tp!=',') goto exit; //Return error if no comma after index
76 tp+=1; //but if present, step past that comma
77 ret = -9;
78 while(*tp<=' ' && *tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //skip inline whitespace
79 if(*tp=='\0') goto exit; //but exit at EOF
80 ret = -10;
81 //Here tp points to a non-zero string that should be a symbolic string name
82 //But we don't need to process this for language switch purposes, so we ignore it
83 //This may be changed later, to use the name for generating error messages
84 while(*tp!=',' && *tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //seek inline comma
85 if(*tp!=',') goto exit; //Return error if no comma after string name
86 tp+=1; //but if present, step past that comma
87 ret = -11;
88 while(*tp<=' ' && *tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //skip inline whitespace
89 if(*tp=='\0') goto exit; //but exit at EOF
90 ret = -12;
91 //Here tp points to a non-zero string that should be the opening quote character
92 if(*tp!='\"') goto exit; //Return error if no opening quote
93 tp+=1; //but if present, step past that quote
94 ret = -13;
95 vp = tp; //save this pos as value start
96close_quote:
97 while(*tp!='\"' && *tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //seek inline quote
98 if(*tp!='\"') return -13; //Return error if no closing quote
99 cp = tp-1; //save previous pos as check pointer
100 tp+=1; //step past the quote character
101 if(*cp=='\\') goto close_quote; //if this was an 'escaped' quote, try again
102 //Here tp points to the character after the closing quote.
103 length = (tp-1) - vp; //prepare string length for return value
104 ret = -14;
105 while(*tp<=' ' && *tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //skip inline whitespace
106 if(*tp=='\0') goto exit; //but exit at EOF
107 ret = -15;
108 //Here tp points to a non-zero string that should be closing parenthesis
109 if(*tp!=')') goto exit; //Return error if no closing parenthesis
110 tp+=1; //but if present, step past the parenthesis
111 ret = -16;
112 while(*tp<=' ' && *tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //skip inline whitespace
113 if(*tp=='\0') goto exit; //but exit at EOF
114 //Here tp points to a non-zero string that should be line end or a comment
115 if(tp[0]!='/' || tp[1]!='/') goto finish_line; //if no comment, go handle line end
116 ret = -17;
117 while(*tp!='\r' && *tp!='\n' && *tp>'\0') tp+=1; //Seek line end
118 if(*tp=='\0') goto exit; //but exit at EOF
119finish_line:
120 ret = -18;
121 if(*tp!='\r' && *tp!='\n') goto exit; //Return error if not valid line end
122 if(tp[0]=='\r' && tp[1]=='\n') tp+=1; //Step an extra pos for CR+LF
123 tp+=1; //Step past valid line end
124 //Here tp points beyond the line of the processed string, so we're done
125 ret = length;
126
127exit:
128 *LANG_p_p = tp; //return new LANG file position
129 *id_p_p = ip; //return found index
130 *value_p_p = vp; //return found string value
131 return ret; //return control to caller
132}
133//Ends get_LANG_string
134//---------------------------------------------------------------------------
135void Init_Default_Language(void)
136{
137 memcpy(Lang_String, Lang_Default, sizeof(Lang_String));
138}
139//Ends Init_Default_Language
140//---------------------------------------------------------------------------
141void Load_External_Language(void)
142{
143 int error_id = -1;
144 int test = 0;
145 u32 index = 0;
146 char filePath[MAX_PATH];
147 u8 *file_bp, *file_tp, *lang_bp, *lang_tp, *oldf_tp=NULL;
148 u8 *id_p, *value_p;
149 int lang_size = 0;
150 int fd;
151
152 if(External_Lang_Buffer!=NULL){ //if an external buffer was allocated before
153 free(External_Lang_Buffer); //release that buffer before the new attempt
154 External_Lang_Buffer = NULL;
155 }
156
157 Language* Lang = Lang_Default;
158 memcpy(Lang_String, Lang, sizeof(Lang_String));
159
160 if(strlen(setting->lang_file)!=0){ //if language file string set
161
162 error_id = -2;
163 genFixPath(setting->lang_file, filePath);
164 fd = genOpen(filePath, O_RDONLY);
165 if(fd >= 0){ //if file opened OK
166 int file_size = genLseek(fd, 0, SEEK_END);
167
168 error_id = -3;
169 if (file_size > 0) { //if file size OK
170 error_id = -4;
171 file_bp = (u8*) malloc(file_size + 1);
172 if(file_bp == NULL)
173 goto aborted_1;
174
175 error_id = -5;
176 genLseek(fd, 0, SEEK_SET);
177 if(genRead(fd, file_bp, file_size) != file_size)
178 goto release_1;
179 file_bp[file_size] = '\0'; //enforce termination at buffer end
180
181 error_id = -6;
182 file_tp = file_bp;
183 while(1){
184 oldf_tp = file_tp;
185 test = get_LANG_string(&file_tp, &id_p, &value_p);
186 if(test==-1) //if EOF reached without other error
187 break; //break from the loop normally
188 if(test<0) //At any fatal error result
189 goto release_1; //go release file buffer
190 index = atoi(id_p); //get the string index
191 if(index>=LANG_COUNT) //At any fatal error result
192 goto release_1; //go release file buffer
193 lang_size += test + 1; //Include terminator space for total size
194 }
195 //Here lang_size is the space needed for real language buffer,
196
197 error_id = -7;
198 lang_bp = (u8*) malloc(lang_size + 1); //allocate real language buffer
199 if(lang_bp == NULL)
200 goto release_1;
201
202 //We're ready to read language strings, but must first init all pointers
203 //to use default strings, for any indexes left undefined by the file
204 memcpy(Lang_Extern, Lang, sizeof(Lang_Extern));
205
206 file_tp = file_bp;
207 lang_tp = lang_bp;
208 while((test = get_LANG_string(&file_tp, &id_p, &value_p)) >= 0){
209 index = atoi(id_p); //get the string index
210 Lang_Extern[index].String = lang_tp; //save pointer to this string base
211 strncpy(lang_tp, value_p, test); //transfer the string
212 lang_tp[test] = '\0'; //transfer a terminator
213 lang_tp += test + 1; //move dest pointer past this string
214 }
215 External_Lang_Buffer = (Language*) lang_bp; //Save base pointer for releases
216 Lang = Lang_Extern;
217 error_id = 0;
218release_1:
219 free(file_bp);
220 } // end if clause for file size OK
221aborted_1:
222 genClose( fd );
223 } // end if clause for file opened OK
224 } // end if language file string set
225
226 if(error_id < -1){
227 u8 tmp_s[80*8], t1_s[102], t2_s[102];
228 int pos=0, stp=0;
229 sprintf(tmp_s,
230 "LNG loading failed with error_id==%d and test==%d\n"
231 "The latest string index (possibly invalid) was %d\n"
232 "%n"
233 , error_id, test, index, &stp
234 );
235 pos += stp;
236 if(error_id==-2) {//if file open failure
237 sprintf(tmp_s+pos,
238 "This was a failure to open the file:\n"
239 "\"%s\"\n"
240 , filePath
241 );
242 }
243 if(error_id==-6) {//if parsing error
244 strncpy(t1_s, oldf_tp, 100);
245 t1_s[100] = '\0';
246 strncpy(t2_s, file_tp, 100);
247 t2_s[100] = '\0';
248 sprintf(tmp_s+pos,
249 "This was a parsing error when trying to parse the text:\n"
250 "\"%s\"\n"
251 "That attempt failed somehow, after reaching this point:\n"
252 "\"%s\"\n"
253 , t1_s, t2_s
254 );
255 }
256 strcat(tmp_s, "Use either OK or CANCEL to continue (no diff)");
257 ynDialog(tmp_s);
258 }
259
260 memcpy(Lang_String, Lang, sizeof(Lang_String));
261
262 int i;
263 char *tmp;
264
265 if(strlen(setting->Misc)>0){
266 for(i=0; i<16; i++){ //Loop to rename the ELF paths with new language for launch keys
267 if((i<12) || (setting->LK_Flag[i]!=0)){
268 if(!strncmp(setting->LK_Path[i], setting->Misc, strlen(setting->Misc))){
269 tmp = strrchr(setting->LK_Path[i], '/');
270 if(!strcmp(tmp+1, setting->Misc_PS2Disc+strlen(setting->Misc)))
271 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(PS2Disc));
272 else if(!strcmp(tmp+1, setting->Misc_FileBrowser+strlen(setting->Misc)))
273 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(FileBrowser));
274 else if(!strcmp(tmp+1, setting->Misc_PS2Browser+strlen(setting->Misc)))
275 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(PS2Browser));
276 else if(!strcmp(tmp+1, setting->Misc_PS2Net+strlen(setting->Misc)))
277 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(PS2Net));
278 else if(!strcmp(tmp+1, setting->Misc_PS2PowerOff+strlen(setting->Misc)))
279 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(PS2PowerOff));
280 else if(!strcmp(tmp+1, setting->Misc_HddManager+strlen(setting->Misc)))
281 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(HddManager));
282 else if(!strcmp(tmp+1, setting->Misc_TextEditor+strlen(setting->Misc)))
283 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(TextEditor));
284 else if(!strcmp(tmp+1, setting->Misc_JpgViewer+strlen(setting->Misc)))
285 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(JpgViewer));
286 else if(!strcmp(tmp+1, setting->Misc_Configure+strlen(setting->Misc)))
287 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(Configure));
288 else if(!strcmp(tmp+1, setting->Misc_Load_CNFprev+strlen(setting->Misc)))
289 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(Load_CNFprev));
290 else if(!strcmp(tmp+1, setting->Misc_Load_CNFnext+strlen(setting->Misc)))
291 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(Load_CNFnext));
292 else if(!strcmp(tmp+1, setting->Misc_Set_CNF_Path+strlen(setting->Misc)))
293 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(Set_CNF_Path));
294 else if(!strcmp(tmp+1, setting->Misc_Load_CNF+strlen(setting->Misc)))
295 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(Load_CNF));
296 else if(!strcmp(tmp+1, setting->Misc_ShowFont+strlen(setting->Misc)))
297 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(ShowFont));
298 else if(!strcmp(tmp+1, setting->Misc_Debug_Info+strlen(setting->Misc)))
299 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(Debug_Info));
300 else if(!strcmp(tmp+1, setting->Misc_About_uLE+strlen(setting->Misc)))
301 sprintf(setting->LK_Path[i], "%s/%s", LNG(MISC), LNG(About_uLE));
302 } // end if Misc
303 } // end if LK assigned
304 } // end for
305 } // end if Misc Initialized
306
307 sprintf(setting->Misc , "%s/", LNG(MISC));
308 sprintf(setting->Misc_PS2Disc , "%s/%s", LNG(MISC), LNG(PS2Disc));
309 sprintf(setting->Misc_FileBrowser , "%s/%s", LNG(MISC), LNG(FileBrowser));
310 sprintf(setting->Misc_PS2Browser , "%s/%s", LNG(MISC), LNG(PS2Browser));
311 sprintf(setting->Misc_PS2Net , "%s/%s", LNG(MISC), LNG(PS2Net));
312 sprintf(setting->Misc_PS2PowerOff , "%s/%s", LNG(MISC), LNG(PS2PowerOff));
313 sprintf(setting->Misc_HddManager , "%s/%s", LNG(MISC), LNG(HddManager));
314 sprintf(setting->Misc_TextEditor , "%s/%s", LNG(MISC), LNG(TextEditor));
315 sprintf(setting->Misc_JpgViewer , "%s/%s", LNG(MISC), LNG(JpgViewer));
316 sprintf(setting->Misc_Configure , "%s/%s", LNG(MISC), LNG(Configure));
317 sprintf(setting->Misc_Load_CNFprev , "%s/%s", LNG(MISC), LNG(Load_CNFprev));
318 sprintf(setting->Misc_Load_CNFnext , "%s/%s", LNG(MISC), LNG(Load_CNFnext));
319 sprintf(setting->Misc_Set_CNF_Path , "%s/%s", LNG(MISC), LNG(Set_CNF_Path));
320 sprintf(setting->Misc_Load_CNF , "%s/%s", LNG(MISC), LNG(Load_CNF));
321 sprintf(setting->Misc_ShowFont , "%s/%s", LNG(MISC), LNG(ShowFont));
322 sprintf(setting->Misc_Debug_Info , "%s/%s", LNG(MISC), LNG(Debug_Info));
323 sprintf(setting->Misc_About_uLE , "%s/%s", LNG(MISC), LNG(About_uLE));
324
325}
326//Ends Load_External_Language
327//---------------------------------------------------------------------------
328//End of file: lang.c
329//---------------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.