Mercurial > minori
comparison dep/utf8proc/test/iscase.c @ 343:1faa72660932
*: transfer back to cmake from autotools
autotools just made lots of things more complicated than
they should have and many things broke (i.e. translations)
author | Paper <paper@paper.us.eu.org> |
---|---|
date | Thu, 20 Jun 2024 05:56:06 -0400 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
342:adb79bdde329 | 343:1faa72660932 |
---|---|
1 #include "tests.h" | |
2 | |
3 int read_range(FILE *f, utf8proc_int32_t *start, utf8proc_int32_t *end) | |
4 { | |
5 unsigned char buf[8192]; | |
6 size_t len = simple_getline(buf, f); | |
7 size_t pos = skipspaces(buf, 0); | |
8 unsigned char s[16]; | |
9 if (pos == len || buf[pos] == '#') return 0; | |
10 pos += encode(s, buf + pos) - 1; | |
11 check(s[0], "invalid line %s in data", buf); | |
12 utf8proc_iterate((utf8proc_uint8_t*) s, -1, start); | |
13 if (buf[pos] == '.' && buf[pos+1] == '.') { | |
14 encode(s, buf + pos + 2); | |
15 check(s[0], "invalid line %s in data", buf); | |
16 utf8proc_iterate((utf8proc_uint8_t*) s, -1, end); | |
17 } | |
18 else | |
19 *end = *start; | |
20 return 1; | |
21 } | |
22 | |
23 int test_iscase(const char *fname, int (*iscase)(utf8proc_int32_t), | |
24 utf8proc_int32_t (*thatcase)(utf8proc_int32_t)) | |
25 { | |
26 FILE *f = fopen(fname, "r"); | |
27 int lines = 0, tests = 0, success = 1; | |
28 utf8proc_int32_t c = 0; | |
29 | |
30 check(f != NULL, "error opening data file \"%s\"\n", fname); | |
31 | |
32 while (success && !feof(f)) { | |
33 utf8proc_int32_t start, end; | |
34 if (read_range(f, &start, &end)) { | |
35 for (; c < start; ++c) { | |
36 check(!iscase(c), "failed !iscase(%04x) in %s\n", c, fname); | |
37 } | |
38 for (; c <= end; ++c) { | |
39 check(iscase(c), "failed iscase(%04x) in %s\n", c, fname); | |
40 check(thatcase(c) == c, "inconsistent thatcase(%04x) in %s\n", c, fname); | |
41 ++tests; | |
42 } | |
43 } | |
44 ++lines; | |
45 } | |
46 for (; c <= 0x110000; ++c) { | |
47 check(!iscase(c), "failed !iscase(%04x) in %s\n", c, fname); | |
48 } | |
49 | |
50 printf("Checked %d characters from %d lines of %s\n", tests, lines, fname); | |
51 fclose(f); | |
52 return success; | |
53 } | |
54 | |
55 int main(int argc, char **argv) | |
56 { | |
57 check(argc == 3, "Expected Lowercase.txt and Uppercase.txt as arguments"); | |
58 check(test_iscase(argv[1], utf8proc_islower, utf8proc_tolower), "Lowercase tests failed"); | |
59 check(test_iscase(argv[2], utf8proc_isupper, utf8proc_toupper), "Uppercase tests failed"); | |
60 printf("utf8proc iscase tests SUCCEEDED.\n"); | |
61 return 0; | |
62 } |