/**
 ******************************************************************************
 * 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("PACK_D3DCOLOR", "[instr]") {
  TestFunction test([](hir::HIRBuilder& b) {
    StoreVR(b, 3, b.Pack(LoadVR(b, 4), PACK_TYPE_D3DCOLOR));
    b.Return();
  });
  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128f(1.0f); },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result == vec128i(0));
           });
  test.Run([](PPCContext* ctx) {
             ctx->v[4] =
                 vec128i(0x3F800050, 0x3F800060, 0x3F800070, 0x3F800080);
           },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result == vec128i(0, 0, 0, 0x80506070));
           });
}

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

TEST_CASE("PACK_FLOAT16_4", "[instr]") {
  TestFunction test([](hir::HIRBuilder& b) {
    StoreVR(b, 3, b.Pack(LoadVR(b, 4), PACK_TYPE_FLOAT16_4));
    b.Return();
  });
  test.Run([](PPCContext* ctx) { ctx->v[4] = vec128i(0, 0, 0, 0); },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result == vec128i(0));
           });
  test.Run([](PPCContext* ctx) {
             ctx->v[4] =
                 vec128i(0x449A4000, 0x45B17000, 0x41103261, 0x40922B6B);
           },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result ==
                     vec128i(0x00000000, 0x00000000, 0x64D26D8C, 0x48824491));
           });
}

TEST_CASE("PACK_SHORT_2", "[instr]") {
  TestFunction test([](hir::HIRBuilder& b) {
    StoreVR(b, 3, b.Pack(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(0));
           });
  test.Run([](PPCContext* ctx) {
             ctx->v[4] = vec128i(0x43817E00, 0xC37CFC00, 0, 0);
           },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result == vec128i(0, 0, 0, 0x7FFF8001));
           });
  test.Run([](PPCContext* ctx) {
             ctx->v[4] = vec128i(0xC0D47D97, 0xC2256E9D, 0, 0);
           },
           [](PPCContext* ctx) {
             auto result = ctx->v[3];
             REQUIRE(result == vec128i(0, 0, 0, 0x80018001));
           });
}