(root)/
glibc-2.38/
localedata/
tst-fmon.c
       1  /* Testing the implementation of strfmon(3).
       2     Copyright (C) 1996-2023 Free Software Foundation, Inc.
       3     This file is part of the GNU C Library.
       4  
       5     The GNU C Library is free software; you can redistribute it and/or
       6     modify it under the terms of the GNU Lesser General Public
       7     License as published by the Free Software Foundation; either
       8     version 2.1 of the License, or (at your option) any later version.
       9  
      10     The GNU C Library is distributed in the hope that it will be useful,
      11     but WITHOUT ANY WARRANTY; without even the implied warranty of
      12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      13     Lesser General Public License for more details.
      14  
      15     You should have received a copy of the GNU Lesser General Public
      16     License along with the GNU C Library; if not, see
      17     <https://www.gnu.org/licenses/>.  */
      18  
      19  #include <stdio.h>
      20  #include <locale.h>
      21  #include <monetary.h>
      22  #include <string.h>
      23  #include <stdlib.h>
      24  
      25  /*
      26    test-strfmon 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-strfmon 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_STRFMON 3
      38  
      39  int
      40  main (int argc, char *argv[])
      41  {
      42    char s[200];
      43  
      44    if (setlocale (LC_MONETARY, argv[1]) == NULL)
      45      {
      46        fprintf (stderr, "setlocale(LC_MONETARY, \"%s\"): %m\n", argv[1]);
      47        exit (EXIT_SETLOCALE);
      48      }
      49  
      50    if (strfmon (s, sizeof (s), argv[2], (double) atof (argv[3])) == -1)
      51      {
      52        perror ("strfmon");
      53        exit (EXIT_STRFMON);
      54      }
      55  
      56    if (strcmp (s, argv[4]) != 0)
      57      {
      58        printf ("\
      59  Locale: \"%s\" Format: \"%s\" Value: \"%s\" Received: \"%s\" Expected: \"%s\" => %s\n",
      60  	      argv[1], argv[2], argv[3], s, argv[4],
      61  	      strcmp (s, argv[4]) != 0 ? "false" : "correct");
      62        exit (EXIT_FAILURE);
      63      }
      64  
      65    return EXIT_SUCCESS;
      66  }