language/stack.cpp at master · RedkinDenis/language · GitHub

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
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
#include "headers/stack.h"
#include "headers/DSLproc.h"
#include "../UDL.h"

// err stack_dump(struct Stack* stk, int LINE, const char* stk_name, const char* file_name, const char* func_name)
// {
//     CHECK_PTR(stk);
//     CHECK_PTR(stk_name);
//     CHECK_PTR(file_name);
//     CHECK_PTR(func_name);

//     printf("--------STACK---------");
//     printf("\n------DUMP_BEGIN------\n");
//     printf("\nstack name: %s\n", stk_name);
//     printf("\nDUMP was called from function: %s \n"
//                              "from file: %s \n"
//                              "from line: %d \n", func_name, file_name, LINE);
//     printf("\nstack adress: %d\n", stk);
//     printf("stack->data adress: %d\n", stk->data);
//     printf("capacity - %d\nsize - %d\nstack:\n", stk->capacity, stk->size);
//     for(int i = 0; i < stk->size; i++)
//         printf("*[%d] = %f  ", i, stk->data[i]);
//     for(int i = stk->size; i < stk->capacity; i++)
//         printf("*[%d] = poison  ", i);

//     printf("\n-------DUMP_END-------\n\n");

//     return SUCCESS;
// }

err stack_ctor(struct Stack* stk, size_t capacity)
{
    CHECK_PTR(stk);

    if(stk->capacity != 0 && stk->capacity != (size_t)-1)
        return STACK_ALREDY_CREATED;

    void* temp = 0;
    CALLOC(stk->data, void*, capacity);

    stk->capacity = capacity;
    stk->size = 0;

    return SUCCESS;
}

err stack_push(struct Stack* stk, void* x, size_t size)
{
    CHECK_PTR(stk);
    CHECK_PTR(x);

    err res = capacity_up(stk);
    if(res != SUCCESS)
        return res;

    memcpy(&stk->data[stk->size], x, size);
    // stk->data[stk->size] = *x;
    stk->size++;
    return SUCCESS;
}

err stack_pop(struct Stack* stk, void* pop_el, size_t size)
{
    CHECK_PTR(stk);

    if(stk->size <= 0)
        return STK_EMPTY;

    stk->size--;

    if(pop_el != NULL)
    {
        // pop_el = *(stk->data + stk->size);
        memcpy(pop_el, &stk->data[stk->size], size);
    }

    *(stk->data + stk->size) = poison;

    err res = capacity_down(stk);
    if(res != SUCCESS)
        return res;

    return SUCCESS;
}

err stack_dtor(struct Stack* stk)
{
    CHECK_PTR(stk);

    // for (int i = 0; i < stk->size; i++)
    //     free(stk->data[i]);

    free(stk->data);
    stk->data = NULL;
    stk->size = (size_t)-1;
    stk->capacity = (size_t)-1;

    return SUCCESS;
}
err capacity_down(struct Stack* stk)
{
    CHECK_PTR(stk);

    if(stk->capacity < 2 ||
       stk->capacity / 4 < stk->size)
        return SUCCESS;

    REALLOC(stk->data, void*, stk->capacity / 2);

    stk->capacity /= 2;

    return SUCCESS;
}

err capacity_up(struct Stack* stk)
{
    CHECK_PTR(stk);

    if(stk->size != stk->capacity)
        return SUCCESS;

    int expander = 0;
    if(stk->capacity >= 100)
        expander = 50;
    else
        expander = stk->capacity;

    REALLOC(stk_data, void*, (stk->capacity + expander));

    stk->capacity += expander;
    return SUCCESS;
}