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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
#include "uhc_1.h"
#include "uhc_2.h"
static int
cp949_mbtowc (conv_t conv, ucs4_t *pwc, const unsigned char *s, int n)
{
unsigned char c = *s;
if (c < 0x80)
return ascii_mbtowc(conv,pwc,s,n);
if (c >= 0x81 && c <= 0xa0)
return uhc_1_mbtowc(conv,pwc,s,n);
if (c >= 0xa1 && c < 0xff) {
if (n < 2)
return RET_TOOFEW(0);
{
unsigned char c2 = s[1];
if (c2 < 0xa1)
return uhc_2_mbtowc(conv,pwc,s,n);
else if (c2 < 0xff && !(c == 0xa2 && c2 == 0xe8)) {
unsigned char buf[2];
int ret;
buf[0] = c-0x80; buf[1] = c2-0x80;
ret = ksc5601_mbtowc(conv,pwc,buf,2);
if (ret != RET_ILSEQ)
return ret;
if (c == 0xc9) {
*pwc = 0xe000 + (c2 - 0xa1);
return 2;
}
if (c == 0xfe) {
*pwc = 0xe05e + (c2 - 0xa1);
return 2;
}
}
}
}
return RET_ILSEQ;
}
static int
cp949_wctomb (conv_t conv, unsigned char *r, ucs4_t wc, int n)
{
unsigned char buf[2];
int ret;
ret = ascii_wctomb(conv,r,wc,n);
if (ret != RET_ILUNI)
return ret;
if (wc != 0x327e) {
ret = ksc5601_wctomb(conv,buf,wc,2);
if (ret != RET_ILUNI) {
if (ret != 2) abort();
if (n < 2)
return RET_TOOSMALL;
r[0] = buf[0]+0x80;
r[1] = buf[1]+0x80;
return 2;
}
}
if (wc >= 0xac00 && wc < 0xd7a4) {
if (wc < 0xc8a5)
return uhc_1_wctomb(conv,r,wc,n);
else
return uhc_2_wctomb(conv,r,wc,n);
}
if (wc >= 0xe000 && wc < 0xe0bc) {
if (n < 2)
return RET_TOOSMALL;
if (wc < 0xe05e) {
r[0] = 0xc9;
r[1] = wc - 0xe000 + 0xa1;
} else {
r[0] = 0xfe;
r[1] = wc - 0xe05e + 0xa1;
}
return 2;
}
return RET_ILUNI;
}
|