Don't try to compare the ctype functions on values > 127
[openssl.git] / test / ctype_internal_test.c
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"
12 #include "../e_os.h"
13 #include <ctype.h>
14 #include <stdio.h>
15
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
28 static int test_ctype_chars(int n)
29 {
30     return TEST_int_eq(isalnum(n) != 0, ossl_isalnum(n) != 0)
31            && TEST_int_eq(isalpha(n) != 0, ossl_isalpha(n) != 0)
32            && TEST_int_eq(isascii(n) != 0, ossl_isascii(n) != 0)
33            && TEST_int_eq(isblank(n) != 0, ossl_isblank(n) != 0)
34            && TEST_int_eq(iscntrl(n) != 0, ossl_iscntrl(n) != 0)
35            && TEST_int_eq(isdigit(n) != 0, ossl_isdigit(n) != 0)
36            && TEST_int_eq(isgraph(n) != 0, ossl_isgraph(n) != 0)
37            && TEST_int_eq(islower(n) != 0, ossl_islower(n) != 0)
38            && TEST_int_eq(isprint(n) != 0, ossl_isprint(n) != 0)
39            && TEST_int_eq(ispunct(n) != 0, ossl_ispunct(n) != 0)
40            && TEST_int_eq(isspace(n) != 0, ossl_isspace(n) != 0)
41            && TEST_int_eq(isupper(n) != 0, ossl_isupper(n) != 0)
42            && TEST_int_eq(isxdigit(n) != 0, ossl_isxdigit(n) != 0);
43 }
44
45 static struct {
46     int u;
47     int l;
48 } case_change[] = {
49     { 'A', 'a' },
50     { 'X', 'x' },
51     { 'Z', 'z' },
52     { '0', '0' },
53     { '%', '%' },
54     { '~', '~' },
55     {   0,   0 },
56     { EOF, EOF }
57 };
58
59 static int test_ctype_toupper(int n)
60 {
61     return TEST_int_eq(ossl_toupper(case_change[n].l), case_change[n].u)
62            && TEST_int_eq(ossl_toupper(case_change[n].u), case_change[n].u);
63 }
64
65 static int test_ctype_tolower(int n)
66 {
67     return TEST_int_eq(ossl_tolower(case_change[n].u), case_change[n].l)
68            && TEST_int_eq(ossl_tolower(case_change[n].l), case_change[n].l);
69 }
70
71 int setup_tests(void)
72 {
73     ADD_ALL_TESTS(test_ctype_chars, 128);
74     ADD_ALL_TESTS(test_ctype_toupper, OSSL_NELEM(case_change));
75     ADD_ALL_TESTS(test_ctype_tolower, OSSL_NELEM(case_change));
76     return 1;
77 }