// SPDX-License-Identifier: BSD-3-Clause OR Apache-2.0
/*
 * hal_io.c
 *
 * Description: contains the POSIX implementation of the hardware
 * abstraction layer interface for input/output functionality
 *
 */

#include "platform/hal_time.h"
#include "platform/hal_semaphore.h"

#include "ud3tn/result.h"

#include <stdio.h>
#include <stddef.h>
#include <stdarg.h>
#include <stdint.h>
#include <string.h>

static bool log_io_initialized;
static Semaphore_t log_io_semph;

void hal_time_init(void); // not declared in public header

enum ud3tn_result hal_io_init_internal(bool unblock)
{
	if (log_io_initialized)
		return UD3TN_OK;
	log_io_initialized = true;
	log_io_semph = hal_semaphore_init_binary();
	hal_time_init(); // required for logging
	if (unblock)
		hal_semaphore_release(log_io_semph);
	return UD3TN_OK;
}

enum ud3tn_result hal_io_init(void)
{
	return hal_io_init_internal(true);
}

int hal_io_message_printf(const char *format, ...)
{
	int rc;
	va_list v;

	va_start(v, format);
	rc = vfprintf(stderr, format, v);
	va_end(v);
	return rc;
}

static inline const char *get_log_level_name(const uint8_t level)
{
	switch (level) {
	case 1:
		return "ERROR";
	case 2:
		return "WARNING";
	case 3:
		return "INFO";
	default:
		return "DEBUG";
	}
}

int hal_io_log_printf(const int level, const char *const file, const int line,
		      const char *const format, ...)
{
	int rc;
	va_list v;

	if (!log_io_initialized)
		hal_io_init_internal(false);
	else
		hal_semaphore_take_blocking(log_io_semph);
	hal_time_print_log_time_string();
	fprintf(stderr, "[%s] ", get_log_level_name(level));
	va_start(v, format);
	rc = vfprintf(stderr, format, v);
	va_end(v);
	fprintf(stderr, " [%s:%d]\n", file, line);
	fflush(stderr);
	hal_semaphore_release(log_io_semph);
	return rc;
}

void hal_io_log_perror(int level, const char *component, const char *file,
		       int line, const char *message, int error)
{
	if (!log_io_initialized)
		hal_io_init_internal(false);
	else
		hal_semaphore_take_blocking(log_io_semph);
	hal_time_print_log_time_string();
	fprintf(
		stderr,
		"[%s] System error reported in %s - %s: %s [%s:%d]\n",
		get_log_level_name(level),
		component,
		message,
		strerror(error),
		file,
		line
	);
	fflush(stderr);
	hal_semaphore_release(log_io_semph);
}