~efargaspro/+junk/codeblocks-16.01-release

1 by damienlmoore at gmail
Code::Blocks 16.01
1
/* Determine the user's language preferences.
2
   Copyright (C) 2004-2006 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
}