/* Test of the gettext functions.
- Copyright (C) 2000 Free Software Foundation, Inc.
+ Copyright (C) 2000-2019 Free Software Foundation, Inc.
+ This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 2000.
The GNU C Library is free software; you can redistribute it and/or
- modify it under the terms of the GNU Library General Public License as
- published by the Free Software Foundation; either version 2 of the
- License, or (at your option) any later version.
+ modify it under the terms of the GNU Lesser General Public
+ License as published by the Free Software Foundation; either
+ version 2.1 of the License, or (at your option) any later version.
The GNU C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- Library General Public License for more details.
+ Lesser General Public License for more details.
- You should have received a copy of the GNU Library General Public
- License along with the GNU C Library; see the file COPYING.LIB. If not,
- write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
- Boston, MA 02111-1307, USA. */
+ You should have received a copy of the GNU Lesser General Public
+ License along with the GNU C Library; if not, see
+ <https://www.gnu.org/licenses/>. */
#include <libintl.h>
+#include <locale.h>
+#include <mcheck.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
+#include <error.h>
+#include <errno.h>
const struct
static int negative_dcgettext_test (const char *domain, int category);
+#define check_setlocale(cat, name) do { \
+ if (setlocale (cat, name) == NULL) \
+ { \
+ printf ("%s:%u: setlocale (%s, \"%s\"): %m\n", \
+ __FILE__, __LINE__, #cat, name); \
+ result = 1; \
+ } \
+ } while (0)
+
int
main (int argc, char *argv[])
{
int result = 0;
+ /* For debugging. */
+ mtrace ();
+
/* This is the place where the .mo files are placed. */
if (argc > 1)
{
setenv ("LANGUAGE", "existing-locale", 1);
setenv ("LC_ALL", "non-existing-locale", 1);
setenv ("LC_MESSAGES", "non-existing-locale", 1);
+ setenv ("LC_CTYPE", "non-existing-locale", 1);
setenv ("LANG", "non-existing-locale", 1);
+ check_setlocale (LC_CTYPE, "de_DE.UTF-8");
+ check_setlocale (LC_MESSAGES, "de_DE.UTF-8");
+ unsetenv ("OUTPUT_CHARSET");
/* This is the name of the existing domain with a catalog for the
LC_MESSAGES category. */
textdomain ("existing-domain");
/* Now the same tests with LC_ALL deciding. */
unsetenv ("LANGUAGE");
setenv ("LC_ALL", "existing-locale", 1);
+ check_setlocale (LC_ALL, "");
puts ("test `gettext' with LC_ALL set");
/* This is the name of the existing domain with a catalog for the
LC_MESSAGES category. */
LC_MESSAGES category. We leave this value set for the `dgettext'
and `dcgettext' tests. */
textdomain ("non-existing-domain");
- puts ("test `gettext' with LANGUAGE set");
+ puts ("test `gettext' with LC_ALL deciding");
if (negative_gettext_test () != 0)
{
puts ("FAILED");
result = 1;
}
- puts ("test `dgettext' with LANGUAGE set");
+ puts ("test `dgettext' with LC_ALL deciding");
if (positive_dgettext_test ("existing-domain") != 0)
{
puts ("FAILED");
/* Now the same tests with LC_MESSAGES deciding. */
unsetenv ("LC_ALL");
setenv ("LC_MESSAGES", "existing-locale", 1);
+ check_setlocale (LC_MESSAGES, "");
setenv ("LC_TIME", "existing-locale", 1);
+ check_setlocale (LC_TIME, "");
setenv ("LC_NUMERIC", "non-existing-locale", 1);
- puts ("test `gettext' with LC_ALL set");
+ char *what = setlocale (LC_NUMERIC, "");
+ if (what != NULL)
+ {
+ printf ("setlocale succeeded (%s), expected failure\n", what);
+ result = 1;
+ }
+
+ puts ("test `gettext' with LC_MESSAGES set");
/* This is the name of the existing domain with a catalog for the
LC_MESSAGES category. */
textdomain ("existing-domain");
LC_MESSAGES category. We leave this value set for the `dgettext'
and `dcgettext' tests. */
textdomain ("non-existing-domain");
- puts ("test `gettext' with LANGUAGE set");
+ puts ("test `gettext' with LC_MESSAGES deciding");
if (negative_gettext_test () != 0)
{
puts ("FAILED");
result = 1;
}
- puts ("test `dgettext' with LANGUAGE set");
+ puts ("test `dgettext' with LC_MESSAGES deciding");
if (positive_dgettext_test ("existing-domain") != 0)
{
puts ("FAILED");
result = 1;
}
- puts ("test `dcgettext' with LANGUAGE set (LC_MESSAGES)");
+ puts ("test `dcgettext' with category == LC_MESSAGES");
if (positive_dcgettext_test ("existing-domain", LC_MESSAGES) != 0)
{
puts ("FAILED");
result = 1;
}
/* Try a different category. For this we also switch the domain. */
- puts ("test `dcgettext' with LANGUAGE set (LC_TIME)");
+ puts ("test `dcgettext' with LANGUAGE == LC_TIME");
if (positive_dcgettext_test ("existing-time-domain", LC_TIME) != 0)
{
puts ("FAILED");
result = 1;
}
/* This time use a category for which there is no catalog. */
- puts ("test `dcgettext' with LANGUAGE set (LC_NUMERIC)");
+ puts ("test `dcgettext' with LANGUAGE == LC_NUMERIC");
if (negative_dcgettext_test ("existing-domain", LC_NUMERIC) != 0)
{
puts ("FAILED");
/* Now the same tests with LANG deciding. */
unsetenv ("LC_MESSAGES");
+ unsetenv ("LC_CTYPE");
+ unsetenv ("LC_TIME");
+ unsetenv ("LC_NUMERIC");
setenv ("LANG", "existing-locale", 1);
+ check_setlocale (LC_ALL, "");
/* This is the name of the existing domain with a catalog for the
LC_MESSAGES category. */
textdomain ("existing-domain");
- puts ("test `gettext' with LC_ALL set");
+ puts ("test `gettext' with LANG set");
if (positive_gettext_test () != 0)
{
puts ("FAILED");
LC_MESSAGES category. We leave this value set for the `dgettext'
and `dcgettext' tests. */
textdomain ("non-existing-domain");
- puts ("test `gettext' with LANGUAGE set");
+ puts ("test `gettext' with LANG set");
if (negative_gettext_test () != 0)
{
puts ("FAILED");
result = 1;
}
- puts ("test `dgettext' with LANGUAGE set");
+ puts ("test `dgettext' with LANG set");
if (positive_dgettext_test ("existing-domain") != 0)
{
puts ("FAILED");
result = 1;
}
+ check_setlocale (LC_ALL, "C");
+
return result;
}
{
const char *found = gettext (msgs[cnt].msgid);
- if (found == NULL || strcmp (found, msgs[cnt].msgstr) != 0)
+ if (found == NULL
+ || (msgs[cnt].msgstr[0] != '\0'
+ && strcmp (found, msgs[cnt].msgstr) != 0))
{
/* Oops, shouldn't happen. */
- printf (" gettext (\"%s\") failed, returned \"%s\"\n",
- msgs[cnt].msgid, found);
+ printf ("\
+ gettext (\"%s\") failed, returned \"%s\", expected \"%s\"\n",
+ msgs[cnt].msgid, found, msgs[cnt].msgstr);
result = 1;
}
}
{
const char *found = dgettext (domain, msgs[cnt].msgid);
- if (found == NULL || strcmp (found, msgs[cnt].msgstr) != 0)
+ if (found == NULL
+ || (msgs[cnt].msgstr[0] != '\0'
+ && strcmp (found, msgs[cnt].msgstr) != 0))
{
/* Oops, shouldn't happen. */
- printf (" dgettext (\"%s\", \"%s\") failed, returned \"%s\"\n",
- domain, msgs[cnt].msgid, found);
+ printf ("\
+ dgettext (\"%s\", \"%s\") failed, returned \"%s\", expected \"%s\"\n",
+ domain, msgs[cnt].msgid, found, msgs[cnt].msgstr);
result = 1;
}
}
{
const char *found = dcgettext (domain, msgs[cnt].msgid, category);
- if (found == NULL || strcmp (found, msgs[cnt].msgstr) != 0)
+ if (found == NULL
+ || (msgs[cnt].msgstr[0] != '\0'
+ && strcmp (found, msgs[cnt].msgstr) != 0))
{
/* Oops, shouldn't happen. */
- printf (" dcgettext (\"%s\", \"%s\", %s) failed, returned \"%s\"\n",
- domain, msgs[cnt].msgid, catname[category], found);
+ printf ("\
+ dcgettext (\"%s\", \"%s\", %s) failed, returned \"%s\", expected \"%s\"\n",
+ domain, msgs[cnt].msgid, catname[category], found,
+ msgs[cnt].msgstr);
result = 1;
}
}