2 Unix SMB/Netbios implementation.
4 tdb based replacement for gettext
5 Copyright (C) Andrew Tridgell 2001
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
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);
44 if (tdb_lockall(tdb) != 0) return False;
47 tdb_traverse(tdb, tdb_traverse_delete_fn, NULL);
51 for (i=0;i<num_lines;i++) {
52 if (strncmp(lines[i], "msgid \"", 7) == 0) {
55 if (msgid && strncmp(lines[i], "msgstr \"", 8) == 0) {
56 msgstr = lines[i] + 8;
57 trim_string(msgid, NULL, "\"");
58 trim_string(msgstr, NULL, "\"");
63 key.dsize = strlen(msgid)+1;
65 data.dsize = strlen(msgstr)+1;
66 tdb_store(tdb, key, data, 0);
71 file_lines_free(lines);
78 /* work out what language to use from locale variables */
79 static char *get_lang(void)
81 char *vars[] = {"LANGUAGE", "LC_ALL", "LC_LANG", "LANG", NULL};
85 for (i=0; vars[i]; i++) {
86 if ((p = getenv(vars[i]))) {
94 /* initialise the message translation subsystem. If the "lang" argument
95 is NULL then get the language from the normal environment variables */
96 BOOL lang_tdb_init(const char *lang)
99 char *msg_path = NULL;
101 static int initialised;
104 /* we only want to init once per process, unless given
106 if (initialised && !lang) return True;
109 /* we are re-initialising, free up any old init */
112 SAFE_FREE(current_lang);
118 /* no lang given, use environment */
122 /* if no lang then we don't translate */
123 if (!lang) return True;
125 asprintf(&msg_path, "%s.msg", lib_path((char *)lang));
126 if (stat(msg_path, &st) != 0) {
127 /* the msg file isn't available */
133 asprintf(&path, "%s%s.tdb", lock_path("lang_"), lang);
135 tdb = tdb_open_log(path, 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0644);
137 tdb = tdb_open_log(path, 0, TDB_DEFAULT, O_RDONLY, 0);
140 if (!tdb) return False;
141 current_lang = strdup(lang);
147 loadtime = tdb_fetch_int32(tdb, "/LOADTIME/");
149 if (loadtime == -1 || loadtime < st.st_mtime) {
151 tdb_store_int32(tdb, "/LOADTIME/", (int)time(NULL));
155 current_lang = strdup(lang);
160 /* translate a msgid to a message string in the current language
161 returns a string that must be freed by calling lang_msg_free()
163 const char *lang_msg(const char *msgid)
169 if (!tdb) return msgid;
171 key.dptr = (char *)msgid;
172 key.dsize = strlen(msgid)+1;
174 data = tdb_fetch(tdb, key);
176 /* if the message isn't found then we still need to return a pointer
177 that can be freed. Pity. */
178 if (!data.dptr) return strdup(msgid);
180 return (const char *)data.dptr;
184 /* free up a string from lang_msg() */
185 void lang_msg_free(const char *msgstr)
188 free((void *)msgstr);
193 when the _() translation macro is used there is no obvious place to free
194 the resulting string and there is no easy way to give a static pointer.
195 All we can do is rotate between some static buffers and hope a single d_printf()
196 doesn't have more calls to _() than the number of buffers
198 const char *lang_msg_rotate(const char *msgid)
200 #define NUM_LANG_BUFS 4
202 static pstring bufs[NUM_LANG_BUFS];
205 msgstr = (char *)lang_msg(msgid);
206 if (!msgstr) return msgid;
208 pstrcpy(bufs[next], msgstr);
211 next = (next+1) % NUM_LANG_BUFS;
218 return the current language - needed for language file mappings
220 char *lang_tdb_current(void)