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