chiark / gitweb /
gpg agent lockup fix: Interrupt main loop when active_connections_value==0
[gnupg2.git] / common / localename.c
1 /* localename.c - Determine the current selected locale.
2  * Copyright (C) 1995-1999, 2000-2003, 2007,
3  *               2008 Free Software Foundation, Inc.
4  *
5  * This file is free software; you can redistribute it and/or modify
6  * it under the terms of either
7  *
8  *   - the GNU Lesser General Public License as published by the Free
9  *     Software Foundation; either version 3 of the License, or (at
10  *     your option) any later version.
11  *
12  * or
13  *
14  *   - the GNU General Public License as published by the Free
15  *     Software Foundation; either version 2 of the License, or (at
16  *     your option) any later version.
17  *
18  * or both in parallel, as here.
19  *
20  * This file is distributed in the hope that it will be useful,
21  * but WITHOUT ANY WARRANTY; without even the implied warranty of
22  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
23  * GNU General Public License for more details.
24  *
25  * You should have received a copy of the GNU General Public
26  * License along with this program; if not, see <https://www.gnu.org/licenses/>.
27  */
28 /* Written by Ulrich Drepper <drepper@gnu.org>, 1995.  */
29 /* Win32 code written by Tor Lillqvist <tml@iki.fi>.  */
30 /* Modified for GpgOL use by Werner Koch <wk@gnupg.org>, 2005.  */
31 /* Modified for GnuPG use by Werner Koch <wk@gnupg.org>, 2007 */
32
33 #ifdef HAVE_CONFIG_H
34 # include <config.h>
35 #endif
36
37 #include <stdlib.h>
38 #include <string.h>
39 #ifdef HAVE_LOCALE_H
40 #include <locale.h>
41 #endif
42 #include <gpg-error.h> /* We need gettext_localename for W32. */
43
44 #include "../common/w32help.h"
45
46 /* XPG3 defines the result of 'setlocale (category, NULL)' as:
47    "Directs 'setlocale()' to query 'category' and return the current
48     setting of 'local'."
49    However it does not specify the exact format.  Neither do SUSV2 and
50    ISO C 99.  So we can use this feature only on selected systems (e.g.
51    those using GNU C Library).  */
52 #if defined _LIBC || (defined __GNU_LIBRARY__ && __GNU_LIBRARY__ >= 2)
53 # define HAVE_LOCALE_NULL
54 #endif
55
56 /* Use a dummy value for LC_MESSAGES in case it is not defined.  This
57    works because we always test for HAVE_LC_MESSAGES and the core
58    function takes the category as a string as well.  */
59 #ifndef HAVE_LC_MESSAGES
60 #define LC_MESSAGES 0
61 #endif
62
63
64 /* Determine the current locale's name, and canonicalize it into XPG syntax
65      language[_territory[.codeset]][@modifier]
66    The codeset part in the result is not reliable; the locale_charset()
67    should be used for codeset information instead.
68    The result must not be freed; it is statically allocated.  */
69
70 #ifndef HAVE_W32_SYSTEM
71 static const char *
72 do_nl_locale_name (int category, const char *categoryname)
73 {
74   const char *retval;
75
76   /* Use the POSIX methods of looking to 'LC_ALL', 'LC_xxx', and 'LANG'.
77      On some systems this can be done by the 'setlocale' function itself.  */
78 # if defined HAVE_SETLOCALE && defined HAVE_LC_MESSAGES && defined HAVE_LOCALE_NULL
79   (void)categoryname;
80   retval = setlocale (category, NULL);
81 # else
82   /* Setting of LC_ALL overwrites all other.  */
83   retval = getenv ("LC_ALL");
84   if (retval == NULL || retval[0] == '\0')
85     {
86       /* Next comes the name of the desired category.  */
87       retval = getenv (categoryname);
88       if (retval == NULL || retval[0] == '\0')
89         {
90           /* Last possibility is the LANG environment variable.  */
91           retval = getenv ("LANG");
92           if (retval == NULL || retval[0] == '\0')
93             /* We use C as the default domain.  POSIX says this is
94                implementation defined.  */
95             retval = "C";
96         }
97     }
98 # endif
99
100   return retval;
101 }
102 #endif /* HAVE_W32_SYSTEM */
103
104
105
106 /* Return the locale used for translatable messages.  The standard C
107    and POSIX are locale names are mapped to an empty string.  If a
108    locale can't be found an empty string will be returned.  */
109 const char *
110 gnupg_messages_locale_name (void)
111 {
112   const char *s;
113
114 #ifdef HAVE_W32_SYSTEM
115   /* We use the localename function libgpg-error.  */
116   s = gettext_localename ();
117 #else
118   s = do_nl_locale_name (LC_MESSAGES, "LC_MESSAGES");
119 #endif
120   if (!s)
121     s = "";
122   else if (!strcmp (s, "C") || !strcmp (s, "POSIX"))
123     s = "";
124
125   return s;
126 }