]>
Commit | Line | Data |
---|---|---|
688903eb | 1 | /* Copyright (C) 1996-2018 Free Software Foundation, Inc. |
b5791037 | 2 | This file is part of the GNU C Library. |
b8f558b7 | 3 | Contributed by Ulrich Drepper <drepper@gnu.org>, 1996. |
b5791037 UD |
4 | |
5 | The GNU C Library is free software; you can redistribute it and/or | |
41bdb6e2 AJ |
6 | modify it under the terms of the GNU Lesser General Public |
7 | License as published by the Free Software Foundation; either | |
8 | version 2.1 of the License, or (at your option) any later version. | |
b5791037 UD |
9 | |
10 | The GNU C Library is distributed in the hope that it will be useful, | |
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
41bdb6e2 | 13 | Lesser General Public License for more details. |
b5791037 | 14 | |
41bdb6e2 | 15 | You should have received a copy of the GNU Lesser General Public |
59ba27a6 PE |
16 | License along with the GNU C Library; if not, see |
17 | <http://www.gnu.org/licenses/>. */ | |
30de3b18 | 18 | |
915a6c51 | 19 | #include <assert.h> |
55985355 | 20 | #include <dlfcn.h> |
07a4742f | 21 | #include <errno.h> |
4bca4c17 | 22 | #include <gconv.h> |
30de3b18 | 23 | #include <wchar.h> |
4bca4c17 UD |
24 | #include <wcsmbsload.h> |
25 | ||
915a6c51 | 26 | #include <sysdep.h> |
30de3b18 | 27 | |
07a4742f | 28 | #ifndef EILSEQ |
4bca4c17 | 29 | # define EILSEQ EINVAL |
07a4742f RM |
30 | #endif |
31 | ||
4bca4c17 UD |
32 | /* This is the private state used if PS is NULL. */ |
33 | static mbstate_t state; | |
6dbe2837 | 34 | |
30de3b18 | 35 | size_t |
23396375 | 36 | __mbrtowc (wchar_t *pwc, const char *s, size_t n, mbstate_t *ps) |
30de3b18 | 37 | { |
4bca4c17 | 38 | wchar_t buf[1]; |
d64b6ad0 | 39 | struct __gconv_step_data data; |
4bca4c17 UD |
40 | int status; |
41 | size_t result; | |
8619129f | 42 | size_t dummy; |
16edf13b | 43 | const unsigned char *inbuf, *endbuf; |
1c99f950 | 44 | unsigned char *outbuf = (unsigned char *) (pwc ?: buf); |
96310297 | 45 | const struct gconv_fcts *fcts; |
4bca4c17 | 46 | |
515ab778 | 47 | /* Set information for this step. */ |
d64b6ad0 UD |
48 | data.__invocation_counter = 0; |
49 | data.__internal_use = 1; | |
85830c4c | 50 | data.__flags = __GCONV_IS_LAST; |
d64b6ad0 | 51 | data.__statep = ps ?: &state; |
4bca4c17 UD |
52 | |
53 | /* A first special case is if S is NULL. This means put PS in the | |
54 | initial state. */ | |
30de3b18 RM |
55 | if (s == NULL) |
56 | { | |
1c99f950 | 57 | outbuf = (unsigned char *) buf; |
4bca4c17 UD |
58 | s = ""; |
59 | n = 1; | |
30de3b18 RM |
60 | } |
61 | ||
9781a370 OB |
62 | if (n == 0) |
63 | return (size_t) -2; | |
64 | ||
515ab778 UD |
65 | /* Tell where we want the result. */ |
66 | data.__outbuf = outbuf; | |
67 | data.__outbufend = outbuf + sizeof (wchar_t); | |
68 | ||
96310297 RM |
69 | /* Get the conversion functions. */ |
70 | fcts = get_gconv_fcts (_NL_CURRENT_DATA (LC_CTYPE)); | |
07a4742f | 71 | |
4bca4c17 | 72 | /* Do a normal conversion. */ |
b117f744 | 73 | inbuf = (const unsigned char *) s; |
16edf13b | 74 | endbuf = inbuf + n; |
a1ffb40e | 75 | if (__glibc_unlikely (endbuf < inbuf)) |
d3ed7225 UD |
76 | { |
77 | endbuf = (const unsigned char *) ~(uintptr_t) 0; | |
78 | if (endbuf == inbuf) | |
79 | goto ilseq; | |
80 | } | |
915a6c51 UD |
81 | __gconv_fct fct = fcts->towc->__fct; |
82 | #ifdef PTR_DEMANGLE | |
83 | if (fcts->towc->__shlib_handle != NULL) | |
84 | PTR_DEMANGLE (fct); | |
85 | #endif | |
86 | status = DL_CALL_FCT (fct, (fcts->towc, &data, &inbuf, endbuf, | |
87 | NULL, &dummy, 0, 1)); | |
4bca4c17 UD |
88 | |
89 | /* There must not be any problems with the conversion but illegal input | |
90 | characters. The output buffer must be large enough, otherwise the | |
91 | definition of MB_CUR_MAX is not correct. All the other possible | |
92 | errors also must not happen. */ | |
d64b6ad0 UD |
93 | assert (status == __GCONV_OK || status == __GCONV_EMPTY_INPUT |
94 | || status == __GCONV_ILLEGAL_INPUT | |
95 | || status == __GCONV_INCOMPLETE_INPUT | |
96 | || status == __GCONV_FULL_OUTPUT); | |
4bca4c17 | 97 | |
d64b6ad0 UD |
98 | if (status == __GCONV_OK || status == __GCONV_EMPTY_INPUT |
99 | || status == __GCONV_FULL_OUTPUT) | |
4bca4c17 | 100 | { |
d64b6ad0 | 101 | if (data.__outbuf != (unsigned char *) outbuf |
b117f744 | 102 | && *(wchar_t *) outbuf == L'\0') |
07a4742f | 103 | { |
4bca4c17 | 104 | /* The converted character is the NUL character. */ |
d64b6ad0 | 105 | assert (__mbsinit (data.__statep)); |
4bca4c17 | 106 | result = 0; |
07a4742f | 107 | } |
4bca4c17 | 108 | else |
b117f744 | 109 | result = inbuf - (const unsigned char *) s; |
4bca4c17 | 110 | } |
1f547466 UD |
111 | else if (status == __GCONV_INCOMPLETE_INPUT) |
112 | result = (size_t) -2; | |
4bca4c17 UD |
113 | else |
114 | { | |
d3ed7225 | 115 | ilseq: |
1f547466 | 116 | result = (size_t) -1; |
4bca4c17 | 117 | __set_errno (EILSEQ); |
30de3b18 RM |
118 | } |
119 | ||
4bca4c17 | 120 | return result; |
30de3b18 | 121 | } |
37ba7d66 | 122 | libc_hidden_def (__mbrtowc) |
23396375 | 123 | weak_alias (__mbrtowc, mbrtowc) |
9b0b40d3 | 124 | libc_hidden_weak (mbrtowc) |
db6af3eb UD |
125 | |
126 | /* There should be no difference between the UTF-32 handling required | |
127 | by mbrtoc32 and the wchar_t handling which has long since been | |
128 | implemented in mbrtowc. */ | |
129 | weak_alias (__mbrtowc, mbrtoc32) |