lib/libc/tests/locale/iswctype_test.c

   1 /*-
   2  * Copyright (c) 2003 Tim J. Robbins
   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 /*
  28  * Test program for wctype() and iswctype() as specified by
  29  * IEEE Std. 1003.1-2001 and ISO/IEC 9899:1999.
  30  *
  31  * The functions are tested in the "C" and "ja_JP.eucJP" locales.
  32  */
  33
  34 #include <sys/cdefs.h>
  35 __FBSDID("$FreeBSD$");
  36
  37 #include <sys/param.h>
  38 #include <errno.h>
  39 #include <locale.h>
  40 #include <stdio.h>
  41 #include <string.h>
  42 #include <wchar.h>
  43 #include <wctype.h>
  44
  45 #include <atf-c.h>
  46
  47 static void
  48 require_lc_ctype(const char *locale_name)
  49 {
  50         char *lc_ctype_set;
  51
  52         lc_ctype_set = setlocale(LC_CTYPE, locale_name);
  53         if (lc_ctype_set == NULL)
  54                 atf_tc_fail("setlocale(LC_CTYPE, \"%s\") failed; errno=%d",
  55                     locale_name, errno);
  56
  57         ATF_REQUIRE(strcmp(lc_ctype_set, locale_name) == 0);
  58 }
  59
  60 static wctype_t t;
  61 static int i, j;
  62 static struct {
  63         const char *name;
  64         int (*func)(wint_t);
  65 } cls[] = {
  66         { "alnum", iswalnum },
  67         { "alpha", iswalpha },
  68         { "blank", iswblank },
  69         { "cntrl", iswcntrl },
  70         { "digit", iswdigit },
  71         { "graph", iswgraph },
  72         { "lower", iswlower },
  73         { "print", iswprint },
  74         { "punct", iswpunct },
  75         { "space", iswspace },
  76         { "upper", iswupper },
  77         { "xdigit", iswxdigit }
  78 };
  79
  80 ATF_TC_WITHOUT_HEAD(iswctype_c_locale_test);
  81 ATF_TC_BODY(iswctype_c_locale_test, tc)
  82 {
  83
  84         require_lc_ctype("C");
  85         for (i = 0; i < nitems(cls); i++) {
  86                 t = wctype(cls[i].name);
  87                 ATF_REQUIRE(t != 0);
  88                 for (j = 0; j < 256; j++)
  89                         ATF_REQUIRE(cls[i].func(j) == iswctype(j, t));
  90         }
  91         t = wctype("elephant");
  92         ATF_REQUIRE(t == 0);
  93         for (i = 0; i < 256; i++)
  94                 ATF_REQUIRE(iswctype(i, t) == 0);
  95 }
  96
  97 ATF_TC_WITHOUT_HEAD(iswctype_euc_jp_test);
  98 ATF_TC_BODY(iswctype_euc_jp_test, tc)
  99 {
 100
 101         require_lc_ctype("ja_JP.eucJP");
 102
 103         for (i = 0; i < nitems(cls); i++) {
 104                 t = wctype(cls[i].name);
 105                 ATF_REQUIRE(t != 0);
 106                 for (j = 0; j < 65536; j++)
 107                         ATF_REQUIRE(cls[i].func(j) == iswctype(j, t));
 108         }
 109         t = wctype("elephant");
 110         ATF_REQUIRE(t == 0);
 111         for (i = 0; i < 65536; i++)
 112                 ATF_REQUIRE(iswctype(i, t) == 0);
 113 }
 114
 115 ATF_TP_ADD_TCS(tp)
 116 {
 117
 118         ATF_TP_ADD_TC(tp, iswctype_c_locale_test);
 119         ATF_TP_ADD_TC(tp, iswctype_euc_jp_test);
 120
 121         return (atf_no_error());
 122 }