Annotation of embedaddon/libiconv/lib/euc_kr.h, revision 1.1.1.1
1.1 misho 1: /*
2: * Copyright (C) 1999-2001, 2007 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 Library General Public
7: * License as published by the Free Software Foundation; either version 2
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: * Library General Public License for more details.
14: *
15: * You should have received a copy of the GNU Library General Public
16: * License along with the GNU LIBICONV Library; see the file COPYING.LIB.
17: * If not, write to the Free Software Foundation, Inc., 51 Franklin Street,
18: * Fifth Floor, Boston, MA 02110-1301, USA.
19: */
20:
21: /*
22: * EUC-KR
23: */
24:
25: /* Specification: RFC 1557 */
26:
27: static int
28: euc_kr_mbtowc (conv_t conv, ucs4_t *pwc, const unsigned char *s, int n)
29: {
30: unsigned char c = *s;
31: /* Code set 0 (ASCII or KS C 5636-1993) */
32: if (c < 0x80)
33: return ascii_mbtowc(conv,pwc,s,n);
34: /* Code set 1 (KS C 5601-1992, now KS X 1001:2002) */
35: if (c >= 0xa1 && c < 0xff) {
36: if (n < 2)
37: return RET_TOOFEW(0);
38: {
39: unsigned char c2 = s[1];
40: if (c2 >= 0xa1 && c2 < 0xff) {
41: unsigned char buf[2];
42: buf[0] = c-0x80; buf[1] = c2-0x80;
43: return ksc5601_mbtowc(conv,pwc,buf,2);
44: } else
45: return RET_ILSEQ;
46: }
47: }
48: return RET_ILSEQ;
49: }
50:
51: static int
52: euc_kr_wctomb (conv_t conv, unsigned char *r, ucs4_t wc, int n)
53: {
54: unsigned char buf[2];
55: int ret;
56:
57: /* Code set 0 (ASCII or KS C 5636-1993) */
58: ret = ascii_wctomb(conv,r,wc,n);
59: if (ret != RET_ILUNI)
60: return ret;
61:
62: /* Code set 1 (KS C 5601-1992, now KS X 1001:2002) */
63: ret = ksc5601_wctomb(conv,buf,wc,2);
64: if (ret != RET_ILUNI) {
65: if (ret != 2) abort();
66: if (n < 2)
67: return RET_TOOSMALL;
68: r[0] = buf[0]+0x80;
69: r[1] = buf[1]+0x80;
70: return 2;
71: }
72:
73: return RET_ILUNI;
74: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>