blob: 538ece7b5c02b7dd5566ed34d8bcf4b2a5c4884c (
plain) (
blame)
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
57
|
#include <stdlib.h>
#include <string.h>
#include <stdbool.h>
#include <stdint.h>
#include "internal.h"
void *__newlocale(int, const char *, void *);
void __freelocale(void *);
struct glibc_locale {
/* hopefully nobody pokes at this */
void *__locales[13];
const unsigned short int *__ctype_b;
const int *__ctype_tolower;
const int *__ctype_toupper;
char *__names[13];
};
const unsigned short **__ctype_b_loc(void);
const int32_t **__ctype_tolower_loc(void);
const int32_t **__ctype_toupper_loc(void);
const char *__gcompat_valid_locales[] = {"C", "POSIX"};
#define valid_locale_count sizeof __gcompat_valid_locales / sizeof *__gcompat_valid_locales
bool _is_valid_locale(const char *candidate) {
for(size_t i = 0; i < valid_locale_count; i++) {
if(strcmp(candidate, __gcompat_valid_locales[i]) == 0) return true;
}
return false;
}
struct glibc_locale *newlocale(int mask, const char *name, locale_t base) {
GCOMPAT__assert_with_reason(_is_valid_locale(name),
"locale %s not supported\n", name);
struct glibc_locale *ret = malloc(sizeof(struct glibc_locale));
if(ret == NULL) return NULL;
ret->__locales[0] = __newlocale(mask, name, base);
for(int l = 1; l < 13; l++) ret->__locales[l] = ret->__locales[0];
ret->__ctype_b = *__ctype_b_loc();
ret->__ctype_tolower = *__ctype_tolower_loc();
ret->__ctype_toupper = *__ctype_toupper_loc();
ret->__names[0] = strdup("C");
for(int i = 1; i < 13; i++) ret->__names[i] = ret->__names[0];
return ret;
}
void freelocale(struct glibc_locale *loc) {
free(loc->__names[0]);
__freelocale(loc->__locales[0]);
free(loc);
}
|
