1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
|
#if defined __STDC_VERSION__
#include <stdio.h>
#include <limits.h>
#include <wctype.h>
#include "_wctype.h"
#include "test.h"
wint_t test_wint;
wctrans_t test_wctrans;
wctype_t test_wctype;
#define UPPER L"ABCDEFGHIJKLMNOPQRSTUVWXYZ"
#define LOWER L"abcdefghijklmnopqrstuvwxyz"
#define DIGIT L"0123456789"
#define HEX DIGIT L"ABCDEFabcdef"
#define CNTRL L"\x00\x01\x02\x03\x04\x05\x06\x07\x08\x09\x0a\x0b\x0c\x0d\x0e\x0f" \
L"\x10\x11\x12\x13\x14\x15\x16\x17\x18\x19\x1a\x1b\x1c\x1d\x1e\x1f\x7f"
#define PUNCT L"`~!@#$%^&*()_+-=[]\\{}|;':\",./<>?"
#define GRAPH UPPER LOWER DIGIT PUNCT
#define PRINT GRAPH " "
#define SPACE L" \f\n\r\t\v"
#define test_ctype_function(fn, ex) test_ctype_function_imp(#fn, fn, ex, sizeof(ex))
#define test_ctype_conversion(fn, from, to) test_ctype_conversion_imp(#fn, fn, from, to)
static int is_expected(int n, const wchar_t *expected, size_t len)
{
size_t i;
for (i = 0; i < len - 1; i++) {
if (expected[i] == n) {
return 1;
}
}
return 0;
}
static void test_ctype_function_imp(const char *fnname, int (*fn)(int), const wchar_t *expected, size_t len)
{
char expression[64];
int i;
for (i = 0; i < UCHAR_MAX; i++) {
sprintf(expression, "%s(%d)", fnname, i);
test_bool_imp(expression, fn(i), is_expected(i, expected, len));
}
sprintf(expression, "%s(EOF)", fnname);
test_bool_imp(expression, fn(EOF), 0);
}
static int convert(const wchar_t *from, const wchar_t *to, int n)
{
size_t i;
for (i = 0; from[i] != '\0'; i++) {
if (from[i] == n) {
return to[i];
}
}
return n;
}
static void test_ctype_conversion_imp(const char *fnname, int (*fn)(int), const wchar_t *from, const wchar_t *to)
{
char expression[64];
int i;
for (i = 0; i < UCHAR_MAX; i++) {
int j = convert(from, to, i);
sprintf(expression, "%s(%d)", fnname, i);
test_int_equals_imp(expression, fn(i), j);
}
sprintf(expression, "%s(EOF)", fnname);
test_int_equals_imp(expression, fn(EOF), EOF);
}
void test_wctype_h(void)
{
testing_header("wctype.h");
test_ctype_function(iswalnum, UPPER LOWER DIGIT);
test_ctype_function(iswalpha, UPPER LOWER);
test_ctype_function(iswcntrl, CNTRL);
test_ctype_function(iswdigit, DIGIT);
test_ctype_function(iswgraph, GRAPH);
test_ctype_function(iswlower, LOWER);
test_ctype_function(iswprint, PRINT);
test_ctype_function(iswpunct, PUNCT);
test_ctype_function(iswspace, SPACE);
test_ctype_function(iswupper, UPPER);
test_ctype_function(iswxdigit, HEX);
/* TODO: wctype() */
/* TODO: iswctype() */
test_ctype_conversion(towlower, UPPER, LOWER);
test_ctype_conversion(towupper, LOWER, UPPER);
/* TODO: wctrans() */
/* TODO: towctrans() */
testing_end();
}
#else
void test_wctype_h(void)
{
}
#endif
|
