1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
|
/*********************************************************************
Functions to report timing in verbose mode.
This is part of GNU Astronomy Utilities (Gnuastro) package.
Original author:
Mohammad Akhlaghi <mohammad@akhlaghi.org>
Contributing author(s):
Copyright (C) 2015-2024 Free Software Foundation, Inc.
Gnuastro is free software: you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation, either version 3 of the License, or (at your
option) any later version.
Gnuastro is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
General Public License for more details.
You should have received a copy of the GNU General Public License
along with Gnuastro. If not, see <http://www.gnu.org/licenses/>.
**********************************************************************/
#include <config.h>
#include <stdio.h>
#include <stdint.h>
#include <gnuastro-internal/timing.h>
/* Micro-second based timer, which can be used to generate random numbers.
The type of 'tv_sec' and 'tv_usec' is 'long int' (from the GNU C Library
manual). But the expected type used by GSL's random number generator is
'unsigned long int'. Since the only random number generator that is
currently in Gnuastro is GSL's (and it asks for seeds of type 'unsigned
long int'), this function will return in 'unsigned long int'. Note that
'unsigned long' will be able to hold any positive 'long' integer, which
is the case for 'tv_sec' and 'tv_usec': they are both positive, while
the opposite isn't true. */
unsigned long int
gal_timing_time_based_rng_seed()
{
struct timeval tv;
gettimeofday(&tv,0);
return tv.tv_sec + tv.tv_usec;
}
/* Used to report the time it takes for an action to be done. */
void
gal_timing_report(struct timeval *t1, char *jobname, size_t level)
{
double dt=1e30;
struct timeval t2;
if(t1)
{
gettimeofday(&t2, NULL);
dt= ( ((double)t2.tv_sec+(double)t2.tv_usec/1e6) -
((double)t1->tv_sec+(double)t1->tv_usec/1e6) );
}
if(level==0)
printf("%s %-f seconds\n", jobname, dt);
else if(level==1)
{
if(t1)
printf(" - %-*s %f seconds\n",
GAL_TIMING_VERB_MSG_LENGTH_V, jobname, dt);
else printf(" - %s\n", jobname);
}
else if(level==2)
{
if(t1)
printf(" ---- %-*s %f seconds\n",
GAL_TIMING_VERB_MSG_LENGTH_V-3, jobname, dt);
else printf(" ---- %s\n", jobname);
}
}
|
