/* ckerrlog.c - Error report and logging for ck ------------------------*- C -*-
 *
 * This file is part of ck, the config keeper
 *
 * -----------------------------------------------------------------------------
 *
 * Copyright (C) 2018  Anastasis Grammenos
 * GPLv3 (see LICENCE for the full notice)
 *
 * -------------------------------------------------------------------------- */
#include <time.h>

#include "ckerrlog.h"
#include "cklist.h"

ERRLOG(logger);

static int loglvl;
static char buf[STR_M];

#define X(stream) static cklist *stream;
CK_STREAMS
#undef X

char *get_time() {
  time_t rawtime;
  struct tm * timeinfo;
  time (&rawtime);
  timeinfo = localtime (&rawtime);
  strftime (buf,80,"[%c]",timeinfo);
  return buf;
}

void log_command(int argc, char* argv[]) {
  char tmp[STR_L] = "";
  for(int i = 0; i < argc; i++) {
    strcat(tmp, argv[i]);
    strcat(tmp, " ");
  }
  LOG("Command issued: %s", tmp);
}

#define X(stream)                                               \
  void add_ ## stream ## _with_delim(char *delim, char *txt,    \
                                     va_list args) {            \
    char tmp[STR_L];                                            \
    vsprintf(tmp, txt, args);                                   \
    if (stream) {                                               \
      list_add(stream, tmp);                                    \
      list_add(stream, delim);                                  \
      return;                                                   \
    }                                                           \
    stream = list_make_and_add(tmp);                            \
    list_add(stream, delim);                                    \
  }
CK_STREAMS
#undef X

#define X(stream)                                       \
  void ck## stream(char *txt, ...) {                    \
    va_list args;                                       \
    va_start(args, txt);                                \
    add_## stream ##_with_delim("\n", txt, args);       \
    va_end(args);                                       \
  }
CK_STREAMS
#undef X

#define X(stream)                                               \
  void ck## stream ##_with_delim(char *d, char *txt, ...) {     \
    va_list args;                                               \
    va_start(args, txt);                                        \
    add_## stream ##_with_delim(d, txt, args);               \
    va_end(args);                                               \
  }
CK_STREAMS
#undef X

#define X(stream)                               \
  void reset_## stream() {                      \
    list_free(stream);                          \
    stream = NULL;                              \
  }
CK_STREAMS
#undef X

#define X(stream)                                \
  void report_## stream() {                      \
    list_print_concat(stream);                   \
    reset_## stream();                           \
  }
CK_STREAMS
#undef X

void report_errlog() {
  if (!loglvl) {
#define X(stream)                               \
    if (stream) {                               \
      reset_##stream();                         \
    }
    CK_STREAMS
#undef X
      return;
  }
#define X(stream)                               \
  if (stream) {                                 \
    printf("%s:\n", #stream);                   \
    report_##stream();                          \
  }
  CK_STREAMS
#undef X
}

void ckerr_add_component(char *txt, ...) {
  va_list args;
  va_start(args, txt);
  add_err_with_delim(" ", txt, args);
  va_end(args);
}

extern void errlog_set_verbose(int level) {
  loglvl = level;
}


void initialize_errlog(int argc, char* argv[]) {
#define X(stream) stream = NULL;
  CK_STREAMS
#undef X
  loglvl = 0;
  LOG("%s Log session started", get_time());
  log_command(argc, argv);
}