1  /* Test of conversion of unibyte character to wide character.
       2     Copyright (C) 2008-2023 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 <https://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  
      29  #include "macros.h"
      30  
      31  int
      32  main (int argc, char *argv[])
      33  {
      34    int c;
      35  
      36    /* configure should already have checked that the locale is supported.  */
      37    if (setlocale (LC_ALL, "") == NULL)
      38      return 1;
      39  
      40    ASSERT (btowc (EOF) == WEOF);
      41  
      42  #ifdef __ANDROID__
      43    /* On Android ≥ 5.0, the default locale is the "C.UTF-8" locale, not the
      44       "C" locale.  Furthermore, when you attempt to set the "C" or "POSIX"
      45       locale via setlocale(), what you get is a "C" locale with UTF-8 encoding,
      46       that is, effectively the "C.UTF-8" locale.  */
      47    if (argc > 1 && strcmp (argv[1], "3") == 0 && MB_CUR_MAX > 1)
      48      argv[1] = "2";
      49  #endif
      50  
      51    if (argc > 1)
      52      switch (argv[1][0])
      53        {
      54        case '1':
      55          /* Locale encoding is ISO-8859-1 or ISO-8859-15.  */
      56          for (c = 0; c < 0x80; c++)
      57            ASSERT (btowc (c) == c);
      58          for (c = 0xA0; c < 0x100; c++)
      59            ASSERT (btowc (c) != WEOF);
      60          return 0;
      61  
      62        case '2':
      63          /* Locale encoding is UTF-8.  */
      64          for (c = 0; c < 0x80; c++)
      65            ASSERT (btowc (c) == c);
      66          for (c = 0x80; c < 0x100; c++)
      67            ASSERT (btowc (c) == WEOF);
      68          return 0;
      69  
      70        case '3':
      71          /* C or POSIX locale.  */
      72          for (c = 0; c < 0x100; c++)
      73            if (c != 0)
      74              {
      75                /* We are testing all nonnull bytes.  */
      76                wint_t wc = btowc (c);
      77                /* POSIX:2018 says: "In the POSIX locale, btowc() shall not return
      78                   WEOF if c has a value in the range 0 to 255 inclusive."  */
      79                if (c < 0x80)
      80                  /* c is an ASCII character.  */
      81                  ASSERT (wc == c);
      82                else
      83                  /* On most platforms, the bytes 0x80..0xFF map to U+0080..U+00FF.
      84                     But on musl libc, the bytes 0x80..0xFF map to U+DF80..U+DFFF.  */
      85                  ASSERT (wc == c || wc == 0xDF00 + c);
      86              }
      87          return 0;
      88        }
      89  
      90    return 1;
      91  }