root/maint/gnulib/tests/test-iconv.c

/* */

DEFINITIONS

1. main

   1 /* Test of character set conversion.
   2    Copyright (C) 2007-2021 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>, 2007.  */
  18 
  19 #include <config.h>
  20 
  21 #if HAVE_ICONV
  22 # include <iconv.h>
  23 
  24 # ifndef ICONV_CONST
  25 #  define ICONV_CONST /* empty */
  26 # endif
  27 
  28 #include "signature.h"
  29 SIGNATURE_CHECK (iconv, size_t, (iconv_t, ICONV_CONST char **, size_t *,
  30                                  char **, size_t *));
  31 SIGNATURE_CHECK (iconv_close, int, (iconv_t x));
  32 SIGNATURE_CHECK (iconv_open, iconv_t, (char const *, char const *));
  33 
  34 #endif
  35 
  36 #include <errno.h>
  37 #include <string.h>
  38 
  39 #include "macros.h"
  40 
  41 int
  42 main ()
     /*  */
  43 {
  44 #if HAVE_ICONV
  45   /* Assume that iconv() supports at least the encodings ASCII, ISO-8859-1,
  46      and UTF-8.  */
  47   iconv_t cd_88591_to_utf8 = iconv_open ("UTF-8", "ISO-8859-1");
  48   iconv_t cd_utf8_to_88591 = iconv_open ("ISO-8859-1", "UTF-8");
  49 
  50 #if defined __MVS__ && defined __IBMC__
  51   /* String literals below are in ASCII, not EBCDIC.  */
  52 # pragma convert("ISO8859-1")
  53 # define CONVERT_ENABLED
  54 #endif
  55 
  56   ASSERT (cd_88591_to_utf8 != (iconv_t)(-1));
  57   ASSERT (cd_utf8_to_88591 != (iconv_t)(-1));
  58 
  59   /* Test conversion from ISO-8859-1 to UTF-8 with no errors.  */
  60   {
  61     static const char input[] = "\304rger mit b\366sen B\374bchen ohne Augenma\337";
  62     static const char expected[] = "\303\204rger mit b\303\266sen B\303\274bchen ohne Augenma\303\237";
  63     char buf[50];
  64     const char *inptr = input;
  65     size_t inbytesleft = strlen (input);
  66     char *outptr = buf;
  67     size_t outbytesleft = sizeof (buf);
  68     size_t res = iconv (cd_88591_to_utf8,
  69                         (ICONV_CONST char **) &inptr, &inbytesleft,
  70                         &outptr, &outbytesleft);
  71     ASSERT (res == 0 && inbytesleft == 0);
  72     ASSERT (outptr == buf + strlen (expected));
  73     ASSERT (memcmp (buf, expected, strlen (expected)) == 0);
  74   }
  75 
  76   /* Test conversion from ISO-8859-1 to UTF-8 with E2BIG.  */
  77   {
  78     static const char input[] = "\304";
  79     static char buf[2] = { (char)0xDE, (char)0xAD };
  80     const char *inptr = input;
  81     size_t inbytesleft = 1;
  82     char *outptr = buf;
  83     size_t outbytesleft = 1;
  84     size_t res = iconv (cd_88591_to_utf8,
  85                         (ICONV_CONST char **) &inptr, &inbytesleft,
  86                         &outptr, &outbytesleft);
  87     ASSERT (res == (size_t)(-1) && errno == E2BIG);
  88     ASSERT (inbytesleft == 1);
  89     ASSERT (outbytesleft == 1);
  90     ASSERT ((unsigned char) buf[1] == 0xAD);
  91     ASSERT ((unsigned char) buf[0] == 0xDE);
  92   }
  93 
  94   /* Test conversion from UTF-8 to ISO-8859-1 with no errors.  */
  95   {
  96     static const char input[] = "\303\204rger mit b\303\266sen B\303\274bchen ohne Augenma\303\237";
  97     static const char expected[] = "\304rger mit b\366sen B\374bchen ohne Augenma\337";
  98     char buf[50];
  99     const char *inptr = input;
 100     size_t inbytesleft = strlen (input);
 101     char *outptr = buf;
 102     size_t outbytesleft = sizeof (buf);
 103     size_t res = iconv (cd_utf8_to_88591,
 104                         (ICONV_CONST char **) &inptr, &inbytesleft,
 105                         &outptr, &outbytesleft);
 106     ASSERT (res == 0 && inbytesleft == 0);
 107     ASSERT (outptr == buf + strlen (expected));
 108     ASSERT (memcmp (buf, expected, strlen (expected)) == 0);
 109   }
 110 
 111   /* Test conversion from UTF-8 to ISO-8859-1 with EILSEQ.  */
 112   {
 113     static const char input[] = "\342\202\254"; /* EURO SIGN */
 114     char buf[10];
 115     const char *inptr = input;
 116     size_t inbytesleft = strlen (input);
 117     char *outptr = buf;
 118     size_t outbytesleft = sizeof (buf);
 119     size_t res = iconv (cd_utf8_to_88591,
 120                         (ICONV_CONST char **) &inptr, &inbytesleft,
 121                         &outptr, &outbytesleft);
 122     if (res == (size_t)(-1))
 123       {
 124         ASSERT (errno == EILSEQ);
 125         ASSERT (inbytesleft == strlen (input) && outptr == buf);
 126       }
 127     else
 128       {
 129         ASSERT (res == 1);
 130         ASSERT (inbytesleft == 0);
 131       }
 132   }
 133 
 134   /* Test conversion from UTF-8 to ISO-8859-1 with EINVAL.  */
 135   {
 136     static const char input[] = "\342";
 137     char buf[10];
 138     const char *inptr = input;
 139     size_t inbytesleft = 1;
 140     char *outptr = buf;
 141     size_t outbytesleft = sizeof (buf);
 142     size_t res = iconv (cd_utf8_to_88591,
 143                         (ICONV_CONST char **) &inptr, &inbytesleft,
 144                         &outptr, &outbytesleft);
 145     ASSERT (res == (size_t)(-1) && errno == EINVAL);
 146     ASSERT (inbytesleft == 1 && outptr == buf);
 147   }
 148 
 149   iconv_close (cd_88591_to_utf8);
 150   iconv_close (cd_utf8_to_88591);
 151 
 152 #ifdef CONVERT_ENABLED
 153 # pragma convert(pop)
 154 #endif
 155 
 156 #endif /* HAVE_ICONV */
 157 
 158   return 0;
 159 }

/* */