diff options
Diffstat (limited to 'listpool/test')
-rw-r--r-- | listpool/test/listpool_test.c | 166 | ||||
-rw-r--r-- | listpool/test/test.h | 185 |
2 files changed, 351 insertions, 0 deletions
diff --git a/listpool/test/listpool_test.c b/listpool/test/listpool_test.c new file mode 100644 index 0000000..cb54d00 --- /dev/null +++ b/listpool/test/listpool_test.c | |||
@@ -0,0 +1,166 @@ | |||
1 | #include "listpool.h" | ||
2 | |||
3 | #include "test.h" | ||
4 | |||
5 | #define NUM_BLOCKS 10 | ||
6 | |||
7 | DEF_LISTPOOL(test_pool, int, NUM_BLOCKS); | ||
8 | |||
9 | static int count(test_pool* pool) { | ||
10 | int count = 0; | ||
11 | listpool_foreach(pool, n, { count++; }); | ||
12 | return count; | ||
13 | } | ||
14 | |||
15 | static int sum(test_pool* pool) { | ||
16 | int sum = 0; | ||
17 | listpool_foreach(pool, n, { sum += *n; }); | ||
18 | return sum; | ||
19 | } | ||
20 | |||
21 | // Create a pool. | ||
22 | TEST_CASE(listpool_create) { | ||
23 | test_pool pool; | ||
24 | listpool_make(&pool); | ||
25 | } | ||
26 | |||
27 | // Allocate all N blocks. | ||
28 | TEST_CASE(listpool_fully_allocate) { | ||
29 | test_pool pool; | ||
30 | listpool_make(&pool); | ||
31 | |||
32 | for (int i = 0; i < NUM_BLOCKS; ++i) { | ||
33 | const int* block = listpool_alloc(&pool); | ||
34 | TEST_TRUE(block != 0); | ||
35 | } | ||
36 | } | ||
37 | |||
38 | // Allocate all N blocks, then free them. | ||
39 | TEST_CASE(listpool_fill_then_free) { | ||
40 | test_pool pool; | ||
41 | listpool_make(&pool); | ||
42 | |||
43 | int* blocks[NUM_BLOCKS] = {0}; | ||
44 | for (int i = 0; i < NUM_BLOCKS; i++) { | ||
45 | blocks[i] = listpool_alloc(&pool); | ||
46 | TEST_TRUE(blocks[i] != 0); | ||
47 | } | ||
48 | |||
49 | for (int i = 0; i < NUM_BLOCKS; i++) { | ||
50 | listpool_free(&pool, &blocks[i]); | ||
51 | TEST_EQUAL(blocks[i], 0); // Pointer should be set to 0 on free. | ||
52 | } | ||
53 | |||
54 | TEST_EQUAL(count(&pool), 0); | ||
55 | } | ||
56 | |||
57 | // Attempt to allocate blocks past the maximum pool size. | ||
58 | // The pool should handle the failed allocations gracefully. | ||
59 | TEST_CASE(listpool_allocate_beyond_max_size) { | ||
60 | test_pool pool; | ||
61 | listpool_make(&pool); | ||
62 | |||
63 | // Fully allocate the pool. | ||
64 | for (int i = 0; i < NUM_BLOCKS; ++i) { | ||
65 | TEST_TRUE(listpool_alloc(&pool) != 0); | ||
66 | } | ||
67 | |||
68 | // Past the end. | ||
69 | for (int i = 0; i < NUM_BLOCKS; ++i) { | ||
70 | TEST_EQUAL(listpool_alloc(&pool), 0); | ||
71 | } | ||
72 | } | ||
73 | |||
74 | // Free blocks should always remain zeroed out. | ||
75 | // This tests the invariant right after creating the pool. | ||
76 | TEST_CASE(listpool_zero_free_blocks_after_creation) { | ||
77 | test_pool pool; | ||
78 | listpool_make(&pool); | ||
79 | |||
80 | const int zero = 0; | ||
81 | for (int i = 0; i < NUM_BLOCKS; ++i) { | ||
82 | const int* block = (const int*)(pool.blocks) + i; | ||
83 | TEST_EQUAL(memcmp(block, &zero, sizeof(int)), 0); | ||
84 | } | ||
85 | } | ||
86 | |||
87 | // Free blocks should always remain zeroed out. | ||
88 | // This tests the invariant after freeing a block. | ||
89 | TEST_CASE(listpool_zero_free_block_after_free) { | ||
90 | test_pool pool; | ||
91 | listpool_make(&pool); | ||
92 | |||
93 | int* val = listpool_alloc(&pool); | ||
94 | TEST_TRUE(val != 0); | ||
95 | *val = 177; | ||
96 | |||
97 | int* old_val = val; | ||
98 | listpool_free(&pool, &val); // val pointer is set to 0. | ||
99 | TEST_EQUAL(*old_val, 0); // Block is zeroed out after free. | ||
100 | } | ||
101 | |||
102 | // Traverse an empty pool. | ||
103 | TEST_CASE(listpool_traverse_empty) { | ||
104 | test_pool pool; | ||
105 | listpool_make(&pool); | ||
106 | |||
107 | TEST_EQUAL(count(&pool), 0); | ||
108 | } | ||
109 | |||
110 | // Traverse a partially full pool. | ||
111 | TEST_CASE(listpool_traverse_partially_full) { | ||
112 | const int N = NUM_BLOCKS / 2; | ||
113 | |||
114 | test_pool pool; | ||
115 | listpool_make(&pool); | ||
116 | |||
117 | for (int i = 0; i < N; ++i) { | ||
118 | int* val = listpool_alloc(&pool); | ||
119 | TEST_TRUE(val != 0); | ||
120 | *val = i + 1; | ||
121 | } | ||
122 | |||
123 | TEST_EQUAL(sum(&pool), (N) * (N + 1) / 2); | ||
124 | } | ||
125 | |||
126 | // Traverse a full pool. | ||
127 | TEST_CASE(listpool_traverse_full) { | ||
128 | test_pool pool; | ||
129 | listpool_make(&pool); | ||
130 | |||
131 | for (int i = 0; i < NUM_BLOCKS; ++i) { | ||
132 | int* val = listpool_alloc(&pool); | ||
133 | TEST_TRUE(val != 0); | ||
134 | *val = i + 1; | ||
135 | } | ||
136 | |||
137 | TEST_EQUAL(sum(&pool), (NUM_BLOCKS) * (NUM_BLOCKS + 1) / 2); | ||
138 | } | ||
139 | |||
140 | // Remove a value from the list. | ||
141 | TEST_CASE(listpool_remove_value) { | ||
142 | test_pool pool; | ||
143 | listpool_make(&pool); | ||
144 | |||
145 | int* x = listpool_alloc(&pool); | ||
146 | int* y = listpool_alloc(&pool); | ||
147 | TEST_TRUE(x != 0); | ||
148 | TEST_TRUE(y != 0); | ||
149 | |||
150 | *x = 155; | ||
151 | *y = 177; | ||
152 | |||
153 | listpool_remove(&pool, 155); // x | ||
154 | |||
155 | TEST_EQUAL(count(&pool), 1); | ||
156 | TEST_EQUAL(sum(&pool), *y); | ||
157 | } | ||
158 | |||
159 | // Stress test. | ||
160 | // | ||
161 | // 1. Allocate the pool, either fully or partially. If fully, attempt to | ||
162 | // allocate some items past the end. | ||
163 | // | ||
164 | // 2. Free all allocated items in some random order. | ||
165 | |||
166 | int main() { return 0; } | ||
diff --git a/listpool/test/test.h b/listpool/test/test.h new file mode 100644 index 0000000..fd8dc22 --- /dev/null +++ b/listpool/test/test.h | |||
@@ -0,0 +1,185 @@ | |||
1 | // SPDX-License-Identifier: MIT | ||
2 | #pragma once | ||
3 | |||
4 | #ifdef UNIT_TEST | ||
5 | |||
6 | #include <stdbool.h> | ||
7 | #include <stdio.h> | ||
8 | #include <stdlib.h> | ||
9 | #include <string.h> | ||
10 | |||
11 | #if defined(__DragonFly__) || defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || \ | ||
12 | defined(__NetBSD__) || defined(__OpenBSD__) | ||
13 | #define USE_SYSCTL_FOR_ARGS 1 | ||
14 | // clang-format off | ||
15 | #include <sys/types.h> | ||
16 | #include <sys/sysctl.h> | ||
17 | // clang-format on | ||
18 | #include <unistd.h> // getpid | ||
19 | #endif | ||
20 | |||
21 | struct test_file_metadata; | ||
22 | |||
23 | struct test_failure { | ||
24 | bool present; | ||
25 | const char *message; | ||
26 | const char *file; | ||
27 | int line; | ||
28 | }; | ||
29 | |||
30 | struct test_case_metadata { | ||
31 | void (*fn)(struct test_case_metadata *, struct test_file_metadata *); | ||
32 | struct test_failure failure; | ||
33 | const char *name; | ||
34 | struct test_case_metadata *next; | ||
35 | }; | ||
36 | |||
37 | struct test_file_metadata { | ||
38 | bool registered; | ||
39 | const char *name; | ||
40 | struct test_file_metadata *next; | ||
41 | struct test_case_metadata *tests; | ||
42 | }; | ||
43 | |||
44 | struct test_file_metadata __attribute__((weak)) * test_file_head; | ||
45 | |||
46 | #define SET_FAILURE(_message) \ | ||
47 | metadata->failure = (struct test_failure) { \ | ||
48 | .message = _message, .file = __FILE__, .line = __LINE__, .present = true, \ | ||
49 | } | ||
50 | |||
51 | #define TEST_EQUAL(a, b) \ | ||
52 | do { \ | ||
53 | if ((a) != (b)) { \ | ||
54 | SET_FAILURE(#a " != " #b); \ | ||
55 | return; \ | ||
56 | } \ | ||
57 | } while (0) | ||
58 | |||
59 | #define TEST_TRUE(a) \ | ||
60 | do { \ | ||
61 | if (!(a)) { \ | ||
62 | SET_FAILURE(#a " is not true"); \ | ||
63 | return; \ | ||
64 | } \ | ||
65 | } while (0) | ||
66 | |||
67 | #define TEST_STREQUAL(a, b) \ | ||
68 | do { \ | ||
69 | if (strcmp(a, b) != 0) { \ | ||
70 | SET_FAILURE(#a " != " #b); \ | ||
71 | return; \ | ||
72 | } \ | ||
73 | } while (0) | ||
74 | |||
75 | #define TEST_CASE(_name) \ | ||
76 | static void __test_h_##_name(struct test_case_metadata *, \ | ||
77 | struct test_file_metadata *); \ | ||
78 | static struct test_file_metadata __test_h_file; \ | ||
79 | static struct test_case_metadata __test_h_meta_##_name = { \ | ||
80 | .name = #_name, \ | ||
81 | .fn = __test_h_##_name, \ | ||
82 | }; \ | ||
83 | static void __attribute__((constructor(101))) __test_h_##_name##_register(void) { \ | ||
84 | __test_h_meta_##_name.next = __test_h_file.tests; \ | ||
85 | __test_h_file.tests = &__test_h_meta_##_name; \ | ||
86 | if (!__test_h_file.registered) { \ | ||
87 | __test_h_file.name = __FILE__; \ | ||
88 | __test_h_file.next = test_file_head; \ | ||
89 | test_file_head = &__test_h_file; \ | ||
90 | __test_h_file.registered = true; \ | ||
91 | } \ | ||
92 | } \ | ||
93 | static void __test_h_##_name( \ | ||
94 | struct test_case_metadata *metadata __attribute__((unused)), \ | ||
95 | struct test_file_metadata *file_metadata __attribute__((unused))) | ||
96 | |||
97 | extern void __attribute__((weak)) (*test_h_unittest_setup)(void); | ||
98 | /// Run defined tests, return true if all tests succeeds | ||
99 | /// @param[out] tests_run if not NULL, set to whether tests were run | ||
100 | static inline void __attribute__((constructor(102))) run_tests(void) { | ||
101 | bool should_run = false; | ||
102 | #ifdef USE_SYSCTL_FOR_ARGS | ||
103 | int mib[] = { | ||
104 | CTL_KERN, | ||
105 | #if defined(__NetBSD__) || defined(__OpenBSD__) | ||
106 | KERN_PROC_ARGS, | ||
107 | getpid(), | ||
108 | KERN_PROC_ARGV, | ||
109 | #else | ||
110 | KERN_PROC, | ||
111 | KERN_PROC_ARGS, | ||
112 | getpid(), | ||
113 | #endif | ||
114 | }; | ||
115 | char *arg = NULL; | ||
116 | size_t arglen; | ||
117 | sysctl(mib, sizeof(mib) / sizeof(mib[0]), NULL, &arglen, NULL, 0); | ||
118 | arg = malloc(arglen); | ||
119 | sysctl(mib, sizeof(mib) / sizeof(mib[0]), arg, &arglen, NULL, 0); | ||
120 | #else | ||
121 | FILE *cmdlinef = fopen("/proc/self/cmdline", "r"); | ||
122 | char *arg = NULL; | ||
123 | int arglen; | ||
124 | fscanf(cmdlinef, "%ms%n", &arg, &arglen); | ||
125 | fclose(cmdlinef); | ||
126 | #endif | ||
127 | for (char *pos = arg; pos < arg + arglen; pos += strlen(pos) + 1) { | ||
128 | if (strcmp(pos, "--unittest") == 0) { | ||
129 | should_run = true; | ||
130 | break; | ||
131 | } | ||
132 | } | ||
133 | free(arg); | ||
134 | |||
135 | if (!should_run) { | ||
136 | return; | ||
137 | } | ||
138 | |||
139 | if (&test_h_unittest_setup) { | ||
140 | test_h_unittest_setup(); | ||
141 | } | ||
142 | |||
143 | struct test_file_metadata *i = test_file_head; | ||
144 | int failed = 0, success = 0; | ||
145 | while (i) { | ||
146 | fprintf(stderr, "Running tests from %s:\n", i->name); | ||
147 | struct test_case_metadata *j = i->tests; | ||
148 | while (j) { | ||
149 | fprintf(stderr, "\t%s ... ", j->name); | ||
150 | j->failure.present = false; | ||
151 | j->fn(j, i); | ||
152 | if (j->failure.present) { | ||
153 | fprintf(stderr, "failed (%s at %s:%d)\n", j->failure.message, | ||
154 | j->failure.file, j->failure.line); | ||
155 | failed++; | ||
156 | } else { | ||
157 | fprintf(stderr, "passed\n"); | ||
158 | success++; | ||
159 | } | ||
160 | j = j->next; | ||
161 | } | ||
162 | fprintf(stderr, "\n"); | ||
163 | i = i->next; | ||
164 | } | ||
165 | int total = failed + success; | ||
166 | fprintf(stderr, "Test results: passed %d/%d, failed %d/%d\n", success, total, | ||
167 | failed, total); | ||
168 | exit(failed == 0 ? EXIT_SUCCESS : EXIT_FAILURE); | ||
169 | } | ||
170 | |||
171 | #else | ||
172 | |||
173 | #include <stdbool.h> | ||
174 | |||
175 | #define TEST_CASE(name) static void __attribute__((unused)) __test_h_##name(void) | ||
176 | |||
177 | #define TEST_EQUAL(a, b) \ | ||
178 | (void)(a); \ | ||
179 | (void)(b) | ||
180 | #define TEST_TRUE(a) (void)(a) | ||
181 | #define TEST_STREQUAL(a, b) \ | ||
182 | (void)(a); \ | ||
183 | (void)(b) | ||
184 | |||
185 | #endif | ||