1 /* Convenience header for conditional use of GNU <libintl.h>.
2    Copyright (C) 1995-1998, 2000-2002, 2004-2006, 2009-2012 Free Software
3    Foundation, Inc.
4 
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 3, or (at your option)
8    any later version.
9 
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14 
15    You should have received a copy of the GNU General Public License along
16    with this program; if not, see <http://www.gnu.org/licenses/>.  */
17 
18 #ifndef _LIBGETTEXT_H
19 #define _LIBGETTEXT_H 1
20 
21 /* NLS can be disabled through the configure --disable-nls option.  */
22 #if ENABLE_NLS
23 
24 /* Get declarations of GNU message catalog functions.  */
25 # include <libintl.h>
26 
27 /* You can set the DEFAULT_TEXT_DOMAIN macro to specify the domain used by
28    the gettext() and ngettext() macros.  This is an alternative to calling
29    textdomain(), and is useful for libraries.  */
30 # ifdef DEFAULT_TEXT_DOMAIN
31 #  undef gettext
32 #  define gettext(Msgid) \
33      dgettext (DEFAULT_TEXT_DOMAIN, Msgid)
34 #  undef ngettext
35 #  define ngettext(Msgid1, Msgid2, N) \
36      dngettext (DEFAULT_TEXT_DOMAIN, Msgid1, Msgid2, N)
37 # endif
38 
39 #else
40 
41 /* Solaris /usr/include/locale.h includes /usr/include/libintl.h, which
42    chokes if dcgettext is defined as a macro.  So include it now, to make
43    later inclusions of <locale.h> a NOP.  We don't include <libintl.h>
44    as well because people using "gettext.h" will not include <libintl.h>,
45    and also including <libintl.h> would fail on SunOS 4, whereas <locale.h>
46    is OK.  */
47 #if defined(__sun)
48 # include <locale.h>
49 #endif
50 
51 /* Many header files from the libstdc++ coming with g++ 3.3 or newer include
52    <libintl.h>, which chokes if dcgettext is defined as a macro.  So include
53    it now, to make later inclusions of <libintl.h> a NOP.  */
54 #if defined(__cplusplus) && defined(__GNUG__) && (__GNUC__ >= 3)
55 # include <cstdlib>
56 # if (__GLIBC__ >= 2 && !defined __UCLIBC__) || _GLIBCXX_HAVE_LIBINTL_H
57 #  include <libintl.h>
58 # endif
59 #endif
60 
61 /* Disabled NLS.
62    The casts to 'const char *' serve the purpose of producing warnings
63    for invalid uses of the value returned from these functions.
64    On pre-ANSI systems without 'const', the config.h file is supposed to
65    contain "#define const".  */
66 # undef gettext
67 # define gettext(Msgid) ((const char *) (Msgid))
68 # undef dgettext
69 # define dgettext(Domainname, Msgid) ((void) (Domainname), gettext (Msgid))
70 # undef dcgettext
71 # define dcgettext(Domainname, Msgid, Category) \
72     ((void) (Category), dgettext (Domainname, Msgid))
73 # undef ngettext
74 # define ngettext(Msgid1, Msgid2, N) \
75     ((N) == 1 \
76      ? ((void) (Msgid2), (const char *) (Msgid1)) \
77      : ((void) (Msgid1), (const char *) (Msgid2)))
78 # undef dngettext
79 # define dngettext(Domainname, Msgid1, Msgid2, N) \
80     ((void) (Domainname), ngettext (Msgid1, Msgid2, N))
81 # undef dcngettext
82 # define dcngettext(Domainname, Msgid1, Msgid2, N, Category) \
83     ((void) (Category), dngettext (Domainname, Msgid1, Msgid2, N))
84 # undef textdomain
85 # define textdomain(Domainname) ((const char *) (Domainname))
86 # undef bindtextdomain
87 # define bindtextdomain(Domainname, Dirname) \
88     ((void) (Domainname), (const char *) (Dirname))
89 # undef bind_textdomain_codeset
90 # define bind_textdomain_codeset(Domainname, Codeset) \
91     ((void) (Domainname), (const char *) (Codeset))
92 
93 #endif
94 
95 /* Prefer gnulib's setlocale override over libintl's setlocale override.  */
96 #ifdef GNULIB_defined_setlocale
97 # undef setlocale
98 # define setlocale rpl_setlocale
99 #endif
100 
101 /* A pseudo function call that serves as a marker for the automated
102    extraction of messages, but does not call gettext().  The run-time
103    translation is done at a different place in the code.
104    The argument, String, should be a literal string.  Concatenated strings
105    and other string expressions won't work.
106    The macro's expansion is not parenthesized, so that it is suitable as
107    initializer for static 'char[]' or 'const char[]' variables.  */
108 #define gettext_noop(String) String
109 
110 /* The separator between msgctxt and msgid in a .mo file.  */
111 #define GETTEXT_CONTEXT_GLUE "\004"
112 
113 /* Pseudo function calls, taking a MSGCTXT and a MSGID instead of just a
114    MSGID.  MSGCTXT and MSGID must be string literals.  MSGCTXT should be
115    short and rarely need to change.
116    The letter 'p' stands for 'particular' or 'special'.  */
117 #ifdef DEFAULT_TEXT_DOMAIN
118 # define pgettext(Msgctxt, Msgid) \
119    pgettext_aux (DEFAULT_TEXT_DOMAIN, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, LC_MESSAGES)
120 #else
121 # define pgettext(Msgctxt, Msgid) \
122    pgettext_aux (NULL, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, LC_MESSAGES)
123 #endif
124 #define dpgettext(Domainname, Msgctxt, Msgid) \
125   pgettext_aux (Domainname, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, LC_MESSAGES)
126 #define dcpgettext(Domainname, Msgctxt, Msgid, Category) \
127   pgettext_aux (Domainname, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, Category)
128 #ifdef DEFAULT_TEXT_DOMAIN
129 # define npgettext(Msgctxt, Msgid, MsgidPlural, N) \
130    npgettext_aux (DEFAULT_TEXT_DOMAIN, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, MsgidPlural, N, LC_MESSAGES)
131 #else
132 # define npgettext(Msgctxt, Msgid, MsgidPlural, N) \
133    npgettext_aux (NULL, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, MsgidPlural, N, LC_MESSAGES)
134 #endif
135 #define dnpgettext(Domainname, Msgctxt, Msgid, MsgidPlural, N) \
136   npgettext_aux (Domainname, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, MsgidPlural, N, LC_MESSAGES)
137 #define dcnpgettext(Domainname, Msgctxt, Msgid, MsgidPlural, N, Category) \
138   npgettext_aux (Domainname, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, MsgidPlural, N, Category)
139 
140 #ifdef __GNUC__
141 __inline
142 #else
143 #ifdef __cplusplus
144 inline
145 #endif
146 #endif
147 static const char *
pgettext_aux(const char * domain,const char * msg_ctxt_id,const char * msgid,int category)148 pgettext_aux (const char *domain,
149               const char *msg_ctxt_id, const char *msgid,
150               int category)
151 {
152   const char *translation = dcgettext (domain, msg_ctxt_id, category);
153   if (translation == msg_ctxt_id)
154     return msgid;
155   else
156     return translation;
157 }
158 
159 #ifdef __GNUC__
160 __inline
161 #else
162 #ifdef __cplusplus
163 inline
164 #endif
165 #endif
166 static const char *
npgettext_aux(const char * domain,const char * msg_ctxt_id,const char * msgid,const char * msgid_plural,unsigned long int n,int category)167 npgettext_aux (const char *domain,
168                const char *msg_ctxt_id, const char *msgid,
169                const char *msgid_plural, unsigned long int n,
170                int category)
171 {
172   const char *translation =
173     dcngettext (domain, msg_ctxt_id, msgid_plural, n, category);
174   if (translation == msg_ctxt_id || translation == msgid_plural)
175     return (n == 1 ? msgid : msgid_plural);
176   else
177     return translation;
178 }
179 
180 /* The same thing extended for non-constant arguments.  Here MSGCTXT and MSGID
181    can be arbitrary expressions.  But for string literals these macros are
182    less efficient than those above.  */
183 
184 #include <string.h>
185 
186 #if (((__GNUC__ >= 3 || __GNUG__ >= 2) && !defined __STRICT_ANSI__) \
187      /* || __STDC_VERSION__ >= 199901L */ )
188 # define _LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS 1
189 #else
190 # define _LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS 0
191 #endif
192 
193 #if !_LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS
194 #include <stdlib.h>
195 #endif
196 
197 #define pgettext_expr(Msgctxt, Msgid) \
198   dcpgettext_expr (NULL, Msgctxt, Msgid, LC_MESSAGES)
199 #define dpgettext_expr(Domainname, Msgctxt, Msgid) \
200   dcpgettext_expr (Domainname, Msgctxt, Msgid, LC_MESSAGES)
201 
202 #ifdef __GNUC__
203 __inline
204 #else
205 #ifdef __cplusplus
206 inline
207 #endif
208 #endif
209 static const char *
dcpgettext_expr(const char * domain,const char * msgctxt,const char * msgid,int category)210 dcpgettext_expr (const char *domain,
211                  const char *msgctxt, const char *msgid,
212                  int category)
213 {
214   size_t msgctxt_len = strlen (msgctxt) + 1;
215   size_t msgid_len = strlen (msgid) + 1;
216   const char *translation;
217 #if _LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS
218   char msg_ctxt_id[msgctxt_len + msgid_len];
219 #else
220   char buf[1024];
221   char *msg_ctxt_id =
222     (msgctxt_len + msgid_len <= sizeof (buf)
223      ? buf
224      : (char *) malloc (msgctxt_len + msgid_len));
225   if (msg_ctxt_id != NULL)
226 #endif
227     {
228       memcpy (msg_ctxt_id, msgctxt, msgctxt_len - 1);
229       msg_ctxt_id[msgctxt_len - 1] = '\004';
230       memcpy (msg_ctxt_id + msgctxt_len, msgid, msgid_len);
231       translation = dcgettext (domain, msg_ctxt_id, category);
232 #if !_LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS
233       if (msg_ctxt_id != buf)
234         free (msg_ctxt_id);
235 #endif
236       if (translation != msg_ctxt_id)
237         return translation;
238     }
239   return msgid;
240 }
241 
242 #define npgettext_expr(Msgctxt, Msgid, MsgidPlural, N) \
243   dcnpgettext_expr (NULL, Msgctxt, Msgid, MsgidPlural, N, LC_MESSAGES)
244 #define dnpgettext_expr(Domainname, Msgctxt, Msgid, MsgidPlural, N) \
245   dcnpgettext_expr (Domainname, Msgctxt, Msgid, MsgidPlural, N, LC_MESSAGES)
246 
247 #ifdef __GNUC__
248 __inline
249 #else
250 #ifdef __cplusplus
251 inline
252 #endif
253 #endif
254 static const char *
dcnpgettext_expr(const char * domain,const char * msgctxt,const char * msgid,const char * msgid_plural,unsigned long int n,int category)255 dcnpgettext_expr (const char *domain,
256                   const char *msgctxt, const char *msgid,
257                   const char *msgid_plural, unsigned long int n,
258                   int category)
259 {
260   size_t msgctxt_len = strlen (msgctxt) + 1;
261   size_t msgid_len = strlen (msgid) + 1;
262   const char *translation;
263 #if _LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS
264   char msg_ctxt_id[msgctxt_len + msgid_len];
265 #else
266   char buf[1024];
267   char *msg_ctxt_id =
268     (msgctxt_len + msgid_len <= sizeof (buf)
269      ? buf
270      : (char *) malloc (msgctxt_len + msgid_len));
271   if (msg_ctxt_id != NULL)
272 #endif
273     {
274       memcpy (msg_ctxt_id, msgctxt, msgctxt_len - 1);
275       msg_ctxt_id[msgctxt_len - 1] = '\004';
276       memcpy (msg_ctxt_id + msgctxt_len, msgid, msgid_len);
277       translation = dcngettext (domain, msg_ctxt_id, msgid_plural, n, category);
278 #if !_LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS
279       if (msg_ctxt_id != buf)
280         free (msg_ctxt_id);
281 #endif
282       if (!(translation == msg_ctxt_id || translation == msgid_plural))
283         return translation;
284     }
285   return (n == 1 ? msgid : msgid_plural);
286 }
287 
288 #endif /* _LIBGETTEXT_H */
289