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