test/test_tree.c

/*
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
 *
 * Copyright 2021 Mike Becker, Olaf Wintermann All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 *   1. Redistributions of source code must retain the above copyright
 *      notice, this list of conditions and the following disclaimer.
 *
 *   2. Redistributions in binary form must reproduce the above copyright
 *      notice, this list of conditions and the following disclaimer in the
 *      documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include "cx/tree.h"
#include "test_config.h"

#include <stddef.h>

typedef struct TestNode TestNode;

struct TestNode {
    TestNode *parent;
    TestNode *prev;
    TestNode *next;
    
    TestNode *children_begin;
    TestNode *children_end;
    
    int content;
};

void test_cx_tree_add_node() {
    // prepare test tree
    TestNode root;
    memset(&root, 0, sizeof(TestNode));
    
    TestNode a;
    memset(&a, 0, sizeof(TestNode));
    root.children_begin = &a;
    root.children_end = &a;
    a.parent = &root;
    a.content = 1;
    
    // new test nodes
    TestNode b;
    memset(&b, 0, sizeof(TestNode));
    TestNode c;
    memset(&c, 0, sizeof(TestNode));
    
    // test
    b.content = 2;
    int ret = cx_tree_add_node(&a, offsetof(TestNode, parent), offsetof(TestNode, prev), offsetof(TestNode, next), &b);
    CU_ASSERT_EQUAL(ret, 0);
    CU_ASSERT_PTR_EQUAL(b.parent, &root);
    CU_ASSERT_PTR_EQUAL(b.prev, &a);
    CU_ASSERT_PTR_EQUAL(b.next, NULL);
    CU_ASSERT_PTR_EQUAL(a.next, &b);
    
    c.content = 3;
    ret = cx_tree_add_node(&a, -1, -1, offsetof(TestNode, next), &c);
    CU_ASSERT_EQUAL(ret, 0);
    CU_ASSERT_PTR_EQUAL(c.parent, NULL);
    CU_ASSERT_PTR_EQUAL(c.prev, NULL);
    CU_ASSERT_PTR_EQUAL(c.next, NULL);
    CU_ASSERT_PTR_EQUAL(b.next, &c);
}

void test_cx_tree_add_child_node() {
    // prepare test tree
    TestNode root;
    memset(&root, 0, sizeof(TestNode));
    
    TestNode a;
    memset(&a, 0, sizeof(TestNode));
    TestNode b;
    memset(&b, 0, sizeof(TestNode));
    TestNode c;
    memset(&c, 0, sizeof(TestNode));
    TestNode a1;
    memset(&a1, 0, sizeof(TestNode));
    
    int ret;
    
    // test
    a.content = 1;
    ret = cx_tree_add_child_node(
            &root,
            offsetof(TestNode, parent),
            offsetof(TestNode, prev),
            offsetof(TestNode, next),
            (void**)&root.children_begin,
            (void**)&root.children_end,
            &a);
    CU_ASSERT_EQUAL(ret, 0);
    CU_ASSERT_PTR_EQUAL(root.children_begin, &a);
    CU_ASSERT_PTR_EQUAL(root.children_end, &a);
    CU_ASSERT_PTR_EQUAL(a.parent, &root);
    CU_ASSERT_PTR_EQUAL(a.prev, NULL);
    CU_ASSERT_PTR_EQUAL(a.next, NULL);
    
    b.content = 2;
    ret = cx_tree_add_child_node(
            &root,
            offsetof(TestNode, parent),
            offsetof(TestNode, prev),
            offsetof(TestNode, next),
            (void**)&root.children_begin,
            (void**)&root.children_end,
            &b);
    CU_ASSERT_EQUAL(ret, 0);
    CU_ASSERT_TRUE(root.children_begin ? root.children_begin->next == &b : 0);
    CU_ASSERT_PTR_EQUAL(root.children_end, &b);
    CU_ASSERT_PTR_EQUAL(b.parent, &root);
    CU_ASSERT_PTR_EQUAL(b.prev, &a);
    
    c.content = 3;
    ret = cx_tree_add_child_node(
            &root,
            -1,
            -1,
            offsetof(TestNode, next),
            (void**)&root.children_begin,
            NULL,
            &c);
    CU_ASSERT_EQUAL(ret, 0);
    CU_ASSERT_PTR_EQUAL(root.children_end, &b); // children_end unchanged
    CU_ASSERT_PTR_EQUAL(b.next, &c);
    CU_ASSERT_PTR_EQUAL(c.prev, NULL);
    CU_ASSERT_PTR_EQUAL(c.next, NULL);
    CU_ASSERT_PTR_EQUAL(c.parent, NULL);
    
    a1.content = 11;
    ret = cx_tree_add_child_node(
            &a,
            offsetof(TestNode, parent),
            offsetof(TestNode, prev),
            offsetof(TestNode, next),
            (void**)&a.children_begin,
            (void**)&a.children_end,
            &a1);
    CU_ASSERT_EQUAL(ret, 0);
    CU_ASSERT_PTR_EQUAL(a.children_begin, &a1);
    CU_ASSERT_PTR_EQUAL(a1.parent, &a);
    CU_ASSERT_TRUE(root.children_begin ? root.children_begin->children_begin == &a1 : 0);
}

int main() {
    CU_pSuite suite = NULL;

    if (CUE_SUCCESS != CU_initialize_registry()) {
        return CU_get_error();
    }

    suite = CU_add_suite("tree suite", NULL, NULL);
    if (NULL == suite) {
        CU_cleanup_registry();
        return CU_get_error();
    }

    if (
            !CU_add_test(suite, "ll add tree node", test_cx_tree_add_node)
            ) {
        CU_cleanup_registry();
        return CU_get_error();
    }
    if (
            !CU_add_test(suite, "ll add tree child node", test_cx_tree_add_child_node)
            ) {
        CU_cleanup_registry();
        return CU_get_error();
    }
    
    
    CU_basic_set_mode(UCX_CU_BRM);

    int exitcode;
    if (CU_basic_run_tests()) {
        exitcode = CU_get_error();
    } else {
        exitcode = CU_get_number_of_failures() == 0 ? 0 : 1;
    }
    CU_cleanup_registry();
    return exitcode;
}