3 //some unused features are still in the wrapper, unconverted
8 #include "timevalops.h"
14 #define TEST_ASSERT_EQUAL_timeval(a, b) { \
15 TEST_ASSERT_EQUAL_MESSAGE(a.tv_sec, b.tv_sec, "Field tv_sec"); \
16 TEST_ASSERT_EQUAL_MESSAGE(a.tv_usec, b.tv_usec, "Field tv_usec"); \
20 static u_int32 my_tick_to_tsf(u_int32 ticks);
21 static u_int32 my_tsf_to_tick(u_int32 tsf);
32 struct timeval timeval_init( time_t hi, long lo);
33 const bool timeval_isValid(struct timeval V);
34 l_fp l_fp_init(int32 i, u_int32 f);
35 bool AssertTimevalClose(const struct timeval m, const struct timeval n, const struct timeval limit);
36 bool AssertFpClose(const l_fp m, const l_fp n, const l_fp limit);
39 void test_Helpers1(void);
40 void test_Normalise(void);
41 void test_SignNoFrac(void);
42 void test_SignWithFrac(void);
43 void test_CmpFracEQ(void);
44 void test_CmpFracGT(void);
45 void test_CmpFracLT(void);
46 void test_AddFullNorm(void);
47 void test_AddFullOflow1(void);
48 void test_AddUsecNorm(void);
49 void test_AddUsecOflow1(void);
50 void test_SubFullNorm(void);
51 void test_SubFullOflow(void);
52 void test_SubUsecNorm(void);
53 void test_SubUsecOflow(void);
55 void test_AbsNoFrac(void);
56 void test_AbsWithFrac(void);
57 void test_Helpers2(void);
58 void test_ToLFPbittest(void);
59 void test_ToLFPrelPos(void);
60 void test_ToLFPrelNeg(void);
61 void test_ToLFPabs(void);
62 void test_FromLFPbittest(void);
63 void test_FromLFPrelPos(void);
64 void test_FromLFPrelNeg(void);
65 void test_LFProundtrip(void);
66 void test_ToString(void);
69 //**********************************MY CUSTOM FUNCTIONS***********************
82 timeval_init(time_t hi, long lo)
94 timeval_isValid(struct timeval V)
97 return V.tv_usec >= 0 && V.tv_usec < 1000000;
102 l_fp_init(int32 i, u_int32 f)
114 AssertTimevalClose(const struct timeval m, const struct timeval n, const struct timeval limit)
118 diff = abs_tval(sub_tval(m, n));
119 if (cmp_tval(limit, diff) >= 0)
123 printf("m_expr which is %ld.%lu \nand\nn_expr which is %ld.%lu\nare not close; diff=%ld.%luusec\n", m.tv_sec, m.tv_usec, n.tv_sec, n.tv_usec, diff.tv_sec, diff.tv_usec);
124 //I don't have variables m_expr and n_expr in unity, those are command line arguments which only getst has!!!
132 AssertFpClose(const l_fp m, const l_fp n, const l_fp limit)
136 if (L_ISGEQ(&m, &n)) {
143 if (L_ISGEQ(&limit, &diff)) {
147 printf("m_expr which is %s \nand\nn_expr which is %s\nare not close; diff=%susec\n", lfptoa(&m, 10), lfptoa(&n, 10), lfptoa(&diff, 10));
148 //printf("m_expr which is %d.%d \nand\nn_expr which is %d.%d\nare not close; diff=%d.%dusec\n", m.l_uf, m.Ul_i, n.l_uf, n.Ul_i, diff.l_uf, diff.Ul_i);
154 //---------------------------------------------------
156 static const lfpfracdata fdata[] = {
157 { 0, 0x00000000 }, { 7478, 0x01ea1405 },
158 { 22077, 0x05a6d699 }, { 125000, 0x20000000 },
159 { 180326, 0x2e29d841 }, { 207979, 0x353e1c9b },
160 { 250000, 0x40000000 }, { 269509, 0x44fe8ab5 },
161 { 330441, 0x5497c808 }, { 333038, 0x5541fa76 },
162 { 375000, 0x60000000 }, { 394734, 0x650d4995 },
163 { 446327, 0x72427c7c }, { 500000, 0x80000000 },
164 { 517139, 0x846338b4 }, { 571953, 0x926b8306 },
165 { 587353, 0x965cc426 }, { 625000, 0xa0000000 },
166 { 692136, 0xb12fd32c }, { 750000, 0xc0000000 },
167 { 834068, 0xd5857aff }, { 848454, 0xd9344806 },
168 { 854222, 0xdaae4b02 }, { 861465, 0xdc88f862 },
169 { 875000, 0xe0000000 }, { 910661, 0xe921144d },
170 { 922162, 0xec12cf10 }, { 942190, 0xf1335d25 }
175 my_tick_to_tsf(u_int32 ticks)
177 // convert microseconds to l_fp fractional units, using double
178 // precision float calculations or, if available, 64bit integer
179 // arithmetic. This should give the precise fraction, rounded to
180 // the nearest representation.
183 return (u_int32)((( ((u_int64)(ticks)) << 32) + 500000) / 1000000); //I put too much () when casting just to be safe
185 return (u_int32)( ((double)(ticks)) * 4294.967296 + 0.5);
187 // And before you ask: if ticks >= 1000000, the result is
188 // truncated nonsense, so don't use it out-of-bounds.
193 my_tsf_to_tick(u_int32 tsf)
195 // Inverse operation: converts fraction to microseconds.
197 return (u_int32)( ((u_int64)(tsf) * 1000000 + 0x80000000) >> 32); //CHECK ME!!!
199 return (u_int32)(double(tsf) / 4294.967296 + 0.5);
201 // Beware: The result might be 10^6 due to rounding!
205 //*******************************END OF CUSTOM FUNCTIONS*********************
208 // ---------------------------------------------------------------------
209 // test support stuff - part1
210 // ---------------------------------------------------------------------
217 for (x.tv_sec = -2; x.tv_sec < 3; x.tv_sec++) {
219 TEST_ASSERT_FALSE(timeval_isValid(x));
221 TEST_ASSERT_TRUE(timeval_isValid(x));
223 TEST_ASSERT_TRUE(timeval_isValid(x));
225 TEST_ASSERT_FALSE(timeval_isValid(x));
232 //----------------------------------------------------------------------
233 // test normalisation
234 //----------------------------------------------------------------------
241 for (ns = -2000000000; ns <= 2000000000; ns += 10000000) {
242 struct timeval x = timeval_init(0, ns);
244 x = normalize_tval(x);
245 TEST_ASSERT_TRUE(timeval_isValid(x));
251 //----------------------------------------------------------------------
252 // test classification
253 //----------------------------------------------------------------------
256 test_SignNoFrac(void)
260 // sign test, no fraction
261 for (i = -4; i <= 4; ++i) {
262 struct timeval a = timeval_init(i, 0);
263 int E = (i > 0) - (i < 0);
264 int r = test_tval(a);
266 TEST_ASSERT_EQUAL(E, r);
274 test_SignWithFrac(void)
276 // sign test, with fraction
279 for (i = -4; i <= 4; ++i) {
280 struct timeval a = timeval_init(i, 10);
281 int E = (i >= 0) - (i < 0);
282 int r = test_tval(a);
284 TEST_ASSERT_EQUAL(E, r);
290 //----------------------------------------------------------------------
292 //----------------------------------------------------------------------
298 // fractions are equal
299 for (i = -4; i <= 4; ++i)
300 for (j = -4; j <= 4; ++j) {
301 struct timeval a = timeval_init(i, 200);
302 struct timeval b = timeval_init(j, 200);
303 int E = (i > j) - (i < j);
304 int r = cmp_tval_denorm(a, b);
306 TEST_ASSERT_EQUAL(E, r);
316 // fraction a bigger fraction b
319 for (i = -4; i <= 4; ++i)
320 for (j = -4; j <= 4; ++j) {
321 struct timeval a = timeval_init( i , 999800);
322 struct timeval b = timeval_init( j , 200);
323 int E = (i >= j) - (i < j);
324 int r = cmp_tval_denorm(a, b);
326 TEST_ASSERT_EQUAL(E, r);
336 // fraction a less fraction b
339 for (i = -4; i <= 4; ++i)
340 for (j = -4; j <= 4; ++j) {
341 struct timeval a = timeval_init(i, 200);
342 struct timeval b = timeval_init(j, 999800);
343 int E = (i > j) - (i <= j);
344 int r = cmp_tval_denorm(a, b);
346 TEST_ASSERT_EQUAL(E, r);
352 //----------------------------------------------------------------------
353 // Test addition (sum)
354 //----------------------------------------------------------------------
357 test_AddFullNorm(void)
361 for (i = -4; i <= 4; ++i)
362 for (j = -4; j <= 4; ++j) {
363 struct timeval a = timeval_init(i, 200);
364 struct timeval b = timeval_init(j, 400);
365 struct timeval E = timeval_init(i + j, 200 + 400);
369 TEST_ASSERT_EQUAL_timeval(E, c);
377 test_AddFullOflow1(void)
381 for (i = -4; i <= 4; ++i)
382 for (j = -4; j <= 4; ++j) {
383 struct timeval a = timeval_init(i, 200);
384 struct timeval b = timeval_init(j, 999900);
385 struct timeval E = timeval_init(i + j + 1, 100);
389 TEST_ASSERT_EQUAL_timeval(E, c);
397 test_AddUsecNorm(void)
401 for (i = -4; i <= 4; ++i) {
402 struct timeval a = timeval_init(i, 200);
403 struct timeval E = timeval_init(i, 600);
406 c = add_tval_us(a, 600 - 200);
407 TEST_ASSERT_EQUAL_timeval(E, c);
415 test_AddUsecOflow1(void)
419 for (i = -4; i <= 4; ++i) {
420 struct timeval a = timeval_init(i, 200);
421 struct timeval E = timeval_init(i + 1, 100);
424 c = add_tval_us(a, MICROSECONDS - 100);
425 TEST_ASSERT_EQUAL_timeval(E, c);
431 //----------------------------------------------------------------------
432 // test subtraction (difference)
433 //----------------------------------------------------------------------
436 test_SubFullNorm(void)
440 for (i = -4; i <= 4; ++i)
441 for (j = -4; j <= 4; ++j) {
442 struct timeval a = timeval_init(i, 600);
443 struct timeval b = timeval_init(j, 400);
444 struct timeval E = timeval_init(i - j, 600 - 400);
448 TEST_ASSERT_EQUAL_timeval(E, c);
456 test_SubFullOflow(void)
460 for (i = -4; i <= 4; ++i)
461 for (j = -4; j <= 4; ++j) {
462 struct timeval a = timeval_init(i, 100);
463 struct timeval b = timeval_init(j, 999900);
464 struct timeval E = timeval_init(i - j - 1, 200);
468 TEST_ASSERT_EQUAL_timeval(E, c);
476 test_SubUsecNorm(void)
480 for (i = -4; i <= 4; ++i) {
481 struct timeval a = timeval_init(i, 600);
482 struct timeval E = timeval_init(i, 200);
485 c = sub_tval_us(a, 600 - 200);
486 TEST_ASSERT_EQUAL_timeval(E, c);
494 test_SubUsecOflow(void)
498 for (i = -4; i <= 4; ++i) {
499 struct timeval a = timeval_init(i, 100);
500 struct timeval E = timeval_init(i - 1, 200);
503 c = sub_tval_us(a, MICROSECONDS - 100);
504 TEST_ASSERT_EQUAL_timeval(E, c);
510 //----------------------------------------------------------------------
512 //----------------------------------------------------------------------
519 for (i = -4; i <= 4; ++i) {
520 struct timeval a = timeval_init(i, 100);
526 TEST_ASSERT_EQUAL(0, test_tval(c));
532 //----------------------------------------------------------------------
534 //----------------------------------------------------------------------
541 for (i = -4; i <= 4; ++i) {
542 struct timeval a = timeval_init(i, 0);
546 TEST_ASSERT_EQUAL((i != 0), test_tval(b));
554 test_AbsWithFrac(void)
558 for (i = -4; i <= 4; ++i) {
559 struct timeval a = timeval_init(i, 100);
563 TEST_ASSERT_EQUAL(1, test_tval(b));
569 // ---------------------------------------------------------------------
570 // test support stuff -- part 2
571 // ---------------------------------------------------------------------
577 struct timeval limit = timeval_init(0, 2);
581 for (x.tv_sec = -2; x.tv_sec < 3; x.tv_sec++) {
584 x.tv_usec += 499999) {
585 for (i = -4; i < 5; ++i) {
588 if (i >= -2 && i <= 2) {
589 TEST_ASSERT_TRUE(AssertTimevalClose(x, y, limit));//ASSERT_PRED_FORMAT2(isClose, x, y);
592 TEST_ASSERT_FALSE(AssertTimevalClose(x, y, limit));
601 // and the global predicate instances we're using here
603 //static l_fp lfpClose = l_fp_init(0, 1); //static AssertFpClose FpClose(0, 1);
604 //static struct timeval timevalClose = timeval_init(0, 1); //static AssertTimevalClose TimevalClose(0, 1);
606 //----------------------------------------------------------------------
607 // conversion to l_fp
608 //----------------------------------------------------------------------
611 test_ToLFPbittest(void)
613 l_fp lfpClose = l_fp_init(0, 1);
616 for (i = 0; i < 1000000; ++i) {
617 struct timeval a = timeval_init(1, i);
618 l_fp E = l_fp_init(1, my_tick_to_tsf(i));
621 r = tval_intv_to_lfp(a);
622 TEST_ASSERT_TRUE(AssertFpClose(E, r, lfpClose)); //ASSERT_PRED_FORMAT2(FpClose, E, r);
630 test_ToLFPrelPos(void)
632 l_fp lfpClose = l_fp_init(0, 1);
635 for (i = 0; i < COUNTOF(fdata); ++i) {
636 struct timeval a = timeval_init(1, fdata[i].usec);
637 l_fp E = l_fp_init(1, fdata[i].frac);
640 r = tval_intv_to_lfp(a);
641 TEST_ASSERT_TRUE(AssertFpClose(E, r, lfpClose));
649 test_ToLFPrelNeg(void)
651 l_fp lfpClose = l_fp_init(0, 1);
654 for (i = 0; i < COUNTOF(fdata); ++i) {
655 struct timeval a = timeval_init(-1, fdata[i].usec);
656 l_fp E = l_fp_init(~0, fdata[i].frac);
659 r = tval_intv_to_lfp(a);
660 TEST_ASSERT_TRUE(AssertFpClose(E, r, lfpClose));
670 l_fp lfpClose = l_fp_init(0, 1);
673 for (i = 0; i < COUNTOF(fdata); ++i) {
674 struct timeval a = timeval_init(1, fdata[i].usec);
675 l_fp E = l_fp_init(1 + JAN_1970, fdata[i].frac);
678 r = tval_stamp_to_lfp(a);
679 TEST_ASSERT_TRUE(AssertFpClose(E, r, lfpClose));
685 //----------------------------------------------------------------------
686 // conversion from l_fp
687 //----------------------------------------------------------------------
690 test_FromLFPbittest(void)
692 struct timeval timevalClose = timeval_init(0, 1);
693 // Not *exactly* a bittest, because 2**32 tests would take a
694 // really long time even on very fast machines! So we do test
695 // every 1000 fractional units.
698 for (tsf = 0; tsf < ~((u_int32)(1000)); tsf += 1000) {
699 struct timeval E = timeval_init(1, my_tsf_to_tick(tsf));
700 l_fp a = l_fp_init(1, tsf);
703 r = lfp_intv_to_tval(a);
704 // The conversion might be off by one microsecond when
705 // comparing to calculated value.
706 TEST_ASSERT_TRUE(AssertTimevalClose(E, r, timevalClose));
714 test_FromLFPrelPos(void)
716 struct timeval timevalClose = timeval_init(0, 1);
719 for (i = 0; i < COUNTOF(fdata); ++i) {
720 l_fp a = l_fp_init(1, fdata[i].frac);
721 struct timeval E = timeval_init(1, fdata[i].usec);
724 r = lfp_intv_to_tval(a);
725 TEST_ASSERT_TRUE(AssertTimevalClose(E, r, timevalClose));
733 test_FromLFPrelNeg(void)
735 struct timeval timevalClose = timeval_init(0, 1);
738 for (i = 0; i < COUNTOF(fdata); ++i) {
739 l_fp a = l_fp_init(~0, fdata[i].frac);
740 struct timeval E = timeval_init(-1, fdata[i].usec);
743 r = lfp_intv_to_tval(a);
744 TEST_ASSERT_TRUE(AssertTimevalClose(E, r, timevalClose));
751 // usec -> frac -> usec roundtrip, using a prime start and increment
753 test_LFProundtrip(void)
758 for (t = -1; t < 2; ++t)
759 for (i = 5; i < 1000000; i += 11) {
760 struct timeval E = timeval_init(t, i);
764 a = tval_intv_to_lfp(E);
765 r = lfp_intv_to_tval(a);
766 TEST_ASSERT_EQUAL_timeval(E, r);
772 //----------------------------------------------------------------------
774 //----------------------------------------------------------------------
779 static const struct {
784 { 0, 0, "0.000000" },
785 { 2, 0, "2.000000" },
786 {-2, 0, "-2.000000" },
787 { 0, 1, "0.000001" },
788 { 0,-1, "-0.000001" },
789 { 1,-1, "0.999999" },
790 {-1, 1, "-0.999999" },
791 {-1,-1, "-1.000001" },
795 for (i = 0; i < COUNTOF(data); ++i) {
796 struct timeval a = timeval_init(data[i].sec, data[i].usec);
797 const char * E = data[i].repr;
798 const char * r = tvaltoa(a);
800 TEST_ASSERT_EQUAL_STRING(E, r);