lib/cp1162.h

   1 /*
   2  * Copyright (C) 1999-2002, 2016 Free Software Foundation, Inc.
   3  * This file is part of the GNU LIBICONV Library.
   4  *
   5  * The GNU LIBICONV Library is free software; you can redistribute it
   6  * and/or modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either version 2.1
   8  * of the License, or (at your option) any later version.
   9  *
  10  * The GNU LIBICONV Library is distributed in the hope that it will be
  11  * useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with the GNU LIBICONV Library; see the file COPYING.LIB.
  17  * If not, see <https://www.gnu.org/licenses/>.
  18  */
  19
  20 /*
  21  * CP1162
  22  */
  23
  24 static int
  25 cp1162_mbtowc (conv_t conv, ucs4_t *pwc, const unsigned char *s, size_t n)
  26 {
  27   unsigned char c = *s;
  28   if (c < 0x80) {
  29     *pwc = (ucs4_t) c;
  30     return 1;
  31   }
  32   else {
  33     unsigned short wc = cp874_2uni[c-0x80];
  34     if (wc != 0xfffd) {
  35       *pwc = (ucs4_t) wc;
  36       return 1;
  37     }
  38     if (c < 0xa0) {
  39       *pwc = (ucs4_t) c;
  40       return 1;
  41     }
  42   }
  43   return RET_ILSEQ;
  44 }
  45
  46 static int
  47 cp1162_wctomb (conv_t conv, unsigned char *r, ucs4_t wc, size_t n)
  48 {
  49   unsigned char c = 0;
  50   if (wc < 0x0080) {
  51     *r = wc;
  52     return 1;
  53   }
  54   else if (wc >= 0x0080 && wc < 0x00a0 && cp874_2uni[wc-0x0080] == 0xfffd)
  55     c = wc;
  56   else if (wc == 0x00a0)
  57     c = 0xa0;
  58   else if (wc >= 0x0e00 && wc < 0x0e60)
  59     c = cp874_page0e[wc-0x0e00];
  60   else if (wc >= 0x2010 && wc < 0x2028)
  61     c = cp874_page20[wc-0x2010];
  62   else if (wc == 0x20ac)
  63     c = 0x80;
  64   if (c != 0) {
  65     *r = c;
  66     return 1;
  67   }
  68   return RET_ILUNI;
  69 }