// -*- C++ -*-
/*!
 * @file SystemLogger.cpp
 * @brief RT component logger class
 * @date $Date: 2007-07-20 16:10:32 $
 * @author Noriaki Ando <n-ando@aist.go.jp>
 *
 * Copyright (C) 2003-2008
 *     Task-intelligence Research Group,
 *     Intelligent Systems Research Institute,
 *     National Institute of
 *         Advanced Industrial Science and Technology (AIST), Japan
 *     All rights reserved.
 *
 * $Id: SystemLogger.cpp 845 2008-09-25 11:10:40Z n-ando $
 *
 */

#include <rtm/SystemLogger.h>
#include <rtm/Manager.h>

#if defined(_MSC_VER)
#define snprintf _snprintf
#endif

namespace RTC
{
  const char* Logger::m_levelString[] =
    {
      " SILENT: ",
      " FATAL: ",
      " ERROR: ",
      " WARNING: ",
      " INFO: ",
      " DEBUG: ",
      " TRACE: ",
      " VERBOSE: ",
      " PARANOID: "
    };

  Logger::Logger(const char* name)
    : ::coil::LogStream(&(Manager::instance().getLogStreamBuf()),
                        RTL_SILENT, RTL_PARANOID, RTL_SILENT),
      m_name(name),
      m_dateFormat("%b %d %H:%M:%S.%Q"),
      m_clock(&coil::ClockManager::instance().getClock("system")),
      m_msEnable(0), m_usEnable(0), m_colorEnable(false)
  {
    setLevel(Manager::instance().getLogLevel().c_str());
    coil::Properties& prop(Manager::instance().getConfig());
    if (prop.findNode("logger.date_format") != NULL)
      {
        setDateFormat(prop["logger.date_format"].c_str());
      }
    if (prop.findNode("logger.clock_type") != NULL)
      {
        setClockType(prop["logger.clock_type"]);
      }
  }

  Logger::Logger(LogStreamBuf* streambuf)
    : ::coil::LogStream(streambuf,
                        RTL_SILENT, RTL_PARANOID,  RTL_SILENT),
      m_name("unknown"),
      m_dateFormat("%b %d %H:%M:%S.%Q"),
      m_clock(&coil::ClockManager::instance().getClock("system")),
      m_msEnable(0), m_usEnable(0), m_colorEnable(false)
  {
    setDateFormat(m_dateFormat.c_str());
  }

  Logger::~Logger(void)
  {
  }

  /*!
   * @if jp
   * @brief ログレベルを文字列で設定する
   * @else
   * @brief Set log level by string
   * @endif
   */
  bool Logger::setLevel(const char* level)
  {
    return coil::LogStream::setLevel(strToLevel(level));
  }

  /*!
   * @if jp
   * @brief ヘッダに付加する日時フォーマットを指定する。
   * @else
   * @brief Set date/time format for adding the header
   * @endif
   */
  void Logger::setDateFormat(const char* format)
  {
    m_dateFormat = std::string(format);
    m_msEnable = coil::replaceString(m_dateFormat, "%Q", "#m#");
    m_usEnable = coil::replaceString(m_dateFormat, "%q", "#u#");
  }

  void Logger::setClockType(std::string clocktype)
  {
    m_clock = &coil::ClockManager::instance().getClock(clocktype);
  }
  /*!
   * @if jp
   * @brief ヘッダの日時の後に付加する文字列を設定する。
   * @else
   * @brief Set suffix of date/time string of header.
   * @endif
   */
  void Logger::setName(const char* name)
  {
    m_name = name;
  }

  /*!
   * @if jp
   * @brief カラーモード設定
   * カラーモードを有効にする。
   * @else
   * @brief Enable the color mode
   * Enable the color mode.
   * @endif
   */
  void Logger::enableColor()
  {
    m_colorEnable = true;
  }

  /*!
   * @if jp
   * @brief カラーモード解除
   * カラーモードを無効にする。
   * @else
   * @brief Disable the color mode
   * Disable the color mode.
   * @endif
  */
  void Logger::disableColor()
  {
    m_colorEnable = false;
  }

  /*!
   * @if jp
   * @brief メッセージのプリフィックス追加関数
   * @else
   * @brief Message prefix appender function
   * @endif
   */
  void Logger::header(int level)
  {
    const char* color[] =
      {
        "\x1b[0m",         // SLILENT  (none)
        "\x1b[0m\x1b[31m", // FATAL    (red)
        "\x1b[0m\x1b[35m", // ERROR    (magenta)
        "\x1b[0m\x1b[33m", // WARN     (yellow)
        "\x1b[0m\x1b[34m", // INFO     (blue)
        "\x1b[0m\x1b[32m", // DEBUG    (green)
        "\x1b[0m\x1b[36m", // TRACE    (cyan)
        "\x1b[0m\x1b[39m", // VERBOSE  (default)
        "\x1b[0m\x1b[37m"  // PARANOID (white)
      };
    if (m_colorEnable)
      {
        *this << color[level];
      }
    *this << getDate() + m_levelString[level] + m_name + ": ";
    *this << "\x1b[0m";
  }

  /*!
   * @if jp
   * @brief フォーマットされた現在日時文字列を取得する。
   * @else
   * @brief Get the current formatted date/time string
   * @endif
   */
  std::string Logger::getDate(void)
  {
    const int maxsize = 256;
    char buf[maxsize];
    coil::TimeValue tm(m_clock->gettime());

    time_t timer;
    struct tm* date;

    timer = tm.sec();
    date = gmtime(&timer);
      
    strftime(buf, sizeof(buf), m_dateFormat.c_str(), date);
    std::string fmt(buf);

    if (m_msEnable > 0)
      {
        char msec[4];
#ifdef WIN32
        _snprintf(msec, 4, "%03d", (int)(tm.usec() / 1000));
#else
        snprintf(msec, 4, "%03d", (int)(tm.usec() / 1000));
#endif
        coil::replaceString(fmt, "#m#", msec);
      }
    if (m_usEnable > 0)
      {
        char usec[4];
#ifdef WIN32
        _snprintf(usec, 4, "%03d",
                 (int)(tm.usec() - ((tm.usec() / 1000) * 1000)));
#else
        snprintf(usec, 4, "%03d",
                 (int)(tm.usec() - ((tm.usec() / 1000) * 1000)));
#endif
        coil::replaceString(fmt, "#u#", usec);
      }

    return fmt;
  }

  /*!
   * @if jp
   * @brief ログレベル設定
   * @else
   * @brief Set the log level
   * @endif
   */
  int Logger::strToLevel(const char* level)
  {
    std::string lv(level);
    if      (lv == "SILENT")
      return RTL_SILENT;
    else if (lv == "FATAL")
      return RTL_FATAL;
    else if (lv == "ERROR")
      return RTL_ERROR;
    else if (lv == "WARN")
      return RTL_WARN;
    else if (lv == "INFO")
      return RTL_INFO;
    else if (lv == "DEBUG")
      return RTL_DEBUG;
    else if (lv == "TRACE")
      return RTL_TRACE;
    else if (lv == "VERBOSE")
      return RTL_VERBOSE;
    else if (lv == "PARANOID")
      return RTL_PARANOID;
    else
      return RTL_SILENT;
  }

}; // namespace RTC