projects / thirdparty / glibc.git / blame
| Commit | Line | Data |
|---|---|---|
| 04be94a8 UD |
1 | /* Access functions for JISX0208 conversion. |
| 2 | Copyright (C) 1997 Free Software Foundation, Inc. | |
| 3 | This file is part of the GNU C Library. | |
| 4 | Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997. | |
| 5 | ||
| 6 | The GNU C Library is free software; you can redistribute it and/or | |
| 7 | modify it under the terms of the GNU Library General Public License as | |
| 8 | published by the Free Software Foundation; either version 2 of the | |
| 9 | 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 | Library General Public License for more details. | |
| 15 | ||
| 16 | You should have received a copy of the GNU Library General Public | |
| 17 | License along with the GNU C Library; see the file COPYING.LIB. If not, | |
| 18 | write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
| 19 | Boston, MA 02111-1307, USA. */ | |
| 20 | ||
| 21 | #ifndef _JIS0208_H | |
| 22 | #define _JIS0208_H 1 | |
| 23 | ||
| 24 | #include <gconv.h> | |
| 25 | #include <inttypes.h> | |
| 26 | ||
| 27 | /* Conversion table. */ | |
| 28 | extern const uint16_t jis0208_to_ucs[]; | |
| 29 | ||
| 30 | extern const char jisx0208_from_ucs4_lat1[256][2]; | |
| 31 | extern const char jisx0208_from_ucs4_greek[0xc1][2]; | |
| 32 | extern const struct jisx0208_ucs_idx jisx0208_from_ucs_idx[]; | |
| 33 | extern const char jisx0208_from_ucs_tab[][2]; | |
| 34 | ||
| 35 | ||
| 36 | /* Struct for table with indeces in UCS mapping table. */ | |
| 37 | struct jisx0208_ucs_idx | |
| 38 | { | |
| 39 | uint16_t start; | |
| 40 | uint16_t end; | |
| 41 | uint16_t idx; | |
| 42 | }; | |
| 43 | ||
| 44 | ||
| 45 | static inline wchar_t | |
| 46 | jisx0208_to_ucs4 (char **s, size_t avail) | |
| 47 | { | |
| 48 | unsigned char ch = *(*s); | |
| 49 | unsigned char ch2; | |
| 50 | int idx; | |
| 51 | ||
| 52 | if (ch <= 0x20 || ch > 0xea) | |
| 53 | return UNKNOWN_10646_CHAR; | |
| 54 | ||
| 55 | if (avail < 2) | |
| 56 | return 0; | |
| 57 | ||
| 58 | ch2 = (*s)[1]; | |
| 59 | if (ch2 <= 0x20 || ch2 >= 0x7f) | |
| 60 | return UNKNOWN_10646_CHAR; | |
| 61 | ||
| 62 | idx = (ch - 0x21) * 94 + (ch2 - 0x21); | |
| 63 | if (idx >= 0x1e80) | |
| 64 | return UNKNOWN_10646_CHAR; | |
| 65 | ||
| 66 | (*s) += 2; | |
| 67 | ||
| 68 | return jis0208_to_ucs[idx] ?: ((*s) -= 2, UNKNOWN_10646_CHAR); | |
| 69 | } | |
| 70 | ||
| 71 | ||
| 72 | static inline size_t | |
| 73 | ucs4_to_jisx0208 (wchar_t wch, char **s, size_t avail) | |
| 74 | { | |
| 75 | unsigned int ch = (unsigned int) wch; | |
| 76 | const char *cp = NULL; | |
| 77 | ||
| 78 | if (avail < 2) | |
| 79 | return 0; | |
| 80 | ||
| 81 | if (ch < 0x100) | |
| 82 | cp = jisx0208_from_ucs4_lat1[ch]; | |
| 83 | else if (ch >= 0x391 && ch <= 0x451) | |
| 84 | cp = jisx0208_from_ucs4_greek[ch]; | |
| 85 | else | |
| 86 | { | |
| 87 | const struct jisx0208_ucs_idx *rp = jisx0208_from_ucs_idx; | |
| 88 | ||
| 89 | while (ch > rp->end) | |
| 90 | ++rp; | |
| 91 | if (ch >= rp->start) | |
| 92 | cp = jisx0208_from_ucs_tab[rp->idx + ch - rp->start]; | |
| 93 | } | |
| 94 | ||
| 95 | if (cp == NULL || cp[0] == '\0') | |
| 96 | return UNKNOWN_10646_CHAR; | |
| 97 | ||
| 98 | *(*s)++ = cp[0]; | |
| 99 | *(*s)++ = cp[1]; | |
| 100 | ||
| 101 | return 2; | |
| 102 | } | |
| 103 | ||
| 104 | #endif /* jis0208.h */ |