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