1 /* Copyright (C) 1991, 1992, 1995 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public License as
6 published by the Free Software Foundation; either version 2 of the
7 License, or (at your option) any later version.
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Library General Public License for more details.
14 You should have received a copy of the GNU Library General Public
15 License along with the GNU C Library; see the file COPYING.LIB. If
16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17 Cambridge, MA 02139, USA. */
20 #include "../locale/localeinfo.h"
28 long int _mb_shift = 0;
30 /* Convert the multibyte character at S, which is no longer
31 than N characters, to its `wchar_t' representation, placing
32 this n *PWC and returning its length. */
34 DEFUN(mbtowc, (pwc, s, n), wchar_t *pwc AND CONST char *s AND size_t n)
37 register CONST mb_char *mb;
42 return _mb_shift != 0;
45 /* ANSI 4.10.7.2, line 19. */
50 /* A normal ASCII character translates to itself. */
57 if (_ctype_info->mbchar == NULL ||
58 _ctype_info->mbchar->mb_chars == NULL)
64 for (i = 0; i < WCHAR_MAX; ++i)
66 mb = &_ctype_info->mbchar->mb_chars[i];
67 /* EOF and NUL aren't MB chars. */
68 if (i == (wchar_t) EOF || i == (wchar_t) '\0')
70 /* Normal ASCII values can't start MB chars. */
73 else if (mb->string == NULL || mb->len == 0)
77 else if (!strncmp(mb->string, s, mb->len))
79 _mb_shift += mb->shift;