Simplify calling convention of u*_conv_to_encoding.
[gnulib.git] / tests / uniconv / test-u32-conv-to-enc.c
1 /* Test of conversion from UTF-32 to legacy encodings.
2    Copyright (C) 2007-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>, 2007.  */
18
19 #include <config.h>
20
21 #include "uniconv.h"
22
23 #include <errno.h>
24 #include <stdio.h>
25 #include <stdlib.h>
26 #include <string.h>
27
28 #define SIZEOF(array) (sizeof (array) / sizeof (array[0]))
29 #define ASSERT(expr) \
30   do                                                                         \
31     {                                                                        \
32       if (!(expr))                                                           \
33         {                                                                    \
34           fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \
35           fflush (stderr);                                                   \
36           abort ();                                                          \
37         }                                                                    \
38     }                                                                        \
39   while (0)
40
41 /* Magic number for detecting bounds violations.  */
42 #define MAGIC 0x1983EFF1
43
44 static size_t *
45 new_offsets (size_t n)
46 {
47   size_t *offsets = (size_t *) malloc ((n + 1) * sizeof (size_t));
48   offsets[n] = MAGIC;
49   return offsets;
50 }
51
52 int
53 main ()
54 {
55   static enum iconv_ilseq_handler handlers[] =
56     { iconveh_error, iconveh_question_mark, iconveh_escape_sequence };
57   size_t h;
58   size_t o;
59   size_t i;
60
61 #if HAVE_ICONV
62   /* Assume that iconv() supports at least the encodings ASCII, ISO-8859-1,
63      ISO-8859-2, and UTF-8.  */
64
65   /* Test conversion from UTF-32 to ISO-8859-1 with no errors.  */
66   for (h = 0; h < SIZEOF (handlers); h++)
67     {
68       enum iconv_ilseq_handler handler = handlers[h];
69       static const uint32_t input[] = /* Ärger mit bösen Bübchen ohne Augenmaß */
70         {
71           0xC4, 'r', 'g', 'e', 'r', ' ', 'm', 'i', 't', ' ', 'b', 0xF6, 's',
72           'e', 'n', ' ', 'B', 0xFC, 'b', 'c', 'h', 'e', 'n', ' ', 'o', 'h',
73           'n', 'e', ' ', 'A', 'u', 'g', 'e', 'n', 'm', 'a', 0xDF
74         };
75       static const char expected[] = "\304rger mit b\366sen B\374bchen ohne Augenma\337";
76       for (o = 0; o < 2; o++)
77         {
78           size_t *offsets = (o ? new_offsets (SIZEOF (input)) : NULL);
79           size_t length;
80           char *result = u32_conv_to_encoding ("ISO-8859-1", handler,
81                                                input, SIZEOF (input),
82                                                offsets,
83                                                NULL, &length);
84           ASSERT (result != NULL);
85           ASSERT (length == strlen (expected));
86           ASSERT (memcmp (result, expected, length) == 0);
87           if (o)
88             {
89               for (i = 0; i < 37; i++)
90                 ASSERT (offsets[i] == i);
91               ASSERT (offsets[37] == MAGIC);
92               free (offsets);
93             }
94           free (result);
95         }
96     }
97
98   /* Test conversion from UTF-32 to ISO-8859-1 with EILSEQ.  */
99   for (h = 0; h < SIZEOF (handlers); h++)
100     {
101       enum iconv_ilseq_handler handler = handlers[h];
102       static const uint32_t input[] = /* Rafał Maszkowski */
103         {
104           'R', 'a', 'f', 'a', 0x0142, ' ', 'M', 'a', 's', 'z', 'k', 'o', 'w',
105           's', 'k', 'i'
106         };
107       for (o = 0; o < 2; o++)
108         {
109           size_t *offsets = (o ? new_offsets (SIZEOF (input)) : NULL);
110           size_t length = 0xdead;
111           char *result = u32_conv_to_encoding ("ISO-8859-1", handler,
112                                                input, SIZEOF (input),
113                                                offsets,
114                                                NULL, &length);
115           switch (handler)
116             {
117             case iconveh_error:
118               ASSERT (result == NULL);
119               ASSERT (errno == EILSEQ);
120               ASSERT (length == 0xdead);
121               break;
122             case iconveh_question_mark:
123               {
124                 static const char expected[] = "Rafa? Maszkowski";
125                 static const char expected_translit[] = "Rafal Maszkowski";
126                 ASSERT (result != NULL);
127                 ASSERT (length == strlen (expected));
128                 ASSERT (memcmp (result, expected, length) == 0
129                         || memcmp (result, expected_translit, length) == 0);
130                 if (o)
131                   {
132                     for (i = 0; i < 16; i++)
133                       ASSERT (offsets[i] == i);
134                     ASSERT (offsets[16] == MAGIC);
135                     free (offsets);
136                   }
137                 free (result);
138               }
139               break;
140             case iconveh_escape_sequence:
141               {
142                 static const char expected[] = "Rafa\\u0142 Maszkowski";
143                 ASSERT (result != NULL);
144                 ASSERT (length == strlen (expected));
145                 ASSERT (memcmp (result, expected, length) == 0);
146                 if (o)
147                   {
148                     for (i = 0; i < 16; i++)
149                       ASSERT (offsets[i] == (i < 5 ? i : i + 5));
150                     ASSERT (offsets[16] == MAGIC);
151                     free (offsets);
152                   }
153                 free (result);
154               }
155               break;
156             }
157         }
158     }
159
160 #endif
161
162   return 0;
163 }