1*aef5731fSOliver Tappe /*
2*aef5731fSOliver Tappe * Copyright (C) 1999-2001, 2005 Free Software Foundation, Inc.
3*aef5731fSOliver Tappe * This file is part of the GNU LIBICONV Library.
4*aef5731fSOliver Tappe *
5*aef5731fSOliver Tappe * The GNU LIBICONV Library is free software; you can redistribute it
6*aef5731fSOliver Tappe * and/or modify it under the terms of the GNU Library General Public
7*aef5731fSOliver Tappe * License as published by the Free Software Foundation; either version 2
8*aef5731fSOliver Tappe * of the License, or (at your option) any later version.
9*aef5731fSOliver Tappe *
10*aef5731fSOliver Tappe * The GNU LIBICONV Library is distributed in the hope that it will be
11*aef5731fSOliver Tappe * useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
12*aef5731fSOliver Tappe * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13*aef5731fSOliver Tappe * Library General Public License for more details.
14*aef5731fSOliver Tappe *
15*aef5731fSOliver Tappe * You should have received a copy of the GNU Library General Public
16*aef5731fSOliver Tappe * License along with the GNU LIBICONV Library; see the file COPYING.LIB.
17*aef5731fSOliver Tappe * If not, write to the Free Software Foundation, Inc., 51 Franklin Street,
18*aef5731fSOliver Tappe * Fifth Floor, Boston, MA 02110-1301, USA.
19*aef5731fSOliver Tappe */
20*aef5731fSOliver Tappe
21*aef5731fSOliver Tappe /*
22*aef5731fSOliver Tappe * GBK
23*aef5731fSOliver Tappe */
24*aef5731fSOliver Tappe
25*aef5731fSOliver Tappe static int
ces_gbk_mbtowc(conv_t conv,ucs4_t * pwc,const unsigned char * s,int n)26*aef5731fSOliver Tappe ces_gbk_mbtowc (conv_t conv, ucs4_t *pwc, const unsigned char *s, int n)
27*aef5731fSOliver Tappe {
28*aef5731fSOliver Tappe unsigned char c = *s;
29*aef5731fSOliver Tappe
30*aef5731fSOliver Tappe /* Code set 0 (ASCII or GB 1988-89) */
31*aef5731fSOliver Tappe if (c < 0x80)
32*aef5731fSOliver Tappe return ascii_mbtowc(conv,pwc,s,n);
33*aef5731fSOliver Tappe /* Code set 1 (GBK) */
34*aef5731fSOliver Tappe if (c >= 0x81 && c < 0xff) {
35*aef5731fSOliver Tappe if (n < 2)
36*aef5731fSOliver Tappe return RET_TOOFEW(0);
37*aef5731fSOliver Tappe return gbk_mbtowc(conv,pwc,s,2);
38*aef5731fSOliver Tappe }
39*aef5731fSOliver Tappe return RET_ILSEQ;
40*aef5731fSOliver Tappe }
41*aef5731fSOliver Tappe
42*aef5731fSOliver Tappe static int
ces_gbk_wctomb(conv_t conv,unsigned char * r,ucs4_t wc,int n)43*aef5731fSOliver Tappe ces_gbk_wctomb (conv_t conv, unsigned char *r, ucs4_t wc, int n)
44*aef5731fSOliver Tappe {
45*aef5731fSOliver Tappe unsigned char buf[2];
46*aef5731fSOliver Tappe int ret;
47*aef5731fSOliver Tappe
48*aef5731fSOliver Tappe /* Code set 0 (ASCII or GB 1988-89) */
49*aef5731fSOliver Tappe ret = ascii_wctomb(conv,r,wc,n);
50*aef5731fSOliver Tappe if (ret != RET_ILUNI)
51*aef5731fSOliver Tappe return ret;
52*aef5731fSOliver Tappe
53*aef5731fSOliver Tappe /* Code set 1 (GBK) */
54*aef5731fSOliver Tappe ret = gbk_wctomb(conv,buf,wc,2);
55*aef5731fSOliver Tappe if (ret != RET_ILUNI) {
56*aef5731fSOliver Tappe if (ret != 2) abort();
57*aef5731fSOliver Tappe if (n < 2)
58*aef5731fSOliver Tappe return RET_TOOSMALL;
59*aef5731fSOliver Tappe r[0] = buf[0];
60*aef5731fSOliver Tappe r[1] = buf[1];
61*aef5731fSOliver Tappe return 2;
62*aef5731fSOliver Tappe }
63*aef5731fSOliver Tappe
64*aef5731fSOliver Tappe return RET_ILUNI;
65*aef5731fSOliver Tappe }
66