#include "BasicAmountTest.h"
#include "ledger.h"

using namespace ledger;

CPPUNIT_TEST_SUITE_NAMED_REGISTRATION(BasicAmountTest, "numerics");

void BasicAmountTest::setUp() {}
void BasicAmountTest::tearDown() {}

void BasicAmountTest::testConstructors()
{
  amount_t x0;
  amount_t x1(123456L);
  amount_t x2(123456UL);
  amount_t x3(123.456);
  amount_t x4(true);
  amount_t x5("123456");
  amount_t x6("123.456");
  amount_t x7(std::string("123456"));
  amount_t x8(std::string("123.456"));
  amount_t x9(x3);
  amount_t x10(x6);
  amount_t x11(x8);

  assertEquals(amount_t(0L), x0);
  assertEquals(x2, x1);
  assertEquals(x5, x1);
  assertEquals(x7, x1);
  assertEquals(x6, x3);
  assertEquals(x8, x3);
  assertEquals(x10, x3);
  assertEquals(amount_t(1L), x4);
  assertEquals(x10, x9);
}

void BasicAmountTest::testNegation()
{
  amount_t x0;
  amount_t x1(-123456L);
  amount_t x3(-123.456);
  amount_t x5("-123456");
  amount_t x6("-123.456");
  amount_t x7(std::string("-123456"));
  amount_t x8(std::string("-123.456"));
  amount_t x9(- x3);

  assertEquals(amount_t(0L), x0);
  assertEquals(x5, x1);
  assertEquals(x7, x1);
  assertEquals(x6, x3);
  assertEquals(x8, x3);
  assertEquals(- x6, x9);
  assertEquals(x3.negated(), x9);

  amount_t x10(x9);
  x10.negate();

  assertEquals(x3, x10);
}

void BasicAmountTest::testAssignment()
{
  amount_t x0;
  amount_t x1  = 123456L;
  amount_t x2  = 123456UL;
  amount_t x3  = 123.456;
  amount_t x4  = true;
  amount_t x5  = "123456";
  amount_t x6  = "123.456";
  amount_t x7  = std::string("123456");
  amount_t x8  = std::string("123.456");
  amount_t x9  = x3;
  amount_t x10 = amount_t(x6);

  assertEquals(amount_t(0L), x0);
  assertEquals(x2, x1);
  assertEquals(x5, x1);
  assertEquals(x7, x1);
  assertEquals(x6, x3);
  assertEquals(x8, x3);
  assertEquals(x10, x3);
  assertEquals(amount_t(1L), x4);
  assertEquals(x10, x9);

  x0  = amount_t();
  x1  = 123456L;
  x2  = 123456UL;
  x3  = 123.456;
  x4  = true;
  x5  = "123456";
  x6  = "123.456";
  x7  = std::string("123456");
  x8  = std::string("123.456");
  x9  = x3;
  x10 = amount_t(x6);

  assertEquals(amount_t(0L), x0);
  assertEquals(x2, x1);
  assertEquals(x5, x1);
  assertEquals(x7, x1);
  assertEquals(x6, x3);
  assertEquals(x8, x3);
  assertEquals(x10, x3);
  assertEquals(amount_t(1L), x4);
  assertEquals(x10, x9);
}

void BasicAmountTest::testEquality()
{
  amount_t x1(123456L);
  amount_t x2(456789L);
  amount_t x3(333333L);
  amount_t x4(123456.0);
  amount_t x5("123456.0");
  amount_t x6(123456.0F);

  CPPUNIT_ASSERT(x1 == 123456L);
  CPPUNIT_ASSERT(x1 != x2);
  CPPUNIT_ASSERT(x1 == (x2 - x3));
  CPPUNIT_ASSERT(x1 == x4);
  CPPUNIT_ASSERT(x4 == x5);
  CPPUNIT_ASSERT(x4 == x6);
}

void BasicAmountTest::testIntegerAddition()
{
  amount_t x1(123L);
  amount_t y1(456L);

  assertEquals(amount_t(579L), x1 + y1);
  assertEquals(amount_t(579L), x1 + 456L);

  x1 += amount_t(456L);
  assertEquals(amount_t(579L), x1);
  x1 += 456L;
  assertEquals(amount_t(1035L), x1);

  amount_t x3(true);
  amount_t y3(true);

  assertEquals(amount_t(2L), x3 + y3);
  assertEquals(amount_t(2L), x3 + true);

  amount_t x4("123456789123456789123456789");

  assertEquals(amount_t("246913578246913578246913578"), x4 + x4);
}

void BasicAmountTest::testFractionalAddition()
{
  amount_t x1(123.123);
  amount_t y1(456.456);

  assertEquals(amount_t(579.579), x1 + y1);
  assertEquals(amount_t(579.579), x1 + 456.456);

  x1 += amount_t(456.456);
  assertEquals(amount_t(579.579), x1);
  x1 += 456.456;
  assertEquals(amount_t(1036.035), x1);
  x1 += 456L;
  assertEquals(amount_t(1492.035), x1);

  amount_t x2("123456789123456789.123456789123456789");

  assertEquals(amount_t("246913578246913578.246913578246913578"), x2 + x2);
}

void BasicAmountTest::testIntegerSubtraction()
{
  amount_t x1(123L);
  amount_t y1(456L);

  assertEquals(amount_t(333L), y1 - x1);
  assertEquals(amount_t(-333L), x1 - y1);

  x1 -= amount_t(456L);
  assertEquals(amount_t(-333L), x1);
  x1 -= 456L;
  assertEquals(amount_t(-789L), x1);

  amount_t x3(true);
  amount_t y3(true);

  assertEquals(amount_t(false), x3 - y3);

  amount_t x4("123456789123456789123456789");
  amount_t y4("8238725986235986");

  assertEquals(amount_t("123456789115218063137220803"), x4 - y4);
  assertEquals(amount_t("-123456789115218063137220803"), y4 - x4);
}

void BasicAmountTest::testFractionalSubtraction()
{
  amount_t x1(123.123);
  amount_t y1(456.456);

  assertEquals(amount_t(-333.333), x1 - y1);
  assertEquals(amount_t(333.333), y1 - x1);

  x1 -= amount_t(456.456);
  assertEquals(amount_t(-333.333), x1);
  x1 -= 456.456;
  assertEquals(amount_t(-789.789), x1);
  x1 -= 456L;
  assertEquals(amount_t(-1245.789), x1);

  amount_t x2("123456789123456789.123456789123456789");
  amount_t y2("9872345982459.248974239578");

  assertEquals(amount_t("123446916777474329.874482549545456789"), x2 - y2);
  assertEquals(amount_t("-123446916777474329.874482549545456789"), y2 - x2);
}

void BasicAmountTest::testIntegerMultiplication()
{
  amount_t x1(123L);
  amount_t y1(456L);

  assertEquals(amount_t(0L), x1 * 0L);
  assertEquals(amount_t(0L), amount_t(0L) * x1);
  assertEquals(x1, x1 * 1L);
  assertEquals(x1, amount_t(1L) * x1);
  assertEquals(- x1, x1 * -1L);
  assertEquals(- x1, amount_t(-1L) * x1);
  assertEquals(amount_t(56088L), x1 * y1);
  assertEquals(amount_t(56088L), y1 * x1);
  assertEquals(amount_t(56088L), x1 * 456L);
  assertEquals(amount_t(56088L), amount_t(456L) * x1);

  x1 *= amount_t(123L);
  assertEquals(amount_t(15129L), x1);
  x1 *= 123L;
  assertEquals(amount_t(1860867L), x1);

  amount_t x3(true);
  amount_t y3(true);

  assertEquals(amount_t(true), x3 * y3);

  amount_t x4("123456789123456789123456789");

  assertEquals(amount_t("15241578780673678546105778281054720515622620750190521"),
	       x4 * x4);
}

void BasicAmountTest::testFractionalMultiplication()
{
  amount_t x1(123.123);
  amount_t y1(456.456);

  assertEquals(amount_t(0L), x1 * 0L);
  assertEquals(amount_t(0L), amount_t(0L) * x1);
  assertEquals(x1, x1 * 1L);
  assertEquals(x1, amount_t(1L) * x1);
  assertEquals(- x1, x1 * -1L);
  assertEquals(- x1, amount_t(-1L) * x1);
  assertEquals(amount_t("56200.232088"), x1 * y1);
  assertEquals(amount_t("56200.232088"), y1 * x1);
  assertEquals(amount_t("56200.232088"), x1 * 456.456);
  assertEquals(amount_t("56200.232088"), amount_t(456.456) * x1);

  x1 *= amount_t(123.123);
  assertEquals(amount_t("15159.273129"), x1);
  x1 *= 123.123;
  assertEquals(amount_t("1866455.185461867"), x1);
  x1 *= 123L;
  assertEquals(amount_t("229573987.811809641"), x1);

  amount_t x2("123456789123456789.123456789123456789");

  assertEquals(amount_t("15241578780673678546105778311537878.046486820281054720515622620750190521"),
	       x2 * x2);
}

void BasicAmountTest::testIntegerDivision()
{
  amount_t x1(123L);
  amount_t y1(456L);

  assertThrow(x1 / 0L, amount_error *);
  assertEquals(amount_t(0L), amount_t(0L) / x1);
  assertEquals(x1, x1 / 1L);
  assertEquals(amount_t("0.008130"), amount_t(1L) / x1);
  assertEquals(- x1, x1 / -1L);
  assertEquals(- amount_t("0.008130"), amount_t(-1L) / x1);
  assertEquals(amount_t("0.269736"), x1 / y1);
  assertEquals(amount_t("3.707317"), y1 / x1);
  assertEquals(amount_t("0.269736"), x1 / 456L);
  assertEquals(amount_t("3.707317"), amount_t(456L) / x1);

  x1 /= amount_t(456L);
  assertEquals(amount_t("0.269736"), x1);
  x1 /= 456L;
  assertEquals(amount_t("0.000591526315789473"), x1);

  amount_t x4("123456789123456789123456789");
  amount_t y4("56");

  assertEquals(amount_t(1L), x4 / x4);
  assertEquals(amount_t("2204585520061728377204585.517857"), x4 / y4);
}

void BasicAmountTest::testFractionalDivision()
{
  amount_t x1(123.123);
  amount_t y1(456.456);

  assertThrow(x1 / 0L, amount_error *);
  assertEquals(amount_t("0.008121"), amount_t(1.0) / x1);
  assertEquals(x1, x1 / 1.0);
  assertEquals(amount_t("0.008121"), amount_t(1.0) / x1);
  assertEquals(- x1, x1 / -1.0);
  assertEquals(- amount_t("0.008121"), amount_t(-1.0) / x1);
  assertEquals(amount_t("0.269736842105"), x1 / y1);
  assertEquals(amount_t("3.707317073170"), y1 / x1);
  assertEquals(amount_t("0.269736842105"), x1 / 456.456);
  assertEquals(amount_t("3.707317073170"), amount_t(456.456) / x1);

  x1 /= amount_t(456.456);
  assertEquals(amount_t("0.269736842105"), x1);
  x1 /= 456.456;
  assertEquals(amount_t("0.0005909372252856792330476541"), x1);
  x1 /= 456L;
  assertEquals(amount_t("0.00000129591496773175270405187302631578947368421052631578947368421"), x1);

  amount_t x4("1234567891234567.89123456789");
  amount_t y4("56.789");

  assertEquals(amount_t(1.0), x4 / x4);
  assertEquals(amount_t("21739560323910.7554497273748437197344556164"),
	       x4 / y4);
}

// round
// conversion
// truth tests
// test for real zero
// comparison operators
// sign check
// abs
// reduce
// printing to a string buffer