/*
 * Logger.cpp
 *
 * Copyright (C) 2008 Johannes Thorn <dante@g4t3.de>
 *
 * This program is free software: you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by the
 * Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 * See the GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program. If not, see <http://www.gnu.org/licenses/>.
 */

#include "Logger.h"
#include "ConfigEntry.h"
#include "ConfigManager.h"
#include "Backends/ConsoleLogger.h"
#include "Backends/FileLogger.h"

#include <cstdlib>

namespace Mad {
namespace Common {

std::auto_ptr<Logger::ConfigHelper> Logger::configHelper;
std::set<Logger*> Logger::loggers;
std::auto_ptr<std::queue<Logger::Message> > Logger::messageQueue(new std::queue<Message>);

bool Logger::ConfigHelper::handleConfigEntry(const ConfigEntry &entry, bool handled) {
  if(handled)
    return false;

  if(entry[0].getKey().matches("Logger")) {
    if(entry[0][0].matches("Console")) {
      if(entry[1].empty()) {
        loggers.insert(new Backends::ConsoleLogger());
        return true;
      }
    }
    else if(entry[1].empty()) {
      logf(WARNING, "Unknown logger '%s'.", entry[0][0].c_str());
      return true;
    }
  }

  return false;
}

void Logger::ConfigHelper::configFinished() {
  std::auto_ptr<std::queue<Message> > queue = messageQueue;

  if(loggers.empty())
    loggers.insert(new Backends::ConsoleLogger());

  while(!queue->empty()) {
    const Message &message = queue->front();
    log(message.category, message.level, message.timestamp, message.message);
    queue->pop();
  }
}

Logger::ConfigHelper::~ConfigHelper() {
  // TODO delete all those loggers...

  //while(!loggers.empty())
  //  delete (*loggers.begin());
}

void Logger::logfv(MessageCategory category, MessageLevel level, const char *format, va_list ap) {
  int size = 100;
  char *buf = (char*)std::malloc(size);

  // If buffer is too small, try again with bigger buffer
  while(true) {
    va_list ap2;

    va_copy(ap2, ap);
    int n = std::vsnprintf(buf, size, format, ap2);
    va_end(ap2);

    if(n > -1 && n < size) {
      log(category, level, buf);
      std::free(buf);
      return;
    }

    if(n > -1)
      size = n+1;
    else
      size *= 2;

    buf = (char*)std::realloc(buf, size);
  }

}

void Logger::log(MessageCategory category, MessageLevel level, time_t timestamp, const std::string &message) {
  if(messageQueue.get()) { // Queue message if loggers aren't configured yet
    Message m = {category, level, timestamp, message};
    messageQueue->push(m);
    return;
  }

  for(std::set<Logger*>::iterator logger = loggers.begin(); logger != loggers.end(); ++logger) {
    if((*logger)->getLevel() >= level && (*logger)->isCategorySet(category))
      (*logger)->logMessage(category, level, timestamp, message);
  }
}

void Logger::logf(MessageCategory category, MessageLevel level, const char *format, ...) {
  va_list ap;
  va_start(ap, format);
  logfv(category, level, format, ap);
  va_end(ap);
}

void Logger::logf(MessageCategory category, const char *format, ...) {
  va_list ap;
  va_start(ap, format);
  logfv(category, DEFAULT, format, ap);
  va_end(ap);
}

void Logger::logf(MessageLevel level, const char *format, ...) {
  va_list ap;
  va_start(ap, format);
  logfv(GENERAL, level, format, ap);
  va_end(ap);
}

void Logger::logf(const char *format, ...) {
  va_list ap;
  va_start(ap, format);
  logfv(GENERAL, DEFAULT, format, ap);
  va_end(ap);
}

}
}