/*
 * main.cpp -- test Sprite (JavaScript binding)
 *
 * Copyright (c) 2013-2016 Malikania Authors
 *
 * Permission to use, copy, modify, and/or 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 INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

#include <chrono>
#include <thread>

#define BOOST_TEST_MODULE "Javascript Sprite"
#include <boost/test/unit_test.hpp>

#include <malikania/js_client_resources_loader.hpp>
#include <malikania/js_image.hpp>
#include <malikania/js_sprite.hpp>
#include <malikania/js_window.hpp>
#include <malikania/resources_locator.hpp>

using namespace mlk;

using namespace std::chrono_literals;

class test_sprite {
protected:
    directory_resources_locator m_locator;
    client_resources_loader m_loader;
    dukx_context m_ctx;

public:
    test_sprite()
        : m_locator(SOURCE_DIRECTORY "/resources")
        , m_loader(m_locator)
    {
        duk_push_object(m_ctx);
        duk_put_global_string(m_ctx, "Malikania");
        mlk::dukx_load_image(m_ctx);
        mlk::dukx_load_sprite(m_ctx);
        mlk::dukx_load_window(m_ctx);
        dukx_put_client_loader(m_ctx, m_loader);
    }
};

BOOST_FIXTURE_TEST_SUITE(test_sprite_suite, test_sprite)

BOOST_AUTO_TEST_CASE(cell)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "s = new Malikania.Sprite('sprites/margins.json');"
            "w = s.cell.width;"
            "h = s.cell.height;"
        );

        if (ret != 0) {
            throw dukx_get_exception(m_ctx, -1);
        }

        duk_get_global_string(m_ctx, "w");
        BOOST_REQUIRE_EQUAL(32U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "h");
        BOOST_REQUIRE_EQUAL(32U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

BOOST_AUTO_TEST_CASE(columns)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "s = new Malikania.Sprite('sprites/margins.json');"
            "n = s.columns;"
        );

        if (ret != 0) {
            throw dukx_get_exception(m_ctx, -1);
        }

        duk_get_global_string(m_ctx, "n");
        BOOST_REQUIRE_EQUAL(4U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

BOOST_AUTO_TEST_CASE(margins)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "s = new Malikania.Sprite('sprites/margins.json');"
            "w = s.margins.width;"
            "h = s.margins.height;"
        );

        if (ret != 0) {
            throw dukx_get_exception(m_ctx, -1);
        }

        duk_get_global_string(m_ctx, "w");
        BOOST_REQUIRE_EQUAL(4U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "h");
        BOOST_REQUIRE_EQUAL(6U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

BOOST_AUTO_TEST_CASE(rows)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "s = new Malikania.Sprite('sprites/margins.json');"
            "n = s.rows;"
        );

        if (ret != 0) {
            throw dukx_get_exception(m_ctx, -1);
        }

        duk_get_global_string(m_ctx, "n");
        BOOST_REQUIRE_EQUAL(3U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

BOOST_AUTO_TEST_CASE(space)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "s = new Malikania.Sprite('sprites/margins.json');"
            "w = s.space.width;"
            "h = s.space.height;"
        );

        if (ret != 0) {
            throw dukx_get_exception(m_ctx, -1);
        }

        duk_get_global_string(m_ctx, "w");
        BOOST_REQUIRE_EQUAL(2U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "h");
        BOOST_REQUIRE_EQUAL(3U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

BOOST_AUTO_TEST_CASE(basic)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "w = new Malikania.Window();"
            "s = new Malikania.Sprite('sprites/margins.json');"
            "c = 0;"
        );

        if (ret != 0) {
            throw dukx_get_exception(m_ctx, -1);
        }

        for (unsigned c = 0; c < 12; ++c) {
            auto ret = duk_peval_string(m_ctx,
                "w.setDrawingColor('lightskyblue');"
                "w.clear();"
                "s.draw(w, c++, { x: 320 - 16, y: 240 - 16 });"
                "w.present();"
            );

            if (ret != 0) {
                throw dukx_get_exception(m_ctx, -1);
            }

            std::this_thread::sleep_for(1s);
        }
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

BOOST_AUTO_TEST_SUITE_END()