1 /* Test restarting behaviour of wcsrtombs.
2 Copyright (C) 2000-2022 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4
5 The GNU C Library is free software; you can redistribute it and/or
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.
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
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
18
19 #include <stdio.h>
20 #include <string.h>
21 #include <wchar.h>
22 #include <locale.h>
23
24 #define show(expr, nexp, srcexp, bufexp) \
25 { \
26 size_t res = expr; \
27 printf (#expr " -> %zu", res); \
28 dst += res; \
29 printf (", src = srcbuf+%td, dst = buf+%td", \
30 src - srcbuf, dst - (char *) buf); \
31 if (res != nexp || src != (srcexp) || dst != (char *) (bufexp)) \
32 { \
33 printf (", expected %zu and srcbuf+%td and buf+%td", (size_t) nexp, \
34 (srcexp) - srcbuf, (bufexp) - (unsigned char *) buf); \
35 result = 1; \
36 } \
37 putc ('\n', stdout); \
38 }
39
40 static int
do_test(void)41 do_test (void)
42 {
43 unsigned char buf[6] = { 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };
44 const unsigned char bufcheck[6] = { 0x25, 0xe2, 0x82, 0xac, 0xce, 0xbb };
45 const wchar_t srcbuf[4] = { 0x25, 0x20ac, 0x03bb, 0 };
46 mbstate_t state;
47 const wchar_t *src;
48 char *dst;
49 int result = 0;
50 const char *used_locale;
51
52 setlocale (LC_CTYPE, "de_DE.UTF-8");
53 /* Double check. */
54 used_locale = setlocale (LC_CTYPE, NULL);
55 printf ("used locale: \"%s\"\n", used_locale);
56 result = strcmp (used_locale, "de_DE.UTF-8");
57
58 memset (&state, '\0', sizeof (state));
59
60 src = srcbuf;
61 dst = (char *) buf;
62 show (wcsrtombs (dst, &src, 1, &state), 1, srcbuf + 1, buf + 1);
63 show (wcsrtombs (dst, &src, 1, &state), 0, srcbuf + 1, buf + 1);
64 show (wcsrtombs (dst, &src, 4, &state), 3, srcbuf + 2, buf + 4);
65 show (wcsrtombs (dst, &src, 2, &state), 2, srcbuf + 3, buf + 6);
66
67 if (memcmp (buf, bufcheck, 6))
68 {
69 puts ("wrong results");
70 result = 1;
71 }
72
73 return result;
74 }
75
76 #define TEST_FUNCTION do_test ()
77 #include "../test-skeleton.c"
78