/*
 * Copyright 2015 Rockchip Electronics Co. LTD
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

#define MODULE_TAG "mpp_log"

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

#include "mpp_env.h"
#include "mpp_debug.h"
#include "mpp_common.h"

#include "os_log.h"

#define MPP_LOG_MAX_LEN 256

#ifdef __cplusplus
extern "C" {
#endif

RK_U32 mpp_debug = 0;

// TODO: add log timing information and switch flag
static const char *msg_log_warning = "log message is long\n";
static const char *msg_log_nothing = "\n";
static int mpp_log_level = MPP_LOG_INFO;

static void __mpp_log(os_log_callback func, const char *tag, const char *fmt,
 const char *fname, va_list args)
{
 char msg[MPP_LOG_MAX_LEN + 1];
 char *tmp = msg;
 const char *buf = fmt;
 size_t len_fmt = strnlen(fmt, MPP_LOG_MAX_LEN);
 size_t len_name = (fname) ? (strnlen(fname, MPP_LOG_MAX_LEN)) : (0);
 size_t buf_left = MPP_LOG_MAX_LEN;
 size_t len_all = len_fmt + len_name;

 if (NULL == tag)
 tag = MODULE_TAG;

 if (len_name) {
 buf = msg;
 buf_left -= snprintf(msg, buf_left, "%s ", fname);
 tmp += len_name + 1;
 }

 if (len_all == 0) {
 buf = msg_log_nothing;
 } else if (len_all >= MPP_LOG_MAX_LEN) {
 buf_left -= snprintf(tmp, buf_left, "%s", msg_log_warning);
 buf = msg;
 } else {
 snprintf(tmp, buf_left, "%s", fmt);
 if (fmt[len_fmt - 1] != '\n') {
 tmp[len_fmt] = '\n';
 tmp[len_fmt + 1] = '0円';
 }
 buf = msg;
 }

 func(tag, buf, args);
}

void _mpp_log(const char *tag, const char *fmt, const char *fname, ...)
{
 va_list args;

 mpp_logw("warning: use new logx function\n");

 va_start(args, fname);
 __mpp_log(os_log_info, tag, fmt, fname, args);
 va_end(args);
}

void _mpp_err(const char *tag, const char *fmt, const char *fname, ...)
{
 va_list args;

 mpp_logw("warning: use new logx function\n");

 va_start(args, fname);
 __mpp_log(os_log_error, tag, fmt, fname, args);
 va_end(args);
}

void _mpp_log_l(int level, const char *tag, const char *fmt, const char *fname, ...)
{
 static os_log_callback log_func[] = {
 NULL, /* MPP_LOG_DEFAULT */
 os_log_fatal, /* MPP_LOG_FATAL */
 os_log_error, /* MPP_LOG_ERROR */
 os_log_warn, /* MPP_LOG_WARN */
 os_log_info, /* MPP_LOG_INFO */
 os_log_debug, /* MPP_LOG_DEBUG */
 os_log_trace, /* MPP_LOG_VERBOSE */
 os_log_info, /* MPP_LOG_DEFAULT */
 };

 va_list args;
 int log_level;

 if (level <= MPP_LOG_UNKNOWN || level >= MPP_LOG_SILENT)
 return;

 log_level = mpp_log_level;
 if (log_level >= MPP_LOG_SILENT)
 return;

 if (level > log_level)
 return;

 va_start(args, fname);
 __mpp_log(log_func[level], tag, fmt, fname, args);
 va_end(args);
}

void mpp_set_log_level(int level)
{
 if (level <= MPP_LOG_UNKNOWN || level > MPP_LOG_SILENT) {
 mpp_logw("log level should in range [%d : %d] invalid intput %d\n",
 MPP_LOG_FATAL, MPP_LOG_SILENT, level);
 level = MPP_LOG_INFO;
 }

 mpp_log_level = level;
}

int mpp_get_log_level(void)
{
 int level;

 mpp_env_get_u32("mpp_log_level", (RK_U32 *)&level, mpp_log_level);

 if (level <= MPP_LOG_UNKNOWN || level > MPP_LOG_SILENT)
 level = MPP_LOG_INFO;

 mpp_log_level = level;

 return level;
}

#ifdef __cplusplus
}
#endif