;
; iron_log.hsp — ログ出力モジュール
;
#ifndef __iron_log_hsp__
#define __iron_log_hsp__
#include "iron_datetime.hsp"

#define global LOGLV_DEBUG 0
#define global LOGLV_INFO  1
#define global LOGLV_WARN  2
#define global LOGLV_ERROR 3

#module iron_log

#deffunc log_init str filepath, int level
	_log_file = filepath
	_log_level = level
	_log_console = 1
	return

#deffunc log_set_level int level
	_log_level = level
	return

#deffunc log_write int level, str msg, local ts, local lv, local _line
	if level < _log_level : return
	ts = datetime_now()
	if level == 0 : lv = "DEBUG"
	if level == 1 : lv = "INFO "
	if level == 2 : lv = "WARN "
	if level == 3 : lv = "ERROR"
	_line = "[" + ts + "] " + lv + " " + msg
	if _log_console : mes _line
	return

#deffunc log_debug str msg
	log_write 0, msg
	return

#deffunc log_info str msg
	log_write 1, msg
	return

#deffunc log_warn str msg
	log_write 2, msg
	return

#deffunc log_error str msg
	log_write 3, msg
	return

#global

#endif