]>
Commit | Line | Data |
---|---|---|
581c785b | 1 | /* Copyright (C) 1991-2022 Free Software Foundation, Inc. |
7cc27f44 | 2 | This file is part of the GNU C Library. |
28f540f4 | 3 | |
7cc27f44 | 4 | The GNU C Library is free software; you can redistribute it and/or |
41bdb6e2 AJ |
5 | modify it under the terms of the GNU Lesser General Public |
6 | License as published by the Free Software Foundation; either | |
7 | version 2.1 of the License, or (at your option) any later version. | |
28f540f4 | 8 | |
7cc27f44 UD |
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 | |
41bdb6e2 | 12 | Lesser General Public License for more details. |
28f540f4 | 13 | |
41bdb6e2 | 14 | You should have received a copy of the GNU Lesser General Public |
59ba27a6 | 15 | License along with the GNU C Library; if not, see |
5a82c748 | 16 | <https://www.gnu.org/licenses/>. */ |
28f540f4 | 17 | |
28f540f4 | 18 | #include <stdlib.h> |
9f097308 | 19 | #include <string.h> |
af6f3906 | 20 | #include <wchar.h> |
9ce5071a UD |
21 | #include <gconv.h> |
22 | #include <wcsmbs/wcsmbsload.h> | |
28f540f4 RM |
23 | |
24 | ||
9f097308 UD |
25 | /* Internal state. */ |
26 | static mbstate_t state; | |
27 | ||
28f540f4 | 28 | /* Return the length of the multibyte character (if there is one) |
af6f3906 UD |
29 | at S which is no longer than N characters. |
30 | The ISO C standard says that the `mblen' function must not change | |
9f097308 | 31 | the state of the `mbtowc' function. */ |
28f540f4 | 32 | int |
7cc27f44 | 33 | mblen (const char *s, size_t n) |
28f540f4 | 34 | { |
af6f3906 UD |
35 | int result; |
36 | ||
37 | /* If S is NULL the function has to return null or not null | |
38 | depending on the encoding having a state depending encoding or | |
9ce5071a | 39 | not. */ |
af6f3906 | 40 | if (s == NULL) |
9ce5071a | 41 | { |
96310297 RM |
42 | const struct gconv_fcts *fcts; |
43 | ||
44 | /* Get the conversion functions. */ | |
45 | fcts = get_gconv_fcts (_NL_CURRENT_DATA (LC_CTYPE)); | |
9ce5071a | 46 | |
9f097308 UD |
47 | /* Reset the state. */ |
48 | memset (&state, '\0', sizeof state); | |
49 | ||
96310297 | 50 | result = fcts->towc->__stateful; |
9ce5071a | 51 | } |
8619129f | 52 | else if (*s == '\0') |
9f097308 | 53 | /* According to the ISO C 89 standard this is the expected behaviour. */ |
8619129f UD |
54 | result = 0; |
55 | else | |
56 | { | |
b837918e | 57 | memset (&state, '\0', sizeof state); |
8619129f UD |
58 | |
59 | result = __mbrtowc (NULL, s, n, &state); | |
60 | ||
61 | /* The `mbrtowc' functions tell us more than we need. Fold the -1 | |
62 | and -2 result into -1. */ | |
63 | if (result < 0) | |
64 | result = -1; | |
65 | } | |
af6f3906 UD |
66 | |
67 | return result; | |
28f540f4 | 68 | } |