#define DYNARRAY_IMPLEMENTATION
#define UTILITY_IMPLEMENTATION
#define UTILTY_EXPOSE_HELPERS
#include "../include/dynarray.h"
#include "../include/utility.h"
#include <stdio.h>
#include <stdlib.h>

/// To test for different types
#if defined(TT_LONG)
	#define TEST_TYPE long
#elif defined(TT_INT)
	#define TEST_TYPE int
#elif defined(TT_SHORT)
	#define TEST_TYPE short
#elif defined(TT_CHAR)
	#define TEST_TYPE char
#endif 

void print_arr(TEST_TYPE *a, int line, const char* message) 
{
	printf("%20s@%i: %-16s: ", __FILE__, line, message);
	printf("%p: {", (void*)a);
	for (size_t i = 0UL; i < array_size(a); ++i) { 
#if defined(TT_CHAR)
		printf("%hhi, ", a[i]);
#elif defined(TT_SHORT)
		printf("%hi, ", a[i]);
#elif defined(TT_INT)
		printf("%i, ", a[i]);
#elif defined(TT_LONG)
		printf("%li, ", a[i]);
#else
#pragma message error "PROVIDE A VALID SIGNED INTEGRAL TYPE"
#endif
	}
	printf("} size: %ld, cap: %ld, element_size: %ld\n", 
		array_size(a), array_capacity(a), array_element_size(a)
	);
}

int main()
{
	TEST_TYPE *arr = array_new(TEST_TYPE, 10);	// size: 10, cap: 10
	for (size_t i = 0; i < array_size(arr); ++i) { arr[i] = 127 - 2 * i; }
	print_arr(arr, __LINE__, "new array");	
	array_resize(arr, 21);				// size: 21, cap: 32
	print_arr(arr, __LINE__, "resize more");
	array_resize(arr, 3);				// size: 3, cap: 4
	print_arr(arr, __LINE__, "resize less");
	array_push(arr, 42);				// size: 4, cap: 4
	array_push(arr, 69);				// size: 5, cap: 8
	print_arr(arr, __LINE__, "pushes");
	array_shrink(arr);				// size: 5: cap: 5
	print_arr(arr, __LINE__, "shrinking");
	array_qsort_integral(arr);			// size: 5, cap: 5
	/* qsort(arr, array_size(arr), array_element_size(arr), __default_int_cmp); */
	print_arr(arr, __LINE__, "qsort");
	array_insert(arr, 20, 1);			// size: 6, cap: 8
	print_arr(arr, __LINE__, "1 insert");

	for (size_t i = 0; i <= array_size(arr); i += 2) {
		TEST_TYPE val = 0; // This is crucial. see comment above array_insert declaration.
		array_insert(arr, val, i);
	}						// size: 13, cap: 16
	print_arr(arr, __LINE__, "multiple inserts");

	TEST_TYPE test_arr_data[] =  {0, 42, 0, 20, 0, 69, 0, 123, 0, 125, 0, 127, 0, };
	TEST_TYPE* test_arr = array_new_buffer_copy(TEST_TYPE, test_arr_data, sizeof(test_arr_data) / sizeof(test_arr_data[0]));
	typeof(EXIT_SUCCESS) exit_status;
	if (array_compare(test_arr, arr, __qsort_cmps[sizeof(TEST_TYPE)])) {
		puts("\x1b[31mTest for \"" stringify(TEST_TYPE)"\" failed\x1b[0m");
		exit_status = EXIT_FAILURE;
	} else {
		puts("\x1b[32mTest for \"" stringify(TEST_TYPE)"\" passed\x1b[0m");
		exit_status = EXIT_SUCCESS;
	}

	array_free(arr);
	array_free(test_arr);
	exit(exit_status);
}