static size_t mac_japanese_char_pull(ucs2_t* out, const uint8_t* in, size_t* size)
{
uint16_t c = in[0];
if (c <= 0x7f) {
*size = 1;
*out = (c == 0x5c ? 0xa5 : c);
return 1;
} else if ((c >= 0x81 && c <= 0x9f) || (c >= 0xe0 && c <= 0xfc)) {
if (*size >= 2) {
uint8_t c2 = in[1];
if ((c2 >= 0x40 && c2 <= 0x7e) || (c2 >= 0x80 && c2 <= 0xfc)) {
*size = 2;
if (c >= 0xf0) { /* user defined */
*out = 0xe000 + (c - 0xf0) * 188 + c2 - (c2 < 0x80 ? 0x40 : 0x41);
return 1;
}
c = (c << 8) + c2;
} else {
errno = EILSEQ;
return (size_t)-1;
}
} else {
errno = EINVAL;
return (size_t)-1;
}
} else {
*size = 1;
}
return cjk_char_pull(cjk_lookup(c, mac_japanese_2uni_index,
mac_japanese_2uni_charset),
out, mac_japanese_compose);
}
static size_t mac_chinese_simp_char_pull(ucs2_t* out, const u_int8_t* in, size_t* size)
{
u_int16_t c = in[0];
if (c <= 0x7f) {
*size = 1;
*out = c;
return 1;
} else if (c >= 0xa1 && c <= 0xfc) {
if (*size >= 2) {
u_int8_t c2 = in[1];
if (c2 >= 0xa1 && c2 <= 0xfe) {
*size = 2;
c = (c << 8) + c2;
} else {
errno = EILSEQ;
return (size_t)-1;
}
} else {
errno = EINVAL;
return (size_t)-1;
}
} else {
*size = 1;
}
return cjk_char_pull(cjk_lookup(c, mac_chinese_simp_2uni_index,
mac_chinese_simp_2uni_charset),
out, mac_chinese_simp_compose);
}
static size_t mac_japanese_char_push(uint8_t* out, const ucs2_t* in, size_t* size)
{
ucs2_t wc = in[0];
if (wc <= 0x7f) {
*size = 1;
out[0] = (uint8_t)(wc == 0x5c ? 0x80 : wc);
return 1;
} else if ((wc & 0xf000) == 0xe000) { /* user defined */
*size = 1;
if (wc > 0xe98b) return 0;
wc -= 0xe000;
out[0] = (uint8_t)(wc / 188 + 0xf0);
out[1] = (uint8_t)(wc % 188 + 0x40);
if (out[1] >= 0x7f) ++out[1];
return 2;
} else if ((wc & ~7) == 0xf860) {
wc = cjk_compose_seq(in, size, mac_japanese_compose,
sizeof(mac_japanese_compose) / sizeof(uint32_t));
if (!wc) return (size_t)-1;
} else if (*size >= 2 && ((in[1] & ~15) == 0xf870 || in[1] == 0x20dd)) {
ucs2_t comp = cjk_compose(wc, in[1], mac_japanese_compose,
sizeof(mac_japanese_compose) / sizeof(uint32_t));
if (comp) {
wc = comp;
*size = 2;
} else {
*size = 1;
}
} else {
*size = 1;
}
return cjk_char_push(cjk_lookup(wc, mac_japanese_uni2_index,
mac_japanese_uni2_charset), out);
}
static size_t mac_chinese_simp_char_push(u_int8_t* out, const ucs2_t* in, size_t* size)
{
ucs2_t wc = in[0];
if (wc <= 0x7f) {
*size = 1;
out[0] = (u_int8_t)wc;
return 1;
} else if ((wc & 0xf000) == 0xe000) {
*size = 1;
return 0;
} else if (*size >= 2 && (in[1] & ~15) == 0xf870) {
ucs2_t comp = cjk_compose(wc, in[1], mac_chinese_simp_compose,
sizeof(mac_chinese_simp_compose) / sizeof(u_int32_t));
if (comp) {
wc = comp;
*size = 2;
} else {
*size = 1;
}
} else {
*size = 1;
}
return cjk_char_push(cjk_lookup(wc, mac_chinese_simp_uni2_index,
mac_chinese_simp_uni2_charset), out);
}