1  /* Program that prints the names of the categories of the current locale.
       2     Copyright (C) 2019-2022 Free Software Foundation, Inc.
       3  
       4     This program is free software: you can redistribute it and/or modify
       5     it under the terms of the GNU General Public License as published by
       6     the Free Software Foundation, either version 3 of the License, or
       7     (at your option) any later version.
       8  
       9     This program is distributed in the hope that it will be useful,
      10     but WITHOUT ANY WARRANTY; without even the implied warranty of
      11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
      12     GNU General Public License for more details.
      13  
      14     You should have received a copy of the GNU General Public License
      15     along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
      16  
      17  /* Written by Bruno Haible <bruno@clisp.org>, 2019.  */
      18  
      19  #include <config.h>
      20  
      21  #include <locale.h>
      22  #include <stdio.h>
      23  #include <stdlib.h>
      24  
      25  /* We want to use the system's setlocale() function here, not the gnulib
      26     override.  */
      27  #undef setlocale
      28  
      29  /* Specification:
      30     <https://pubs.opengroup.org/onlinepubs/9699919799/utilities/locale.html>
      31     Here we implement only the invocation without any command-line options.  */
      32  
      33  static const char *
      34  defaulted_getenv (const char *variable)
      35  {
      36    const char *value = getenv (variable);
      37    return (value != NULL ? value : "");
      38  }
      39  
      40  static void
      41  print_category (int category, const char *variable)
      42  {
      43    const char *value = defaulted_getenv (variable);
      44    if (value[0] != '\0' && defaulted_getenv ("LC_ALL")[0] == '\0')
      45      /* The variable is set in the environment and not overridden by LC_ALL.  */
      46      printf ("%s=%s\n", variable, value);
      47    else
      48      printf ("%s=\"%s\"\n", variable, setlocale (category, NULL));
      49  }
      50  
      51  int
      52  main (void)
      53  {
      54    setlocale (LC_ALL, "");
      55  
      56    printf ("LANG=%s\n", defaulted_getenv ("LANG"));
      57    print_category (LC_CTYPE, "LC_CTYPE");
      58    print_category (LC_NUMERIC, "LC_NUMERIC");
      59    print_category (LC_TIME, "LC_TIME");
      60    print_category (LC_COLLATE, "LC_COLLATE");
      61    print_category (LC_MONETARY, "LC_MONETARY");
      62    print_category (LC_MESSAGES, "LC_MESSAGES");
      63  #ifdef LC_PAPER
      64    print_category (LC_PAPER, "LC_PAPER");
      65  #endif
      66  #ifdef LC_NAME
      67    print_category (LC_NAME, "LC_NAME");
      68  #endif
      69  #ifdef LC_ADDRESS
      70    print_category (LC_ADDRESS, "LC_ADDRESS");
      71  #endif
      72  #ifdef LC_TELEPHONE
      73    print_category (LC_TELEPHONE, "LC_TELEPHONE");
      74  #endif
      75  #ifdef LC_MEASUREMENT
      76    print_category (LC_MEASUREMENT, "LC_MEASUREMENT");
      77  #endif
      78  #ifdef LC_IDENTIFICATION
      79    print_category (LC_IDENTIFICATION, "LC_IDENTIFICATION");
      80  #endif
      81  
      82    printf ("LC_ALL=%s\n", defaulted_getenv ("LC_ALL"));
      83  
      84    return 0;
      85  }