#include <windows.h>

#include <assert.h>
#include <stdlib.h>

#include "exvs2hook/exvs2-dll.h"

#include "util/dll-bind.h"
#include "util/dprintf.h"

const struct dll_bind_sym exvs2_dll_syms[] = {
    {
        .sym = "exvs2_io_jvs_init",
        .off = offsetof(struct exvs2_dll, jvs_init),
    }, {
        .sym = "exvs2_io_jvs_poll",
        .off = offsetof(struct exvs2_dll, jvs_poll),
    }, {
        .sym = "exvs2_io_jvs_read_coin_counter",
        .off = offsetof(struct exvs2_dll, jvs_read_coin_counter),
    }
};

struct exvs2_dll exvs2_dll;

HRESULT exvs2_dll_init(const struct exvs2_dll_config *cfg, HINSTANCE self)
{
    uint16_t (*get_api_version)(void);
    const struct dll_bind_sym *sym;
    HINSTANCE owned;
    HINSTANCE src;
    HRESULT hr;

    assert(cfg != NULL);
    assert(self != NULL);

    if (cfg->path[0] != L'\0') {
        owned = LoadLibraryW(cfg->path);

        if (owned == NULL) {
            hr = HRESULT_FROM_WIN32(GetLastError());
            dprintf("exvs2 IO: Failed to load IO DLL: %lx: %S\n",
                    hr,
                    cfg->path);

            goto end;
        }

        dprintf("exvs2 IO: Using custom IO DLL: %S\n", cfg->path);
        src = owned;
    } else {
        owned = NULL;
        src = self;
    }

    get_api_version = (void *) GetProcAddress(src, "exvs2_io_get_api_version");

    if (get_api_version != NULL) {
        exvs2_dll.api_version = get_api_version();
    } else {
        exvs2_dll.api_version = 0x0100;
        dprintf("Custom IO DLL does not expose exvs2_io_get_api_version, "
                "assuming API version 1.0.\n"
                "Please ask the developer to update their DLL.\n");
    }

    if (exvs2_dll.api_version >= 0x0200) {
        hr = E_NOTIMPL;
        dprintf("exvs2 IO: Custom IO DLL implements an unsupported "
                "API version (%#04x). Please update Segatools.\n",
                exvs2_dll.api_version);

        goto end;
    }

    sym = exvs2_dll_syms;
    hr = dll_bind(&exvs2_dll, src, &sym, _countof(exvs2_dll_syms));

    if (FAILED(hr)) {
        if (src != self) {
            dprintf("exvs2 IO: Custom IO DLL does not provide function "
                    "\"%s\". Please contact your IO DLL's developer for "
                    "further assistance.\n",
                    sym->sym);

            goto end;
        } else {
            dprintf("Internal error: could not reflect \"%s\"\n", sym->sym);
        }
    }

    owned = NULL;

end:
    if (owned != NULL) {
        FreeLibrary(owned);
    }

    return hr;
}