Merge branch 'cadet-new-options'
[oweals/gnunet.git] / src / util / test_scheduler_delay.c
1 /*
2      This file is part of GNUnet.
3      Copyright (C) 2001-2013 GNUnet e.V.
4
5      GNUnet is free software: you can redistribute it and/or modify it
6      under the terms of the GNU Affero General Public License as published
7      by the Free Software Foundation, either version 3 of the License,
8      or (at your option) any later version.
9
10      GNUnet is distributed in the hope that it will be useful, but
11      WITHOUT ANY WARRANTY; without even the implied warranty of
12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13      Affero General Public License for more details.
14     
15      You should have received a copy of the GNU Affero General Public License
16      along with this program.  If not, see <http://www.gnu.org/licenses/>.
17
18      SPDX-License-Identifier: AGPL3.0-or-later
19 */
20 /**
21  * @file util/test_scheduler_delay.c
22  * @brief testcase for delay of scheduler, measures how
23  *  precise the timers are.  Expect values between 0.2 and 2 ms on
24  *  modern machines.
25  */
26 #include "platform.h"
27 #include "gnunet_util_lib.h"
28
29 static struct GNUNET_TIME_Absolute target;
30
31 static int i;
32
33 static unsigned long long cumDelta;
34
35 #define INCR 47
36
37 #define MAXV 5000
38
39
40 /**
41  * Signature of the main function of a task.
42  *
43  * @param cls closure
44  */
45 static void
46 test_task (void *cls)
47 {
48   struct GNUNET_TIME_Absolute now;
49
50   now = GNUNET_TIME_absolute_get ();
51   if (now.abs_value_us > target.abs_value_us)
52     cumDelta += (now.abs_value_us - target.abs_value_us);
53   else
54     cumDelta += (target.abs_value_us - now.abs_value_us);
55   target =
56       GNUNET_TIME_relative_to_absolute (GNUNET_TIME_relative_multiply
57                                         (GNUNET_TIME_UNIT_MICROSECONDS, i));
58   FPRINTF (stderr, "%s",  ".");
59   if (i > MAXV)
60   {
61     FPRINTF (stderr, "%s",  "\n");
62     return;
63   }
64   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
65                                 (GNUNET_TIME_UNIT_MICROSECONDS, i),
66                                 &test_task,
67                                 NULL);
68   i += INCR;
69 }
70
71
72 int
73 main (int argc, char *argv[])
74 {
75   GNUNET_log_setup ("test-scheduler-delay",
76                     "WARNING",
77                     NULL);
78   target = GNUNET_TIME_absolute_get ();
79   GNUNET_SCHEDULER_run (&test_task, NULL);
80   FPRINTF (stdout,
81            "Sleep precision: %llu microseconds (average delta). ",
82            cumDelta / (MAXV / INCR));
83   if (cumDelta <= 500 * MAXV / INCR)
84     FPRINTF (stdout, "%s",  "Timer precision is excellent.\n");
85   else if (cumDelta <= 5000 * MAXV / INCR)        /* 5 ms average deviation */
86     FPRINTF (stdout, "%s",  "Timer precision is good.\n");
87   else if (cumDelta > 25000 * MAXV / INCR)
88     FPRINTF (stdout, "%s",  "Timer precision is awful.\n");
89   else
90     FPRINTF (stdout, "%s",  "Timer precision is acceptable.\n");
91   return 0;
92 }
93
94 /* end of test_scheduler_delay.c */