olaf@9: /*
universe@27:  * tests of dlist implementation
olaf@9:  */
olaf@9: 
universe@27: #include "dlist_tests.h"
olaf@9: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_append) {
universe@27:     UcxDlist *list = ucx_dlist_append(NULL, "Hello");
universe@33:     UCX_TEST_BEGIN
universe@27:     
universe@27:     UCX_TEST_ASSERT(strncmp(list->data, "Hello", 5) == 0, "failed")
universe@27:     
universe@27:     list = ucx_dlist_append(list, " World!");
universe@27:     
universe@27:     UCX_TEST_ASSERT(strncmp(list->next->data, " World!", 7) == 0, "failed")
universe@27:     UCX_TEST_ASSERT(list->next->next == NULL, "failed")
universe@33:     UCX_TEST_END
universe@27:     
universe@27:     ucx_dlist_free(list);
universe@24: }
universe@24: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_prepend) {
universe@27:     UcxDlist *list = ucx_dlist_prepend(NULL, " World!");
universe@33:     UCX_TEST_BEGIN
universe@33: 
universe@27:     list = ucx_dlist_prepend(list, "Hello");
universe@27:     
universe@27:     UCX_TEST_ASSERT(strncmp(list->data, "Hello", 5) == 0, "failed")
universe@27:     UCX_TEST_ASSERT(strncmp(list->next->data, " World!", 7) == 0, "failed")
universe@27:     UCX_TEST_ASSERT(list->next->next == NULL, "failed")
universe@27:     
universe@33:     UCX_TEST_END
universe@27:     ucx_dlist_free(list);
universe@18: }
universe@18: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_equals) {
universe@27:     UcxDlist *list = ucx_dlist_append(NULL, "Hello");
universe@27:     list = ucx_dlist_append(list, " World!");
universe@27:     UcxDlist *list2 = ucx_dlist_prepend(NULL, " World!");
universe@27:     list2 = ucx_dlist_prepend(list2, "Hello");
universe@27:     UcxDlist *list3 = ucx_dlist_prepend(NULL, " Welt!");
universe@27:     list3 = ucx_dlist_prepend(list3, "Hallo");
universe@33:     UCX_TEST_BEGIN
universe@27:     
universe@27:     UCX_TEST_ASSERT(ucx_dlist_equals(list, list2, cmp_string, NULL), "failed")
universe@27:     UCX_TEST_ASSERT(!ucx_dlist_equals(list, list3, cmp_string, NULL), "failed")
universe@27:     
universe@33:     UCX_TEST_END
universe@27:     ucx_dlist_free(list3);
universe@27:     ucx_dlist_free(list2);
universe@27:     ucx_dlist_free(list);
universe@24: }
universe@24: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_concat) {
universe@27:     UcxDlist *list = ucx_dlist_append(NULL, "Hello");
universe@27:     UcxDlist *list2 = ucx_dlist_prepend(NULL, " World!");
universe@33:     UCX_TEST_BEGIN
universe@27:     
universe@27:     list = ucx_dlist_concat(list, list2);
universe@27:     
universe@27:     UCX_TEST_ASSERT(strncmp(list->data, "Hello", 5) == 0, "failed")
universe@27:     UCX_TEST_ASSERT(strncmp(list->next->data, " World!", 7) == 0, "failed")
universe@27:     UCX_TEST_ASSERT(list->next->next == NULL, "failed")
universe@27:     
universe@33:     UCX_TEST_END
universe@27:     ucx_dlist_free(list);
olaf@9: }
olaf@9: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_size) {
universe@27:     UcxDlist *list = ucx_dlist_append(NULL, "This ");
universe@33:     UCX_TEST_BEGIN
universe@27:     list = ucx_dlist_append(list, "list ");
universe@27:     list = ucx_dlist_append(list, "has ");
universe@27:     list = ucx_dlist_append(list, "size ");
universe@27:     list = ucx_dlist_append(list, "5!");
universe@27:     
universe@27:     UCX_TEST_ASSERT(ucx_dlist_size(list) == 5, "failed");
universe@27:     
universe@33:     UCX_TEST_END
universe@27:     ucx_dlist_free(list);
olaf@9: }
olaf@11: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_first) {
universe@27:     UcxDlist *list = ucx_dlist_append(NULL, "Find ");
universe@33:     UCX_TEST_BEGIN
universe@27:     list = ucx_dlist_append(list, "the ");
universe@27:     list = ucx_dlist_append(list, "first!");
universe@27:     
universe@27:     char* first = (char*) (ucx_dlist_first(list)->data);
universe@27:     
universe@27:     UCX_TEST_ASSERT(strncmp(first, "Find ", 5) == 0, "failed");
universe@27:     
universe@33:     UCX_TEST_END
universe@27:     ucx_dlist_free(list);
universe@27: }
universe@27: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_last) {
universe@27:     UcxDlist *list = ucx_dlist_append(NULL, "Find ");
universe@33:     UCX_TEST_BEGIN
universe@27:     list = ucx_dlist_append(list, "the ");
universe@27:     list = ucx_dlist_append(list, "last!");
universe@27:     
universe@27:     char* last = (char*) (ucx_dlist_last(list)->data);
universe@27:     
universe@27:     UCX_TEST_ASSERT(strncmp(last, "last!", 5) == 0, "failed");
universe@27:     
universe@33:     UCX_TEST_END
universe@27:     ucx_dlist_free(list);
universe@27: }
universe@27: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_get) {
universe@27:     UcxDlist *list = ucx_dlist_append(NULL, "Find ");
universe@33:     UCX_TEST_BEGIN
universe@27:     list = ucx_dlist_append(list, "the ");
universe@27:     list = ucx_dlist_append(list, "mid!");
universe@27:     
universe@27:     char* mid = (char*) (ucx_dlist_get(list, 1)->data);
universe@27:     
universe@27:     UCX_TEST_ASSERT(strncmp(mid, "the ", 4) == 0, "failed");
universe@27:     
universe@33:     UCX_TEST_END
universe@27:     ucx_dlist_free(list);
universe@27: }
universe@27: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_remove) {
universe@27:     UcxDlist *list = ucx_dlist_append(NULL, "Hello");
universe@33:     UCX_TEST_BEGIN
universe@27:     list = ucx_dlist_append(list, " fucking");
universe@27:     list = ucx_dlist_append(list, " World!");
universe@27:     
universe@27:     list = ucx_dlist_remove(list, ucx_dlist_get(list, 1));
universe@27:     
universe@27:     UCX_TEST_ASSERT(strncmp(list->data, "Hello", 5) == 0, "failed")
universe@27:     UCX_TEST_ASSERT(strncmp(list->next->data, " World!", 7) == 0, "failed")
universe@27:     UCX_TEST_ASSERT(list->next->next == NULL, "failed")
universe@27:     
universe@33:     UCX_TEST_END
universe@27:     ucx_dlist_free(list);
universe@27: }
universe@27: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_clone) {
universe@27:    
universe@27:     char *hello = (char*)malloc(6);
universe@27:     char *world = (char*)malloc(8);
universe@27:     
universe@27:     memcpy(hello, "Hello", 6);
universe@27:     memcpy(world, " World!", 8);
universe@27:     
universe@27:     UcxDlist *list = ucx_dlist_append(NULL, hello);
universe@27:     list = ucx_dlist_append(list, world);
universe@27:     
universe@27:     UcxDlist *copy = ucx_dlist_clone(list, copy_string, NULL);
universe@33:     UCX_TEST_BEGIN
universe@27: 
universe@27:     UCX_TEST_ASSERT(ucx_dlist_equals(list, copy, cmp_string, NULL), "failed")
universe@27:     UCX_TEST_ASSERT(hello != copy->data, "first element is no copy")
universe@27:     UCX_TEST_ASSERT(world != copy->next->data, "second element is no copy")
universe@27: 
universe@33:     UCX_TEST_END
universe@27:     free(copy->next->data);
universe@27:     free(copy->data);
universe@27: 
universe@27:     free(world);
universe@27:     free(hello);
olaf@30:     ucx_dlist_free(list);
olaf@30:     ucx_dlist_free(copy);
universe@27: }