xref: /freebsd/tools/test/iconv/posix/posix.c (revision f39bffc62c1395bde25d152c7f68fdf7cbaab414)
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$");
29 
30 #include <sys/endian.h>
31 #include <sys/types.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
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
66 open_2(void)
67 {
68 	iconv_t cd[MAX_LIMIT];
69 	int i, ret;
70 
71 	errno = 0;
72 	for (i = 0; i < MAX_LIMIT; i++) {
73 		cd[i] = iconv_open("ASCII", "UTF8");
74 		if (cd[i] == (iconv_t)-1)
75 			break;
76 	}
77 
78 	ret = (cd[i] == (iconv_t)-1) && ((errno == ENFILE) ||
79 	    (errno == EMFILE))  ? 0 : 1;
80 	for (; i > 0; i--)
81 		iconv_close(cd[i]);
82 	return (ret);
83 }
84 
85 /*
86  * iconv_close must return (iconv_t)-1 if conversion descriptor is
87  * invalid and set errno to EBADF.
88  */
89 static int
90 close_1(void)
91 {
92 	iconv_t cd = (iconv_t)-1;
93 
94 	return ((iconv_close(cd) == -1) && (errno = EBADF) ? 0 : 1);
95 }
96 
97 static int
98 conv_ebadf(void)
99 {
100 	iconv_t	cd = (iconv_t)-1;
101 
102 	errno = 0;
103 	return ((iconv(cd, NULL, 0, NULL, 0) == (size_t)-1 && errno == EBADF) ? 0 : 1);
104 }
105 
106 static int
107 conv_ret(void)
108 {
109 	iconv_t cd;
110 	size_t inbytesleft, outbytesleft;
111 	const char *inptr;
112 	char *outptr;
113 	uint32_t outbuf[4];
114 	uint32_t inbuf[2] = { 0x00000151, 0x00000171 };
115 
116 	if ((cd = iconv_open("ASCII", "UTF-32LE")) == (iconv_t)-1)
117 		return (1);
118 
119 	inptr = (const char *)inbuf;
120 	outptr = (char *)outbuf;
121 	inbytesleft = 8;
122 	outbytesleft = 16;
123 
124 	return (iconv(cd, &inptr, &inbytesleft, &outptr, &outbytesleft) == 2 ? 0 : 1);
125 }
126 
127 static int
128 conv_2big(void)
129 {
130 	iconv_t cd;
131 	size_t inbytesleft, outbytesleft;
132 	const char *inptr;
133 	char *outptr;
134 	uint32_t inbuf[4];
135 	uint32_t outbuf[2];
136 	int ret;
137 
138 	if ((cd = iconv_open("ASCII", "ASCII")) == (iconv_t)-1)
139 		return (1);
140 
141 	inptr = (const char *)inbuf;
142 	outptr = (char *)outbuf;
143 	inbytesleft = 16;
144 	outbytesleft = 8;
145 
146 	errno = 0;
147 	ret = iconv(cd, &inptr, &inbytesleft, &outptr, &outbytesleft);
148 
149 #ifdef VERBOSE
150 	printf("inptr - inbuf = %d\n", (const uint8_t *)inptr - (uint8_t *)inbuf);
151 	printf("inbytesleft = %d\n", inbytesleft);
152 	printf("outbytesleft = %d\n", outbytesleft);
153 	printf("outptr - outbuf = %d\n", (uint8_t *)outptr - (uint8_t *)outbuf);
154 	printf("errno = %d\n", errno);
155 	printf("ret = %d\n", (int)ret);
156 #endif
157 
158 	if (((const uint8_t *)inptr - (uint8_t *)inbuf == 8) && (inbytesleft == 8)  &&
159 	    (outbytesleft == 0) && ((uint8_t *)outptr - (uint8_t *)outbuf == 8) &&
160 	    (errno == E2BIG) && ((size_t)ret == (size_t)-1))
161 		return (0);
162 	else
163 		return (1);
164 }
165 
166 static int
167 conv_einval(void)
168 {
169 	iconv_t	 cd;
170 	size_t inbytesleft, outbytesleft;
171 	const char *inptr;
172 	char *outptr;
173 	uint32_t outbuf[4];
174         uint16_t inbuf[1] = { 0xEA42 };
175 	int ret;
176 
177 	if ((cd = iconv_open("UTF-32", "BIG5")) == (iconv_t)-1)
178 		return (1);
179 
180 	inptr = (const char *)inbuf;
181 	outptr = (char *)outbuf;
182 	inbytesleft = 2;
183 	outbytesleft = 16;
184 
185 	errno = 0;
186 	ret = iconv(cd, &inptr, &inbytesleft, &outptr, &outbytesleft);
187 
188 #ifdef VERBOSE
189 	printf("inptr - inbuf = %d\n", (const uint8_t *)inptr - (uint8_t *)inbuf);
190 	printf("inbytesleft = %d\n", inbytesleft);
191 	printf("outbytesleft = %d\n", outbytesleft);
192 	printf("outptr - outbuf = %d\n", (uint8_t *)outptr - (uint8_t *)outbuf);
193 	printf("errno = %d\n", errno);
194 	printf("ret = %d\n", (int)ret);
195 #endif
196 
197 	if (((const uint8_t *)inptr - (uint8_t *)inbuf == 1) && (inbytesleft == 1)  &&
198 	    (outbytesleft == 8) && ((uint8_t *)outptr - (uint8_t *)outbuf == 8) &&
199 	    (errno == EINVAL) && ((size_t)ret == (size_t)-1))
200 		return (0);
201 	else
202 		return (1);
203 }
204 
205 static int
206 conv_eilseq(void)
207 {
208 	iconv_t cd;
209 	size_t inbytesleft, outbytesleft;
210 	const char *inptr;
211 	char *outptr;
212 	uint32_t outbuf[4];
213 	uint16_t inbuf[1] = { 0x8AC0 };
214 	int ret;
215 
216 	if ((cd = iconv_open("Latin2", "UTF-16LE")) == (iconv_t)-1)
217 		return (1);
218 
219 	inptr = (const char *)inbuf;
220 	outptr = (char *)outbuf;
221 	inbytesleft = 4;
222 	outbytesleft = 16;
223 
224 	errno = 0;
225 	ret = iconv(cd, &inptr, &inbytesleft, &outptr, &outbytesleft);
226 
227 #ifdef VERBOSE
228 	printf("inptr - inbuf = %d\n", (const uint8_t *)inptr - (uint8_t *)inbuf);
229 	printf("inbytesleft = %d\n", inbytesleft);
230 	printf("outbytesleft = %d\n", outbytesleft);
231 	printf("outptr - outbuf = %d\n", (uint8_t *)outptr - (uint8_t *)outbuf);
232 	printf("errno = %d\n", errno);
233 	printf("ret = %d\n", (int)ret);
234 #endif
235 
236 	if (((const uint8_t *)inptr - (uint8_t *)inbuf == 0) && (inbytesleft == 4)  &&
237 	    (outbytesleft == 16) && ((uint8_t *)outptr - (uint8_t *)outbuf == 0) &&
238 	    (errno == EILSEQ) && ((size_t)ret == (size_t)-1))
239 		return (0);
240 	else
241 		return (1);
242 }
243 
244 static void
245 test(int (tester) (void), const char * label)
246 {
247 	int ret;
248 
249 	if ((ret = tester()))
250 		printf("%s failed (%d)\n", label, ret);
251 	else
252 		printf("%s succeeded\n", label);
253 }
254 
255 int
256 main(void)
257 {
258 
259 	test(open_1, "open_1");
260 	test(open_2, "open_2");
261 	test(close_1, "close_1");
262 	test(conv_ret, "conv_ret");
263 	test(conv_ebadf, "conv_ebadf");
264 	test(conv_2big, "conv_2big");
265 	test(conv_einval, "conv_einval");
266 	test(conv_eilseq, "conv_eilseq");
267 }
268