2 Unix SMB/CIFS implementation.
3 tdb based replacement for gettext
4 Copyright (C) Andrew Tridgell 2001
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
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.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>.
21 #include "system/filesys.h"
22 #include "intl/lang_tdb.h"
24 static TDB_CONTEXT
*tdb
;
26 /* the currently selected language */
27 static char *current_lang
;
30 /* load a msg file into the tdb */
31 static bool load_msg(const char *msg_file
)
38 lines
= file_lines_load(msg_file
, &num_lines
, 0, NULL
);
44 if (tdb_lockall(tdb
) != 0) {
54 for (i
=0;i
<num_lines
;i
++) {
55 if (strncmp(lines
[i
], "msgid \"", 7) == 0) {
58 if (msgid
&& strncmp(lines
[i
], "msgstr \"", 8) == 0) {
59 msgstr
= lines
[i
] + 8;
60 trim_char(msgid
, '\0', '\"');
61 trim_char(msgstr
, '\0', '\"');
65 all_string_sub(msgid
, "\\n", "\n", 0);
66 all_string_sub(msgstr
, "\\n", "\n", 0);
67 data
= string_term_tdb_data(msgstr
);
68 tdb_store_bystring(tdb
, msgid
, data
, 0);
80 /* work out what language to use from locale variables */
81 static const char *get_lang(void)
83 const char *vars
[] = {"LANGUAGE", "LC_ALL", "LC_LANG", "LANG", NULL
};
87 for (i
=0; vars
[i
]; i
++) {
88 if ((p
= getenv(vars
[i
]))) {
96 /* initialise the message translation subsystem. If the "lang" argument
97 is NULL then get the language from the normal environment variables */
98 bool lang_tdb_init(const char *lang
)
101 char *msg_path
= NULL
;
103 static int initialised
;
107 /* we only want to init once per process, unless given
109 if (initialised
&& !lang
)
113 /* we are re-initialising, free up any old init */
118 SAFE_FREE(current_lang
);
124 /* no lang given, use environment */
128 /* if no lang then we don't translate */
132 if (asprintf(&msg_path
, "%s.msg",
133 data_path((const char *)lang
)) == -1) {
134 DEBUG(0, ("asprintf failed\n"));
137 if (stat(msg_path
, &st
) != 0) {
138 /* the msg file isn't available */
139 DEBUG(10, ("lang_tdb_init: %s: %s\n", msg_path
,
144 if (asprintf(&path
, "%s%s.tdb", lock_path("lang_"), lang
) == -1) {
145 DEBUG(0, ("asprintf failed\n"));
149 DEBUG(10, ("lang_tdb_init: loading %s\n", path
));
151 tdb
= tdb_open_log(path
, 0, TDB_DEFAULT
, O_RDWR
|O_CREAT
, 0644);
153 tdb
= tdb_open_log(path
, 0, TDB_DEFAULT
, O_RDONLY
, 0);
155 DEBUG(10, ("lang_tdb_init: %s: %s\n", path
,
159 current_lang
= SMB_STRDUP(lang
);
164 loadtime
= tdb_fetch_int32(tdb
, "/LOADTIME/");
166 if (loadtime
== -1 || loadtime
< st
.st_mtime
) {
168 tdb_store_int32(tdb
, "/LOADTIME/", (int)time(NULL
));
171 current_lang
= SMB_STRDUP(lang
);
181 /* translate a msgid to a message string in the current language
182 returns a string that must be freed by calling lang_msg_free()
184 const char *lang_msg(const char *msgid
)
188 char *q
, *msgid_quoted
;
193 if (!tdb
) return msgid
;
195 /* Due to the way quotes in msgids are escaped in the msg file we
196 must replace " with \" before doing a lookup in the tdb. */
200 for(p
= msgid
; *p
; p
++) {
205 if (!(msgid_quoted
= (char *)SMB_MALLOC(strlen(msgid
) + count
+ 1)))
208 /* string_sub() is unsuitable here as it replaces some punctuation
209 chars with underscores. */
211 for(p
= msgid
, q
= msgid_quoted
; *p
; p
++) {
222 data
= tdb_fetch_bystring(tdb
, msgid_quoted
);
226 /* if the message isn't found then we still need to return a pointer
227 that can be freed. Pity. */
229 return SMB_STRDUP(msgid
);
231 return (const char *)data
.dptr
;
235 /* free up a string from lang_msg() */
236 void lang_msg_free(const char *msgstr
)
239 free(discard_const_p(void, msgstr
));
243 return the current language - needed for language file mappings
245 char *lang_tdb_current(void)