1/* $NetBSD: t_wctomb.c,v 1.3 2013/03/25 15:31:03 gson 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)2004 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_wctomb.c,v 1.3 2013/03/25 15:31:03 gson Exp $"); 59 60#include <stdio.h> 61#include <stdlib.h> 62#include <locale.h> 63#include <vis.h> 64#include <wchar.h> 65#include <string.h> 66#include <limits.h> 67 68#include <atf-c.h> 69 70#define TC_WCTOMB 0 71#define TC_WCRTOMB 1 72#define TC_WCRTOMB_ST 2 73 74static struct test { 75 const char *locale; 76 const char *data; 77 size_t wclen; 78 size_t mblen[16]; 79} tests[] = { 80{ 81 "ja_JP.ISO2022-JP", 82 "\x1b$B" /* JIS X 0208-1983 */ 83 "\x46\x7c\x4b\x5c\x38\x6c" /* "nihongo" */ 84 "\x1b(B" /* ISO 646 */ 85 "ABC" 86 "\x1b(I" /* JIS X 0201 katakana */ 87 "\xb1\xb2\xb3" /* "aiu" */ 88 "\x1b(B", /* ISO 646 */ 89 3 + 3 + 3, 90 { 3+2, 2, 2, 3+1, 1, 1, 3+1, 1, 1, 3+1 } 91}, { 92 "C", 93 "ABC", 94 3, 95 { 1, 1, 1, 1 } 96}, { NULL, NULL, 0, { } } 97}; 98 99static void 100h_wctomb(const struct test *t, char tc) 101{ 102 wchar_t wcs[16 + 2]; 103 char buf[128]; 104 char cs[MB_LEN_MAX]; 105 const char *pcs; 106 char *str; 107 mbstate_t st; 108 mbstate_t *stp = NULL; 109 size_t sz, ret, i; 110 111 ATF_REQUIRE_STREQ(setlocale(LC_ALL, "C"), "C"); 112#ifdef __NetBSD__ 113 ATF_REQUIRE(setlocale(LC_CTYPE, t->locale) != NULL); 114#else 115 if (setlocale(LC_CTYPE, t->locale) == NULL) { 116 fprintf(stderr, "Locale %s not found.\n", t->locale); 117 return; 118 } 119#endif 120 121 (void)strvis(buf, t->data, VIS_WHITE | VIS_OCTAL); 122 (void)printf("Checking sequence: \"%s\"\n", buf); 123 124 ATF_REQUIRE((str = setlocale(LC_ALL, NULL)) != NULL); 125 (void)printf("Using locale: %s\n", str); 126 127 if (tc == TC_WCRTOMB_ST) { 128 (void)memset(&st, 0, sizeof(st)); 129 stp = &st; 130 } 131 132 wcs[t->wclen] = L'X'; /* poison */ 133 pcs = t->data; 134 sz = mbsrtowcs(wcs, &pcs, t->wclen + 2, NULL); 135 ATF_REQUIRE_EQ_MSG(sz, t->wclen, "mbsrtowcs() returned: " 136 "%zu, expected: %zu", sz, t->wclen); 137 ATF_REQUIRE_EQ(wcs[t->wclen], 0); 138 139 for (i = 0; i < t->wclen + 1; i++) { 140 if (tc == TC_WCTOMB) 141 ret = wctomb(cs, wcs[i]); 142 else 143 ret = wcrtomb(cs, wcs[i], stp); 144 145 if (ret == t->mblen[i]) 146 continue; 147 148 (void)printf("At position %zd:\n", i); 149 (void)printf(" expected: %zd\n", t->mblen[i]); 150 (void)printf(" got : %zd\n", ret); 151 atf_tc_fail("Test failed"); 152 /* NOTREACHED */ 153 } 154 155 (void)printf("Ok.\n"); 156} 157 158ATF_TC(wctomb); 159ATF_TC_HEAD(wctomb, tc) 160{ 161 atf_tc_set_md_var(tc, "descr", "Checks wctomb(3)"); 162} 163ATF_TC_BODY(wctomb, tc) 164{ 165 struct test *t; 166 167 (void)printf("Checking wctomb()\n"); 168 169 for (t = &tests[0]; t->data != NULL; ++t) 170 h_wctomb(t, TC_WCTOMB); 171} 172 173ATF_TC(wcrtomb_state); 174ATF_TC_HEAD(wcrtomb_state, tc) 175{ 176 atf_tc_set_md_var(tc, "descr", 177 "Checks wcrtomb(3) (using state object)"); 178} 179ATF_TC_BODY(wcrtomb_state, tc) 180{ 181 struct test *t; 182 183 (void)printf("Checking wcrtomb() (with state object)\n"); 184 185 for (t = &tests[0]; t->data != NULL; ++t) 186 h_wctomb(t, TC_WCRTOMB_ST); 187} 188 189ATF_TC(wcrtomb); 190ATF_TC_HEAD(wcrtomb, tc) 191{ 192 atf_tc_set_md_var(tc, "descr", 193 "Checks wcrtomb(3) (using internal state)"); 194} 195ATF_TC_BODY(wcrtomb, tc) 196{ 197 struct test *t; 198 199 (void)printf("Checking wcrtomb() (using internal state)\n"); 200 201 for (t = &tests[0]; t->data != NULL; ++t) 202 h_wctomb(t, TC_WCRTOMB); 203} 204 205ATF_TP_ADD_TCS(tp) 206{ 207 ATF_TP_ADD_TC(tp, wctomb); 208 ATF_TP_ADD_TC(tp, wcrtomb); 209 ATF_TP_ADD_TC(tp, wcrtomb_state); 210 211 return atf_no_error(); 212} 213