Blame iconvdata/euc-cn.c

Packit 6c4009
/* Mapping tables for EUC-CN handling.
Packit 6c4009
   Copyright (C) 1998-2018 Free Software Foundation, Inc.
Packit 6c4009
   This file is part of the GNU C Library.
Packit 6c4009
   Contributed by Ulrich Drepper <drepper@cygnus.com>, 1998.
Packit 6c4009
Packit 6c4009
   The GNU C Library is free software; you can redistribute it and/or
Packit 6c4009
   modify it under the terms of the GNU Lesser General Public
Packit 6c4009
   License as published by the Free Software Foundation; either
Packit 6c4009
   version 2.1 of the License, or (at your option) any later version.
Packit 6c4009
Packit 6c4009
   The GNU C Library is distributed in the hope that it will be useful,
Packit 6c4009
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit 6c4009
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit 6c4009
   Lesser General Public License for more details.
Packit 6c4009
Packit 6c4009
   You should have received a copy of the GNU Lesser General Public
Packit 6c4009
   License along with the GNU C Library; if not, see
Packit 6c4009
   <http://www.gnu.org/licenses/>.  */
Packit 6c4009
Packit 6c4009
#include <dlfcn.h>
Packit 6c4009
#include <gb2312.h>
Packit 6c4009
#include <stdint.h>
Packit 6c4009
Packit 6c4009
/* Definitions used in the body of the `gconv' function.  */
Packit 6c4009
#define CHARSET_NAME		"EUC-CN//"
Packit 6c4009
#define FROM_LOOP		from_euc_cn
Packit 6c4009
#define TO_LOOP			to_euc_cn
Packit 6c4009
#define DEFINE_INIT		1
Packit 6c4009
#define DEFINE_FINI		1
Packit 6c4009
#define MIN_NEEDED_FROM		1
Packit 6c4009
#define MAX_NEEDED_FROM		2
Packit 6c4009
#define MIN_NEEDED_TO		4
Packit 6c4009
#define ONE_DIRECTION		0
Packit 6c4009
Packit 6c4009
Packit 6c4009
/* First define the conversion function from EUC-CN to UCS4.  */
Packit 6c4009
#define MIN_NEEDED_INPUT	MIN_NEEDED_FROM
Packit 6c4009
#define MAX_NEEDED_INPUT	MAX_NEEDED_FROM
Packit 6c4009
#define MIN_NEEDED_OUTPUT	MIN_NEEDED_TO
Packit 6c4009
#define LOOPFCT			FROM_LOOP
Packit 6c4009
#define BODY \
Packit 6c4009
  {									      \
Packit 6c4009
    uint32_t ch = *inptr;						      \
Packit 6c4009
									      \
Packit 6c4009
    if (ch <= 0x7f)							      \
Packit 6c4009
      ++inptr;								      \
Packit 6c4009
    else								      \
Packit 6c4009
      if ((__builtin_expect (ch <= 0xa0, 0) && ch != 0x8e && ch != 0x8f)      \
Packit 6c4009
	  || __builtin_expect (ch > 0xfe, 0))				      \
Packit 6c4009
	{								      \
Packit 6c4009
	  /* This is illegal.  */					      \
Packit 6c4009
	  STANDARD_FROM_LOOP_ERR_HANDLER (1);				      \
Packit 6c4009
	}								      \
Packit 6c4009
      else								      \
Packit 6c4009
	{								      \
Packit 6c4009
	  /* Two or more byte character.  First test whether the	      \
Packit 6c4009
	     next byte is also available.  */				      \
Packit 6c4009
	  const unsigned char *endp;					      \
Packit 6c4009
									      \
Packit 6c4009
	  if (__glibc_unlikely (inptr + 1 >= inend))			      \
Packit 6c4009
	    {								      \
Packit 6c4009
	      /* The second character is not available.  Store		      \
Packit 6c4009
		 the intermediate result.  */				      \
Packit 6c4009
	      result = __GCONV_INCOMPLETE_INPUT;			      \
Packit 6c4009
	      break;							      \
Packit 6c4009
	    }								      \
Packit 6c4009
									      \
Packit 6c4009
	  ch = inptr[1];						      \
Packit 6c4009
									      \
Packit 6c4009
	  /* All second bytes of a multibyte character must be >= 0xa1. */    \
Packit 6c4009
	  if (__glibc_unlikely (ch < 0xa1))				      \
Packit 6c4009
	    STANDARD_FROM_LOOP_ERR_HANDLER (1);				      \
Packit 6c4009
									      \
Packit 6c4009
	  /* This is code set 1: GB 2312-80.  */			      \
Packit 6c4009
	  endp = inptr;							      \
Packit 6c4009
									      \
Packit 6c4009
	  ch = gb2312_to_ucs4 (&endp, 2, 0x80);				      \
Packit 6c4009
	  if (__glibc_unlikely (ch == __UNKNOWN_10646_CHAR))		      \
Packit 6c4009
	    {								      \
Packit 6c4009
	      /* This is an illegal character.  */			      \
Packit 6c4009
	      STANDARD_FROM_LOOP_ERR_HANDLER (2);			      \
Packit 6c4009
	    }								      \
Packit 6c4009
									      \
Packit 6c4009
	  inptr += 2;							      \
Packit 6c4009
	}								      \
Packit 6c4009
									      \
Packit 6c4009
    put32 (outptr, ch);							      \
Packit 6c4009
    outptr += 4;							      \
Packit 6c4009
  }
Packit 6c4009
#define LOOP_NEED_FLAGS
Packit 6c4009
#define ONEBYTE_BODY \
Packit 6c4009
  {									      \
Packit 6c4009
    if (c < 0x80)							      \
Packit 6c4009
      return c;								      \
Packit 6c4009
    else								      \
Packit 6c4009
      return WEOF;							      \
Packit 6c4009
  }
Packit 6c4009
#include <iconv/loop.c>
Packit 6c4009
Packit 6c4009
Packit 6c4009
/* Next, define the other direction.  */
Packit 6c4009
#define MIN_NEEDED_INPUT	MIN_NEEDED_TO
Packit 6c4009
#define MIN_NEEDED_OUTPUT	MIN_NEEDED_FROM
Packit 6c4009
#define MAX_NEEDED_OUTPUT	MAX_NEEDED_FROM
Packit 6c4009
#define LOOPFCT			TO_LOOP
Packit 6c4009
#define BODY \
Packit 6c4009
  {									      \
Packit 6c4009
    uint32_t ch = get32 (inptr);					      \
Packit 6c4009
									      \
Packit 6c4009
    if (ch <= L'\x7f')							      \
Packit 6c4009
      /* It's plain ASCII.  */						      \
Packit 6c4009
      *outptr++ = (unsigned char) ch;					      \
Packit 6c4009
    else								      \
Packit 6c4009
      {									      \
Packit 6c4009
	size_t found;							      \
Packit 6c4009
									      \
Packit 6c4009
	found = ucs4_to_gb2312 (ch, outptr, outend - outptr);		      \
Packit 6c4009
	if (__builtin_expect (found, 1) != 0)				      \
Packit 6c4009
	  {								      \
Packit 6c4009
	    if (__builtin_expect (found, 0) == __UNKNOWN_10646_CHAR)	      \
Packit 6c4009
	      {								      \
Packit 6c4009
		UNICODE_TAG_HANDLER (ch, 4);				      \
Packit 6c4009
									      \
Packit 6c4009
		/* Illegal character.  */				      \
Packit 6c4009
		STANDARD_TO_LOOP_ERR_HANDLER (4);			      \
Packit 6c4009
	      }								      \
Packit 6c4009
									      \
Packit 6c4009
	    /* It's a GB 2312 character, adjust it for EUC-CN.  */	      \
Packit 6c4009
	    *outptr++ += 0x80;						      \
Packit 6c4009
	    *outptr++ += 0x80;						      \
Packit 6c4009
	  }								      \
Packit 6c4009
	else								      \
Packit 6c4009
	  {								      \
Packit 6c4009
	    /* We ran out of space.  */					      \
Packit 6c4009
	    result = __GCONV_FULL_OUTPUT;				      \
Packit 6c4009
	    break;							      \
Packit 6c4009
	  }								      \
Packit 6c4009
      }									      \
Packit 6c4009
    inptr += 4;								      \
Packit 6c4009
  }
Packit 6c4009
#define LOOP_NEED_FLAGS
Packit 6c4009
#include <iconv/loop.c>
Packit 6c4009
Packit 6c4009
Packit 6c4009
/* Now define the toplevel functions.  */
Packit 6c4009
#include <iconv/skeleton.c>