Merge branch 'master' of /users/git/dtbartle/glibc-opensolaris
[kopensolaris-gnu/glibc.git] / localedata / tst-mbswcs2.c
1 /* Test restarting behaviour of mbsnrtowcs.
2    Copyright (C) 2000 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4    Contributed by Bruno Haible <haible@ilog.fr>.
5
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
10
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
15
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, write to the Free
18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19    02111-1307 USA.  */
20
21 #include <stdio.h>
22 #include <string.h>
23 #include <wchar.h>
24 #include <locale.h>
25
26 #define show(expr, nexp, wcexp, end) \
27   n = expr;                                                             \
28   printf (#expr " -> %Zd", n);                                          \
29   printf (", wc = %lu, src = buf+%d", (unsigned long int) wc,           \
30           src - (const char *) buf);                                    \
31   if (n != (size_t) nexp || wc != wcexp || src != (const char *) (end)) \
32     {                                                                   \
33       printf (", expected %Zd and %lu and buf+%d", nexp,                \
34               (unsigned long int) wcexp, (end) - buf);                  \
35       result = 1;                                                       \
36     }                                                                   \
37   putc ('\n', stdout)
38
39 int
40 main (void)
41 {
42   unsigned char buf[6] = { 0x25,  0xe2, 0x82, 0xac,  0xce, 0xbb };
43   mbstate_t state;
44   const char *src;
45   wchar_t wc = 42;
46   size_t n;
47   int result = 0;
48   const char *used_locale;
49
50   setlocale (LC_CTYPE,"de_DE.UTF-8");
51   /* Double check.  */
52   used_locale = setlocale (LC_CTYPE, NULL);
53   printf ("used locale: \"%s\"\n", used_locale);
54   result = strcmp (used_locale, "de_DE.UTF-8");
55
56   memset (&state, '\0', sizeof (state));
57
58   src = (const char *) buf;
59   show (mbsnrtowcs (&wc, &src, 1, 1, &state), 1, 37, buf + 1);
60   show (mbsnrtowcs (&wc, &src, 3, 1, &state), 1, 8364, buf + 4);
61   show (mbsnrtowcs (&wc, &src, 1, 1, &state), 0, 8364, buf + 5);
62   show (mbsnrtowcs (&wc, &src, 1, 1, &state), 1, 955, buf + 6);
63
64   return result;
65 }