1: /*
2: * Copyright (C) 1999-2001, 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 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, see <https://www.gnu.org/licenses/>.
18: */
19:
20: /*
21: * ISO646-JP
22: * also known as JIS_C6220-1969-RO
23: */
24:
25: /* This is the lower half of JIS_X0201. */
26:
27: static int
28: iso646_jp_mbtowc (conv_t conv, ucs4_t *pwc, const unsigned char *s, size_t n)
29: {
30: unsigned char c = *s;
31: if (c < 0x80) {
32: if (c == 0x5c)
33: *pwc = (ucs4_t) 0x00a5;
34: else if (c == 0x7e)
35: *pwc = (ucs4_t) 0x203e;
36: else
37: *pwc = (ucs4_t) c;
38: return 1;
39: }
40: return RET_ILSEQ;
41: }
42:
43: static int
44: iso646_jp_wctomb (conv_t conv, unsigned char *r, ucs4_t wc, size_t n)
45: {
46: if (wc < 0x0080 && !(wc == 0x005c || wc == 0x007e)) {
47: *r = wc;
48: return 1;
49: }
50: if (wc == 0x00a5) {
51: *r = 0x5c;
52: return 1;
53: }
54: if (wc == 0x203e) {
55: *r = 0x7e;
56: return 1;
57: }
58: return RET_ILUNI;
59: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>