1 /* Testing the implementation of LC_NUMERIC and snprintf().
2    Copyright (C) 2003-2022 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4 
5 
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
10 
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
15 
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, see
18    <https://www.gnu.org/licenses/>.  */
19 
20 #include <stdio.h>
21 #include <locale.h>
22 #include <string.h>
23 #include <stdlib.h>
24 
25 /*
26   test-numeric gets called with three parameters:
27    - the locale
28    - the format-string to be used
29    - the actual number to be formatted
30    - the expected string
31    If the test passes, test-numeric terminates with returncode 0,
32    otherwise with 1
33 */
34 #define EXIT_SUCCESS 0
35 #define EXIT_FAILURE 1
36 #define EXIT_SETLOCALE 2
37 #define EXIT_SNPRINTF 3
38 
39 int
main(int argc,char * argv[])40 main (int argc, char *argv[])
41 {
42   char s[200];
43   double val;
44 
45   /* Make sure to read the value before setting of the locale, as
46      strtod() is locale-dependent. */
47   val = strtod (argv[3], NULL);
48 
49   if (setlocale (LC_ALL, argv[1]) == NULL)
50     {
51       fprintf (stderr, "setlocale(LC_ALL, \"%s\"): %m\n", argv[1]);
52       exit (EXIT_SETLOCALE);
53     }
54 
55   if (snprintf (s, sizeof (s), argv[2], val) == -1)
56     {
57       perror ("snprintf");
58       exit (EXIT_SNPRINTF);
59     }
60 
61   if (strcmp (s, argv[4]) != 0)
62     {
63       printf ("\
64 locale: \"%s\", format: \"%s\", expected: \"%s\", got: \"%s\" => %s\n",
65 	      argv[1], argv[2], argv[4], s,
66 	      strcmp (s, argv[4]) != 0 ? "false" : "correct");
67       exit (EXIT_FAILURE);
68     }
69 
70   return EXIT_SUCCESS;
71 }
72