2 This file is part of GNUnet.
3 Copyright (C) 2011 GNUnet e.V.
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.
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.
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/>.
18 SPDX-License-Identifier: AGPL3.0-or-later
22 * @file util/test_common_logging_runtime_loglevels.c
23 * @brief testcase for the logging module (runtime log level adjustment)
27 #include "gnunet_util_lib.h"
29 #define VERBOSE GNUNET_NO
32 * How much time the child is allowed to waste on skipped log calls, at most.
33 * Raspberry Pi takes 113 microseconds tops, this is 3x that value.
35 #define MAX_SKIP_DELAY GNUNET_TIME_relative_multiply ( \
36 GNUNET_TIME_UNIT_MICROSECONDS, 400).rel_value_us
39 * How much time non-skipped log call should take, at least.
40 * Keep in sync with the value in the dummy!
42 #define OUTPUT_DELAY GNUNET_TIME_relative_multiply ( \
43 GNUNET_TIME_UNIT_MICROSECONDS, 1000).rel_value_us
49 static struct GNUNET_OS_Process *proc;
51 /* Pipe to read from started processes stdout (on read end) */
52 static struct GNUNET_DISK_PipeHandle *pipe_stdout;
54 static struct GNUNET_SCHEDULER_Task *die_task;
56 static struct GNUNET_SCHEDULER_Task *read_task;
65 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Ending phase %d, ok is %d\n", phase,
69 if (0 != GNUNET_OS_process_kill (proc, GNUNET_TERM_SIG))
71 GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill");
73 GNUNET_OS_process_wait (proc);
74 GNUNET_OS_process_destroy (proc);
77 if (NULL != read_task)
79 GNUNET_SCHEDULER_cancel (read_task);
82 GNUNET_DISK_pipe_close (pipe_stdout);
94 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "failing\n");
99 read_output_line (int phase_from1, int phase_to1, int phase_from2,
100 int phase_to2, char c, const char *expect_level,
101 long delay_morethan, long delay_lessthan, int phase,
103 int *len, long *delay, char level[8])
110 int delay_is_a_dummy;
111 int delay_outside_of_range;
116 if (! ((phase >= phase_from1) && (phase <= phase_to1)) &&
117 ! ((phase >= phase_from2) && (phase <= phase_to2)))
120 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
121 "Trying to match '%c%s \\d\\r\\n' on %s\n", c, expect_level, p);
123 for (i = 0; i < *len && ! stop; i++)
127 case 0: /* read first char */
130 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Expected '%c', but got '%c'\n", c,
138 case 1: /* read at most 7 char-long error level string, finished by ' ' */
155 case 2: /* read the delay, finished by '\n' */
160 *delay = strtol (t, NULL, 10);
166 level_matches = (strcmp (expect_level, level) == 0);
167 delay_is_sane = (*delay >= 0) && (*delay <= 1000000);
168 delay_is_a_dummy = (c == 'L');
169 /* Delay must be either less than 'lessthan' (log call is skipped)
170 * or more than 'morethan' (log call is not skipped)
172 delay_outside_of_range = ((*delay < delay_lessthan) || (*delay >=
174 if (delay_is_a_dummy)
175 delay_outside_of_range = 1;
178 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
179 "Wrong log format?\n");
181 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
182 "Wrong log level\n");
184 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
185 "Delay %ld is insane\n",
187 if (! delay_outside_of_range)
188 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
189 "Delay %ld is not outside of range (%ld ; %ld)\n",
193 if (! stop || ! level_matches || ! delay_is_sane || ! delay_outside_of_range)
201 * Up to 8 non-skipped GNUNET_log() calls
202 * + extra line with delay for each one
204 #define LOG_MAX_NUM_LINES (8 * 2)
206 * Actual message is 17 chars at most
208 #define LOG_MAX_LINE_LENGTH (17)
210 #define LOG_BUFFER_SIZE LOG_MAX_NUM_LINES *LOG_MAX_LINE_LENGTH
212 static char buf[LOG_BUFFER_SIZE];
214 static char *buf_ptr;
220 read_call (void *cls)
222 const struct GNUNET_DISK_FileHandle *stdout_read_handle = cls;
229 rd = GNUNET_DISK_file_read (stdout_read_handle, buf_ptr,
230 sizeof(buf) - bytes);
236 fprintf (stderr, "got %d bytes, reading more\n", rd);
238 read_task = GNUNET_SCHEDULER_add_read_file (GNUNET_TIME_UNIT_FOREVER_REL,
241 (void*) stdout_read_handle);
246 fprintf (stderr, "bytes is %d:%s\n", bytes, buf);
249 /* +------CHILD OUTPUT--
260 * | 7D * * * * * * * *
265 if ((bytes == LOG_BUFFER_SIZE) ||
267 read_output_line (0, 3, 4, 9, 'L', "ERROR", -1,
269 &bytes, &delay, level)) ||
271 read_output_line (0, 3, 4, 9, '1', "ERROR", OUTPUT_DELAY,
272 MAX_SKIP_DELAY, phase, p,
273 &bytes, &delays[0], level)) ||
275 read_output_line (1, 3, 5, 9, 'L', "WARNING", -1,
277 &bytes, &delay, level)) ||
279 read_output_line (0, 3, 4, 9, '1', "WARNING", OUTPUT_DELAY,
280 MAX_SKIP_DELAY, phase, p,
281 &bytes, &delays[1], level)) ||
283 read_output_line (2, 3, 6, 7, 'L', "INFO", -1,
285 &bytes, &delay, level)) ||
287 read_output_line (0, 3, 4, 9, '1', "INFO", OUTPUT_DELAY,
288 MAX_SKIP_DELAY, phase, p,
289 &bytes, &delays[2], level)) ||
291 read_output_line (3, 3, 7, 7, 'L', "DEBUG", -1,
293 &bytes, &delay, level)) ||
295 read_output_line (0, 3, 4, 9, '1', "DEBUG", OUTPUT_DELAY,
296 MAX_SKIP_DELAY, phase, p,
297 &bytes, &delays[3], level)) ||
299 read_output_line (0, 3, 4, 9, 'L', "ERROR", -1,
301 &bytes, &delay, level)) ||
303 read_output_line (0, 3, 4, 9, '2', "ERROR", OUTPUT_DELAY,
304 MAX_SKIP_DELAY, phase, p,
305 &bytes, &delays[4], level)) ||
307 read_output_line (0, 3, 5, 9, 'L', "WARNING", -1,
309 &bytes, &delay, level)) ||
311 read_output_line (0, 3, 4, 9, '2', "WARNING", OUTPUT_DELAY,
312 MAX_SKIP_DELAY, phase, p,
313 &bytes, &delays[5], level)) ||
315 read_output_line (-1, -1, 6, 7, 'L', "INFO", -1,
317 &bytes, &delay, level)) ||
319 read_output_line (0, 3, 4, 9, '2', "INFO", OUTPUT_DELAY,
320 MAX_SKIP_DELAY, phase, p,
321 &bytes, &delays[6], level)) ||
323 read_output_line (-1, -1, 7, 7, 'L', "DEBUG", -1,
325 &bytes, &delay, level)) ||
327 read_output_line (0, 3, 4, 9, '2', "DEBUG", OUTPUT_DELAY,
328 MAX_SKIP_DELAY, phase, p,
329 &bytes, &delays[7], level)))
331 if (bytes == LOG_BUFFER_SIZE)
332 fprintf (stderr, "%s", "Ran out of buffer space!\n");
335 GNUNET_SCHEDULER_cancel (die_task);
336 GNUNET_SCHEDULER_add_now (&end_task, NULL);
340 GNUNET_SCHEDULER_cancel (die_task);
341 GNUNET_SCHEDULER_add_now (&end_task, NULL);
348 const struct GNUNET_DISK_FileHandle *stdout_read_handle;
350 pipe_stdout = GNUNET_DISK_pipe (GNUNET_YES, GNUNET_YES, GNUNET_NO,
353 if (pipe_stdout == NULL)
360 putenv ("GNUNET_LOG=");
361 putenv ("GNUNET_FORCE_LOG=");
362 putenv ("GNUNET_FORCE_LOGFILE=");
366 putenv ("GNUNET_LOG=;;;;ERROR");
370 putenv ("GNUNET_LOG=;;;;WARNING");
374 putenv ("GNUNET_LOG=;;;;INFO");
378 putenv ("GNUNET_LOG=;;;;DEBUG");
382 putenv ("GNUNET_FORCE_LOG=;;;;ERROR");
386 putenv ("GNUNET_FORCE_LOG=;;;;WARNING");
390 putenv ("GNUNET_FORCE_LOG=;;;;INFO");
394 putenv ("GNUNET_FORCE_LOG=;;;;DEBUG");
398 putenv ("GNUNET_LOG=blah;;;;ERROR");
402 putenv ("GNUNET_FORCE_LOG=blah;;;;ERROR");
406 proc = GNUNET_OS_start_process (GNUNET_NO, GNUNET_OS_INHERIT_STD_OUT_AND_ERR,
407 NULL, pipe_stdout, NULL,
408 "./test_common_logging_dummy",
409 "test_common_logging_dummy", NULL);
410 GNUNET_assert (NULL != proc);
411 putenv ("GNUNET_FORCE_LOG=");
412 putenv ("GNUNET_LOG=");
414 /* Close the write end of the read pipe */
415 GNUNET_DISK_pipe_close_end (pipe_stdout, GNUNET_DISK_PIPE_END_WRITE);
418 GNUNET_DISK_pipe_handle (pipe_stdout, GNUNET_DISK_PIPE_END_READ);
421 GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
422 (GNUNET_TIME_UNIT_SECONDS, 10),
428 memset (&buf, 0, sizeof(buf));
430 read_task = GNUNET_SCHEDULER_add_read_file (GNUNET_TIME_UNIT_FOREVER_REL,
433 (void*) stdout_read_handle);
446 main (int argc, char *argv[])
448 GNUNET_log_setup ("test-common-logging-runtime-loglevels",
452 GNUNET_SCHEDULER_run (&task, &ok);
457 /* end of test_common_logging_runtime_loglevels.c */