blob: 38999b0a35a26f18c478a259ab045a09d776041d (
plain)
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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
#include <defs.h>
#ifndef __NO_COMPILE
int zubr_is_alpha( __mpu_char16_t c )
{
return (c >= 'A' && c <= 'Z') ||
(c >= 'a' && c <= 'z') || c >= 0x80;
}
int zubr_is_alnum( __mpu_char16_t c )
{
return zubr_is_alpha( c ) || (c >= '0' && c <= '9');
}
int zubr_is_digit( __mpu_char16_t c )
{
return c >= '0' && c <= '9';
}
int zubr_is_upper( __mpu_char16_t c )
{
return c >= 'A' && c <= 'Z';
}
int zubr_is_print( __mpu_char16_t c )
{
return c >= 0x20 && c != 0x7f;
}
__mpu_char16_t zubr_to_lower( __mpu_char16_t c )
{
if( c >= 'A' && c <= 'Z' ) return c - 'A' + 'a';
return c;
}
__mpu_char16_t zubr_to_upper( __mpu_char16_t c )
{
if( c >= 'a' && c <= 'z' ) return c - 'a' + 'A';
return c;
}
static char *zubr_ucs2_to_utf8_dup( const __mpu_char16_t *s )
{
size_t n = mpu_str16len( s );
size_t cap = n * 3 + 1;
char *p = malloc( cap );
if( !p ) return NULL;
if( mpu_ucs2_to_utf8( (__mpu_char8_t *)p, s, cap ) == (__mpu_size_t)-1 )
{
free( p );
return NULL;
}
return p;
}
__mpu_char16_t *zubr_utf8_to_ucs2_dup( const char *s )
{
size_t n = strlen( s );
__mpu_char16_t *p = malloc( (n + 1) * sizeof(*p) );
if( !p ) return NULL;
if( mpu_utf8_to_ucs2( p, (const __mpu_char8_t *)s, n + 1 ) == (__mpu_size_t)-1 )
{
free( p );
return NULL;
}
return p;
}
mpu_FILE *zubr_fopen( const __mpu_char16_t *filename, const char *mode )
{
char *name = zubr_ucs2_to_utf8_dup( filename );
mpu_FILE *fp;
if( !name ) return NULL;
fp = mpu_fopen( name, mode );
free( name );
return fp;
}
int zubr_unlink( const __mpu_char16_t *filename )
{
char *name = zubr_ucs2_to_utf8_dup( filename );
int rc;
if( !name ) return -1;
rc = unlink( name );
free( name );
return rc;
}
__mpu_char16_t *zubr_getenv( const char *name )
{
char *value = getenv( name );
if( !value ) return NULL;
return zubr_utf8_to_ucs2_dup( value );
}
#endif
|
