mirror of
https://github.com/Ed94/Odin.git
synced 2026-07-13 06:41:26 -07:00
Nakst
116 lines
3.5 KiB
Odin
116 lines
3.5 KiB
Odin
foreign import api "system:api"
|
|
|
|
Handle :: int;
|
|
Errno :: int;
|
|
|
|
O_RDONLY :: 1;
|
|
O_WRONLY :: 2;
|
|
O_CREATE :: 4;
|
|
O_TRUNC :: 4;
|
|
|
|
OS_Node_Type :: enum i32 {
|
|
File = 0,
|
|
Directory = 1,
|
|
}
|
|
|
|
OS_Node_Information :: struct #ordered {
|
|
handle: Handle,
|
|
id: [16]u8,
|
|
ntype: OS_Node_Type,
|
|
size: i64,
|
|
position: i64,
|
|
}
|
|
|
|
foreign api {
|
|
@(link_name="OSHelloWorld") os_hello_world :: proc() ---;
|
|
@(link_name="OSPrintDirect") os_print_direct :: proc(string: ^u8, length: int) ---;
|
|
@(link_name="OSHeapAllocate") os_heap_allocate :: proc(bytes: int, zero: bool) -> rawptr ---;
|
|
@(link_name="OSHeapFree") os_heap_free :: proc(address: rawptr) ---;
|
|
@(link_name="OSOpenNode") os_open_node :: proc(path: ^u8, path_length: int, flags: u64, information: ^OS_Node_Information) -> Errno ---;
|
|
@(link_name="OSResizeFile") os_resize_file :: proc(handle: Handle, new_size: u64) -> Errno ---;
|
|
@(link_name="OSCloseHandle") os_close_handle :: proc(handle: Handle) ---;
|
|
@(link_name="OSWriteFileSync") os_write_file_sync :: proc(handle: Handle, offset: i64, size: i64, buffer: rawptr) -> i64 ---;
|
|
@(link_name="OSReadFileSync") os_read_file_sync :: proc(handle: Handle, offset: i64, size: i64, buffer: rawptr) -> i64 ---;
|
|
@(link_name="OSInitialiseAPI") os_initialise_api :: proc() -> int ---;
|
|
@(link_name="OSTerminateProcess") os_terminate_process :: proc(handle: Handle) ---;
|
|
@(link_name="realloc") os_heap_reallocate :: proc(address: rawptr, size: int) -> rawptr ---;
|
|
}
|
|
|
|
stdin := cast(Handle) -1; // Not implemented
|
|
stdout := cast(Handle) 0;
|
|
stderr := cast(Handle) 0;
|
|
|
|
current_thread_id :: proc() -> int {
|
|
// Not implemented
|
|
return int(-1);
|
|
}
|
|
|
|
heap_alloc :: proc(size: int) -> rawptr {
|
|
return os_heap_allocate(size, true);
|
|
}
|
|
|
|
heap_free :: proc(address: rawptr) {
|
|
os_heap_free(address);
|
|
}
|
|
|
|
heap_resize :: proc(address: rawptr, new_size: int) -> rawptr {
|
|
return os_heap_reallocate(address, new_size);
|
|
}
|
|
|
|
open :: proc(path: string, mode: int = O_RDONLY, perm: u32 = 0) -> (Handle, Errno) {
|
|
information := new(OS_Node_Information);
|
|
error := os_open_node(&path[0], len(path), cast(u64) mode, information);
|
|
if (error < -1) { return 0,1; }
|
|
information.position = 0;
|
|
if (mode&O_TRUNC==O_TRUNC) {
|
|
error := os_resize_file(information.handle, 0);
|
|
if (error < -1) { return 0,1; }
|
|
}
|
|
return cast(Handle) cast(uintptr) information,0;
|
|
}
|
|
|
|
close :: proc(fd: Handle) {
|
|
information := cast(^OS_Node_Information) cast(uintptr) fd;
|
|
os_close_handle(information.handle);
|
|
free(information);
|
|
}
|
|
|
|
file_size :: proc(fd: Handle) -> (i64, Errno) {
|
|
// Not (properly) implemented
|
|
information := cast(^OS_Node_Information) cast(uintptr) fd;
|
|
return information.size,0;
|
|
}
|
|
|
|
write :: proc(fd: Handle, data: []u8) -> (int, Errno) {
|
|
if (fd == 0) {
|
|
os_print_direct(&data[0], len(data));
|
|
return len(data), 0;
|
|
} else if (fd == 1) {
|
|
assert(false);
|
|
return 0, 1;
|
|
} else {
|
|
information := cast(^OS_Node_Information) cast(uintptr) fd;
|
|
count := os_write_file_sync(information.handle, information.position, cast(i64) len(data), cast(rawptr) &data[0]);
|
|
if (count < 0) { return 0, 1; }
|
|
information.position += count;
|
|
return cast(int) count, 0;
|
|
}
|
|
}
|
|
|
|
read :: proc(fd: Handle, data: []u8) -> (int, Errno) {
|
|
if (fd == 0 || fd == 1) {
|
|
assert(false);
|
|
return 0, 1;
|
|
} else {
|
|
information := cast(^OS_Node_Information) cast(uintptr) fd;
|
|
count := os_read_file_sync(information.handle, information.position, cast(i64) len(data), cast(rawptr) &data[0]);
|
|
if (count < 0) { return 0, 1; }
|
|
information.position += count;
|
|
return cast(int) count, 0;
|
|
}
|
|
}
|
|
|
|
os_terminate_this_process :: proc() {
|
|
os_terminate_process(0x1001);
|
|
}
|