pintos-os.org Git - pspp/blob - tests/test-btowc.c

   1 /* Test of conversion of unibyte character to wide character.
   2    Copyright (C) 2008, 2009 Free Software Foundation, Inc.
   3
   4    This program is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation; either version 3 of the License, or
   7    (at your option) any later version.
   8
   9    This program 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
  12    GNU General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  16
  17 /* Written by Bruno Haible <bruno@clisp.org>, 2008.  */
  18
  19 #include <config.h>
  20
  21 #include <wchar.h>
  22
  23 #include "signature.h"
  24 SIGNATURE_CHECK (btowc, wint_t, (int));
  25
  26 #include <locale.h>
  27 #include <stdio.h>
  28 #include <stdlib.h>
  29
  30 #define ASSERT(expr) \
  31   do                                                                         \
  32     {                                                                        \
  33       if (!(expr))                                                           \
  34         {                                                                    \
  35           fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \
  36           fflush (stderr);                                                   \
  37           abort ();                                                          \
  38         }                                                                    \
  39     }                                                                        \
  40   while (0)
  41
  42 int
  43 main (int argc, char *argv[])
  44 {
  45   int c;
  46
  47   /* configure should already have checked that the locale is supported.  */
  48   if (setlocale (LC_ALL, "") == NULL)
  49     return 1;
  50
  51   ASSERT (btowc (EOF) == WEOF);
  52
  53   if (argc > 1)
  54     switch (argv[1][0])
  55       {
  56       case '1':
  57         /* Locale encoding is ISO-8859-1 or ISO-8859-15.  */
  58         for (c = 0; c < 0x80; c++)
  59           ASSERT (btowc (c) == c);
  60         for (c = 0xA0; c < 0x100; c++)
  61           ASSERT (btowc (c) != WEOF);
  62         return 0;
  63
  64       case '2':
  65         /* Locale encoding is UTF-8.  */
  66         for (c = 0; c < 0x80; c++)
  67           ASSERT (btowc (c) == c);
  68         for (c = 0x80; c < 0x100; c++)
  69           ASSERT (btowc (c) == WEOF);
  70         return 0;
  71       }
  72
  73   return 1;
  74 }