lib: import ccan modules for tdb2
[samba.git] / lib / ccan / tally / test / run-mode.c
1 #include <ccan/tally/tally.c>
2 #include <ccan/tap/tap.h>
3
4 int main(void)
5 {
6         int i;
7         struct tally *tally = tally_new(100);
8         ssize_t min, max, mode;
9         size_t err;
10
11         max = (ssize_t)~(1ULL << (sizeof(max)*CHAR_BIT - 1));
12         min = (ssize_t)(1ULL << (sizeof(max)*CHAR_BIT - 1));
13
14         plan_tests(100 + 50 + 100 + 100 + 10);
15         /* Simple mode test: should always be around 0 (we add that twice). */
16         for (i = 0; i < 100; i++) {
17                 tally_add(tally, i);
18                 tally_add(tally, -i);
19                 mode = tally_approx_mode(tally, &err);
20                 if (i < 50)
21                         ok1(err == 0);
22                 ok1(mode - (ssize_t)err <= 0 && mode + (ssize_t)err >= 0);
23         }
24
25         /* Works for big values too... */
26         for (i = 0; i < 100; i++) {
27                 tally_add(tally, max - i);
28                 tally_add(tally, min + 1 + i);
29                 mode = tally_approx_mode(tally, &err);
30                 ok1(mode - (ssize_t)err <= 0 && mode + (ssize_t)err >= 0);
31         }
32         free(tally);
33
34         tally = tally_new(10);
35         tally_add(tally, 0);
36         for (i = 0; i < 100; i++) {
37                 tally_add(tally, i);
38                 mode = tally_approx_mode(tally, &err);
39                 if (i < 10)
40                         ok1(err == 0);
41                 ok1(mode - (ssize_t)err <= 0 && mode + (ssize_t)err >= 0);
42         }
43
44         return exit_status();
45 }