time: add time_check() call and test.

[ccan] / ccan / time / test / run-check.c

diff --git a/ccan/time/test/run-check.c b/ccan/time/test/run-check.c
new file mode 100644 (file)
index 0000000..37763ab
--- /dev/null
+++ b/ccan/time/test/run-check.c
@@ -0,0 +1,199 @@
+#define DEBUG
+#include <ccan/time/time.h>
+#include <ccan/time/time.c>
+#include <ccan/tap/tap.h>
+#include <unistd.h>
+#include <stdlib.h>
+#include <signal.h>
+#include <sys/types.h>
+#include <sys/wait.h>
+
+/* If we really abort, we don't get coverage info! */
+void abort(void)
+{
+       exit(7);
+}
+
+int main(void)
+{
+       struct timespec t1, t2, t3, zero = { 0, 0 };
+       int fds[2];
+
+       plan_tests(62);
+
+       /* Test time_now */
+       t1 = time_now();
+       t2 = time_now();
+
+       /* Test time_sub. */
+       t3 = time_sub(t2, t1);
+       ok1(t3.tv_sec > 0 || t3.tv_nsec >= 0);
+       t3 = time_sub(t2, t2);
+       ok1(t3.tv_sec == 0 && t3.tv_nsec == 0);
+       t3 = time_sub(t1, t1);
+       ok1(t3.tv_sec == 0 && t3.tv_nsec == 0);
+
+       /* Test time_eq */
+       ok1(time_eq(t1, t1));
+       ok1(time_eq(t2, t2));
+       ok1(!time_eq(t1, t3));
+       ok1(!time_eq(t2, t3));
+
+       /* Make sure t2 > t1. */
+       t3.tv_sec = 0;
+       t3.tv_nsec = 1;
+       t2 = time_add(t2, t3);
+
+       /* Test time_less and time_greater. */
+       ok1(!time_eq(t1, t2));
+       ok1(!time_greater(t1, t2));
+       ok1(time_less(t1, t2));
+       ok1(time_greater(t2, t1));
+       ok1(!time_less(t2, t1));
+       t3.tv_sec = 0;
+       t3.tv_nsec = 999999999;
+       t2 = time_add(t2, t3);
+       ok1(!time_eq(t1, t2));
+       ok1(!time_greater(t1, t2));
+       ok1(time_less(t1, t2));
+       ok1(time_greater(t2, t1));
+       ok1(!time_less(t2, t1));
+
+       t3 = time_sub(t2, zero);
+       ok1(time_eq(t3, t2));
+       t3 = time_sub(t2, t2);
+       ok1(time_eq(t3, zero));
+
+       /* time_from_msec / time_to_msec */
+       t3 = time_from_msec(500);
+       ok1(t3.tv_sec == 0);
+       ok1(t3.tv_nsec == 500000000);
+       ok1(time_to_msec(t3) == 500);
+
+       t3 = time_from_msec(1000);
+       ok1(t3.tv_sec == 1);
+       ok1(t3.tv_nsec == 0);
+       ok1(time_to_msec(t3) == 1000);
+
+       t3 = time_from_msec(1500);
+       ok1(t3.tv_sec == 1);
+       ok1(t3.tv_nsec == 500000000);
+       ok1(time_to_msec(t3) == 1500);
+
+       /* time_from_usec */
+       t3 = time_from_usec(500000);
+       ok1(t3.tv_sec == 0);
+       ok1(t3.tv_nsec == 500000000);
+       ok1(time_to_usec(t3) == 500000);
+
+       t3 = time_from_usec(1000000);
+       ok1(t3.tv_sec == 1);
+       ok1(t3.tv_nsec == 0);
+       ok1(time_to_usec(t3) == 1000000);
+
+       t3 = time_from_usec(1500000);
+       ok1(t3.tv_sec == 1);
+       ok1(t3.tv_nsec == 500000000);
+       ok1(time_to_usec(t3) == 1500000);
+
+       /* time_from_nsec */
+       t3 = time_from_nsec(500000000);
+       ok1(t3.tv_sec == 0);
+       ok1(t3.tv_nsec == 500000000);
+       ok1(time_to_nsec(t3) == 500000000);
+
+       t3 = time_from_nsec(1000000000);
+       ok1(t3.tv_sec == 1);
+       ok1(t3.tv_nsec == 0);
+       ok1(time_to_nsec(t3) == 1000000000);
+
+       t3 = time_from_nsec(1500000000);
+       ok1(t3.tv_sec == 1);
+       ok1(t3.tv_nsec == 500000000);
+       ok1(time_to_nsec(t3) == 1500000000);
+
+       /* Test wrapunder */
+       t3 = time_sub(time_sub(t2, time_from_msec(500)), time_from_msec(500));
+       ok1(t3.tv_sec == t2.tv_sec - 1);
+       ok1(t3.tv_nsec == t2.tv_nsec);
+
+       /* time_divide and time_multiply */
+       t1.tv_nsec = 100;
+       t1.tv_sec = 100;
+
+       t3 = time_divide(t1, 2);
+       ok1(t3.tv_sec == 50);
+       ok1(t3.tv_nsec == 50);
+
+       t3 = time_divide(t1, 100);
+       ok1(t3.tv_sec == 1);
+       ok1(t3.tv_nsec == 1);
+
+       t3 = time_multiply(t3, 100);
+       ok1(time_eq(t3, t1));
+
+       t3 = time_divide(t1, 200);
+       ok1(t3.tv_sec == 0);
+       ok1(t3.tv_nsec == 500000000);
+
+       /* Divide by huge number. */
+       t1.tv_sec = (1U << 31) - 1;
+       t1.tv_nsec = 999999999;
+       t2 = time_divide(t1, 1 << 30);
+       /* Allow us to round either way. */
+       ok1((t2.tv_sec == 2 && t2.tv_nsec == 0)
+           || (t2.tv_sec == 1 && t2.tv_nsec == 999999999));
+
+       /* Multiply by huge number. */
+       t1.tv_sec = 0;
+       t1.tv_nsec = 1;
+       t2 = time_multiply(t1, 1UL << 31);
+       ok1(t2.tv_sec == 2);
+       ok1(t2.tv_nsec == 147483648);
+
+       pipe(fds);
+
+       fflush(stdout);
+       switch (fork()) {
+       case 0:
+               close(fds[0]);
+               dup2(fds[1], 1);
+               dup2(fds[1], 2);
+               t1.tv_sec = 7;
+               t1.tv_nsec = 1000000001;
+               t2 = time_check(t1, NULL);
+               if (t2.tv_sec != 8 || t2.tv_nsec != 1)
+                       exit(1);
+               t1.tv_sec = -1;
+               t1.tv_nsec = 5;
+               t2 = time_check(t1, NULL);
+               if (t2.tv_sec != 0 || t2.tv_nsec != 5)
+                       exit(1);
+               t1.tv_sec = 8;
+               t1.tv_nsec = 1000000002;
+               /* We expect this to abort! */
+               t2 = time_check(t1, "abortstr");
+               exit(1);
+               
+       default: {
+               char readbuf[1024];
+               int r, len = 0;
+
+               close(fds[1]);
+               while ((r = read(fds[0], readbuf + len, 1023 - len)) > 0)
+                       len += r;
+               readbuf[len] = '\0';
+               ok1(strcmp(readbuf,
+                          "WARNING: malformed time"
+                          " 7 seconds 1000000001 ns converted to 8.000000001.\n"
+                          "WARNING: malformed time"
+                          " -1 seconds 5 ns converted to 0.000000005.\n"
+                          "abortstr: malformed time 8.1000000002\n") == 0);
+               ok1(wait(&r) != -1);
+               ok1(WIFEXITED(r));
+               ok1(WEXITSTATUS(r) == 7);
+       }
+       }
+
+       return exit_status();
+}