2 * Name : test_earth_time *
3 * Author : Chris Koeritz *
5 * Copyright (c) 2007-$now By Author. This program is free software; you can *
6 * redistribute it and/or modify it under the terms of the GNU General Public *
7 * License as published by the Free Software Foundation; either version 2 of *
8 * the License or (at your option) any later version. This is online at: *
9 * http://www.fsf.org/copyleft/gpl.html *
10 * Please send any updates to: fred@gruntose.com *
13 #define DEBUG_EARTH_TIME
14 // set this to enable debugging features of the string class.
16 #include <application/hoople_main.h>
17 #include <basis/functions.h>
18 #include <basis/guards.h>
19 #include <basis/astring.h>
20 #include <loggers/file_logger.h>
21 #include <mathematics/chaos.h>
22 #include <structures/static_memory_gremlin.h>
23 #include <timely/earth_time.h>
24 #include <timely/time_stamp.h>
25 #include <unit_test/unit_base.h>
31 using namespace application;
32 using namespace basis;
33 using namespace mathematics;
34 using namespace filesystem;
35 using namespace loggers;
36 using namespace structures;
37 using namespace textual;
38 using namespace timely;
39 using namespace unit_test;
42 #define LOG(s) CLASS_EMERGENCY_LOG(program_wide_logger::get(), s)
44 #define BASE_LOG(s) STAMPED_EMERGENCY_LOG(program_wide_logger::get(), s)
46 const int TIME_FORMAT = clock_time::MERIDIAN | clock_time::SECONDS
47 | clock_time::MILLISECONDS;
48 // the way we like to see our seconds get printed out.
52 class test_earth_time : virtual public unit_base, virtual public application_shell
56 DEFINE_CLASS_NAME("test_earth_time");
58 virtual int execute();
67 void test_earth_time::run_test_01()
69 FUNCDEF("run_test_01");
70 // this test makes sure that clock_time's normalize is working as expected.
72 time_locus checker_1(clock_time(12, 0, 60), day_in_year(), 2007);
73 clock_time::normalize(checker_1);
74 time_locus compare_1(clock_time(12, 1, 0), day_in_year(), 2007);
75 //BASE_LOG(astring("a=") + checker_1.text_form(TIME_FORMAT));
76 //BASE_LOG(astring("b=") + compare_1.text_form(TIME_FORMAT));
77 ASSERT_EQUAL(checker_1, compare_1, "normalize should not fail test 1");
79 time_locus checker_2(clock_time(12, 0, -1), day_in_year(), 2007);
80 clock_time::normalize(checker_2);
81 time_locus compare_2(clock_time(11, 59, 59), day_in_year(), 2007);
82 ASSERT_EQUAL(checker_2, compare_2, "normalize should not fail test 2");
84 time_locus checker_3(clock_time(11, 59, 61), day_in_year(), 2007);
85 clock_time::normalize(checker_3);
86 time_locus compare_3(clock_time(12, 00, 01), day_in_year(), 2007);
87 ASSERT_EQUAL(checker_3, compare_3, "normalize should not fail test 3");
89 time_locus checker_4(clock_time(12, 54, -61), day_in_year(), 2007);
90 clock_time::normalize(checker_4);
91 time_locus compare_4(clock_time(12, 52, 59), day_in_year(), 2007);
92 ASSERT_EQUAL(checker_4, compare_4, "normalize should not fail test 4");
94 time_locus checker_5(clock_time(12, -32, -62), day_in_year(), 2007);
95 clock_time::normalize(checker_5);
96 time_locus compare_5(clock_time(11, 26, 58), day_in_year(), 2007);
97 ASSERT_EQUAL(checker_5, compare_5, "normalize should not fail test 5");
100 void test_earth_time::run_test_02()
102 FUNCDEF("run_test_02");
103 // this test makes sure that day_in_year's normalize is working as expected.
105 time_locus checker_1(clock_time(0, 0, -1), day_in_year(JANUARY, 1), 2007);
106 time_locus::normalize(checker_1);
107 time_locus compare_1(clock_time(23, 59, 59), day_in_year(DECEMBER, 31), 2006);
108 //BASE_LOG(astring("a=") + checker_1.text_form(TIME_FORMAT));
109 //BASE_LOG(astring("b=") + compare_1.text_form(TIME_FORMAT));
110 ASSERT_EQUAL(checker_1, compare_1, "normalize should not fail test 1");
112 time_locus checker_2(clock_time(23, 59, 60), day_in_year(DECEMBER, 31), 2007);
113 time_locus::normalize(checker_2);
114 time_locus compare_2(clock_time(0, 0, 0), day_in_year(JANUARY, 1), 2008);
115 ASSERT_EQUAL(checker_2, compare_2, "normalize should not fail test 2");
120 // test lotso things.
124 void test_earth_time::run_test_03()
126 FUNCDEF("run_test_03");
127 // test out the now and greenwich_now methods.
129 //hmmm: what are some ways to test this?
131 time_locus curr_now = now();
132 LOG(astring("now() returned locus: ") + curr_now.text_form_long(clock_time::MILITARY, day_in_year::LONG_MONTH | day_in_year::INCLUDE_DAY, time_locus::LONG_YEAR));
134 time_locus curr_green = greenwich_now();
135 LOG(astring("greenwich_now() returned locus: ") + curr_green.text_form_long(clock_time::MILITARY, day_in_year::LONG_MONTH | day_in_year::INCLUDE_DAY, time_locus::LONG_YEAR));
140 int test_earth_time::execute()
148 return final_report();
153 HOOPLE_MAIN(test_earth_time, )