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
|
#include "transcode_data.h"
<%
require "gb18030-tbl"
transcode_tbl_only "GB18030", "UTF-8", [["{00-7f}", :nomap]] +
GB18030_TO_UCS_TBL + [
["{90-e2}{30-39}{81-fe}{30-39}", :func_so],
["e3{30-31}{81-fe}{30-39}", :func_so],
["e332{81-99}{30-39}", :func_so],
["e3329a{30-35}", :func_so], # "E3329A35" is U+10FFFF
]
transcode_tbl_only "UTF-8", "GB18030", [["{00-7f}", :nomap]] +
GB18030_TO_UCS_TBL.map {|a,b| [b,a] } + [
["f0{90-bf}{80-bf}{80-bf}", :func_so],
["{f1-f3}{80-bf}{80-bf}{80-bf}", :func_so],
["f4{80-8f}{80-bf}{80-bf}", :func_so]
]
%>
<%= transcode_generated_code %>
static ssize_t
fun_so_from_gb18030(void *statep, const unsigned char *s, size_t l, unsigned char *o, size_t osize)
{
/* outside BMP only */
/* u: Unicode Scalar Value */
unsigned int u = (s[0]-0x90)*10*126*10 + (s[1]-0x30)*126*10 + (s[2]-0x81)*10 + (s[3]-0x30) + 0x10000;
o[0] = 0xF0 | (u>>18);
o[1] = 0x80 | ((u>>12)&0x3F);
o[2] = 0x80 | ((u>>6)&0x3F);
o[3] = 0x80 | (u&0x3F);
return 4;
}
static ssize_t
fun_so_to_gb18030(void *statep, const unsigned char *s, size_t l, unsigned char *o, size_t osize)
{
/* outside BMP only */
/* u: Unicode Scalar Value */
unsigned int u = ((s[0]&0x07)<<18) | ((s[1]&0x3F)<<12) | ((s[2]&0x3F)<<6) | (s[3]&0x3F);
u -= 0x10000;
o[3] = 0x30 + u%10;
u /= 10;
o[2] = 0x81 + u%126;
u /= 126;
o[1] = 0x30 + u%10;
o[0] = 0x90 + u/10;
return 4;
}
static const rb_transcoder
rb_from_GB18030 = {
"GB18030", "UTF-8", from_GB18030,
TRANSCODE_TABLE_INFO,
1, /* input_unit_length */
4, /* max_input */
3, /* max_output */
asciicompat_converter, /* asciicompat_type */
0, NULL, NULL, /* state_size, state_init, state_fini */
NULL, NULL, NULL, fun_so_from_gb18030,
NULL, NULL, NULL
};
static const rb_transcoder
rb_to_GB18030 = {
"UTF-8", "GB18030", to_GB18030,
TRANSCODE_TABLE_INFO,
1, /* input_unit_length */
4, /* max_input */
4, /* max_output */
asciicompat_converter, /* asciicompat_type */
0, NULL, NULL, /* state_size, state_init, state_fini */
NULL, NULL, NULL, fun_so_to_gb18030,
NULL, NULL, NULL
};
void
Init_gb18030(void)
{
rb_register_transcoder(&rb_from_GB18030);
rb_register_transcoder(&rb_to_GB18030);
}
|
