mirror of
https://github.com/odin-lang/Odin.git
synced 2025-12-28 17:04:34 +00:00
e1ba69ea51
Having the OS/runtime provide a cryptographic entropy source is the right thing to do, and we need it to initialize the default random number generator.
50 lines
1.3 KiB
Odin
50 lines
1.3 KiB
Odin
#+build orca
|
|
#+private
|
|
package runtime
|
|
|
|
import "base:intrinsics"
|
|
|
|
_HAS_RAND_BYTES :: false
|
|
|
|
// Constants allowing to specify the level of logging verbosity.
|
|
log_level :: enum u32 {
|
|
// Only errors are logged.
|
|
ERROR = 0,
|
|
// Only warnings and errors are logged.
|
|
WARNING = 1,
|
|
// All messages are logged.
|
|
INFO = 2,
|
|
COUNT = 3,
|
|
}
|
|
|
|
@(default_calling_convention="c", link_prefix="oc_")
|
|
foreign {
|
|
abort_ext :: proc(file: cstring, function: cstring, line: i32, fmt: cstring, #c_vararg args: ..any) -> ! ---
|
|
assert_fail :: proc(file: cstring, function: cstring, line: i32, src: cstring, fmt: cstring, #c_vararg args: ..any) -> ! ---
|
|
log_ext :: proc(level: log_level, function: cstring, file: cstring, line: i32, fmt: cstring, #c_vararg args: ..any) ---
|
|
}
|
|
|
|
// NOTE: This is all pretty gross, don't look.
|
|
|
|
// WASM is single threaded so this should be fine.
|
|
orca_stderr_buffer: [4096]byte
|
|
orca_stderr_buffer_idx: int
|
|
|
|
_stderr_write :: proc "contextless" (data: []byte) -> (int, _OS_Errno) {
|
|
for b in data {
|
|
orca_stderr_buffer[orca_stderr_buffer_idx] = b
|
|
orca_stderr_buffer_idx += 1
|
|
|
|
if b == '\n' || orca_stderr_buffer_idx == len(orca_stderr_buffer)-1 {
|
|
log_ext(.ERROR, "", "", 0, cstring(raw_data(orca_stderr_buffer[:orca_stderr_buffer_idx])))
|
|
orca_stderr_buffer_idx = 0
|
|
}
|
|
}
|
|
|
|
return len(data), 0
|
|
}
|
|
|
|
|
|
_exit :: proc "contextless" (code: int) -> ! {
|
|
trap()
|
|
} |