René Scharfe | b4285c7 | 2009-01-17 16:50:13 +0100 | [diff] [blame] | 1 | #include "cache.h" |
| 2 | |
René Scharfe | c37c004 | 2011-10-01 18:36:14 +0200 | [diff] [blame] | 3 | static int rc; |
René Scharfe | b4285c7 | 2009-01-17 16:50:13 +0100 | [diff] [blame] | 4 | |
René Scharfe | c37c004 | 2011-10-01 18:36:14 +0200 | [diff] [blame] | 5 | static void report_error(const char *class, int ch) |
René Scharfe | b4285c7 | 2009-01-17 16:50:13 +0100 | [diff] [blame] | 6 | { |
René Scharfe | c37c004 | 2011-10-01 18:36:14 +0200 | [diff] [blame] | 7 | printf("%s classifies char %d (0x%02x) wrongly\n", class, ch, ch); |
| 8 | rc = 1; |
René Scharfe | b4285c7 | 2009-01-17 16:50:13 +0100 | [diff] [blame] | 9 | } |
| 10 | |
René Scharfe | c37c004 | 2011-10-01 18:36:14 +0200 | [diff] [blame] | 11 | static int is_in(const char *s, int ch) |
René Scharfe | b4285c7 | 2009-01-17 16:50:13 +0100 | [diff] [blame] | 12 | { |
René Scharfe | c37c004 | 2011-10-01 18:36:14 +0200 | [diff] [blame] | 13 | /* We can't find NUL using strchr. It's classless anyway. */ |
| 14 | if (ch == '\0') |
| 15 | return 0; |
| 16 | return !!strchr(s, ch); |
René Scharfe | b4285c7 | 2009-01-17 16:50:13 +0100 | [diff] [blame] | 17 | } |
| 18 | |
René Scharfe | c37c004 | 2011-10-01 18:36:14 +0200 | [diff] [blame] | 19 | #define TEST_CLASS(t,s) { \ |
| 20 | int i; \ |
| 21 | for (i = 0; i < 256; i++) { \ |
| 22 | if (is_in(s, i) != t(i)) \ |
| 23 | report_error(#t, i); \ |
| 24 | } \ |
René Scharfe | f9b7cce | 2009-01-17 16:50:37 +0100 | [diff] [blame] | 25 | } |
| 26 | |
René Scharfe | b4285c7 | 2009-01-17 16:50:13 +0100 | [diff] [blame] | 27 | #define DIGIT "0123456789" |
| 28 | #define LOWER "abcdefghijklmnopqrstuvwxyz" |
| 29 | #define UPPER "ABCDEFGHIJKLMNOPQRSTUVWXYZ" |
| 30 | |
René Scharfe | b4285c7 | 2009-01-17 16:50:13 +0100 | [diff] [blame] | 31 | int main(int argc, char **argv) |
| 32 | { |
René Scharfe | c37c004 | 2011-10-01 18:36:14 +0200 | [diff] [blame] | 33 | TEST_CLASS(isdigit, DIGIT); |
| 34 | TEST_CLASS(isspace, " \n\r\t"); |
| 35 | TEST_CLASS(isalpha, LOWER UPPER); |
| 36 | TEST_CLASS(isalnum, LOWER UPPER DIGIT); |
| 37 | TEST_CLASS(is_glob_special, "*?[\\"); |
| 38 | TEST_CLASS(is_regex_special, "$()*+.?[\\^{|"); |
René Scharfe | 32ec231 | 2011-10-01 18:39:58 +0200 | [diff] [blame] | 39 | TEST_CLASS(is_pathspec_magic, "!\"#%&',-/:;<=>@_`~"); |
René Scharfe | b4285c7 | 2009-01-17 16:50:13 +0100 | [diff] [blame] | 40 | |
| 41 | return rc; |
| 42 | } |