olaf@9: /*
universe@103:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
universe@103:  *
universe@103:  * Copyright 2013 Olaf Wintermann. All rights reserved.
universe@103:  *
universe@103:  * Redistribution and use in source and binary forms, with or without
universe@103:  * modification, are permitted provided that the following conditions are met:
universe@103:  *
universe@103:  *   1. Redistributions of source code must retain the above copyright
universe@103:  *      notice, this list of conditions and the following disclaimer.
universe@103:  *
universe@103:  *   2. Redistributions in binary form must reproduce the above copyright
universe@103:  *      notice, this list of conditions and the following disclaimer in the
universe@103:  *      documentation and/or other materials provided with the distribution.
universe@103:  *
universe@103:  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
universe@103:  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
universe@103:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
universe@103:  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
universe@103:  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
universe@103:  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
universe@103:  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
universe@103:  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
universe@103:  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
universe@103:  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
universe@103:  * POSSIBILITY OF SUCH DAMAGE.
olaf@9:  */
olaf@9: 
universe@27: #include "dlist_tests.h"
universe@94: #include "ucx/utils.h"
olaf@9: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_append) {
universe@71:     UcxDlist *list = ucx_dlist_append(NULL, (void*)"Hello");
universe@33:     UCX_TEST_BEGIN
universe@27:     
universe@69:     UCX_TEST_ASSERT(strncmp((const char*)list->data, "Hello", 5) == 0,
universe@69:             "failed");
universe@27:     
universe@71:     list = ucx_dlist_append(list, (void*)" World!");
universe@27:     
universe@69:     UCX_TEST_ASSERT(strncmp((const char*)list->next->data, " World!", 7) == 0,
universe@69:             "failed");
universe@40:     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@71:     UcxDlist *list = ucx_dlist_prepend(NULL, (void*)" World!");
universe@33:     UCX_TEST_BEGIN
universe@33: 
universe@71:     list = ucx_dlist_prepend(list, (void*)"Hello");
universe@27:     
universe@69:     UCX_TEST_ASSERT(strncmp((const char*)list->data, "Hello", 5) == 0,
universe@69:             "failed");
universe@69:     UCX_TEST_ASSERT(strncmp((const char*)list->next->data, " World!", 7) == 0,
universe@69:             "failed");
universe@40:     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@71:     UcxDlist *list = ucx_dlist_append(NULL, (void*)"Hello");
universe@71:     list = ucx_dlist_append(list, (void*)" World!");
universe@71:     UcxDlist *list2 = ucx_dlist_prepend(NULL, (void*)" World!");
universe@71:     list2 = ucx_dlist_prepend(list2, (void*)"Hello");
universe@71:     UcxDlist *list3 = ucx_dlist_prepend(NULL, (void*)" Welt!");
universe@71:     list3 = ucx_dlist_prepend(list3, (void*)"Hallo");
universe@33:     UCX_TEST_BEGIN
universe@27:     
universe@89:     UCX_TEST_ASSERT(ucx_dlist_equals(list, list2, ucx_strcmp, NULL), "failed");
universe@89:     UCX_TEST_ASSERT(!ucx_dlist_equals(list, list3, ucx_strcmp, 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@71:     UcxDlist *list = ucx_dlist_append(NULL, (void*)"Hello");
universe@71:     UcxDlist *list2 = ucx_dlist_prepend(NULL, (void*)" World!");
universe@33:     UCX_TEST_BEGIN
universe@27:     
universe@27:     list = ucx_dlist_concat(list, list2);
universe@27:     
universe@69:     UCX_TEST_ASSERT(strncmp((const char*)list->data, "Hello", 5) == 0,
universe@69:             "failed");
universe@69:     UCX_TEST_ASSERT(strncmp((const char*)list->next->data, " World!", 7) == 0,
universe@69:             "failed");
universe@40:     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@71:     UcxDlist *list = ucx_dlist_append(NULL, (void*)"This ");
universe@33:     UCX_TEST_BEGIN
universe@71:     list = ucx_dlist_append(list, (void*)"list ");
universe@71:     list = ucx_dlist_append(list, (void*)"has ");
universe@71:     list = ucx_dlist_append(list, (void*)"size ");
universe@71:     list = ucx_dlist_append(list, (void*)"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@71:     UcxDlist *list = ucx_dlist_append(NULL, (void*)"Find ");
universe@33:     UCX_TEST_BEGIN
universe@71:     list = ucx_dlist_append(list, (void*)"the ");
universe@71:     list = ucx_dlist_append(list, (void*)"first!");
universe@27:     
universe@69:     const char* first = (const 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@71:     UcxDlist *list = ucx_dlist_append(NULL, (void*)"Find ");
universe@33:     UCX_TEST_BEGIN
universe@71:     list = ucx_dlist_append(list, (void*)"the ");
universe@71:     list = ucx_dlist_append(list, (void*)"last!");
universe@27:     
universe@69:     const char* last = (const 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@71:     UcxDlist *list = ucx_dlist_append(NULL, (void*)"Find ");
universe@33:     UCX_TEST_BEGIN
universe@71:     list = ucx_dlist_append(list, (void*)"the ");
universe@71:     list = ucx_dlist_append(list, (void*)"mid!");
universe@27:     
universe@69:     const char* mid = (const 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@90: UCX_TEST_IMPLEMENT(test_ucx_dlist_contains) {
universe@90:     UcxDlist *l = ucx_dlist_append(NULL, (void*)"Contains ");
universe@90:     UCX_TEST_BEGIN
universe@90:     l = ucx_dlist_append(l, (void*)"a ");
universe@90:     l = ucx_dlist_append(l, (void*)"string!");
universe@90:     
universe@90:     UCX_TEST_ASSERT(ucx_dlist_contains(l,(void*)"a ",ucx_strcmp,NULL),"failed");
universe@90:     UCX_TEST_ASSERT(!ucx_dlist_contains(l,(void*)"a",ucx_strcmp,NULL),"failed");
universe@90:     
universe@90:     UCX_TEST_END
universe@90:     ucx_dlist_free(l);
universe@90: }
universe@90: 
universe@33: UCX_TEST_IMPLEMENT(test_ucx_dlist_remove) {
universe@71:     UcxDlist *list = ucx_dlist_append(NULL, (void*)"Hello");
universe@33:     UCX_TEST_BEGIN
universe@71:     list = ucx_dlist_append(list, (void*)" fucking");
universe@71:     list = ucx_dlist_append(list, (void*)" World!");
universe@27:     
universe@27:     list = ucx_dlist_remove(list, ucx_dlist_get(list, 1));
universe@27:     
universe@69:     UCX_TEST_ASSERT(strncmp((const char*)list->data, "Hello", 5) == 0,
universe@69:             "failed");
universe@69:     UCX_TEST_ASSERT(strncmp((const char*)list->next->data, " World!", 7) == 0,
universe@69:             "failed");
universe@40:     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@94:     UcxDlist *copy = ucx_dlist_clone(list, ucx_strcpy, NULL);
universe@33:     UCX_TEST_BEGIN
universe@27: 
universe@89:     UCX_TEST_ASSERT(ucx_dlist_equals(list, copy, ucx_strcmp, NULL), "failed");
universe@40:     UCX_TEST_ASSERT(hello != copy->data, "first element is no copy");
universe@40:     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: }
universe@35: 
universe@36: UCX_TEST_IMPLEMENT(test_ucx_dlist_sort) {
universe@71:     UcxDlist *list = ucx_dlist_append(NULL, (void*)"this");
universe@71:     list = ucx_dlist_append(list, (void*)"is");
universe@71:     list = ucx_dlist_append(list, (void*)"a");
universe@71:     list = ucx_dlist_append(list, (void*)"test");
universe@71:     list = ucx_dlist_append(list, (void*)"for");
universe@71:     list = ucx_dlist_append(list, (void*)"partial");
universe@71:     list = ucx_dlist_append(list, (void*)"correctness");
universe@35: 
universe@71:     UcxDlist *expected = ucx_dlist_append(NULL, (void*)"a");
universe@71:     expected = ucx_dlist_append(expected, (void*)"correctness");
universe@71:     expected = ucx_dlist_append(expected, (void*)"for");
universe@71:     expected = ucx_dlist_append(expected, (void*)"is");
universe@71:     expected = ucx_dlist_append(expected, (void*)"partial");
universe@71:     expected = ucx_dlist_append(expected, (void*)"test");
universe@71:     expected = ucx_dlist_append(expected, (void*)"this");
universe@35: 
universe@89:     list = ucx_dlist_sort(list, ucx_strcmp, NULL);
universe@35: 
universe@35:     UCX_TEST_BEGIN
universe@35:     UCX_TEST_ASSERT(
universe@89:             ucx_dlist_equals(list, expected, ucx_strcmp, NULL), "failed");
universe@35:     UcxDlist *l = list;
universe@35:     UCX_TEST_ASSERT(l->prev == NULL, "prev field of first entry is not null");
universe@35:     while (l->next != NULL) {
universe@35:         UCX_TEST_ASSERT(l->next->prev == l, "prev pointer corrupted");
universe@35:         l = l->next;
universe@35:     }
universe@35:     UCX_TEST_END
universe@35: 
universe@35:     ucx_dlist_free(expected);
universe@35:     ucx_dlist_free(list);
universe@35: }