diff options
Diffstat (limited to 'source4/intl/lang_tdb.c')
| -rw-r--r-- | source4/intl/lang_tdb.c | 243 |
1 files changed, 0 insertions, 243 deletions
diff --git a/source4/intl/lang_tdb.c b/source4/intl/lang_tdb.c deleted file mode 100644 index 2ca056ef70..0000000000 --- a/source4/intl/lang_tdb.c +++ /dev/null @@ -1,243 +0,0 @@ -/* - Unix SMB/CIFS implementation. - tdb based replacement for gettext - Copyright (C) Andrew Tridgell 2001 - - This program is free software; you can redistribute it and/or modify - it under the terms of the GNU General Public License as published by - the Free Software Foundation; either version 2 of the License, or - (at your option) any later version. - - This program is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - GNU General Public License for more details. - - You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. -*/ - -#include "includes.h" -#include "lib/tdb/include/tdbutil.h" -#include "system/time.h" -#include "system/filesys.h" -#include "pstring.h" - -static TDB_CONTEXT *tdb; - -/* the currently selected language */ -static char *current_lang; - - -/* load a msg file into the tdb */ -static BOOL load_msg(const char *msg_file) -{ - char **lines; - int num_lines, i; - char *msgid, *msgstr; - TDB_DATA key, data; - TALLOC_CTX *tmp_ctx = talloc_new(NULL); - - lines = file_lines_load(msg_file, &num_lines, tmp_ctx); - - if (!lines) { - talloc_free(tmp_ctx); - return False; - } - - if (tdb_lockall(tdb) != 0) { - talloc_free(tmp_ctx); - return False; - } - - /* wipe the db */ - tdb_traverse(tdb, tdb_traverse_delete_fn, NULL); - - msgid = NULL; - - for (i=0;i<num_lines;i++) { - if (strncmp(lines[i], "msgid \"", 7) == 0) { - msgid = lines[i] + 7; - } - if (msgid && strncmp(lines[i], "msgstr \"", 8) == 0) { - msgstr = lines[i] + 8; - trim_string(msgid, NULL, "\""); - trim_string(msgstr, NULL, "\""); - if (*msgstr == 0) { - msgstr = msgid; - } - key.dptr = msgid; - key.dsize = strlen(msgid)+1; - data.dptr = msgstr; - data.dsize = strlen(msgstr)+1; - tdb_store(tdb, key, data, 0); - msgid = NULL; - } - } - - talloc_free(tmp_ctx); - tdb_unlockall(tdb); - - return True; -} - - -/* work out what language to use from locale variables */ -static const char *get_lang(void) -{ - const char *vars[] = {"LANGUAGE", "LC_ALL", "LC_LANG", "LANG", NULL}; - int i; - char *p; - - for (i=0; vars[i]; i++) { - if ((p = getenv(vars[i]))) { - return p; - } - } - - return NULL; -} - -/* initialise the message translation subsystem. If the "lang" argument - is NULL then get the language from the normal environment variables */ -BOOL lang_tdb_init(const char *lang) -{ - char *path = NULL; - char *msg_path = NULL; - struct stat st; - static int initialised; - time_t loadtime; - TALLOC_CTX *mem_ctx; - - /* we only want to init once per process, unless given - an override */ - if (initialised && !lang) return True; - - if (initialised) { - /* we are re-initialising, free up any old init */ - if (tdb) { - tdb_close(tdb); - tdb = NULL; - } - SAFE_FREE(current_lang); - } - - initialised = 1; - - if (!lang) { - /* no lang given, use environment */ - lang = get_lang(); - } - - /* if no lang then we don't translate */ - if (!lang) return True; - - mem_ctx = talloc_init("lang_tdb_init"); - if (!mem_ctx) { - return False; - } - asprintf(&msg_path, "%s.msg", data_path(mem_ctx, (const char *)lang)); - if (stat(msg_path, &st) != 0) { - /* the msg file isn't available */ - free(msg_path); - talloc_free(mem_ctx); - return False; - } - - - asprintf(&path, "%s%s.tdb", lock_path(mem_ctx, "lang_"), lang); - - tdb = tdb_open(path, 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0644); - if (!tdb) { - tdb = tdb_open(path, 0, TDB_DEFAULT, O_RDONLY, 0); - free(path); - free(msg_path); - talloc_free(mem_ctx); - if (!tdb) return False; - current_lang = strdup(lang); - return True; - } - - free(path); - talloc_free(mem_ctx); - - loadtime = tdb_fetch_int32(tdb, "/LOADTIME/"); - - if (loadtime == -1 || loadtime < st.st_mtime) { - load_msg(msg_path); - tdb_store_int32(tdb, "/LOADTIME/", (int)time(NULL)); - } - free(msg_path); - - current_lang = strdup(lang); - - return True; -} - -/* translate a msgid to a message string in the current language - returns a string that must be freed by calling lang_msg_free() -*/ -char *lang_msg(const char *msgid) -{ - TDB_DATA key, data; - - lang_tdb_init(NULL); - - if (!tdb) return strdup(msgid); - - key.dptr = strdup(msgid); - key.dsize = strlen(msgid)+1; - - data = tdb_fetch(tdb, key); - - free(key.dptr); - - /* if the message isn't found then we still need to return a pointer - that can be freed. Pity. */ - if (!data.dptr) - return strdup(msgid); - - return data.dptr; -} - - -/* free up a string from lang_msg() */ -void lang_msg_free(char *msgstr) -{ - free(msgstr); -} - - -/* - when the _() translation macro is used there is no obvious place to free - the resulting string and there is no easy way to give a static pointer. - All we can do is rotate between some static buffers and hope a single d_printf() - doesn't have more calls to _() than the number of buffers -*/ -const char *lang_msg_rotate(const char *msgid) -{ -#define NUM_LANG_BUFS 4 - const char *msgstr; - static pstring bufs[NUM_LANG_BUFS]; - static int next; - - msgstr = lang_msg(msgid); - if (!msgstr) return msgid; - - pstrcpy(bufs[next], msgstr); - msgstr = bufs[next]; - - next = (next+1) % NUM_LANG_BUFS; - - return msgstr; -} - - -/* - return the current language - needed for language file mappings -*/ -char *lang_tdb_current(void) -{ - return current_lang; -} |