1/* Functions for JISX0213 conversion.
2 Copyright (C) 2002-2021 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Bruno Haible <bruno@clisp.org>, 2002.
5
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
10
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
15
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <https://www.gnu.org/licenses/>. */
19
20#ifndef _JISX0213_H
21#define _JISX0213_H 1
22
23#include <stdint.h>
24
25extern const uint16_t __jisx0213_to_ucs_combining[][2];
26extern const uint16_t __jisx0213_to_ucs_main[120 * 94];
27extern const uint32_t __jisx0213_to_ucs_pagestart[];
28extern const int16_t __jisx0213_from_ucs_level1[2715];
29extern const uint16_t __jisx0213_from_ucs_level2[];
30
31#define NELEMS(arr) (sizeof (arr) / sizeof (arr[0]))
32
33static inline uint32_t
34__attribute ((always_inline))
35jisx0213_to_ucs4 (unsigned int row, unsigned int col)
36{
37 uint32_t val;
38
39 if (row >= 0x121 && row <= 0x17e)
40 row -= 289;
41 else if (row == 0x221)
42 row -= 451;
43 else if (row >= 0x223 && row <= 0x225)
44 row -= 452;
45 else if (row == 0x228)
46 row -= 454;
47 else if (row >= 0x22c && row <= 0x22f)
48 row -= 457;
49 else if (row >= 0x26e && row <= 0x27e)
50 row -= 519;
51 else
52 return 0x0000;
53
54 if (col >= 0x21 && col <= 0x7e)
55 col -= 0x21;
56 else
57 return 0x0000;
58
59 val = __jisx0213_to_ucs_main[row * 94 + col];
60 val = __jisx0213_to_ucs_pagestart[val >> 8] + (val & 0xff);
61 if (val == 0xfffd)
62 val = 0x0000;
63 return val;
64}
65
66static inline uint16_t
67__attribute ((always_inline))
68ucs4_to_jisx0213 (uint32_t ucs)
69{
70 if (ucs < NELEMS (__jisx0213_from_ucs_level1) << 6)
71 {
72 int index1 = __jisx0213_from_ucs_level1[ucs >> 6];
73 if (index1 >= 0)
74 return __jisx0213_from_ucs_level2[(index1 << 6) + (ucs & 0x3f)];
75 }
76 return 0x0000;
77}
78
79static inline int
80__attribute ((always_inline))
81jisx0213_added_in_2004_p (uint16_t val)
82{
83 /* From JISX 0213:2000 to JISX 0213:2004, 10 characters were added to
84 plane 1, and plane 2 was left unchanged. See ISO-IR-233. */
85 switch (val >> 8)
86 {
87 case 0x2e:
88 return val == 0x2e21;
89 case 0x2f:
90 return val == 0x2f7e;
91 case 0x4f:
92 return val == 0x4f54 || val == 0x4f7e;
93 case 0x74:
94 return val == 0x7427;
95 case 0x7e:
96 return val >= 0x7e7a && val <= 0x7e7e;
97 default:
98 return 0;
99 }
100}
101
102#endif /* _JISX0213_H */
103