]>
Commit | Line | Data |
---|---|---|
a1df06b3 P |
1 | /* |
2 | * Copyright 2017 The OpenSSL Project Authors. All Rights Reserved. | |
3 | * | |
4 | * Licensed under the OpenSSL license (the "License"). You may not use | |
5 | * this file except in compliance with the License. You can obtain a copy | |
6 | * in the file LICENSE in the source distribution or at | |
7 | * https://www.openssl.org/source/license.html | |
8 | */ | |
9 | ||
10 | #include "testutil.h" | |
11 | #include "internal/ctype.h" | |
677963e5 | 12 | #include "internal/nelem.h" |
a1df06b3 P |
13 | #include <ctype.h> |
14 | #include <stdio.h> | |
15 | ||
12bd06cd RL |
16 | /* |
17 | * Even though the VMS C RTL claims to be C99 compatible, it's not entirely | |
18 | * so far (C RTL version 8.4). For the sake of these tests, we therefore | |
19 | * define our own. | |
20 | */ | |
21 | #if defined(__VMS) && __CRTL_VER <= 80400000 | |
22 | static int isblank(int c) | |
23 | { | |
24 | return c == ' ' || c == '\t'; | |
25 | } | |
26 | #endif | |
27 | ||
a1df06b3 P |
28 | static int test_ctype_chars(int n) |
29 | { | |
da9b249f P |
30 | if (!TEST_int_eq(isascii((unsigned char)n) != 0, ossl_isascii(n) != 0)) |
31 | return 0; | |
32 | ||
33 | if (!ossl_isascii(n)) | |
34 | return 1; | |
35 | ||
36 | return TEST_int_eq(isalpha(n) != 0, ossl_isalpha(n) != 0) | |
37 | && TEST_int_eq(isalnum(n) != 0, ossl_isalnum(n) != 0) | |
a1df06b3 P |
38 | && TEST_int_eq(isblank(n) != 0, ossl_isblank(n) != 0) |
39 | && TEST_int_eq(iscntrl(n) != 0, ossl_iscntrl(n) != 0) | |
40 | && TEST_int_eq(isdigit(n) != 0, ossl_isdigit(n) != 0) | |
41 | && TEST_int_eq(isgraph(n) != 0, ossl_isgraph(n) != 0) | |
42 | && TEST_int_eq(islower(n) != 0, ossl_islower(n) != 0) | |
43 | && TEST_int_eq(isprint(n) != 0, ossl_isprint(n) != 0) | |
44 | && TEST_int_eq(ispunct(n) != 0, ossl_ispunct(n) != 0) | |
45 | && TEST_int_eq(isspace(n) != 0, ossl_isspace(n) != 0) | |
46 | && TEST_int_eq(isupper(n) != 0, ossl_isupper(n) != 0) | |
47 | && TEST_int_eq(isxdigit(n) != 0, ossl_isxdigit(n) != 0); | |
48 | } | |
49 | ||
a1df06b3 P |
50 | static struct { |
51 | int u; | |
52 | int l; | |
53 | } case_change[] = { | |
54 | { 'A', 'a' }, | |
55 | { 'X', 'x' }, | |
56 | { 'Z', 'z' }, | |
57 | { '0', '0' }, | |
58 | { '%', '%' }, | |
59 | { '~', '~' }, | |
60 | { 0, 0 }, | |
196f5c4b | 61 | { EOF, EOF } |
a1df06b3 P |
62 | }; |
63 | ||
64 | static int test_ctype_toupper(int n) | |
65 | { | |
66 | return TEST_int_eq(ossl_toupper(case_change[n].l), case_change[n].u) | |
67 | && TEST_int_eq(ossl_toupper(case_change[n].u), case_change[n].u); | |
68 | } | |
69 | ||
70 | static int test_ctype_tolower(int n) | |
71 | { | |
72 | return TEST_int_eq(ossl_tolower(case_change[n].u), case_change[n].l) | |
73 | && TEST_int_eq(ossl_tolower(case_change[n].l), case_change[n].l); | |
74 | } | |
75 | ||
678c462e P |
76 | static int test_ctype_eof(void) |
77 | { | |
78 | return test_ctype_chars(EOF); | |
79 | } | |
80 | ||
a1df06b3 P |
81 | int setup_tests(void) |
82 | { | |
da9b249f | 83 | ADD_ALL_TESTS(test_ctype_chars, 256); |
a1df06b3 P |
84 | ADD_ALL_TESTS(test_ctype_toupper, OSSL_NELEM(case_change)); |
85 | ADD_ALL_TESTS(test_ctype_tolower, OSSL_NELEM(case_change)); | |
678c462e | 86 | ADD_TEST(test_ctype_eof); |
a1df06b3 P |
87 | return 1; |
88 | } |