char load_lang_file(char *pth)
{
char *buf;
DWORD sz=0;
DWORD afc=0;
AF *af;
if(!(buf = read_whole_file(pth,&sz)))
return 0;
free_lang();//free_crs(lang_file,&lf_afc);
af= make_af("%*[#(#)#]%*[#(#)#]%*",0,&lf_afc);
lang_file=parse_string(buf,sz,af,lf_afc,1);
load_menu_lang(lang_file[0].str,lang_file[0].dx);
parse_msgs(lang_file[4].str,lang_file[4].dx);
return 1;
}
static void
parse_msg_file(int charset_code)
{
FILE *fh;
unsigned char header[20];
int i;
unsigned len;
unsigned char *p;
char *fnm, *s;
int n;
#ifdef DEBUG
fprintf(stderr, "parse_msg_file(%d)\n", charset_code);
#endif
/* sort out messages we need to print if we can't open the message file */
dontextract = parse_msgs(N_DONTEXTRACTMSGS, dontextractmsgs, charset_code);
fnm = osstrdup(msg_lang);
/* trim off charset from stuff like "de_DE.iso8859_1" */
s = strchr(fnm, '.');
if (s) *s = '\0';
/* trim off any "@<something>" modifier. */
s = strchr(fnm, '@');
if (s) *s = '\0';
fh = fopenWithPthAndExt(pth_cfg_files, fnm, EXT_SVX_MSG, "rb", NULL);
if (!fh && strlen(fnm) > 3 && fnm[2] == '_') {
/* e.g. if 'en_GB' is unknown, see if we know 'en' */
fnm[2] = '\0';
fh = fopenWithPthAndExt(pth_cfg_files, fnm, EXT_SVX_MSG, "rb", NULL);
if (!fh) fnm[2] = '_'; /* for error reporting */
}
if (!fh && !msg_lang_explicit) {
/* If msg_lang wasn't specified using environment variable SURVEXLANG,
* then default to 'en' if we don't find messages for language msg_lang.
*/
if (fnm[0] && fnm[1]) {
strcpy(fnm, "en");
} else {
osfree(fnm);
fnm = osstrdup("en");
}
fh = fopenWithPthAndExt(pth_cfg_files, fnm, EXT_SVX_MSG, "rb", NULL);
}
if (!fh) {
fatalerror(/*Can't open message file “%s” using path “%s”*/1000,
fnm, pth_cfg_files);
}
if (fread(header, 1, 20, fh) < 20 ||
memcmp(header, "Svx\nMsg\r\n\xfe\xff", 12) != 0) {
fatalerror(/*Problem with message file “%s”*/1001, fnm);
}
if (header[12] != 0)
fatalerror(/*I don't understand this message file version*/1002);
n = (header[14] << 8) | header[15];
len = 0;
for (i = 16; i < 20; i++) len = (len << 8) | header[i];
p = osmalloc(len);
if (fread(p, 1, len, fh) < len)
fatalerror(/*Message file truncated?*/1003);
fclose(fh);
#ifdef DEBUG
fprintf(stderr, "fnm = “%s”, n = %d, len = %d\n", fnm, n, len);
#endif
osfree(fnm);
msg_array = parse_msgs(n, p, charset_code);
num_msgs = n;
}
