[Feature][ZXW-33]merge ZXW 0428 version
Change-Id: I11f167edfea428d9fab198ff00ff1364932d1b0b
diff --git a/ap/libc/glibc/glibc-2.23/intl/tst-gettext.c b/ap/libc/glibc/glibc-2.23/intl/tst-gettext.c
new file mode 100644
index 0000000..4fa7134
--- /dev/null
+++ b/ap/libc/glibc/glibc-2.23/intl/tst-gettext.c
@@ -0,0 +1,368 @@
+/* Test of the gettext functions.
+ Copyright (C) 2000-2016 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 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
+ Lesser General Public License for more details.
+
+ You should have received a copy of the GNU Lesser General Public
+ License along with the GNU C Library; if not, see
+ <http://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
+{
+ const char *msgid;
+ const char *msgstr;
+} msgs[] =
+{
+#define INPUT(Str) { Str,
+#define OUTPUT(Str) Str },
+#include TESTSTRS_H
+};
+
+const char *catname[] =
+{
+ [LC_MESSAGES] = "LC_MESSAGES",
+ [LC_TIME] = "LC_TIME",
+ [LC_NUMERIC] = "LC_NUMERIC"
+};
+
+
+static int positive_gettext_test (void);
+static int negative_gettext_test (void);
+static int positive_dgettext_test (const char *domain);
+static int positive_dcgettext_test (const char *domain, int category);
+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)
+ {
+ bindtextdomain ("existing-domain", argv[1]);
+ bindtextdomain ("existing-time-domain", argv[1]);
+ bindtextdomain ("non-existing-domain", argv[1]);
+ }
+
+ /* The locale the catalog is created for is "existing-category". Now
+ set the various variables in question to this value and run the
+ test. */
+ 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");
+ puts ("test `gettext' with LANGUAGE set");
+ if (positive_gettext_test () != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+ /* This is the name of a non-existing domain with a catalog for the
+ LC_MESSAGES category. We leave this value set for the `dgettext'
+ and `dcgettext' tests. */
+ textdomain ("non-existing-domain");
+ puts ("test `gettext' with LANGUAGE set");
+ if (negative_gettext_test () != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+ puts ("test `dgettext' with LANGUAGE set");
+ if (positive_dgettext_test ("existing-domain") != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+
+ /* 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. */
+ textdomain ("existing-domain");
+ if (positive_gettext_test () != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+ /* This is the name of a non-existing domain with a catalog for the
+ LC_MESSAGES category. We leave this value set for the `dgettext'
+ and `dcgettext' tests. */
+ textdomain ("non-existing-domain");
+ puts ("test `gettext' with LC_ALL deciding");
+ if (negative_gettext_test () != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+ puts ("test `dgettext' with LC_ALL deciding");
+ if (positive_dgettext_test ("existing-domain") != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+
+ /* 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);
+ 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");
+ if (positive_gettext_test () != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+ /* This is the name of a non-existing domain with a catalog for the
+ LC_MESSAGES category. We leave this value set for the `dgettext'
+ and `dcgettext' tests. */
+ textdomain ("non-existing-domain");
+ puts ("test `gettext' with LC_MESSAGES deciding");
+ if (negative_gettext_test () != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+ puts ("test `dgettext' with LC_MESSAGES deciding");
+ if (positive_dgettext_test ("existing-domain") != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+ 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 == 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 == LC_NUMERIC");
+ if (negative_dcgettext_test ("existing-domain", LC_NUMERIC) != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+
+ /* 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 LANG set");
+ if (positive_gettext_test () != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+ /* This is the name of a non-existing domain with a catalog for the
+ LC_MESSAGES category. We leave this value set for the `dgettext'
+ and `dcgettext' tests. */
+ textdomain ("non-existing-domain");
+ puts ("test `gettext' with LANG set");
+ if (negative_gettext_test () != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+ puts ("test `dgettext' with LANG set");
+ if (positive_dgettext_test ("existing-domain") != 0)
+ {
+ puts ("FAILED");
+ result = 1;
+ }
+
+ check_setlocale (LC_ALL, "C");
+
+ return result;
+}
+
+
+static int
+positive_gettext_test (void)
+{
+ size_t cnt;
+ int result = 0;
+
+ for (cnt = 0; cnt < sizeof (msgs) / sizeof (msgs[0]); ++cnt)
+ {
+ const char *found = gettext (msgs[cnt].msgid);
+
+ if (found == NULL
+ || (msgs[cnt].msgstr[0] != '\0'
+ && strcmp (found, msgs[cnt].msgstr) != 0))
+ {
+ /* Oops, shouldn't happen. */
+ printf ("\
+ gettext (\"%s\") failed, returned \"%s\", expected \"%s\"\n",
+ msgs[cnt].msgid, found, msgs[cnt].msgstr);
+ result = 1;
+ }
+ }
+
+ return result;
+}
+
+
+static int
+negative_gettext_test (void)
+{
+ size_t cnt;
+ int result = 0;
+
+ for (cnt = 0; cnt < sizeof (msgs) / sizeof (msgs[0]); ++cnt)
+ {
+ const char *found = gettext (msgs[cnt].msgid);
+
+ if (found != msgs[cnt].msgid)
+ {
+ /* Oops, shouldn't happen. */
+ printf (" gettext (\"%s\") failed\n", msgs[cnt].msgid);
+ result = 1;
+ }
+ }
+
+ return result;
+}
+
+
+static int
+positive_dgettext_test (const char *domain)
+{
+ size_t cnt;
+ int result = 0;
+
+ for (cnt = 0; cnt < sizeof (msgs) / sizeof (msgs[0]); ++cnt)
+ {
+ const char *found = dgettext (domain, msgs[cnt].msgid);
+
+ 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\", expected \"%s\"\n",
+ domain, msgs[cnt].msgid, found, msgs[cnt].msgstr);
+ result = 1;
+ }
+ }
+
+ return result;
+}
+
+
+static int
+positive_dcgettext_test (const char *domain, int category)
+{
+ size_t cnt;
+ int result = 0;
+
+ for (cnt = 0; cnt < sizeof (msgs) / sizeof (msgs[0]); ++cnt)
+ {
+ const char *found = dcgettext (domain, msgs[cnt].msgid, category);
+
+ 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\", expected \"%s\"\n",
+ domain, msgs[cnt].msgid, catname[category], found,
+ msgs[cnt].msgstr);
+ result = 1;
+ }
+ }
+
+ return result;
+}
+
+
+static int
+negative_dcgettext_test (const char *domain, int category)
+{
+ size_t cnt;
+ int result = 0;
+
+ for (cnt = 0; cnt < sizeof (msgs) / sizeof (msgs[0]); ++cnt)
+ {
+ const char *found = dcgettext (domain, msgs[cnt].msgid, category);
+
+ if (found != msgs[cnt].msgid)
+ {
+ /* Oops, shouldn't happen. */
+ printf (" dcgettext (\"%s\", \"%s\", %s) failed\n",
+ domain, msgs[cnt].msgid, catname[category]);
+ result = 1;
+ }
+ }
+
+ return result;
+}