iconv/tst-iconv6.c

   1 /* Testing ucs4le_internal_loop() in gconv_simple.c.
   2    Copyright (C) 2016-2023 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 <errno.h>
  21 #include <string.h>
  22 #include <inttypes.h>
  23 #include <iconv.h>
  24 #include <byteswap.h>
  25 #include <endian.h>
  26
  27 static int
  28 do_test (void)
  29 {
  30   iconv_t cd;
  31   char *inptr;
  32   size_t inlen;
  33   char *outptr;
  34   size_t outlen;
  35   size_t n;
  36   int e;
  37   int result = 0;
  38
  39 #if __BYTE_ORDER == __BIG_ENDIAN
  40   /* On big-endian machines, ucs4le_internal_loop() swaps the bytes before
  41      error checking. Thus the input values has to be swapped.  */
  42 # define VALUE(val) bswap_32 (val)
  43 #else
  44 # define VALUE(val) val
  45 #endif
  46   uint32_t inbuf[3] = { VALUE (0x41), VALUE (0x80000000), VALUE (0x42) };
  47   uint32_t outbuf[3] = { 0, 0, 0 };
  48
  49   cd = iconv_open ("WCHAR_T", "UCS-4LE");
  50   if (cd == (iconv_t) -1)
  51     {
  52       printf ("cannot convert from UCS4LE to wchar_t: %m\n");
  53       return 1;
  54     }
  55
  56   inptr = (char *) inbuf;
  57   inlen = sizeof (inbuf);
  58   outptr = (char *) outbuf;
  59   outlen = sizeof (outbuf);
  60
  61   n = iconv (cd, &inptr, &inlen, &outptr, &outlen);
  62   e = errno;
  63
  64   if (n != (size_t) -1)
  65     {
  66       printf ("incorrect iconv() return value: %zd, expected -1\n", n);
  67       result = 1;
  68     }
  69
  70   if (e != EILSEQ)
  71     {
  72       printf ("incorrect error value: %s, expected %s\n",
  73               strerror (e), strerror (EILSEQ));
  74       result = 1;
  75     }
  76
  77   if (inptr != (char *) &inbuf[1])
  78     {
  79       printf ("inptr=0x%p does not point to invalid character! Expected=0x%p\n"
  80               , inptr, &inbuf[1]);
  81       result = 1;
  82     }
  83
  84   if (inlen != sizeof (inbuf) - sizeof (uint32_t))
  85     {
  86       printf ("inlen=%zd != %zd\n"
  87               , inlen, sizeof (inbuf) - sizeof (uint32_t));
  88       result = 1;
  89     }
  90
  91   if (outptr != (char *) &outbuf[1])
  92     {
  93       printf ("outptr=0x%p does not point to invalid character in inbuf! "
  94               "Expected=0x%p\n"
  95               , outptr, &outbuf[1]);
  96       result = 1;
  97     }
  98
  99   if (outlen != sizeof (inbuf) - sizeof (uint32_t))
 100     {
 101       printf ("outlen=%zd != %zd\n"
 102               , outlen, sizeof (outbuf) - sizeof (uint32_t));
 103       result = 1;
 104     }
 105
 106   if (outbuf[0] != 0x41 || outbuf[1] != 0 || outbuf[2] != 0)
 107     {
 108       puts ("Characters conversion is incorrect!");
 109       result = 1;
 110     }
 111
 112   iconv_close (cd);
 113
 114   return result;
 115 }
 116
 117 #define TEST_FUNCTION do_test ()
 118 #include "../test-skeleton.c"