Miscellaneous changes

1 files changed, 347 insertions, 0 deletions

diff --git a/tests/corelib/numerics/BasicAmount.cc b/tests/corelib/numerics/BasicAmount.cc
new file mode 100644
index 00000000..5f634cdf
--- /dev/null
+++ b/tests/corelib/numerics/BasicAmount.cc
@@ -0,0 +1,347 @@
+#include "BasicAmountTestCase.h"
+#include "ledger.h"
+
+using namespace ledger;
+
+CPPUNIT_TEST_SUITE_NAMED_REGISTRATION(BasicAmountTestCase, "numerics");
+
+void BasicAmountTestCase::setUp() {}
+void BasicAmountTestCase::tearDown() {}
+
+void BasicAmountTestCase::testConstructors()
+{
+  amount_t x0;
+  amount_t x1(123456L);
+  amount_t x2(123456UL);
+  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 x10(x6);
+  amount_t x11(x8);
+
+  assertEqual(amount_t(0L), x0);
+  assertEqual(x2, x1);
+  assertEqual(x5, x1);
+  assertEqual(x7, x1);
+  assertEqual(x6, x8);
+  assertEqual(x10, x6);
+  assertEqual(x11, x10);
+  assertEqual(amount_t(1L), x4);
+}
+
+void BasicAmountTestCase::testNegation()
+{
+  amount_t x0;
+  amount_t x1(-123456L);
+  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(- x6);
+
+  assertEqual(amount_t(0L), x0);
+  assertEqual(x5, x1);
+  assertEqual(x7, x1);
+  assertEqual(x6, x8);
+  assertEqual(- x6, x9);
+  assertEqual(x6.negated(), x9);
+
+  amount_t x10(x9);
+  x10.negate();
+
+  assertEqual(x6, x10);
+}
+
+void BasicAmountTestCase::testAssignment()
+{
+  amount_t x0;
+  amount_t x1  = 123456L;
+  amount_t x2  = 123456UL;
+  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  = x6;
+  amount_t x10 = amount_t(x6);
+
+  assertEqual(amount_t(0L), x0);
+  assertEqual(x2, x1);
+  assertEqual(x5, x1);
+  assertEqual(x7, x1);
+  assertEqual(x8, x6);
+  assertEqual(x10, x6);
+  assertEqual(amount_t(1L), x4);
+  assertEqual(x10, x9);
+
+  x0  = amount_t();
+  x1  = 123456L;
+  x2  = 123456UL;
+  x4  = true;
+  x5  = "123456";
+  x6  = "123.456";
+  x7  = std::string("123456");
+  x8  = std::string("123.456");
+  x9  = x6;
+  x10 = amount_t(x6);
+
+  assertEqual(amount_t(0L), x0);
+  assertEqual(x2, x1);
+  assertEqual(x5, x1);
+  assertEqual(x7, x1);
+  assertEqual(x8, x6);
+  assertEqual(x10, x6);
+  assertEqual(amount_t(1L), x4);
+  assertEqual(x10, x9);
+}
+
+void BasicAmountTestCase::testEquality()
+{
+  amount_t x1(123456L);
+  amount_t x2(456789L);
+  amount_t x3(333333L);
+  amount_t x5("123456.0");
+
+  CPPUNIT_ASSERT(x1 == 123456L);
+  CPPUNIT_ASSERT(x1 != x2);
+  CPPUNIT_ASSERT(x1 == (x2 - x3));
+  CPPUNIT_ASSERT(x1 == x5);
+}
+
+void BasicAmountTestCase::testIntegerAddition()
+{
+  amount_t x1(123L);
+  amount_t y1(456L);
+
+  assertEqual(amount_t(579L), x1 + y1);
+  assertEqual(amount_t(579L), x1 + 456L);
+  assertEqual(amount_t(579L), 456L + x1);
+
+  x1 += amount_t(456L);
+  assertEqual(amount_t(579L), x1);
+  x1 += 456L;
+  assertEqual(amount_t(1035L), x1);
+
+  amount_t x3(true);
+  amount_t y3(true);
+
+  assertEqual(amount_t(2L), x3 + y3);
+  assertEqual(amount_t(2L), x3 + true);
+
+  amount_t x4("123456789123456789123456789");
+
+  assertEqual(amount_t("246913578246913578246913578"), x4 + x4);
+}
+
+void BasicAmountTestCase::testFractionalAddition()
+{
+  amount_t x1("123.123");
+  amount_t y1("456.456");
+
+  assertEqual(amount_t("579.579"), x1 + y1);
+  assertEqual(amount_t("579.579"), x1 + amount_t("456.456"));
+  assertEqual(amount_t("579.579"), amount_t("456.456") + x1);
+
+  x1 += amount_t("456.456");
+  assertEqual(amount_t("579.579"), x1);
+  x1 += amount_t("456.456");
+  assertEqual(amount_t("1036.035"), x1);
+  x1 += 456L;
+  assertEqual(amount_t("1492.035"), x1);
+
+  amount_t x2("123456789123456789.123456789123456789");
+
+  assertEqual(amount_t("246913578246913578.246913578246913578"), x2 + x2);
+}
+
+void BasicAmountTestCase::testIntegerSubtraction()
+{
+  amount_t x1(123L);
+  amount_t y1(456L);
+
+  assertEqual(amount_t(333L), y1 - x1);
+  assertEqual(amount_t(-333L), x1 - y1);
+  assertEqual(amount_t(23L), x1 - 100L);
+  assertEqual(amount_t(-23L), 100L - x1);
+
+  x1 -= amount_t(456L);
+  assertEqual(amount_t(-333L), x1);
+  x1 -= 456L;
+  assertEqual(amount_t(-789L), x1);
+
+  amount_t x3(true);
+  amount_t y3(true);
+
+  assertEqual(amount_t(false), x3 - y3);
+
+  amount_t x4("123456789123456789123456789");
+  amount_t y4("8238725986235986");
+
+  assertEqual(amount_t("123456789115218063137220803"), x4 - y4);
+  assertEqual(amount_t("-123456789115218063137220803"), y4 - x4);
+}
+
+void BasicAmountTestCase::testFractionalSubtraction()
+{
+  amount_t x1("123.123");
+  amount_t y1("456.456");
+
+  assertEqual(amount_t("-333.333"), x1 - y1);
+  assertEqual(amount_t("333.333"), y1 - x1);
+
+  x1 -= amount_t("456.456");
+  assertEqual(amount_t("-333.333"), x1);
+  x1 -= amount_t("456.456");
+  assertEqual(amount_t("-789.789"), x1);
+  x1 -= 456L;
+  assertEqual(amount_t("-1245.789"), x1);
+
+  amount_t x2("123456789123456789.123456789123456789");
+  amount_t y2("9872345982459.248974239578");
+
+  assertEqual(amount_t("123446916777474329.874482549545456789"), x2 - y2);
+  assertEqual(amount_t("-123446916777474329.874482549545456789"), y2 - x2);
+}
+
+void BasicAmountTestCase::testIntegerMultiplication()
+{
+  amount_t x1(123L);
+  amount_t y1(456L);
+
+  assertEqual(amount_t(0L), x1 * 0L);
+  assertEqual(amount_t(0L), amount_t(0L) * x1);
+  assertEqual(amount_t(0L), 0L * x1);
+  assertEqual(x1, x1 * 1L);
+  assertEqual(x1, amount_t(1L) * x1);
+  assertEqual(x1, 1L * x1);
+  assertEqual(- x1, x1 * -1L);
+  assertEqual(- x1, amount_t(-1L) * x1);
+  assertEqual(- x1, -1L * x1);
+  assertEqual(amount_t(56088L), x1 * y1);
+  assertEqual(amount_t(56088L), y1 * x1);
+  assertEqual(amount_t(56088L), x1 * 456L);
+  assertEqual(amount_t(56088L), amount_t(456L) * x1);
+  assertEqual(amount_t(56088L), 456L * x1);
+
+  x1 *= amount_t(123L);
+  assertEqual(amount_t(15129L), x1);
+  x1 *= 123L;
+  assertEqual(amount_t(1860867L), x1);
+
+  amount_t x3(true);
+  amount_t y3(true);
+
+  assertEqual(amount_t(true), x3 * y3);
+
+  amount_t x4("123456789123456789123456789");
+
+  assertEqual(amount_t("15241578780673678546105778281054720515622620750190521"),
+	      x4 * x4);
+}
+
+void BasicAmountTestCase::testFractionalMultiplication()
+{
+  amount_t x1("123.123");
+  amount_t y1("456.456");
+
+  assertEqual(amount_t(0L), x1 * 0L);
+  assertEqual(amount_t(0L), amount_t(0L) * x1);
+  assertEqual(amount_t(0L), 0L * x1);
+  assertEqual(x1, x1 * 1L);
+  assertEqual(x1, amount_t(1L) * x1);
+  assertEqual(x1, 1L * x1);
+  assertEqual(- x1, x1 * -1L);
+  assertEqual(- x1, amount_t(-1L) * x1);
+  assertEqual(- x1, -1L * x1);
+  assertEqual(amount_t("56200.232088"), x1 * y1);
+  assertEqual(amount_t("56200.232088"), y1 * x1);
+  assertEqual(amount_t("56200.232088"), x1 * amount_t("456.456"));
+  assertEqual(amount_t("56200.232088"), amount_t("456.456") * x1);
+
+  x1 *= amount_t("123.123");
+  assertEqual(amount_t("15159.273129"), x1);
+  x1 *= amount_t("123.123");
+  assertEqual(amount_t("1866455.185461867"), x1);
+  x1 *= 123L;
+  assertEqual(amount_t("229573987.811809641"), x1);
+
+  amount_t x2("123456789123456789.123456789123456789");
+
+  assertEqual(amount_t("15241578780673678546105778311537878.046486820281054720515622620750190521"),
+	      x2 * x2);
+}
+
+void BasicAmountTestCase::testIntegerDivision()
+{
+  amount_t x1(123L);
+  amount_t y1(456L);
+
+  assertThrow(x1 / 0L, amount_error *);
+  assertEqual(amount_t(0L), amount_t(0L) / x1);
+  assertEqual(amount_t(0L), 0L / x1);
+  assertEqual(x1, x1 / 1L);
+  assertEqual(amount_t("0.008130"), amount_t(1L) / x1);
+  assertEqual(amount_t("0.008130"), 1L / x1);
+  assertEqual(- x1, x1 / -1L);
+  assertEqual(- amount_t("0.008130"), amount_t(-1L) / x1);
+  assertEqual(- amount_t("0.008130"), -1L / x1);
+  assertEqual(amount_t("0.269736"), x1 / y1);
+  assertEqual(amount_t("3.707317"), y1 / x1);
+  assertEqual(amount_t("0.269736"), x1 / 456L);
+  assertEqual(amount_t("3.707317"), amount_t(456L) / x1);
+  assertEqual(amount_t("3.707317"), 456L / x1);
+
+  x1 /= amount_t(456L);
+  assertEqual(amount_t("0.269736"), x1);
+  x1 /= 456L;
+  assertEqual(amount_t("0.000591526315789473"), x1);
+
+  amount_t x4("123456789123456789123456789");
+  amount_t y4("56");
+
+  assertEqual(amount_t(1L), x4 / x4);
+  assertEqual(amount_t("2204585520061728377204585.517857"), x4 / y4);
+}
+
+void BasicAmountTestCase::testFractionalDivision()
+{
+  amount_t x1("123.123");
+  amount_t y1("456.456");
+
+  assertThrow(x1 / 0L, amount_error *);
+  assertEqual(amount_t("0.00812195"), amount_t("1.0") / x1);
+  assertEqual(x1, x1 / amount_t("1.0"));
+  assertEqual(amount_t("0.00812195"), amount_t("1.0") / x1);
+  assertEqual(- x1, x1 / amount_t("-1.0"));
+  assertEqual(- amount_t("0.00812195"), amount_t("-1.0") / x1);
+  assertEqual(amount_t("0.269736842105"), x1 / y1);
+  assertEqual(amount_t("3.707317073170"), y1 / x1);
+  assertEqual(amount_t("0.269736842105"), x1 / amount_t("456.456"));
+  assertEqual(amount_t("3.707317073170"), amount_t("456.456") / x1);
+
+  x1 /= amount_t("456.456");
+  assertEqual(amount_t("0.269736842105"), x1);
+  x1 /= amount_t("456.456");
+  assertEqual(amount_t("0.0005909372252856792330476541"), x1);
+  x1 /= 456L;
+  assertEqual(amount_t("0.00000129591496773175270405187302631578947368421052631578947368421"), x1);
+
+  amount_t x4("1234567891234567.89123456789");
+  amount_t y4("56.789");
+
+  assertEqual(amount_t("1.0"), x4 / x4);
+  assertEqual(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