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