1 /*-
2 * Copyright (C) 2009 Gabor Kovesdan <gabor@FreeBSD.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD: stable/12/tools/test/iconv/posix/posix.c 372561 2022-09-18 06:28:57Z kevans $");
29
30 #include <sys/param.h>
31 #include <sys/endian.h>
32
33 #include <err.h>
34 #include <errno.h>
35 #include <iconv.h>
36 #include <stdbool.h>
37 #include <stdio.h>
38 #include <stdlib.h>
39
40 /*
41 * iconv_open must return (iconv_t)-1 on non-existing encoding
42 * and set errno to EINVAL.
43 */
44 static int
open_1(void)45 open_1(void)
46 {
47 iconv_t cd;
48
49 errno = 0;
50 cd = iconv_open("nonexisting", "foobar");
51
52 if ((cd == (iconv_t)-1) && (errno == EINVAL))
53 return (0);
54 else {
55 iconv_close(cd);
56 return (1);
57 }
58 }
59
60 /*
61 * iconv_open must return (iconv_t)-1 if too much files are open
62 * and set errno to ENFILE.
63 */
64 #define MAX_LIMIT 1025
65 static int
open_2(void)66 open_2(void)
67 {
68 iconv_t cd[MAX_LIMIT];
69 size_t i;
70 int ret;
71
72 errno = 0;
73 ret = 1;
74 for (i = 0; i < MAX_LIMIT; i++) {
75 cd[i] = iconv_open("ASCII", "UTF8");
76 if (cd[i] == (iconv_t)-1) {
77 if (errno == ENFILE || errno == EMFILE)
78 ret = 0;
79 cd[i] = NULL;
80 break;
81 }
82 }
83
84 for (i = MIN(i, nitems(cd) - 1); i > 0; i--)
85 iconv_close(cd[i]);
86 return (ret);
87 }
88
89 /*
90 * iconv_close must return (iconv_t)-1 if conversion descriptor is
91 * invalid and set errno to EBADF.
92 */
93 static int
close_1(void)94 close_1(void)
95 {
96 iconv_t cd = (iconv_t)-1;
97
98 return ((iconv_close(cd) == -1) && (errno = EBADF) ? 0 : 1);
99 }
100
101 static int
conv_ebadf(void)102 conv_ebadf(void)
103 {
104 iconv_t cd = (iconv_t)-1;
105
106 errno = 0;
107 return ((iconv(cd, NULL, 0, NULL, 0) == (size_t)-1 && errno == EBADF) ? 0 : 1);
108 }
109
110 static int
conv_ret(void)111 conv_ret(void)
112 {
113 iconv_t cd;
114 size_t inbytesleft, outbytesleft;
115 const char *inptr;
116 char *outptr;
117 uint32_t outbuf[4];
118 uint32_t inbuf[2] = { 0x00000151, 0x00000171 };
119
120 if ((cd = iconv_open("ASCII", "UTF-32LE")) == (iconv_t)-1)
121 return (1);
122
123 inptr = (const char *)inbuf;
124 outptr = (char *)outbuf;
125 inbytesleft = 8;
126 outbytesleft = 16;
127
128 return (iconv(cd, &inptr, &inbytesleft, &outptr, &outbytesleft) == 2 ? 0 : 1);
129 }
130
131 static int
conv_2big(void)132 conv_2big(void)
133 {
134 iconv_t cd;
135 size_t inbytesleft, outbytesleft;
136 const char *inptr;
137 char *outptr;
138 uint32_t inbuf[4];
139 uint32_t outbuf[2];
140 int ret;
141
142 if ((cd = iconv_open("ASCII", "ASCII")) == (iconv_t)-1)
143 return (1);
144
145 inptr = (const char *)inbuf;
146 outptr = (char *)outbuf;
147 inbytesleft = 16;
148 outbytesleft = 8;
149
150 errno = 0;
151 ret = iconv(cd, &inptr, &inbytesleft, &outptr, &outbytesleft);
152
153 #ifdef VERBOSE
154 printf("inptr - inbuf = %d\n", (const uint8_t *)inptr - (uint8_t *)inbuf);
155 printf("inbytesleft = %d\n", inbytesleft);
156 printf("outbytesleft = %d\n", outbytesleft);
157 printf("outptr - outbuf = %d\n", (uint8_t *)outptr - (uint8_t *)outbuf);
158 printf("errno = %d\n", errno);
159 printf("ret = %d\n", (int)ret);
160 #endif
161
162 if (((const uint8_t *)inptr - (uint8_t *)inbuf == 8) && (inbytesleft == 8) &&
163 (outbytesleft == 0) && ((uint8_t *)outptr - (uint8_t *)outbuf == 8) &&
164 (errno == E2BIG) && ((size_t)ret == (size_t)-1))
165 return (0);
166 else
167 return (1);
168 }
169
170 static int
conv_einval(void)171 conv_einval(void)
172 {
173 iconv_t cd;
174 size_t inbytesleft, outbytesleft;
175 const char *inptr;
176 char *outptr;
177 uint32_t outbuf[4];
178 uint16_t inbuf[1] = { 0xEA42 };
179 int ret;
180
181 if ((cd = iconv_open("UTF-32", "BIG5")) == (iconv_t)-1)
182 return (1);
183
184 inptr = (const char *)inbuf;
185 outptr = (char *)outbuf;
186 inbytesleft = 2;
187 outbytesleft = 16;
188
189 errno = 0;
190 ret = iconv(cd, &inptr, &inbytesleft, &outptr, &outbytesleft);
191
192 #ifdef VERBOSE
193 printf("inptr - inbuf = %d\n", (const uint8_t *)inptr - (uint8_t *)inbuf);
194 printf("inbytesleft = %d\n", inbytesleft);
195 printf("outbytesleft = %d\n", outbytesleft);
196 printf("outptr - outbuf = %d\n", (uint8_t *)outptr - (uint8_t *)outbuf);
197 printf("errno = %d\n", errno);
198 printf("ret = %d\n", (int)ret);
199 #endif
200
201 if (((const uint8_t *)inptr - (uint8_t *)inbuf == 1) && (inbytesleft == 1) &&
202 (outbytesleft == 8) && ((uint8_t *)outptr - (uint8_t *)outbuf == 8) &&
203 (errno == EINVAL) && ((size_t)ret == (size_t)-1))
204 return (0);
205 else
206 return (1);
207 }
208
209 static int
conv_eilseq(void)210 conv_eilseq(void)
211 {
212 iconv_t cd;
213 size_t inbytesleft, outbytesleft;
214 const char *inptr;
215 char *outptr;
216 uint32_t outbuf[4];
217 uint16_t inbuf[1] = { 0x8AC0 };
218 int ret;
219
220 if ((cd = iconv_open("Latin2", "UTF-16LE")) == (iconv_t)-1)
221 return (1);
222
223 inptr = (const char *)inbuf;
224 outptr = (char *)outbuf;
225 inbytesleft = 4;
226 outbytesleft = 16;
227
228 errno = 0;
229 ret = iconv(cd, &inptr, &inbytesleft, &outptr, &outbytesleft);
230
231 #ifdef VERBOSE
232 printf("inptr - inbuf = %d\n", (const uint8_t *)inptr - (uint8_t *)inbuf);
233 printf("inbytesleft = %d\n", inbytesleft);
234 printf("outbytesleft = %d\n", outbytesleft);
235 printf("outptr - outbuf = %d\n", (uint8_t *)outptr - (uint8_t *)outbuf);
236 printf("errno = %d\n", errno);
237 printf("ret = %d\n", (int)ret);
238 #endif
239
240 if (((const uint8_t *)inptr - (uint8_t *)inbuf == 0) && (inbytesleft == 4) &&
241 (outbytesleft == 16) && ((uint8_t *)outptr - (uint8_t *)outbuf == 0) &&
242 (errno == EILSEQ) && ((size_t)ret == (size_t)-1))
243 return (0);
244 else
245 return (1);
246 }
247
248 static void
test(int (tester)(void),const char * label)249 test(int (tester) (void), const char * label)
250 {
251 int ret;
252
253 if ((ret = tester()))
254 printf("%s failed (%d)\n", label, ret);
255 else
256 printf("%s succeeded\n", label);
257 }
258
259 int
main(void)260 main(void)
261 {
262
263 test(open_1, "open_1");
264 test(open_2, "open_2");
265 test(close_1, "close_1");
266 test(conv_ret, "conv_ret");
267 test(conv_ebadf, "conv_ebadf");
268 test(conv_2big, "conv_2big");
269 test(conv_einval, "conv_einval");
270 test(conv_eilseq, "conv_eilseq");
271 }
272