annotate intl/dcigettext.c @ 1677:fdfd048eb9f3 trunk

[svn] Mark autogen.sh executable.
author chainsaw
date Wed, 13 Sep 2006 09:05:18 -0700
parents 705d4c089fce
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1 /* Implementation of the internal dcigettext function.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
2 Copyright (C) 1995-1999, 2000-2003 Free Software Foundation, Inc.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
3
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
4 This program is free software; you can redistribute it and/or modify it
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
5 under the terms of the GNU Library General Public License as published
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
6 by the Free Software Foundation; either version 2, or (at your option)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
7 any later version.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
8
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
9 This program is distributed in the hope that it will be useful,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
12 Library General Public License for more details.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
13
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
14 You should have received a copy of the GNU Library General Public
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
15 License along with this program; if not, write to the Free Software
1459
705d4c089fce [svn] Fix postal code.
chainsaw
parents: 1458
diff changeset
16 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
0
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
17 USA. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
18
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
19 /* Tell glibc's <string.h> to provide a prototype for mempcpy().
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
20 This must come before <config.h> because <config.h> may include
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
21 <features.h>, and once <features.h> has been included, it's too late. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
22 #ifndef _GNU_SOURCE
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
23 # define _GNU_SOURCE 1
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
24 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
25
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
26 #ifdef HAVE_CONFIG_H
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
27 # include <config.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
28 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
29
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
30 #include <sys/types.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
31
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
32 #ifdef __GNUC__
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
33 # define alloca __builtin_alloca
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
34 # define HAVE_ALLOCA 1
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
35 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
36 # ifdef _MSC_VER
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
37 # include <malloc.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
38 # define alloca _alloca
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
39 # else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
40 # if defined HAVE_ALLOCA_H || defined _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
41 # include <alloca.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
42 # else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
43 # ifdef _AIX
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
44 #pragma alloca
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
45 # else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
46 # ifndef alloca
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
47 char *alloca ();
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
48 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
49 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
50 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
51 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
52 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
53
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
54 #include <errno.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
55 #ifndef errno
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
56 extern int errno;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
57 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
58 #ifndef __set_errno
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
59 # define __set_errno(val) errno = (val)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
60 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
61
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
62 #include <stddef.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
63 #include <stdlib.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
64 #include <string.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
65
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
66 #if defined HAVE_UNISTD_H || defined _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
67 # include <unistd.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
68 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
69
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
70 #include <locale.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
71
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
72 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
73 /* Guess whether integer division by zero raises signal SIGFPE.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
74 Set to 1 only if you know for sure. In case of doubt, set to 0. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
75 # if defined __alpha__ || defined __arm__ || defined __i386__ \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
76 || defined __m68k__ || defined __s390__
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
77 # define INTDIV0_RAISES_SIGFPE 1
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
78 # else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
79 # define INTDIV0_RAISES_SIGFPE 0
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
80 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
81 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
82 #if !INTDIV0_RAISES_SIGFPE
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
83 # include <signal.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
84 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
85
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
86 #if defined HAVE_SYS_PARAM_H || defined _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
87 # include <sys/param.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
88 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
89
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
90 #include "gettextP.h"
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
91 #include "plural-exp.h"
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
92 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
93 # include <libintl.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
94 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
95 # include "libgnuintl.h"
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
96 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
97 #include "hash-string.h"
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
98
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
99 /* Thread safetyness. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
100 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
101 # include <bits/libc-lock.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
102 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
103 /* Provide dummy implementation if this is outside glibc. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
104 # define __libc_lock_define_initialized(CLASS, NAME)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
105 # define __libc_lock_lock(NAME)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
106 # define __libc_lock_unlock(NAME)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
107 # define __libc_rwlock_define_initialized(CLASS, NAME)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
108 # define __libc_rwlock_rdlock(NAME)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
109 # define __libc_rwlock_unlock(NAME)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
110 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
111
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
112 /* Alignment of types. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
113 #if defined __GNUC__ && __GNUC__ >= 2
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
114 # define alignof(TYPE) __alignof__ (TYPE)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
115 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
116 # define alignof(TYPE) \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
117 ((int) &((struct { char dummy1; TYPE dummy2; } *) 0)->dummy2)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
118 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
119
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
120 /* The internal variables in the standalone libintl.a must have different
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
121 names than the internal variables in GNU libc, otherwise programs
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
122 using libintl.a cannot be linked statically. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
123 #if !defined _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
124 # define _nl_default_default_domain libintl_nl_default_default_domain
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
125 # define _nl_current_default_domain libintl_nl_current_default_domain
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
126 # define _nl_default_dirname libintl_nl_default_dirname
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
127 # define _nl_domain_bindings libintl_nl_domain_bindings
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
128 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
129
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
130 /* Some compilers, like SunOS4 cc, don't have offsetof in <stddef.h>. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
131 #ifndef offsetof
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
132 # define offsetof(type,ident) ((size_t)&(((type*)0)->ident))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
133 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
134
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
135 /* @@ end of prolog @@ */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
136
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
137 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
138 /* Rename the non ANSI C functions. This is required by the standard
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
139 because some ANSI C functions will require linking with this object
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
140 file and the name space must not be polluted. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
141 # define getcwd __getcwd
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
142 # ifndef stpcpy
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
143 # define stpcpy __stpcpy
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
144 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
145 # define tfind __tfind
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
146 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
147 # if !defined HAVE_GETCWD
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
148 char *getwd ();
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
149 # define getcwd(buf, max) getwd (buf)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
150 # else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
151 char *getcwd ();
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
152 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
153 # ifndef HAVE_STPCPY
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
154 static char *stpcpy PARAMS ((char *dest, const char *src));
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
155 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
156 # ifndef HAVE_MEMPCPY
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
157 static void *mempcpy PARAMS ((void *dest, const void *src, size_t n));
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
158 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
159 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
160
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
161 /* Amount to increase buffer size by in each try. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
162 #define PATH_INCR 32
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
163
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
164 /* The following is from pathmax.h. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
165 /* Non-POSIX BSD systems might have gcc's limits.h, which doesn't define
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
166 PATH_MAX but might cause redefinition warnings when sys/param.h is
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
167 later included (as on MORE/BSD 4.3). */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
168 #if defined _POSIX_VERSION || (defined HAVE_LIMITS_H && !defined __GNUC__)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
169 # include <limits.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
170 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
171
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
172 #ifndef _POSIX_PATH_MAX
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
173 # define _POSIX_PATH_MAX 255
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
174 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
175
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
176 #if !defined PATH_MAX && defined _PC_PATH_MAX
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
177 # define PATH_MAX (pathconf ("/", _PC_PATH_MAX) < 1 ? 1024 : pathconf ("/", _PC_PATH_MAX))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
178 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
179
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
180 /* Don't include sys/param.h if it already has been. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
181 #if defined HAVE_SYS_PARAM_H && !defined PATH_MAX && !defined MAXPATHLEN
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
182 # include <sys/param.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
183 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
184
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
185 #if !defined PATH_MAX && defined MAXPATHLEN
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
186 # define PATH_MAX MAXPATHLEN
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
187 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
188
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
189 #ifndef PATH_MAX
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
190 # define PATH_MAX _POSIX_PATH_MAX
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
191 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
192
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
193 /* Pathname support.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
194 ISSLASH(C) tests whether C is a directory separator character.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
195 IS_ABSOLUTE_PATH(P) tests whether P is an absolute path. If it is not,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
196 it may be concatenated to a directory pathname.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
197 IS_PATH_WITH_DIR(P) tests whether P contains a directory specification.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
198 */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
199 #if defined _WIN32 || defined __WIN32__ || defined __EMX__ || defined __DJGPP__
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
200 /* Win32, OS/2, DOS */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
201 # define ISSLASH(C) ((C) == '/' || (C) == '\\')
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
202 # define HAS_DEVICE(P) \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
203 ((((P)[0] >= 'A' && (P)[0] <= 'Z') || ((P)[0] >= 'a' && (P)[0] <= 'z')) \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
204 && (P)[1] == ':')
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
205 # define IS_ABSOLUTE_PATH(P) (ISSLASH ((P)[0]) || HAS_DEVICE (P))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
206 # define IS_PATH_WITH_DIR(P) \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
207 (strchr (P, '/') != NULL || strchr (P, '\\') != NULL || HAS_DEVICE (P))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
208 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
209 /* Unix */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
210 # define ISSLASH(C) ((C) == '/')
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
211 # define IS_ABSOLUTE_PATH(P) ISSLASH ((P)[0])
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
212 # define IS_PATH_WITH_DIR(P) (strchr (P, '/') != NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
213 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
214
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
215 /* This is the type used for the search tree where known translations
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
216 are stored. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
217 struct known_translation_t
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
218 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
219 /* Domain in which to search. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
220 char *domainname;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
221
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
222 /* The category. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
223 int category;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
224
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
225 /* State of the catalog counter at the point the string was found. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
226 int counter;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
227
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
228 /* Catalog where the string was found. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
229 struct loaded_l10nfile *domain;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
230
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
231 /* And finally the translation. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
232 const char *translation;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
233 size_t translation_length;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
234
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
235 /* Pointer to the string in question. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
236 char msgid[ZERO];
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
237 };
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
238
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
239 /* Root of the search tree with known translations. We can use this
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
240 only if the system provides the `tsearch' function family. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
241 #if defined HAVE_TSEARCH || defined _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
242 # include <search.h>
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
243
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
244 static void *root;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
245
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
246 # ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
247 # define tsearch __tsearch
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
248 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
249
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
250 /* Function to compare two entries in the table of known translations. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
251 static int transcmp PARAMS ((const void *p1, const void *p2));
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
252 static int
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
253 transcmp (p1, p2)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
254 const void *p1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
255 const void *p2;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
256 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
257 const struct known_translation_t *s1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
258 const struct known_translation_t *s2;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
259 int result;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
260
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
261 s1 = (const struct known_translation_t *) p1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
262 s2 = (const struct known_translation_t *) p2;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
263
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
264 result = strcmp (s1->msgid, s2->msgid);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
265 if (result == 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
266 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
267 result = strcmp (s1->domainname, s2->domainname);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
268 if (result == 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
269 /* We compare the category last (though this is the cheapest
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
270 operation) since it is hopefully always the same (namely
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
271 LC_MESSAGES). */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
272 result = s1->category - s2->category;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
273 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
274
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
275 return result;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
276 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
277 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
278
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
279 #ifndef INTVARDEF
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
280 # define INTVARDEF(name)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
281 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
282 #ifndef INTUSE
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
283 # define INTUSE(name) name
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
284 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
285
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
286 /* Name of the default domain used for gettext(3) prior any call to
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
287 textdomain(3). The default value for this is "messages". */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
288 const char _nl_default_default_domain[] attribute_hidden = "messages";
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
289
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
290 /* Value used as the default domain for gettext(3). */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
291 const char *_nl_current_default_domain attribute_hidden
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
292 = _nl_default_default_domain;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
293
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
294 /* Contains the default location of the message catalogs. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
295 #if defined __EMX__
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
296 extern const char _nl_default_dirname[];
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
297 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
298 const char _nl_default_dirname[] = LOCALEDIR;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
299 INTVARDEF (_nl_default_dirname)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
300 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
301
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
302 /* List with bindings of specific domains created by bindtextdomain()
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
303 calls. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
304 struct binding *_nl_domain_bindings;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
305
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
306 /* Prototypes for local functions. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
307 static char *plural_lookup PARAMS ((struct loaded_l10nfile *domain,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
308 unsigned long int n,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
309 const char *translation,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
310 size_t translation_len))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
311 internal_function;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
312 static const char *guess_category_value PARAMS ((int category,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
313 const char *categoryname))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
314 internal_function;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
315 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
316 # include "../locale/localeinfo.h"
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
317 # define category_to_name(category) _nl_category_names[category]
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
318 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
319 static const char *category_to_name PARAMS ((int category)) internal_function;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
320 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
321
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
322
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
323 /* For those loosing systems which don't have `alloca' we have to add
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
324 some additional code emulating it. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
325 #ifdef HAVE_ALLOCA
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
326 /* Nothing has to be done. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
327 # define freea(p) /* nothing */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
328 # define ADD_BLOCK(list, address) /* nothing */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
329 # define FREE_BLOCKS(list) /* nothing */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
330 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
331 struct block_list
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
332 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
333 void *address;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
334 struct block_list *next;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
335 };
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
336 # define ADD_BLOCK(list, addr) \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
337 do { \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
338 struct block_list *newp = (struct block_list *) malloc (sizeof (*newp)); \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
339 /* If we cannot get a free block we cannot add the new element to \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
340 the list. */ \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
341 if (newp != NULL) { \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
342 newp->address = (addr); \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
343 newp->next = (list); \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
344 (list) = newp; \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
345 } \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
346 } while (0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
347 # define FREE_BLOCKS(list) \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
348 do { \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
349 while (list != NULL) { \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
350 struct block_list *old = list; \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
351 list = list->next; \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
352 free (old->address); \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
353 free (old); \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
354 } \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
355 } while (0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
356 # undef alloca
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
357 # define alloca(size) (malloc (size))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
358 # define freea(p) free (p)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
359 #endif /* have alloca */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
360
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
361
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
362 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
363 /* List of blocks allocated for translations. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
364 typedef struct transmem_list
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
365 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
366 struct transmem_list *next;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
367 char data[ZERO];
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
368 } transmem_block_t;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
369 static struct transmem_list *transmem_list;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
370 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
371 typedef unsigned char transmem_block_t;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
372 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
373
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
374
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
375 /* Names for the libintl functions are a problem. They must not clash
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
376 with existing names and they should follow ANSI C. But this source
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
377 code is also used in GNU C Library where the names have a __
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
378 prefix. So we have to make a difference here. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
379 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
380 # define DCIGETTEXT __dcigettext
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
381 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
382 # define DCIGETTEXT libintl_dcigettext
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
383 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
384
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
385 /* Lock variable to protect the global data in the gettext implementation. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
386 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
387 __libc_rwlock_define_initialized (, _nl_state_lock attribute_hidden)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
388 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
389
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
390 /* Checking whether the binaries runs SUID must be done and glibc provides
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
391 easier methods therefore we make a difference here. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
392 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
393 # define ENABLE_SECURE __libc_enable_secure
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
394 # define DETERMINE_SECURE
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
395 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
396 # ifndef HAVE_GETUID
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
397 # define getuid() 0
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
398 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
399 # ifndef HAVE_GETGID
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
400 # define getgid() 0
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
401 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
402 # ifndef HAVE_GETEUID
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
403 # define geteuid() getuid()
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
404 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
405 # ifndef HAVE_GETEGID
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
406 # define getegid() getgid()
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
407 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
408 static int enable_secure;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
409 # define ENABLE_SECURE (enable_secure == 1)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
410 # define DETERMINE_SECURE \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
411 if (enable_secure == 0) \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
412 { \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
413 if (getuid () != geteuid () || getgid () != getegid ()) \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
414 enable_secure = 1; \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
415 else \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
416 enable_secure = -1; \
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
417 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
418 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
419
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
420 /* Get the function to evaluate the plural expression. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
421 #include "eval-plural.h"
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
422
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
423 /* Look up MSGID in the DOMAINNAME message catalog for the current
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
424 CATEGORY locale and, if PLURAL is nonzero, search over string
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
425 depending on the plural form determined by N. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
426 char *
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
427 DCIGETTEXT (domainname, msgid1, msgid2, plural, n, category)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
428 const char *domainname;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
429 const char *msgid1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
430 const char *msgid2;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
431 int plural;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
432 unsigned long int n;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
433 int category;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
434 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
435 #ifndef HAVE_ALLOCA
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
436 struct block_list *block_list = NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
437 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
438 struct loaded_l10nfile *domain;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
439 struct binding *binding;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
440 const char *categoryname;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
441 const char *categoryvalue;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
442 char *dirname, *xdomainname;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
443 char *single_locale;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
444 char *retval;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
445 size_t retlen;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
446 int saved_errno;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
447 #if defined HAVE_TSEARCH || defined _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
448 struct known_translation_t *search;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
449 struct known_translation_t **foundp = NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
450 size_t msgid_len;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
451 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
452 size_t domainname_len;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
453
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
454 /* If no real MSGID is given return NULL. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
455 if (msgid1 == NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
456 return NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
457
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
458 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
459 if (category < 0 || category >= __LC_LAST || category == LC_ALL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
460 /* Bogus. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
461 return (plural == 0
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
462 ? (char *) msgid1
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
463 /* Use the Germanic plural rule. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
464 : n == 1 ? (char *) msgid1 : (char *) msgid2);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
465 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
466
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
467 __libc_rwlock_rdlock (_nl_state_lock);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
468
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
469 /* If DOMAINNAME is NULL, we are interested in the default domain. If
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
470 CATEGORY is not LC_MESSAGES this might not make much sense but the
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
471 definition left this undefined. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
472 if (domainname == NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
473 domainname = _nl_current_default_domain;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
474
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
475 /* OS/2 specific: backward compatibility with older libintl versions */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
476 #ifdef LC_MESSAGES_COMPAT
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
477 if (category == LC_MESSAGES_COMPAT)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
478 category = LC_MESSAGES;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
479 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
480
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
481 #if defined HAVE_TSEARCH || defined _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
482 msgid_len = strlen (msgid1) + 1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
483
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
484 /* Try to find the translation among those which we found at
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
485 some time. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
486 search = (struct known_translation_t *)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
487 alloca (offsetof (struct known_translation_t, msgid) + msgid_len);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
488 memcpy (search->msgid, msgid1, msgid_len);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
489 search->domainname = (char *) domainname;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
490 search->category = category;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
491
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
492 foundp = (struct known_translation_t **) tfind (search, &root, transcmp);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
493 freea (search);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
494 if (foundp != NULL && (*foundp)->counter == _nl_msg_cat_cntr)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
495 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
496 /* Now deal with plural. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
497 if (plural)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
498 retval = plural_lookup ((*foundp)->domain, n, (*foundp)->translation,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
499 (*foundp)->translation_length);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
500 else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
501 retval = (char *) (*foundp)->translation;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
502
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
503 __libc_rwlock_unlock (_nl_state_lock);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
504 return retval;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
505 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
506 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
507
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
508 /* Preserve the `errno' value. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
509 saved_errno = errno;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
510
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
511 /* See whether this is a SUID binary or not. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
512 DETERMINE_SECURE;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
513
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
514 /* First find matching binding. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
515 for (binding = _nl_domain_bindings; binding != NULL; binding = binding->next)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
516 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
517 int compare = strcmp (domainname, binding->domainname);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
518 if (compare == 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
519 /* We found it! */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
520 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
521 if (compare < 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
522 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
523 /* It is not in the list. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
524 binding = NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
525 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
526 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
527 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
528
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
529 if (binding == NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
530 dirname = (char *) INTUSE(_nl_default_dirname);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
531 else if (IS_ABSOLUTE_PATH (binding->dirname))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
532 dirname = binding->dirname;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
533 else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
534 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
535 /* We have a relative path. Make it absolute now. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
536 size_t dirname_len = strlen (binding->dirname) + 1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
537 size_t path_max;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
538 char *ret;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
539
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
540 path_max = (unsigned int) PATH_MAX;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
541 path_max += 2; /* The getcwd docs say to do this. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
542
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
543 for (;;)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
544 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
545 dirname = (char *) alloca (path_max + dirname_len);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
546 ADD_BLOCK (block_list, dirname);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
547
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
548 __set_errno (0);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
549 ret = getcwd (dirname, path_max);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
550 if (ret != NULL || errno != ERANGE)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
551 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
552
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
553 path_max += path_max / 2;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
554 path_max += PATH_INCR;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
555 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
556
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
557 if (ret == NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
558 /* We cannot get the current working directory. Don't signal an
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
559 error but simply return the default string. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
560 goto return_untranslated;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
561
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
562 stpcpy (stpcpy (strchr (dirname, '\0'), "/"), binding->dirname);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
563 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
564
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
565 /* Now determine the symbolic name of CATEGORY and its value. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
566 categoryname = category_to_name (category);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
567 categoryvalue = guess_category_value (category, categoryname);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
568
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
569 domainname_len = strlen (domainname);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
570 xdomainname = (char *) alloca (strlen (categoryname)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
571 + domainname_len + 5);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
572 ADD_BLOCK (block_list, xdomainname);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
573
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
574 stpcpy (mempcpy (stpcpy (stpcpy (xdomainname, categoryname), "/"),
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
575 domainname, domainname_len),
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
576 ".mo");
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
577
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
578 /* Creating working area. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
579 single_locale = (char *) alloca (strlen (categoryvalue) + 1);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
580 ADD_BLOCK (block_list, single_locale);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
581
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
582
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
583 /* Search for the given string. This is a loop because we perhaps
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
584 got an ordered list of languages to consider for the translation. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
585 while (1)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
586 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
587 /* Make CATEGORYVALUE point to the next element of the list. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
588 while (categoryvalue[0] != '\0' && categoryvalue[0] == ':')
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
589 ++categoryvalue;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
590 if (categoryvalue[0] == '\0')
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
591 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
592 /* The whole contents of CATEGORYVALUE has been searched but
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
593 no valid entry has been found. We solve this situation
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
594 by implicitly appending a "C" entry, i.e. no translation
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
595 will take place. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
596 single_locale[0] = 'C';
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
597 single_locale[1] = '\0';
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
598 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
599 else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
600 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
601 char *cp = single_locale;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
602 while (categoryvalue[0] != '\0' && categoryvalue[0] != ':')
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
603 *cp++ = *categoryvalue++;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
604 *cp = '\0';
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
605
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
606 /* When this is a SUID binary we must not allow accessing files
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
607 outside the dedicated directories. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
608 if (ENABLE_SECURE && IS_PATH_WITH_DIR (single_locale))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
609 /* Ingore this entry. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
610 continue;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
611 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
612
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
613 /* If the current locale value is C (or POSIX) we don't load a
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
614 domain. Return the MSGID. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
615 if (strcmp (single_locale, "C") == 0
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
616 || strcmp (single_locale, "POSIX") == 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
617 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
618
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
619 /* Find structure describing the message catalog matching the
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
620 DOMAINNAME and CATEGORY. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
621 domain = _nl_find_domain (dirname, single_locale, xdomainname, binding);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
622
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
623 if (domain != NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
624 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
625 retval = _nl_find_msg (domain, binding, msgid1, &retlen);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
626
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
627 if (retval == NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
628 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
629 int cnt;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
630
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
631 for (cnt = 0; domain->successor[cnt] != NULL; ++cnt)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
632 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
633 retval = _nl_find_msg (domain->successor[cnt], binding,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
634 msgid1, &retlen);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
635
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
636 if (retval != NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
637 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
638 domain = domain->successor[cnt];
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
639 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
640 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
641 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
642 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
643
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
644 if (retval != NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
645 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
646 /* Found the translation of MSGID1 in domain DOMAIN:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
647 starting at RETVAL, RETLEN bytes. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
648 FREE_BLOCKS (block_list);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
649 #if defined HAVE_TSEARCH || defined _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
650 if (foundp == NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
651 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
652 /* Create a new entry and add it to the search tree. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
653 struct known_translation_t *newp;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
654
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
655 newp = (struct known_translation_t *)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
656 malloc (offsetof (struct known_translation_t, msgid)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
657 + msgid_len + domainname_len + 1);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
658 if (newp != NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
659 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
660 newp->domainname =
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
661 mempcpy (newp->msgid, msgid1, msgid_len);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
662 memcpy (newp->domainname, domainname, domainname_len + 1);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
663 newp->category = category;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
664 newp->counter = _nl_msg_cat_cntr;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
665 newp->domain = domain;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
666 newp->translation = retval;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
667 newp->translation_length = retlen;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
668
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
669 /* Insert the entry in the search tree. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
670 foundp = (struct known_translation_t **)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
671 tsearch (newp, &root, transcmp);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
672 if (foundp == NULL
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
673 || __builtin_expect (*foundp != newp, 0))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
674 /* The insert failed. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
675 free (newp);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
676 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
677 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
678 else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
679 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
680 /* We can update the existing entry. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
681 (*foundp)->counter = _nl_msg_cat_cntr;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
682 (*foundp)->domain = domain;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
683 (*foundp)->translation = retval;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
684 (*foundp)->translation_length = retlen;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
685 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
686 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
687 __set_errno (saved_errno);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
688
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
689 /* Now deal with plural. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
690 if (plural)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
691 retval = plural_lookup (domain, n, retval, retlen);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
692
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
693 __libc_rwlock_unlock (_nl_state_lock);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
694 return retval;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
695 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
696 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
697 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
698
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
699 return_untranslated:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
700 /* Return the untranslated MSGID. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
701 FREE_BLOCKS (block_list);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
702 __libc_rwlock_unlock (_nl_state_lock);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
703 #ifndef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
704 if (!ENABLE_SECURE)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
705 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
706 extern void _nl_log_untranslated PARAMS ((const char *logfilename,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
707 const char *domainname,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
708 const char *msgid1,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
709 const char *msgid2,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
710 int plural));
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
711 const char *logfilename = getenv ("GETTEXT_LOG_UNTRANSLATED");
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
712
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
713 if (logfilename != NULL && logfilename[0] != '\0')
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
714 _nl_log_untranslated (logfilename, domainname, msgid1, msgid2, plural);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
715 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
716 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
717 __set_errno (saved_errno);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
718 return (plural == 0
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
719 ? (char *) msgid1
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
720 /* Use the Germanic plural rule. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
721 : n == 1 ? (char *) msgid1 : (char *) msgid2);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
722 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
723
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
724
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
725 char *
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
726 internal_function
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
727 _nl_find_msg (domain_file, domainbinding, msgid, lengthp)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
728 struct loaded_l10nfile *domain_file;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
729 struct binding *domainbinding;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
730 const char *msgid;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
731 size_t *lengthp;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
732 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
733 struct loaded_domain *domain;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
734 nls_uint32 nstrings;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
735 size_t act;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
736 char *result;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
737 size_t resultlen;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
738
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
739 if (domain_file->decided == 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
740 _nl_load_domain (domain_file, domainbinding);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
741
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
742 if (domain_file->data == NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
743 return NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
744
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
745 domain = (struct loaded_domain *) domain_file->data;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
746
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
747 nstrings = domain->nstrings;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
748
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
749 /* Locate the MSGID and its translation. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
750 if (domain->hash_tab != NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
751 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
752 /* Use the hashing table. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
753 nls_uint32 len = strlen (msgid);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
754 nls_uint32 hash_val = hash_string (msgid);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
755 nls_uint32 idx = hash_val % domain->hash_size;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
756 nls_uint32 incr = 1 + (hash_val % (domain->hash_size - 2));
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
757
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
758 while (1)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
759 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
760 nls_uint32 nstr =
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
761 W (domain->must_swap_hash_tab, domain->hash_tab[idx]);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
762
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
763 if (nstr == 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
764 /* Hash table entry is empty. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
765 return NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
766
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
767 nstr--;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
768
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
769 /* Compare msgid with the original string at index nstr.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
770 We compare the lengths with >=, not ==, because plural entries
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
771 are represented by strings with an embedded NUL. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
772 if (nstr < nstrings
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
773 ? W (domain->must_swap, domain->orig_tab[nstr].length) >= len
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
774 && (strcmp (msgid,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
775 domain->data + W (domain->must_swap,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
776 domain->orig_tab[nstr].offset))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
777 == 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
778 : domain->orig_sysdep_tab[nstr - nstrings].length > len
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
779 && (strcmp (msgid,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
780 domain->orig_sysdep_tab[nstr - nstrings].pointer)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
781 == 0))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
782 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
783 act = nstr;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
784 goto found;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
785 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
786
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
787 if (idx >= domain->hash_size - incr)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
788 idx -= domain->hash_size - incr;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
789 else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
790 idx += incr;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
791 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
792 /* NOTREACHED */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
793 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
794 else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
795 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
796 /* Try the default method: binary search in the sorted array of
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
797 messages. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
798 size_t top, bottom;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
799
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
800 bottom = 0;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
801 top = nstrings;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
802 while (bottom < top)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
803 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
804 int cmp_val;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
805
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
806 act = (bottom + top) / 2;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
807 cmp_val = strcmp (msgid, (domain->data
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
808 + W (domain->must_swap,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
809 domain->orig_tab[act].offset)));
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
810 if (cmp_val < 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
811 top = act;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
812 else if (cmp_val > 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
813 bottom = act + 1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
814 else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
815 goto found;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
816 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
817 /* No translation was found. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
818 return NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
819 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
820
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
821 found:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
822 /* The translation was found at index ACT. If we have to convert the
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
823 string to use a different character set, this is the time. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
824 if (act < nstrings)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
825 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
826 result = (char *)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
827 (domain->data + W (domain->must_swap, domain->trans_tab[act].offset));
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
828 resultlen = W (domain->must_swap, domain->trans_tab[act].length) + 1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
829 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
830 else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
831 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
832 result = (char *) domain->trans_sysdep_tab[act - nstrings].pointer;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
833 resultlen = domain->trans_sysdep_tab[act - nstrings].length;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
834 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
835
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
836 #if defined _LIBC || HAVE_ICONV
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
837 if (domain->codeset_cntr
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
838 != (domainbinding != NULL ? domainbinding->codeset_cntr : 0))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
839 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
840 /* The domain's codeset has changed through bind_textdomain_codeset()
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
841 since the message catalog was initialized or last accessed. We
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
842 have to reinitialize the converter. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
843 _nl_free_domain_conv (domain);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
844 _nl_init_domain_conv (domain_file, domain, domainbinding);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
845 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
846
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
847 if (
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
848 # ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
849 domain->conv != (__gconv_t) -1
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
850 # else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
851 # if HAVE_ICONV
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
852 domain->conv != (iconv_t) -1
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
853 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
854 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
855 )
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
856 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
857 /* We are supposed to do a conversion. First allocate an
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
858 appropriate table with the same structure as the table
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
859 of translations in the file, where we can put the pointers
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
860 to the converted strings in.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
861 There is a slight complication with plural entries. They
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
862 are represented by consecutive NUL terminated strings. We
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
863 handle this case by converting RESULTLEN bytes, including
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
864 NULs. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
865
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
866 if (domain->conv_tab == NULL
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
867 && ((domain->conv_tab =
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
868 (char **) calloc (nstrings + domain->n_sysdep_strings,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
869 sizeof (char *)))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
870 == NULL))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
871 /* Mark that we didn't succeed allocating a table. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
872 domain->conv_tab = (char **) -1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
873
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
874 if (__builtin_expect (domain->conv_tab == (char **) -1, 0))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
875 /* Nothing we can do, no more memory. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
876 goto converted;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
877
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
878 if (domain->conv_tab[act] == NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
879 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
880 /* We haven't used this string so far, so it is not
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
881 translated yet. Do this now. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
882 /* We use a bit more efficient memory handling.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
883 We allocate always larger blocks which get used over
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
884 time. This is faster than many small allocations. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
885 __libc_lock_define_initialized (static, lock)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
886 # define INITIAL_BLOCK_SIZE 4080
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
887 static unsigned char *freemem;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
888 static size_t freemem_size;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
889
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
890 const unsigned char *inbuf;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
891 unsigned char *outbuf;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
892 int malloc_count;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
893 # ifndef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
894 transmem_block_t *transmem_list = NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
895 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
896
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
897 __libc_lock_lock (lock);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
898
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
899 inbuf = (const unsigned char *) result;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
900 outbuf = freemem + sizeof (size_t);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
901
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
902 malloc_count = 0;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
903 while (1)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
904 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
905 transmem_block_t *newmem;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
906 # ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
907 size_t non_reversible;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
908 int res;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
909
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
910 if (freemem_size < sizeof (size_t))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
911 goto resize_freemem;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
912
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
913 res = __gconv (domain->conv,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
914 &inbuf, inbuf + resultlen,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
915 &outbuf,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
916 outbuf + freemem_size - sizeof (size_t),
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
917 &non_reversible);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
918
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
919 if (res == __GCONV_OK || res == __GCONV_EMPTY_INPUT)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
920 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
921
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
922 if (res != __GCONV_FULL_OUTPUT)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
923 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
924 __libc_lock_unlock (lock);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
925 goto converted;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
926 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
927
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
928 inbuf = result;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
929 # else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
930 # if HAVE_ICONV
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
931 const char *inptr = (const char *) inbuf;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
932 size_t inleft = resultlen;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
933 char *outptr = (char *) outbuf;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
934 size_t outleft;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
935
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
936 if (freemem_size < sizeof (size_t))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
937 goto resize_freemem;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
938
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
939 outleft = freemem_size - sizeof (size_t);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
940 if (iconv (domain->conv,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
941 (ICONV_CONST char **) &inptr, &inleft,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
942 &outptr, &outleft)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
943 != (size_t) (-1))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
944 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
945 outbuf = (unsigned char *) outptr;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
946 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
947 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
948 if (errno != E2BIG)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
949 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
950 __libc_lock_unlock (lock);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
951 goto converted;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
952 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
953 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
954 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
955
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
956 resize_freemem:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
957 /* We must allocate a new buffer or resize the old one. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
958 if (malloc_count > 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
959 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
960 ++malloc_count;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
961 freemem_size = malloc_count * INITIAL_BLOCK_SIZE;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
962 newmem = (transmem_block_t *) realloc (transmem_list,
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
963 freemem_size);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
964 # ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
965 if (newmem != NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
966 transmem_list = transmem_list->next;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
967 else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
968 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
969 struct transmem_list *old = transmem_list;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
970
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
971 transmem_list = transmem_list->next;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
972 free (old);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
973 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
974 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
975 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
976 else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
977 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
978 malloc_count = 1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
979 freemem_size = INITIAL_BLOCK_SIZE;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
980 newmem = (transmem_block_t *) malloc (freemem_size);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
981 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
982 if (__builtin_expect (newmem == NULL, 0))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
983 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
984 freemem = NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
985 freemem_size = 0;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
986 __libc_lock_unlock (lock);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
987 goto converted;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
988 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
989
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
990 # ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
991 /* Add the block to the list of blocks we have to free
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
992 at some point. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
993 newmem->next = transmem_list;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
994 transmem_list = newmem;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
995
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
996 freemem = newmem->data;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
997 freemem_size -= offsetof (struct transmem_list, data);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
998 # else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
999 transmem_list = newmem;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1000 freemem = newmem;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1001 # endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1002
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1003 outbuf = freemem + sizeof (size_t);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1004 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1005
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1006 /* We have now in our buffer a converted string. Put this
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1007 into the table of conversions. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1008 *(size_t *) freemem = outbuf - freemem - sizeof (size_t);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1009 domain->conv_tab[act] = (char *) freemem;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1010 /* Shrink freemem, but keep it aligned. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1011 freemem_size -= outbuf - freemem;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1012 freemem = outbuf;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1013 freemem += freemem_size & (alignof (size_t) - 1);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1014 freemem_size = freemem_size & ~ (alignof (size_t) - 1);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1015
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1016 __libc_lock_unlock (lock);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1017 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1018
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1019 /* Now domain->conv_tab[act] contains the translation of all
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1020 the plural variants. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1021 result = domain->conv_tab[act] + sizeof (size_t);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1022 resultlen = *(size_t *) domain->conv_tab[act];
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1023 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1024
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1025 converted:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1026 /* The result string is converted. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1027
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1028 #endif /* _LIBC || HAVE_ICONV */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1029
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1030 *lengthp = resultlen;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1031 return result;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1032 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1033
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1034
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1035 /* Look up a plural variant. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1036 static char *
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1037 internal_function
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1038 plural_lookup (domain, n, translation, translation_len)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1039 struct loaded_l10nfile *domain;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1040 unsigned long int n;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1041 const char *translation;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1042 size_t translation_len;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1043 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1044 struct loaded_domain *domaindata = (struct loaded_domain *) domain->data;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1045 unsigned long int index;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1046 const char *p;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1047
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1048 index = plural_eval (domaindata->plural, n);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1049 if (index >= domaindata->nplurals)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1050 /* This should never happen. It means the plural expression and the
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1051 given maximum value do not match. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1052 index = 0;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1053
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1054 /* Skip INDEX strings at TRANSLATION. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1055 p = translation;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1056 while (index-- > 0)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1057 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1058 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1059 p = __rawmemchr (p, '\0');
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1060 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1061 p = strchr (p, '\0');
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1062 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1063 /* And skip over the NUL byte. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1064 p++;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1065
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1066 if (p >= translation + translation_len)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1067 /* This should never happen. It means the plural expression
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1068 evaluated to a value larger than the number of variants
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1069 available for MSGID1. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1070 return (char *) translation;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1071 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1072 return (char *) p;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1073 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1074
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1075 #ifndef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1076 /* Return string representation of locale CATEGORY. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1077 static const char *
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1078 internal_function
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1079 category_to_name (category)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1080 int category;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1081 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1082 const char *retval;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1083
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1084 switch (category)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1085 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1086 #ifdef LC_COLLATE
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1087 case LC_COLLATE:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1088 retval = "LC_COLLATE";
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1089 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1090 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1091 #ifdef LC_CTYPE
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1092 case LC_CTYPE:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1093 retval = "LC_CTYPE";
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1094 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1095 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1096 #ifdef LC_MONETARY
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1097 case LC_MONETARY:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1098 retval = "LC_MONETARY";
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1099 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1100 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1101 #ifdef LC_NUMERIC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1102 case LC_NUMERIC:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1103 retval = "LC_NUMERIC";
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1104 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1105 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1106 #ifdef LC_TIME
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1107 case LC_TIME:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1108 retval = "LC_TIME";
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1109 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1110 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1111 #ifdef LC_MESSAGES
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1112 case LC_MESSAGES:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1113 retval = "LC_MESSAGES";
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1114 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1115 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1116 #ifdef LC_RESPONSE
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1117 case LC_RESPONSE:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1118 retval = "LC_RESPONSE";
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1119 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1120 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1121 #ifdef LC_ALL
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1122 case LC_ALL:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1123 /* This might not make sense but is perhaps better than any other
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1124 value. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1125 retval = "LC_ALL";
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1126 break;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1127 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1128 default:
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1129 /* If you have a better idea for a default value let me know. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1130 retval = "LC_XXX";
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1131 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1132
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1133 return retval;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1134 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1135 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1136
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1137 /* Guess value of current locale from value of the environment variables. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1138 static const char *
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1139 internal_function
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1140 guess_category_value (category, categoryname)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1141 int category;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1142 const char *categoryname;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1143 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1144 const char *language;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1145 const char *retval;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1146
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1147 /* The highest priority value is the `LANGUAGE' environment
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1148 variable. But we don't use the value if the currently selected
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1149 locale is the C locale. This is a GNU extension. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1150 language = getenv ("LANGUAGE");
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1151 if (language != NULL && language[0] == '\0')
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1152 language = NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1153
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1154 /* We have to proceed with the POSIX methods of looking to `LC_ALL',
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1155 `LC_xxx', and `LANG'. On some systems this can be done by the
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1156 `setlocale' function itself. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1157 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1158 retval = __current_locale_name (category);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1159 #else
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1160 retval = _nl_locale_name (category, categoryname);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1161 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1162
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1163 /* Ignore LANGUAGE if the locale is set to "C" because
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1164 1. "C" locale usually uses the ASCII encoding, and most international
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1165 messages use non-ASCII characters. These characters get displayed
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1166 as question marks (if using glibc's iconv()) or as invalid 8-bit
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1167 characters (because other iconv()s refuse to convert most non-ASCII
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1168 characters to ASCII). In any case, the output is ugly.
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1169 2. The precise output of some programs in the "C" locale is specified
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1170 by POSIX and should not depend on environment variables like
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1171 "LANGUAGE". We allow such programs to use gettext(). */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1172 return language != NULL && strcmp (retval, "C") != 0 ? language : retval;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1173 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1174
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1175 /* @@ begin of epilog @@ */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1176
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1177 /* We don't want libintl.a to depend on any other library. So we
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1178 avoid the non-standard function stpcpy. In GNU C Library this
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1179 function is available, though. Also allow the symbol HAVE_STPCPY
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1180 to be defined. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1181 #if !_LIBC && !HAVE_STPCPY
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1182 static char *
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1183 stpcpy (dest, src)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1184 char *dest;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1185 const char *src;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1186 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1187 while ((*dest++ = *src++) != '\0')
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1188 /* Do nothing. */ ;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1189 return dest - 1;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1190 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1191 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1192
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1193 #if !_LIBC && !HAVE_MEMPCPY
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1194 static void *
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1195 mempcpy (dest, src, n)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1196 void *dest;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1197 const void *src;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1198 size_t n;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1199 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1200 return (void *) ((char *) memcpy (dest, src, n) + n);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1201 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1202 #endif
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1203
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1204
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1205 #ifdef _LIBC
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1206 /* If we want to free all resources we have to do some work at
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1207 program's end. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1208 libc_freeres_fn (free_mem)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1209 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1210 void *old;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1211
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1212 while (_nl_domain_bindings != NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1213 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1214 struct binding *oldp = _nl_domain_bindings;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1215 _nl_domain_bindings = _nl_domain_bindings->next;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1216 if (oldp->dirname != INTUSE(_nl_default_dirname))
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1217 /* Yes, this is a pointer comparison. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1218 free (oldp->dirname);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1219 free (oldp->codeset);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1220 free (oldp);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1221 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1222
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1223 if (_nl_current_default_domain != _nl_default_default_domain)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1224 /* Yes, again a pointer comparison. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1225 free ((char *) _nl_current_default_domain);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1226
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1227 /* Remove the search tree with the known translations. */
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1228 __tdestroy (root, free);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1229 root = NULL;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1230
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1231 while (transmem_list != NULL)
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1232 {
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1233 old = transmem_list;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1234 transmem_list = transmem_list->next;
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1235 free (old);
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1236 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1237 }
cb178e5ad177 [svn] Import audacious source.
nenolod
parents:
diff changeset
1238 #endif