mirror of
https://github.com/samba-team/samba.git
synced 2024-12-24 21:34:56 +03:00
76ecf81428
file_load() to use talloc, which impacted quite a few bits of code,
including our smb.conf processing.
took the opportunity to remove the gloabls in params.c while doing this
(This used to be commit b220756cb4
)
244 lines
5.2 KiB
C
244 lines
5.2 KiB
C
/*
|
|
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", lib_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;
|
|
}
|