/*
 * main.cpp -- test Rectangle (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.
 */

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

#include <malikania/js_rectangle.hpp>

class test_rectangle {
protected:
    UniqueContext m_ctx;

public:
    test_rectangle()
    {
        duk_push_object(m_ctx);
        duk_put_global_string(m_ctx, "Malikania");
        mlk::dukx_load_rect(m_ctx);
    }
};

BOOST_FIXTURE_TEST_SUITE(test_rectangle_suite, test_rectangle)

/*
 * Valid constructors
 * ------------------------------------------------------------------
 */

BOOST_AUTO_TEST_CASE(ConstructorNoArgs)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "r = Malikania.Rectangle();"
            "x = r.x;"
            "y = r.y;"
            "w = r.width;"
            "h = r.height;"
        );

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

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

BOOST_AUTO_TEST_CASE(Constructor4Args)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "r = Malikania.Rectangle(10, 20, 30, 40);"
            "x = r.x;"
            "y = r.y;"
            "w = r.width;"
            "h = r.height;"
        );

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

        duk_get_global_string(m_ctx, "x");
        BOOST_REQUIRE_EQUAL(10, duk_to_int(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "y");
        BOOST_REQUIRE_EQUAL(20, duk_to_int(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "w");
        BOOST_REQUIRE_EQUAL(30U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "h");
        BOOST_REQUIRE_EQUAL(40U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

BOOST_AUTO_TEST_CASE(ConstructorObject)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "r = Malikania.Rectangle({ x: 10, y: 20, width: 30, height: 40 });"
            "x = r.x;"
            "y = r.y;"
            "w = r.width;"
            "h = r.height;"
        );

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

        duk_get_global_string(m_ctx, "x");
        BOOST_REQUIRE_EQUAL(10, duk_to_int(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "y");
        BOOST_REQUIRE_EQUAL(20, duk_to_int(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "w");
        BOOST_REQUIRE_EQUAL(30U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "h");
        BOOST_REQUIRE_EQUAL(40U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

BOOST_AUTO_TEST_CASE(ConstructorNew)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "r = new Malikania.Rectangle({ x: 10, y: 20, width: 30, height: 40 });"
            "x = r.x;"
            "y = r.y;"
            "w = r.width;"
            "h = r.height;"
        );

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

        duk_get_global_string(m_ctx, "x");
        BOOST_REQUIRE_EQUAL(10, duk_to_int(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "y");
        BOOST_REQUIRE_EQUAL(20, duk_to_int(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "w");
        BOOST_REQUIRE_EQUAL(30U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "h");
        BOOST_REQUIRE_EQUAL(40U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

/*
 * Invalid constructors
 * ------------------------------------------------------------------
 */

BOOST_AUTO_TEST_CASE(InvalidConstructorArg1)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "try {"
            "  Malikania.Rectangle(null);"
            "} catch (e) {"
            "  name = e.name;"
            "  correct = (e instanceof TypeError);"
            "}"
        );

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

        duk_get_global_string(m_ctx, "name");
        BOOST_REQUIRE_EQUAL("TypeError", duk_to_string(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "correct");
        BOOST_REQUIRE(duk_to_boolean(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

BOOST_AUTO_TEST_CASE(InvalidConstructorRange1)
{
    try {
        auto ret = duk_peval_string(m_ctx,
            "try {"
            "  Malikania.Rectangle(0, 0, -10, -10);"
            "} catch (e) {"
            "  name = e.name;"
            "  correct = (e instanceof RangeError);"
            "}"
        );

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

        duk_get_global_string(m_ctx, "name");
        BOOST_REQUIRE_EQUAL("RangeError", duk_to_string(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "correct");
        BOOST_REQUIRE(duk_to_boolean(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

/*
 * Require.
 * ------------------------------------------------------------------
 */

BOOST_AUTO_TEST_CASE(requireSuccess)
{
    try {
        duk_push_c_function(m_ctx, [] (auto ctx) {
            auto rect = mlk::dukx_require_rect(ctx, 0);

            duk_push_int(ctx, rect.x());
            duk_put_global_string(ctx, "x");
            duk_push_int(ctx, rect.y());
            duk_put_global_string(ctx, "y");
            duk_push_uint(ctx, rect.width());
            duk_put_global_string(ctx, "w");
            duk_push_uint(ctx, rect.height());
            duk_put_global_string(ctx, "h");

            return 0;
        }, 1);
        duk_put_global_string(m_ctx, "build");

        auto ret = duk_peval_string(m_ctx, "build({ x: 50, y: 80, width: 100, height: 200 });");

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

        duk_get_global_string(m_ctx, "x");
        BOOST_REQUIRE_EQUAL(50, duk_to_int(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "y");
        BOOST_REQUIRE_EQUAL(80, duk_to_int(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "w");
        BOOST_REQUIRE_EQUAL(100U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "h");
        BOOST_REQUIRE_EQUAL(200U, duk_to_uint(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

BOOST_AUTO_TEST_CASE(requireFail)
{
    try {
        duk_push_c_function(m_ctx, [] (auto ctx) {
            mlk::dukx_require_rect(ctx, 0);

            return 0;
        }, 1);
        duk_put_global_string(m_ctx, "build");

        auto ret = duk_peval_string(m_ctx,
            "try {"
            "  build({});"
            "} catch (e) {"
            "  name = e.name;"
            "  correct = (e instanceof Error);"
            "}"
        );

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

        duk_get_global_string(m_ctx, "name");
        BOOST_REQUIRE_EQUAL("Error", duk_to_string(m_ctx, -1));
        duk_pop(m_ctx);
        duk_get_global_string(m_ctx, "correct");
        BOOST_REQUIRE(duk_to_boolean(m_ctx, -1));
        duk_pop(m_ctx);
    } catch (const std::exception &ex) {
        BOOST_FAIL(ex.what());
    }
}

/*
 * Get.
 * ------------------------------------------------------------------
 */

BOOST_AUTO_TEST_CASE(getAdjustAll)
{
    try {
        duk_push_c_function(m_ctx, [] (auto ctx) {
            auto rect = mlk::dukx_get_rect(ctx, 0);

            duk_push_int(ctx, rect.x());
            duk_put_global_string(ctx, "x");
            duk_push_int(ctx, rect.y());
            duk_put_global_string(ctx, "y");
            duk_push_uint(ctx, rect.width());
            duk_put_global_string(ctx, "w");
            duk_push_uint(ctx, rect.height());

            return 0;
        }, 1);
        duk_put_global_string(m_ctx, "build");

        auto ret = duk_peval_string(m_ctx, "build({});");

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

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

BOOST_AUTO_TEST_SUITE_END()