]>
git.ipfire.org Git - thirdparty/openssl.git/blob - test/sparse_array_test.c
2 * Copyright 2019 The OpenSSL Project Authors. All Rights Reserved.
3 * Copyright (c) 2019, Oracle and/or its affiliates. All rights reserved.
5 * Licensed under the Apache License 2.0 (the "License"). You may not use
6 * this file except in compliance with the License. You can obtain a copy
7 * in the file LICENSE in the source distribution or at
8 * https://www.openssl.org/source/license.html
15 #include <openssl/crypto.h>
16 #include <internal/nelem.h>
18 #include "crypto/sparse_array.h"
21 /* The macros below generate unused functions which error out one of the clang
22 * builds. We disable this check here.
25 #pragma clang diagnostic ignored "-Wunused-function"
28 DEFINE_SPARSE_ARRAY_OF(char);
30 static int test_sparse_array(void)
36 { 22, "a" }, { 0, "z" }, { 1, "b" }, { 290, "c" },
37 { INT_MAX
, "m" }, { 6666666, "d" }, { (ossl_uintmax_t
)-1, "H" },
40 SPARSE_ARRAY_OF(char) *sa
;
44 if (!TEST_ptr(sa
= ossl_sa_char_new())
45 || !TEST_ptr_null(ossl_sa_char_get(sa
, 3))
46 || !TEST_ptr_null(ossl_sa_char_get(sa
, 0))
47 || !TEST_ptr_null(ossl_sa_char_get(sa
, UINT_MAX
)))
50 for (i
= 0; i
< OSSL_NELEM(cases
); i
++) {
51 if (!TEST_true(ossl_sa_char_set(sa
, cases
[i
].n
, cases
[i
].v
))) {
52 TEST_note("iteration %zu", i
+ 1);
55 for (j
= 0; j
<= i
; j
++)
56 if (!TEST_str_eq(ossl_sa_char_get(sa
, cases
[j
].n
), cases
[j
].v
)) {
57 TEST_note("iteration %zu / %zu", i
+ 1, j
+ 1);
64 ossl_sa_char_free(sa
);
68 static int test_sparse_array_num(void)
75 { 1, 22, "a" }, { 2, 1021, "b" }, { 3, 3, "c" }, { 2, 22, NULL
},
76 { 2, 3, "d" }, { 3, 22, "e" }, { 3, 666, NULL
}, { 4, 666, "f" },
77 { 3, 3, NULL
}, { 2, 22, NULL
}, { 1, 666, NULL
}, { 2, 64000, "g" },
78 { 1, 1021, NULL
}, { 0, 64000, NULL
}, { 1, 23, "h" }, { 0, 23, NULL
}
80 SPARSE_ARRAY_OF(char) *sa
= NULL
;
84 if (!TEST_size_t_eq(ossl_sa_char_num(NULL
), 0)
85 || !TEST_ptr(sa
= ossl_sa_char_new())
86 || !TEST_size_t_eq(ossl_sa_char_num(sa
), 0))
88 for (i
= 0; i
< OSSL_NELEM(cases
); i
++)
89 if (!TEST_true(ossl_sa_char_set(sa
, cases
[i
].n
, cases
[i
].v
))
90 || !TEST_size_t_eq(ossl_sa_char_num(sa
), cases
[i
].num
))
94 ossl_sa_char_free(sa
);
98 struct index_cases_st
{
105 SPARSE_ARRAY_OF(char) *sa
;
107 const struct index_cases_st
*cases
;
112 static void leaf_check_all(ossl_uintmax_t n
, char *value
, void *arg
)
114 struct doall_st
*doall_data
= (struct doall_st
*)arg
;
115 const struct index_cases_st
*cases
= doall_data
->cases
;
119 for (i
= 0; i
< doall_data
->num_cases
; i
++)
120 if ((doall_data
->all
|| !cases
[i
].del
)
121 && n
== cases
[i
].n
&& strcmp(value
, cases
[i
].v
) == 0) {
125 TEST_error("Index %ju with value %s not found", n
, value
);
128 static void leaf_delete(ossl_uintmax_t n
, char *value
, void *arg
)
130 struct doall_st
*doall_data
= (struct doall_st
*)arg
;
131 const struct index_cases_st
*cases
= doall_data
->cases
;
135 for (i
= 0; i
< doall_data
->num_cases
; i
++)
136 if (n
== cases
[i
].n
&& strcmp(value
, cases
[i
].v
) == 0) {
138 ossl_sa_char_set(doall_data
->sa
, n
, NULL
);
141 TEST_error("Index %ju with value %s not found", n
, value
);
144 static int test_sparse_array_doall(void)
146 static const struct index_cases_st cases
[] = {
147 { 22, "A", 1 }, { 1021, "b", 0 }, { 3, "c", 0 }, { INT_MAX
, "d", 1 },
148 { (ossl_uintmax_t
)-1, "H", 0 }, { (ossl_uintmax_t
)-2, "i", 1 },
149 { 666666666, "s", 1 }, { 1234567890, "t", 0 },
151 struct doall_st doall_data
;
153 SPARSE_ARRAY_OF(char) *sa
= NULL
;
156 if (!TEST_ptr(sa
= ossl_sa_char_new()))
158 doall_data
.num_cases
= OSSL_NELEM(cases
);
159 doall_data
.cases
= cases
;
161 doall_data
.sa
= NULL
;
162 for (i
= 0; i
< OSSL_NELEM(cases
); i
++)
163 if (!TEST_true(ossl_sa_char_set(sa
, cases
[i
].n
, cases
[i
].v
))) {
164 TEST_note("failed at iteration %zu", i
+ 1);
168 ossl_sa_char_doall_arg(sa
, &leaf_check_all
, &doall_data
);
169 if (doall_data
.res
== 0) {
170 TEST_info("while checking all elements");
175 ossl_sa_char_doall_arg(sa
, &leaf_delete
, &doall_data
);
176 if (doall_data
.res
== 0) {
177 TEST_info("while deleting selected elements");
180 ossl_sa_char_doall_arg(sa
, &leaf_check_all
, &doall_data
);
181 if (doall_data
.res
== 0) {
182 TEST_info("while checking for deleted elements");
188 ossl_sa_char_free(sa
);
192 int setup_tests(void)
194 ADD_TEST(test_sparse_array
);
195 ADD_TEST(test_sparse_array_num
);
196 ADD_TEST(test_sparse_array_doall
);