diff options
Diffstat (limited to 'REORG.TODO/iconvdata/tscii.c')
| -rw-r--r-- | REORG.TODO/iconvdata/tscii.c | 852 |
1 files changed, 852 insertions, 0 deletions
diff --git a/REORG.TODO/iconvdata/tscii.c b/REORG.TODO/iconvdata/tscii.c new file mode 100644 index 0000000000..551baa9916 --- /dev/null +++ b/REORG.TODO/iconvdata/tscii.c @@ -0,0 +1,852 @@ +/* Conversion from and to TSCII. + Copyright (C) 2002-2017 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> |