1/**
2 * \file macros.h
3 *
4 * \brief   This file contains generic macros for the purpose of testing.
5 */
6
7/*
8 *  Copyright The Mbed TLS Contributors
9 *  SPDX-License-Identifier: Apache-2.0 OR GPL-2.0-or-later
10 */
11
12#ifndef TEST_MACROS_H
13#define TEST_MACROS_H
14
15#include "mbedtls/build_info.h"
16
17#include <stdlib.h>
18
19#include "mbedtls/platform.h"
20
21#if defined(MBEDTLS_MEMORY_BUFFER_ALLOC_C)
22#include "mbedtls/memory_buffer_alloc.h"
23#endif
24#include "common.h"
25
26/**
27 * \brief   This macro tests the expression passed to it as a test step or
28 *          individual test in a test case.
29 *
30 *          It allows a library function to return a value and return an error
31 *          code that can be tested.
32 *
33 *          Failing the test means:
34 *          - Mark this test case as failed.
35 *          - Print a message identifying the failure.
36 *          - Jump to the \c exit label.
37 *
38 *          This macro expands to an instruction, not an expression.
39 *          It may jump to the \c exit label.
40 *
41 * \param   TEST    The test expression to be tested.
42 */
43#define TEST_ASSERT(TEST)                                 \
44    do {                                                    \
45        if (!(TEST))                                       \
46        {                                                    \
47            mbedtls_test_fail( #TEST, __LINE__, __FILE__);   \
48            goto exit;                                        \
49        }                                                    \
50    } while (0)
51
52/** This macro asserts fails the test with given output message.
53 *
54 * \param   MESSAGE The message to be outputed on assertion
55 */
56#define TEST_FAIL(MESSAGE)                           \
57    do {                                                  \
58        mbedtls_test_fail(MESSAGE, __LINE__, __FILE__);   \
59        goto exit;                                        \
60    } while (0)
61
62/** Evaluate two integer expressions and fail the test case if they have
63 * different values.
64 *
65 * The two expressions should have the same signedness, otherwise the
66 * comparison is not meaningful if the signed value is negative.
67 *
68 * \param expr1     An integral-typed expression to evaluate.
69 * \param expr2     Another integral-typed expression to evaluate.
70 */
71#define TEST_EQUAL(expr1, expr2)                                      \
72    do {                                                                \
73        if (!mbedtls_test_equal( #expr1 " == " #expr2, __LINE__, __FILE__, \
74                                 (unsigned long long) (expr1), (unsigned long long) (expr2)))                      \
75        goto exit;                                                  \
76    } while (0)
77
78/** Evaluate two unsigned integer expressions and fail the test case
79 * if they are not in increasing order (left <= right).
80 *
81 * \param expr1     An integral-typed expression to evaluate.
82 * \param expr2     Another integral-typed expression to evaluate.
83 */
84#define TEST_LE_U(expr1, expr2)                                       \
85    do {                                                                \
86        if (!mbedtls_test_le_u( #expr1 " <= " #expr2, __LINE__, __FILE__, \
87                                expr1, expr2))                      \
88        goto exit;                                                  \
89    } while (0)
90
91/** Evaluate two signed integer expressions and fail the test case
92 * if they are not in increasing order (left <= right).
93 *
94 * \param expr1     An integral-typed expression to evaluate.
95 * \param expr2     Another integral-typed expression to evaluate.
96 */
97#define TEST_LE_S(expr1, expr2)                                       \
98    do {                                                                \
99        if (!mbedtls_test_le_s( #expr1 " <= " #expr2, __LINE__, __FILE__, \
100                                expr1, expr2))                      \
101        goto exit;                                                  \
102    } while (0)
103
104/** Allocate memory dynamically and fail the test case if this fails.
105 * The allocated memory will be filled with zeros.
106 *
107 * You must set \p pointer to \c NULL before calling this macro and
108 * put `mbedtls_free(pointer)` in the test's cleanup code.
109 *
110 * If \p item_count is zero, the resulting \p pointer will be \c NULL.
111 * This is usually what we want in tests since API functions are
112 * supposed to accept null pointers when a buffer size is zero.
113 *
114 * This macro expands to an instruction, not an expression.
115 * It may jump to the \c exit label.
116 *
117 * \param pointer    An lvalue where the address of the allocated buffer
118 *                   will be stored.
119 *                   This expression may be evaluated multiple times.
120 * \param item_count Number of elements to allocate.
121 *                   This expression may be evaluated multiple times.
122 *
123 */
124#define TEST_CALLOC(pointer, item_count)                    \
125    do {                                                    \
126        TEST_ASSERT((pointer) == NULL);                     \
127        if ((item_count) != 0) {                            \
128            (pointer) = mbedtls_calloc((item_count),        \
129                                       sizeof(*(pointer))); \
130            TEST_ASSERT((pointer) != NULL);                 \
131        }                                                   \
132    } while (0)
133
134/** Allocate memory dynamically and fail the test case if this fails.
135 * The allocated memory will be filled with zeros.
136 *
137 * You must set \p pointer to \c NULL before calling this macro and
138 * put `mbedtls_free(pointer)` in the test's cleanup code.
139 *
140 * If \p item_count is zero, the resulting \p pointer will not be \c NULL.
141 *
142 * This macro expands to an instruction, not an expression.
143 * It may jump to the \c exit label.
144 *
145 * \param pointer    An lvalue where the address of the allocated buffer
146 *                   will be stored.
147 *                   This expression may be evaluated multiple times.
148 * \param item_count Number of elements to allocate.
149 *                   This expression may be evaluated multiple times.
150 *
151 * Note: if passing size 0, mbedtls_calloc may return NULL. In this case,
152 * we reattempt to allocate with the smallest possible buffer to assure a
153 * non-NULL pointer.
154 */
155#define TEST_CALLOC_NONNULL(pointer, item_count)            \
156    do {                                                    \
157        TEST_ASSERT((pointer) == NULL);                     \
158        (pointer) = mbedtls_calloc((item_count),            \
159                                   sizeof(*(pointer)));     \
160        if (((pointer) == NULL) && ((item_count) == 0)) {   \
161            (pointer) = mbedtls_calloc(1, 1);               \
162        }                                                   \
163        TEST_ASSERT((pointer) != NULL);                     \
164    } while (0)
165
166/* For backwards compatibility */
167#define ASSERT_ALLOC(pointer, item_count) TEST_CALLOC(pointer, item_count)
168
169/** Allocate memory dynamically. If the allocation fails, skip the test case.
170 *
171 * This macro behaves like #TEST_CALLOC, except that if the allocation
172 * fails, it marks the test as skipped rather than failed.
173 */
174#define TEST_CALLOC_OR_SKIP(pointer, item_count)            \
175    do {                                                    \
176        TEST_ASSERT((pointer) == NULL);                     \
177        if ((item_count) != 0) {                            \
178            (pointer) = mbedtls_calloc((item_count),        \
179                                       sizeof(*(pointer))); \
180            TEST_ASSUME((pointer) != NULL);                 \
181        }                                                   \
182    } while (0)
183
184/* For backwards compatibility */
185#define ASSERT_ALLOC_WEAK(pointer, item_count) TEST_CALLOC_OR_SKIP(pointer, item_count)
186
187/** Compare two buffers and fail the test case if they differ.
188 *
189 * This macro expands to an instruction, not an expression.
190 * It may jump to the \c exit label.
191 *
192 * \param p1        Pointer to the start of the first buffer.
193 * \param size1     Size of the first buffer in bytes.
194 *                  This expression may be evaluated multiple times.
195 * \param p2        Pointer to the start of the second buffer.
196 * \param size2     Size of the second buffer in bytes.
197 *                  This expression may be evaluated multiple times.
198 */
199#define TEST_MEMORY_COMPARE(p1, size1, p2, size2)              \
200    do {                                                       \
201        TEST_EQUAL((size1), (size2));                          \
202        if ((size1) != 0) {                                    \
203            TEST_ASSERT(memcmp((p1), (p2), (size1)) == 0);     \
204        }                                                      \
205    } while (0)
206
207/* For backwards compatibility */
208#define ASSERT_COMPARE(p1, size1, p2, size2) TEST_MEMORY_COMPARE(p1, size1, p2, size2)
209
210/**
211 * \brief   This macro tests the expression passed to it and skips the
212 *          running test if it doesn't evaluate to 'true'.
213 *
214 * \param   TEST    The test expression to be tested.
215 */
216#define TEST_ASSUME(TEST)                                 \
217    do {                                                    \
218        if (!(TEST))                                      \
219        {                                                   \
220            mbedtls_test_skip( #TEST, __LINE__, __FILE__); \
221            goto exit;                                      \
222        }                                                   \
223    } while (0)
224
225#define TEST_HELPER_ASSERT(a) if (!(a))                          \
226    {                                                                   \
227        mbedtls_fprintf(stderr, "Assertion Failed at %s:%d - %s\n",    \
228                        __FILE__, __LINE__, #a);              \
229        mbedtls_exit(1);                                              \
230    }
231
232/** Return the smaller of two values.
233 *
234 * \param x         An integer-valued expression without side effects.
235 * \param y         An integer-valued expression without side effects.
236 *
237 * \return The smaller of \p x and \p y.
238 */
239#define MIN(x, y) ((x) < (y) ? (x) : (y))
240
241/** Return the larger of two values.
242 *
243 * \param x         An integer-valued expression without side effects.
244 * \param y         An integer-valued expression without side effects.
245 *
246 * \return The larger of \p x and \p y.
247 */
248#define MAX(x, y) ((x) > (y) ? (x) : (y))
249
250#endif /* TEST_MACROS_H */
251