ableos/sysdata/libraries/stn/src/log.hb

.{string, fmt, memory} := @use("stn")

LogMsg := packed struct {level: LogLevel, string: ^u8, strlen: uint}

LogLevel := enum {
	Error,
	Warn,
	Info,
	Debug,
	Trace,
}

log := fn(level: LogLevel, message: ^u8): void {
	return @eca(3, 1, LogMsg.(level, message, @inline(string.length, message)), @sizeof(LogMsg))
}

error := fn(message: ^u8): void return @inline(log, LogLevel.Error, message)
warn := fn(message: ^u8): void return @inline(log, LogLevel.Warn, message)
info := fn(message: ^u8): void return @inline(log, LogLevel.Info, message)
debug := fn(message: ^u8): void return @inline(log, LogLevel.Debug, message)
trace := fn(message: ^u8): void return @inline(log, LogLevel.Trace, message)

print_buffer := memory.dangling(u8)

print := fn(v: @Any(), opts: fmt.FormatOptions): void {
	if @TypeOf(v) == ^u8 {
		@inline(log, opts.log, v)
		return
	}
	if print_buffer == memory.dangling(u8) {
		print_buffer = memory.request_page(1)
	}
	len := @inline(fmt.format, v, print_buffer, opts)
	@eca(3, 1, LogMsg.(opts.log, print_buffer, len), @sizeof(LogMsg))
	memory.set(u8, &0, print_buffer, memory.PAGE_SIZE)
}