9b26f5c47d
<<<<<<< ChangeLog 1998-04-23 22:43 Ulrich Drepper <drepper@cygnus.com> * elf/dl-load.c (fillin_rpath): Handle empty element returned by strsep as current directory. * iconv/gconv_builtin.h: Add aliases unicode and unicodebig for Java. Add definitions for unicodelittle implementation. * iconv/gconv_int.h: Add declaration for unicodelittle functions. * iconv/gconv_simple.c: Define unicodelittle functions. * iconv/iconv_prog.c: Make program print information about position of illegal character in input. * iconv/skeleton.c: Use __strcasecmp instead of __strcasestr for comparison of charset name. * iconvdata/big5.c (CHARSET_NAME): Adapt for this. * iconvdata/ebcdic-at-de-a.c: Likewise. * iconvdata/ebcdic-at-de.c: Likewise. * iconvdata/ebcdic-ca-fr.c: Likewise. * iconvdata/euccn.c: Likewise. * iconvdata/eucjp.c: Likewise. * iconvdata/euckr.c: Likewise. * iconvdata/euctw.c: Likewise. * iconvdata/hp-roman8.c: Likewise. * iconvdata/iso6937.c: Likewise. * iconvdata/iso8859-1.c: Likewise. * iconvdata/iso8859-10.c: Likewise. * iconvdata/iso8859-2.c: Likewise. * iconvdata/iso8859-3.c: Likewise. * iconvdata/iso8859-4.c: Likewise. * iconvdata/iso8859-5.c: Likewise. * iconvdata/iso8859-6.c: Likewise. * iconvdata/iso8859-7.c: Likewise. * iconvdata/iso8859-8.c: Likewise. * iconvdata/iso8859-9.c: Likewise. * iconvdata/johab.c: Likewise. * iconvdata/koi-8.c: Likewise. * iconvdata/koi8-r.c: Likewise. * iconvdata/latin-greek-1.c: Likewise. * iconvdata/latin-greek.c: Likewise. * iconvdata/sjis.c: Likewise. * iconvdata/t61.c: Likewise. * iconvdata/uhc.c: Likewise. * iconvdata/iso646.c: Add support for more ISO 646 variants. * iconvdata/TESTS: Add tests for ISO646 module. * iconvdata/gconv-modules: Add new modules. * iconvdata/testdate/CSA_Z243.4-1985-1: New tests for ISO646 module. * iconvdata/testdate/CSA_Z243.4-1985-1..UCS2: Likewise. * iconvdata/testdate/CSA_Z243.4-1985-2: Likewise. * iconvdata/testdate/CSA_Z243.4-1985-2..UCS4: Likewise. * iconvdata/testdate/DIN_66003: Likewise. * iconvdata/testdate/DIN_66003..UTF8: Likewise. * iconvdata/testdate/DS_2089: Likewise. * iconvdata/testdate/DS_2089..UTF8: Likewise. * iconvdata/testdate/ES: Likewise. * iconvdata/testdate/ES..UTF8: Likewise. * iconvdata/testdate/ES2: Likewise. * iconvdata/testdate/ES2..UTF8: Likewise. * iconvdata/testdate/GB_1988-80: Likewise. * iconvdata/testdate/GB_1988-80..UTF8: Likewise. * iconvdata/testdate/IT: Likewise. * iconvdata/testdate/IT..UTF8: Likewise. * iconvdata/testdate/JIS_C6220-1969-RO: Likewise. * iconvdata/testdate/JIS_C6220-1969-RO..UTF8: Likewise. * iconvdata/testdate/JIS_C6229-1984-B: Likewise. * iconvdata/testdate/JIS_C6229-1984-B..UTF8: Likewise. * iconvdata/testdate/JUS_I.B1.002: Likewise. * iconvdata/testdate/JUS_I.B1.002..UTF8: Likewise. * iconvdata/testdate/KSC5636: Likewise. * iconvdata/testdate/KSC5636..UTF8: Likewise. * iconvdata/testdate/MSZ_7795.3: Likewise. * iconvdata/testdate/MSZ_7795.3..UTF8: Likewise. * iconvdata/testdate/NC_NC00-10: Likewise. * iconvdata/testdate/NC_NC00-10..UTF8: Likewise. * iconvdata/testdate/NF_Z_62-010: Likewise. * iconvdata/testdate/NF_Z_62-010..UTF8: Likewise. * iconvdata/testdate/NF_Z_62-010_1973: Likewise. * iconvdata/testdate/NF_Z_62-010_1973..UTF8: Likewise. * iconvdata/testdate/NS_4551-1: Likewise. * iconvdata/testdate/NS_4551-1..UTF8: Likewise. * iconvdata/testdate/NS_4551-2: Likewise. * iconvdata/testdate/NS_4551-2..UTF8: Likewise. * iconvdata/testdate/PT: Likewise. * iconvdata/testdate/PT..UTF8: Likewise. * iconvdata/testdate/PT2: Likewise. * iconvdata/testdate/PT2..UTF8: Likewise. * iconvdata/testdate/SEN_850200_B: Likewise. * iconvdata/testdate/SEN_850200_B..UTF8: Likewise. * iconvdata/testdate/SEN_850200_C: Likewise. * iconvdata/testdate/SEN_850200_C..UTF8: Likewise. * iconvdata/cns11643.h: Use uint32_t instead of wchar_t. * iconvdata/cns11643l1.h: Likewise. * iconvdata/latin-greek-1.h: Likewise. * iconvdata/latin-greek.h: Likewise. * iconvdata/koi8-r.h: Likewise. * iconvdata/jis0212.h: Likewise. * iconvdata/gb2312.h: Likewise. * iconvdata/ksc5601.h: Likewise. * iconvdata/8bit-gap.c: Use 32 bit type for idx element of struct gap. * iconvdata/Makefile: Add rules for lots of more modules. * iconvdata/cp1250.c: New file. * iconvdata/cp1251.c: New file. * iconvdata/cp1252.c: New file. * iconvdata/cp1253.c: New file. * iconvdata/cp1254.c: New file. * iconvdata/cp1255.c: New file. * iconvdata/cp1256.c: New file. * iconvdata/cp1257.c: New file. * iconvdata/ebcdic-dk-no-a.c: New file. * iconvdata/ebcdic-dk-no.c: New file. * iconvdata/ebcdic-es-a.c: New file. * iconvdata/ebcdic-es-s.c: New file. * iconvdata/ebcdic-es.c: New file. * iconvdata/ebcdic-fi-se-a.c: New file. * iconvdata/ebcdic-fi-se.c: New file. * iconvdata/ebcdic-fr.c: New file. * iconvdata/ebcdic-is-friss.c: New file. * iconvdata/ebcdic-it.c: New file. * iconvdata/ebcdic-pt.c: New file. * iconvdata/ebcdic-uk.c: New file. * iconvdata/ebcdic-us.c: New file. * iconvdata/ibm037.c: New file. * iconvdata/ibm038.c: New file. * iconvdata/ibm1004.c: New file. * iconvdata/ibm1026.c: New file. * iconvdata/ibm1047.c: New file. * iconvdata/ibm256.c: New file. * iconvdata/ibm273.c: New file. * iconvdata/ibm274.c: New file. * iconvdata/ibm275.c: New file. * iconvdata/ibm277.c: New file. * iconvdata/ibm278.c: New file. * iconvdata/ibm280.c: New file. * iconvdata/ibm281.c: New file. * iconvdata/ibm284.c: New file. * iconvdata/ibm285.c: New file. * iconvdata/ibm290.c: New file. * iconvdata/ibm297.c: New file. * iconvdata/ibm420.c: New file. * iconvdata/ibm423.c: New file. * iconvdata/ibm424.c: New file. * iconvdata/ibm437.c: New file. * iconvdata/ibm500.c: New file. * iconvdata/ibm850.c: New file. * iconvdata/ibm851.c: New file. * iconvdata/ibm852.c: New file. * iconvdata/ibm855.c: New file. * iconvdata/ibm857.c: New file. * iconvdata/ibm860.c: New file. * iconvdata/ibm861.c: New file. * iconvdata/ibm862.c: New file. * iconvdata/ibm863.c: New file. * iconvdata/ibm864.c: New file. * iconvdata/ibm865.c: New file. * iconvdata/ibm868.c: New file. * iconvdata/ibm869.c: New file. * iconvdata/ibm870.c: New file. * iconvdata/ibm871.c: New file. * iconvdata/ibm875.c: New file. * iconvdata/ibm880.c: New file. * iconvdata/ibm891.c: New file. * iconvdata/ibm903.c: New file. * iconvdata/ibm904.c: New file. * iconvdata/ibm905.c: New file. * iconvdata/ibm918.c: New file. * locale/iso-4217.def: Update. * localedata/locales/pt_BR: Correct. Patches by Andreas Jaeger. * stdio-common/vfscanf.h: Recognize nan and inf in floating-point formats. 1998-04-22 Andreas Jaeger <aj@arthur.rhein-neckar.de> * elf/dl-load.c (_dl_init_paths): ';' is also a terminal for LD_LIBRARY_PATH. 1998-04-22 Gordon Matzigkeit <gord@profitpress.com> * Makerules: Change occurances of `cd dir; cmd' to `cd dir && cmd'. * Makefile: Likewise. * posix/Makefile: Likewise. * sysdeps/mach/hurd/Makefile: Likewise. 1998-04-22 Gordon Matzigkeit <gord@profitpress.com> * sysdeps/mach/hurd/bits/dirent.h: New file. * sysdeps/mach/hurd/readdir64.c: New file. * sysdeps/mach/hurd/readdir64_r.c: New file. 1998-04-21 Gordon Matzigkeit <gord@profitpress.com> * stdio/stdio.h (vasprintf, __asprintf, asprintf, vdprintf, dprintf): Synchronize declarations with libio/stdio.h. 1998-04-21 Gordon Matzigkeit <gord@profitpress.com> * elf/dlerror.c (dlerror): Don't assume that __libc_internal_tsd_get is defined. __libc_getspecific is already well-protected, so just use it directly. 1998-04-22 Gordon Matzigkeit <gord@profitpress.com> * io/ftw.h (ftw): Fix typo. 1998-04-21 Gordon Matzigkeit <gord@profitpress.com> * sysdeps/gnu/utmp_file.c: Fix typo. 1998-04-22 11:06 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * iconvdata/run-iconv-test.sh: Fix more portability bugs. When one part of a test fails move on to the next test. 1998-04-21 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * sysdeps/i386/bits/setjmp.h (_JMPBUF_UNWINDS): Compare addresses as pointers, not signed integers. 1998-04-22 11:06 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
875 lines
29 KiB
C
875 lines
29 KiB
C
/* Conversion to and from the various ISO 646 CCS.
|
|
Copyright (C) 1998 Free Software Foundation, Inc.
|
|
This file is part of the GNU C Library.
|
|
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1998.
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Library General Public License as
|
|
published by the Free Software Foundation; either version 2 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
|
|
Library General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Library General Public
|
|
License along with the GNU C Library; see the file COPYING.LIB. If not,
|
|
write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
/* The implementation of the conversion which can be performed by this
|
|
module are not very sophisticated and not tuned at all. There are
|
|
zillions of ISO 646 derivates and supporting them all in a separate
|
|
module is overkill since these coded character sets are hardly ever
|
|
used anymore (except ANSI_X3.4-1968 == ASCII, which is compatible
|
|
with ISO 8859-1). The European variants are superceded by the
|
|
various ISO 8859-? standards and the Asian variants are embedded in
|
|
larger character sets. Therefore this implementation is simply
|
|
here to make it possible to do the conversion if it is necessary.
|
|
The cost in the gconv-modules file is set to `2' and therefore
|
|
allows one to easily provide a tuned implementation in case this
|
|
proofs to be necessary. */
|
|
|
|
#include <gconv.h>
|
|
#include <stdint.h>
|
|
#include <string.h>
|
|
|
|
/* Definitions used in the body of the `gconv' function. */
|
|
#define FROM_LOOP from_ascii
|
|
#define TO_LOOP to_ascii
|
|
#define DEFINE_INIT 0
|
|
#define DEFINE_FINI 0
|
|
#define MIN_NEEDED_FROM 1
|
|
#define MIN_NEEDED_TO 4
|
|
#define FROM_DIRECTION dir == from_iso646
|
|
#define PREPARE_LOOP \
|
|
enum direction dir = ((struct iso646_data *) step->data)->dir; \
|
|
enum variant var = ((struct iso646_data *) step->data)->var;
|
|
#define EXTRA_LOOP_ARGS , var
|
|
|
|
|
|
/* Direction of the transformation. */
|
|
enum direction
|
|
{
|
|
illegal_dir,
|
|
to_iso646,
|
|
from_iso646
|
|
};
|
|
|
|
enum variant
|
|
{
|
|
illegal_var,
|
|
US, /* ANSI_X3.4-1968 */
|
|
GB, /* BS_4730 */
|
|
CA, /* CSA_Z243.4-1985-1 */
|
|
CA2, /* CSA_Z243.4-1985-2 */
|
|
DE, /* DIN_66003 */
|
|
DK, /* DS_2089 */
|
|
ES, /* ES */
|
|
ES2, /* ES2 */
|
|
CN, /* GB_1988-80 */
|
|
IT, /* IT */
|
|
JP, /* JIS_C6220-1969-RO */
|
|
JP_OCR_B, /* JIS_C6229-1984-B */
|
|
YU, /* JUS_I.B1.002 */
|
|
KR, /* KSC5636 */
|
|
HU, /* MSZ_7795.3 */
|
|
CU, /* NC_NC00-10 */
|
|
FR, /* NF_Z_62-010 */
|
|
FR1, /* NF_Z_62-010_(1973) */
|
|
NO, /* NS_4551-1 */
|
|
NO2, /* NS_4551-2 */
|
|
PT, /* PT */
|
|
PT2, /* PT2 */
|
|
SE, /* SEN_850200_B */
|
|
SE2 /* SEN_850200_C */
|
|
};
|
|
|
|
static const char *names[] =
|
|
{
|
|
[US] = "ANSI_X3.4-1968//",
|
|
[GB] = "BS_4730//",
|
|
[CA] = "CSA_Z243.4-1985-1//",
|
|
[CA2] = "CSA_Z243.4-1985-2//",
|
|
[DE] = "DIN_66003//",
|
|
[DK] = "DS_2089//",
|
|
[ES] = "ES//",
|
|
[ES2] = "ES2//",
|
|
[CN] = "GB_1988-80//",
|
|
[IT] = "IT//",
|
|
[JP] = "JIS_C6220-1969-RO//",
|
|
[JP_OCR_B] = "JIS_C6229-1984-B//",
|
|
[YU] = "JUS_I.B1.002//",
|
|
[KR] = "KSC5636//",
|
|
[HU] = "MSZ_7795.3//",
|
|
[CU] = "NC_NC00-10//",
|
|
[FR] = "NF_Z_62-010//",
|
|
[FR1] = "NF_Z_62-010_(1973)//",
|
|
[NO] = "NS_4551-1//",
|
|
[NO2] = "NS_4551-2//",
|
|
[PT] = "PT//",
|
|
[PT2] = "PT2//",
|
|
[SE] = "SEN_850200_B//",
|
|
[SE2] = "SEN_850200_C//"
|
|
};
|
|
|
|
struct iso646_data
|
|
{
|
|
enum direction dir;
|
|
enum variant var;
|
|
};
|
|
|
|
|
|
int
|
|
gconv_init (struct gconv_step *step)
|
|
{
|
|
/* Determine which direction. */
|
|
struct iso646_data *new_data;
|
|
enum direction dir = illegal_dir;
|
|
enum variant var;
|
|
int result;
|
|
|
|
for (var = sizeof (names) / sizeof (names[0]) - 1; var > illegal_var; --var)
|
|
if (__strcasecmp (step->from_name, names[var]) == 0)
|
|
{
|
|
dir = from_iso646;
|
|
break;
|
|
}
|
|
else if (__strcasecmp (step->to_name, names[var]) == 0)
|
|
{
|
|
dir = to_iso646;
|
|
break;
|
|
}
|
|
|
|
result = GCONV_NOCONV;
|
|
if (dir != illegal_dir
|
|
&& ((new_data
|
|
= (struct iso646_data *) malloc (sizeof (struct iso646_data)))
|
|
!= NULL))
|
|
{
|
|
new_data->dir = dir;
|
|
new_data->var = var;
|
|
step->data = new_data;
|
|
|
|
step->min_needed_from = MIN_NEEDED_FROM;
|
|
step->max_needed_from = MIN_NEEDED_FROM;
|
|
step->min_needed_to = MIN_NEEDED_TO;
|
|
step->max_needed_to = MIN_NEEDED_TO;
|
|
|
|
step->stateful = 0;
|
|
|
|
result = GCONV_OK;
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
|
|
void
|
|
gconv_end (struct gconv_step *data)
|
|
{
|
|
free (data->data);
|
|
}
|
|
|
|
|
|
/* First define the conversion function from ASCII to UCS4. */
|
|
#define MIN_NEEDED_INPUT MIN_NEEDED_FROM
|
|
#define MIN_NEEDED_OUTPUT MIN_NEEDED_TO
|
|
#define LOOPFCT FROM_LOOP
|
|
#define BODY \
|
|
{ \
|
|
uint32_t ch; \
|
|
int failure = GCONV_OK; \
|
|
\
|
|
ch = *inptr; \
|
|
switch (ch) \
|
|
{ \
|
|
case 0x23: \
|
|
if (var == GB || var == ES || var == IT || var == FR || var == FR1) \
|
|
ch = 0xa3; \
|
|
else if (var == NO2) \
|
|
ch = 0xa7; \
|
|
break; \
|
|
case 0x24: \
|
|
if (var == CN) \
|
|
ch = 0xa5; \
|
|
else if (var == HU || var == CU || var == SE || var == SE2) \
|
|
ch = 0xa4; \
|
|
break; \
|
|
case 0x40: \
|
|
if (var == CA || var == CA2 || var == FR || var == FR1) \
|
|
ch = 0xe0; \
|
|
else if (var == DE || var == ES || var == IT || var == PT) \
|
|
ch = 0xa7; \
|
|
else if (var == ES2) \
|
|
ch = 0x2022; \
|
|
else if (var == YU) \
|
|
ch = 0x17d; \
|
|
else if (var == HU) \
|
|
ch = 0xc1; \
|
|
else if (var == PT2) \
|
|
ch = 0xb4; \
|
|
else if (var == SE2) \
|
|
ch = 0xc9; \
|
|
break; \
|
|
case 0x5b: \
|
|
if (var == CA || var == CA2) \
|
|
ch = 0xe2; \
|
|
else if (var == DE || var == SE || var == SE2) \
|
|
ch = 0xc4; \
|
|
else if (var == DK || var == NO || var == NO2) \
|
|
ch = 0xc6; \
|
|
else if (var == ES || var == ES2 || var == CU) \
|
|
ch = 0xa1; \
|
|
else if (var == IT || var == FR || var == FR1) \
|
|
ch = 0xb0; \
|
|
else if (var == JP_OCR_B) \
|
|
ch = 0x2329; \
|
|
else if (var == YU) \
|
|
ch = 0x160; \
|
|
else if (var == HU) \
|
|
ch = 0xc9; \
|
|
else if (var == PT || var == PT2) \
|
|
ch = 0xc3; \
|
|
break; \
|
|
case 0x5c: \
|
|
if (var == CA || var == CA2 || var == IT || var == FR || var == FR1) \
|
|
ch = 0xe7; \
|
|
else if (var == DE || var == HU || var == SE || var == SE2) \
|
|
ch = 0xd6; \
|
|
else if (var == DK || var == NO || var == NO2) \
|
|
ch = 0xd8; \
|
|
else if (var == ES || var == ES2 || var == CU) \
|
|
ch = 0xd1; \
|
|
else if (var == JP || var == JP_OCR_B) \
|
|
ch = 0xa5; \
|
|
else if (var == YU) \
|
|
ch = 0x110; \
|
|
else if (var == KR) \
|
|
ch = 0x20a9; \
|
|
else if (var == PT || var == PT2) \
|
|
ch = 0xc7; \
|
|
break; \
|
|
case 0x5d: \
|
|
if (var == CA || var == CA2) \
|
|
ch = 0xea; \
|
|
else if (var == DE || var == HU) \
|
|
ch = 0xdc; \
|
|
else if (var == DK || var == NO || var == NO2 || var == SE \
|
|
|| var == SE2) \
|
|
ch = 0xc5; \
|
|
else if (var == ES) \
|
|
ch = 0xbf; \
|
|
else if (var == ES2) \
|
|
ch = 0xc7; \
|
|
else if (var == IT) \
|
|
ch = 0xe9; \
|
|
else if (var == JP_OCR_B) \
|
|
ch = 0x232a; \
|
|
else if (var == YU) \
|
|
ch = 0x106; \
|
|
else if (var == FR || var == FR1) \
|
|
ch = 0xa7; \
|
|
else if (var == PT || var == PT2) \
|
|
ch = 0xd5; \
|
|
break; \
|
|
case 0x5e: \
|
|
if (var == CA) \
|
|
ch = 0xee; \
|
|
else if (var == CA2) \
|
|
ch = 0xc9; \
|
|
else if (var == ES2 || var == CU) \
|
|
ch = 0xbf; \
|
|
else if (var == YU) \
|
|
ch = 0x10c; \
|
|
else if (var == SE2) \
|
|
ch = 0xdc; \
|
|
break; \
|
|
case 0x60: \
|
|
if (var == CA || var == CA2) \
|
|
ch = 0xf4; \
|
|
else if (var == IT) \
|
|
ch = 0xf9; \
|
|
else if (var == JP_OCR_B) \
|
|
/* Illegal character. */ \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
else if (var == YU) \
|
|
ch = 0x17e; \
|
|
else if (var == HU) \
|
|
ch = 0xe1; \
|
|
else if (var == FR) \
|
|
ch = 0xb5; \
|
|
else if (var == SE2) \
|
|
ch = 0xe9; \
|
|
break; \
|
|
case 0x7b: \
|
|
if (var == CA || var == CA2 || var == HU || var == FR || var == FR1) \
|
|
ch = 0xe9; \
|
|
else if (var == DE || var == SE || var == SE2) \
|
|
ch = 0xe4; \
|
|
else if (var == DK || var == NO || var == NO2) \
|
|
ch = 0xe6; \
|
|
else if (var == ES) \
|
|
ch = 0xb0; \
|
|
else if (var == ES2 || var == CU) \
|
|
ch = 0xb4; \
|
|
else if (var == IT) \
|
|
ch = 0xe0; \
|
|
else if (var == YU) \
|
|
ch = 0x161; \
|
|
else if (var == PT || var == PT2) \
|
|
ch = 0xe3; \
|
|
break; \
|
|
case 0x7c: \
|
|
if (var == CA || var == CA2 || var == FR || var == FR1) \
|
|
ch = 0xf9; \
|
|
else if (var == DE || var == HU || var == SE || var == SE2) \
|
|
ch = 0xf6; \
|
|
else if (var == DK || var == NO || var == NO2) \
|
|
ch = 0xf8; \
|
|
else if (var == ES || var == ES2 || var == CU) \
|
|
ch = 0xf1; \
|
|
else if (var == IT) \
|
|
ch = 0xf2; \
|
|
else if (var == YU) \
|
|
ch = 0x111; \
|
|
else if (var == PT || var == PT2) \
|
|
ch = 0xe7; \
|
|
break; \
|
|
case 0x7d: \
|
|
if (var == CA || var == CA2 || var == IT || var == FR || var == FR1) \
|
|
ch = 0xe8; \
|
|
else if (var == DE || var == HU) \
|
|
ch = 0xfc; \
|
|
else if (var == DK || var == NO || var == NO2 || var == SE \
|
|
|| var == SE2) \
|
|
ch = 0xe5; \
|
|
else if (var == ES || var == ES2) \
|
|
ch = 0xe7; \
|
|
else if (var == YU) \
|
|
ch = 0x107; \
|
|
else if (var == CU) \
|
|
ch = 0x5b; \
|
|
else if (var == PT || var == PT2) \
|
|
ch = 0xf5; \
|
|
break; \
|
|
case 0x7e: \
|
|
if (var == GB || var == CN || var == JP || var == NO || var == SE) \
|
|
ch = 0x203e; \
|
|
else if (var == CA || var == CA2) \
|
|
ch = 0xfb; \
|
|
else if (var == DE) \
|
|
ch = 0xdf; \
|
|
else if (var == ES2 || var == CU || var == FR || var == FR1) \
|
|
ch = 0xa8; \
|
|
else if (var == IT) \
|
|
ch = 0xec; \
|
|
else if (var == JP_OCR_B) \
|
|
/* Illegal character. */ \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
else if (var == YU) \
|
|
ch = 0x10d; \
|
|
else if (var == HU) \
|
|
ch = 0x2dd; \
|
|
else if (var == NO2) \
|
|
ch = 0x7c; \
|
|
else if (var == PT) \
|
|
ch = 0xb0; \
|
|
else if (var == SE2) \
|
|
ch = 0xfc; \
|
|
break; \
|
|
default: \
|
|
break; \
|
|
case '\x80' ... '\xff': \
|
|
/* Illegal character. */ \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
} \
|
|
\
|
|
/* Hopefully gcc can recognize that the following `if' is only true \
|
|
when we reach the default case in the `switch' statement. */ \
|
|
if (failure == GCONV_ILLEGAL_INPUT) \
|
|
{ \
|
|
/* Exit the loop with an error. */ \
|
|
result = failure; \
|
|
break; \
|
|
} \
|
|
*((uint32_t *) outptr)++ = ch; \
|
|
++inptr; \
|
|
}
|
|
#define EXTRA_LOOP_DECLS , enum variant var
|
|
#include <iconv/loop.c>
|
|
|
|
|
|
/* Next, define the other direction. */
|
|
#define MIN_NEEDED_INPUT MIN_NEEDED_TO
|
|
#define MIN_NEEDED_OUTPUT MIN_NEEDED_FROM
|
|
#define LOOPFCT TO_LOOP
|
|
#define BODY \
|
|
{ \
|
|
unsigned char ch = '\0'; \
|
|
int failure = GCONV_OK; \
|
|
\
|
|
ch = *((uint32_t *) inptr); \
|
|
switch (*((uint32_t *) inptr)) \
|
|
{ \
|
|
case 0x23: \
|
|
if (var == GB || var == ES || var == IT || var == FR || var == FR1 \
|
|
|| var == NO2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0x24: \
|
|
if (var == CN || var == HU || var == CU || var == SE || var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0x40: \
|
|
if (var == CA || var == CA2 || var == DE || var == ES || var == ES2 \
|
|
|| var == IT || var == YU || var == HU || var == FR || var == FR1 \
|
|
|| var == PT || var == PT2 || var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0x5b: \
|
|
if (var == CA || var == CA2 || var == DE || var == DK || var == ES \
|
|
|| var == ES2 || var == IT || var == JP_OCR_B || var == YU \
|
|
|| var == HU || var == FR || var == FR1 || var == NO \
|
|
|| var == NO2 || var == PT || var == PT2 || var == SE \
|
|
|| var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
else if (var == CU) \
|
|
ch = 0x7d; \
|
|
break; \
|
|
case 0x5c: \
|
|
if (var == CA || var == CA2 || var == DE || var == DK || var == ES \
|
|
|| var == ES2 || var == IT || var == JP || var == JP_OCR_B \
|
|
|| var == YU || var == KR || var == HU || var == CU || var == FR \
|
|
|| var == FR1 || var == NO || var == NO2 || var == PT \
|
|
|| var == PT2 || var == SE || var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0x5d: \
|
|
if (var == CA || var == CA2 || var == DE || var == DK || var == ES \
|
|
|| var == ES2 || var == IT || var == JP_OCR_B || var == YU \
|
|
|| var == HU || var == FR || var == FR1 || var == NO \
|
|
|| var == NO2 || var == PT || var == PT2 || var == SE \
|
|
|| var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0x5e: \
|
|
if (var == CA || var == CA2 || var == ES2 || var == YU || var == CU \
|
|
|| var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0x60: \
|
|
if (var == CA || var == CA2 || var == IT || var == JP_OCR_B \
|
|
|| var == YU || var == HU || var == FR || var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0x7b: \
|
|
if (var == CA || var == CA2 || var == DE || var == DK || var == ES \
|
|
|| var == ES2 || var == IT || var == YU || var == HU \
|
|
|| var == CU || var == FR || var == FR1 || var == NO \
|
|
|| var == NO2 || var == PT || var == PT2 || var == SE \
|
|
|| var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0x7c: \
|
|
if (var == CA || var == CA2 || var == DE || var == DK || var == ES \
|
|
|| var == ES2 || var == IT || var == YU || var == HU || var == CU \
|
|
|| var == FR || var == FR1 || var == NO || var == PT \
|
|
|| var == PT2 || var == SE || var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
else if (var == NO2) \
|
|
ch = 0x7e; \
|
|
break; \
|
|
case 0x7d: \
|
|
if (var == CA || var == CA2 || var == DE || var == DK || var == ES \
|
|
|| var == ES2 || var == IT || var == YU || var == HU || var == CU \
|
|
|| var == FR || var == FR1 || var == NO || var == NO2 \
|
|
|| var == PT || var == PT2 || var == SE || var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0x7e: \
|
|
if (var == GB || var == CA || var == CA2 || var == DE || var == ES2 \
|
|
|| var == CN || var == IT || var == JP || var == JP_OCR_B \
|
|
|| var == YU || var == HU || var == CU || var == FR || var == FR1 \
|
|
|| var == NO || var == NO2 || var == PT || var == SE \
|
|
|| var == SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xa1: \
|
|
if (var != ES && var != ES2 && var != CU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5b; \
|
|
break; \
|
|
case 0xa3: \
|
|
if (var != GB && var != ES && var != IT && var != FR && var != FR1) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x23; \
|
|
break; \
|
|
case 0xa4: \
|
|
if (var != HU && var != CU && var != SE && var != SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x24; \
|
|
break; \
|
|
case 0xa5: \
|
|
if (var == CN) \
|
|
ch = 0x24; \
|
|
else if (var == JP || var == JP_OCR_B) \
|
|
ch = 0x5c; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xa7: \
|
|
if (var == DE || var == ES || var == IT || var == PT) \
|
|
ch = 0x40; \
|
|
else if (var == FR || var == FR1) \
|
|
ch = 0x5d; \
|
|
else if (var == NO2) \
|
|
ch = 0x23; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xa8: \
|
|
if (var != ES2 && var != CU && var != FR && var != FR1) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7e; \
|
|
break; \
|
|
case 0xb0: \
|
|
if (var == ES) \
|
|
ch = 0x7b; \
|
|
else if (var == IT || var == FR || var == FR1) \
|
|
ch = 0x5b; \
|
|
else if (var == PT) \
|
|
ch = 0x7e; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xb4: \
|
|
if (var == ES2 || var == CU) \
|
|
ch = 0x7b; \
|
|
else if (var == PT2) \
|
|
ch = 0x40; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xb5: \
|
|
if (var != FR) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x60; \
|
|
break; \
|
|
case 0xbf: \
|
|
if (var == ES) \
|
|
ch = 0x5d; \
|
|
else if (var == ES2 || var == CU) \
|
|
ch = 0x5e; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xc1: \
|
|
if (var != HU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x40; \
|
|
break; \
|
|
case 0xc3: \
|
|
if (var != PT && var != PT2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5b; \
|
|
break; \
|
|
case 0xc4: \
|
|
if (var != DE && var != SE && var != SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5b; \
|
|
break; \
|
|
case 0xc5: \
|
|
if (var != DK && var != NO && var != NO2 && var != SE && var != SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5d; \
|
|
break; \
|
|
case 0xc6: \
|
|
if (var != DK && var != NO && var != NO2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5b; \
|
|
break; \
|
|
case 0xc7: \
|
|
if (var == ES2) \
|
|
ch = 0x5d; \
|
|
else if (var == PT || var == PT2) \
|
|
ch = 0x5c; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xc9: \
|
|
if (var == CA2) \
|
|
ch = 0x5e; \
|
|
else if (var == HU) \
|
|
ch = 0x5b; \
|
|
else if (var == SE2) \
|
|
ch = 0x40; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xd1: \
|
|
if (var != ES && var != ES2 && var != CU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5c; \
|
|
break; \
|
|
case 0xd5: \
|
|
if (var != PT && var != PT2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5d; \
|
|
break; \
|
|
case 0xd6: \
|
|
if (var != DE && var != HU && var != SE && var != SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5c; \
|
|
break; \
|
|
case 0xd8: \
|
|
if (var != DK && var != NO && var != NO2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5c; \
|
|
break; \
|
|
case 0xdc: \
|
|
if (var == DE || var == HU) \
|
|
ch = 0x5d; \
|
|
else if (var == SE2) \
|
|
ch = 0x5e; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xdf: \
|
|
if (var != DE) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7e; \
|
|
break; \
|
|
case 0xe0: \
|
|
if (var == CA || var == CA2 || var == FR || var == FR1) \
|
|
ch = 0x40; \
|
|
else if (var == IT) \
|
|
ch = 0x7b; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xe1: \
|
|
if (var != HU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x60; \
|
|
break; \
|
|
case 0xe2: \
|
|
if (var != CA && var != CA2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5b; \
|
|
break; \
|
|
case 0xe3: \
|
|
if (var != PT && var != PT2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7b; \
|
|
break; \
|
|
case 0xe4: \
|
|
if (var != DE && var != SE && var != SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7b; \
|
|
break; \
|
|
case 0xe5: \
|
|
if (var != DK && var != NO && var != NO2 && var != SE && var != SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7d; \
|
|
break; \
|
|
case 0xe6: \
|
|
if (var != DK && var != NO && var != NO2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7b; \
|
|
break; \
|
|
case 0xe7: \
|
|
if (var == CA || var == CA2 || var == IT || var == FR || var == FR1) \
|
|
ch = 0x5c; \
|
|
else if (var == ES || var == ES2) \
|
|
ch = 0x7d; \
|
|
else if (var == PT || var == PT2) \
|
|
ch = 0x7c; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xe8: \
|
|
if (var != CA && var != CA2 && var != IT && var != FR && var != FR1) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7d; \
|
|
break; \
|
|
case 0xe9: \
|
|
if (var == CA || var == CA2 || var == HU || var == FR || var == FR1) \
|
|
ch = 0x7b; \
|
|
else if (var == IT) \
|
|
ch = 0x5d; \
|
|
else if (var == SE2) \
|
|
ch = 0x60; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xea: \
|
|
if (var != CA && var != CA2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5d; \
|
|
break; \
|
|
case 0xec: \
|
|
if (var != IT) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7e; \
|
|
break; \
|
|
case 0xee: \
|
|
if (var != CA) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5e; \
|
|
break; \
|
|
case 0xf1: \
|
|
if (var != ES && var != ES2 && var != CU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7c; \
|
|
break; \
|
|
case 0xf2: \
|
|
if (var != IT) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7c; \
|
|
break; \
|
|
case 0xf4: \
|
|
if (var != CA && var != CA2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x60; \
|
|
break; \
|
|
case 0xf5: \
|
|
if (var != PT && var != PT2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7d; \
|
|
break; \
|
|
case 0xf6: \
|
|
if (var != DE && var != HU && var != SE && var != SE2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7c; \
|
|
break; \
|
|
case 0xf8: \
|
|
if (var != DK && var != NO && var != NO2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7c; \
|
|
break; \
|
|
case 0xf9: \
|
|
if (var == CA || var == CA2 || var == FR || var == FR1) \
|
|
ch = 0x7c; \
|
|
else if (var == IT) \
|
|
ch = 0x60; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0xfb: \
|
|
if (var != CA && var != CA2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7e; \
|
|
break; \
|
|
case 0xfc: \
|
|
if (var == DE || var == HU) \
|
|
ch = 0x7d; \
|
|
else if (var == SE2) \
|
|
ch = 0x7e; \
|
|
else \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
case 0x160: \
|
|
if (var != YU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5b; \
|
|
break; \
|
|
case 0x106: \
|
|
if (var != YU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5d; \
|
|
break; \
|
|
case 0x107: \
|
|
if (var != YU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7d; \
|
|
break; \
|
|
case 0x10c: \
|
|
if (var != YU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5e; \
|
|
break; \
|
|
case 0x10d: \
|
|
if (var != YU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7e; \
|
|
break; \
|
|
case 0x110: \
|
|
if (var != YU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5c; \
|
|
break; \
|
|
case 0x111: \
|
|
if (var != YU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7c; \
|
|
break; \
|
|
case 0x161: \
|
|
if (var != YU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7b; \
|
|
break; \
|
|
case 0x17d: \
|
|
if (var != YU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x40; \
|
|
break; \
|
|
case 0x17e: \
|
|
if (var != YU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x60; \
|
|
break; \
|
|
case 0x2dd: \
|
|
if (var != HU) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7e; \
|
|
break; \
|
|
case 0x2022: \
|
|
if (var != ES2) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x40; \
|
|
break; \
|
|
case 0x203e: \
|
|
if (var != GB && var != CN && var != JP && var != NO && var != SE) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x7e; \
|
|
break; \
|
|
case 0x20a9: \
|
|
if (var != KR) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5c; \
|
|
break; \
|
|
case 0x2329: \
|
|
if (var != JP_OCR_B) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5b; \
|
|
break; \
|
|
case 0x232a: \
|
|
if (var != JP_OCR_B) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
ch = 0x5d; \
|
|
break; \
|
|
default: \
|
|
if (*((uint32_t *) inptr) > 0x7f) \
|
|
failure = GCONV_ILLEGAL_INPUT; \
|
|
break; \
|
|
} \
|
|
\
|
|
if (failure == GCONV_ILLEGAL_INPUT) \
|
|
{ \
|
|
/* Exit the loop with an error. */ \
|
|
result = failure; \
|
|
break; \
|
|
} \
|
|
*outptr++ = (unsigned char) ch; \
|
|
inptr += 4; \
|
|
}
|
|
#define EXTRA_LOOP_DECLS , enum variant var
|
|
#include <iconv/loop.c>
|
|
|
|
|
|
/* Now define the toplevel functions. */
|
|
#include <iconv/skeleton.c>
|