/*
 * This file is part of the EasyLogger Library.
 *
 * Copyright (c) 2015, Armink, <armink.ztl@gmail.com>
 *
 * Permission is hereby granted, free of charge, to any person obtaining
 * a copy of this software and associated documentation files (the
 * 'Software'), to deal in the Software without restriction, including
 * without limitation the rights to use, copy, modify, merge, publish,
 * distribute, sublicense, and/or sell copies of the Software, and to
 * permit persons to whom the Software is furnished to do so, subject to
 * the following conditions:
 *
 * The above copyright notice and this permission notice shall be
 * included in all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
 * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
 * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 *
 * Function: Portable interface for each platform.
 * Created on: 2015-04-28
 * Radkil fixed in 20260313
 */
 
#include "../common/include/elog.h"
#include <stdio.h>
#include <unistd.h>
#include <time.h>
#include "../common/include/common.h"
#include "../common/include/rd_time.h"
#include "../common/include/rd_thread.h"

#include "elog_file.h"

static pthread_mutex_t output_lock;

static uint8_t s_console_level = ELOG_FILTER_LVL_ALL;
static uint8_t s_file_level    = ELOG_FILTER_LVL_ALL;


static uint8_t parse_log_level(const char *log)
{
    for (const char *p = log; *p; p++) {
        if (p[1] == '/') {
            switch (*p) {
                case 'A': return ELOG_LVL_ASSERT;
                case 'E': return ELOG_LVL_ERROR;
                case 'W': return ELOG_LVL_WARN;
                case 'I': return ELOG_LVL_INFO;
                case 'D': return ELOG_LVL_DEBUG;
                case 'V': return ELOG_LVL_VERBOSE;
            }
        }
    }
    return ELOG_LVL_VERBOSE;
}

void elog_set_console_level(uint8_t level) {
    s_console_level = level;
}

void elog_set_file_level(uint8_t level) {
    s_file_level = level;
}

/**
 * EasyLogger port initialize
 *
 * @return result
 */
WEAK ElogErrCode elog_port_init(void) {
    ElogErrCode result = ELOG_NO_ERR;
    Rd_MutexInit(&output_lock);
    elog_file_init();
    return result;
}

/**
 * EasyLogger port deinitialize
 *
 */
WEAK void elog_port_deinit(void) {
    elog_file_deinit();
    Rd_MutexDestroy(&output_lock);
}

/**
 * output log port interface
 *
 * @param log output of log
 * @param size log size
 */
WEAK void elog_port_output(const char *log, size_t size) {
    uint8_t level = parse_log_level(log);
    if (level <= s_console_level) {
        RD_PRINTF("%.*s", (int)size, log);
    }

    if (level <= s_file_level) {
        elog_file_write(log, size);
    }
}

/**
 * output lock
 */
WEAK void elog_port_output_lock(void) {
    Rd_MutexLock(&output_lock, __func__, NULL);
}

/**
 * output unlock
 */
WEAK void elog_port_output_unlock(void) {
    Rd_MutexUnlock(&output_lock, __func__, NULL);
}

/**
 * get current time interface
 *
 * @return current time
 */
WEAK const char *elog_port_get_time(void) {
    static char cur_system_time[24] = { 0 };

    time_t cur_t;
    struct tm cur_tm;

    rd_time(&cur_t);
    rd_localtime_r(&cur_t, &cur_tm);
    rd_strftime(cur_system_time, sizeof(cur_system_time), "%Y-%m-%d %T", &cur_tm);

    return cur_system_time;
}

/**
 * get current process name interface
 *
 * @return current process name
 */
WEAK const char *elog_port_get_p_info(void) {
    static char cur_process_info[10] = { 0 };
    RD_SNPRINTF(cur_process_info, 10, "pid:%04d", (int)getpid());
    return cur_process_info;
}

/**
 * get current thread name interface
 *
 * @return current thread name
 */
WEAK const char *elog_port_get_t_info(void) {
    return " ";
}