#include "log.h"

#include "render.h"
#include <time.h>
#include <string.h>
#include <stdarg.h>
#include <stdlib.h>
#include <unistd.h>
#include <stdio.h>

#include "script.h"

int logLevel = 1;

/* Four levels of log:
   0 info
   1 warn
   2 error
   3 critical
*/

//char *logstr[] = { "INFO", "WARN", "\x1b[1;31mERROR\x1b[0m", "CRITICAL" };
char *logstr[] = { "info", "warn", "error", "critical" };
char *catstr[] = {"engine", "script"};

FILE *logfile = NULL;

#define CONSOLE_BUF 1024*1024*5/* 5MB */

char lastlog[ERROR_BUFFER+1] = {'\0'};
char consolelog[CONSOLE_BUF+1] = {'\0'};

void mYughLog(int category, int priority, int line, const char *file, const char *message, ...)
{
#ifdef DBG
    if (priority >= logLevel) {
	time_t now = time(0);
	struct tm *tinfo = localtime(&now);
	char timestr[50];
	strftime(timestr,50,"%y", tinfo);

	double ticks = (double)clock()/CLOCKS_PER_SEC;

	va_list args;
	va_start(args, message);
	char msgbuffer[ERROR_BUFFER] = { '\0' };
	vsnprintf(msgbuffer, ERROR_BUFFER, message, args);
	va_end(args);

	char buffer[ERROR_BUFFER] = { '\0' };
	snprintf(buffer, ERROR_BUFFER, "%g | %s:%d: %s, %s: %s\n", ticks, file, line, logstr[priority], catstr[category], msgbuffer);

	log_print(buffer);

	if (category == 1 && priority >= 2)
	  js_stacktrace();
  }
#endif
}

void log_print(const char *str)
{
  fprintf(stderr, "%s", str);
  fflush(stderr);

  strncat(consolelog, str, CONSOLE_BUF);

  if (logfile) {
    fprintf(logfile, "%s", str);
    fflush(logfile);
  }

  snprintf(lastlog, ERROR_BUFFER, "%s", str);
}

void log_setfile(char *file) {
    freopen(file, "w", stderr);
    freopen(file, "w", stdout);
}

void log_cat(FILE *f) {
    char out[1024];

    while (fgets(out, sizeof(out), f)) {
        out[strcspn(out, "\n")] = '\0';
        YughInfo(out);
    }
}