#include "./quaternion_is_unit.h"

#include "./../../helpers.h"

// ==================== FP32 ==================== //

static const int _TEST_FP32_UNIT_QUATERNION_AMOUNT = 16;
static const int _TEST_FP32_NONUNIT_QUATERNION_AMOUNT = 10;

static const BgcQuaternionFP32 _TEST_FP32_UNIT_QUATERNION_LIST[] = {
    { 1.0f, 0.0f, 0.0f, 0.0f },
    { -1.0f, 0.0f, 0.0f, 0.0f },
    { 0.0f, -0.8f, 0.6f, 0.0f },
    { 1.0f + 0.75f * BGC_EPSYLON_FP32, 0.0f, 0.0f, 0.0f },
    { 1.0f - 0.75f * BGC_EPSYLON_FP32, 0.0f, 0.0f, 0.0f },
    { 0.0f, 1.0f + 0.75f * BGC_EPSYLON_FP32, 0.0f, 0.0f },
    { 0.0f, 1.0f - 0.75f * BGC_EPSYLON_FP32, 0.0f, 0.0f },
    { 0.0f, 0.0f, 1.0f + 0.75f * BGC_EPSYLON_FP32, 0.0f },
    { 0.0f, 0.0f, 1.0f - 0.75f * BGC_EPSYLON_FP32, 0.0f },
    { 0.0f, 0.0f, 0.0f, 1.0f + 0.75f * BGC_EPSYLON_FP32 },
    { 0.0f, 0.0f, 0.0f, 1.0f - 0.75f * BGC_EPSYLON_FP32 },
    { 0.5f, 0.5f, 0.5f, 0.5f },
    { 0.5f + 0.75f * BGC_EPSYLON_FP32, 0.5f, 0.5f, 0.5f },
    { 0.5f, 0.5f - 0.75f * BGC_EPSYLON_FP32, 0.5f, 0.5f },
    { 0.5f, 0.5f, 0.5f + 0.75f * BGC_EPSYLON_FP32, 0.5f },
    { 0.5f, 0.5f, 0.5f, 0.5f - 0.75f * BGC_EPSYLON_FP32 }
};

static const BgcQuaternionFP32 _TEST_FP32_NONUNIT_QUATERION_LIST[] = {
    { 1.0f + 1.25f * BGC_EPSYLON_FP32, 0.0f, 0.0f, 0.0f },
    { 1.0f - 1.25f * BGC_EPSYLON_FP32, 0.0f, 0.0f, 0.0f },
    { 0.0f, 1.0f + 1.25f * BGC_EPSYLON_FP32, 0.0f, 0.0f },
    { 0.0f, 1.0f - 1.25f * BGC_EPSYLON_FP32, 0.0f, 0.0f },
    { 0.0f, 0.0f, 1.0f + 1.25f * BGC_EPSYLON_FP32, 0.0f },
    { 0.0f, 0.0f, 1.0f - 1.25f * BGC_EPSYLON_FP32, 0.0f },
    { 0.0f, 0.0f, 0.0f, 1.0f + 1.25f * BGC_EPSYLON_FP32 },
    { 0.0f, 0.0f, 0.0f, 1.0f - 1.25f * BGC_EPSYLON_FP32 },
    { 0.5f + 1.25f * BGC_EPSYLON_FP32, 0.5f + 1.25f * BGC_EPSYLON_FP32, 0.5f, 0.5f },
    { 0.5f - 1.25f * BGC_EPSYLON_FP32, 0.5f - 1.25f * BGC_EPSYLON_FP32, 0.0f, 0.5f }
};

int test_quaternion_is_unit_fp32()
{
    print_testing_name("bgc_quaternion_is_unit_fp32");

    // Testing zero values:
    for (int i = 0; i < _TEST_FP32_UNIT_QUATERNION_AMOUNT; i++) {
        if (!bgc_quaternion_is_unit_fp32(&_TEST_FP32_UNIT_QUATERNION_LIST[i])) {
            print_testing_failed();
            return TEST_FAILED;
        }
    }

    // Testing non-zero values:
    for (int i = 0; i < _TEST_FP32_NONUNIT_QUATERNION_AMOUNT; i++) {
        if (bgc_quaternion_is_unit_fp32(&_TEST_FP32_NONUNIT_QUATERION_LIST[i])) {
            print_testing_failed();
            return TEST_FAILED;
        }
    }

    print_testing_success();

    return TEST_SUCCESS;
}

// ==================== FP64 ==================== //

static const int _TEST_FP64_UNIT_QUATERNION_AMOUNT = 16;
static const int _TEST_FP64_NONUNIT_QUATERNION_AMOUNT = 10;

static const BgcQuaternionFP64 _TEST_FP64_UNIT_QUATERNION_LIST[] = {
    { 1.0, 0.0, 0.0, 0.0 },
    { -1.0, 0.0, 0.0, 0.0 },
    { 0.0, -0.6, 0.8, 0.0 },
    { 1.0 + 0.75 * BGC_EPSYLON_FP64, 0.0, 0.0, 0.0 },
    { 1.0 - 0.75 * BGC_EPSYLON_FP64, 0.0, 0.0, 0.0 },
    { 0.0, 1.0 + 0.75 * BGC_EPSYLON_FP64, 0.0, 0.0 },
    { 0.0, 1.0 - 0.75 * BGC_EPSYLON_FP64, 0.0, 0.0 },
    { 0.0, 0.0, 1.0 + 0.75 * BGC_EPSYLON_FP64, 0.0 },
    { 0.0, 0.0, 1.0 - 0.75 * BGC_EPSYLON_FP64, 0.0 },
    { 0.0, 0.0, 0.0, 1.0 + 0.75 * BGC_EPSYLON_FP64 },
    { 0.0, 0.0, 0.0, 1.0 - 0.75 * BGC_EPSYLON_FP64 },
    { 0.5, 0.5, 0.5, 0.5 },
    { 0.5 + 0.75 * BGC_EPSYLON_FP64, 0.5, 0.5, 0.5 },
    { 0.5, 0.5 - 0.75 * BGC_EPSYLON_FP64, 0.5, 0.5 },
    { 0.5, 0.5, 0.5 + 0.75 * BGC_EPSYLON_FP64, 0.5 },
    { 0.5, 0.5, 0.5, 0.5 - 0.75 * BGC_EPSYLON_FP64 }
};

static const BgcQuaternionFP64 _TEST_FP64_NONUNIT_QUATERION_LIST[] = {
    { 1.0 + 1.25 * BGC_EPSYLON_FP64, 0.0, 0.0, 0.0 },
    { 1.0 - 1.25 * BGC_EPSYLON_FP64, 0.0, 0.0, 0.0 },
    { 0.0, 1.0 + 1.25 * BGC_EPSYLON_FP64, 0.0, 0.0 },
    { 0.0, 1.0 - 1.25 * BGC_EPSYLON_FP64, 0.0, 0.0 },
    { 0.0, 0.0, 1.0 + 1.25 * BGC_EPSYLON_FP64, 0.0 },
    { 0.0, 0.0, 1.0 - 1.25 * BGC_EPSYLON_FP64, 0.0 },
    { 0.0, 0.0, 0.0, 1.0 + 1.25 * BGC_EPSYLON_FP64 },
    { 0.0, 0.0, 0.0, 1.0 - 1.25 * BGC_EPSYLON_FP64 },
    { 0.5 + 1.25 * BGC_EPSYLON_FP64, 0.5 + 1.25 * BGC_EPSYLON_FP64, 0.5, 0.5 },
    { 0.5 - 1.25 * BGC_EPSYLON_FP64, 0.5 - 1.25 * BGC_EPSYLON_FP64, 0.0, 0.5 }
};

int test_quaternion_is_unit_fp64()
{
    print_testing_name("bgc_quaternion_is_unit_fp64");

    // Testing zero values:
    for (int i = 0; i < _TEST_FP64_UNIT_QUATERNION_AMOUNT; i++) {
        if (!bgc_quaternion_is_unit_fp64(&_TEST_FP64_UNIT_QUATERNION_LIST[i])) {
            print_testing_failed();
            return TEST_FAILED;
        }
    }

    // Testing non-zero values:
    for (int i = 0; i < _TEST_FP64_NONUNIT_QUATERNION_AMOUNT; i++) {
        if (bgc_quaternion_is_unit_fp64(&_TEST_FP64_NONUNIT_QUATERION_LIST[i])) {
            print_testing_failed();
            return TEST_FAILED;
        }
    }

    print_testing_success();

    return TEST_SUCCESS;
}

int test_quaternion_is_unit()
{
    if (test_quaternion_is_unit_fp32() != TEST_SUCCESS) {
        return TEST_FAILED;
    }

    if (test_quaternion_is_unit_fp64() != TEST_SUCCESS) {
        return TEST_FAILED;
    }

    return TEST_SUCCESS;
}