#include "Veater_computer_eater_register.h"
#include "Veater_computer_my_mem__DB10.h"
#include "simpc_ui.h"

#define NCUR_X 5
#define attroff(...)
#define attron(...)
#define PRINT_ME(y, x, ...)                                                    \
  {                                                                            \
    printf("%*c", x, ' ');                                                     \
    printf(__VA_ARGS__);                                                       \
    printf("\n");                                                              \
  }
#define PRINT_ME_W(w, y, x, ...)                                               \
  {                                                                            \
    printf("%*c", x, ' ');                                                     \
    printf(__VA_ARGS__);                                                       \
    printf("\n");                                                              \
  }
#define PRINT_NEXT()                                                           \
  {                                                                            \
    puts("-----");                                                             \
  }

#include "Veater_computer.h"
#include "Veater_computer_eater_alu.h"
#include "Veater_computer_eater_computer.h"
#include "verilated.h"
#include <cstdint>
#include <cstdio>
#include <sched.h>

bool paused = false;

static void handle_key();

void simpc_ui_write(const std::unique_ptr<Veater_computer> &topp, uint64_t i) {
  // clk hi->lo doesn't do anything, just skip this.
  if (i != 0 && !topp->clk_in)
    return;
  // uint16_t opcode = topp->eater_computer->;
  uint8_t opcode = topp->eater_computer->INS->r_datastore;
  // topp->halt
  uint8_t halt = topp->eater_computer->flags.__PVT__halt;

  PRINT_ME_W(status_top, 0, 0, "Step: %10lu", i);
  PRINT_ME_W(status_top, 1, 0, "%-20s", paused ? "Paused" : "Running");

  PRINT_ME(3, NCUR_X, "CLK1: %4d\tState: 0x%02X\tHLT: %d", topp->clk_in,
           topp->eater_computer->decoder__DOT__internal_state, halt);

  PRINT_ME(4, NCUR_X, "BUS: %02X\tPC: @0x%02X\tINS: 0x%02X",
           topp->eater_computer->bus, topp->eater_computer->PC_out, opcode);

  bool sub = false;
  printf(
      "| %c | %c | %c %c | %c %c | %c %c | %c %c | %c %c | %c | %c %c %c |\n",
      halt ? 'X' : ' ', topp->eater_computer->flags.__PVT__MAR_in ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__RAM_in ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__RAM_out ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__INS_in ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__INS_out ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__A_in ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__A_out ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__ALU_out ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__ALU_subtract_nadd ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__B_in ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__B_out ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__OUT_in ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__PC_count ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__PC_out ? 'X' : ' ',
      topp->eater_computer->flags.__PVT__PC_in ? 'X' : ' ');
  printf("| H | M | R R | I I | A A | € S | B B | O | C C J | \n");
  printf("| L | A | A A | S S | I O | O U | I O | I | E O M | \n");
  printf("| T | I | I O | I O |     |   B |     | N |     P | \n");

  std::string insline{"???"}; // print_decoded(opcode, true);
  PRINT_ME(5, NCUR_X, "%-80s", insline.c_str());

  PRINT_ME(7, NCUR_X, "A: 0x%02X\tB: 0x%02X\tALU: 0x%02X\tOUT: 0x%02X",
           topp->eater_computer->A->r_datastore,
           topp->eater_computer->B->r_datastore,
           topp->eater_computer->alu->result,
           topp->eater_computer->OUT->r_datastore);
  // PRINT_ME(
  //     8, NCUR_X, "%c%8d\t%c%8d\t%c%8d\t%11d",
  //     topp->computer->store_to_A_int ? '*' : ' ', topp->computer->reg_A_int,
  //     topp->computer->store_to_D_int ? '*' : ' ', topp->computer->reg_D_int,
  //     topp->computer->store_to_pA_int ? '*' : ' ',
  //     topp->computer->reg_pA_int, topp->computer->result_int);

  PRINT_NEXT();
}

void simpc_ui_finish_message(const std::unique_ptr<VerilatedContext> &contextp,
                             const std::unique_ptr<Veater_computer> &topp) {
  attron(A_BOLD);
  auto xpos = 20;
  PRINT_ME_W(status_top, 0, xpos, "Simulation finished.");
  const char *msg;
  // topp->halt
  bool halt = topp->eater_computer->flags.__PVT__halt;
  if (halt) {
    msg = "Halt encountered.";
  } else if (!contextp->gotFinish()) {
    msg = "Step count exceeded.";
  } else {
    msg = "Regular finish.";
  }
  PRINT_ME_W(status_top, 1, xpos, "%s", msg);

  attroff(A_BOLD);

  for (int idx = 0; idx < topp->eater_computer->RAM->r_datastore.size();
       idx++) {
    printf("Mem[%2d] = 0X%02X\n", idx, topp->eater_computer->RAM->r_datastore[idx]);
  }
}

void simpc_ui_init(void) {}

void simpc_ui_cleanup(void) {}

void simpc_ui_confirm_finish(void) {}