sys/link.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
51
52

#include "link.h"
#include "arch/x86_64/hal/obj.h"
#include "hal/memory.h"

void*
obj_deref_linked(jove_owned_obj_t *obj)
{
    switch(obj_gettype(obj)) {
        case JOVE_OBJ_LINK: return obj_deref_linked(link_deref(obj));
        default: return obj_deref(obj);
    }
}

uint8_t 
obj_gettype_linked(jove_owned_obj_t *obj)
{
    switch(obj_gettype(obj)) {
        case JOVE_OBJ_LINK: return obj_gettype_linked(link_deref(obj));
        default: return obj_gettype(obj);
    }
}

uint64_t 
obj_getvalue_linked(jove_owned_obj_t *obj)
{
    switch(obj_gettype(obj)) {
        case JOVE_OBJ_LINK: return obj_getvalue_linked(link_deref(obj));
        default: return obj_getvalue(obj);
    }
}

jove_owned_obj_t*
link_deref(jove_owned_obj_t *link)
{
    struct obj_link *linkval = obj_deref(link);
    return obj_take(&linkval->obj);
}

jove_owned_obj_t *link_new(jove_obj_t *tgt, jove_owned_obj_t *dst)
{
    struct obj_link *linkval = obj_deref(dst);
    linkval->obj = *tgt;
    linkval->refcount = 2;

    {
        jove_owned_obj_t *tgt_owned = obj_take(tgt);
        obj_settype(tgt_owned, JOVE_OBJ_LINK);
        obj_setvalue(tgt_owned, (uintptr_t)linkval);
        obj_release(tgt_owned);
    }
    return dst;
}