1/* $NetBSD: t_mbstowcs.c,v 1.3 2022/12/21 09:33:34 wiz Exp $ */
2
3/*-
4 * Copyright (c) 2011 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 *    notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 *    notice, this list of conditions and the following disclaimer in the
14 *    documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
17 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
18 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
20 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 */
28
29/*-
30 * Copyright (c)2003 Citrus Project,
31 * All rights reserved.
32 *
33 * Redistribution and use in source and binary forms, with or without
34 * modification, are permitted provided that the following conditions
35 * are met:
36 * 1. Redistributions of source code must retain the above copyright
37 *    notice, this list of conditions and the following disclaimer.
38 * 2. Redistributions in binary form must reproduce the above copyright
39 *    notice, this list of conditions and the following disclaimer in the
40 *    documentation and/or other materials provided with the distribution.
41 *
42 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
43 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
44 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
45 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
46 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
47 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
48 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
49 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
50 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
51 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
52 * SUCH DAMAGE.
53 */
54
55#include <sys/cdefs.h>
56__COPYRIGHT("@(#) Copyright (c) 2011\
57 The NetBSD Foundation, inc. All rights reserved.");
58__RCSID("$NetBSD: t_mbstowcs.c,v 1.3 2022/12/21 09:33:34 wiz Exp $");
59
60#include <errno.h>
61#include <locale.h>
62#include <stdio.h>
63#include <stdlib.h>
64#include <string.h>
65#include <vis.h>
66#include <wchar.h>
67
68#include <atf-c.h>
69
70#define REQUIRE_ERRNO(x, v) \
71	ATF_REQUIRE_MSG((x) != (v), "%s: %s", #x, strerror(errno))
72
73#define SIZE 256
74
75static struct test {
76	const char *locale;
77	const char *data;
78	wchar_t wchars[64];
79	int widths[64];
80	int width;
81} tests[] = {
82{
83	"en_US.UTF-8",
84	"[\001\177][\302\200\337\277][\340\240\200\357\277\277][\360\220\200"
85	"\200\367\277\277\277][\370\210\200\200\200\373\277\277\277\277][\374"
86	"\204\200\200\200\200\375\277\277\277\277\277]",
87	{
88		0x5B, 0x01, 0x7F, 0x5D, 0x5B, 0x80, 0x07FF, 0x5D, 0x5B, 0x0800,
89		0xFFFF, 0x5D, 0x5B, 0x10000, 0x1FFFFF, 0x5D, 0x5B, 0x200000,
90		0x3FFFFFF, 0x5D, 0x5B, 0x4000000, 0x7FFFFFFF, 0x5D, 0x0A
91	},
92	{	 1, -1, -1, 1, 1, -1, 1, 1, 1, 1,
93		 -1, 1, 1, 1, -1, 1, 1, -1,
94		 -1, 1, 1, -1, -1, 1, -1
95	},
96	-1
97}, {
98	"ja_JP.ISO2022-JP",
99	"\033$B#J#I#S$G$9!#\033(Baaaa\033$B$\"$$$&$($*\033(B",
100	{
101#ifdef __STDC_ISO_10646__
102		0xFF2A, 0xFF29, 0xFF33, 0x3067, 0x3059,
103		0x3002, 0x61, 0x61, 0x61, 0x61, 0x3042, 0x3044,
104		0x3046, 0x3048, 0x304A, 0x0A
105#else
106		0x4200234A, 0x42002349, 0x42002353, 0x42002447, 0x42002439,
107		0x42002123, 0x61, 0x61, 0x61, 0x61, 0x42002422, 0x42002424,
108		0x42002426, 0x42002428, 0x4200242A, 0x0A
109#endif
110	},
111	{ 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, 2, -1 },
112	26
113}, {
114	"ja_JP.SJIS",
115	"\202r\202i\202h\202r\202\305\202\267\201Baaaa\202\240\202\242"
116	"\202\244\202\246\202\250",
117	{
118#ifdef __STDC_ISO_10646__
119		0xFF33, 0xFF2A, 0xFF29, 0xFF33, 0x3067, 0x3059, 0x3002, 0x61,
120		0x61, 0x61, 0x61, 0x3042, 0x3044, 0x3046, 0x3048, 0x304A, 0x0A
121#else
122		0x8272, 0x8269, 0x8268, 0x8272, 0x82C5, 0x82B7, 0x8142, 0x61,
123		0x61, 0x61, 0x61, 0x82A0, 0x82A2, 0x82A4, 0x82A6, 0x82A8, 0x0A
124#endif
125	},
126	{ 2, 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, 2, -1 },
127	28
128}, {
129	"ja_JP.eucJP",
130	"\243\305\243\325\243\303\244\307\244\271\241\243aaaa\244\242\244"
131	"\244\244\246\244\250\244\252",
132	{
133#ifdef __STDC_ISO_10646__
134		0xFF25, 0xFF35, 0xFF23, 0x3067, 0x3059, 0x3002, 0x61, 0x61, 0x61,
135		0x61, 0x3042, 0x3044, 0x3046, 0x3048, 0x304A, 0x0A
136#else
137		0xA3C5, 0xA3D5, 0xA3C3, 0xA4C7, 0xA4B9, 0xA1A3, 0x61, 0x61, 0x61,
138		0x61, 0xA4A2, 0xA4A4, 0xA4A6, 0xA4A8, 0xA4AA, 0x0A
139#endif
140	},
141	{ 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, 2, -1 },
142	26
143}, {
144	NULL,
145	NULL,
146	{},
147	{},
148	0
149}
150};
151
152ATF_TC(mbstowcs_basic);
153ATF_TC_HEAD(mbstowcs_basic, tc)
154{
155	atf_tc_set_md_var(tc, "descr",
156		"Checks wide character functions with different locales");
157}
158ATF_TC_BODY(mbstowcs_basic, tc)
159{
160	struct test *t;
161
162	for (t = &tests[0]; t->data != NULL; ++t) {
163		wchar_t	wbuf[SIZE];
164		char buf[SIZE];
165		char visbuf[SIZE];
166		char *str;
167		int i;
168
169		ATF_REQUIRE_STREQ(setlocale(LC_ALL, "C"), "C");
170		ATF_REQUIRE(setlocale(LC_CTYPE, t->locale) != NULL);
171
172		(void)strvis(visbuf, t->data, VIS_WHITE | VIS_OCTAL);
173		(void)printf("Checking string: \"%s\"\n", visbuf);
174
175		ATF_REQUIRE((str = setlocale(LC_ALL, NULL)) != NULL);
176		(void)printf("Using locale: %s\n", str);
177
178		REQUIRE_ERRNO((ssize_t)mbstowcs(wbuf, t->data, SIZE-1), -1);
179		REQUIRE_ERRNO((ssize_t)wcstombs(buf, wbuf, SIZE-1), -1);
180
181		if (strcmp(buf, t->data) != 0) {
182			(void)strvis(visbuf, buf, VIS_WHITE | VIS_OCTAL);
183			(void)printf("Conversion to wcs and back failed: "
184				"\"%s\"\n", visbuf);
185			atf_tc_fail("Test failed");
186		}
187
188		/* The output here is implementation-dependent. */
189
190		for (i = 0; wbuf[i] != 0; ++i) {
191			if (wbuf[i] == t->wchars[i] &&
192			    wcwidth(wbuf[i]) == t->widths[i])
193				continue;
194
195			(void)printf("At position %d:\n", i);
196			(void)printf("  expected: 0x%04X (%d)\n",
197				t->wchars[i], t->widths[i]);
198			(void)printf("  got     : 0x%04X (%d)\n", wbuf[i],
199				wcwidth(wbuf[i]));
200			atf_tc_fail("Test failed");
201		}
202
203		if (wcswidth(wbuf, SIZE-1) != t->width) {
204			(void)printf("Incorrect wcswidth:\n");
205			(void)printf("  expected: %d\n", t->width);
206			(void)printf("  got     : %d\n", wcswidth(wbuf, SIZE-1));
207			atf_tc_fail("Test failed");
208		}
209
210		(void)printf("Ok.\n");
211	}
212}
213
214ATF_TP_ADD_TCS(tp)
215{
216	ATF_TP_ADD_TC(tp, mbstowcs_basic);
217
218	return atf_no_error();
219}
220