//
// Created by claunia on 5/10/21.
//

#include <climits>
#include <cstdint>
#include <cstring>

#include "../library.h"
#include "../fletcher32.h"
#include "gtest/gtest.h"

#define EXPECTED_FLETCHER32           0x211261f5
#define EXPECTED_FLETCHER32_15BYTES   0x34CD067C
#define EXPECTED_FLETCHER32_31BYTES   0xD8D20EA9
#define EXPECTED_FLETCHER32_63BYTES   0xD8432080
#define EXPECTED_FLETCHER32_2352BYTES 0xCB3E7352

static const uint8_t *buffer;
static const uint8_t *buffer_misaligned;

class fletcher32Fixture : public ::testing::Test
{
public:
    fletcher32Fixture()
    {
        // initialization;
        // can also be done in SetUp()
    }

protected:
    void SetUp()
    {
        char path[PATH_MAX];
        char filename[PATH_MAX];

        getcwd(path, PATH_MAX);
        snprintf(filename, PATH_MAX, "%s/data/random", path);

        FILE *file = fopen(filename, "rb");
        buffer     = (const uint8_t *)malloc(1048576);
        fread((void *)buffer, 1, 1048576, file);
        fclose(file);

        buffer_misaligned = (const uint8_t *)malloc(1048577);
        memcpy((void *)(buffer_misaligned + 1), buffer, 1048576);
    }

    void TearDown()
    {
        free((void *)buffer);
        free((void *)buffer_misaligned);
    }

    ~fletcher32Fixture()
    {
        // resources cleanup, no exceptions allowed
    }

    // shared user data
};

TEST_F(fletcher32Fixture, fletcher32_auto)
{
    fletcher32_ctx *ctx = fletcher32_init();
    uint32_t        fletcher;

    EXPECT_NE(ctx, nullptr);

    fletcher32_update(ctx, buffer, 1048576);
    fletcher32_final(ctx, &fletcher);

    EXPECT_EQ(fletcher, EXPECTED_FLETCHER32);
}

TEST_F(fletcher32Fixture, fletcher32_auto_misaligned)
{
    fletcher32_ctx *ctx = fletcher32_init();
    uint32_t        fletcher;

    EXPECT_NE(ctx, nullptr);

    fletcher32_update(ctx, buffer_misaligned + 1, 1048576);
    fletcher32_final(ctx, &fletcher);

    EXPECT_EQ(fletcher, EXPECTED_FLETCHER32);
}

TEST_F(fletcher32Fixture, fletcher32_auto_15bytes)
{
    fletcher32_ctx *ctx = fletcher32_init();
    uint32_t        fletcher;

    EXPECT_NE(ctx, nullptr);

    fletcher32_update(ctx, buffer, 15);
    fletcher32_final(ctx, &fletcher);

    EXPECT_EQ(fletcher, EXPECTED_FLETCHER32_15BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_auto_31bytes)
{
    fletcher32_ctx *ctx = fletcher32_init();
    uint32_t        fletcher;

    EXPECT_NE(ctx, nullptr);

    fletcher32_update(ctx, buffer, 31);
    fletcher32_final(ctx, &fletcher);

    EXPECT_EQ(fletcher, EXPECTED_FLETCHER32_31BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_auto_63bytes)
{
    fletcher32_ctx *ctx = fletcher32_init();
    uint32_t        fletcher;

    EXPECT_NE(ctx, nullptr);

    fletcher32_update(ctx, buffer, 63);
    fletcher32_final(ctx, &fletcher);

    EXPECT_EQ(fletcher, EXPECTED_FLETCHER32_63BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_auto_2352bytes)
{
    fletcher32_ctx *ctx = fletcher32_init();
    uint32_t        fletcher;

    EXPECT_NE(ctx, nullptr);

    fletcher32_update(ctx, buffer, 2352);
    fletcher32_final(ctx, &fletcher);

    EXPECT_EQ(fletcher, EXPECTED_FLETCHER32_2352BYTES);
}

#if defined(__aarch64__) || defined(_M_ARM64) || ((defined(__arm__) || defined(_M_ARM)) && !defined(_WIN32))
TEST_F(fletcher32Fixture, fletcher32_neon)
{
    if(!have_neon()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_neon(&sum1, &sum2, buffer, 1048576);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32);
}

TEST_F(fletcher32Fixture, fletcher32_neon_misaligned)
{
    if(!have_neon()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_neon(&sum1, &sum2, buffer_misaligned + 1, 1048576);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32);
}

TEST_F(fletcher32Fixture, fletcher32_neon_15bytes)
{
    if(!have_neon()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_neon(&sum1, &sum2, buffer, 15);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_15BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_neon_31bytes)
{
    if(!have_neon()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_neon(&sum1, &sum2, buffer, 31);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_31BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_neon_63bytes)
{
    if(!have_neon()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_neon(&sum1, &sum2, buffer, 63);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_63BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_neon_2352bytes)
{
    if(!have_neon()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_neon(&sum1, &sum2, buffer, 2352);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_2352BYTES);
}

#endif

#if defined(__x86_64__) || defined(__amd64) || defined(_M_AMD64) || defined(_M_X64) || defined(__I386__) || \
    defined(__i386__) || defined(__THW_INTEL) || defined(_M_IX86)

TEST_F(fletcher32Fixture, fletcher32_avx2)
{
    if(!have_avx2()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_avx2(&sum1, &sum2, buffer, 1048576);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32);
}

TEST_F(fletcher32Fixture, fletcher32_ssse3)
{
    if(!have_ssse3()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_ssse3(&sum1, &sum2, buffer, 1048576);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32);
}

TEST_F(fletcher32Fixture, fletcher32_avx2_misaligned)
{
    if(!have_avx2()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_avx2(&sum1, &sum2, buffer_misaligned + 1, 1048576);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32);
}

TEST_F(fletcher32Fixture, fletcher32_ssse3_misaligned)
{
    if(!have_ssse3()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_ssse3(&sum1, &sum2, buffer_misaligned + 1, 1048576);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32);
}

TEST_F(fletcher32Fixture, fletcher32_avx2_15bytes)
{
    if(!have_avx2()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_avx2(&sum1, &sum2, buffer, 15);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_15BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_ssse3_15bytes)
{
    if(!have_ssse3()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_ssse3(&sum1, &sum2, buffer, 15);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_15BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_avx2_31bytes)
{
    if(!have_avx2()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_avx2(&sum1, &sum2, buffer, 31);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_31BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_ssse3_31bytes)
{
    if(!have_ssse3()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_ssse3(&sum1, &sum2, buffer, 31);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_31BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_avx2_63bytes)
{
    if(!have_avx2()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_avx2(&sum1, &sum2, buffer, 63);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_63BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_ssse3_63bytes)
{
    if(!have_ssse3()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_ssse3(&sum1, &sum2, buffer, 63);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_63BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_avx2_2352bytes)
{
    if(!have_avx2()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_avx2(&sum1, &sum2, buffer, 2352);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_2352BYTES);
}

TEST_F(fletcher32Fixture, fletcher32_ssse3_2352bytes)
{
    if(!have_ssse3()) return;

    uint16_t sum1;
    uint16_t sum2;
    uint32_t fletcher32;

    sum1 = 0xFFFF;
    sum2 = 0xFFFF;

    fletcher32_ssse3(&sum1, &sum2, buffer, 2352);

    fletcher32 = (sum2 << 16) | sum1;

    EXPECT_EQ(fletcher32, EXPECTED_FLETCHER32_2352BYTES);
}

#endif