/*!
 * @file runtime.cpp
 * Setup and launcher for the runtime.
 */

#include <io.h>
#include <third-party/mman/mman.h>
#include <cstring>
#include <Windows.h>

#include "runtime.h"
#include "system/SystemThread.h"
#include "sce/libcdvd_ee.h"
#include "sce/deci2.h"
#include "sce/sif_ee.h"
#include "sce/iop.h"
#include "game/system/Deci2Server.h"

#include "game/kernel/fileio.h"
#include "game/kernel/kboot.h"
#include "game/kernel/klink.h"
#include "game/kernel/kscheme.h"
#include "game/kernel/kdsnetm.h"
#include "game/kernel/klisten.h"
#include "game/kernel/kmemcard.h"
#include "game/kernel/kprint.h"
#include "game/kernel/kdgo.h"

#include "game/system/iop_thread.h"

#include "game/overlord/dma.h"
#include "game/overlord/iso.h"
#include "game/overlord/fake_iso.h"
#include "game/overlord/iso_queue.h"
#include "game/overlord/ramdisk.h"
#include "game/overlord/iso_cd.h"
#include "game/overlord/overlord.h"
#include "game/overlord/srpc.h"

u8* g_ee_main_mem = nullptr;

/*!
* runtime.cpp - Deci2Listener has been disabled for now, pending rewriting for Windows.
*/

namespace {

/*!
 * SystemThread function for running the DECI2 communication with the GOAL compiler.
 */



void deci2_runner(SystemThreadInterface& interfaces) {
  interfaces.initialization_complete();
  while (true) {
  }

  //  // callback function so the server knows when to give up and shutdown
//  std::function<bool()> shutdown_callback = [&]() { return interfaces.get_want_exit(); };
//
//  // create and register server
////  Deci2Server server(shutdown_callback);
////  ee::LIBRARY_sceDeci2_register(&server);
//
//  // now its ok to continue with initialization
//  interfaces.initialization_complete();
//
//  // in our own thread, wait for the EE to register the first protocol driver
//  printf("[DECI2] waiting for EE to register protos\n");
//  server.wait_for_protos_ready();
//  // then allow the server to accept connections
//  if (!server.init()) {
//    throw std::runtime_error("DECI2 server init failed");
//  }
//
//  printf("[DECI2] waiting for listener...\n");
//  bool saw_listener = false;
//  while (!interfaces.get_want_exit()) {
//    if (server.check_for_listener()) {
//      if (!saw_listener) {
//        printf("[DECI2] Connected!\n");
//      }
//      saw_listener = true;
//      // we have a listener, run!
//      server.run();
//    } else {
//      // no connection yet.  Do a sleep so we don't spam checking the listener.
//      Sleep(1000);
//    }
//  }
}


// EE System
constexpr int EE_MAIN_MEM_SIZE = 128 * (1 << 20);  // 128 MB, same as PS2 TOOL
constexpr u64 EE_MAIN_MEM_MAP = 0x2000000000;      // intentionally > 32-bit to catch pointer bugs

// when true, attempt to map the EE memory in the low 2 GB of RAM
// this allows us to use EE pointers as real pointers.  However, this might not always work,
// so this should be used only for debugging.
constexpr bool EE_MEM_LOW_MAP = false;

// GOAL Boot arguments
constexpr const char* GOAL_ARGV[] = {"", "-fakeiso", "-boot", "-debug"};
constexpr int GOAL_ARGC = 4;

/*!
 * SystemThread Function for the EE (PS2 Main CPU)
 */
void ee_runner(SystemThreadInterface& interfaces) {
  // Allocate Main RAM. Must have execute enabled.
  if (EE_MEM_LOW_MAP) {
    g_ee_main_mem =
        (u8*)mmap((void*)0x10000000, EE_MAIN_MEM_SIZE, PROT_EXEC | PROT_READ | PROT_WRITE,
                  MAP_ANONYMOUS | MAP_32BIT | MAP_PRIVATE | MAP_POPULATE, 0, 0);
  } else {
    g_ee_main_mem =
        (u8*)mmap((void*)EE_MAIN_MEM_MAP, EE_MAIN_MEM_SIZE, PROT_EXEC | PROT_READ | PROT_WRITE,
                  MAP_ANONYMOUS | MAP_PRIVATE, 0, 0);
  }

  if (g_ee_main_mem == (u8*)(-1)) {
    printf("  Failed to initialize main memory! %s\n", strerror(errno));
    interfaces.initialization_complete();
    return;
  }

  printf("  Main memory mapped at 0x%016lx\n", (u64)(g_ee_main_mem));
  printf("  Main memory size 0x%x bytes (%.3f MB)\n", EE_MAIN_MEM_SIZE,
         (double)EE_MAIN_MEM_SIZE / (1 << 20));

  printf("[EE] Initialization complete!\n");
  interfaces.initialization_complete();

  printf("[EE] Run!\n");
  memset((void*)g_ee_main_mem, 0, EE_MAIN_MEM_SIZE);
  fileio_init_globals();
  kboot_init_globals();
  kdgo_init_globals();
  kdsnetm_init_globals();
  klink_init_globals();

  kmachine_init_globals();
  kscheme_init_globals();
  kmalloc_init_globals();

  klisten_init_globals();
  kmemcard_init_globals();
  kprint_init_globals();

  goal_main(GOAL_ARGC, GOAL_ARGV);
  printf("[EE] Done!\n");

  //  // kill the IOP todo
  iop::LIBRARY_kill();

  munmap(g_ee_main_mem, EE_MAIN_MEM_SIZE);

  // after main returns, trigger a shutdown.
  interfaces.trigger_shutdown();
}

/*!
 * SystemThread function for running the IOP (separate I/O Processor)
 */
void iop_runner(SystemThreadInterface& interfaces) {
  IOP iop;
  printf("\n\n\n[IOP] Restart!\n");
  iop.reset_allocator();
  ee::LIBRARY_sceSif_register(&iop);
  iop::LIBRARY_register(&iop);

  // todo!
  dma_init_globals();
  iso_init_globals();
  fake_iso_init_globals();
  // iso_api
  iso_cd_init_globals();
  iso_queue_init_globals();
  // isocommon
  // overlord
  ramdisk_init_globals();
  // sbank
  // soundcommon
  srpc_init_globals();
  // ssound
  // stream

  interfaces.initialization_complete();

  printf("[IOP] Wait for OVERLORD to be started...\n");
  iop.wait_for_overlord_start_cmd();
  if (iop.status == IOP_OVERLORD_INIT) {
    printf("[IOP] Run!\n");
  } else {
    printf("[IOP] shutdown!\n");
    return;
  }

  iop.reset_allocator();

  // init

  start_overlord(iop.overlord_argc, iop.overlord_argv);  // todo!

  // unblock the EE, the overlord is set up!
  iop.signal_overlord_init_finish();

  // IOP Kernel loop
  while (!interfaces.get_want_exit() && !iop.want_exit) {
    // the IOP kernel just runs at full blast, so we only run the IOP when the EE is waiting on the
    // IOP. Each time the EE is waiting on the IOP, it will run an iteration of the IOP kernel.
    iop.wait_run_iop();
    iop.kernel.dispatchAll();
  }

  // stop all threads in the iop kernel.
  // if the threads are not stopped nicely, we will deadlock on trying to destroy the kernel's
  // condition variables.
  iop.kernel.shutdown();
}
}  // namespace

/*!
 * Main function to launch the runtime.
 * Arguments are currently ignored.
 */
void exec_runtime(int argc, char** argv) {
  (void)argc;
  (void)argv;

  // step 1: sce library prep
  iop::LIBRARY_INIT();
  ee::LIBRARY_INIT_sceCd();
  //ee::LIBRARY_INIT_sceDeci2();
  ee::LIBRARY_INIT_sceSif();

  // step 2: system prep
  SystemThreadManager tm;
  auto& deci_thread = tm.create_thread("DMP");
  auto& iop_thread = tm.create_thread("IOP");
  auto& ee_thread = tm.create_thread("EE");

  // step 3: start the EE!
  iop_thread.start(iop_runner);
  ee_thread.start(ee_runner);
  deci_thread.start(deci2_runner);
  
  // step 4: wait for EE to signal a shutdown, which will cause the DECI thread to join.
  deci_thread.join();
  // DECI has been killed, shutdown!

  // to be extra sure
  tm.shutdown();

  // join and exit
  tm.join();
  printf("GOAL Runtime Shutdown\n");
}