#include <snes/snes.hpp>

#define SYSTEM_CPP
namespace SNES {

System system;

#include <snes/config/config.cpp>
#include <snes/debugger/debugger.cpp>
#include <snes/scheduler/scheduler.cpp>
#include <snes/random/random.cpp>

#include <snes/video/video.cpp>
#include <snes/audio/audio.cpp>
#include <snes/input/input.cpp>

#include "serialization.cpp"

void System::run() {
  scheduler.sync.i = Scheduler::SynchronizeMode::None;

  scheduler.enter();
  if(scheduler.exit_reason.i == Scheduler::ExitReason::FrameEvent) {
    input.update();
    video.update();
  }
}

void System::runtosave() {
  if(CPU::Threaded == true) {
    scheduler.sync.i = Scheduler::SynchronizeMode::CPU;
    runthreadtosave();
  }

  if(SMP::Threaded == true) {
    scheduler.thread = smp.thread;
    runthreadtosave();
  }

  if(PPU::Threaded == true) {
    scheduler.thread = ppu.thread;
    runthreadtosave();
  }

  if(DSP::Threaded == true) {
    scheduler.thread = dsp.thread;
    runthreadtosave();
  }

  for(unsigned i = 0; i < cpu.coprocessors.size(); i++) {
    Processor &chip = *cpu.coprocessors[i];
    scheduler.thread = chip.thread;
    runthreadtosave();
  }
}

void System::runthreadtosave() {
  while(true) {
    scheduler.enter();
    if(scheduler.exit_reason.i == Scheduler::ExitReason::SynchronizeEvent) break;
    if(scheduler.exit_reason.i == Scheduler::ExitReason::FrameEvent) {
      input.update();
      video.update();
    }
  }
}

void System::init(Interface *interface_) {
  interface = interface_;
  assert(interface != 0);

  icd2.init();
  superfx.init();
  sa1.init();
  necdsp.init();
  bsxsatellaview.init();
  bsxcartridge.init();
  bsxflash.init();
  srtc.init();
  sdd1.init();
  spc7110.init();
  cx4.init();
  obc1.init();
  st0018.init();
  msu1.init();
  serial.init();

  video.init();
  audio.init();
  input.init();

  input.port_set_device(0, config.controller_port1.i);
  input.port_set_device(1, config.controller_port2.i);
}

void System::term() {
}

void System::load() {
  audio.coprocessor_enable(false);

  bus.map_reset();
  bus.map_xml();

  cpu.enable();
  ppu.enable();

  if(expansion.i == ExpansionPortDevice::BSX) bsxsatellaview.load();
  if(cartridge.mode.i == Cartridge::Mode::Bsx) bsxcartridge.load();
  if(cartridge.mode.i == Cartridge::Mode::SufamiTurbo) sufamiturbo.load();
  if(cartridge.mode.i == Cartridge::Mode::SuperGameBoy) icd2.load();

  if(cartridge.has_bsx_slot()) bsxflash.load();
  if(cartridge.has_superfx()) superfx.load();
  if(cartridge.has_sa1()) sa1.load();
  if(cartridge.has_necdsp()) necdsp.load();
  if(cartridge.has_srtc()) srtc.load();
  if(cartridge.has_sdd1()) sdd1.load();
  if(cartridge.has_spc7110()) spc7110.load();
  if(cartridge.has_cx4()) cx4.load();
  if(cartridge.has_obc1()) obc1.load();
  if(cartridge.has_st0018()) st0018.load();
  if(cartridge.has_msu1()) msu1.load();
  if(cartridge.has_serial()) serial.load();

  serialize_init();
  cheat.init();
}

void System::unload() {
  if(expansion.i == ExpansionPortDevice::BSX) bsxsatellaview.unload();
  if(cartridge.mode.i == Cartridge::Mode::Bsx) bsxcartridge.unload();
  if(cartridge.mode.i == Cartridge::Mode::SufamiTurbo) sufamiturbo.unload();
  if(cartridge.mode.i == Cartridge::Mode::SuperGameBoy) icd2.unload();

  if(cartridge.has_bsx_slot()) bsxflash.unload();
  if(cartridge.has_superfx()) superfx.unload();
  if(cartridge.has_sa1()) sa1.unload();
  if(cartridge.has_necdsp()) necdsp.unload();
  if(cartridge.has_srtc()) srtc.unload();
  if(cartridge.has_sdd1()) sdd1.unload();
  if(cartridge.has_spc7110()) spc7110.unload();
  if(cartridge.has_cx4()) cx4.unload();
  if(cartridge.has_obc1()) obc1.unload();
  if(cartridge.has_st0018()) st0018.unload();
  if(cartridge.has_msu1()) msu1.unload();
  if(cartridge.has_serial()) serial.unload();
}

void System::power() {
  random.seed((unsigned)time(0));

  region = config.region;
  expansion = config.expansion_port;
  if(region.i == Region::Autodetect) {
    region.i = (cartridge.region.i == Cartridge::Region::NTSC ? Region::NTSC : Region::PAL);
  }

  cpu_frequency = region.i == Region::NTSC ? config.cpu.ntsc_frequency : config.cpu.pal_frequency;
  apu_frequency = region.i == Region::NTSC ? config.smp.ntsc_frequency : config.smp.pal_frequency;

  cpu.power();
  smp.power();
  dsp.power();
  ppu.power();

  if(expansion.i == ExpansionPortDevice::BSX) bsxsatellaview.power();
  if(cartridge.mode.i == Cartridge::Mode::Bsx) bsxcartridge.power();
  if(cartridge.mode.i == Cartridge::Mode::SuperGameBoy) icd2.power();

  if(cartridge.has_bsx_slot()) bsxflash.power();
  if(cartridge.has_superfx()) superfx.power();
  if(cartridge.has_sa1()) sa1.power();
  if(cartridge.has_necdsp()) necdsp.power();
  if(cartridge.has_srtc()) srtc.power();
  if(cartridge.has_sdd1()) sdd1.power();
  if(cartridge.has_spc7110()) spc7110.power();
  if(cartridge.has_cx4()) cx4.power();
  if(cartridge.has_obc1()) obc1.power();
  if(cartridge.has_st0018()) st0018.power();
  if(cartridge.has_msu1()) msu1.power();
  if(cartridge.has_serial()) serial.power();

  if(cartridge.mode.i == Cartridge::Mode::SuperGameBoy) cpu.coprocessors.append(&icd2);
  if(cartridge.has_superfx()) cpu.coprocessors.append(&superfx);
  if(cartridge.has_sa1()) cpu.coprocessors.append(&sa1);
  if(cartridge.has_necdsp()) cpu.coprocessors.append(&necdsp);
  if(cartridge.has_msu1()) cpu.coprocessors.append(&msu1);
  if(cartridge.has_serial()) cpu.coprocessors.append(&serial);

  scheduler.init();
  input.update();
}

void System::reset() {
  cpu.reset();
  smp.reset();
  dsp.reset();
  ppu.reset();

  if(expansion.i == ExpansionPortDevice::BSX) bsxsatellaview.reset();

  if(cartridge.mode.i == Cartridge::Mode::Bsx) bsxcartridge.reset();
  if(cartridge.mode.i == Cartridge::Mode::SuperGameBoy) icd2.reset();

  if(cartridge.has_bsx_slot()) bsxflash.reset();
  if(cartridge.has_superfx()) superfx.reset();
  if(cartridge.has_sa1()) sa1.reset();
  if(cartridge.has_necdsp()) necdsp.reset();
  if(cartridge.has_srtc()) srtc.reset();
  if(cartridge.has_sdd1()) sdd1.reset();
  if(cartridge.has_spc7110()) spc7110.reset();
  if(cartridge.has_cx4()) cx4.reset();
  if(cartridge.has_obc1()) obc1.reset();
  if(cartridge.has_st0018()) st0018.reset();
  if(cartridge.has_msu1()) msu1.reset();
  if(cartridge.has_serial()) serial.reset();

  if(cartridge.mode.i == Cartridge::Mode::SuperGameBoy) cpu.coprocessors.append(&icd2);
  if(cartridge.has_superfx()) cpu.coprocessors.append(&superfx);
  if(cartridge.has_sa1()) cpu.coprocessors.append(&sa1);
  if(cartridge.has_necdsp()) cpu.coprocessors.append(&necdsp);
  if(cartridge.has_msu1()) cpu.coprocessors.append(&msu1);
  if(cartridge.has_serial()) cpu.coprocessors.append(&serial);

  scheduler.init();

  input.port_set_device(0, config.controller_port1.i);
  input.port_set_device(1, config.controller_port2.i);
  input.update();
}

void System::scanline() {
  video.scanline();
  if(cpu.vcounter() == 241) scheduler.exit(Scheduler::ExitReason::FrameEvent);
}

void System::frame() {
}

System::System() : interface(0) {
  region.i = Region::Autodetect;
  expansion.i = ExpansionPortDevice::BSX;
}

}