/* Conversion from and to TSCII. Copyright (C) 2002-2015 Free Software Foundation, Inc. This file is part of the GNU C Library. Contributed by Bruno Haible <bruno@clisp.org>, 2002. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library; if not, see <http://www.gnu.org/licenses/>. */ #include <dlfcn.h> #include <stdint.h> #include <gconv.h> #include <assert.h> /* TSCII is an 8-bit encoding consisting of: 0x00..0x7F: ASCII 0x80..0x90, 0x95..0x9F, 0xAB..0xFE: Tamil letters and glyphs 0xA1..0xA5, 0xAA: Tamil combining letters (after the base character) 0xA6..0xA8: Tamil combining letters (before the base character) 0x91..0x94: Punctuation 0xA9: Symbols */ /* Definitions used in the body of the `gconv' function. */ #define CHARSET_NAME "TSCII//" #define FROM_LOOP from_tscii #define TO_LOOP to_tscii #define DEFINE_INIT 1 #define DEFINE_FINI 1 #define ONE_DIRECTION 0 #define FROM_LOOP_MIN_NEEDED_FROM 1 #define FROM_LOOP_MAX_NEEDED_FROM 2 #define FROM_LOOP_MIN_NEEDED_TO 4 #define FROM_LOOP_MAX_NEEDED_TO 16 #define TO_LOOP_MIN_NEEDED_FROM 4 #define TO_LOOP_MAX_NEEDED_FROM 4 #define TO_LOOP_MIN_NEEDED_TO 1 #define TO_LOOP_MAX_NEEDED_TO 3 #define PREPARE_LOOP \ int saved_state; \ int *statep = &data->__statep->__count; #define EXTRA_LOOP_ARGS , statep /* Since we might have to reset input pointer we must be able to save and restore the state. */ #define SAVE_RESET_STATE(Save) \ if (Save) \ saved_state = *statep; \ else \ *statep = saved_state /* During TSCII to UCS-4 conversion, the COUNT element of the state contains the last UCS-4 character to be output, shifted by 8 bits, and an encoded representation of additional UCS-4 characters to be output (if any), shifted by 4 bits. This character can be: 0x0000 Nothing pending. 0x0BCD Pending VIRAMA sign. If bit 3 is set, it may be omitted if followed by a vowel sign U or UU. 0x0BC6, 0x0BC7, 0x0BC8 Pending vowel sign. Bit 3 is set after the consonant was seen. Other Bit 3 always cleared. */ /* During UCS-4 to TSCII conversion, the COUNT element of the state contains the last byte (or sometimes the last two bytes) to be output, shifted by 3 bits. This can be: 0x00 Nothing pending. 0xB8..0xC9, 0x83..0x86 A consonant. 0xEC, 0x8A A consonant with VIRAMA sign (final or joining). 0x87, 0xC38A Two consonants combined through a VIRAMA sign. */ /* Since this is a stateful encoding we have to provide code which resets the output state to the initial state. This has to be done during the flushing. */ #define EMIT_SHIFT_TO_INIT \ if (data->__statep->__count != 0) \ { \ if (FROM_DIRECTION) \ { \ do \ { \ if (__glibc_unlikely (outbuf + 4 > outend)) \ { \ /* We don't have enough room in the output buffer. */ \ status = __GCONV_FULL_OUTPUT; \ break; \ } \ /* Write out the pending character. */ \ *((uint32_t *) outbuf) = data->__statep->__count >> 8; \ outbuf += sizeof (uint32_t); \ /* Retrieve the successor state. */ \ data->__statep->__count = \ tscii_next_state[(data->__statep->__count >> 4) & 0x0f]; \ } \ while (data->__statep->__count != 0); \ } \ else \ { \ uint32_t last = data->__statep->__count >> 3; \ if (__glibc_unlikely (last >> 8)) \ { \ /* Write out the last character, two bytes. */ \ if (__glibc_likely (outbuf + 2 <= outend)) \ { \ *outbuf++ = last & 0xff; \ *outbuf++ = (last >> 8) & 0xff; \ data->__statep->__count = 0; \ } \ else \ /* We don't have enough room in the output buffer. */ \ status = __GCONV_FULL_OUTPUT; \ } \ else \ { \ /* Write out the last character, a single byte. */ \ if (__glibc_likely (outbuf < outend)) \ { \ *outbuf++ = last & 0xff; \ data->__statep->__count = 0; \ } \ else \ /* We don't have enough room in the output buffer. */ \ status = __GCONV_FULL_OUTPUT; \ } \ } \ } /* First define the conversion function from TSCII to UCS-4. */ static const uint16_t tscii_to_ucs4[128][2] = { { 0x0BE6, 0 }, { 0x0BE7, 0 }, { 0, 0 }, /* 0x82 - maps to <U0BB8><U0BCD><U0BB0><U0BC0> */ { 0x0B9C, 0 }, { 0x0BB7, 0 }, { 0x0BB8, 0 }, { 0x0BB9, 0 }, { 0, 0 }, /* 0x87 - maps to <U0B95><U0BCD><U0BB7> */ { 0x0B9C, 0x0BCD }, { 0x0BB7, 0x0BCD }, { 0, 0 }, /* 0x8a - maps to <U0BB8> and buffers <U0BCD> */ { 0, 0 }, /* 0x8b - maps to <U0BB9> and buffers <U0BCD> */ { 0, 0 }, /* 0x8c - maps to <U0B95><U0BCD><U0BB7><U0BCD> */ { 0x0BE8, 0 }, { 0x0BE9, 0 }, { 0x0BEA, 0 }, { 0x0BEB, 0 }, { 0x2018, 0 }, { 0x2019, 0 }, { 0x201C, 0 }, { 0x201D, 0 }, { 0x0BEC, 0 }, { 0x0BED, 0 }, { 0x0BEE, 0 }, { 0x0BEF, 0 }, { 0x0B99, 0x0BC1 }, { 0x0B9E, 0x0BC1 }, { 0x0B99, 0x0BC2 }, { 0x0B9E, 0x0BC2 }, { 0x0BF0, 0 }, { 0x0BF1, 0 }, { 0x0BF2, 0 }, { 0, 0 }, /* 0xa0 - unmapped */ { 0x0BBE, 0 }, { 0x0BBF, 0 }, { 0x0BC0, 0 }, { 0x0BC1, 0 }, { 0x0BC2, 0 }, { 0, 0 }, /* 0xa6 - buffers <U0BC6> */ { 0, 0 }, /* 0xa7 - buffers <U0BC7> */ { 0, 0 }, /* 0xa8 - buffers <U0BC8> */ { 0x00A9, 0 }, { 0x0BD7, 0 }, { 0x0B85, 0 }, { 0x0B86, 0 }, { 0x0B87, 0 }, { 0x0B88, 0 }, { 0x0B89, 0 }, { 0x0B8A, 0 }, { 0x0B8E, 0 }, { 0x0B8F, 0 }, { 0x0B90, 0 }, { 0x0B92, 0 }, { 0x0B93, 0 }, { 0x0B94, 0 }, { 0x0B83, 0 }, { 0x0B95, 0 }, { 0x0B99, 0 }, { 0x0B9A, 0 }, { 0x0B9E, 0 }, { 0x0B9F, 0 }, { 0x0BA3, 0 }, { 0x0BA4, 0 }, { 0x0BA8, 0 }, { 0x0BAA, 0 }, { 0x0BAE, 0 }, { 0x0BAF, 0 }, { 0x0BB0, 0 }, { 0x0BB2, 0 }, { 0x0BB5, 0 }, { 0x0BB4, 0 }, { 0x0BB3, 0 }, { 0x0BB1, 0 }, { 0x0BA9, 0 }, { 0x0B9F, 0x0BBF }, { 0x0B9F, 0x0BC0 }, { 0x0B95, 0x0BC1 }, { 0x0B9A, 0x0BC1 }, { 0x0B9F, 0x0BC1 }, { 0x0BA3, 0x0BC1 }, { 0x0BA4, 0x0BC1 }, { 0x0BA8, 0x0BC1 }, { 0x0BAA, 0x0BC1 }, { 0x0BAE, 0x0BC1 }, { 0x0BAF, 0x0BC1 }, { 0x0BB0, 0x0BC1 }, { 0x0BB2, 0x0BC1 }, { 0x0BB5, 0x0BC1 }, { 0x0BB4, 0x0BC1 }, { 0x0BB3, 0x0BC1 }, { 0x0BB1, 0x0BC1 }, { 0x0BA9, 0x0BC1 }, { 0x0B95, 0x0BC2 }, { 0x0B9A, 0x0BC2 }, { 0x0B9F, 0x0BC2 }, { 0x0BA3, 0x0BC2 }, { 0x0BA4, 0x0BC2 }, { 0x0BA8, 0x0BC2 }, { 0x0BAA, 0x0BC2 }, { 0x0BAE, 0x0BC2 }, { 0x0BAF, 0x0BC2 }, { 0x0BB0, 0x0BC2 }, { 0x0BB2, 0x0BC2 }, { 0x0BB5, 0x0BC2 }, { 0x0BB4, 0x0BC2 }, { 0x0BB3, 0x0BC2 }, { 0x0BB1, 0x0BC2 }, { 0x0BA9, 0x0BC2 }, { 0x0B95, 0x0BCD }, { 0x0B99, 0x0BCD }, { 0x0B9A, 0x0BCD }, { 0x0B9E, 0x0BCD }, { 0x0B9F, 0x0BCD }, { 0x0BA3, 0x0BCD }, { 0x0BA4, 0x0BCD }, { 0x0BA8, 0x0BCD }, { 0x0BAA, 0x0BCD }, { 0x0BAE, 0x0BCD }, { 0x0BAF, 0x0BCD }, { 0x0BB0, 0x0BCD }, { 0x0BB2, 0x0BCD }, { 0x0BB5, 0x0BCD }, { 0x0BB4, 0x0BCD }, { 0x0BB3, 0x0BCD }, { 0x0BB1, 0x0BCD }, { 0x0BA9, 0x0BCD }, { 0x0B87, 0 }, { 0, 0 } /* 0xff - unmapped */ }; static const uint32_t tscii_next_state[6] = { /* 0 means no more pending Unicode characters. */ 0, /* 1 means <U0BB7>. */ (0x0BB7 << 8), /* 2 means <U0BC0>. */ (0x0BC0 << 8), /* 3 means <U0BCD>. */ (0x0BCD << 8), /* 4 means <U0BB0><U0BC0>. */ (0x0BB0 << 8) + (2 << 4), /* 5 means <U0BB7><U0BCD>. */ (0x0BB7 << 8) + (3 << 4) }; #define MIN_NEEDED_INPUT FROM_LOOP_MIN_NEEDED_FROM #define MAX_NEEDED_INPUT FROM_LOOP_MAX_NEEDED_FROM #define MIN_NEEDED_OUTPUT FROM_LOOP_MIN_NEEDED_TO #define MAX_NEEDED_OUTPUT FROM_LOOP_MAX_NEEDED_TO #define LOOPFCT FROM_LOOP #define BODY \ { \ uint32_t ch = *inptr; \ \ if ((*statep >> 8) != 0) \ { \ /* Attempt to combine the last character with this one. */ \ uint32_t last = *statep >> 8; \ \ if (last == 0x0BCD && (*statep & (1 << 3))) \ { \ if (ch == 0xa4 || ch == 0xa5) \ { \ ch += 0xb1d; \ /* Now ch = 0x0BC1 or ch = 0x0BC2. */ \ put32 (outptr, ch); \ outptr += 4; \ *statep = 0; \ inptr++; \ continue; \ } \ } \ else if (last >= 0x0BC6 && last <= 0x0BC8) \ { \ if ((last == 0x0BC6 && ch == 0xa1) \ || (last == 0x0BC7 && (ch == 0xa1 || ch == 0xaa))) \ { \ ch = last + 4 + (ch != 0xa1); \ /* Now ch = 0x0BCA or ch = 0x0BCB or ch = 0x0BCC. */ \ put32 (outptr, ch); \ outptr += 4; \ *statep = 0; \ inptr++; \ continue; \ } \ if ((ch >= 0xb8 && ch <= 0xc9) && (*statep & (1 << 3)) == 0) \ { \ ch = tscii_to_ucs4[ch - 0x80][0]; \ put32 (outptr, ch); \ outptr += 4; \ *statep |= 1 << 3; \ inptr++; \ continue; \ } \ } \ \ do \ { \ /* Output the buffered character. */ \ put32 (outptr, last); \ outptr += 4; \ /* Retrieve the successor state. */ \ *statep = tscii_next_state[(*statep >> 4) & 0x0f]; \ } \ while (*statep != 0 && __builtin_expect (outptr + 4 <= outend, 1)); \ \ if (*statep != 0) \ { \ /* We don't have enough room in the output buffer. \ Tell the caller why we terminate the loop. */ \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ \ continue; \ } \ \ if (ch < 0x80) \ { \ /* Plain ASCII character. */ \ put32 (outptr, ch); \ outptr += 4; \ } \ else \ { \ /* Tamil character. */ \ uint32_t u1 = tscii_to_ucs4[ch - 0x80][0]; \ \ if (u1 != 0) \ { \ uint32_t u2 = tscii_to_ucs4[ch - 0x80][1]; \ \ inptr++; \ \ put32 (outptr, u1); \ outptr += 4; \ \ if (u2 != 0) \ { \ /* See whether we have room for two characters. Otherwise \ store only the first character now, and put the second \ one into the queue. */ \ if (__glibc_unlikely (outptr + 4 > outend)) \ { \ *statep = u2 << 8; \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ put32 (outptr, u2); \ outptr += 4; \ } \ continue; \ } \ /* Special handling of a few Tamil characters. */ \ else if (ch == 0xa6 || ch == 0xa7 || ch == 0xa8) \ { \ ch += 0x0b20; \ /* Now ch = 0x0BC6 or ch = 0x0BC7 or ch = 0x0BC8. */ \ *statep = ch << 8; \ inptr++; \ continue; \ } \ else if (ch == 0x8a || ch == 0x8b) \ { \ ch += 0x0b2e; \ /* Now ch = 0x0BB8 or ch = 0x0BB9. */ \ put32 (outptr, ch); \ outptr += 4; \ *statep = (0x0BCD << 8) + (1 << 3); \ inptr++; \ continue; \ } \ else if (ch == 0x82) \ { \ /* Output <U0BB8><U0BCD><U0BB0><U0BC0>, if we have room for \ four characters. */ \ inptr++; \ put32 (outptr, 0x0BB8); \ outptr += 4; \ if (__glibc_unlikely (outptr + 4 > outend)) \ { \ *statep = (0x0BCD << 8) + (4 << 4); \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ put32 (outptr, 0x0BCD); \ outptr += 4; \ if (__glibc_unlikely (outptr + 4 > outend)) \ { \ *statep = (0x0BB0 << 8) + (2 << 4); \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ put32 (outptr, 0x0BB0); \ outptr += 4; \ if (__glibc_unlikely (outptr + 4 > outend)) \ { \ *statep = (0x0BC0 << 8); \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ put32 (outptr, 0x0BC0); \ outptr += 4; \ continue; \ } \ else if (ch == 0x87) \ { \ /* Output <U0B95><U0BCD><U0BB7>, if we have room for \ three characters. */ \ inptr++; \ put32 (outptr, 0x0B95); \ outptr += 4; \ if (__glibc_unlikely (outptr + 4 > outend)) \ { \ *statep = (0x0BCD << 8) + (1 << 4); \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ put32 (outptr, 0x0BCD); \ outptr += 4; \ if (__glibc_unlikely (outptr + 4 > outend)) \ { \ *statep = (0x0BB7 << 8); \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ put32 (outptr, 0x0BB7); \ outptr += 4; \ continue; \ } \ else if (ch == 0x8c) \ { \ /* Output <U0B95><U0BCD><U0BB7><U0BCD>, if we have room for \ four characters. */ \ inptr++; \ put32 (outptr, 0x0B95); \ outptr += 4; \ if (__glibc_unlikely (outptr + 4 > outend)) \ { \ *statep = (0x0BCD << 8) + (5 << 4); \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ put32 (outptr, 0x0BCD); \ outptr += 4; \ if (__glibc_unlikely (outptr + 4 > outend)) \ { \ *statep = (0x0BB7 << 8) + (3 << 4); \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ put32 (outptr, 0x0BB7); \ outptr += 4; \ if (__glibc_unlikely (outptr + 4 > outend)) \ { \ *statep = (0x0BCD << 8); \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ put32 (outptr, 0x0BCD); \ outptr += 4; \ continue; \ } \ else \ { \ /* This is illegal. */ \ STANDARD_FROM_LOOP_ERR_HANDLER (1); \ } \ } \ \ /* Now that we wrote the output increment the input pointer. */ \ inptr++; \ } #define LOOP_NEED_FLAGS #define EXTRA_LOOP_DECLS , int *statep #include <iconv/loop.c> /* Next, define the other direction, from UCS-4 to TSCII. */ static const uint8_t ucs4_to_tscii[128] = { 0, 0, 0, 0xb7, 0, 0xab, 0xac, 0xfe, /* 0x0B80..0x0B87 */ 0xae, 0xaf, 0xb0, 0, 0, 0, 0xb1, 0xb2, /* 0x0B88..0x0B8F */ 0xb3, 0, 0xb4, 0xb5, 0xb6, 0xb8, 0, 0, /* 0x0B90..0x0B97 */ 0, 0xb9, 0xba, 0, 0x83, 0, 0xbb, 0xbc, /* 0x0B98..0x0B9F */ 0, 0, 0, 0xbd, 0xbe, 0, 0, 0, /* 0x0BA0..0x0BA7 */ 0xbf, 0xc9, 0xc0, 0, 0, 0, 0xc1, 0xc2, /* 0x0BA8..0x0BAF */ 0xc3, 0xc8, 0xc4, 0xc7, 0xc6, 0xc5, 0, 0x84, /* 0x0BB0..0x0BB7 */ 0x85, 0x86, 0, 0, 0, 0, 0xa1, 0xa2, /* 0x0BB8..0x0BBF */ 0xa3, 0xa4, 0xa5, 0, 0, 0, 0xa6, 0xa7, /* 0x0BC0..0x0BC7 */ 0xa8, 0, 0, 0, 0, 0, 0, 0, /* 0x0BC8..0x0BCF */ 0, 0, 0, 0, 0, 0, 0, 0xaa, /* 0x0BD0..0x0BD7 */ 0, 0, 0, 0, 0, 0, 0, 0, /* 0x0BD8..0x0BDF */ 0, 0, 0, 0, 0, 0, 0x80, 0x81, /* 0x0BE0..0x0BE7 */ 0x8d, 0x8e, 0x8f, 0x90, 0x95, 0x96, 0x97, 0x98, /* 0x0BE8..0x0BEF */ 0x9d, 0x9e, 0x9f, 0, 0, 0, 0, 0, /* 0x0BF0..0x0BF7 */ 0, 0, 0, 0, 0, 0, 0, 0 /* 0x0BF8..0x0BFF */ }; static const uint8_t consonant_with_u[18] = { 0xcc, 0x99, 0xcd, 0x9a, 0xce, 0xcf, 0xd0, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0xd7, 0xd8, 0xd9, 0xda, 0xdb }; static const uint8_t consonant_with_uu[18] = { 0xdc, 0x9b, 0xdd, 0x9c, 0xde, 0xdf, 0xe0, 0xe1, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9, 0xea, 0xeb }; static const uint8_t consonant_with_virama[18] = { 0xec, 0xed, 0xee, 0xef, 0xf0, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 0xf8, 0xf9, 0xfa, 0xfb, 0xfc, 0xfd }; #define MIN_NEEDED_INPUT TO_LOOP_MIN_NEEDED_FROM #define MAX_NEEDED_INPUT TO_LOOP_MAX_NEEDED_FROM #define MIN_NEEDED_OUTPUT TO_LOOP_MIN_NEEDED_TO #define MAX_NEEDED_OUTPUT TO_LOOP_MAX_NEEDED_TO #define LOOPFCT TO_LOOP #define BODY \ { \ uint32_t ch = get32 (inptr); \ \ if ((*statep >> 3) != 0) \ { \ /* Attempt to combine the last character with this one. */ \ uint32_t last = *statep >> 3; \ \ if (last >= 0xb8 && last <= 0xc9) \ { \ if (ch == 0x0BC1) \ { \ *outptr++ = consonant_with_u[last - 0xb8]; \ *statep = 0; \ inptr += 4; \ continue; \ } \ if (ch == 0x0BC2) \ { \ *outptr++ = consonant_with_uu[last - 0xb8]; \ *statep = 0; \ inptr += 4; \ continue; \ } \ if (ch == 0x0BC6) \ { \ if (__glibc_likely (outptr + 2 <= outend)) \ { \ *outptr++ = 0xa6; \ *outptr++ = last; \ *statep = 0; \ inptr += 4; \ continue; \ } \ else \ { \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ } \ if (ch == 0x0BC7) \ { \ if (__glibc_likely (outptr + 2 <= outend)) \ { \ *outptr++ = 0xa7; \ *outptr++ = last; \ *statep = 0; \ inptr += 4; \ continue; \ } \ else \ { \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ } \ if (ch == 0x0BC8) \ { \ if (__glibc_likely (outptr + 2 <= outend)) \ { \ *outptr++ = 0xa8; \ *outptr++ = last; \ *statep = 0; \ inptr += 4; \ continue; \ } \ else \ { \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ } \ if (ch == 0x0BCA) \ { \ if (__glibc_likely (outptr + 3 <= outend)) \ { \ *outptr++ = 0xa6; \ *outptr++ = last; \ *outptr++ = 0xa1; \ *statep = 0; \ inptr += 4; \ continue; \ } \ else \ { \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ } \ if (ch == 0x0BCB) \ { \ if (__glibc_likely (outptr + 3 <= outend)) \ { \ *outptr++ = 0xa7; \ *outptr++ = last; \ *outptr++ = 0xa1; \ *statep = 0; \ inptr += 4; \ continue; \ } \ else \ { \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ } \ if (ch == 0x0BCC) \ { \ if (__glibc_likely (outptr + 3 <= outend)) \ { \ *outptr++ = 0xa7; \ *outptr++ = last; \ *outptr++ = 0xaa; \ *statep = 0; \ inptr += 4; \ continue; \ } \ else \ { \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ } \ if (ch == 0x0BCD) \ { \ if (last != 0xb8) \ { \ *outptr++ = consonant_with_virama[last - 0xb8]; \ *statep = 0; \ } \ else \ *statep = 0xec << 3; \ inptr += 4; \ continue; \ } \ if (last == 0xbc && (ch == 0x0BBF || ch == 0x0BC0)) \ { \ *outptr++ = ch - 0x0af5; \ *statep = 0; \ inptr += 4; \ continue; \ } \ } \ else if (last >= 0x83 && last <= 0x86) \ { \ if (last >= 0x85 && (ch == 0x0BC1 || ch == 0x0BC2)) \ { \ *outptr++ = last + 5; \ *statep = 0; \ continue; \ } \ if (ch == 0x0BCD) \ { \ if (last != 0x85) \ { \ *outptr++ = last + 5; \ *statep = 0; \ } \ else \ *statep = 0x8a << 3; \ inptr += 4; \ continue; \ } \ } \ else if (last == 0xec) \ { \ if (ch == 0x0BB7) \ { \ *statep = 0x87 << 3; \ inptr += 4; \ continue; \ } \ } \ else if (last == 0x8a) \ { \ if (ch == 0x0BB0) \ { \ *statep = 0xc38a << 3; \ inptr += 4; \ continue; \ } \ } \ else if (last == 0x87) \ { \ if (ch == 0x0BCD) \ { \ *outptr++ = 0x8c; \ *statep = 0; \ inptr += 4; \ continue; \ } \ } \ else \ { \ assert (last == 0xc38a); \ if (ch == 0x0BC0) \ { \ *outptr++ = 0x82; \ *statep = 0; \ inptr += 4; \ continue; \ } \ } \ \ /* Output the buffered character. */ \ if (__glibc_unlikely (last >> 8)) \ { \ if (__glibc_likely (outptr + 2 <= outend)) \ { \ *outptr++ = last & 0xff; \ *outptr++ = (last >> 8) & 0xff; \ } \ else \ { \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ } \ else \ *outptr++ = last & 0xff; \ *statep = 0; \ continue; \ } \ \ if (ch < 0x80) \ /* Plain ASCII character. */ \ *outptr++ = ch; \ else if (ch >= 0x0B80 && ch <= 0x0BFF) \ { \ /* Tamil character. */ \ uint8_t t = ucs4_to_tscii[ch - 0x0B80]; \ \ if (t != 0) \ { \ if ((t >= 0xb8 && t <= 0xc9) || (t >= 0x83 && t <= 0x86)) \ *statep = (uint32_t) t << 3; \ else \ *outptr++ = t; \ } \ else if (ch >= 0x0BCA && ch <= 0x0BCC) \ { \ /* See whether we have room for two bytes. */ \ if (__glibc_likely (outptr + 2 <= outend)) \ { \ *outptr++ = (ch == 0x0BCA ? 0xa6 : 0xa7); \ *outptr++ = (ch != 0x0BCC ? 0xa1 : 0xaa); \ } \ else \ { \ result = __GCONV_FULL_OUTPUT; \ break; \ } \ } \ else \ { \ /* Illegal character. */ \ STANDARD_TO_LOOP_ERR_HANDLER (4); \ } \ } \ else if (ch == 0x00A9) \ *outptr++ = ch; \ else if (ch == 0x2018 || ch == 0x2019) \ *outptr++ = ch - 0x1f87; \ else if (ch == 0x201C || ch == 0x201D) \ *outptr++ = ch - 0x1f89; \ else \ { \ UNICODE_TAG_HANDLER (ch, 4); \ \ /* Illegal character. */ \ STANDARD_TO_LOOP_ERR_HANDLER (4); \ } \ \ /* Now that we wrote the output increment the input pointer. */ \ inptr += 4; \ } #define LOOP_NEED_FLAGS #define EXTRA_LOOP_DECLS , int *statep #include <iconv/loop.c> /* Now define the toplevel functions. */ #include <iconv/skeleton.c>