1: /* Test restarting behaviour of mbsrtowcs.
    2:    Copyright (C) 2000 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, write to the Free
   17:    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
   18:    02111-1307 USA.  */
   19: 
   20: #include <stdio.h>
   21: #include <string.h>
   22: #include <wchar.h>
   23: #include <locale.h>
   24: 
   25: #define show(expr, nexp, wcexp, end) \
   26:   n = expr;                                                             \
   27:   printf (#expr " -> %Zd", n);                                          \
   28:   printf (", wc = %lu, src = buf+%d", (unsigned long int) wc,           \
   29:           src - (const char *) buf);                                   \
   30:   if (n != (size_t) nexp || wc != wcexp || src != (const char *) (end)) \
   31:     {                                                                   \
   32:       printf (", expected %Zd and %lu and buf+%d", nexp,                \
   33:               (unsigned long int) wcexp, (end) - buf);                 \
   34:       result = 1;                                                       \
   35:     }                                                                   \
   36:   putc ('\n', stdout)
   37: 
   38: int
   39: main (void)
   40: {
   41:   unsigned char buf[6] = { 0x25,  0xe2, 0x82, 0xac,  0xce, 0xbb };
   42:   mbstate_t state;
   43:   const char *src;
   44:   wchar_t wc = 42;
   45:   size_t n;
   46:   int result = 0;
   47:   const char *used_locale;
   48: 
   49:   setlocale (LC_CTYPE,"de_DE.UTF-8");
   50:   /* Double check.  */
   51:   used_locale = setlocale (LC_CTYPE, NULL);
   52:   printf ("used locale: \"%s\"\n", used_locale);
   53:   result = strcmp (used_locale, "de_DE.UTF-8");
   54: 
   55:   memset (&state, '\0', sizeof (state));
   56: 
   57:   src = (const char *) buf;
   58:   show (mbsrtowcs (&wc, &src, 1, &state), 1, 37, buf + 1);
   59:   show (mbsrtowcs (&wc, &src, 1, &state), 1, 8364, buf + 4);
   60:   show (mbsrtowcs (&wc, &src, 1, &state), 1, 955, buf + 6);
   61: 
   62:   return result;
   63: }