initial check-in, version 0.5.0
[musl] / src / multibyte / internal.c
1 /* 
2  * This code was written by Rich Felker in 2010; no copyright is claimed.
3  * This code is in the public domain. Attribution is appreciated but
4  * unnecessary.
5  */
6
7 #include <inttypes.h>
8
9 #include "internal.h"
10
11 #define C(x) ( x<2 ? -1 : ( R(0x80,0xc0) | x ) )
12 #define D(x) C((x+16))
13 #define E(x) ( ( x==0 ? R(0xa0,0xc0) : \
14                  x==0xd ? R(0x80,0xa0) : \
15                  R(0x80,0xc0) ) \
16              | ( R(0x80,0xc0) >> 6 ) \
17              | x )
18 #ifdef I_FAILED_TO_RTFM_RFC3629
19 #define F0(x) (( x==0 ? R(0x90,0xc0) : \
20                  R(0x80,0xc0) ) \
21              | ( R(0x80,0xc0) >> 6 ) \
22              | ( R(0x80,0xc0) >> 12 ) \
23              | x )
24 #define F8(x) (( x==0 ? R(0xa0,0xc0) : \
25                  R(0x80,0xc0) ) \
26              | ( R(0x80,0xc0) >> 6 ) \
27              | ( R(0x80,0xc0) >> 12 ) \
28              | ( R(0x80,0xc0) >> 18 ) \
29              | x )
30 #define FC(x) (( x==0 ? R(0x88,0xc0) : \
31                  R(0x80,0xc0) ) \
32              | ( R(0x80,0xc0) >> 6 ) \
33              | ( R(0x80,0xc0) >> 12 ) \
34              | ( R(0x80,0xc0) >> 18 ) \
35              | ( R(0x80,0xc0) >> 24 ) \
36              | x )
37 #define F(x) ( x<8 ? F0(x) : x<12 ? F8((x&3)) : x<14 ? FC((x&1)) : -1 )
38 #else
39 #define F(x) ( ( x>=5 ? 0 : \
40                  x==0 ? R(0x90,0xc0) : \
41                  x==4 ? R(0x80,0xa0) : \
42                  R(0x80,0xc0) ) \
43              | ( R(0x80,0xc0) >> 6 ) \
44              | ( R(0x80,0xc0) >> 12 ) \
45              | x )
46 #endif
47
48 const uint32_t bittab[] = {
49                       C(0x2),C(0x3),C(0x4),C(0x5),C(0x6),C(0x7),
50         C(0x8),C(0x9),C(0xa),C(0xb),C(0xc),C(0xd),C(0xe),C(0xf),
51         D(0x0),D(0x1),D(0x2),D(0x3),D(0x4),D(0x5),D(0x6),D(0x7),
52         D(0x8),D(0x9),D(0xa),D(0xb),D(0xc),D(0xd),D(0xe),D(0xf),
53         E(0x0),E(0x1),E(0x2),E(0x3),E(0x4),E(0x5),E(0x6),E(0x7),
54         E(0x8),E(0x9),E(0xa),E(0xb),E(0xc),E(0xd),E(0xe),E(0xf),
55         F(0x0),F(0x1),F(0x2),F(0x3),F(0x4),
56 #ifdef I_FAILED_TO_RTFM_RFC3629
57                                            F(0x5),F(0x6),F(0x7),
58         F(0x8),F(0x9),F(0xa),F(0xb),F(0xc),F(0xd)
59 #endif
60 };