fishsoup/suicmez
3
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

OMG ADD PROPER PTR BTIMAPOPA AND MEQATADATA

Browse source
This commit is contained in:
flameyosflow 2025-12-16 22:30:46 +02:00
commit 859e7d7560
2 changed files with 22 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

27
libsuicmez/suicmez_gc.c
View file

@ -132,9 +132,7 @@ static void gc_minor_collect(void) {
size_t fields = size_t fields =
(obj->header.size - sizeof(ObjHeader)) / sizeof(void*); (obj->header.size - sizeof(ObjHeader)) / sizeof(void*);
for (size_t i = 0; i < fields; i++) { scan_object_fields(obj);
obj->fields[i] = forward((Obj*)obj->fields[i]);
}
p += obj->header.size; p += obj->header.size;
} }
} }
@ -146,9 +144,7 @@ static void gc_minor_collect(void) {
size_t fields = size_t fields =
(obj->header.size - sizeof(ObjHeader)) / sizeof(void*); (obj->header.size - sizeof(ObjHeader)) / sizeof(void*);
for (size_t i = 0; i < fields; i++) { scan_object_fields(obj);
obj->fields[i] = forward((Obj*)obj->fields[i]);
}
scan += obj->header.size; scan += obj->header.size;
} }
@ -168,15 +164,11 @@ static void gc_minor_collect(void) {
} }
} }
void *gc_alloc(size_t payload_size) { void *gc_alloc(const TypeInfo *type, size_t payload_size) {
size_t size = payload_size + sizeof(ObjHeader); size_t size = sizeof(ObjHeader) + payload_size;
if (gc.from_ptr + size > gc.from_space + gc.young_size) { if (gc.from_ptr + size > gc.from_space + gc.young_size) {
gc_minor_collect(); gc_minor_collect();
if (gc.from_ptr + size > gc.from_space + gc.young_size) {
fprintf(stderr, "GC: out of memory\n");
abort();
}
} }
Obj *obj = (Obj*)gc.from_ptr; Obj *obj = (Obj*)gc.from_ptr;
@ -184,11 +176,22 @@ void *gc_alloc(size_t payload_size) {
obj->header.age = 0; obj->header.age = 0;
obj->header.flags = 0; obj->header.flags = 0;
obj->header.forwarding = NULL; obj->header.forwarding = NULL;
obj->header.type = type;
gc.from_ptr += size; gc.from_ptr += size;
return obj; return obj;
} }
static inline void scan_object_fields(Obj *obj) {
const TypeInfo *t = obj->header.type;
for (uint16_t i = 0; i < t->field_count; i++) {
if (t->pointer_bitmap[i]) {
obj->fields[i] = forward((Obj*)obj->fields[i]);
}
}
}
void gc_init(void) { void gc_init(void) {
gc.young_size = YOUNG_SIZE; gc.young_size = YOUNG_SIZE;
gc.old_size = OLD_SIZE; gc.old_size = OLD_SIZE;

7
libsuicmez/suicmez_gc.h
View file

@ -21,8 +21,15 @@ typedef struct ObjHeader {
uint16_t age; uint16_t age;
uint16_t flags; uint16_t flags;
Obj *forwarding; // non-NULL if moved Obj *forwarding; // non-NULL if moved
const TypeInfo *type;
} ObjHeader; } ObjHeader;
typedef struct TypeInfo {
uint16_t field_count;
uint16_t pointer_count;
const uint8_t *pointer_bitmap;
} TypeInfo;
/* Full object definition */ /* Full object definition */
struct Obj { struct Obj {
ObjHeader header; ObjHeader header;