mirror of
https://github.com/nunuhara/xsystem4.git
synced 2026-09-25 08:27:56 +03:00
Nunuhara Cabbage
4b1257fc13
Although delegate pages store references to objects on the heap, adding/removing objects from a delegate does not affect their reference counts. When an object that is a member of a delegate is deleted, it is automatically removed from the delegate. In practice, this means that every object needs to keep a list of delegates that it belongs to. This increases the size of the page header on 64 bit systems, but not by much since the additional metadata can be stored in a union with the array-specific metadata.
95 lines
2.5 KiB
C
95 lines
2.5 KiB
C
/* Copyright (C) 2019 Nunuhara Cabbage <nunuhara@haniwa.technology>
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, see <http://gnu.org/licenses/>.
|
|
*/
|
|
|
|
#ifndef SYSTEM4_HEAP_H
|
|
#define SYSTEM4_HEAP_H
|
|
|
|
#include <stdbool.h>
|
|
#include <stddef.h>
|
|
#include <stdint.h>
|
|
|
|
struct string;
|
|
struct page;
|
|
|
|
enum vm_pointer_type {
|
|
VM_PAGE,
|
|
VM_STRING
|
|
};
|
|
#define NR_VM_POINTER_TYPES (VM_STRING+1)
|
|
|
|
// Heap-backed objects. Reference counted.
|
|
struct vm_pointer {
|
|
int ref;
|
|
enum vm_pointer_type type;
|
|
union {
|
|
struct string *s;
|
|
struct page *page;
|
|
};
|
|
#ifdef DEBUG_HEAP
|
|
size_t alloc_addr;
|
|
size_t ref_addr[16];
|
|
size_t ref_nr;
|
|
size_t deref_addr[16];
|
|
size_t deref_nr;
|
|
size_t free_addr;
|
|
#endif
|
|
};
|
|
|
|
extern struct vm_pointer *heap;
|
|
extern size_t heap_size;
|
|
|
|
void heap_init(void);
|
|
void heap_delete(void);
|
|
void heap_grow(size_t new_size);
|
|
|
|
int32_t heap_alloc_slot(enum vm_pointer_type type);
|
|
void heap_ref(int slot);
|
|
void heap_unref(int slot);
|
|
void exit_unref(int slot);
|
|
|
|
bool heap_index_valid(int index);
|
|
bool page_index_valid(int index);
|
|
bool string_index_valid(int index);
|
|
|
|
struct page *heap_get_page(int index);
|
|
struct page *heap_get_struct_page(int index);
|
|
struct page *heap_get_delegate_page(int index);
|
|
struct string *heap_get_string(int index);
|
|
void heap_set_page(int slot, struct page *page);
|
|
void heap_string_assign(int slot, struct string *string);
|
|
void heap_struct_assign(int lval, int rval);
|
|
int32_t heap_alloc_page(struct page *page);
|
|
int32_t heap_alloc_string(struct string *s);
|
|
|
|
void heap_describe_slot(int slot);
|
|
|
|
/*
|
|
* Guarantee `headroom` free slots are available on the heap.
|
|
*
|
|
* XXX: this is a hack to fix an issue with HLL calls where a pointer into the
|
|
* heap can be made invalid by a heap reallocation triggered within the
|
|
* body of the HLL function.
|
|
*/
|
|
void heap_guarantee(unsigned headroom);
|
|
|
|
#ifdef VM_PRIVATE
|
|
|
|
extern int32_t *heap_free_stack;
|
|
extern size_t heap_free_ptr;
|
|
|
|
#endif /* VM_PRIVATE */
|
|
#endif /* SYSTEM4_HEAP_H */
|