contrib/netbsd-tests/lib/libc/locale/t_mbstowcs.c

   1 /* $NetBSD: t_mbstowcs.c,v 1.1 2011/07/15 07:35:21 jruoho 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.1 2011/07/15 07:35:21 jruoho 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
  75 static 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, -1,  1,  1, -1, -1,
  93                  1,  1, -1, -1,  1,  1, -1, -1,  1, -1
  94         },
  95         -1
  96 }, {
  97         "ja_JP.ISO2022-JP",
  98         "\033$B#J#I#S$G$9!#\033(Baaaa\033$B$\"$$$&$($*\033(B",
  99         {
 100                 0x4200234A, 0x42002349, 0x42002353, 0x42002447, 0x42002439,
 101                 0x42002123, 0x61, 0x61, 0x61, 0x61, 0x42002422, 0x42002424,
 102                 0x42002426, 0x42002428, 0x4200242A, 0x0A
 103         },
 104         { 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, 2, -1 },
 105         26
 106 }, {
 107         "ja_JP.SJIS",
 108         "\202r\202i\202h\202r\202\305\202\267\201Baaaa\202\240\202\242"
 109         "\202\244\202\246\202\250",
 110         {
 111                 0x8272, 0x8269, 0x8268, 0x8272, 0x82C5, 0x82B7, 0x8142, 0x61,
 112                 0x61, 0x61, 0x61, 0x82A0, 0x82A2, 0x82A4, 0x82A6, 0x82A8, 0x0A
 113         },
 114         { 2, 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, 2, -1 },
 115         28
 116 }, {
 117         "ja_JP.eucJP",
 118         "\243\305\243\325\243\303\244\307\244\271\241\243aaaa\244\242\244"
 119         "\244\244\246\244\250\244\252",
 120         {
 121                 0xA3C5, 0xA3D5, 0xA3C3, 0xA4C7, 0xA4B9, 0xA1A3, 0x61, 0x61, 0x61,
 122                 0x61, 0xA4A2, 0xA4A4, 0xA4A6, 0xA4A8, 0xA4AA, 0x0A
 123         },
 124         { 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, 2, -1 },
 125         26
 126 }, {
 127         NULL,
 128         NULL,
 129         {},
 130         {},
 131         0
 132 }
 133 };
 134
 135 ATF_TC(mbstowcs_basic);
 136 ATF_TC_HEAD(mbstowcs_basic, tc)
 137 {
 138         atf_tc_set_md_var(tc, "descr",
 139                 "Checks wide character functions with different locales");
 140 }
 141 ATF_TC_BODY(mbstowcs_basic, tc)
 142 {
 143         struct test *t;
 144
 145         for (t = &tests[0]; t->data != NULL; ++t) {
 146                 wchar_t wbuf[SIZE];
 147                 char buf[SIZE];
 148                 char visbuf[SIZE];
 149                 char *str;
 150                 int i;
 151
 152                 ATF_REQUIRE_STREQ(setlocale(LC_ALL, "C"), "C");
 153 #ifdef __NetBSD__
 154                 ATF_REQUIRE(setlocale(LC_CTYPE, t->locale) != NULL);
 155 #else
 156                 if (setlocale(LC_CTYPE, t->locale) == NULL) {
 157                         fprintf(stderr, "Locale %s not found.\n", t->locale);
 158                         continue;
 159                 }
 160 #endif
 161
 162                 (void)strvis(visbuf, t->data, VIS_WHITE | VIS_OCTAL);
 163                 (void)printf("Checking string: \"%s\"\n", visbuf);
 164
 165                 ATF_REQUIRE((str = setlocale(LC_ALL, NULL)) != NULL);
 166                 (void)printf("Using locale: %s\n", str);
 167
 168                 REQUIRE_ERRNO((ssize_t)mbstowcs(wbuf, t->data, SIZE-1), -1);
 169                 REQUIRE_ERRNO((ssize_t)wcstombs(buf, wbuf, SIZE-1), -1);
 170
 171                 if (strcmp(buf, t->data) != 0) {
 172                         (void)strvis(visbuf, buf, VIS_WHITE | VIS_OCTAL);
 173                         (void)printf("Conversion to wcs and back failed: "
 174                                 "\"%s\"\n", visbuf);
 175                         atf_tc_fail("Test failed");
 176                 }
 177
 178                 /* The output here is implementation-dependent. */
 179
 180                 for (i = 0; wbuf[i] != 0; ++i) {
 181                         if (wbuf[i] == t->wchars[i] &&
 182                             wcwidth(wbuf[i]) == t->widths[i])
 183                                 continue;
 184
 185                         (void)printf("At position %d:\n", i);
 186                         (void)printf("  expected: 0x%04X (%d)\n",
 187                                 t->wchars[i], t->widths[i]);
 188                         (void)printf("  got     : 0x%04X (%d)\n", wbuf[i],
 189                                 wcwidth(wbuf[i]));
 190                         atf_tc_fail("Test failed");
 191                 }
 192
 193                 if (wcswidth(wbuf, SIZE-1) != t->width) {
 194                         (void)printf("Incorrect wcswidth:\n");
 195                         (void)printf("  expected: %d\n", t->width);
 196                         (void)printf("  got     : %d\n", wcswidth(wbuf, SIZE-1));
 197                         atf_tc_fail("Test failed");
 198                 }
 199
 200                 (void)printf("Ok.\n");
 201         }
 202 }
 203
 204 ATF_TP_ADD_TCS(tp)
 205 {
 206         ATF_TP_ADD_TC(tp, mbstowcs_basic);
 207
 208         return atf_no_error();
 209 }