xref: /dragonfly/contrib/gdb-7/readline/rlmbutil.h (revision e5a92d33)
1 /* rlmbutil.h -- utility functions for multibyte characters. */
2 
3 /* Copyright (C) 2001-2009 Free Software Foundation, Inc.
4 
5    This file is part of the GNU Readline Library (Readline), a library
6    for reading lines of text with interactive input and history editing.
7 
8    Readline is free software: you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation, either version 3 of the License, or
11    (at your option) any later version.
12 
13    Readline is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17 
18    You should have received a copy of the GNU General Public License
19    along with Readline.  If not, see <http://www.gnu.org/licenses/>.
20 */
21 
22 #if !defined (_RL_MBUTIL_H_)
23 #define _RL_MBUTIL_H_
24 
25 #include "rlstdc.h"
26 
27 /************************************************/
28 /* check multibyte capability for I18N code     */
29 /************************************************/
30 
31 /* For platforms which support the ISO C amendement 1 functionality we
32    support user defined character classes.  */
33    /* Solaris 2.5 has a bug: <wchar.h> must be included before <wctype.h>.  */
34 #if defined (HAVE_WCTYPE_H) && defined (HAVE_WCHAR_H) && defined (HAVE_LOCALE_H)
35 #  include <wchar.h>
36 #  include <wctype.h>
37 #  if defined (HAVE_ISWCTYPE) && \
38       defined (HAVE_ISWLOWER) && \
39       defined (HAVE_ISWUPPER) && \
40       defined (HAVE_MBSRTOWCS) && \
41       defined (HAVE_MBRTOWC) && \
42       defined (HAVE_MBRLEN) && \
43       defined (HAVE_TOWLOWER) && \
44       defined (HAVE_TOWUPPER) && \
45       defined (HAVE_WCHAR_T) && \
46       defined (HAVE_WCWIDTH)
47      /* system is supposed to support XPG5 */
48 #    define HANDLE_MULTIBYTE      1
49 #  endif
50 #endif
51 
52 /* If we don't want multibyte chars even on a system that supports them, let
53    the configuring user turn multibyte support off. */
54 #if defined (NO_MULTIBYTE_SUPPORT)
55 #  undef HANDLE_MULTIBYTE
56 #endif
57 
58 /* Some systems, like BeOS, have multibyte encodings but lack mbstate_t.  */
59 #if HANDLE_MULTIBYTE && !defined (HAVE_MBSTATE_T)
60 #  define wcsrtombs(dest, src, len, ps) (wcsrtombs) (dest, src, len, 0)
61 #  define mbsrtowcs(dest, src, len, ps) (mbsrtowcs) (dest, src, len, 0)
62 #  define wcrtomb(s, wc, ps) (wcrtomb) (s, wc, 0)
63 #  define mbrtowc(pwc, s, n, ps) (mbrtowc) (pwc, s, n, 0)
64 #  define mbrlen(s, n, ps) (mbrlen) (s, n, 0)
65 #  define mbstate_t int
66 #endif
67 
68 /* Make sure MB_LEN_MAX is at least 16 on systems that claim to be able to
69    handle multibyte chars (some systems define MB_LEN_MAX as 1) */
70 #ifdef HANDLE_MULTIBYTE
71 #  include <limits.h>
72 #  if defined(MB_LEN_MAX) && (MB_LEN_MAX < 16)
73 #    undef MB_LEN_MAX
74 #  endif
75 #  if !defined (MB_LEN_MAX)
76 #    define MB_LEN_MAX 16
77 #  endif
78 #endif
79 
80 /************************************************/
81 /* end of multibyte capability checks for I18N  */
82 /************************************************/
83 
84 /*
85  * Flags for _rl_find_prev_mbchar and _rl_find_next_mbchar:
86  *
87  * MB_FIND_ANY		find any multibyte character
88  * MB_FIND_NONZERO	find a non-zero-width multibyte character
89  */
90 
91 #define MB_FIND_ANY	0x00
92 #define MB_FIND_NONZERO	0x01
93 
94 extern int _rl_find_prev_mbchar PARAMS((char *, int, int));
95 extern int _rl_find_next_mbchar PARAMS((char *, int, int, int));
96 
97 #ifdef HANDLE_MULTIBYTE
98 
99 extern int _rl_compare_chars PARAMS((char *, int, mbstate_t *, char *, int, mbstate_t *));
100 extern int _rl_get_char_len PARAMS((char *, mbstate_t *));
101 extern int _rl_adjust_point PARAMS((char *, int, mbstate_t *));
102 
103 extern int _rl_read_mbchar PARAMS((char *, int));
104 extern int _rl_read_mbstring PARAMS((int, char *, int));
105 
106 extern int _rl_is_mbchar_matched PARAMS((char *, int, int, char *, int));
107 
108 extern wchar_t _rl_char_value PARAMS((char *, int));
109 extern int _rl_walphabetic PARAMS((wchar_t));
110 
111 #define _rl_to_wupper(wc)	(iswlower (wc) ? towupper (wc) : (wc))
112 #define _rl_to_wlower(wc)	(iswupper (wc) ? towlower (wc) : (wc))
113 
114 #define MB_NEXTCHAR(b,s,c,f) \
115 	((MB_CUR_MAX > 1 && rl_byte_oriented == 0) \
116 		? _rl_find_next_mbchar ((b), (s), (c), (f)) \
117 		: ((s) + (c)))
118 #define MB_PREVCHAR(b,s,f) \
119 	((MB_CUR_MAX > 1 && rl_byte_oriented == 0) \
120 		? _rl_find_prev_mbchar ((b), (s), (f)) \
121 		: ((s) - 1))
122 
123 #define MB_INVALIDCH(x)		((x) == (size_t)-1 || (x) == (size_t)-2)
124 #define MB_NULLWCH(x)		((x) == 0)
125 
126 #else /* !HANDLE_MULTIBYTE */
127 
128 #undef MB_LEN_MAX
129 #undef MB_CUR_MAX
130 
131 #define MB_LEN_MAX	1
132 #define MB_CUR_MAX	1
133 
134 #define _rl_find_prev_mbchar(b, i, f)		(((i) == 0) ? (i) : ((i) - 1))
135 #define _rl_find_next_mbchar(b, i1, i2, f)	((i1) + (i2))
136 
137 #define _rl_char_value(buf,ind)	((buf)[(ind)])
138 
139 #define _rl_walphabetic(c)	(rl_alphabetic (c))
140 
141 #define _rl_to_wupper(c)	(_rl_to_upper (c))
142 #define _rl_to_wlower(c)	(_rl_to_lower (c))
143 
144 #define MB_NEXTCHAR(b,s,c,f)	((s) + (c))
145 #define MB_PREVCHAR(b,s,f)	((s) - 1)
146 
147 #define MB_INVALIDCH(x)		(0)
148 #define MB_NULLWCH(x)		(0)
149 
150 #endif /* !HANDLE_MULTIBYTE */
151 
152 extern int rl_byte_oriented;
153 
154 #endif /* _RL_MBUTIL_H_ */
155