1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
|
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2007 - INRIA - Allan CORNET
// Copyright (C) 2011-2012 - DIGITEO - Allan CORNET
//
// This file must be used under the terms of the CeCILL.
// This source file is licensed as described in the file COPYING, which
// you should have received as part of this distribution. The terms
// are also available at
// http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
function generatePoFile(LANGUAGE)
if getos() <> "Windows" then
error(999, "Used only under Windows");
end
if ~isdef("%c_a_c") then
exec("SCI/modules/overloading/macros/%c_a_c.sci");
end
LC = "LC_MESSAGES";
DEST_PATH_MO = SCI + filesep() + "locale" + filesep() + LANGUAGE + filesep() + LC + filesep();
DEST_FILE_MO = "scilab.mo";
DEST_FILE_PO = "scilab.po";
LC = "LC_MESSAGES";
PATH_GETTEXT_TOOLS = SCI + filesep() + "tools/gettext";
PATH_GETTEXT_TOOLS = getrelativefilename(DEST_PATH_MO, PATH_GETTEXT_TOOLS);
// make destination directories
if ~isdir(SCI + filesep() + "locale") then
createdir(SCI + filesep() + "locale");
end
if ~isdir(SCI + filesep() + "locale" + filesep() + LANGUAGE) then
createdir(SCI + filesep() + "locale" + filesep() + LANGUAGE);
end
if ~isdir(SCI + filesep() + "locale" + filesep() + LANGUAGE + filesep() + LC) then
createdir(SCI + filesep() + "locale" + filesep() + LANGUAGE + filesep() + LC);
end
Modules = getmodules();
PATH_PO = SCI + filesep() + "modules" + filesep() + Modules + filesep() + "locales" + filesep();
if LANGUAGE == "en_US" then
FILENAME_PO = Modules + ".pot";
else
FILENAME_PO = LANGUAGE + ".po";
end
List_files = [];
for k = 1:size(PATH_PO, "*")
if LANGUAGE == "en_US" then
if findfiles(PATH_PO(k), FILENAME_PO(k)) <> [] then
List_files = [List_files ; getrelativefilename(DEST_PATH_MO, fullpath(PATH_PO(k) + FILENAME_PO(k)))];
end
else
if findfiles(PATH_PO(k), FILENAME_PO) <> [] then
List_files = [List_files ; getrelativefilename(DEST_PATH_MO, fullpath(PATH_PO(k) + FILENAME_PO))];
end
end
end
if (List_files <> []) then
if newest([DEST_PATH_MO + DEST_FILE_MO; DEST_PATH_MO + List_files]) <> 1 then
curPath = pwd();
cd(DEST_PATH_MO)
cmdline_msgcat = PATH_GETTEXT_TOOLS + filesep() + "msgcat --use-first -o " + DEST_FILE_PO + " " + strcat("""" + List_files + """", " ");
unix(cmdline_msgcat);
cmline_msgfmt = PATH_GETTEXT_TOOLS + filesep() + "msgfmt --statistics -o " + DEST_FILE_MO + " " + DEST_FILE_PO;
unix(cmline_msgfmt);
cd(curPath)
end
end
endfunction
// ======================================
function languages = findLanguagesToBuild()
languages = [];
f1 = findfiles("SCI/modules/core/locales/", "*.pot");
f2 = findfiles("SCI/modules/core/locales/", "*.po");
if f1 <> [] then
languages = ["en_US"];
end
if f2 <> [] then
f2 = strsubst(f2, ".po", "");
languages = [languages, f2'];
end
endfunction
// ======================================
// Main
LANGUAGES = findLanguagesToBuild();
mprintf("-- Build localization (.mo from .po) --\n");
for L = LANGUAGES
mprintf(" -- Building for ""%s"" --\n", L);
generatePoFile(L);
end
// ======================================
|
