1  /* Testing the implementation of LC_NUMERIC and snprintf().
       2     Copyright (C) 2003-2023 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
      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  }