From 253f1d1ca8b4b81f206e4aeb20afe440a6dae8be Mon Sep 17 00:00:00 2001 From: sanine Date: Thu, 18 Aug 2022 22:03:13 -0500 Subject: add glfwInit and glfwTerminate bindings --- src/test/lily-test.c | 300 ++++++++++++++++++++++++++------------------------- src/test/lily-test.h | 87 ++++++++------- 2 files changed, 202 insertions(+), 185 deletions(-) (limited to 'src/test') diff --git a/src/test/lily-test.c b/src/test/lily-test.c index 20728fe..2f43a28 100644 --- a/src/test/lily-test.c +++ b/src/test/lily-test.c @@ -54,207 +54,207 @@ struct lily_globals_t _lily_globals = { {0}, 0, NULL, "" }; /* run an individual test */ void _lily_run_test(const char *name, lily_test_t test) { - printf(" %s: ", name); + printf(" %s: ", name); - _lily_globals.error_msg = NULL; - _lily_globals.error_location = ""; - int val = setjmp(_lily_globals.env); + _lily_globals.error_msg = NULL; + _lily_globals.error_location = ""; + int val = setjmp(_lily_globals.env); - if (val) { + if (val) { /* test failed */ - printf("FAIL - %s (%s)\n", - _lily_globals.error_msg, - _lily_globals.error_location); - free(_lily_globals.error_msg); /* error message was allocated! */ + printf("FAIL - %s (%s)\n", + _lily_globals.error_msg, + _lily_globals.error_location); + free(_lily_globals.error_msg); /* error message was allocated! */ return; - } + } - test(); + test(); - /* test succeeded */ - printf("OK\n"); + /* test succeeded */ + printf("OK\n"); } /* run a suite */ void _lily_run_suite(const char *name, lily_test_t suite) { - printf("=== %s ===\n", name); - suite(); - printf("\n"); + printf("=== %s ===\n", name); + suite(); + printf("\n"); } /* ======== ASSERTIONS ======== */ static void _lily_assert_msg(bool statement, const char *location, - const char *format_string, va_list args) + const char *format_string, va_list args) { - if (statement) { - va_end(args); - return; // no error, return - } + if (statement) { + va_end(args); + return; // no error, return + } - _lily_globals.error_location = location; + _lily_globals.error_location = location; - va_list args_len; - va_copy(args_len, args); - size_t length = vsnprintf(NULL, 0, format_string, args_len); - va_end(args_len); + va_list args_len; + va_copy(args_len, args); + size_t length = vsnprintf(NULL, 0, format_string, args_len); + va_end(args_len); - if (_lily_globals.error_msg_len < length+1 || - _lily_globals.error_msg == NULL) { - if (_lily_globals.error_msg != NULL) + if (_lily_globals.error_msg_len < length+1 || + _lily_globals.error_msg == NULL) { + if (_lily_globals.error_msg != NULL) free(_lily_globals.error_msg); - char *msg = malloc((length+2) * sizeof(char)); + char *msg = malloc((length+2) * sizeof(char)); - if (msg == NULL) { + if (msg == NULL) { fprintf(stderr, "WARNING: failed to allocate memory for failed test message!\n"); _lily_globals.error_msg = NULL; va_end(args); longjmp(_lily_globals.env, 1); return; - } - else { + } + else { _lily_globals.error_msg = msg; _lily_globals.error_msg_len = length+1; - } - } + } + } - vsnprintf(_lily_globals.error_msg, length+1, format_string, args); + vsnprintf(_lily_globals.error_msg, length+1, format_string, args); - va_end(args); - longjmp(_lily_globals.env, 1); + va_end(args); + longjmp(_lily_globals.env, 1); } void lily_assert_msg(bool statement, const char *location, - const char *format_string, ...) + const char *format_string, ...) { - va_list args; - va_start(args, format_string); - // _lily_assert_msg may long jump, so it takes calls va_end(args) for you - _lily_assert_msg(statement, location, format_string, args); + va_list args; + va_start(args, format_string); + // _lily_assert_msg may long jump, so it takes calls va_end(args) for you + _lily_assert_msg(statement, location, format_string, args); } void _lily_assert_true(const char *statement, bool value, const char *location) { - lily_assert_msg(value, location, - "%s is not true", - statement); + lily_assert_msg(value, location, + "%s is not true", + statement); } void _lily_assert_false(const char *statement, bool value, const char *location) { - lily_assert_msg(!value, location, - "%s is not false", - statement); + lily_assert_msg(!value, location, + "%s is not false", + statement); } void _lily_assert_not_null(const char *name, void *ptr, const char *location) { - lily_assert_msg(ptr != NULL, location, - "%s is NULL", - name); + lily_assert_msg(ptr != NULL, location, + "%s is NULL", + name); } void _lily_assert_null(const char *name, void *ptr, const char *location) { - lily_assert_msg(ptr == NULL, location, - "%s (%p) is not NULL", - name, ptr); + lily_assert_msg(ptr == NULL, location, + "%s (%p) is not NULL", + name, ptr); } void _lily_assert_ptr_equal(const char *name_a, const char *name_b, - void *a, void *b, const char *location) + void *a, void *b, const char *location) { - lily_assert_msg(a == b, location, - "%s (%p) is not equal to %s (%p)", - name_a, a, name_b, b); + lily_assert_msg(a == b, location, + "%s (%p) is not equal to %s (%p)", + name_a, a, name_b, b); } void _lily_assert_ptr_not_equal(const char *name_a, const char *name_b, - void *a, void *b, const char *location) + void *a, void *b, const char *location) { - lily_assert_msg(a != b, location, - "%s (%p) is equal to %s", - name_a, a, name_b); + lily_assert_msg(a != b, location, + "%s (%p) is equal to %s", + name_a, a, name_b); } void _lily_assert_int_equal(const char *name_a, const char *name_b, - intmax_t a, intmax_t b, const char *location) + intmax_t a, intmax_t b, const char *location) { - lily_assert_msg(a == b, location, - "%s (%d) is not equal to %s (%d)", - name_a, a, name_b, b); + lily_assert_msg(a == b, location, + "%s (%d) is not equal to %s (%d)", + name_a, a, name_b, b); } void _lily_assert_int_not_equal(const char *name_a, const char *name_b, - intmax_t a, intmax_t b, const char *location) + intmax_t a, intmax_t b, const char *location) { - lily_assert_msg(a != b, location, - "%s (%d) is equal to %s", - name_a, a, name_b); + lily_assert_msg(a != b, location, + "%s (%d) is equal to %s", + name_a, a, name_b); } void _lily_assert_float_equal(const char *name_a, const char *name_b, - double a, double b, double epsilon, const char *location) + double a, double b, double epsilon, const char *location) { - lily_assert_msg(abs(a - b) <= epsilon, - "%s (%f) is not equal to %s (%f) (epsilon: %f)", - name_a, a, name_b, b, epsilon); + lily_assert_msg(abs(a - b) <= epsilon, + "%s (%f) is not equal to %s (%f) (epsilon: %f)", + name_a, a, name_b, b, epsilon); } void _lily_assert_float_not_equal(const char *name_a, const char *name_b, double a, double b, double epsilon, const char *location) { - lily_assert_msg(abs(a - b) > epsilon, - "%s (%f) is equal to %s (%f) (epsilon: %f)", - name_a, a, name_b, b, epsilon); + lily_assert_msg(abs(a - b) > epsilon, + "%s (%f) is equal to %s (%f) (epsilon: %f)", + name_a, a, name_b, b, epsilon); } void _lily_assert_string_equal(const char *name_a, const char *name_b, - char *a, char *b, const char *location) + char *a, char *b, const char *location) { - lily_assert_msg(strcmp(a, b) == 0, - "%s ('%s') is not equal to %s ('%s')", - name_a, a, name_b, b); + lily_assert_msg(strcmp(a, b) == 0, + "%s ('%s') is not equal to %s ('%s')", + name_a, a, name_b, b); } void _lily_assert_string_not_equal(const char *name_a, const char *name_b, - char *a, char *b, const char *location) + char *a, char *b, const char *location) { - lily_assert_msg(strcmp(a, b) != 0, - "%s ('%s') is equal to %s", - name_a, a, name_b); + lily_assert_msg(strcmp(a, b) != 0, + "%s ('%s') is equal to %s", + name_a, a, name_b); } void _lily_assert_memory_equal(const char *name_a, const char *name_b, - void *a, void *b, size_t size, const char *location) + void *a, void *b, size_t size, const char *location) { - lily_assert_msg(memcmp(a, b, size) == 0, - "%s and %s contain different data", name_a, name_b); + lily_assert_msg(memcmp(a, b, size) == 0, + "%s and %s contain different data", name_a, name_b); } void _lily_assert_memory_not_equal(const char *name_a, const char *name_b, - void *a, void *b, size_t size, const char *location) + void *a, void *b, size_t size, const char *location) { - lily_assert_msg(memcmp(a, b, size) == 0, - "%s contains the same data s %s", name_a, name_b); + lily_assert_msg(memcmp(a, b, size) == 0, + "%s contains the same data s %s", name_a, name_b); } @@ -262,98 +262,104 @@ void _lily_assert_memory_not_equal(const char *name_a, const char *name_b, lily_queue_t* lily_queue_create() { - const size_t size = 256 * sizeof(uint8_t); + const size_t size = 256 * sizeof(uint8_t); - lily_queue_t *q = malloc(sizeof(lily_queue_t)); - q->buf_size = size; - q->buf = malloc(size); - q->front = q->buf; - q->back = q->front; + lily_queue_t *q = malloc(sizeof(lily_queue_t)); + q->buf_size = size; + q->buf = malloc(size); + q->front = q->buf; + q->back = q->front; - return q; + return q; } void lily_queue_destroy(lily_queue_t *q) { - free(q->buf); - free(q); + free(q->buf); + free(q); } void _lily_enqueue(lily_queue_t *q, size_t size, uint8_t *data) { - size_t used = q->back - q->buf; - size_t remaining = q->buf_size - used; - - if (remaining < size) { - /* re-allocate bigger buffer */ - size_t size_new = 2 * q->buf_size; - uint8_t *buf_new = realloc(q->buf, size_new); - if (buf_new == NULL) { + size_t used = q->back - q->buf; + size_t remaining = q->buf_size - used; + + if (remaining < size) { + /* re-allocate bigger buffer */ + size_t size_new = 2 * q->buf_size; + uint8_t *buf_new = realloc(q->buf, size_new); + if (buf_new == NULL) { fprintf(stderr, "failed to allocated %lu bytes for queue %p!\n", size_new, q); return; - } - q->buf = buf_new; - } + } + q->buf = buf_new; + } - memcpy(q->back, data, size); - q->back += size; + memcpy(q->back, data, size); + q->back += size; } void _lily_dequeue(lily_queue_t *q, size_t size, uint8_t *ptr) { - size_t dist = q->back - q->front; - if (dist < size) { - fprintf(stderr, "attempted to read %lu bytes out of queue %p, " - "which has %lu bytes presently queued\n", size, q, dist); - return; - } - - memcpy(ptr, q->front, size); - q->front += size; + size_t dist = q->back - q->front; + if (dist < size) { + fprintf(stderr, "attempted to read %lu bytes out of queue %p, " + "which has %lu bytes presently queued\n", size, q, dist); + return; + } + + memcpy(ptr, q->front, size); + q->front += size; } lily_mock_t * lily_mock_create() { - lily_mock_t *m = malloc(sizeof(lily_mock_t)); - m->n_calls = 0; - m->arguments = lily_queue_create(); - m->values = lily_queue_create(); - return m; + lily_mock_t *m = malloc(sizeof(lily_mock_t)); + m->n_calls = 0; + m->arguments = lily_queue_create(); + m->values = lily_queue_create(); + return m; } void lily_mock_destroy(lily_mock_t *m) { - lily_queue_destroy(m->arguments); - lily_queue_destroy(m->values); - free(m); + lily_queue_destroy(m->arguments); + lily_queue_destroy(m->values); + free(m); +} + +void lily_mock_use(lily_mock_t **m) +{ + if (*m != NULL) lily_mock_destroy(*m); + *m = lily_mock_create(); } void _lily_mock_call(lily_mock_t *m, struct lily_mock_arg_t *args, size_t n_args) { - m->n_calls += 1; + m->n_calls += 1; - for (int i=0; iarguments, args[i].size, args[i].var); - } + for (int i=0; iarguments, args[i].size, args[i].var); + } } void _lily_get_call(lily_mock_t *m, - struct lily_mock_arg_t *args, - size_t n_args, - unsigned int call_num) + struct lily_mock_arg_t *args, + size_t n_args, + unsigned int call_num) { - size_t stride = 0; - for (int i=0; iarguments->front = m->arguments->buf + (call_num * stride); - for (int i=0; iarguments, args[i].size, args[i].var); - } + size_t stride = 0; + for (int i=0; iarguments->front = m->arguments->buf + (call_num * stride); + for (int i=0; iarguments, args[i].size, args[i].var); + } } diff --git a/src/test/lily-test.h b/src/test/lily-test.h index 90fc2c8..b5f380c 100644 --- a/src/test/lily-test.h +++ b/src/test/lily-test.h @@ -45,6 +45,10 @@ #ifndef LILY_TEST_H #define LILY_TEST_H +#define LILY_VERSION_MAJOR 1 +#define LILY_VERSION_MINOR 0 +#define LILY_VERSION_PATCH 0 + #include #include #include @@ -53,7 +57,7 @@ #define STR_IMP(x) #x #define STR(x) STR_IMP(x) /* define SOURCE_PATH_SIZE to strip away the - leading parts of the full compilation path */ + leading parts of the full compilation path */ #ifndef SOURCE_PATH_SIZE #define LILY_LOCATION (__FILE__ ":" STR(__LINE__)) #else @@ -62,10 +66,10 @@ /** a few nasty globals that make everything clean for the end user */ struct lily_globals_t { - jmp_buf env; - size_t error_msg_len; - char *error_msg; - const char *error_location; + jmp_buf env; + size_t error_msg_len; + char *error_msg; + const char *error_location; }; extern struct lily_globals_t _lily_globals; @@ -89,7 +93,7 @@ void _lily_run_suite(const char *name, lily_test_t suite); /** basic assertion function, mostly used by the other assertions */ void lily_assert_msg(bool statement, const char *location, - const char *format_string, ...); + const char *format_string, ...); #define lily_assert_true(statement) _lily_assert_true(#statement, statement, LILY_LOCATION) void _lily_assert_true(const char *statement, bool value, const char *location); @@ -109,7 +113,7 @@ void _lily_assert_null(const char *name, void *ptr, const char *location); #define lily_assert_ptr_equal(a, b) _lily_assert_ptr_equal(#a, #b, a, b, LILY_LOCATION) void _lily_assert_ptr_equal(const char *name_a, const char *name_b, - void *a, void *b, const char *location); + void *a, void *b, const char *location); #define lily_assert_ptr_not_equal(a, b) _lily_assert_ptr_not_equal(#a, #b, a, b, LILY_LOCATION) @@ -119,7 +123,7 @@ void _lily_assert_ptr_not_equal(const char *name_a, const char *name_b, #define lily_assert_int_equal(a, b) _lily_assert_int_equal(#a, #b, a, b, LILY_LOCATION) void _lily_assert_int_equal(const char *name_a, const char *name_b, - intmax_t a, intmax_t b, const char *location); + intmax_t a, intmax_t b, const char *location); #define lily_assert_int_not_equal(a, b) _lily_assert_int_not_equal(#a, #b, a, b, LILY_LOCATION) @@ -128,37 +132,37 @@ void _lily_assert_int_not_equal(const char *name_a, const char *name_b, #define lily_assert_float_equal(a, b, epsilon) \ - _lily_assert_float_equal(#a, #b, a, b, epsilon, LILY_LOCATION) + _lily_assert_float_equal(#a, #b, a, b, epsilon, LILY_LOCATION) void _lily_assert_float_equal(const char *name_a, const char *name_b, - double a, double b, double epsilon, const char *location); + double a, double b, double epsilon, const char *location); #define lily_assert_float_not_equal(a, b, epsilon) \ - _lily_assert_float_not_equal(#a, #b, a, b, epsilon, LILY_LOCATION) + _lily_assert_float_not_equal(#a, #b, a, b, epsilon, LILY_LOCATION) void _lily_assert_float_not_equal(const char *name_a, const char *name_b, double a, double b, double epsilon, const char *location); #define lily_assert_string_equal(a, b) _lily_assert_string_equal(#a, #b, a, b, LILY_LOCATION) void _lily_assert_string_equal(const char *name_a, const char *name_b, - char *a, char *b, const char *location); + char *a, char *b, const char *location); #define lily_assert_string_not_equal(a, b) _lily_assert_string_not_equal(#a, #b, a, b, LILY_LOCATION) void _lily_assert_string_not_equal(const char *name_a, const char *name_b, - char *a, char *b, const char *location); + char *a, char *b, const char *location); #define lily_assert_memory_equal(a, b, size) \ - _lily_assert_memory_equal(#a, #b, a, b, size, LILY_LOCATION) + _lily_assert_memory_equal(#a, #b, a, b, size, LILY_LOCATION) void _lily_assert_memory_equal(const char *name_a, const char *name_b, - void *a, void *b, size_t size, const char *location); + void *a, void *b, size_t size, const char *location); #define lily_assert_memory_not_equal(a, b, size) \ - _lily_assert_memory_not_equal(#a, #b, a, b, size, LILY_LOCATION) + _lily_assert_memory_not_equal(#a, #b, a, b, size, LILY_LOCATION) void _lily_assert_memory_not_equal(const char *name_a, const char *name_b, - void *a, void *b, size_t size, const char *location); + void *a, void *b, size_t size, const char *location); /* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ @@ -171,9 +175,9 @@ void _lily_assert_memory_not_equal(const char *name_a, const char *name_b, /** queue structure capable of containing arbitrary data */ typedef struct lily_queue_t { - size_t buf_size; - uint8_t *buf; - uint8_t *front, *back; + size_t buf_size; + uint8_t *buf; + uint8_t *front, *back; } lily_queue_t; @@ -191,10 +195,10 @@ void lily_queue_destroy(lily_queue_t *q); * value - the value to append */ #define lily_enqueue(q, type, value) \ - do { \ - type _var = value; \ - _lily_enqueue(q, sizeof(type), (uint8_t*)(&_var)); \ - } while(0) + do { \ + type _var = value; \ + _lily_enqueue(q, sizeof(type), (uint8_t*)(&_var)); \ + } while(0) void _lily_enqueue(lily_queue_t *q, size_t size, uint8_t *data); @@ -205,48 +209,55 @@ void _lily_enqueue(lily_queue_t *q, size_t size, uint8_t *data); * ptr - the location to store the popped value */ #define lily_dequeue(q, type, ptr) \ - _lily_dequeue(q, sizeof(type), (uint8_t*) ptr) + _lily_dequeue(q, sizeof(type), (uint8_t*) ptr) void _lily_dequeue(lily_queue_t *q, size_t size, uint8_t *ptr); struct lily_mock_arg_t { - size_t size; - void *var; + size_t size; + void *var; }; #define LILY_NARGS(args) (sizeof(args)/sizeof(struct lily_mock_arg_t)) /** structure to store data for mock functions */ typedef struct lily_mock_t { - unsigned int n_calls; - lily_queue_t *arguments; - lily_queue_t *values; + unsigned int n_calls; + lily_queue_t *arguments; + lily_queue_t *values; } lily_mock_t; /** setup mock function storage */ lily_mock_t * lily_mock_create(); /** tear down mock function storage */ void lily_mock_destroy(lily_mock_t *m); - +/** automatically re-create mock function storage */ +void lily_mock_use(lily_mock_t **m); /** store a call to a mock function */ +#define lily_mock_store_call(m, args) \ + _lily_mock_call(m, args, LILY_NARGS(args)) +/* lily_mock_call is deprecated!! do not use it in new programs */ #define lily_mock_call(m, args) \ - _lily_mock_call(m, args, LILY_NARGS(args)) + _lily_mock_call(m, args, LILY_NARGS(args)) void _lily_mock_call(lily_mock_t *m, struct lily_mock_arg_t *args, size_t n_args); /** retrieve a call to a mock function */ +#define lily_mock_get_call(m, args, call_num) \ + _lily_get_call(m, args, LILY_NARGS(args), call_num) +/* lily_get_call is deprecated!! do not use it in new programs */ #define lily_get_call(m, args, call_num) \ - _lily_get_call(m, args, LILY_NARGS(args), call_num) + _lily_get_call(m, args, LILY_NARGS(args), call_num) void _lily_get_call(lily_mock_t *m, - struct lily_mock_arg_t *args, - size_t n_args, - unsigned int call_num); + struct lily_mock_arg_t *args, + size_t n_args, + unsigned int call_num); /** store a value in a mock structure */ #define lily_store_value(m, type, value) \ - lily_enqueue(m->values, type, value) + lily_enqueue(m->values, type, value) /** retrieve a value from a mock structure */ #define lily_get_value(m, type, ptr) \ - lily_dequeue(m->values, type, ptr) + lily_dequeue(m->values, type, ptr) #endif -- cgit v1.2.1