]>
Commit | Line | Data |
---|---|---|
e4998944 | 1 | #include "test-tool.h" |
b4285c71 | 2 | |
c37c004b | 3 | static int rc; |
b4285c71 | 4 | |
c37c004b | 5 | static void report_error(const char *class, int ch) |
b4285c71 | 6 | { |
c37c004b RS |
7 | printf("%s classifies char %d (0x%02x) wrongly\n", class, ch, ch); |
8 | rc = 1; | |
b4285c71 RS |
9 | } |
10 | ||
c37c004b | 11 | static int is_in(const char *s, int ch) |
b4285c71 | 12 | { |
d5071be5 RS |
13 | /* |
14 | * We can't find NUL using strchr. Accept it as the first | |
15 | * character in the spec -- there are no empty classes. | |
16 | */ | |
c37c004b | 17 | if (ch == '\0') |
d5071be5 RS |
18 | return ch == *s; |
19 | if (*s == '\0') | |
20 | s++; | |
c37c004b | 21 | return !!strchr(s, ch); |
b4285c71 RS |
22 | } |
23 | ||
c37c004b RS |
24 | #define TEST_CLASS(t,s) { \ |
25 | int i; \ | |
26 | for (i = 0; i < 256; i++) { \ | |
27 | if (is_in(s, i) != t(i)) \ | |
28 | report_error(#t, i); \ | |
29 | } \ | |
31885f64 RS |
30 | if (t(EOF)) \ |
31 | report_error(#t, EOF); \ | |
f9b7cce6 RS |
32 | } |
33 | ||
b4285c71 RS |
34 | #define DIGIT "0123456789" |
35 | #define LOWER "abcdefghijklmnopqrstuvwxyz" | |
36 | #define UPPER "ABCDEFGHIJKLMNOPQRSTUVWXYZ" | |
567342fc | 37 | #define PUNCT "!\"#$%&'()*+,-./:;<=>?@[\\]^_`{|}~" |
d5071be5 RS |
38 | #define ASCII \ |
39 | "\x00\x01\x02\x03\x04\x05\x06\x07\x08\x09\x0a\x0b\x0c\x0d\x0e\x0f" \ | |
40 | "\x10\x11\x12\x13\x14\x15\x16\x17\x18\x19\x1a\x1b\x1c\x1d\x1e\x1f" \ | |
41 | "\x20\x21\x22\x23\x24\x25\x26\x27\x28\x29\x2a\x2b\x2c\x2d\x2e\x2f" \ | |
42 | "\x30\x31\x32\x33\x34\x35\x36\x37\x38\x39\x3a\x3b\x3c\x3d\x3e\x3f" \ | |
43 | "\x40\x41\x42\x43\x44\x45\x46\x47\x48\x49\x4a\x4b\x4c\x4d\x4e\x4f" \ | |
44 | "\x50\x51\x52\x53\x54\x55\x56\x57\x58\x59\x5a\x5b\x5c\x5d\x5e\x5f" \ | |
45 | "\x60\x61\x62\x63\x64\x65\x66\x67\x68\x69\x6a\x6b\x6c\x6d\x6e\x6f" \ | |
46 | "\x70\x71\x72\x73\x74\x75\x76\x77\x78\x79\x7a\x7b\x7c\x7d\x7e\x7f" | |
567342fc RS |
47 | #define CNTRL \ |
48 | "\x00\x01\x02\x03\x04\x05\x06\x07\x08\x09\x0a\x0b\x0c\x0d\x0e\x0f" \ | |
49 | "\x10\x11\x12\x13\x14\x15\x16\x17\x18\x19\x1a\x1b\x1c\x1d\x1e\x1f" \ | |
50 | "\x7f" | |
b4285c71 | 51 | |
126e3b3d | 52 | int cmd__ctype(int argc UNUSED, const char **argv UNUSED) |
b4285c71 | 53 | { |
c37c004b RS |
54 | TEST_CLASS(isdigit, DIGIT); |
55 | TEST_CLASS(isspace, " \n\r\t"); | |
56 | TEST_CLASS(isalpha, LOWER UPPER); | |
57 | TEST_CLASS(isalnum, LOWER UPPER DIGIT); | |
58 | TEST_CLASS(is_glob_special, "*?[\\"); | |
59 | TEST_CLASS(is_regex_special, "$()*+.?[\\^{|"); | |
32ec2316 | 60 | TEST_CLASS(is_pathspec_magic, "!\"#%&',-/:;<=>@_`~"); |
d5071be5 | 61 | TEST_CLASS(isascii, ASCII); |
2c17de8b RS |
62 | TEST_CLASS(islower, LOWER); |
63 | TEST_CLASS(isupper, UPPER); | |
567342fc RS |
64 | TEST_CLASS(iscntrl, CNTRL); |
65 | TEST_CLASS(ispunct, PUNCT); | |
66 | TEST_CLASS(isxdigit, DIGIT "abcdefABCDEF"); | |
67 | TEST_CLASS(isprint, LOWER UPPER DIGIT PUNCT " "); | |
b4285c71 RS |
68 | |
69 | return rc; | |
70 | } |