/*
   Copyright (c) 2021 Bad Diode

   Permission to use, copy, modify, and distribute this software for any
   purpose with or without fee is hereby granted, provided that the above
   copyright notice and this permission notice appear in all copies.

   THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
   WITH REGARD TO THIS SOFTWARE.
*/

#include <string.h>
#include <time.h>

#include "common.h"
#include "filesystem.c"

#include "uxn-core.c"

#include "rom.c"
#include "ppu.c"
#include "apu.c"
#include "file.c"
#include "text.h"

#include "config.c"
#include "profiling.c"
#include "input.c"
#include "devices.c"
#include "debug.c"

void
init_uxn() {
    // Initialize uxn.
    u32 fill = 0;
    dma_fill(uxn_ram, fill, sizeof(uxn_ram), 3);
    uxn_rom = _binary_build_uxn_rom_start;
    uxn_rom_size = (size_t)_binary_build_uxn_rom_size;
    size_t size = MIN(0x10000 - PAGE_PROGRAM, uxn_rom_size);
    memcpy(uxn_ram + PAGE_PROGRAM, uxn_rom, size);

    // Initialize stack and device memory.
    for (size_t i = 0; i < 256; i++) {
        wst[i] = 0;
        rst[i] = 0;
        device_data[i] = 0;
    }

    // Setup deo/dei maps.
    for (size_t i = 0; i < 16; i++) {
        deo_map[i] = (uintptr_t) deo_stub;
        dei_map[i] = (uintptr_t) dei_stub;
    }
    deo_map[0x0] = (uintptr_t) deo_system;
    dei_map[0x0] = (uintptr_t) dei_system;
    deo_map[0x1] = (uintptr_t) deo_console;
    deo_map[0x2] = (uintptr_t) deo_screen;
    dei_map[0x2] = (uintptr_t) dei_screen;
    deo_map[0x3] = (uintptr_t) deo_audio;
    dei_map[0x3] = (uintptr_t) dei_audio;
    deo_map[0x4] = (uintptr_t) deo_audio;
    dei_map[0x4] = (uintptr_t) dei_audio;
    deo_map[0x5] = (uintptr_t) deo_audio;
    dei_map[0x5] = (uintptr_t) dei_audio;
    deo_map[0x6] = (uintptr_t) deo_audio;
    dei_map[0x6] = (uintptr_t) dei_audio;
    deo_map[0xa] = (uintptr_t) deo_file;
    dei_map[0xa] = (uintptr_t) dei_file;
    deo_map[0xb] = (uintptr_t) deo_file;
    dei_map[0xb] = (uintptr_t) dei_file;
    dei_map[0xc] = (uintptr_t) dei_datetime;
    dei_map[0x9] = (uintptr_t) dei_mouse;
}

int
main(void) {
    // Adjust system wait times.
    SYSTEM_WAIT = SYSTEM_WAIT_CARTRIDGE;

    // Initialize filesystem.
    fs_init();

    // Register interrupts.
    irq_init();
    irs_set(IRQ_VBLANK, sound_vsync);

    // Initialize PPU.
    video_init();

    // Initialize text engine.
#if !defined(TEXT_DISABLE) ||  TEXT_DISABLE == 0 || PROF_ENABLE > 0
    txt_init(1, TEXT_LAYER);
    txt_position(0,0);
#endif

    // Initialize UXN.
    init_uxn();

    // Enable sound.
#if !defined(SOUND_DISABLE) ||  SOUND_DISABLE == 0
    init_sound();
#endif

    // Main loop.
    u8 frame_counter = 0;
    PROF(uxn_eval_asm(PAGE_PROGRAM), eval_cycles);
    while(true) {
        bios_vblank_wait();
        FRAME_START();
        PROF(handle_input(), input_cycles);
        PROF(uxn_eval_asm(PEEK2(&device_data[0x20])), eval_cycles);
#if !defined(SOUND_DISABLE) ||  SOUND_DISABLE == 0
        PROF(sound_mix(), mix_cycles);
#endif
        PROF_SHOW();
        PROF(flipbuf(), flip_cycles);
        frame_counter++;
        if (frame_counter == 60) {
            seconds++;
            frame_counter = 0;
        }
        FRAME_END();
    }

    return 0;
}