summaryrefslogtreecommitdiff
path: root/libs/dolphin/src/support/Tree.c
blob: 34ced4516fb2296b21bd319c6b7f92e8528426a2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
#include <charPipeline/structures/Tree.h>

void DSExtractBranch(DSTreePtr tree, Ptr obj) {
    DSBranchPtr branch = (DSBranchPtr)(obj + tree->Offset);
    Ptr cursor = branch->Children;
    Ptr next;

    while (cursor) {
        next = ((DSBranchPtr)(cursor + tree->Offset))->Next;
        DSInsertBranchBelow(tree, branch->Parent, cursor);
        cursor = next;
    }
    DSRemoveBranch(tree, obj);
}

void DSInitTree(DSTreePtr tree, Ptr obj, DSBranchPtr branch) {
    tree->Root = NULL;
    tree->Offset = (Ptr)branch - obj;
}

void DSInsertBranchBelow(DSTreePtr tree, Ptr cursor, Ptr obj) {
    DSBranchPtr branch;
    DSBranchPtr objBranch = (DSBranchPtr)(obj + tree->Offset);
    Ptr tail = NULL;

    if (cursor) {
        branch = (DSBranchPtr)(cursor + tree->Offset);
        if (branch->Children) {
            tail = branch->Children;
        } else {
            branch->Children = obj;
        }
    } else if (tree->Root) {
        tail = tree->Root;
    } else {
        tree->Root = obj;
    }

    if (tail) {
        while (((DSBranchPtr)(tail + tree->Offset))->Next) {
            tail = ((DSBranchPtr)(tail + tree->Offset))->Next;
        }
        ((DSBranchPtr)(tail + tree->Offset))->Next = obj;
        objBranch->Prev = tail;
    } else {
        objBranch->Prev = NULL;
    }

    objBranch->Next = NULL;
    objBranch->Parent = cursor;
}

void DSInsertBranchBeside(DSTreePtr tree, Ptr cursor, Ptr obj) {
    DSBranchPtr parent;
    DSBranchPtr branch;

    branch = (DSBranchPtr)(obj + tree->Offset);
    if (!cursor) {
        if (!tree->Root) {
            tree->Root = obj;
            branch->Next = NULL;
            branch->Prev = NULL;
            branch->Children = NULL;
            branch->Parent = NULL;
            return;
        }
        cursor = tree->Root;
    }

    while (((DSBranchPtr)(cursor + tree->Offset))->Next) {
        cursor = ((DSBranchPtr)(cursor + tree->Offset))->Next;
    }

    parent = (DSBranchPtr)(cursor + tree->Offset);
    parent->Next = obj;
    branch->Prev = cursor;
    branch->Next = NULL;
    branch->Parent = parent->Parent;
}

void DSRemoveBranch(DSTreePtr tree, Ptr obj) {
    DSBranchPtr branch;
    DSBranchPtr parent;

    branch = (DSBranchPtr)(obj + tree->Offset);
    if (branch->Parent) {
        parent = (DSBranchPtr)(branch->Parent + tree->Offset);
        if (parent->Children == obj) {
            parent->Children = branch->Next;
        }
    } else if (tree->Root == obj) {
        tree->Root = branch->Next;
    }

    if (branch->Prev) {
        ((DSBranchPtr)(branch->Prev + tree->Offset))->Next = branch->Next;
    }

    if (branch->Next) {
        ((DSBranchPtr)(branch->Next + tree->Offset))->Prev = branch->Prev;
    }

    branch->Prev = NULL;
    branch->Next = NULL;
    branch->Parent = NULL;
}