#include <stdint.h>
#include <stdio.h>
#include "z80.h"
#include "z80dis.h"
#include "z80debug.h"
#include "zx_ula.h"
#include "zx_screen.h"
#include "zx_tape.h"
#include <SDL2/SDL.h>
#include <string.h>

uint8_t memory[65536];

int main(int argc, char *argv[])
{
    FILE* f = fopen("48.rom", "rb");
    fread(memory, 1024, 16, f);
    fclose(f);
    
    z80::reset(memory);
    z80::connect_port(0xfe, zx_ula::port_in, zx_ula::port_out);

    SDL_Init(SDL_INIT_EVERYTHING);
    z80debug::show();
    zxscreen::show();

    zx_ula::sound_init();

    zx_tape::load("abusimbel.tap");

    bool should_exit = false;
    SDL_Event e;

    while (!should_exit)
    {
        while (SDL_PollEvent(&e))
        {
            if (e.type == SDL_QUIT) { should_exit=true; break; }
            if (z80debug::debugging()) {
                if ((e.type==SDL_WINDOWEVENT) && ((e.window.event==SDL_WINDOWEVENT_SHOWN) || (e.window.event==SDL_WINDOWEVENT_EXPOSED))) {
                    z80debug::refresh();
                    zxscreen::refresh(0, true);
                }
                if (e.type == SDL_KEYDOWN) {
                    if (e.key.keysym.scancode==SDL_SCANCODE_ESCAPE) {
                        should_exit=true; break;
                    } else if (e.key.keysym.scancode==SDL_SCANCODE_F10) {
                        const uint8_t dt = z80::step();
                        z80debug::refresh();
                        zxscreen::refresh(dt, true);
                    } else if (e.key.keysym.scancode==SDL_SCANCODE_F11) {
                        const uint8_t dt = z80debug::next();
                        zxscreen::refresh(dt, true);
                    } else if (e.key.keysym.scancode==SDL_SCANCODE_F5) {
                        const uint8_t dt = z80::step();
                        z80debug::cont();
                        zxscreen::refresh(dt);
                    } else if (e.key.keysym.scancode==SDL_SCANCODE_RETURN) {
                        z80debug::executeConsole();
                    } else if (e.key.keysym.scancode==SDL_SCANCODE_BACKSPACE) {
                        z80debug::DeleteCharConsole();
                    }
                }
                if (e.type == SDL_TEXTINPUT) {
                    z80debug::sendToConsole(e.text.text);
                }
            } else {
                if (e.type == SDL_KEYDOWN) {
                    if (e.key.keysym.scancode==SDL_SCANCODE_F8) {
                        z80debug::stop();
                        zxscreen::refresh(0, true);
                    }
                    if (e.key.keysym.scancode==SDL_SCANCODE_F12) {
                        zx_tape::play();
                    }
                }
            }
        }
        if (!z80debug::debugging()) {
            if (z80debug::isbreak(z80::getPC(), 9)) {
                z80debug::stop();
                zxscreen::refresh(0, true);
            } else {
                uint8_t dt = z80::step();
                zx_tape::update(dt);
                zx_ula::sound_update(dt);
                zxscreen::refresh(dt);
            }
        }
    }

    return 0;
}