mirror of
https://github.com/samba-team/samba.git
synced 2024-12-25 23:21:54 +03:00
de46ad9084
This brings these helpful utility functions in common, as they are not based on either loadparm system. (The 'modules dir' parameter from Samba4 will shortly be removed, so there is no loss in functionality) Andrew Bartlett
250 lines
5.2 KiB
C
250 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 3 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, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include "includes.h"
|
|
#include "system/filesys.h"
|
|
#include "intl/lang_tdb.h"
|
|
#include "util_tdb.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 data;
|
|
|
|
lines = file_lines_load(msg_file, &num_lines, 0, NULL);
|
|
|
|
if (!lines) {
|
|
return False;
|
|
}
|
|
|
|
if (tdb_lockall(tdb) != 0) {
|
|
TALLOC_FREE(lines);
|
|
return False;
|
|
}
|
|
|
|
/* wipe the db */
|
|
tdb_wipe_all(tdb);
|
|
|
|
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_char(msgid, '\0', '\"');
|
|
trim_char(msgstr, '\0', '\"');
|
|
if (*msgstr == 0) {
|
|
msgstr = msgid;
|
|
}
|
|
all_string_sub(msgid, "\\n", "\n", 0);
|
|
all_string_sub(msgstr, "\\n", "\n", 0);
|
|
data = string_term_tdb_data(msgstr);
|
|
tdb_store_bystring(tdb, msgid, data, 0);
|
|
msgid = NULL;
|
|
}
|
|
}
|
|
|
|
TALLOC_FREE(lines);
|
|
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;
|
|
bool result = False;
|
|
|
|
/* 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;
|
|
|
|
if (asprintf(&msg_path, "%s.msg",
|
|
data_path(talloc_tos(), (const char *)lang)) == -1) {
|
|
DEBUG(0, ("asprintf failed\n"));
|
|
goto done;
|
|
}
|
|
if (stat(msg_path, &st) != 0) {
|
|
/* the msg file isn't available */
|
|
DEBUG(10, ("lang_tdb_init: %s: %s\n", msg_path,
|
|
strerror(errno)));
|
|
goto done;
|
|
}
|
|
|
|
if (asprintf(&path, "%s%s.tdb", lock_path("lang_"), lang) == -1) {
|
|
DEBUG(0, ("asprintf failed\n"));
|
|
goto done;
|
|
}
|
|
|
|
DEBUG(10, ("lang_tdb_init: loading %s\n", path));
|
|
|
|
tdb = tdb_open_log(path, 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0644);
|
|
if (!tdb) {
|
|
tdb = tdb_open_log(path, 0, TDB_DEFAULT, O_RDONLY, 0);
|
|
if (!tdb) {
|
|
DEBUG(10, ("lang_tdb_init: %s: %s\n", path,
|
|
strerror(errno)));
|
|
goto done;
|
|
}
|
|
current_lang = SMB_STRDUP(lang);
|
|
result = True;
|
|
goto done;
|
|
}
|
|
|
|
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));
|
|
}
|
|
|
|
current_lang = SMB_STRDUP(lang);
|
|
result = True;
|
|
|
|
done:
|
|
SAFE_FREE(msg_path);
|
|
SAFE_FREE(path);
|
|
|
|
return result;
|
|
}
|
|
|
|
/* translate a msgid to a message string in the current language
|
|
returns a string that must be freed by calling lang_msg_free()
|
|
*/
|
|
const char *lang_msg(const char *msgid)
|
|
{
|
|
TDB_DATA data;
|
|
const char *p;
|
|
char *q, *msgid_quoted;
|
|
int count;
|
|
|
|
lang_tdb_init(NULL);
|
|
|
|
if (!tdb) return msgid;
|
|
|
|
/* Due to the way quotes in msgids are escaped in the msg file we
|
|
must replace " with \" before doing a lookup in the tdb. */
|
|
|
|
count = 0;
|
|
|
|
for(p = msgid; *p; p++) {
|
|
if (*p == '\"')
|
|
count++;
|
|
}
|
|
|
|
if (!(msgid_quoted = (char *)SMB_MALLOC(strlen(msgid) + count + 1)))
|
|
return msgid;
|
|
|
|
/* string_sub() is unsuitable here as it replaces some punctuation
|
|
chars with underscores. */
|
|
|
|
for(p = msgid, q = msgid_quoted; *p; p++) {
|
|
if (*p == '\"') {
|
|
*q = '\\';
|
|
q++;
|
|
}
|
|
*q = *p;
|
|
q++;
|
|
}
|
|
|
|
*q = 0;
|
|
|
|
data = tdb_fetch_bystring(tdb, msgid_quoted);
|
|
|
|
free(msgid_quoted);
|
|
|
|
/* if the message isn't found then we still need to return a pointer
|
|
that can be freed. Pity. */
|
|
if (!data.dptr)
|
|
return SMB_STRDUP(msgid);
|
|
|
|
return (const char *)data.dptr;
|
|
}
|
|
|
|
|
|
/* free up a string from lang_msg() */
|
|
void lang_msg_free(const char *msgstr)
|
|
{
|
|
if (!tdb) return;
|
|
free(discard_const_p(void, msgstr));
|
|
}
|
|
|
|
/*
|
|
return the current language - needed for language file mappings
|
|
*/
|
|
char *lang_tdb_current(void)
|
|
{
|
|
return current_lang;
|
|
}
|