// vim:fileencoding=utf-8:foldmethod=marker

#include "log.h"
#include "../common/aliases/aliases.h"
#include "../common/assert/assert.h"
#include "../os/file/file.h"
#include "../common/misc/misc_utils.h"

#define LOG_LEVEL_STR_LENGTH 8
#define LOG_PREFIX_BUF_LENGTH 16

typedef struct {
	WFile *outlog;
	WFile *errlog;
	LogLevel level;

	wapp_misc_utils_reserve_padding(2 * sizeof(WFile *) + sizeof(LogLevel));
} LogConfig;

wapp_intern LogConfig LOG_CONFIG = {
	.level = WAPP_LOG_DEBUG,
};
wapp_intern Str8RO LOG_LEVEL_STRINGS[COUNT_LOG_LEVEL] = {
	[WAPP_LOG_FATAL]    = wapp_str8_lit_ro_initialiser_list("[ FATAL    ] "),
	[WAPP_LOG_CRITICAL] = wapp_str8_lit_ro_initialiser_list("[ CRITICAL ] "),
	[WAPP_LOG_ERROR]    = wapp_str8_lit_ro_initialiser_list("[ ERROR    ] "),
	[WAPP_LOG_WARNING]  = wapp_str8_lit_ro_initialiser_list("[ WARNING  ] "),
	[WAPP_LOG_INFO]     = wapp_str8_lit_ro_initialiser_list("[ INFO     ] "),
	[WAPP_LOG_DEBUG]    = wapp_str8_lit_ro_initialiser_list("[ DEBUG    ] "),
};

wapp_intern void _write_log_line(WFile *fp, const Logger *logger, Str8 msg, LogLevel level);

void wapp_log_set_level(LogLevel level) {
	LOG_CONFIG.level = level;
}

void wapp_log_configure(WFile *outlog, WFile *errlog, LogLevel level) {
	LOG_CONFIG.outlog = outlog;
	LOG_CONFIG.errlog = errlog;
	LOG_CONFIG.level  = level;
}

Logger wapp_log_make_logger(Str8 name) {
	return (Logger){ .name = name };
}

void wapp_log_debug(const Logger *logger, Str8 msg) {
	wapp_debug_assert(logger != NULL, "`logger` should not be NULL");
	if (LOG_CONFIG.level < WAPP_LOG_DEBUG) { return; }

	WFile *fp = LOG_CONFIG.outlog != NULL ? LOG_CONFIG.outlog : wapp_file_stdout();
	_write_log_line(fp, logger, msg, WAPP_LOG_DEBUG);
}

void wapp_log_info(const Logger *logger, Str8 msg) {
	wapp_debug_assert(logger != NULL, "`logger` should not be NULL");
	if (LOG_CONFIG.level < WAPP_LOG_INFO) { return; }

	WFile *fp = LOG_CONFIG.outlog != NULL ? LOG_CONFIG.outlog : wapp_file_stdout();
	_write_log_line(fp, logger, msg, WAPP_LOG_INFO);
}

void wapp_log_warning(const Logger *logger, Str8 msg) {
	wapp_debug_assert(logger != NULL, "`logger` should not be NULL");
	if (LOG_CONFIG.level < WAPP_LOG_WARNING) { return; }

	WFile *fp = LOG_CONFIG.outlog != NULL ? LOG_CONFIG.outlog : wapp_file_stdout();
	_write_log_line(fp, logger, msg, WAPP_LOG_WARNING);
}

void wapp_log_error(const Logger *logger, Str8 msg) {
	wapp_debug_assert(logger != NULL, "`logger` should not be NULL");
	if (LOG_CONFIG.level < WAPP_LOG_ERROR) { return; }

	WFile *fp = LOG_CONFIG.errlog != NULL ? LOG_CONFIG.errlog : wapp_file_stderr();
	_write_log_line(fp, logger, msg, WAPP_LOG_ERROR);
}

void wapp_log_critical(const Logger *logger, Str8 msg) {
	wapp_debug_assert(logger != NULL, "`logger` should not be NULL");
	if (LOG_CONFIG.level < WAPP_LOG_CRITICAL) { return; }

	WFile *fp = LOG_CONFIG.errlog != NULL ? LOG_CONFIG.errlog : wapp_file_stderr();
	_write_log_line(fp, logger, msg, WAPP_LOG_CRITICAL);
}

void wapp_log_fatal(const Logger *logger, Str8 msg) {
	wapp_debug_assert(logger != NULL, "`logger` should not be NULL");
	if (LOG_CONFIG.level < WAPP_LOG_FATAL) { return; }

	WFile *fp = LOG_CONFIG.errlog != NULL ? LOG_CONFIG.errlog : wapp_file_stderr();
	_write_log_line(fp, logger, msg, WAPP_LOG_FATAL);
}

wapp_intern void _write_log_line(WFile *fp, const Logger *logger, Str8 msg, LogLevel level) {
	wapp_file_write((void *)LOG_LEVEL_STRINGS[level].buf, fp, LOG_LEVEL_STRINGS[level].size);
	wapp_file_write((void *)logger->name.buf, fp, logger->name.size);
	wapp_file_write((void *)": ", fp, 2);
	wapp_file_write((void *)msg.buf, fp, msg.size);
	wapp_file_write((void *)"\n", fp, 1);
}