/*!
 * 01_tuples.cpp
 *
 * Copyright (c) 2015-2024, NADAL Jean-Baptiste. All rights reserved.
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
 * MA 02110-1301 USA
 *
 * @Author:  NADAL Jean-Baptiste
 * @Date: 29/01/2024
 *
 */

/*---------------------------------------------------------------------------*/

#include <cmath>

#include <catch.hpp>

#include "tuple.h"

using namespace Raytracer;

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] a tuple with w=1.0 is a point", "[Tuple]")
{
    Tuple a(4.3, -4.2, 3.1, 1.0);

    REQUIRE(a.x() == 4.3);
    REQUIRE(a.y() == -4.2);
    REQUIRE(a.z() == 3.1);
    REQUIRE(a.w() == 1.0);

    REQUIRE(a.is_point() == true);
    REQUIRE(a.is_vector() == false);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] a tuple with w=0 is a vector", "[Tuple]")
{
    Tuple a(4.3, -4.2, 3.1, 0.0);

    REQUIRE(a.x() == 4.3);
    REQUIRE(a.y() == -4.2);
    REQUIRE(a.z() == 3.1);
    REQUIRE(a.w() == 0.0);

    REQUIRE(a.is_point() == false);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] access of data with []", "[Tuple]")
{
    Tuple a(4.3, -4.2, 3.1, 0.0);

    REQUIRE(a[0] == 4.3);
    REQUIRE(a[1] == -4.2);
    REQUIRE(a[2] == 3.1);
    REQUIRE(a[3] == 0.0);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] constructor with std::vector", "[Tuple]")
{
    std::vector<double> v = {4.3, -4.2, 3.1, 0.0};
    Tuple a(v);

    REQUIRE(a[0] == 4.3);
    REQUIRE(a[1] == -4.2);
    REQUIRE(a[2] == 3.1);
    REQUIRE(a[3] == 0.0);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] test copy constructor", "[Tuple]")
{
    Tuple a;
    Tuple b(4.3, -4.2, 3.1, 0.0);

    a = b;

    REQUIRE(a[0] == 4.3);
    REQUIRE(a[1] == -4.2);
    REQUIRE(a[2] == 3.1);
    REQUIRE(a[3] == 0.0);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Tuple could be copy", "[Tuple]")
{
    Tuple p = Tuple::Point(4, -4, 3);
    Tuple n;

    n = p;

    REQUIRE(n == p);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Point() creates tuples with w=1", "[Tuple][Point]")
{
    Tuple p = Tuple::Point(4, -4, 3);

    REQUIRE(p == Tuple(4, -4, 3, 1));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Vector() creates tuples with w=0", "[Tuple][Vector]")
{
    Tuple v = Tuple::Vector(4, -4, 3);

    REQUIRE(v == Tuple(4, -4, 3, 0));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Adding two tuples", "[Tuple][Operations]")
{
    Tuple a1(3, -2, 5, 1);
    Tuple a2(-2, 3, 1, 0);

    REQUIRE((a1 + a2) == Tuple(1, 1, 6, 1));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Adding two tuples without modify a1", "[Tuple][Operations]")
{
    Tuple a1(3, -2, 5, 1);
    Tuple a2(-2, 3, 1, 0);

    Tuple a3 = a1 + a2;

    REQUIRE((a1 + a2) == Tuple(1, 1, 6, 1));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Subtracting two points", "[Tuple][Operations]")
{
    Tuple p1 = Tuple::Point(3, 2, 1);
    Tuple p2 = Tuple::Point(5, 6, 7);

    REQUIRE((p1 - p2) == Tuple::Vector(-2, -4, -6));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Subtracting two points without modify p1", "[Tuple][Operations]")
{
    Tuple p1 = Tuple::Point(3, 2, 1);
    Tuple p2 = Tuple::Point(5, 6, 7);

    Tuple p3 = p1 - p2;

    REQUIRE((p1 - p2) == Tuple::Vector(-2, -4, -6));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Subtracting a vector from a point", "[Tuple][Operations]")
{
    Tuple p = Tuple::Point(3, 2, 1);
    Tuple v = Tuple::Vector(5, 6, 7);

    REQUIRE((p - v) == Tuple::Point(-2, -4, -6));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Subtracting two vectors", "[Tuple][Operations]")
{
    Tuple v1 = Tuple::Vector(3, 2, 1);
    Tuple v2 = Tuple::Vector(5, 6, 7);

    REQUIRE((v1 - v2) == Tuple::Vector(-2, -4, -6));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Subtracting a vector from the zero vector", "[Tuple][Operations]")
{
    Tuple zero = Tuple::Vector(0, 0, 0);
    Tuple v = Tuple::Vector(1, -2, 3);

    REQUIRE((zero - v) == Tuple::Vector(-1, 2, -3));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Negative a tuple", "[Tuple][Operations]")
{
    Tuple a(1, -2, 3, -4);

    REQUIRE(-a == Tuple(-1, 2, -3, 4));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Multiplying a tuple by a scalar", "[Tuple][Multiplication]")
{
    Tuple a(1, -2, 3, -4);

    REQUIRE(a * 3.5 == Tuple(3.5, -7, 10.5, -14));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Multiplying a tuple by a scalar without modify a", "[Tuple][Multiplication]")
{
    Tuple a(1, -2, 3, -4);

    Tuple b = a * 3.5;

    REQUIRE(a * 3.5 == Tuple(3.5, -7, 10.5, -14));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Dividing a tuple by a scalar", "[Tuple][Multiplication]")
{
    Tuple a(1, -2, 3, -4);

    REQUIRE(a / 2 == Tuple(0.5, -1, 1.5, -2));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Dividing a tuple by a scalar without modify a", "[Tuple][Multiplication]")
{
    Tuple a(1, -2, 3, -4);

    Tuple b = a / 2;

    REQUIRE(a / 2 == Tuple(0.5, -1, 1.5, -2));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Computing the magnitude of vector(1,0,0)", "[Tuple][Magnitude]")
{
    Tuple v = Tuple::Vector(1, 0, 0);

    REQUIRE(v.magnitude() == 1);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Computing the magnitude of vector(0,1,0)", "[Tuple][Magnitude]")
{
    Tuple v = Tuple::Vector(0, 1, 0);

    REQUIRE(v.magnitude() == 1);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Computing the magnitude of vector(0,0,1)", "[Tuple][Magnitude]")
{
    Tuple v = Tuple::Vector(0, 0, 1);

    REQUIRE(v.magnitude() == 1);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Computing the magnitude of vector(1,2,3)", "[Tuple][Magnitude]")
{
    Tuple v = Tuple::Vector(1, 2, 3);

    REQUIRE(v.magnitude() == sqrt(14));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Computing the magnitude of vector(-1,-2,-3)", "[Tuple][Magnitude]")
{
    Tuple v = Tuple::Vector(-1, -2, -3);

    REQUIRE(v.magnitude() == sqrt(14));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Normalize vector(4,0,0) gives (1,0,0)", "[Tuple][Normalize]")
{
    Tuple v = Tuple::Vector(4, 0, 0);

    REQUIRE(v.normalize() == Tuple::Vector(1, 0, 0));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] Normalize vector(1,2,3)", "[Tuple][Normalize]")
{
    Tuple v = Tuple::Vector(1, 2, 3);

    REQUIRE(v.normalize() == Tuple::Vector(1 / sqrtf(14), 2 / sqrtf(14), 3 / sqrtf(14)));
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] The magnitude of a normalized vector", "[Tuple][Normalize]")
{
    Tuple norm;
    Tuple v = Tuple::Vector(1, 2, 3);

    norm = v.normalize();

    REQUIRE(norm.magnitude() == 1);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] The dot product of two tuples", "[Tuple][Dot]")
{
    Tuple a = Tuple::Vector(1, 2, 3);
    Tuple b = Tuple::Vector(2, 3, 4);

    REQUIRE(a.dot(b) == 20);
}

/* ------------------------------------------------------------------------- */

TEST_CASE("[01][Tuple] The cross product of two vector", "[Tuple][Cross]")
{
    Tuple a = Tuple::Vector(1, 2, 3);
    Tuple b = Tuple::Vector(2, 3, 4);

    REQUIRE(a.cross(b) == Tuple::Vector(-1, 2, -1));
    REQUIRE(b.cross(a) == Tuple::Vector(1, -2, 1));
}