-static inline int utf8enc_wchar(char *outb, wchar_t c)
-{
- if (c <= 0x7F) {
- *outb = c;
- return 1;
- }
- else if (c <= 0x7FF) {
- *outb++ = ((c >> 6) & 0x1F) | 0xC0;
- *outb++ = ( c & 0x3F) | 0x80;
- return 2;
- }
- else if (c <= 0xFFFF) {
- *outb++ = ((c >> 12) & 0x0F) | 0xE0;
- *outb++ = ((c >> 6) & 0x3F) | 0x80;
- *outb++ = ( c & 0x3F) | 0x80;
- return 3;
- }
- else if (c <= 0x10FFFF) {
- *outb++ = ((c >> 18) & 0x07) | 0xF0;
- *outb++ = ((c >> 12) & 0x3F) | 0x80;
- *outb++ = ((c >> 6) & 0x3F) | 0x80;
- *outb++ = ( c & 0x3F) | 0x80;
- return 4;
- }
- else {
- *outb++ = '?';
- return 1;
- }
-}
-
-static inline int utf8seq_is_overlong(char *s, int n)
-{
- switch (n)
- {
- case 2:
- /* 1100000x (10xxxxxx) */
- return (((*s >> 1) == 0x60) &&
- ((*(s+1) >> 6) == 0x02));
-
- case 3:
- /* 11100000 100xxxxx (10xxxxxx) */
- return ((*s == 0xE0) &&
- ((*(s+1) >> 5) == 0x04) &&
- ((*(s+2) >> 6) == 0x02));
-
- case 4:
- /* 11110000 1000xxxx (10xxxxxx 10xxxxxx) */
- return ((*s == 0xF0) &&
- ((*(s+1) >> 4) == 0x08) &&
- ((*(s+2) >> 6) == 0x02) &&
- ((*(s+3) >> 6) == 0x02));
- }
-
- return 0;
-}
-
-static inline int utf8seq_is_surrogate(char *s, int n)
-{
- return ((n == 3) && (*s == 0xED) && (*(s+1) >= 0xA0) && (*(s+1) <= 0xBF));
-}
-
-static inline int utf8seq_is_illegal(char *s, int n)
-{
- return ((n == 3) && (*s == 0xEF) && (*(s+1) == 0xBF) &&
- (*(s+2) >= 0xBE) && (*(s+2) <= 0xBF));
-}
-
-static inline int utf8dec_wchar(wchar_t *c, unsigned char *in, size_t inb)
-{
- int i;
- int n = -1;
-
- /* trivial char */
- if (*in <= 0x7F) {
- *c = *in;
- return 1;
- }
-
- /* find utf8 sequence length */
- if ((*in & 0xE0) == 0xC0) n = 2;
- else if ((*in & 0xF0) == 0xE0) n = 3;
- else if ((*in & 0xF8) == 0xF0) n = 4;
- else if ((*in & 0xFC) == 0xF8) n = 5;
- else if ((*in & 0xFE) == 0xFC) n = 6;
-
- /* starved? */
- if (n > inb)
- return -2;
-
- /* decode ... */
- if (n > 1 && n < 5) {
- /* reject invalid sequences */
- if (utf8seq_is_overlong(in, n) ||
- utf8seq_is_surrogate(in, n) ||
- utf8seq_is_illegal(in, n))
- return -1;
-
- /* decode ... */
- *c = (char)(*in++ & (0x7F >> n));
-
- for (i = 1; i < n; i++) {
- /* illegal continuation byte */
- if (*in < 0x80 || *in > 0xBF)
- return -1;
-
- *c = (*c << 6) | (*in++ & 0x3F);
- }
-
- return n;
- }
-
- /* unmapped sequence (> 4) */
- return -1;
-}
-
-static inline char latin9_translit(wchar_t c)
-{
- /* a number of trivial iso-8859-15 <> utf-8 transliterations */
- switch (c) {
- case 0x20AC: return 0xA4; /* Euro */
- case 0x0160: return 0xA6; /* S caron */
- case 0x0161: return 0xA8; /* s caron */
- case 0x017D: return 0xB4; /* Z caron */
- case 0x017E: return 0xB8; /* z caron */
- case 0x0152: return 0xBC; /* OE */
- case 0x0153: return 0xBD; /* oe */
- case 0x0178: return 0xBE; /* Y diaeresis */
- default: return '?';
- }
-}
-