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