#include "ncac.h"

#include <curses.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <term.h>

#include "asana/asana.h"
#include "asana/fetch.h"
#include "ui/base.h"
#include "ui/commands.h"
#include "ui/model.h"

void append_to_buffer(ui_state *state, char c) {
  if (state->buffer_size < UI_INPUT_BUFFER_SIZE - 1) {
    state->input_buffer[state->buffer_size++] = c;
    state->input_buffer[state->buffer_size] = '\0';
  }
}

bool handle_command(ui_state *state) {
  for (size_t i = 0; i < UI_NUM_COMMANDS; i++) {
    if (strncmp(state->input_buffer, ui_commands[i].command,
                UI_INPUT_BUFFER_SIZE) == 0) {
      return ui_commands[i].handler(state);
    }
  }

  state->curs_y = 0;
  state->curs_x = 0;

  draw_text("Unknown command. Type \":help\" for a list of commands", state);

  return false;
}

int main(/*int argc, char **argv*/) {
  setup();

  int input;

  ui_state state;
  state.mode = 0;
  state.buffer_size = 0;
  state.input_buffer[0] = '\0';

  while (true) {
    draw_status_line(&state);

    switch (input = getch()) {
    case '\r':
      if (state.mode == COMMAND) {
        state.mode = NORMAL;
        if (handle_command(&state)) {
          finish(SIGTERM);
        }
      } else if (state.mode == NORMAL) {
        state.curs_y++;
      }
      break;
    case KEY_EXIT:
      state.mode = NORMAL;
      break;
    case ':':
      if (state.mode == NORMAL) {
        state.mode = COMMAND;
        state.buffer_size = 0;
        state.input_buffer[0] = '\0';
      } else {
        append_to_buffer(&state, input);
      }
      break;
    default:
      append_to_buffer(&state, input);
      break;
    }
  }
  return 0;
}

static void finish(/*int sig*/) {
  endwin();
  asana_cleanup();
  exit(0);
}

static void setup() {
  char *pat = getenv("ASANA_PAT");
  if (!pat) {
    fprintf(stderr, "ASANA_PAT is not defined\n");
    exit(1);
  }

  // initialize the asana client
  if (!asana_init(pat)) {
    fprintf(stderr, "Unable to initialize the Asana client\n");
    exit(1);
  }

  // initialize ncurses
  if (!initscr()) {
    fprintf(stderr, "Unable to initialize the curses screen.\n");
    exit(1);
  }

  // don't buffer or echo input
  if (cbreak() == ERR) {
    fprintf(stderr, "Unable to initialize.\n");
    exit(1);
  }
  noecho();
  nonl();
  intrflush(stdscr, FALSE);
  keypad(stdscr, TRUE);

  // install handlers
  signal(SIGINT, &finish);
  signal(SIGKILL, &finish);
  signal(SIGTERM, &finish);
}

void get_me(int *curs_x, int *curs_y) {
  User me;
  user_info(&me);

  if (me.workspaces == NULL || me.workspaces_len == 0) {
    fprintf(stderr, "Unable to get workspaces.\n");
    return;
  }

  char gid[64];
  gid[0] = '\0';

  user_task_list_gid(me.workspaces[0].gid, gid);
  fprintf(stderr, "Got a task list? %s\n", gid);

  *curs_x = 0;
  (*curs_y)++;
  // draw_text(gid, curs_x, curs_y);
}

void get_my_tasks(int *curs_x, int *curs_y) {
  User me;
  user_info(&me);

  if (me.workspaces == NULL || me.workspaces_len == 0) {
    fprintf(stderr, "Unable to get workspaces.\n");
    return;
  }

  char gid[64];
  gid[0] = '\0';

  if (user_task_list_gid(me.workspaces[me.workspaces_len-1].gid, gid) != ASANA_ERR_OK) {
    fprintf(stderr, "Unable to get task list ID. %s\n", gid);
    return;
  }

  Project my_tasks;
  if (user_task_list(gid, &my_tasks) != ASANA_ERR_OK) {
    fprintf(stderr, "Unable to get task list.\n");
    return;
  }

  *curs_x = 0;
  *curs_y = 0;

  // draw_text("My Tasks", curs_x, curs_y);
  *curs_x = 0;
  (*curs_y)+=2;

  for (size_t i=0; i<my_tasks.tasks_len;i++) {
    // draw_text(my_tasks.tasks[i].name, curs_x, curs_y);
    *curs_x = 0;
    (*curs_y)++;
  }
}