1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
#include <stdlib.h>
#include <string.h>
#include "locale_impl.h"
#include "libc.h"
extern const struct __locale_map __c_dot_utf8;
static const struct __locale_struct c_locale = { 0 };
static const struct __locale_struct c_dot_utf8_locale = {
.cat[LC_CTYPE] = &__c_dot_utf8
};
int __loc_is_allocated(locale_t loc)
{
return loc && loc != &c_locale && loc != &c_dot_utf8_locale;
}
locale_t __newlocale(int mask, const char *name, locale_t loc)
{
int i, j;
struct __locale_struct tmp;
const struct __locale_map *lm;
/* For locales with allocated storage, modify in-place. */
if (__loc_is_allocated(loc)) {
for (i=0; i<LC_ALL; i++)
if (mask & (1<<i))
loc->cat[i] = __get_locale(i, name);
return loc;
}
/* Otherwise, build a temporary locale object, which will only
* be instantiated in allocated storage if it does not match
* one of the built-in static locales. This makes the common
* usage case for newlocale, getting a C locale with predictable
* behavior, very fast, and more importantly, fail-safe. */
for (j=i=0; i<LC_ALL; i++) {
if (loc && !(mask & (1<<i)))
lm = loc->cat[i];
else
lm = __get_locale(i, mask & (1<<i) ? name : "");
if (lm) j++;
tmp.cat[i] = lm;
}
if (!j)
return (locale_t)&c_locale;
if (j==1 && tmp.cat[LC_CTYPE]==c_dot_utf8_locale.cat[LC_CTYPE])
return (locale_t)&c_dot_utf8_locale;
if ((loc = malloc(sizeof *loc))) *loc = tmp;
return loc;
}
weak_alias(__newlocale, newlocale);
|