blob: 9c4ee28ec2f3226b2c96988ff7faf97741458b16 (
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 <dlfcn.h>
#include <stdlib.h>
#include <string.h>
#include <stdbool.h>
#include <stdint.h>
#include "alias.h" /* alias */
#include "internal.h"
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];
};
typedef locale_t (*newlocale_t)(int mask, const char *name, locale_t base);
const unsigned short **__ctype_b_loc(void);
const int32_t **__ctype_tolower_loc(void);
const int32_t **__ctype_toupper_loc(void);
struct glibc_locale *__newlocale(int mask, const char *name, locale_t base) {
struct glibc_locale *ret = (void*)base;
if(ret == NULL) {
ret = calloc(1, sizeof(struct glibc_locale));
if(ret == NULL) return NULL;
mask = 0x7fffffff;
}
/* relies on sizeof(*locale_t) <= sizeof(ret.__locales) */
newlocale_t real_newlocale = (newlocale_t)dlsym(RTLD_NEXT, "__newlocale");
real_newlocale(mask, name, (void*)ret);
ret->__ctype_b = *__ctype_b_loc();
ret->__ctype_tolower = *__ctype_tolower_loc();
ret->__ctype_toupper = *__ctype_toupper_loc();
ret->__names[0] = "C";
for(int i = 1; i < 13; i++) ret->__names[i] = ret->__names[0];
return ret;
}
alias(__newlocale, newlocale);
void *__duplocale(struct glibc_locale *loc) {
struct glibc_locale *ret = malloc(sizeof *ret);
if(!ret) return NULL;
*ret = *loc;
return ret;
}
alias(__duplocale, duplocale);
|
