birkeh
/
o3de
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
development
monroegm-disable-blank-issue-2
main
2111.2
2111.1
2107.1
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from '60adc098da'
${ noResults }
o3de/Code/Framework/AzCore/Tests/ScriptMath.cpp

1866 lines
108 KiB
C++
Raw Blame History

/*
* Copyright (c) Contributors to the Open 3D Engine Project.
* For complete copyright and license terms please see the LICENSE at the root of this distribution.
*
* SPDX-License-Identifier: Apache-2.0 OR MIT
*
*/
#include <AzCore/Script/ScriptContext.h>
#include <AzCore/Script/lua/lua.h>
#include <AzCore/RTTI/BehaviorContext.h>
#include <AzCore/Math/MathReflection.h>
#include <AzCore/UnitTest/TestTypes.h>
#include <AzCore/Math/Obb.h>
#include <AzCore/Math/Aabb.h>
#include <Math/MathTest.h>
using namespace AZ;
namespace UnitTest
{
// Implemented in script.cpp
void AZTestAssert(bool check);
void AZTestAssertFloatClose(float v1, float v2)
{
AZ_TEST_ASSERT_FLOAT_CLOSE(v1, v2);
}
static void Crc32PropertySet(Crc32 crc)
{
(void)crc;
AZ_TracePrintf("Aha", "%d\n", static_cast<u32>(crc));
}
static Crc32 Crc32PropertyGet()
{
return Crc32("Test");
}
class ScriptMathTest
: public AllocatorsFixture
{
public:
void SetUp() override
{
AllocatorsFixture::SetUp();
behavior = aznew BehaviorContext();
behavior->Method("AZTestAssert", &AZTestAssert);
behavior->Method("AZTestAssertFloatClose", &AZTestAssertFloatClose);
MathReflect(behavior);
behavior->Property("globalCrc32Prop", &Crc32PropertyGet, &Crc32PropertySet);
script = aznew ScriptContext();
script->BindTo(behavior);
}
void TearDown() override
{
delete script;
delete behavior;
AllocatorsFixture::TearDown();
}
BehaviorContext* behavior = nullptr;
ScriptContext* script = nullptr;
};
TEST_F(ScriptMathTest, LuaVector2Test)
{
////Constructors
script->Execute("vA = Vector2(0)");
script->Execute("AZTestAssert((vA.x == 0) and (vA.y == 0))");
script->Execute("vB = Vector2(5)");
script->Execute("AZTestAssert((vB.x == 5) and (vB.y == 5))");
script->Execute("vC = Vector2(1, 2)");
script->Execute("AZTestAssert((vC.x == 1) and (vC.y == 2))");
////Create functions
script->Execute("AZTestAssert(Vector2.CreateOne() == Vector2(1, 1))");
script->Execute("AZTestAssert(Vector2.CreateZero() == Vector2(0, 0))");
script->Execute("AZTestAssert(Vector2.CreateAxisX() == Vector2(1, 0))");
script->Execute("AZTestAssert(Vector2.CreateAxisY() == Vector2(0, 1))");
script->Execute("AZTestAssert(Vector2.CreateFromAngle() == Vector2(0, 1))");
script->Execute("fromAngle4 = Vector2.CreateFromAngle(4.0)");
script->Execute("AZTestAssert(fromAngle4:IsClose(Vector2(-0.7568024953, -0.6536436208), 0.01))");
//// Create - Comparison functions
script->Execute("vA:Set(-100, 10)");
script->Execute("vB:Set(35, 10)");
script->Execute("vC:Set(35, 20)");
script->Execute("vD = Vector2(15, 30)");
//// Compare equal
//// operation r.x = (cmp1.x == cmp2.x) ? vA:x : vB:x per component
script->Execute("compareEqualAB = Vector2.CreateSelectCmpEqual(vA, vB, Vector2(1), Vector2(0))");
script->Execute("AZTestAssert(compareEqualAB:IsClose(Vector2(0, 1)))");
script->Execute("compareEqualBC = Vector2.CreateSelectCmpEqual(vB, vC, Vector2(1), Vector2(0))");
script->Execute("AZTestAssert(compareEqualBC:IsClose(Vector2(1, 0)))");
//// Compare greater equal
//// operation ( r.x = (cmp1.x >= cmp2.x) ? vA:x : vB:x ) per component
script->Execute("compareGreaterEqualAB = Vector2.CreateSelectCmpGreaterEqual(vA, vB, Vector2(1), Vector2(0))");
script->Execute("AZTestAssert(compareGreaterEqualAB:IsClose(Vector2(0, 1)))");
script->Execute("compareGreaterEqualBD = Vector2.CreateSelectCmpGreaterEqual(vB, vD, Vector2(1), Vector2(0))");
script->Execute("AZTestAssert(compareGreaterEqualBD:IsClose(Vector2(1, 0)))");
//// Compare greater
/////operation ( r.x = (cmp1.x > cmp2.x) ? vA:x : vB:x ) per component
script->Execute("compareGreaterAB = Vector2.CreateSelectCmpGreater(vA, vB, Vector2(1), Vector2(0))");
script->Execute("AZTestAssert(compareGreaterAB:IsClose(Vector2(0, 0)))");
script->Execute("compareGreaterCA = Vector2.CreateSelectCmpGreater(vC, vA, Vector2(1), Vector2(0))");
script->Execute("AZTestAssert(compareGreaterCA:IsClose(Vector2(1, 1)))");
////Get/Set
script->Execute("vA:Set(2, 3)");
script->Execute("AZTestAssert(vA == Vector2(2, 3))");
script->Execute("AZTestAssert(vA.x == 2 and vA.y == 3)");
script->Execute("vA.x = 10");
script->Execute("AZTestAssert(vA == Vector2(10, 3))");
script->Execute("vA.y = 11");
script->Execute("AZTestAssert(vA == Vector2(10, 11))");
script->Execute("vA:Set(15)");
script->Execute("AZTestAssert(vA == Vector2(15))");
script->Execute("vA:SetElement(0, 20)");
script->Execute("AZTestAssert(vA.x == 20 and vA.y == 15)");
script->Execute("AZTestAssert(vA:GetElement(0) == 20 and vA:GetElement(1) == 15)");
script->Execute("vA:SetElement(1, 21)");
script->Execute("AZTestAssert(vA.x == 20 and vA.y == 21)");
script->Execute("AZTestAssert(vA:GetElement(0) == 20 and vA:GetElement(1) == 21)");
////Length
script->Execute("AZTestAssertFloatClose(Vector2(3, 4):GetLengthSq(), 25)");
script->Execute("AZTestAssertFloatClose(Vector2(4, -3):GetLength(), 5)");
////Normalize
script->Execute("AZTestAssert(Vector2(3, 4):GetNormalized():IsClose(Vector2(3 / 5, 4 / 5)))");
script->Execute("vA:Set(4, 3)");
script->Execute("vA:Normalize()");
script->Execute("AZTestAssert(vA:IsClose(Vector2(4 / 5, 3 / 5)))");
script->Execute("vA:Set(4, 3)");
script->Execute("length = vA:NormalizeWithLength()");
script->Execute("AZTestAssertFloatClose(length, 5)");
script->Execute("AZTestAssert(vA:IsClose(Vector2(4 / 5, 3 / 5)))");
script->Execute("vA:Set(4, 3)");
script->Execute("vA:NormalizeSafe()");
script->Execute("AZTestAssert(vA:IsClose(Vector2(4 / 5, 3 / 5)))");
script->Execute("vA:Set(0)");
script->Execute("vA:NormalizeSafe()");
script->Execute("AZTestAssert(vA:IsClose(Vector2(0, 0)))");
script->Execute("vA:Set(4, 3)");
script->Execute("length = vA:NormalizeSafeWithLength()");
script->Execute("AZTestAssertFloatClose(length, 5)");
script->Execute("AZTestAssert(vA:IsClose(Vector2(4 / 5, 3 / 5)))");
script->Execute("vA:Set(0)");
script->Execute("length = vA:NormalizeSafeWithLength()");
script->Execute("AZTestAssertFloatClose(length, 0)");
script->Execute("AZTestAssert(vA:IsClose(Vector2(0, 0)))");
script->Execute("AZTestAssert(Vector2(1, 0):IsNormalized())");
script->Execute("AZTestAssert(Vector2(0.7071, 0.7071):IsNormalized())");
script->Execute("AZTestAssert( not Vector2(1, 1):IsNormalized())");
////Set Length
script->Execute("vA:Set(3, 4)");
script->Execute("vA:SetLength(10)");
script->Execute("AZTestAssert(vA:IsClose(Vector2(6, 8)))");
////Distance
script->Execute("vA:Set(1, 2)");
script->Execute("AZTestAssertFloatClose(vA:GetDistanceSq(Vector2(-2, 6)), 25)");
script->Execute("AZTestAssertFloatClose(vA:GetDistance(Vector2(5, -1)), 5)");
////Lerp/slerp
script->Execute("AZTestAssert(Vector2(3, 4):Lerp(Vector2(10, 2), 0.5) == Vector2(6.5, 3))");
script->Execute("slerped = Vector2(1, 0):Slerp(Vector2(0, 1), 0.5)");
script->Execute("AZTestAssert(slerped:IsClose(Vector2(0.7071, 0.7071)))");
////GetPerpendicular
script->Execute("AZTestAssert(Vector2(1, 2):GetPerpendicular() == Vector2(-2, 1))");
////Close
script->Execute("AZTestAssert(Vector2(1, 2):IsClose(Vector2(1, 2)))");
script->Execute("AZTestAssert( not Vector2(1, 2):IsClose(Vector2(1, 3)))");
////Verify the closeness tolerance works
script->Execute("AZTestAssert(Vector2(1, 2):IsClose(Vector2(1, 2.4), 0.5))");
////IsZero
script->Execute("AZTestAssert(Vector2(0):IsZero())");
script->Execute("AZTestAssert( not Vector2(1):IsZero())");
////Verify the IsZero tolerance works
script->Execute("AZTestAssert(Vector2(0.05):IsZero(0.1))");
////Operator== and Operator!=
script->Execute("vA:Set(1, 2)");
script->Execute("AZTestAssert(vA == Vector2(1, 2))");
script->Execute("AZTestAssert( not (vA == Vector2(5, 6)))");
script->Execute("AZTestAssert(vA ~= Vector2(7, 8))");
script->Execute("AZTestAssert( not (vA ~= Vector2(1, 2)))");
////Comparisons - returns true only if all the components pass
////IsLessThan
script->Execute("AZTestAssert(Vector2(1, 2):IsLessThan(Vector2(2, 3)))");
script->Execute("AZTestAssert( not Vector2(1, 2):IsLessThan(Vector2(0, 3)))");
script->Execute("AZTestAssert( not Vector2(1, 2):IsLessThan(Vector2(2, 2)))");
////IsLessEqualThan
script->Execute("AZTestAssert(Vector2(1, 2):IsLessEqualThan(Vector2(2, 3)))");
script->Execute("AZTestAssert( not Vector2(1, 2):IsLessEqualThan(Vector2(0, 3)))");
script->Execute("AZTestAssert(Vector2(1, 2):IsLessEqualThan(Vector2(2, 2)))");
////isGreaterThan
script->Execute("AZTestAssert(Vector2(1, 2):IsGreaterThan(Vector2(0, 1)))");
script->Execute("AZTestAssert( not Vector2(1, 2):IsGreaterThan(Vector2(0, 3)))");
script->Execute("AZTestAssert( not Vector2(1, 2):IsGreaterThan(Vector2(0, 2)))");
////isGreaterEqualThan
script->Execute("AZTestAssert(Vector2(1, 2):IsGreaterEqualThan(Vector2(0, 1)))");
script->Execute("AZTestAssert( not Vector2(1, 2):IsGreaterEqualThan(Vector2(0, 3)))");
script->Execute("AZTestAssert(Vector2(1, 2):IsGreaterEqualThan(Vector2(0, 2)))");
////min,max,clamp
script->Execute("AZTestAssert(Vector2(2, 3):GetMin(Vector2(1, 4)) == Vector2(1, 3))");
script->Execute("AZTestAssert(Vector2(2, 3):GetMax(Vector2(1, 4)) == Vector2(2, 4))");
script->Execute("AZTestAssert(Vector2(1, 2):GetClamp(Vector2(5, -10), Vector2(10, -5)) == Vector2(5, -5))");
script->Execute("AZTestAssert(Vector2(1, 2):GetClamp(Vector2(0, 0), Vector2(10, 10)) == Vector2(1, 2))");
////Select
script->Execute("vA:Set(1)");
script->Execute("vB:Set(2)");
script->Execute("AZTestAssert(vA:GetSelect(Vector2(0, 1), vB) == Vector2(1, 2))");
script->Execute("vA:Select(Vector2(1, 0), vB)");
script->Execute("AZTestAssert(vA == Vector2(2, 1))");
////Abs
script->Execute("AZTestAssert(Vector2(-1, 2):GetAbs() == Vector2(1, 2))");
script->Execute("AZTestAssert(Vector2(3, -4):GetAbs() == Vector2(3, 4))");
////Operators
script->Execute("AZTestAssert((-Vector2(1, -2)) == Vector2(-1, 2))");
script->Execute("AZTestAssert((Vector2(1, 2) + Vector2(2, -1)) == Vector2(3, 1))");
script->Execute("AZTestAssert((Vector2(1, 2) - Vector2(2, -1)) == Vector2(-1, 3))");
script->Execute("AZTestAssert((Vector2(3, 2) * Vector2(2, -4)) == Vector2(6, -8))");
script->Execute("AZTestAssert((Vector2(3, 2) * 2) == Vector2(6, 4))");
script->Execute("AZTestAssert((Vector2(30, 20) / Vector2(10, -4)) == Vector2(3, -5))");
script->Execute("AZTestAssert((Vector2(30, 20) / 10) == Vector2(3, 2))");
////Dot product
script->Execute("AZTestAssertFloatClose(Vector2(1, 2):Dot(Vector2(-1, 5)), 9)");
////Madd : Multiply and add
script->Execute("AZTestAssert(Vector2(1, 2):GetMadd(Vector2(2, 6), Vector2(3, 4)) == Vector2(5, 16))");
script->Execute("vA:Set(1, 2)");
script->Execute("vA:Madd(Vector2(2, 6), Vector2(3, 4))");
script->Execute("AZTestAssert(vA == Vector2(5, 16))");
////Project
script->Execute("vA:Set(0.5)");
script->Execute("vA:Project(Vector2(0, 2))");
script->Execute("AZTestAssert(vA == Vector2(0, 0.5))");
script->Execute("vA:Set(0.5)");
script->Execute("vA:ProjectOnNormal(Vector2(0, 1))");
script->Execute("AZTestAssert(vA == Vector2(0, 0.5))");
script->Execute("vA:Set(2, 4)");
script->Execute("AZTestAssert(vA:GetProjected(Vector2(1, 1)) == Vector2(3, 3))");
script->Execute("AZTestAssert(vA:GetProjectedOnNormal(Vector2(1, 0)) == Vector2(2, 0))");
////IsFinite
script->Execute("AZTestAssert(Vector2(1, 1):IsFinite())");
script->Execute("AZTestAssert( not Vector2(math.huge, math.huge):IsFinite())");
}
TEST_F(ScriptMathTest, LuaVector3Test)
{
// Not all Vector3 C++ functions are reflected into Lua:
// Compound assignment operators are not supported in Lua (+=, -=, /=, *=)
// Estimate functions are not specified, the performance benefits of estimates
// are are dominated by marshalling between Lua and C++.
// Constructors
script->Execute("v1 = Vector3(0) AZTestAssert(v1.x == 0 and v1.y == 0 and v1.x == 0)");
script->Execute("v2 = Vector3(5) AZTestAssert(v2.x == 5 and v2.y == 5 and v2.x == 5)");
script->Execute("v3 = Vector3(1,2,3) AZTestAssert(v3.x == 1 and v3.y == 2 and v3.z == 3)");
// Create functions
script->Execute("AZTestAssert(Vector3.CreateOne() == Vector3(1, 1, 1))");
script->Execute("AZTestAssert(Vector3.CreateZero() == Vector3(0, 0, 0))");
script->Execute("AZTestAssert(Vector3.CreateAxisX() == Vector3(1, 0, 0))");
script->Execute("AZTestAssert(Vector3.CreateAxisY() == Vector3(0, 1, 0))");
script->Execute("AZTestAssert(Vector3.CreateAxisZ() == Vector3(0, 0, 1))");
// Set
script->Execute("v1:Set(0) AZTestAssert(v1.x == 0 and v1.y == 0 and v1.z == 0)");
script->Execute("v1:Set(2,3,4) AZTestAssert(v1.x == 2 and v1.y == 3 and v1.z == 4)");
script->Execute("v1.x = 11 AZTestAssert(v1.x == 11)");
script->Execute("v1.y = 12 AZTestAssert(v1.y == 12)");
script->Execute("v1.z = 13 AZTestAssert(v1.z == 13)");
// index element
script->Execute("v1:Set(1,2,3) AZTestAssert(v1:GetElement(0) == 1 and v1:GetElement(1) == 2 and v1:GetElement(2) == 3)");
script->Execute("v1:SetElement(0,5) v1:SetElement(1,6) v1:SetElement(2,7) AZTestAssert(v1.x == 5 and v1.y == 6 and v1.z == 7)");
//length
script->Execute("AZTestAssertFloatClose(Vector3(3,4,0):GetLengthSq(),25)");
script->Execute("AZTestAssertFloatClose(Vector3(3.0, 4.0, 0.0):GetLengthSq(), 25.0)");
script->Execute("AZTestAssertFloatClose(Vector3(0.0, 4.0, -3.0):GetLength(), 5.0)");
script->Execute("AZTestAssertFloatClose(Vector3(0.0, 4.0, -3.0):GetLengthReciprocal(), 0.2)");
//normalize
script->Execute("AZTestAssert(Vector3(3, 0, 4):GetNormalized():IsClose(Vector3(3 / 5, 0, 4 / 5)))");
script->Execute("AZTestAssert(Vector3(3, 0, 4):GetNormalizedSafe():IsClose(Vector3(3 / 5, 0, 4 / 5)))");
script->Execute("AZTestAssert(Vector3(0):GetNormalizedSafe() == Vector3(0, 0, 0))");
script->Execute("v1:Set(4, 3, 0)");
script->Execute("v1:Normalize()");
script->Execute("AZTestAssert(v1:IsClose(Vector3(4 / 5, 3 / 5, 0)))");
script->Execute("v1:Set(4, 3, 0)");
script->Execute("length = v1:NormalizeWithLength()");
script->Execute("AZTestAssertFloatClose(length, 5)");
script->Execute("AZTestAssert(v1:IsClose(Vector3(4 / 5, 3 / 5, 0)))");
script->Execute("v1:Set(0, 3, 4)");
script->Execute("v1:NormalizeSafe()");
script->Execute("AZTestAssert(v1:IsClose(Vector3(0, 3 / 5, 4 / 5)))");
script->Execute("v1 = Vector3(0)");
script->Execute("v1:NormalizeSafe()");
script->Execute("AZTestAssert(v1 == Vector3(0, 0, 0))");
script->Execute("v1:Set(0, 3, 4)");
script->Execute("length = v1:NormalizeSafeWithLength()");
script->Execute("AZTestAssertFloatClose(length, 5)");
script->Execute("AZTestAssert(v1:IsClose(Vector3(0, 3 / 5, 4 / 5)))");
script->Execute("v1 = Vector3(0)");
script->Execute("length = v1:NormalizeSafeWithLength()");
script->Execute("AZTestAssert(length == 0)");
script->Execute("AZTestAssert(v1 == Vector3(0, 0, 0))");
script->Execute("v1:Set(0, 3, 4)");
script->Execute("AZTestAssert(Vector3(1, 0, 0):IsNormalized())");
script->Execute("AZTestAssert(Vector3(0.7071, 0.7071, 0):IsNormalized())");
script->Execute("AZTestAssert(not Vector3(1, 1, 0):IsNormalized())");
////setlength
script->Execute("v1:Set(3, 4, 0)");
script->Execute("v1:SetLength(10)");
script->Execute("AZTestAssert(v1:IsClose(Vector3(6, 8, 0)))");
script->Execute("v1:Set(3, 4, 0)");
script->Execute("v1:SetLengthEstimate(10)");
script->Execute("AZTestAssert(v1:IsClose(Vector3(6, 8, 0), 0.001))");
////distance
script->Execute("v1:Set(1, 2, 3)");
script->Execute("AZTestAssertFloatClose(v1:GetDistanceSq(Vector3(-2, 6, 3)), 25)");
script->Execute("AZTestAssertFloatClose(v1:GetDistance(Vector3(-2, 2, -1)), 5)");
////lerp/slerp
script->Execute("AZTestAssert(Vector3(3, 4, 5):Lerp(Vector3(10, 2, 1), 0.5) == Vector3(6.5, 3, 3))");
script->Execute("AZTestAssert(Vector3(1, 0, 0):Slerp(Vector3(0, 1, 0), 0.5):IsClose(Vector3(0.7071, 0.7071, 0)))");
////dot product
script->Execute("AZTestAssertFloatClose(Vector3(1, 2, 3):Dot(Vector3(-1, 5, 3)), 18)");
////cross products
script->Execute("AZTestAssert(Vector3(1, 2, 3):Cross(Vector3(3, 1, -1)) == Vector3(-5, 10, -5))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):CrossXAxis() == Vector3(0, 3, -2))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):CrossYAxis() == Vector3(-3, 0, 1))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):CrossZAxis() == Vector3(2, -1, 0))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):XAxisCross() == Vector3(0, -3, 2))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):YAxisCross() == Vector3(3, 0, -1))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):ZAxisCross() == Vector3(-2, 1, 0))");
////close
script->Execute("AZTestAssert(Vector3(1, 2, 3):IsClose(Vector3(1, 2, 3)))");
script->Execute("AZTestAssert( not Vector3(1, 2, 3):IsClose(Vector3(1, 2, 4)))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):IsClose(Vector3(1, 2, 3.4), 0.5))");
////operator==
script->Execute("v3:Set(1, 2, 3)");
script->Execute("AZTestAssert(v3 == Vector3(1, 2, 3))");
script->Execute("AZTestAssert( not (v3 == Vector3(1, 2, 4)))");
script->Execute("AZTestAssert(v3 ~= Vector3(1, 2, 5))");
script->Execute("AZTestAssert( not (v3 ~= Vector3(1, 2, 3)))");
////comparisons
script->Execute("AZTestAssert(Vector3(1, 2, 3):IsLessThan(Vector3(2, 3, 4)))");
script->Execute("AZTestAssert( not Vector3(1, 2, 3):IsLessThan(Vector3(0, 3, 4)))");
script->Execute("AZTestAssert( not Vector3(1, 2, 3):IsLessThan(Vector3(2, 2, 4)))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):IsLessEqualThan(Vector3(2, 3, 4)))");
script->Execute("AZTestAssert( not Vector3(1, 2, 3):IsLessEqualThan(Vector3(0, 3, 4)))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):IsLessEqualThan(Vector3(2, 2, 4)))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):IsGreaterThan(Vector3(0, 1, 2)))");
script->Execute("AZTestAssert( not Vector3(1, 2, 3):IsGreaterThan(Vector3(0, 3, 2)))");
script->Execute("AZTestAssert( not Vector3(1, 2, 3):IsGreaterThan(Vector3(0, 2, 2)))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):IsGreaterEqualThan(Vector3(0, 1, 2)))");
script->Execute("AZTestAssert( not Vector3(1, 2, 3):IsGreaterEqualThan(Vector3(0, 3, 2)))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):IsGreaterEqualThan(Vector3(0, 2, 2)))");
////min,max,clamp
script->Execute("AZTestAssert(Vector3(2, 5, 6):GetMin(Vector3(1, 6, 5)) == Vector3(1, 5, 5))");
script->Execute("AZTestAssert(Vector3(2, 5, 6):GetMax(Vector3(1, 6, 5)) == Vector3(2, 6, 6))");
script->Execute("AZTestAssert(Vector3(1, 2, 3):GetClamp(Vector3(0, -1, 4), Vector3(2, 1, 10)) == Vector3(1, 1, 4))");
////trig
script->Execute("AZTestAssert(Vector3(Math.DegToRad(78), Math.DegToRad(-150), Math.DegToRad(190)):GetAngleMod():IsClose(Vector3(Math.DegToRad(78), Math.DegToRad(-150), Math.DegToRad(-170))))");
script->Execute("AZTestAssert(Vector3(Math.DegToRad(390), Math.DegToRad(-190), Math.DegToRad(-400)):GetAngleMod():IsClose(Vector3(Math.DegToRad(30), Math.DegToRad(170), Math.DegToRad(-40))))");
script->Execute("AZTestAssert(Vector3(Math.DegToRad(60), Math.DegToRad(105), Math.DegToRad(-174)):GetSin():IsClose(Vector3(0.866, 0.966, -0.105), 0.005))");
script->Execute("AZTestAssert(Vector3(Math.DegToRad(60), Math.DegToRad(105), Math.DegToRad(-174)):GetCos():IsClose(Vector3(0.5, -0.259, -0.995), 0.005))");
script->Execute("v1:Set(Math.DegToRad(60), Math.DegToRad(105), Math.DegToRad(-174))");
script->Execute("sin, cos = v1:GetSinCos()");
script->Execute("AZTestAssert(sin:IsClose(Vector3(0.866, 0.966, -0.105), 0.005))");
script->Execute("AZTestAssert(cos:IsClose(Vector3(0.5, -0.259, -0.995), 0.005))");
////abs
script->Execute("AZTestAssert(Vector3(-1, 2, -5):GetAbs() == Vector3(1, 2, 5))");
////reciprocal
script->Execute("AZTestAssert(Vector3(2, 4, 5):GetReciprocal():IsClose(Vector3(0.5, 0.25, 0.2)))");
////operators
script->Execute("AZTestAssert((-Vector3(1, 2, -3)) == Vector3(-1, -2, 3))");
script->Execute("AZTestAssert((Vector3(1, 2, 3) + Vector3(-1, 4, 5)) == Vector3(0, 6, 8))");
script->Execute("AZTestAssert((Vector3(1, 2, 3) - Vector3(-1, 4, 5)) == Vector3(2, -2, -2))");
script->Execute("AZTestAssert((Vector3(1, 2, 3)*Vector3(-1, 4, 5)) == Vector3(-1, 8, 15))");
script->Execute("AZTestAssert((Vector3(1, 2, 3) / Vector3(-1, 4, 5)):IsClose(Vector3(-1, 0.5, 3 / 5)))");
script->Execute("AZTestAssert((Vector3(1, 2, 3)*2) == Vector3(2, 4, 6))");
//TODO: float * Vector3 is not functional yet.
//script->Execute("AZTestAssert((2*Vector3(1, 2, 3)) == Vector3(2, 4, 6))");
script->Execute("AZTestAssert((Vector3(1, 2, 3) / 2):IsClose(Vector3(0.5, 1, 1.5)))");
////build tangent basis
script->Execute("v1 = Vector3(1, 1, 2):GetNormalized()");
script->Execute("v2, v3 = v1:BuildTangentBasis()");
script->Execute("AZTestAssert(v2:IsNormalized())");
script->Execute("AZTestAssert(v3:IsNormalized())");
script->Execute("AZTestAssert(math.abs(v2:Dot(v1)) < 0.001)");
script->Execute("AZTestAssert(math.abs(v3:Dot(v1)) < 0.001)");
script->Execute("AZTestAssert(math.abs(v2:Dot(v3)) < 0.001)");
////madd
script->Execute("AZTestAssert(Vector3(1, 2, 3):GetMadd(Vector3(2, 1, 4), Vector3(1, 2, 4)) == Vector3(3, 4, 16))");
script->Execute("v1:Set(1, 2, 3)");
script->Execute("v1:Madd(Vector3(2, 1, 4), Vector3(1, 2, 4))");
script->Execute("AZTestAssert(v1 == Vector3(3, 4, 16))");
////isPerpendicular
script->Execute("AZTestAssert(Vector3(1, 2, 0):IsPerpendicular(Vector3(0, 0, 1)))");
script->Execute("AZTestAssert( not Vector3(1, 2, 0):IsPerpendicular(Vector3(0, 1, 1)))");
}
TEST_F(ScriptMathTest, LuaVector4Test)
{
//script->Execute("constructors
script->Execute("v1 = Vector4(0)");
script->Execute("AZTestAssert((v1.x == 0) and (v1.y == 0) and (v1.z == 0) and (v1.w == 0))");
script->Execute("v2 = Vector4(5)");
script->Execute("AZTestAssert((v2.x == 5) and (v2.y == 5) and (v2.z == 5) and (v2.w == 5))");
script->Execute("v3 = Vector4(1, 2, 3, 4)");
script->Execute("AZTestAssert((v3.x == 1) and (v3.y == 2) and (v3.z == 3) and (v3.w == 4))");
script->Execute("v5 = Vector4.CreateFromVector3(Vector3(2, 3, 4))");
script->Execute("AZTestAssert((v5.x == 2) and (v5.y == 3) and (v5.z == 4) and (v5.w == 1))");
script->Execute("v6 = Vector4.CreateFromVector3AndFloat(Vector3(2, 3, 4), 5)");
script->Execute("AZTestAssert((v6.x == 2) and (v6.y == 3) and (v6.z == 4) and (v6.w == 5))");
////Create functions
script->Execute("AZTestAssert(Vector4.CreateOne() == Vector4(1, 1, 1, 1))");
script->Execute("AZTestAssert(Vector4.CreateZero() == Vector4(0))");
script->Execute("AZTestAssert(Vector4.CreateAxisX() == Vector4(1, 0, 0, 0))");
script->Execute("AZTestAssert(Vector4.CreateAxisY() == Vector4(0, 1, 0, 0))");
script->Execute("AZTestAssert(Vector4.CreateAxisZ() == Vector4(0, 0, 1, 0))");
script->Execute("AZTestAssert(Vector4.CreateAxisW() == Vector4(0, 0, 0, 1))");
////Get/Set
script->Execute("v1:Set(2, 3, 4, 5)");
script->Execute("AZTestAssert(v1 == Vector4(2, 3, 4, 5))");
script->Execute("v1.x = 10");
script->Execute("AZTestAssert(v1 == Vector4(10, 3, 4, 5))");
script->Execute("v1.y = 11");
script->Execute("AZTestAssert(v1 == Vector4(10, 11, 4, 5))");
script->Execute("v1.z = 12");
script->Execute("AZTestAssert(v1 == Vector4(10, 11, 12, 5))");
script->Execute("v1.w = 13");
script->Execute("AZTestAssert(v1 == Vector4(10, 11, 12, 13))");
script->Execute("v1:Set(1)");
script->Execute("AZTestAssert((v1.x == 1) and (v1.y == 1) and (v1.z == 1) and (v1.w == 1))");
script->Execute("v1:Set(Vector3(2, 3, 4))");
script->Execute("AZTestAssert((v1.x == 2) and (v1.y == 3) and (v1.z == 4) and (v1.w == 1))");
script->Execute("v1:Set(Vector3(2, 3, 4), 5)");
script->Execute("AZTestAssert((v1.x == 2) and (v1.y == 3) and (v1.z == 4) and (v1.w == 5))");
////index operators
script->Execute("v1:Set(1, 2, 3, 4)");
script->Execute("AZTestAssert(v1:GetElement(0) == 1)");
script->Execute("AZTestAssert(v1:GetElement(1) == 2)");
script->Execute("AZTestAssert(v1:GetElement(2) == 3)");
script->Execute("AZTestAssert(v1:GetElement(3) == 4)");
script->Execute("v1:SetElement(0, 5)");
script->Execute("v1:SetElement(1, 6)");
script->Execute("v1:SetElement(2, 7)");
script->Execute("v1:SetElement(3, 8)");
script->Execute("AZTestAssert(v1:GetElement(0) == 5)");
script->Execute("AZTestAssert(v1:GetElement(1) == 6)");
script->Execute("AZTestAssert(v1:GetElement(2) == 7)");
script->Execute("AZTestAssert(v1:GetElement(3) == 8)");
////operator==
script->Execute("v3:Set(1, 2, 3, 4)");
script->Execute("AZTestAssert(v3 == Vector4(1, 2, 3, 4.0))");
script->Execute("AZTestAssert( not (v3 == Vector4(1, 2, 3, 5)))");
script->Execute("AZTestAssert(v3 ~= Vector4(1, 2, 3, 5))");
script->Execute("AZTestAssert( not (v3 ~= Vector4(1, 2, 3, 4)))");
////comparisons
script->Execute("AZTestAssert(Vector4(1, 2, 3, 4):IsLessThan(Vector4(2, 3, 4, 5)))");
script->Execute("AZTestAssert( not Vector4(1, 2, 3, 4):IsLessThan(Vector4(0, 3, 4, 5)))");
script->Execute("AZTestAssert( not Vector4(1, 2, 3, 4):IsLessThan(Vector4(1, 2, 4, 5)))");
script->Execute("AZTestAssert(Vector4(1, 2, 3, 4):IsLessEqualThan(Vector4(2, 3, 4, 5)))");
script->Execute("AZTestAssert( not Vector4(1, 2, 3, 4):IsLessEqualThan(Vector4(0, 3, 4, 5)))");
script->Execute("AZTestAssert(Vector4(1, 2, 3, 4):IsLessEqualThan(Vector4(2, 2, 4, 5)))");
script->Execute("AZTestAssert(Vector4(1, 2, 3, 4):IsGreaterThan(Vector4(0, 1, 2, 3)))");
script->Execute("AZTestAssert( not Vector4(1, 2, 3, 4):IsGreaterThan(Vector4(0, 3, 2, 3)))");
script->Execute("AZTestAssert( not Vector4(1, 2, 3, 4):IsGreaterThan(Vector4(0, 2, 2, 3)))");
script->Execute("AZTestAssert(Vector4(1, 2, 3, 4):IsGreaterEqualThan(Vector4(0, 1, 2, 3)))");
script->Execute("AZTestAssert( not Vector4(1, 2, 3, 4):IsGreaterEqualThan(Vector4(0, 3, 2, 3)))");
script->Execute("AZTestAssert(Vector4(1, 2, 3, 4):IsGreaterEqualThan(Vector4(0, 2, 2, 3)))");
////dot product
script->Execute("AZTestAssertFloatClose(Vector4(1, 2, 3, 4):Dot(Vector4(-1, 5, 3, 2)), 26)");
script->Execute("AZTestAssertFloatClose(Vector4(1, 2, 3, 4):Dot3(Vector3(-1, 5, 3)), 18)");
////close
script->Execute("AZTestAssert(Vector4(1, 2, 3, 4):IsClose(Vector4(1, 2, 3, 4)))");
script->Execute("AZTestAssert( not Vector4(1, 2, 3, 4):IsClose(Vector4(1, 2, 3, 5)))");
script->Execute("AZTestAssert(Vector4(1, 2, 3, 4):IsClose(Vector4(1, 2, 3, 4.4), 0.5))");
////homogenize
script->Execute("v1:Set(1, 2, 3, 4)");
script->Execute("AZTestAssert(v1:GetHomogenized():IsClose(Vector3(0.25, 0.5, 0.75)))");
script->Execute("v1:Homogenize()");
script->Execute("AZTestAssert(v1:IsClose(Vector4(0.25, 0.5, 0.75, 1)))");
////abs
script->Execute("AZTestAssert(Vector4(-1, 2, -5, 1):GetAbs() == Vector4(1, 2, 5, 1))");
script->Execute("AZTestAssert(Vector4(1, -2, 5, -1):GetAbs() == Vector4(1, 2, 5, 1))");
////reciprocal
script->Execute("AZTestAssert(Vector4(2, 4, 5, 10):GetReciprocal():IsClose(Vector4(0.5, 0.25, 0.2, 0.1)))");
//// operators
script->Execute("AZTestAssert((-Vector4(1, 2, -3, -1)) == Vector4(-1, -2, 3, 1))");
script->Execute("AZTestAssert((Vector4(1, 2, 3, 4) + Vector4(-1, 4, 5, 2)) == Vector4(0, 6, 8, 6))");
script->Execute("AZTestAssert((Vector4(1, 2, 3, 4) - Vector4(-1, 4, 5, 2)) == Vector4(2, -2, -2, 2))");
script->Execute("AZTestAssert((Vector4(1, 2, 3, 4)*Vector4(-1, 4, 5, 2)) == Vector4(-1, 8, 15, 8))");
script->Execute("AZTestAssert((Vector4(1, 2, 3, 4) / Vector4(-1, 4, 5, 2)):IsClose(Vector4(-1, 0.5, 3 / 5, 2)))");
script->Execute("AZTestAssert((Vector4(1, 2, 3, 4)*2) == Vector4(2, 4, 6, 8))");
//TODO float * Vector4 is not functional yet
//script->Execute("AZTestAssert((2*Vector4(1, 2, 3, 4)) == Vector4(2, 4, 6, 8))");
script->Execute("AZTestAssert((Vector4(1, 2, 3, 4) / 2):IsClose(Vector4(0.5, 1, 1.5, 2)))");
script->Execute("v1:Set(1, 2, 3, 4)");
}
TEST_F(ScriptMathTest, LuaQuaternionTest)
{
//constructors
script->Execute("q1 = Quaternion(0, 0, 0, 1)");
script->Execute("AZTestAssert((q1.x == 0) and (q1.y == 0) and (q1.z == 0) and (q1.w == 1))");
script->Execute("q2 = Quaternion(5)");
script->Execute("AZTestAssert((q2.x == 5) and (q2.y == 5) and (q2.z == 5) and (q2.w == 5))");
script->Execute("q3 = Quaternion(1, 2, 3, 4)");
script->Execute("AZTestAssert((q3.x == 1) and (q3.y == 2) and (q3.z == 3) and (q3.w == 4))");
script->Execute("q4 = Quaternion.CreateFromVector3AndValue(Vector3(1, 2, 3), 4)");
script->Execute("AZTestAssert((q4.x == 1) and (q4.y == 2) and (q4.z == 3) and (q4.w == 4))");
script->Execute("q7 = Quaternion.CreateFromMatrix3x3(Matrix3x3.CreateRotationX(Math.DegToRad(120)))");
script->Execute("AZTestAssert(q7:IsClose(Quaternion(0.866, 0, 0, 0.5)))");
script->Execute("q8 = Quaternion.CreateFromMatrix4x4(Matrix4x4.CreateRotationX(Math.DegToRad(-60)))");
script->Execute("AZTestAssert(q8:IsClose(Quaternion(-0.5, 0, 0, 0.866)))");
script->Execute("q9 = Quaternion.CreateFromVector3(Vector3(1, 2, 3))");
script->Execute("AZTestAssert((q9.x == 1) and (q9.y == 2) and (q9.z == 3) and (q9.w == 0))");
script->Execute("q10 = Quaternion.CreateFromAxisAngle(Vector3.CreateAxisZ(), Math.DegToRad(45))");
script->Execute("AZTestAssert(q10:IsClose(Quaternion.CreateRotationZ(Math.DegToRad(45))))");
//Create functions
script->Execute("AZTestAssert(Quaternion.CreateIdentity() == Quaternion(0, 0, 0, 1))");
script->Execute("AZTestAssert(Quaternion.CreateZero() == Quaternion(0))");
script->Execute("AZTestAssert(Quaternion.CreateRotationX(Math.DegToRad(60)):IsClose(Quaternion(0.5, 0, 0, 0.866)))");
script->Execute("AZTestAssert(Quaternion.CreateRotationY(Math.DegToRad(60)):IsClose(Quaternion(0, 0.5, 0, 0.866)))");
script->Execute("AZTestAssert(Quaternion.CreateRotationZ(Math.DegToRad(60)):IsClose(Quaternion(0, 0, 0.5, 0.866)))");
//test shortest arc
script->Execute("v1 = Vector3(1, 2, 3):GetNormalized()");
script->Execute("v2 = Vector3(-2, 7, -1):GetNormalized()");
script->Execute("q3 = Quaternion.CreateShortestArc(v1, v2)"); //q3 should transform v1 into v2
script->Execute("AZTestAssert(v2:IsClose(q3*v1, 0.001))");
script->Execute("q4 = Quaternion.CreateShortestArc(Vector3(1, 0, 0), Vector3(0, 1, 0))");
script->Execute("AZTestAssert((q4*Vector3(0, 0, 1)):IsClose(Vector3(0, 0, 1), 0.001))"); //perpendicular vector should be unaffected
script->Execute("AZTestAssert((q4*Vector3(0, -1, 0)):IsClose(Vector3(1, 0, 0), 0.001))"); //make sure we rotate the right direction, i.e. actually shortest arc
//Get/Set
script->Execute("q1.x = 10");
script->Execute("AZTestAssert(q1.x == 10)");
script->Execute("q1.y = 11");
script->Execute("AZTestAssert(q1.y == 11)");
script->Execute("q1.z = 12");
script->Execute("AZTestAssert(q1.z == 12)");
script->Execute("q1.w = 13");
script->Execute("AZTestAssert(q1.w == 13)");
script->Execute("q1:Set(15)");
script->Execute("AZTestAssert(q1 == Quaternion(15))");
script->Execute("q1:Set(2, 3, 4, 5)");
script->Execute("AZTestAssert(q1 == Quaternion(2, 3, 4, 5))");
script->Execute("q1:Set(Vector3(5, 6, 7), 8)");
script->Execute("AZTestAssert(q1 == Quaternion(5, 6, 7, 8))");
//GetElement/SetElement
script->Execute("q1:SetElement(0, 1)");
script->Execute("q1:SetElement(1, 2)");
script->Execute("q1:SetElement(2, 3)");
script->Execute("q1:SetElement(3, 4)");
script->Execute("AZTestAssert(q1:GetElement(0) == 1)");
script->Execute("AZTestAssert(q1:GetElement(1) == 2)");
script->Execute("AZTestAssert(q1:GetElement(2) == 3)");
script->Execute("AZTestAssert(q1:GetElement(3) == 4)");
//IsIdentity
script->Execute("q1:Set(0, 0, 0, 1)");
script->Execute("AZTestAssert(q1:IsIdentity())");
//conjugate
script->Execute("q1:Set(1, 2, 3, 4)");
script->Execute("AZTestAssert(q1:GetConjugate() == Quaternion(-1, -2, -3, 4))");
//inverse
script->Execute("q1 = Quaternion.CreateRotationX(Math.DegToRad(25)) * Quaternion.CreateRotationY(Math.DegToRad(70))");
script->Execute("AZTestAssert((q1*q1:GetInverseFast()):IsClose(Quaternion.CreateIdentity()))");
script->Execute("q2 = q1:Clone()");
script->Execute("q2:InvertFast()");
script->Execute("AZTestAssert(q1.x == -q2.x)");
script->Execute("AZTestAssert(q1.y == -q2.y)");
script->Execute("AZTestAssert(q1.z == -q2.z)");
script->Execute("AZTestAssert(q1.w == q2.w)");
script->Execute("AZTestAssert((q1*q2):IsClose(Quaternion.CreateIdentity()))");
script->Execute("q1:Set(1, 2, 3, 4)");
script->Execute("AZTestAssert((q1*q1:GetInverseFull()):IsClose(Quaternion.CreateIdentity()))");
//dot product
script->Execute("AZTestAssertFloatClose(Quaternion(1, 2, 3, 4):Dot(Quaternion(-1, 5, 3, 2)), 26)");
//length
script->Execute("AZTestAssertFloatClose(Quaternion(-1, 2, 1, 3):GetLengthSq(), 15)");
script->Execute("AZTestAssertFloatClose(Quaternion(-4, 2, 0, 4):GetLength(), 6)");
//normalize
// TODO This asserted for some reason
script->Execute("AZTestAssert(Quaternion(0, -4, 2, 4):GetNormalized():IsClose(Quaternion(0, -0.6666, 0.3333, 0.6666)))");
script->Execute("q1:Set(2, 0, 4, -4)");
script->Execute("q1:Normalize()");
script->Execute("AZTestAssert(q1:IsClose(Quaternion(0.3333, 0, 0.6666, -0.6666)))");
script->Execute("q1:Set(2, 0, 4, -4)");
script->Execute("length = q1:NormalizeWithLength()");
script->Execute("AZTestAssertFloatClose(length, 6)");
script->Execute("AZTestAssert(q1:IsClose(Quaternion(0.3333, 0, 0.6666, -0.6666)))");
//interpolation
script->Execute("AZTestAssert(Quaternion(1, 2, 3, 4):Lerp(Quaternion(2, 3, 4, 5), 0.5):IsClose(Quaternion(1.5, 2.5, 3.5, 4.5)))");
script->Execute("AZTestAssert(Quaternion.CreateRotationX(Math.DegToRad(10)):Slerp(Quaternion.CreateRotationY(Math.DegToRad(60)), 0.5):IsClose(Quaternion(0.045, 0.259, 0, 0.965), 0.001))");
script->Execute("AZTestAssert(Quaternion.CreateRotationX(Math.DegToRad(10)):Squad(Quaternion.CreateRotationY(Math.DegToRad(60)), Quaternion.CreateRotationZ(Math.DegToRad(35)), Quaternion.CreateRotationX(Math.DegToRad(80)), 0.5):IsClose(Quaternion(0.2, 0.132, 0.083, 0.967), 0.001))");
//close
script->Execute("AZTestAssert(Quaternion(1, 2, 3, 4):IsClose(Quaternion(1, 2, 3, 4)))");
script->Execute("AZTestAssert( not Quaternion(1, 2, 3, 4):IsClose(Quaternion(1, 2, 3, 5)))");
script->Execute("AZTestAssert(Quaternion(1, 2, 3, 4):IsClose(Quaternion(1, 2, 3, 4.4), 0.5))");
//operators
script->Execute("AZTestAssert((-Quaternion(1, 2, 3, 4)) == Quaternion(-1, -2, -3, -4))");
script->Execute("AZTestAssert((Quaternion(1, 2, 3, 4) + Quaternion(2, 3, 5, -1)):IsClose(Quaternion(3, 5, 8, 3)))");
script->Execute("AZTestAssert((Quaternion(1, 2, 3, 4) - Quaternion(2, 3, 5, -1)):IsClose(Quaternion(-1, -1, -2, 5)))");
script->Execute("AZTestAssert((Quaternion(1, 2, 3, 4)*Quaternion(2, 3, 5, -1)):IsClose(Quaternion(8, 11, 16, -27)))");
script->Execute("AZTestAssert((Quaternion(1, 2, 3, 4)*2):IsClose(Quaternion(2, 4, 6, 8)))");
//TODO float * Quaternion is not functional yet
//script->Execute("AZTestAssert((2*Quaternion(1, 2, 3, 4)):IsClose(Quaternion(2, 4, 6, 8)))");
script->Execute("AZTestAssert((Quaternion(1, 2, 3, 4) / 2):IsClose(Quaternion(0.5, 1, 1.5, 2)))");
//operator==
script->Execute("q3:Set(1, 2, 3, 4)");
script->Execute("AZTestAssert(q3 == Quaternion(1, 2, 3, 4.0))");
script->Execute("AZTestAssert( not (q3 == Quaternion(1, 2, 3, 5)))");
script->Execute("AZTestAssert(q3 ~= Quaternion(1, 2, 3, 5))");
script->Execute("AZTestAssert( not (q3 ~= Quaternion(1, 2, 3, 4)))");
//vector transform
script->Execute("AZTestAssert((Quaternion.CreateRotationX(Math.DegToRad(45))*Vector3(4, 1, 0)):IsClose(Vector3(4, 0.7071, 0.7071)))");
//GetImaginary
script->Execute("q1:Set(21, 22, 23, 24)");
script->Execute("AZTestAssert(q1:GetImaginary() == Vector3(21, 22, 23))");
//GetAngle
script->Execute("q1 = Quaternion.CreateRotationX(Math.DegToRad(35))");
script->Execute("AZTestAssertFloatClose(q1:GetAngle(),Math.DegToRad(35))");
//make sure that our transformations concatenate in the correct order
script->Execute("q1 = Quaternion.CreateRotationZ(Math.DegToRad(90))");
script->Execute("q2 = Quaternion.CreateRotationX(Math.DegToRad(90))");
script->Execute("v = (q2 * q1) * Vector3(1, 0, 0)");
script->Execute("AZTestAssert(v:IsClose(Vector3(0, 0, 1)))");
}
TEST_F(ScriptMathTest, LuaMatrix3x3Test)
{
script->Execute("testIndices = { 0, 1, 2, 3 }");
//create functions
script->Execute("m1 = Matrix3x3.CreateIdentity()");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector3(1, 0, 0))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector3(0, 1, 0))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector3(0, 0, 1))");
script->Execute("m1 = Matrix3x3.CreateZero()");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector3(0))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector3(0))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector3(0))");
script->Execute("m1 = Matrix3x3.CreateFromValue(2)");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector3(2))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector3(2))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector3(2))");
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector3(0, 0.866, -0.5)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(0, 0.5, 0.866)))");
script->Execute("m1 = Matrix3x3.CreateRotationY(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector3(0.866, 0, 0.5)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector3(0, 1, 0)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(-0.5, 0, 0.866)))");
script->Execute("m1 = Matrix3x3.CreateRotationZ(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector3(0.866, -0.5, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector3(0.5, 0.866, 0)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(0, 0, 1)))");
script->Execute("m1 = Matrix3x3.CreateFromTransform(Transform.CreateRotationX(Math.DegToRad(30)))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector3(0, 0.866, -0.5)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(0, 0.5, 0.866)))");
script->Execute("m1 = Matrix3x3.CreateFromMatrix4x4(Matrix4x4.CreateRotationX(Math.DegToRad(30)))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector3(0, 0.866, -0.5)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(0, 0.5, 0.866)))");
script->Execute("m1 = Matrix3x3.CreateFromQuaternion(Quaternion.CreateRotationX(Math.DegToRad(30)))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector3(0, 0.866, -0.5)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(0, 0.5, 0.866)))");
script->Execute("m1 = Matrix3x3.CreateScale(Vector3(1, 2, 3))");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector3(1, 0, 0))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector3(0, 2, 0))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector3(0, 0, 3))");
script->Execute("m1 = Matrix3x3.CreateDiagonal(Vector3(2, 3, 4))");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector3(2, 0, 0))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector3(0, 3, 0))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector3(0, 0, 4))");
script->Execute("m1 = Matrix3x3.CreateCrossProduct(Vector3(1, 2, 3))");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector3(0, -3, 2))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector3(3, 0, -1))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector3(-2, 1, 0))");
//element access
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssertFloatClose(m1:GetElement(1, 2), -0.5)");
script->Execute("AZTestAssertFloatClose(m1:GetElement(2, 2), 0.866)");
script->Execute("AZTestAssertFloatClose(m1.basisZ.y, -0.5)");
script->Execute("m1:SetElement(2, 1, 5)");
script->Execute("AZTestAssert(m1:GetElement(2, 1) == 5)");
//index accessors
script->Execute("AZTestAssertFloatClose(m1.basisZ.y, -0.5)");
script->Execute("AZTestAssertFloatClose(m1.basisZ.z, 0.866)");
script->Execute("m1:SetElement(2, 1, 15)");
script->Execute("AZTestAssert(m1.basisY.z == 15)");
//row access
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(0, 0.5, 0.866)))");
script->Execute("m1:SetRow(0, 1, 2, 3)");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector3(1, 2, 3)))");
script->Execute("m1:SetRow(1, Vector3(4, 5, 6))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector3(4, 5, 6)))");
script->Execute("m1:SetRow(2, Vector3(7, 8, 9))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(7, 8, 9)))");
//test GetRow with non - constant, we have different implementations for constants and variables
script->Execute("AZTestAssert(m1:GetRow(testIndices[1]):IsClose(Vector3(1, 2, 3)))");
script->Execute("AZTestAssert(m1:GetRow(testIndices[2]):IsClose(Vector3(4, 5, 6)))");
script->Execute("AZTestAssert(m1:GetRow(testIndices[3]):IsClose(Vector3(7, 8, 9)))");
script->Execute("row0, row1, row2 = m1:GetRows()");
script->Execute("AZTestAssert(row0:IsClose(Vector3(1, 2, 3)))");
script->Execute("AZTestAssert(row1:IsClose(Vector3(4, 5, 6)))");
script->Execute("AZTestAssert(row2:IsClose(Vector3(7, 8, 9)))");
script->Execute("m1:SetRows(Vector3(10, 11, 12), Vector3(13, 14, 15), Vector3(16, 17, 18))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector3(10, 11, 12)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector3(13, 14, 15)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(16, 17, 18)))");
//column access
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:GetColumn(1):IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("m1:SetColumn(2, 1, 2, 3)");
script->Execute("AZTestAssert(m1:GetColumn(2):IsClose(Vector3(1, 2, 3)))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector3(1, 0, 1)))"); //checking all components in case others get messed up with the shuffling
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector3(0, 0.866, 2)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(0, 0.5, 3)))");
script->Execute("m1:SetColumn(0, Vector3(2, 3, 4))");
script->Execute("AZTestAssert(m1:GetColumn(0):IsClose(Vector3(2, 3, 4)))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector3(2, 0, 1)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector3(3, 0.866, 2)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector3(4, 0.5, 3)))");
//test GetColumn with non - constant, we have different implementations for constants and variables
script->Execute("AZTestAssert(m1:GetColumn(testIndices[1]):IsClose(Vector3(2, 3, 4)))");
script->Execute("AZTestAssert(m1:GetColumn(testIndices[2]):IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("AZTestAssert(m1:GetColumn(testIndices[3]):IsClose(Vector3(1, 2, 3)))");
script->Execute("col0, col1, col2 = m1:GetColumns()");
script->Execute("AZTestAssert(col0:IsClose(Vector3(2, 3, 4)))");
script->Execute("AZTestAssert(col1:IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("AZTestAssert(col2:IsClose(Vector3(1, 2, 3)))");
script->Execute("m1:SetColumns(Vector3(10, 11, 12), Vector3(13, 14, 15), Vector3(16, 17, 18))");
script->Execute("AZTestAssert(m1:GetColumn(0):IsClose(Vector3(10, 11, 12)))");
script->Execute("AZTestAssert(m1:GetColumn(1):IsClose(Vector3(13, 14, 15)))");
script->Execute("AZTestAssert(m1:GetColumn(2):IsClose(Vector3(16, 17, 18)))");
//basis access
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1.basisX:IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(m1.basisY:IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("AZTestAssert(m1.basisZ:IsClose(Vector3(0, -0.5, 0.866)))");
script->Execute("m1.basisX = Vector3(1, 2, 3)");
script->Execute("AZTestAssert(m1.basisX:IsClose(Vector3(1, 2, 3)))");
script->Execute("m1.basisY = Vector3(4, 5, 6)");
script->Execute("AZTestAssert(m1.basisY:IsClose(Vector3(4, 5, 6)))");
script->Execute("m1.basisZ = Vector3(7, 8, 9)");
script->Execute("AZTestAssert(m1.basisZ:IsClose(Vector3(7, 8, 9)))");
script->Execute("m1.basisX = Vector3(10, 11, 12)");
script->Execute("AZTestAssert(m1.basisX:IsClose(Vector3(10, 11, 12)))");
script->Execute("m1.basisY = Vector3(13, 14, 15)");
script->Execute("AZTestAssert(m1.basisY:IsClose(Vector3(13, 14, 15)))");
script->Execute("m1.basisZ = Vector3(16, 17, 18)");
script->Execute("AZTestAssert(m1.basisZ:IsClose(Vector3(16, 17, 18)))");
script->Execute("basisX, basisY, basisZ = m1:GetBasis()");
script->Execute("AZTestAssert(basisX:IsClose(Vector3(10, 11, 12)))");
script->Execute("AZTestAssert(basisY:IsClose(Vector3(13, 14, 15)))");
script->Execute("AZTestAssert(basisZ:IsClose(Vector3(16, 17, 18)))");
script->Execute("m1:SetBasis(Vector3(1, 2, 3), Vector3(4, 5, 6), Vector3(7, 8, 9))");
script->Execute("AZTestAssert(m1.basisX:IsClose(Vector3(1, 2, 3)))");
script->Execute("AZTestAssert(m1.basisY:IsClose(Vector3(4, 5, 6)))");
script->Execute("AZTestAssert(m1.basisZ:IsClose(Vector3(7, 8, 9)))");
//multiplication by matrices
script->Execute("m1:SetRow(0, 1, 2, 3)");
script->Execute("m1:SetRow(1, 4, 5, 6)");
script->Execute("m1:SetRow(2, 7, 8, 9)");
script->Execute("m2 = Matrix3x3()");
script->Execute("m2:SetRow(0, 7, 8, 9)");
script->Execute("m2:SetRow(1, 10, 11, 12)");
script->Execute("m2:SetRow(2, 13, 14, 15)");
script->Execute("m3 = m1 * m2");
script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector3(66, 72, 78)))");
script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector3(156, 171, 186)))");
script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector3(246, 270, 294)))");
script->Execute("m3 = m1:TransposedMultiply(m2)");
script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector3(138, 150, 162)))");
script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector3(168, 183, 198)))");
script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector3(198, 216, 234)))");
//multiplication by vectors
script->Execute("AZTestAssert((m1*Vector3(1, 2, 3)):IsClose(Vector3(14, 32, 50)))");
//other matrix operations
script->Execute("m3 = m1 + m2");
script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector3(8, 10, 12)))");
script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector3(14, 16, 18)))");
script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector3(20, 22, 24)))");
script->Execute("m3 = m1 - m2");
script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector3(-6, -6, -6)))");
script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector3(-6, -6, -6)))");
script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector3(-6, -6, -6)))");
script->Execute("m3 = m1 * 2");
script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector3(2, 4, 6)))");
script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector3(8, 10, 12)))");
script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector3(14, 16, 18)))");
//TODO float * matrix is not functional
//script->Execute("m3 = 2 * m1");
//script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector3(2, 4, 6)))");
//script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector3(8, 10, 12)))");
//script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector3(14, 16, 18)))");
script->Execute("m3 = m1 / 0.5");
script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector3(2, 4, 6)))");
script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector3(8, 10, 12)))");
script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector3(14, 16, 18)))");
script->Execute("m3 = -m1");
script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector3(-1, -2, -3)))");
script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector3(-4, -5, -6)))");
script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector3(-7, -8, -9)))");
//transpose
script->Execute("m1:SetRow(0, 1, 2, 3)");
script->Execute("m1:SetRow(1, 4, 5, 6)");
script->Execute("m1:SetRow(2, 7, 8, 9)");
script->Execute("m2 = m1:GetTranspose()");
script->Execute("AZTestAssert(m2:GetRow(0):IsClose(Vector3(1, 4, 7)))");
script->Execute("AZTestAssert(m2:GetRow(1):IsClose(Vector3(2, 5, 8)))");
script->Execute("AZTestAssert(m2:GetRow(2):IsClose(Vector3(3, 6, 9)))");
script->Execute("m2 = m1:Clone()");
script->Execute("m2:Transpose()");
script->Execute("AZTestAssert(m2:GetRow(0):IsClose(Vector3(1, 4, 7)))");
script->Execute("AZTestAssert(m2:GetRow(1):IsClose(Vector3(2, 5, 8)))");
script->Execute("AZTestAssert(m2:GetRow(2):IsClose(Vector3(3, 6, 9)))");
//test fast inverse, orthogonal matrix only
script->Execute("m1 = Matrix3x3.CreateRotationX(1)");
script->Execute("AZTestAssert((m1*m1:GetInverseFast()):IsClose(Matrix3x3.CreateIdentity(), 0.02))");
script->Execute("m2 = Matrix3x3.CreateRotationZ(2) * Matrix3x3.CreateRotationX(1)");
script->Execute("m3 = m2:GetInverseFast()");
// allow a little bigger threshold, because of the 2 rot matrices(sin, cos differences)
script->Execute("AZTestAssert((m2*m3):IsClose(Matrix3x3.CreateIdentity(), 0.1))");
script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector3(-0.420, 0.909, 0), 0.06))");
script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector3(-0.493, -0.228, 0.841), 0.06))");
script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector3(0.765, 0.353, 0.542), 0.06))");
//test full inverse, any arbitrary matrix
script->Execute("m1:SetRow(0, -1, 2, 3)");
script->Execute("m1:SetRow(1, 4, 5, 6)");
script->Execute("m1:SetRow(2, 7, 8, -9)");
script->Execute("AZTestAssert((m1*m1:GetInverseFull()):IsClose(Matrix3x3.CreateIdentity()))");
//scale access
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(40)) * Matrix3x3.CreateScale(Vector3(2, 3, 4))");
script->Execute("AZTestAssert(m1:RetrieveScale():IsClose(Vector3(2, 3, 4)))");
script->Execute("AZTestAssert(m1:ExtractScale():IsClose(Vector3(2, 3, 4)))");
script->Execute("AZTestAssert(m1:RetrieveScale():IsClose(Vector3.CreateOne()))");
script->Execute("m1:MultiplyByScale(Vector3(3, 4, 5))");
script->Execute("AZTestAssert(m1:RetrieveScale():IsClose(Vector3(3, 4, 5)))");
//polar decomposition
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(30))");
script->Execute("m2 = Matrix3x3.CreateScale(Vector3(5, 6, 7))");
script->Execute("m3 = m1 * m2");
script->Execute("AZTestAssert(m3:GetPolarDecomposition():IsClose(m1))");
script->Execute("m4, m5 = m3:GetPolarDecomposition()");
script->Execute("AZTestAssert((m4*m5):IsClose(m3))");
script->Execute("AZTestAssert(m4:IsClose(m1))");
script->Execute("AZTestAssert(m5:IsClose(m2, 0.01))");
//orthogonalize
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(30)) * Matrix3x3.CreateScale(Vector3(2, 3, 4))");
script->Execute("m1:SetElement(0, 1, 0.2)");
script->Execute("m2 = m1:GetOrthogonalized()");
script->Execute("AZTestAssertFloatClose(m2:GetRow(0):GetLength(),1)");
script->Execute("AZTestAssertFloatClose(m2:GetRow(1):GetLength(),1)");
script->Execute("AZTestAssertFloatClose(m2:GetRow(2):GetLength(),1)");
script->Execute("AZTestAssertFloatClose(m2:GetRow(0):Dot(m2:GetRow(1)),0)");
script->Execute("AZTestAssertFloatClose(m2:GetRow(0):Dot(m2:GetRow(2)),0)");
script->Execute("AZTestAssertFloatClose(m2:GetRow(1):Dot(m2:GetRow(2)),0)");
script->Execute("AZTestAssert(m2:GetRow(0):Cross(m2:GetRow(1)):IsClose(m2:GetRow(2)))");
script->Execute("AZTestAssert(m2:GetRow(1):Cross(m2:GetRow(2)):IsClose(m2:GetRow(0)))");
script->Execute("AZTestAssert(m2:GetRow(2):Cross(m2:GetRow(0)):IsClose(m2:GetRow(1)))");
script->Execute("m1:Orthogonalize()");
script->Execute("AZTestAssert(m1:IsClose(m2))");
//orthogonal
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:IsOrthogonal(0.05))");
script->Execute("m1:SetRow(1, m1:GetRow(1)*2)");
script->Execute("AZTestAssert( not m1:IsOrthogonal(0.05))");
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(30))");
script->Execute("m1:SetRow(1, Vector3(0, 1, 0))");
script->Execute("AZTestAssert( not m1:IsOrthogonal(0.05))");
//IsClose
script->Execute("m1 = Matrix3x3.CreateRotationX(Math.DegToRad(30))");
script->Execute("m2 = m1:Clone()");
script->Execute("AZTestAssert(m1:IsClose(m2))");
script->Execute("m2:SetElement(0, 0, 2)");
script->Execute("AZTestAssert( not m1:IsClose(m2))");
script->Execute("m2 = m1:Clone()");
script->Execute("m2:SetElement(0, 2, 2)");
script->Execute("AZTestAssert( not m1:IsClose(m2))");
//get diagonal
script->Execute("m1:SetRow(0, 1, 2, 3)");
script->Execute("m1:SetRow(1, 4, 5, 6)");
script->Execute("m1:SetRow(2, 7, 8, 9)");
script->Execute("AZTestAssert(m1:GetDiagonal() == Vector3(1, 5, 9))");
//determinant
script->Execute("m1:SetRow(0, -1, 2, 3)");
script->Execute("m1:SetRow(1, 4, 5, 6)");
script->Execute("m1:SetRow(2, 7, 8, -9)");
script->Execute("AZTestAssertFloatClose(m1:GetDeterminant(),240)");
//adjugate
script->Execute("m1:SetRow(0, 1, 2, 3)");
script->Execute("m1:SetRow(1, 4, 5, 6)");
script->Execute("m1:SetRow(2, 7, 8, 9)");
script->Execute("m2 = m1:GetAdjugate()");
script->Execute("AZTestAssert(m2:GetRow(0):IsClose(Vector3(-3, 6, -3)))");
script->Execute("AZTestAssert(m2:GetRow(1):IsClose(Vector3(6, -12, 6)))");
script->Execute("AZTestAssert(m2:GetRow(2):IsClose(Vector3(-3, 6, -3)))");
}
TEST_F(ScriptMathTest, LuaMatrix4x4Test)
{
script->Execute("testIndices = { 0, 1, 2, 3 }");
////create functions
script->Execute("m1 = Matrix4x4.CreateIdentity()");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector4(1, 0, 0, 0))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector4(0, 1, 0, 0))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector4(0, 0, 1, 0))");
script->Execute("AZTestAssert(m1:GetRow(3) == Vector4(0, 0, 0, 1))");
script->Execute("m1 = Matrix4x4.CreateZero()");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector4(0))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector4(0))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector4(0))");
script->Execute("AZTestAssert(m1:GetRow(3) == Vector4(0))");
script->Execute("m1 = Matrix4x4.CreateFromValue(2)");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector4(2))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector4(2))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector4(2))");
script->Execute("AZTestAssert(m1:GetRow(3) == Vector4(2))");
script->Execute("m1 = Matrix4x4.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(1, 0, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(0, 0.866, -0.5, 0)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(0, 0.5, 0.866, 0)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(0, 0, 0, 1)))");
script->Execute("m1 = Matrix4x4.CreateRotationY(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(0.866, 0, 0.5, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(0, 1, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(-0.5, 0, 0.866, 0)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(0, 0, 0, 1)))");
script->Execute("m1 = Matrix4x4.CreateRotationZ(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(0.866, -0.5, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(0.5, 0.866, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(0, 0, 1, 0)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(0, 0, 0, 1)))");
script->Execute("m1 = Matrix4x4.CreateFromQuaternion(Quaternion.CreateRotationX(Math.DegToRad(30)))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(1, 0, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(0, 0.866, -0.5, 0)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(0, 0.5, 0.866, 0)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(0, 0, 0, 1)))");
script->Execute("m1 = Matrix4x4.CreateFromQuaternionAndTranslation(Quaternion.CreateRotationX(Math.DegToRad(30)), Vector3(1, 2, 3))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(1, 0, 0, 1)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(0, 0.866, -0.5, 2)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(0, 0.5, 0.866, 3)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(0, 0, 0, 1)))");
script->Execute("m1 = Matrix4x4.CreateScale(Vector3(1, 2, 3))");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector4(1, 0, 0, 0))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector4(0, 2, 0, 0))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector4(0, 0, 3, 0))");
script->Execute("AZTestAssert(m1:GetRow(3) == Vector4(0, 0, 0, 1))");
script->Execute("m1 = Matrix4x4.CreateDiagonal(Vector4(2, 3, 4, 5))");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector4(2, 0, 0, 0))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector4(0, 3, 0, 0))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector4(0, 0, 4, 0))");
script->Execute("AZTestAssert(m1:GetRow(3) == Vector4(0, 0, 0, 5))");
script->Execute("m1 = Matrix4x4.CreateTranslation(Vector3(1, 2, 3))");
script->Execute("AZTestAssert(m1:GetRow(0) == Vector4(1, 0, 0, 1))");
script->Execute("AZTestAssert(m1:GetRow(1) == Vector4(0, 1, 0, 2))");
script->Execute("AZTestAssert(m1:GetRow(2) == Vector4(0, 0, 1, 3))");
script->Execute("AZTestAssert(m1:GetRow(3) == Vector4(0, 0, 0, 1))");
script->Execute("m1 = Matrix4x4.CreateProjection(Math.DegToRad(30), 16 / 9, 1, 1000)");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(-2.0993, 0, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(0, 3.732, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(0, 0, 1.002, -2.002)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(0, 0, 1, 0)))");
script->Execute("m1 = Matrix4x4.CreateProjectionFov(Math.DegToRad(30), Math.DegToRad(60), 1, 1000)");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(-3.732, 0, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(0, 1.732, 0, 0)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(0, 0, 1.002, -2.002)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(0, 0, 1, 0)))");
script->Execute("m1 = Matrix4x4.CreateProjectionOffset(0.5, 1, 0, 0.5, 1, 1000)");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(-4, 0, -3, 0)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(0, 4, -1, 0)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(0, 0, 1.002, -2.002)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(0, 0, 1, 0)))");
////element access
script->Execute("m1 = Matrix4x4.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssertFloatClose(m1:GetElement(1, 2), -0.5)");
script->Execute("AZTestAssertFloatClose(m1:GetElement(2, 2), 0.866)");
script->Execute("m1:SetElement(2, 1, 5)");
script->Execute("AZTestAssert(m1:GetElement(2, 1) == 5)");
////row access
script->Execute("m1 = Matrix4x4.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(0, 0.5, 0.866, 0)))");
script->Execute("AZTestAssert(m1:GetRowAsVector3(2):IsClose(Vector3(0, 0.5, 0.866)))");
script->Execute("m1:SetRow(0, 1, 2, 3, 4)");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(1, 2, 3, 4)))");
script->Execute("m1:SetRow(1, Vector3(5, 6, 7), 8)");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(5, 6, 7, 8)))");
script->Execute("m1:SetRow(2, Vector4(3, 4, 5, 6))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(3, 4, 5, 6)))");
script->Execute("m1:SetRow(3, Vector4(7, 8, 9, 10))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(7, 8, 9, 10)))");
////test GetRow with non-constant, we have different implementations for constants and variables
script->Execute("AZTestAssert(m1:GetRow(testIndices[1]):IsClose(Vector4(1, 2, 3, 4)))");
script->Execute("AZTestAssert(m1:GetRow(testIndices[2]):IsClose(Vector4(5, 6, 7, 8)))");
script->Execute("AZTestAssert(m1:GetRow(testIndices[3]):IsClose(Vector4(3, 4, 5, 6)))");
script->Execute("AZTestAssert(m1:GetRow(testIndices[4]):IsClose(Vector4(7, 8, 9, 10)))");
////column access
script->Execute("m1 = Matrix4x4.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssert(m1:GetColumn(1):IsClose(Vector4(0, 0.866, 0.5, 0)))");
script->Execute("m1:SetColumn(3, 1, 2, 3, 4)");
script->Execute("AZTestAssert(m1:GetColumn(3):IsClose(Vector4(1, 2, 3, 4)))");
script->Execute("AZTestAssert(m1:GetColumnAsVector3(3):IsClose(Vector3(1, 2, 3)))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(1, 0, 0, 1)))"); //checking all components in case others get messed up with the shuffling
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(0, 0.866, -0.5, 2)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(0, 0.5, 0.866, 3)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(0, 0, 0, 4)))");
script->Execute("m1:SetColumn(0, Vector4(2, 3, 4, 5))");
script->Execute("AZTestAssert(m1:GetColumn(0):IsClose(Vector4(2, 3, 4, 5)))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(2, 0, 0, 1)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(3, 0.866, -0.5, 2)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(4, 0.5, 0.866, 3)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(5, 0, 0, 4)))");
////test GetColumn with non-constant, we have different implementations for constants and variables
script->Execute("AZTestAssert(m1:GetColumn(testIndices[1]):IsClose(Vector4(2, 3, 4, 5)))");
script->Execute("AZTestAssert(m1:GetColumn(testIndices[2]):IsClose(Vector4(0, 0.866, 0.5, 0)))");
script->Execute("AZTestAssert(m1:GetColumn(testIndices[3]):IsClose(Vector4(0, -0.5, 0.866, 0)))");
script->Execute("AZTestAssert(m1:GetColumn(testIndices[4]):IsClose(Vector4(1, 2, 3, 4)))");
////translation access
script->Execute("m1 = Matrix4x4.CreateTranslation(Vector3(5, 6, 7))");
script->Execute("AZTestAssert(m1:GetTranslation():IsClose(Vector3(5, 6, 7)))");
script->Execute("m1:SetTranslation(1, 2, 3)");
script->Execute("AZTestAssert(m1:GetTranslation():IsClose(Vector3(1, 2, 3)))");
script->Execute("m1:SetTranslation(Vector3(2, 3, 4))");
script->Execute("AZTestAssert(m1:GetTranslation():IsClose(Vector3(2, 3, 4)))");
script->Execute("AZTestAssert(m1:GetTranslation():IsClose(Vector3(2, 3, 4)))");
script->Execute("m1:SetTranslation(4, 5, 6)");
script->Execute("AZTestAssert(m1:GetTranslation():IsClose(Vector3(4, 5, 6)))");
script->Execute("m1:SetTranslation(Vector3(2, 3, 4))");
script->Execute("AZTestAssert(m1:GetTranslation():IsClose(Vector3(2, 3, 4)))");
////multiplication by matrices
script->Execute("m1:SetRow(0, 1, 2, 3, 4)");
script->Execute("m1:SetRow(1, 5, 6, 7, 8)");
script->Execute("m1:SetRow(2, 9, 10, 11, 12)");
script->Execute("m1:SetRow(3, 13, 14, 15, 16)");
script->Execute("m2 = Matrix4x4()");
script->Execute("m2:SetRow(0, 7, 8, 9, 10)");
script->Execute("m2:SetRow(1, 11, 12, 13, 14)");
script->Execute("m2:SetRow(2, 15, 16, 17, 18)");
script->Execute("m2:SetRow(3, 19, 20, 21, 22)");
script->Execute("m3 = m1 * m2");
script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector4(150, 160, 170, 180)))");
script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector4(358, 384, 410, 436)))");
script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector4(566, 608, 650, 692)))");
script->Execute("AZTestAssert(m3:GetRow(3):IsClose(Vector4(774, 832, 890, 948)))");
////multiplication by vectors
script->Execute("AZTestAssert((m1*Vector3(1, 2, 3)):IsClose(Vector3(18, 46, 74)))");
script->Execute("AZTestAssert((m1*Vector4(1, 2, 3, 4)):IsClose(Vector4(30, 70, 110, 150)))");
script->Execute("AZTestAssert(m1:TransposedMultiply3x3(Vector3(1, 2, 3)):IsClose(Vector3(38, 44, 50)))");
script->Execute("AZTestAssert(m1:Multiply3x3(Vector3(1, 2, 3)):IsClose(Vector3(14, 38, 62)))");
////transpose
script->Execute("m1:SetRow(0, 1, 2, 3, 4)");
script->Execute("m1:SetRow(1, 5, 6, 7, 8)");
script->Execute("m1:SetRow(2, 9, 10, 11, 12)");
script->Execute("m1:SetRow(3, 13, 14, 15, 16)");
script->Execute("m2 = m1:GetTranspose()");
script->Execute("AZTestAssert(m2:GetRow(0):IsClose(Vector4(1, 5, 9, 13)))");
script->Execute("AZTestAssert(m2:GetRow(1):IsClose(Vector4(2, 6, 10, 14)))");
script->Execute("AZTestAssert(m2:GetRow(2):IsClose(Vector4(3, 7, 11, 15)))");
script->Execute("AZTestAssert(m2:GetRow(3):IsClose(Vector4(4, 8, 12, 16)))");
script->Execute("m2 = m1:Clone()");
script->Execute("m2:Transpose()");
script->Execute("AZTestAssert(m2:GetRow(0):IsClose(Vector4(1, 5, 9, 13)))");
script->Execute("AZTestAssert(m2:GetRow(1):IsClose(Vector4(2, 6, 10, 14)))");
script->Execute("AZTestAssert(m2:GetRow(2):IsClose(Vector4(3, 7, 11, 15)))");
script->Execute("AZTestAssert(m2:GetRow(3):IsClose(Vector4(4, 8, 12, 16)))");
////test fast inverse, orthogonal matrix with translation only
script->Execute("m1 = Matrix4x4.CreateRotationX(1)");
script->Execute("m1:SetTranslation(Vector3(10, -3, 5))");
script->Execute("AZTestAssert((m1*m1:GetInverseFast()):IsClose(Matrix4x4.CreateIdentity(), 0.02))");
script->Execute("m2 = Matrix4x4.CreateRotationZ(2) * Matrix4x4.CreateRotationX(1)");
script->Execute("m2:SetTranslation(Vector3(-5, 4.2, -32))");
script->Execute("m3 = m2:GetInverseFast()");
//// allow a little bigger threshold, because of the 2 rot matrices (sin,cos differences)
script->Execute("AZTestAssert((m2*m3):IsClose(Matrix4x4.CreateIdentity(), 0.1))");
script->Execute("AZTestAssert(m3:GetRow(0):IsClose(Vector4(-0.420, 0.909, 0, -5.920), 0.06))");
script->Execute("AZTestAssert(m3:GetRow(1):IsClose(Vector4(-0.493, -0.228, 0.841, 25.418), 0.06))");
script->Execute("AZTestAssert(m3:GetRow(2):IsClose(Vector4(0.765, 0.353, 0.542, 19.703), 0.06))");
script->Execute("AZTestAssert(m3:GetRow(3):IsClose(Vector4(0, 0, 0, 1)))");
////test transform inverse, should handle non-orthogonal matrices, last row must still be (0,0,0,1) though
script->Execute("m1:SetElement(0, 1, 23.1234)");
script->Execute("AZTestAssert((m1*m1:GetInverseTransform()):IsClose(Matrix4x4.CreateIdentity(), 0.01))");
////test full inverse, any arbitrary matrix
script->Execute("m1:SetRow(0, -1, 2, 3, 4)");
script->Execute("m1:SetRow(1, 3, 4, 5, 6)");
script->Execute("m1:SetRow(2, 9, 10, 11, 12)");
script->Execute("m1:SetRow(3, 13, 14, 15, -16)");
script->Execute("AZTestAssert((m1*m1:GetInverseFull()):IsClose(Matrix4x4.CreateIdentity()))");
////IsClose
script->Execute("m1 = Matrix4x4.CreateRotationX(Math.DegToRad(30))");
script->Execute("m2 = m1:Clone()");
script->Execute("AZTestAssert(m1:IsClose(m2))");
script->Execute("m2:SetElement(0, 0, 2)");
script->Execute("AZTestAssert( not m1:IsClose(m2))");
script->Execute("m2 = m1:Clone()");
script->Execute("m2:SetElement(0, 3, 2)");
script->Execute("AZTestAssert( not m1:IsClose(m2))");
////set rotation part
script->Execute("m1 = Matrix4x4.CreateTranslation(Vector3(1, 2, 3))");
script->Execute("m1:SetRow(3, 5, 6, 7, 8)");
script->Execute("m1:SetRotationPartFromQuaternion(Quaternion.CreateRotationX(Math.DegToRad(30)))");
script->Execute("AZTestAssert(m1:GetRow(0):IsClose(Vector4(1, 0, 0, 1)))");
script->Execute("AZTestAssert(m1:GetRow(1):IsClose(Vector4(0, 0.866, -0.5, 2)))");
script->Execute("AZTestAssert(m1:GetRow(2):IsClose(Vector4(0, 0.5, 0.866, 3)))");
script->Execute("AZTestAssert(m1:GetRow(3):IsClose(Vector4(5, 6, 7, 8)))");
////get diagonal
script->Execute("m1:SetRow(0, 1, 2, 3, 4)");
script->Execute("m1:SetRow(1, 5, 6, 7, 8)");
script->Execute("m1:SetRow(2, 9, 10, 11, 12)");
script->Execute("m1:SetRow(3, 13, 14, 15, 16)");
script->Execute("AZTestAssert(m1:GetDiagonal() == Vector4(1, 6, 11, 16))");
}
TEST_F(ScriptMathTest, LuaTransformTest)
{
script->Execute("testIndices = { 0, 1, 2, 3 }");
////create functions
script->Execute("t1 = Transform.CreateIdentity()");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(0 ,1, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0, 0, 1)))");
script->Execute("t1 = Transform.CreateRotationX(Math.DegToRad(30))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0, -0.5, 0.866)))");
script->Execute("t1 = Transform.CreateRotationY(Math.DegToRad(30))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(0.866, 0, -0.5)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(0, 1, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0.5, 0, 0.866)))");
script->Execute("t1 = Transform.CreateRotationZ(Math.DegToRad(30))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(0.866, 0.5, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(-0.5, 0.866, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0, 0, 1)))");
script->Execute("t1 = Transform.CreateFromQuaternion(Quaternion.CreateRotationX(Math.DegToRad(30)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0, -0.5, 0.866)))");
script->Execute("t1 = Transform.CreateFromQuaternionAndTranslation(Quaternion.CreateRotationX(Math.DegToRad(30)), Vector3(1, 2, 3))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0, -0.5, 0.866)))");
script->Execute("t1 = Transform.CreateUniformScale(2)");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(2, 0, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(0, 2, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0, 0, 2)))");
script->Execute("t1 = Transform.CreateTranslation(Vector3(1, 2, 3))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(0, 1, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0, 0, 1)))");
script->Execute("AZTestAssert(t1:GetTranslation():IsClose(Vector3(1, 2, 3)))");
////basis access
script->Execute("t1 = Transform.CreateRotationX(Math.DegToRad(30))");
script->Execute("t1:SetTranslation(1, 2, 3)");
script->Execute("AZTestAssert(t1:GetBasisX():IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(t1:GetBasisY():IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("AZTestAssert(t1:GetBasisZ():IsClose(Vector3(0, -0.5, 0.866)))");
script->Execute("basis0, basis1, basis2, pos = t1:GetBasisAndTranslation()");
script->Execute("AZTestAssert(basis0:IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(basis1:IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("AZTestAssert(basis2:IsClose(Vector3(0, -0.5, 0.866)))");
script->Execute("AZTestAssert(pos:IsClose(Vector3(1, 2, 3)))");
////translation access
script->Execute("t1 = Transform.CreateTranslation(Vector3(5, 6, 7))");
script->Execute("AZTestAssert(t1:GetTranslation():IsClose(Vector3(5, 6, 7)))");
script->Execute("t1:SetTranslation(1, 2, 3)");
script->Execute("AZTestAssert(t1:GetTranslation():IsClose(Vector3(1, 2, 3)))");
script->Execute("t1:SetTranslation(Vector3(2, 3, 4))");
script->Execute("AZTestAssert(t1:GetTranslation():IsClose(Vector3(2, 3, 4)))");
script->Execute("AZTestAssert(t1:GetTranslation():IsClose(Vector3(2, 3, 4)))");
script->Execute("t1:SetTranslation(4, 5, 6)");
script->Execute("AZTestAssert(t1:GetTranslation():IsClose(Vector3(4, 5, 6)))");
script->Execute("t1:SetTranslation(Vector3(2, 3, 4))");
script->Execute("AZTestAssert(t1:GetTranslation():IsClose(Vector3(2, 3, 4)))");
////multiplication by transforms
script->Execute("t1 = Transform.CreateRotationX(Math.DegToRad(30))");
script->Execute("t1:SetTranslation(Vector3(1, 2, 3))");
script->Execute("t2 = Transform.CreateRotationY(Math.DegToRad(30))");
script->Execute("t2:SetTranslation(Vector3(2, 3, 4))");
script->Execute("t3 = t1 * t2");
script->Execute("AZTestAssert(t3:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(0.866, 0.25, -0.433)))");
script->Execute("AZTestAssert(t3:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("AZTestAssert(t3:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0.5, -0.433, 0.75)))");
script->Execute("AZTestAssert(t3:GetTranslation():IsClose(Vector3(3, 2.598, 7.964), 0.001))");
////multiplication by vectors
script->Execute("AZTestAssert((t1*Vector3(1, 2, 3)):IsClose(Vector3(2, 2.224, 6.598), 0.02))");
script->Execute("AZTestAssert((t1*Vector4(1, 2, 3, 4)):IsClose(Vector4(5, 8.224, 15.598, 4), 0.02))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(1, 2, 3)):IsClose(Vector3(1, 0.224, 3.598), 0.02))");
////test fast inverse, orthogonal matrix with translation only
script->Execute("t1 = Transform.CreateRotationX(1)");
script->Execute("t1:SetTranslation(Vector3(10, -3, 5))");
script->Execute("AZTestAssert((t1*t1:GetInverse()):IsClose(Transform.CreateIdentity(), 0.02))");
script->Execute("t2 = Transform.CreateRotationZ(2) * Transform.CreateRotationX(1)");
script->Execute("t2:SetTranslation(Vector3(-5, 4.2, -32))");
script->Execute("t3 = t2:GetInverse()");
//// allow a little bigger threshold, because of the 2 rot matrices (sin,cos differences)
script->Execute("AZTestAssert((t2*t3):IsClose(Transform.CreateIdentity(), 0.1))");
script->Execute("AZTestAssert(t3:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(-0.420, -0.493, 0.765), 0.06))");
script->Execute("AZTestAssert(t3:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(0.909,-0.228, 0.353), 0.06))");
script->Execute("AZTestAssert(t3:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0, 0.841, 0.542), 0.06))");
script->Execute("AZTestAssert(t3:GetTranslation():IsClose(Vector3(-5.90, 25.415, 19.645), 0.001))");
////test inverse, should handle non-orthogonal matrices
script->Execute("t1 = Transform.CreateRotationX(1) * Transform.CreateUniformScale(2)");
script->Execute("AZTestAssert((t1*t1:GetInverse()):IsClose(Transform.CreateIdentity()))");
////scale access
script->Execute("t1 = Transform.CreateRotationX(Math.DegToRad(40)) * Transform.CreateUniformScale(3)");
script->Execute("AZTestAssertFloatClose(t1:GetUniformScale(), 3)");
script->Execute("AZTestAssertFloatClose(t1:ExtractUniformScale(), 3)");
script->Execute("AZTestAssertFloatClose(t1:GetUniformScale(), 1)");
script->Execute("t1:MultiplyByUniformScale(2)");
script->Execute("AZTestAssertFloatClose(t1:GetUniformScale(), 2)");
////orthogonalize
script->Execute("t1 = Transform.CreateRotationX(Math.DegToRad(30)) * Transform.CreateUniformScale(3)");
script->Execute("t1:SetTranslation(Vector3(1,2,3))");
script->Execute("t2 = t1:GetOrthogonalized()");
script->Execute("AZTestAssertFloatClose(t2:GetBasisX():GetLength(), 1)");
script->Execute("AZTestAssertFloatClose(t2:GetBasisY():GetLength(), 1)");
script->Execute("AZTestAssertFloatClose(t2:GetBasisZ():GetLength(), 1)");
script->Execute("AZTestAssertFloatClose(t2:GetBasisX():Dot(t2:GetBasisY()), 0)");
script->Execute("AZTestAssertFloatClose(t2:GetBasisX():Dot(t2:GetBasisZ()), 0)");
script->Execute("AZTestAssertFloatClose(t2:GetBasisY():Dot(t2:GetBasisZ()), 0)");
script->Execute("AZTestAssert(t2:GetBasisX():Cross(t2:GetBasisY()):IsClose(t2:GetBasisZ()))");
script->Execute("AZTestAssert(t2:GetBasisY():Cross(t2:GetBasisZ()):IsClose(t2:GetBasisX()))");
script->Execute("AZTestAssert(t2:GetBasisZ():Cross(t2:GetBasisX()):IsClose(t2:GetBasisY()))");
script->Execute("t1:Orthogonalize()");
script->Execute("AZTestAssert(t1:IsClose(t2))");
////orthogonal
script->Execute("t1 = Transform.CreateRotationX(Math.DegToRad(30))");
script->Execute("t1:SetTranslation(Vector3(1, 2, 3))");
script->Execute("AZTestAssert(t1:IsOrthogonal(0.05))");
script->Execute("t1 = Transform.CreateRotationX(Math.DegToRad(30)) * Transform.CreateUniformScale(2)");
script->Execute("AZTestAssert( not t1:IsOrthogonal(0.05))");
////IsClose
script->Execute("t1 = Transform.CreateRotationX(Math.DegToRad(30))");
script->Execute("t2 = t1:Clone()");
script->Execute("AZTestAssert(t1:IsClose(t2))");
script->Execute("t2 = Transform.CreateRotationX(Math.DegToRad(30.01))");
script->Execute("AZTestAssert(t1:IsClose(t2))");
script->Execute("t2 = Transform.CreateRotationX(Math.DegToRad(32))");
script->Execute("AZTestAssert( not t1:IsClose(t2))");
////set rotation part
script->Execute("t1 = Transform.CreateTranslation(Vector3(1,2,3))");
script->Execute("t1:SetRotation(Quaternion.CreateRotationX(Math.DegToRad(30)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(1, 0, 0)):IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 1, 0)):IsClose(Vector3(0, 0.866, 0.5)))");
script->Execute("AZTestAssert(t1:TransformVector(Vector3(0, 0, 1)):IsClose(Vector3(0, -0.5, 0.866)))");
script->Execute("AZTestAssert(t1:GetTranslation():IsClose(Vector3(1, 2, 3)))");
}
TEST_F(ScriptMathTest, LuaPlaneTest)
{
script->Execute("pl = Plane.CreateFromNormalAndDistance(Vector3(1,0,0),-100)");
script->Execute("AZTestAssertFloatClose(pl:GetDistance(),-100)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().x,1)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().y,0)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().z,0)");
script->Execute("pl = Plane.CreateFromNormalAndPoint(Vector3(0, 1, 0), Vector3(10, 10, 10))");
script->Execute("AZTestAssertFloatClose(pl:GetDistance(), -10)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().x, 0)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().y, 1)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().z, 0)");
script->Execute("pl = Plane.CreateFromCoefficients(0,-1,0,-5)");
script->Execute("AZTestAssertFloatClose(pl:GetDistance(),-5)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().x,0)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().y,-1)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().z,0)");
AZ_MATH_TEST_START_TRACE_SUPPRESSION;
script->Execute("pl:Set(12, 13, 14, 15)");
AZ_MATH_TEST_STOP_TRACE_SUPPRESSION(1);
script->Execute("AZTestAssertFloatClose(pl:GetDistance(), 15)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().x, 12)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().y, 13)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().z, 14)");
AZ_MATH_TEST_START_TRACE_SUPPRESSION;
script->Execute("pl:Set(Vector3(22, 23, 24), 25)");
AZ_MATH_TEST_STOP_TRACE_SUPPRESSION(1);
script->Execute("AZTestAssertFloatClose(pl:GetDistance(), 25)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().x, 22)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().y, 23)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().z, 24)");
script->Execute("pl:Set(Vector4(32, 33, 34, 35))");
script->Execute("AZTestAssertFloatClose(pl:GetDistance(), 35)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().x, 32)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().y, 33)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().z, 34)");
script->Execute("pl:SetNormal(Vector3(0,0,1))");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().x,0)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().y,0)");
script->Execute("AZTestAssertFloatClose(pl:GetNormal().z,1)");
script->Execute("pl:SetDistance(55)");
script->Execute("AZTestAssertFloatClose(pl:GetDistance(),55)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().w,55)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().x,0)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().y,0)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().z,1)");
script->Execute("tm = Transform.CreateRotationY(Math.DegToRad(90))");
script->Execute("pl = pl:GetTransform(tm)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().w,55)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().x,1)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().y,0)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().z, 0)");
script->Execute("dist = pl:GetPointDist(Vector3(10, 0, 0))");
script->Execute("AZTestAssertFloatClose(dist, 65)");
script->Execute("tm = Transform.CreateRotationZ(Math.DegToRad(45))");
script->Execute("pl:ApplyTransform(tm)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().w, 55)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().x, 0.7071)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().y, 0.7071)");
script->Execute("AZTestAssertFloatClose(pl:GetPlaneEquationCoefficients().z, 0)");
script->Execute("pl:SetNormal(Vector3(0, 0, 1))");
script->Execute("v1 = pl:GetProjected(Vector3(10, 15, 20))");
script->Execute("AZTestAssert(v1 == Vector3(10, 15, 0))");
script->Execute("pl:Set(0, 0, 1, 10)");
script->Execute("hit, v1, time = pl:CastRay(Vector3(0, 0, 0), Vector3(0, 0, 1))");
script->Execute("AZTestAssert(hit == true)");
script->Execute("AZTestAssert(v1:IsClose(Vector3(0, 0, -10)))");
script->Execute("pl:Set(0, 1, 0, 10)");
script->Execute("hit, v1, time = pl:CastRay(Vector3(0, 1, 0), Vector3(0, -1, 0))");
script->Execute("AZTestAssert(hit == true)");
script->Execute("AZTestAssertFloatClose(time,10.999)");
script->Execute("pl:Set(1, 0, 0, 5)");
script->Execute("hit, v1, time = pl:CastRay(Vector3(0, 1, 0), Vector3(0, -1, 0))");
script->Execute("AZTestAssert(hit == false)");
script->Execute("pl:Set(1, 0, 0, 0)");
script->Execute("hit, v1, time = pl:IntersectSegment(Vector3(-1, 0, 0), Vector3(1, 0, 0))");
script->Execute("AZTestAssert(hit == true)");
script->Execute("AZTestAssert(v1:IsClose(Vector3(0, 0, 0)))");
script->Execute("AZTestAssertFloatClose(time, 0.5)");
script->Execute("pl:Set(0, 1, 0, 0)");
script->Execute("hit, v1, time = pl:IntersectSegment(Vector3(0, -1, 0), Vector3(0, 9, 0))");
script->Execute("AZTestAssert(hit == true)");
script->Execute("AZTestAssert(v1:IsClose(Vector3(0, 0, 0)))");
script->Execute("AZTestAssertFloatClose(time, 0.1)");
script->Execute("pl:Set(0, 1, 0, 20)");
script->Execute("hit, v1, time = pl:IntersectSegment(Vector3(-1, 0, 0), Vector3(1, 0, 0))");
script->Execute("AZTestAssert(hit == false)");
script->Execute("pl:Set(1, 0, 0, 0)");
script->Execute("AZTestAssert(pl:IsFinite())");
AZ_MATH_TEST_START_TRACE_SUPPRESSION;
script->Execute("pl:Set(math.huge, math.huge, math.huge, math.huge)");
AZ_MATH_TEST_STOP_TRACE_SUPPRESSION(1);
script->Execute("AZTestAssert( not pl:IsFinite())");
}
TEST_F(ScriptMathTest, LuaUuidTest)
{
// null
script->Execute("id = Uuid.CreateNull()");
script->Execute("AZTestAssert(id:IsNull())");
script->Execute("defId = Uuid.CreateString(\"{B5700F2E-661B-4AC0-9335-817CB4C09CCB}\")");
script->Execute("idStr1 = \"{B5700F2E-661B-4AC0-9335-817CB4C09CCB}\"");
script->Execute("idStr2 = \"{B5700F2E661B4AC09335817CB4C09CCB}\"");
script->Execute("idStr3 = \"B5700F2E-661B-4AC0-9335-817CB4C09CCB\"");
script->Execute("idStr4 = \"B5700F2E661B4AC09335817CB4C09CCB\"");
// create from string
script->Execute("id = Uuid.CreateString(idStr1)");
script->Execute("AZTestAssert(id==defId)");
script->Execute("id = Uuid.CreateString(idStr2)");
script->Execute("AZTestAssert(id==defId)");
script->Execute("id = Uuid.CreateString(idStr3)");
script->Execute("AZTestAssert(id==defId)");
script->Execute("id = Uuid.CreateString(idStr4)");
script->Execute("AZTestAssert(id==defId)");
// tostring
script->Execute("id = Uuid.CreateString(idStr1)");
script->Execute("asString = tostring(id)");
script->Execute("AZTestAssert(asString == idStr1)");
// operators
script->Execute("idBigger = Uuid(\"C5700F2E661B4ac09335817CB4C09CCB\")");
script->Execute("AZTestAssert(id < idBigger)");
script->Execute("AZTestAssert(id ~= idBigger)");
script->Execute("AZTestAssert(idBigger > id)");
// test the name function
script->Execute("uuidName = Uuid.CreateName(\"BlaBla\")");
// check id
script->Execute("AZTestAssert(uuidName == Uuid.CreateName(\"BlaBla\"))");
}
TEST_F(ScriptMathTest, LuaCrc32Test)
{
// constructor, value, tostring.
script->Execute("stringToCrc = \"blabla\" crc32 = Crc32(stringToCrc)");
script->Execute("AZTestAssert(crc32.value == 0x93086ff3)");
script->Execute("AZTestAssert(tostring(crc32) == \"0x93086ff3\")");
// == and ~= operators.
script->Execute("crc32 = Crc32(stringToCrc)");
script->Execute("AZTestAssert(crc32 == Crc32(stringToCrc))");
script->Execute("AZTestAssert(crc32 ~= Crc32(\"SomeOtherString\"))");
// TODO : calling any functions implemented with a generic
// script context on Crc32 causes an error.
// add(string), add(data, size)
/*script->Execute("stringHello = \"Hello\" stringWorld = \"World\"");
script->Execute("crcAdded = Crc32(stringHello)");
script->Execute("crcAdded:Add(stringWorld)");
script->Execute("crc32 = Crc32(\"HelloWorld\")");
script->Execute("AZTestAssert(crcAdded == crc32");*/
// tostring
script->Execute("crc32 = Crc32(0x12345680)");
script->Execute("AZTestAssert(tostring(crc32) == \"0x12345680\")");
AZ_TEST_START_TRACE_SUPPRESSION;
script->Execute("globalCrc32Prop = crc32.value");
AZ_TEST_STOP_TRACE_SUPPRESSION(1);
}
TEST_F(ScriptMathTest, LuaAabbTest)
{
////CreateNull
////IsValid
script->Execute("aabb = Aabb.CreateNull()");
script->Execute("AZTestAssert( not aabb:IsValid())");
script->Execute("AZTestAssert(aabb.min:IsGreaterThan(aabb.max))");
////CreateFromPoint
script->Execute("aabb = Aabb.CreateFromPoint(Vector3(0))");
script->Execute("AZTestAssert(aabb:IsValid())");
script->Execute("AZTestAssert(aabb:IsFinite())");
script->Execute("AZTestAssert(aabb.min:IsClose(aabb.max))");
////CreateFromMinMax
script->Execute("aabb = Aabb.CreateFromMinMax(Vector3(0),Vector3(1))");
script->Execute("AZTestAssert(aabb:IsValid())");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(0)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(1)))");
////CreateCenterHalfExtents
script->Execute("aabb = Aabb.CreateCenterHalfExtents(Vector3(1), Vector3(1))");
script->Execute("AZTestAssert(aabb:IsValid())");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(0)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(2)))");
script->Execute("AZTestAssert(aabb:GetCenter():IsClose(Vector3(1)))");
////CreateCenterRadius
////GetExtents
script->Execute("aabb = Aabb.CreateCenterRadius(Vector3(4), 2)");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(2)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(6)))");
script->Execute("AZTestAssert(aabb:GetExtents():IsClose(Vector3(4)))");
////CreateFromObb
script->Execute("position = Vector3(1, 1, 1)");
script->Execute("rotation = Quaternion.CreateRotationZ(Math.DegToRad(45))");
script->Execute("halfLengths = Vector3(1, 1, 1)");
script->Execute("obb = Obb.CreateFromPositionRotationAndHalfLengths(position, rotation, halfLengths)");
script->Execute("aabb = Aabb.CreateFromObb(obb)");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(-0.414, -0.414, 0.0), 0.001))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(2.414, 2.414, 2.0), 0.001))");
script->Execute("AZTestAssert(aabb:GetCenter():IsClose(Vector3(1, 1, 1)))");
////Set(min, max)
////GetMin
////GetMax
script->Execute("aabb:Set(Vector3(1), Vector3(4))");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(1)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(4)))");
////SetMin
script->Execute("aabb.min = Vector3(0)");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(0)))");
script->Execute("AZTestAssert(aabb:GetCenter():IsClose(Vector3(2)))");
////SetMax
script->Execute("aabb.max = Vector3(6)");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(6)))");
script->Execute("AZTestAssert(aabb:GetCenter():IsClose(Vector3(3)))");
////GetXExtent
////GetYExtent
////GetZExtent
script->Execute("aabb:Set(Vector3(0), Vector3(1, 2, 3))");
script->Execute("AZTestAssertFloatClose(aabb:GetXExtent(), 1)");
script->Execute("AZTestAssertFloatClose(aabb:GetYExtent(), 2)");
script->Execute("AZTestAssertFloatClose(aabb:GetZExtent(), 3)");
////GetAsSphere
script->Execute("aabb:Set(Vector3(-2, 0, 0), Vector3(2, 0, 0))");
script->Execute("center, radius = aabb:GetAsSphere()");
script->Execute("AZTestAssert(center:IsClose(Vector3(0)))");
script->Execute("AZTestAssertFloatClose(radius,2)");
////Contains(Vector3)
script->Execute("aabb:Set(Vector3(-2), Vector3(2))");
script->Execute("AZTestAssert(aabb:Contains(Vector3(1)))");
////Contains(Aabb)
script->Execute("aabb:Set(Vector3(0), Vector3(3))");
script->Execute("aabb2 = Aabb.CreateFromMinMax(Vector3(1), Vector3(2))");
script->Execute("AZTestAssert(aabb:Contains(aabb2))");
script->Execute("AZTestAssert( not aabb2:Contains(aabb))");
////Overlaps
script->Execute("aabb:Set(Vector3(0), Vector3(2))");
script->Execute("aabb2:Set(Vector3(1), Vector3(3))");
script->Execute("AZTestAssert(aabb:Overlaps(aabb2))");
script->Execute("aabb2:Set(Vector3(5), Vector3(6))");
script->Execute("AZTestAssert( not aabb:Overlaps(aabb2))");
////Expand
script->Execute("aabb:Set(Vector3(0), Vector3(2))");
script->Execute("aabb:Expand(Vector3(1))");
script->Execute("AZTestAssert(aabb:GetCenter():IsClose(Vector3(1)))");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(-1)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(3)))");
////GetExpanded
script->Execute("aabb:Set(Vector3(-1), Vector3(1))");
script->Execute("aabb = aabb:GetExpanded(Vector3(9))");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(-10)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(10)))");
////AddPoint
script->Execute("aabb:Set(Vector3(-1), Vector3(1))");
script->Execute("aabb:AddPoint(Vector3(1))");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(-1)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(1)))");
script->Execute("aabb:AddPoint(Vector3(2))");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(-1)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(2)))");
////AddAabb
script->Execute("aabb:Set(Vector3(0), Vector3(2))");
script->Execute("aabb2:Set(Vector3(-2), Vector3(0))");
script->Execute("aabb:AddAabb(aabb2)");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(-2)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(2)))");
////GetDistance
script->Execute("aabb:Set(Vector3(-1), Vector3(1))");
script->Execute("AZTestAssertFloatClose(aabb:GetDistance(Vector3(2, 0, 0)),1)");
//// make sure a point inside the box returns zero, even if that point isn't the center.
script->Execute("AZTestAssertFloatClose(aabb:GetDistance(Vector3(0.5, 0, 0)),0)");
////GetClamped
script->Execute("aabb:Set(Vector3(0), Vector3(2))");
script->Execute("aabb2:Set(Vector3(1), Vector3(4))");
script->Execute("aabb = aabb:GetClamped(aabb2)");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(1)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(2)))");
////Clamp
script->Execute("aabb:Set(Vector3(0), Vector3(2))");
script->Execute("aabb2:Set(Vector3(-2), Vector3(1))");
script->Execute("aabb:Clamp(aabb2)");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(0)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(1)))");
////SetNull
script->Execute("aabb:SetNull()");
script->Execute("AZTestAssert( not aabb:IsValid())");
////Translate
script->Execute("aabb:Set(Vector3(-1), Vector3(1))");
script->Execute("aabb:Translate(Vector3(2))");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(1)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(3)))");
////GetTranslated
script->Execute("aabb:Set(Vector3(1), Vector3(3))");
script->Execute("aabb = aabb:GetTranslated(Vector3(-2))");
script->Execute("AZTestAssert(aabb.min:IsClose(Vector3(-1)))");
script->Execute("AZTestAssert(aabb.max:IsClose(Vector3(1)))");
////GetSurfaceArea
script->Execute("aabb:Set(Vector3(0), Vector3(1))");
script->Execute("AZTestAssertFloatClose(aabb:GetSurfaceArea(), 6)");
////IsFinite
script->Execute("infinity = math.huge");
script->Execute("infiniteV3 = Vector3(infinity, infinity, infinity)");
script->Execute("aabb:Set(Vector3(0),infiniteV3)");
//// A bounding box is only invalid if the min is greater than the max.
//// A bounding box with an infinite min or max is valid as long as this is true.
script->Execute("AZTestAssert(aabb:IsValid())");
script->Execute("AZTestAssert( not aabb:IsFinite())");
}
TEST_F(ScriptMathTest, LuaAabbTransformCompareTest)
{
// create aabb
script->Execute("min = Vector3(-100,50,0)");
script->Execute("max = Vector3(120,300,50)");
script->Execute("aabb = Aabb.CreateFromMinMax(min,max)");
// make the transformation matrix
script->Execute("tm = Transform.CreateRotationX(1)");
script->Execute("tm:SetTranslation(100,0,-50)");
// transform
script->Execute("obb = aabb:GetTransformedObb(tm)");
script->Execute("transAabb = aabb:GetTransformedAabb(tm)");
script->Execute("transAabb2 = Aabb.CreateFromObb(obb)");
script->Execute("aabb:ApplyTransform(tm)");
// compare the transformations
script->Execute("AZTestAssert(transAabb.min:IsClose(transAabb2.min))");
script->Execute("AZTestAssert(transAabb.max:IsClose(transAabb2.max))");
script->Execute("AZTestAssert(aabb.min:IsClose(transAabb.min))");
script->Execute("AZTestAssert(aabb.max:IsClose(transAabb.max))");
}
TEST_F(ScriptMathTest, LuaObbTest)
{
//CreateFromPositionRotationAndHalfLengths
//GetPosition
//GetAxisX
//GetAxisY
//GetAxisZ
//GetAxis
//GetHalfLengthX
//GetHalfLengthY
//GetHalfLengthZ
//GetHalfLength
script->Execute("position = Vector3(1, 2, 3)");
script->Execute("rotation = Quaternion.CreateRotationZ(Math.DegToRad(45))");
script->Execute("halfLengths = Vector3(0.5)");
script->Execute("obb = Obb.CreateFromPositionRotationAndHalfLengths(position, rotation, halfLengths)");
script->Execute("AZTestAssert(obb.position:IsClose(position))");
script->Execute("AZTestAssert(obb:GetAxis(0):IsClose(Vector3(0.7071, 0.7071, 0.0)))");
script->Execute("AZTestAssert(obb:GetAxis(1):IsClose(Vector3(-0.7071, 0.7071, 0.0)))");
script->Execute("AZTestAssert(obb:GetAxis(2):IsClose(Vector3(0.0, 0.0, 1.0)))");
script->Execute("AZTestAssert(obb.halfLengths:IsClose(halfLengths))");
script->Execute("AZTestAssertFloatClose(obb:GetHalfLengthX(), 0.5)");
script->Execute("AZTestAssertFloatClose(obb:GetHalfLengthY(), 0.5)");
script->Execute("AZTestAssertFloatClose(obb:GetHalfLengthZ(), 0.5)");
//CreateFromAabb
script->Execute("min = Vector3(-100, 50, 0)");
script->Execute("max = Vector3(120, 300, 50)");
script->Execute("aabb = Aabb.CreateFromMinMax(min, max)");
script->Execute("obb = Obb.CreateFromAabb(aabb)");
script->Execute("AZTestAssert(obb.position:IsClose(Vector3(10, 175, 25)))");
script->Execute("AZTestAssert(obb:GetAxisX():IsClose(Vector3(1, 0, 0)))");
script->Execute("AZTestAssert(obb:GetAxisY():IsClose(Vector3(0, 1, 0)))");
script->Execute("AZTestAssert(obb:GetAxisZ():IsClose(Vector3(0, 0, 1)))");
// Transform * Obb
script->Execute("obb = Obb.CreateFromPositionRotationAndHalfLengths(position, rotation, halfLengths)");
script->Execute("transform = Transform.CreateRotationY(Math.DegToRad(90))");
script->Execute("obb = transform * obb");
script->Execute("AZTestAssert(obb.position:IsClose(Vector3(3, 2, -1)))");
script->Execute("AZTestAssert(obb:GetAxisX():IsClose(Vector3(0.0, 0.7071, -0.7071)))");
script->Execute("AZTestAssert(obb:GetAxisY():IsClose(Vector3(0.0, 0.7071, 0.7071)))");
script->Execute("AZTestAssert(obb:GetAxisZ():IsClose(Vector3(1.0, 0.0, 0.0)))");
//SetPosition
//SetHalfLengthX
//SetHalfLengthY
//SetHalfLengthZ
//SetHalfLength
script->Execute("obb.position = position");
script->Execute("AZTestAssert(obb.position:IsClose(position))");
script->Execute("obb:SetHalfLengthX(2)");
script->Execute("AZTestAssertFloatClose(obb:GetHalfLengthX(), 2)");
script->Execute("obb:SetHalfLengthY(3)");
script->Execute("AZTestAssertFloatClose(obb:GetHalfLengthY(), 3)");
script->Execute("obb:SetHalfLengthZ(4)");
script->Execute("AZTestAssertFloatClose(obb:GetHalfLengthZ(), 4)");
script->Execute("obb:SetHalfLength(2, 5)");
script->Execute("AZTestAssertFloatClose(obb:GetHalfLength(2), 5)");
//IsFinite
script->Execute("obb = Obb.CreateFromPositionRotationAndHalfLengths(position, rotation, halfLengths)");
script->Execute("AZTestAssert(obb:IsFinite())");
script->Execute("infinity = math.huge");
script->Execute("infiniteV3 = Vector3(infinity, infinity, infinity)");
// Test to make sure that setting properties of the bounding box
// properly mark it as infinite, and when reset it becomes finite again.
script->Execute("obb.position = infiniteV3");
script->Execute("AZTestAssert( not obb:IsFinite())");
script->Execute("obb.position = position");
script->Execute("AZTestAssert(obb:IsFinite())");
script->Execute("obb:SetHalfLengthX(infinity)");
script->Execute("AZTestAssert( not obb:IsFinite())");
script->Execute("obb:SetHalfLengthX(2.0)");
script->Execute("AZTestAssert(obb:IsFinite())");
}
TEST_F(ScriptMathTest, LuaMathHelpersTest)
{
script->Execute(R"LUA(
AZTestAssert(Math.IsClose(3.0, 3.0, FloatEpsilon))
AZTestAssert(Math.IsClose(3.0, 3.0))
AZTestAssert(Math.IsClose(3.20345678, 3.20345679))
AZTestAssert(not Math.IsClose(3.0, 4.0, FloatEpsilon))
AZTestAssert(not Math.IsClose(3.0, 4.0))
AZTestAssert(Math.IsClose(1.0, 5.0, 10.0))
)LUA");
}
}
Reference in New Issue View Git Blame Copy Permalink