"Fossies" - the Fresh Open Source Software Archive 
Member "schily-2021-09-18/sunpro/Make/lib/mksh/src/i18n.cc" (15 Aug 2021, 2594 Bytes) of package /linux/privat/schily-2021-09-18.tar.bz2:
1 /*
2 * CDDL HEADER START
3 *
4 * This file and its contents are supplied under the terms of the
5 * Common Development and Distribution License ("CDDL"), version 1.0.
6 * You may use this file only in accordance with the terms of version
7 * 1.0 of the CDDL.
8 *
9 * A full copy of the text of the CDDL should have accompanied this
10 * source. A copy of the CDDL is also available via the Internet at
11 * http://www.opensource.org/licenses/cddl1.txt
12 * See the License for the specific language governing permissions
13 * and limitations under the License.
14 *
15 * When distributing Covered Code, include this CDDL HEADER in each
16 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
17 * If applicable, add the following below this CDDL HEADER, with the
18 * fields enclosed by brackets "[]" replaced with your own identifying
19 * information: Portions Copyright [yyyy] [name of copyright owner]
20 *
21 * CDDL HEADER END
22 */
23 /*
24 * Copyright 2003 Sun Microsystems, Inc. All rights reserved.
25 * Use is subject to license terms.
26 */
27 /*
28 * @(#)i18n.cc 1.3 06/12/12
29 */
30
31 #pragma ident "@(#)i18n.cc 1.3 06/12/12"
32
33 /*
34 * Copyright 2017 J. Schilling
35 *
36 * @(#)i18n.cc 1.4 21/08/16 2017 J. Schilling
37 */
38 #include <schily/mconfig.h>
39 #ifndef lint
40 static UConst char sccsid[] =
41 "@(#)i18n.cc 1.4 21/08/16 2017 J. Schilling";
42 #endif
43
44 /*
45 * i18n.cc
46 *
47 * Deal with internationalization conversions
48 */
49
50 /*
51 * Included files
52 */
53 #include <mksh/defs.h>
54 #include <mksh/i18n.h>
55 #include <mksh/misc.h> /* setup_char_semantics() */
56
57 /*
58 * get_char_semantics_value(ch)
59 *
60 * Return value:
61 * The character semantics of ch.
62 *
63 * Parameters:
64 * ch character we want semantics for.
65 *
66 */
67 char
68 get_char_semantics_value(wchar_t ch)
69 {
70 static Boolean char_semantics_setup;
71
72 if (!char_semantics_setup) {
73 setup_char_semantics();
74 char_semantics_setup = true;
75 }
76 return char_semantics[get_char_semantics_entry(ch)];
77 }
78
79 /*
80 * get_char_semantics_entry(ch)
81 *
82 * Return value:
83 * The slot number in the array for special make chars,
84 * else the slot number of the last array entry.
85 *
86 * Parameters:
87 * ch The wide character
88 *
89 * Global variables used:
90 * char_semantics_char[] array of special wchar_t chars
91 * "&*@`\\|[]:$=!>-\n#()%?;^<'\""
92 */
93 int
94 get_char_semantics_entry(wchar_t ch)
95 {
96 wchar_t *char_sem_char;
97
98 char_sem_char = (wchar_t *) wcschr(char_semantics_char, ch);
99 if (char_sem_char == NULL) {
100 /*
101 * Return the integer entry for the last slot,
102 * whose content is empty.
103 */
104 return (CHAR_SEMANTICS_ENTRIES - 1);
105 } else {
106 return (char_sem_char - char_semantics_char);
107 }
108 }
109
2021-08-14_vs_2021-09-18 or