/**
 ******************************************************************************
 * Xenia : Xbox 360 Emulator Research Project                                 *
 ******************************************************************************
 * Copyright 2014 Ben Vanik. All rights reserved.                             *
 * Released under the BSD license - see LICENSE in the root for more details. *
 ******************************************************************************
 */

#include <tools/alloy-test/util.h>

using namespace alloy;
using namespace alloy::hir;
using namespace alloy::runtime;
using namespace alloy::test;
using alloy::frontend::ppc::PPCContext;

TEST_CASE("UNPACK_D3DCOLOR", "[instr]") {
  TestFunction test([](hir::HIRBuilder& b) {
    StoreVR(b, 3, b.Unpack(LoadVR(b, 4), PACK_TYPE_D3DCOLOR));
    b.Return();
  });
  test.Run([](PPCContext* ctx) {
             uint32_t value = 0;
             ctx->v[4] = vec128i(0, 0, 0, value);
           },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result == vec128f(1.0f, 1.0f, 1.0f, 1.0f));
           });
  test.Run([](PPCContext* ctx) {
             uint32_t value = 0x80506070;
             ctx->v[4] = vec128i(0, 0, 0, value);
           },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result ==
                     vec128i(0x3F800050, 0x3F800060, 0x3F800070, 0x3F800080));
           });
}

TEST_CASE("UNPACK_FLOAT16_2", "[instr]") {
  TestFunction test([](hir::HIRBuilder& b) {
    StoreVR(b, 3, b.Unpack(LoadVR(b, 4), PACK_TYPE_FLOAT16_2));
    b.Return();
  });
  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128i(0); },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result == vec128i(0, 0, 0, 0x3F800000));
           });
  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128i(0, 0, 0, 0x7FFFFFFF); },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result ==
                     vec128i(0x47FFE000, 0xC7FFE000, 0x00000000, 0x3F800000));
           });
  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128i(0, 0, 0, 0x55556666); },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result ==
                     vec128i(0x42AAA000, 0x44CCC000, 0x00000000, 0x3F800000));
           });
}

TEST_CASE("UNPACK_FLOAT16_4", "[instr]") {
  TestFunction test([](hir::HIRBuilder& b) {
    StoreVR(b, 3, b.Unpack(LoadVR(b, 4), PACK_TYPE_FLOAT16_4));
    b.Return();
  });
  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128i(0); },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result == vec128i(0));
           });
  test.Run([](PPCContext* ctx) {
             ctx->v[4] = vec128s(0, 0, 0, 0, 0x64D2, 0x6D8B, 0x4881, 0x4491);
           },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result ==
                     vec128i(0x449A4000, 0x45B16000, 0x41102000, 0x40922000));
           });
}

TEST_CASE("UNPACK_SHORT_2", "[instr]") {
  TestFunction test([](hir::HIRBuilder& b) {
    StoreVR(b, 3, b.Unpack(LoadVR(b, 4), PACK_TYPE_SHORT_2));
    b.Return();
  });
  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128i(0); },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result ==
                     vec128i(0x40400000, 0x40400000, 0x00000000, 0x3F800000));
           });
  test.Run([](PPCContext* ctx) {
             ctx->v[4] =
                 vec128i(0x7004FD60, 0x8201C990, 0x00000000, 0x7FFF8001);
           },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result ==
                     vec128i(0x40407FFF, 0x403F8001, 0x00000000, 0x3F800000));
           });
  test.Run([](PPCContext* ctx) {
             ctx->v[4] = vec128i(0, 0, 0, (0x1234u << 16) | 0x5678u);
           },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result ==
                     vec128i(0x40401234, 0x40405678, 0x00000000, 0x3F800000));
           });
}

// TEST_CASE("UNPACK_S8_IN_16_LO", "[instr]") {
//  TestFunction test([](hir::HIRBuilder& b) {
//    StoreVR(b, 3, b.Unpack(LoadVR(b, 4), PACK_TYPE_S8_IN_16_LO));
//    b.Return();
//  });
//  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128b(0); },
//           [](PPCContext* ctx) {
//             auto result = ctx->v[3];
//             REQUIRE(result == vec128b(0));
//           });
//}
//
// TEST_CASE("UNPACK_S8_IN_16_HI", "[instr]") {
//  TestFunction test([](hir::HIRBuilder& b) {
//    StoreVR(b, 3, b.Unpack(LoadVR(b, 4), PACK_TYPE_S8_IN_16_HI));
//    b.Return();
//  });
//  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128b(0); },
//           [](PPCContext* ctx) {
//             auto result = ctx->v[3];
//             REQUIRE(result == vec128b(0));
//           });
//}
//
// TEST_CASE("UNPACK_S16_IN_32_LO", "[instr]") {
//  TestFunction test([](hir::HIRBuilder& b) {
//    StoreVR(b, 3, b.Unpack(LoadVR(b, 4), PACK_TYPE_S16_IN_32_LO));
//    b.Return();
//  });
//  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128b(0); },
//           [](PPCContext* ctx) {
//             auto result = ctx->v[3];
//             REQUIRE(result == vec128b(0));
//           });
//}
//
// TEST_CASE("UNPACK_S16_IN_32_HI", "[instr]") {
//  TestFunction test([](hir::HIRBuilder& b) {
//    StoreVR(b, 3, b.Unpack(LoadVR(b, 4), PACK_TYPE_S16_IN_32_HI));
//    b.Return();
//  });
//  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128b(0); },
//           [](PPCContext* ctx) {
//             auto result = ctx->v[3];
//             REQUIRE(result == vec128b(0));
//           });
//}