#include <linux/vt.h>

#include "fcntl.h"
#include "stdarg.h"
#include "errno.h"
#include "time.h"
#include "unistd.h"
#include "stdio.h"
#include "string.h"

#include "logger.h"
#include "options.h"
#include "ui33.h"

Logger __logger;


static char *colours[5] = {
  "[\x1b[36mD\x1b[37m]",
  "[\x1b[32mI\x1b[37m]",
  "[\x1b[35mW\x1b[37m]",
  "[\x1b[33mE\x1b[37m]",
  "[\x1b[31mFl\x1b[37m]",
};

Size logger_init( void )
{
  String logfile[512];

  if( LOG_PATH[0] == '~' ) {
    snprintf(logfile, 512, "%s/%s", getenv("HOME"), LOG_PATH+1);
  } else {
    snprintf(logfile, 512, "%s", LOG_PATH);
  }

  __logger.fd = open(logfile,
    O_CREAT | O_TRUNC | O_WRONLY | O_NOCTTY | O_TTY_INIT,
    0644 );

  if( __logger.fd < 0 ) {
    printf( "Unable to initialize logger. Exiting." );
    return E33_EXIT_FAILURE;
  }

  __logger.func = 0;

  ui_add_message( "Welcome to Engine33" );
  dprintf( __logger.fd, "\033[3J\033[1;1HWelcome to Engine33!\r\n\r\n" );

  return E33_EXIT_SUCCESS;
}

void logger_term( void )
{
  logi( "Goodbye!" );
  close( __logger.fd );
}

void logger( Size level, const char *fmt, ... )
{
  time_t currentTime;
  struct tm *m_time;


  va_list args;
  va_start(args, fmt);

  time(&currentTime);
  m_time = localtime(&currentTime);


  ui_add_message( fmt, args ); /* XXX */


  dprintf( __logger.fd, "Engine33 [%02d:%02d:%02d] -",
    m_time->tm_hour, m_time->tm_min, m_time->tm_sec );

  dprintf( __logger.fd, " %s ", colours[level] );
  vdprintf(__logger.fd, fmt, args);

  if( (level > LOG_INFO) && errno ) {
    dprintf( __logger.fd, ". Reason: %s", strerror(errno) );
    errno = 0;
  }

  dprintf( __logger.fd, ".\r\n" );

  va_end(args);
}