| /* Test locale dependence of strfmon_l. |
| Copyright (C) 2016-2018 Free Software Foundation, Inc. |
| This file is part of the GNU C Library. |
| |
| 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 <stdbool.h> |
| #include <stdio.h> |
| #include <monetary.h> |
| #include <string.h> |
| #include <stdlib.h> |
| #include <locale.h> |
| |
| static const char *const en_us_name = "en_US.ISO-8859-1"; |
| |
| /* Locale value to be used by tests. */ |
| static locale_t loc; |
| static const char *loc_name; |
| |
| /* Set the global locale to GLOBAL_NAME, and the locale referenced by |
| the loc variable above to LOCAL_NAME. */ |
| static void |
| init_loc (const char *global_name, const char *local_name) |
| { |
| loc = newlocale (LC_ALL_MASK, local_name, 0); |
| if (loc == 0) |
| { |
| printf ("error: newlocale (%s): %m\n", local_name); |
| abort (); |
| } |
| loc_name = local_name; |
| |
| if (setlocale (LC_ALL, global_name) == NULL) |
| { |
| printf ("error: setlocale (%s): %m\n", global_name); |
| abort (); |
| } |
| } |
| |
| /* Expected strings for a positive or negative value. */ |
| struct testcase |
| { |
| const char *i; /* %i */ |
| const char *n; /* %n */ |
| const char *i_ungrouped; /* %^i */ |
| const char *n_ungrouped; /* %^n */ |
| }; |
| |
| /* Collected expected strings for both positive and negative |
| values. */ |
| struct testcase_pair |
| { |
| struct testcase positive; /* 1234567.89 */ |
| struct testcase negative; /* -1234567.89 */ |
| }; |
| |
| static bool errors; |
| |
| /* Test one value using the locale loc. */ |
| static void |
| test_one (const char *format, double value, const char *expected) |
| { |
| static char actual[64]; |
| int result = strfmon_l (actual, sizeof (actual), loc, format, value); |
| if (result < 0) |
| { |
| printf ("error: locale %s, format \"%s\", value %g: strfmon_l: %m\n", |
| loc_name, format, value); |
| errors = true; |
| } |
| else if (strcmp (actual, expected) != 0) |
| { |
| printf ("error: locale %s, format \"%s\", value %g: mismatch\n", |
| loc_name, format, value); |
| printf ("error: expected: \"%s\"\n", expected); |
| printf ("error: actual: \"%s\"\n", actual); |
| errors = true; |
| } |
| } |
| |
| static void |
| test_pair (const struct testcase_pair *pair) |
| { |
| double positive = 1234567.89; |
| test_one ("%i", positive, pair->positive.i); |
| test_one ("%n", positive, pair->positive.n); |
| test_one ("%^i", positive, pair->positive.i_ungrouped); |
| test_one ("%^n", positive, pair->positive.n_ungrouped); |
| double negative = -1234567.89; |
| test_one ("%i", negative, pair->negative.i); |
| test_one ("%n", negative, pair->negative.n); |
| test_one ("%^i", negative, pair->negative.i_ungrouped); |
| test_one ("%^n", negative, pair->negative.n_ungrouped); |
| } |
| |
| static const struct testcase_pair en_us = |
| { |
| { |
| "USD 1,234,567.89", "$1,234,567.89", |
| "USD 1234567.89", "$1234567.89" |
| }, |
| { |
| "-USD 1,234,567.89", "-$1,234,567.89", |
| "-USD 1234567.89", "-$1234567.89" |
| } |
| }; |
| |
| static void |
| test_en_us (const char *other_name) |
| { |
| init_loc (other_name, en_us_name); |
| test_pair (&en_us); |
| freelocale (loc); |
| } |
| |
| struct locale_pair |
| { |
| const char *locale_name; |
| struct testcase_pair pair; |
| }; |
| |
| static const struct locale_pair tests[] = |
| { |
| { |
| "de_DE.UTF-8", |
| { |
| { |
| "1.234.567,89 EUR", "1.234.567,89 \u20ac", |
| "1234567,89 EUR", "1234567,89 \u20ac" |
| }, |
| { |
| "-1.234.567,89 EUR", "-1.234.567,89 \u20ac", |
| "-1234567,89 EUR", "-1234567,89 \u20ac" |
| } |
| }, |
| }, |
| { |
| "tg_TJ.UTF-8", |
| { |
| { |
| "1\u202f234\u202f567.89 TJS", "1\u202f234\u202f567.89 \u0440\u0443\u0431", |
| "1234567.89 TJS", "1234567.89 \u0440\u0443\u0431" |
| }, |
| { |
| "-1\u202f234\u202f567.89 TJS", "-1\u202f234\u202f567.89 \u0440\u0443\u0431", |
| "-1234567.89 TJS", "-1234567.89 \u0440\u0443\u0431" |
| } |
| } |
| }, |
| { |
| "hr_HR.UTF-8", |
| { |
| { |
| "HRK 1\u202f234\u202f567,89", "1\u202f234\u202f567,89 kn", |
| "HRK 1234567,89", "1234567,89 kn" |
| }, |
| { |
| "-HRK 1\u202f234\u202f567,89", "-1\u202f234\u202f567,89 kn", |
| "-HRK 1234567,89", "-1234567,89 kn" |
| } |
| } |
| }, |
| { |
| "hi_IN.UTF-8", |
| { |
| { |
| "INR12,34,567.89", "\u20b912,34,567.89", |
| "INR1234567.89", "\u20b91234567.89" |
| }, |
| { |
| "-INR12,34,567.89", "-\u20b912,34,567.89", |
| "-INR1234567.89", "-\u20b91234567.89" |
| } |
| } |
| }, |
| { |
| "el_GR.UTF-8", |
| { |
| { |
| "1.234.567,89EUR", "1.234.567,89\u20ac", |
| "1234567,89EUR", "1234567,89\u20ac" |
| }, |
| { |
| "-1.234.567,89EUR", "-1.234.567,89\u20ac", |
| "-1234567,89EUR", "-1234567,89\u20ac", |
| } |
| } |
| }, |
| {} |
| }; |
| |
| static int |
| do_test (void) |
| { |
| for (const struct locale_pair *test = tests; |
| test->locale_name != NULL; ++test) |
| { |
| init_loc (en_us_name, test->locale_name); |
| test_pair (&test->pair); |
| freelocale (loc); |
| test_en_us (test->locale_name); |
| } |
| |
| return errors; |
| } |
| |
| #define TEST_FUNCTION do_test () |
| #include "../test-skeleton.c" |