5436040f98c369b64144b8e5b8eca1ff348e1c36
[gnupg.git] / intl / langprefs.c
1 /* Determine the user's language preferences.
2    Copyright (C) 2004-2005 Free Software Foundation, Inc.
3
4    This program is free software; you can redistribute it and/or modify it
5    under the terms of the GNU Library General Public License as published
6    by the Free Software Foundation; either version 2, or (at your option)
7    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 GNU
12    Library General Public License for more details.
13
14    You should have received a copy of the GNU Library General Public
15    License along with this program; if not, write to the Free Software
16    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
17    USA.  */
18
19 /* Written by Bruno Haible <bruno@clisp.org>.  */
20
21 #ifdef HAVE_CONFIG_H
22 # include <config.h>
23 #endif
24
25 #include <stdlib.h>
26
27 #if HAVE_CFPREFERENCESCOPYAPPVALUE
28 # include <string.h>
29 # include <CoreFoundation/CFPreferences.h>
30 # include <CoreFoundation/CFPropertyList.h>
31 # include <CoreFoundation/CFArray.h>
32 # include <CoreFoundation/CFString.h>
33 extern void _nl_locale_name_canonicalize (char *name);
34 #endif
35
36 /* Determine the user's language preferences, as a colon separated list of
37    locale names in XPG syntax
38      language[_territory[.codeset]][@modifier]
39    The result must not be freed; it is statically allocated.
40    The LANGUAGE environment variable does not need to be considered; it is
41    already taken into account by the caller.  */
42
43 const char *
44 _nl_language_preferences_default (void)
45 {
46 #if HAVE_CFPREFERENCESCOPYAPPVALUE /* MacOS X 10.2 or newer */
47   {
48     /* Cache the preferences list, since CoreFoundation calls are expensive.  */
49     static const char *cached_languages;
50     static int cache_initialized;
51
52     if (!cache_initialized)
53       {
54         CFTypeRef preferences =
55           CFPreferencesCopyAppValue (CFSTR ("AppleLanguages"),
56                                      kCFPreferencesCurrentApplication);
57         if (preferences != NULL
58             && CFGetTypeID (preferences) == CFArrayGetTypeID ())
59           {
60             CFArrayRef prefArray = (CFArrayRef)preferences;
61             int n = CFArrayGetCount (prefArray);
62             char buf[256];
63             size_t size = 0;
64             int i;
65
66             for (i = 0; i < n; i++)
67               {
68                 CFTypeRef element = CFArrayGetValueAtIndex (prefArray, i);
69                 if (element != NULL
70                     && CFGetTypeID (element) == CFStringGetTypeID ()
71                     && CFStringGetCString ((CFStringRef)element,
72                                            buf, sizeof (buf),
73                                            kCFStringEncodingASCII))
74                   {
75                     _nl_locale_name_canonicalize (buf);
76                     size += strlen (buf) + 1;
77                     /* Most GNU programs use msgids in English and don't ship
78                        an en.mo message catalog.  Therefore when we see "en"
79                        in the preferences list, arrange for gettext() to
80                        return the msgid, and ignore all further elements of
81                        the preferences list.  */
82                     if (strcmp (buf, "en") == 0)
83                       break;
84                   }
85                 else
86                   break;
87               }
88             if (size > 0)
89               {
90                 char *languages = (char *) malloc (size);
91
92                 if (languages != NULL)
93                   {
94                     char *p = languages;
95
96                     for (i = 0; i < n; i++)
97                       {
98                         CFTypeRef element =
99                           CFArrayGetValueAtIndex (prefArray, i);
100                         if (element != NULL
101                             && CFGetTypeID (element) == CFStringGetTypeID ()
102                             && CFStringGetCString ((CFStringRef)element,
103                                                    buf, sizeof (buf),
104                                                    kCFStringEncodingASCII))
105                           {
106                             _nl_locale_name_canonicalize (buf);
107                             strcpy (p, buf);
108                             p += strlen (buf);
109                             *p++ = ':';
110                             if (strcmp (buf, "en") == 0)
111                               break;
112                           }
113                         else
114                           break;
115                       }
116                     *--p = '\0';
117
118                     cached_languages = languages;
119                   }
120               }
121           }
122         cache_initialized = 1;
123       }
124     if (cached_languages != NULL)
125       return cached_languages;
126   }
127 #endif
128
129   return NULL;
130 }