v/vlib/dlmalloc/dlmalloc_sys_nix.c.v

127 lines
2.6 KiB
V
Raw Normal View History

2022-01-05 17:17:47 +01:00
module dlmalloc
$if !freestanding {
#include <sys/mman.h>
#include <unistd.h>
}
2022-01-05 17:17:47 +01:00
fn C.munmap(ptr voidptr, size usize) int
fn C.mremap(ptr voidptr, old usize, new usize, flags usize) voidptr
fn C.mmap(base voidptr, len usize, prot int, flags int, fd int, offset i64) voidptr
pub enum Mm_prot {
prot_read = 0x1
prot_write = 0x2
prot_exec = 0x4
prot_none = 0x0
prot_growsdown = 0x01000000
prot_growsup = 0x02000000
}
pub enum Map_flags {
map_shared = 0x01
map_private = 0x02
map_shared_validate = 0x03
map_type = 0x0f
map_fixed = 0x10
map_file = 0x00
map_anonymous = 0x20
map_huge_shift = 26
map_huge_mask = 0x3f
}
enum MemProt {
prot_read = 0x1
prot_write = 0x2
prot_exec = 0x4
prot_none = 0x0
prot_growsdown = 0x01000000
prot_growsup = 0x02000000
}
enum MapFlags {
map_shared = 0x01
map_private = 0x02
map_shared_validate = 0x03
map_type = 0x0f
map_fixed = 0x10
map_file = 0x00
map_anonymous = 0x20
map_huge_shift = 26
map_huge_mask = 0x3f
}
fn system_alloc(_ voidptr, size usize) (voidptr, usize, u32) {
$if !freestanding {
unsafe {
mem_prot := MemProt(int(MemProt.prot_read) | int(MemProt.prot_write))
map_flags := MapFlags(int(MapFlags.map_private) | int(MapFlags.map_anonymous))
addr := C.mmap(voidptr(0), size, int(mem_prot), int(map_flags), -1, 0)
2022-01-05 17:17:47 +01:00
if addr == voidptr(-1) {
return voidptr(0), 0, 0
} else {
return addr, size, 0
}
2022-01-05 17:17:47 +01:00
}
} $else {
return voidptr(0), 0, 0
2022-01-05 17:17:47 +01:00
}
return voidptr(0), 0, 0
2022-01-05 17:17:47 +01:00
}
fn system_remap(_ voidptr, ptr voidptr, oldsize usize, newsize usize, can_move bool) voidptr {
return voidptr(0)
}
fn system_free_part(_ voidptr, ptr voidptr, oldsize usize, newsize usize) bool {
$if linux && !freestanding {
2022-01-05 17:17:47 +01:00
unsafe {
rc := C.mremap(ptr, oldsize, newsize, 0)
if rc != voidptr(-1) {
return true
}
return C.munmap(voidptr(usize(ptr) + newsize), oldsize - newsize) == 0
}
} $else $if macos && !freestanding {
2022-01-05 17:17:47 +01:00
unsafe {
return C.munmap(voidptr(usize(ptr) + newsize), oldsize - newsize) == 0
}
}
return false
}
fn system_free(_ voidptr, ptr voidptr, size usize) bool {
$if !freestanding {
unsafe {
return C.munmap(ptr, size) == 0
}
} $else {
return false
2022-01-05 17:17:47 +01:00
}
}
fn system_can_release_part(_ voidptr, _ u32) bool {
return true
}
fn system_allocates_zeros(_ voidptr) bool {
return true
}
fn system_page_size(_ voidptr) usize {
return 4096
}
pub fn get_system_allocator() Allocator {
return Allocator{
alloc: system_alloc
remap: system_remap
free_part: system_free_part
free_: system_free
can_release_part: system_can_release_part
allocates_zeros: system_allocates_zeros
page_size: system_page_size
data: voidptr(0)
}
}