]> CyberLeo.Net >> Repos - FreeBSD/releng/10.2.git/blob - tools/regression/lib/libc/locale/test-towctrans.c
- Copy stable/10@285827 to releng/10.2 in preparation for 10.2-RC1
[FreeBSD/releng/10.2.git] / tools / regression / lib / libc / locale / test-towctrans.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 wctrans() and towctrans() 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 <assert.h>
38 #include <locale.h>
39 #include <stdio.h>
40 #include <string.h>
41 #include <wchar.h>
42 #include <wctype.h>
43
44 int
45 main(int argc, char *argv[])
46 {
47         wctype_t t;
48         int i, j;
49         struct {
50                 const char *name;
51                 wint_t (*func)(wint_t);
52         } tran[] = {
53                 { "tolower", towlower },
54                 { "toupper", towupper },
55         };
56
57         printf("1..2\n");
58
59         /*
60          * C/POSIX locale.
61          */
62         for (i = 0; i < sizeof(tran) / sizeof(*tran); i++) {
63                 t = wctrans(tran[i].name);
64                 assert(t != 0);
65                 for (j = 0; j < 256; j++)
66                         assert(tran[i].func(j) == towctrans(j, t));
67         }
68         t = wctrans("elephant");
69         assert(t == 0);
70         for (i = 0; i < 256; i++)
71                 assert(towctrans(i, t) == i);
72
73         /*
74          * Japanese (EUC) locale.
75          */
76         assert(strcmp(setlocale(LC_CTYPE, "ja_JP.eucJP"), "ja_JP.eucJP") == 0);
77         for (i = 0; i < sizeof(tran) / sizeof(*tran); i++) {
78                 t = wctrans(tran[i].name);
79                 assert(t != 0);
80                 for (j = 0; j < 65536; j++)
81                         assert(tran[i].func(j) == towctrans(j, t));
82         }
83         t = wctrans("elephant");
84         assert(t == 0);
85         for (i = 0; i < 65536; i++)
86                 assert(towctrans(i, t) == i);
87
88         printf("ok 1 - towctrans()\n");
89         printf("ok 2 - wctrans()\n");
90
91         return (0);
92 }