src/PowerPC_EABI_Support/Runtime/Src/__va_arg.c


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

#include <cstdarg>
#include <cstdint>

#undef __va_arg

void* __va_arg(_va_list_struct* list, int type) {
    char* addr;
    char* reg = &(list->gpr);
    int g_reg = list->gpr;
    int maxsize = 8;
    int size = 4;
    int increment = 1;
    int even = 0;
    int fpr_offset = 0;
    int regsize = 4;

    if (type == 3) {
        reg = &(list->fpr);
        g_reg = list->fpr;
        size = 8;
        fpr_offset = 32;
        regsize = 8;
    }

    if (type == 2) {
        size = 8;
        maxsize--;
        if (g_reg & 1) {
            even = 1;
        }
        increment = 2;
    }

    if (g_reg < maxsize) {
        g_reg += even;
        addr = list->reg_save_area + fpr_offset + (g_reg * regsize);
        *reg = g_reg + increment;
    } else {
        *reg = 8;
        addr = list->input_arg_area;
        addr = (char*)(((uintptr_t)(addr) + ((size)-1)) & ~((size)-1));
        list->input_arg_area = addr + size;
    }

    if (type == 0) {
        addr = *((char**)addr);
    }

    return addr;
}