blob: 34dbc5ca9716c9d70e4331fa86bb1eb37f8434d5 (
plain)
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
|
/* Copyright (C) 2015-2020 Free Software Foundation, Inc.
This file is part of groff.
groff 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 2 of the License, or
(at your option) any later version.
groff 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.
The GNU General Public License version 2 (GPL2) is available in the
internet at <http://www.gnu.org/licenses/gpl-2.0.txt>. */
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <errno.h>
#include <limits.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include "errarg.h"
#include "error.h"
#ifdef LONG_FOR_TIME_T
long
#else
time_t
#endif
current_time()
{
char *source_date_epoch = getenv("SOURCE_DATE_EPOCH");
if (source_date_epoch) {
errno = 0;
char *endptr;
long epoch = strtol(source_date_epoch, &endptr, 10);
if ((errno == ERANGE && (epoch == LONG_MAX || epoch == LONG_MIN)) ||
(errno != 0 && epoch == 0))
fatal("$SOURCE_DATE_EPOCH: strtol: %1", strerror(errno));
if (endptr == source_date_epoch)
fatal("$SOURCE_DATE_EPOCH: no digits found: '%1'", endptr);
if (*endptr != '\0')
fatal("$SOURCE_DATE_EPOCH: trailing garbage: '%1'", endptr);
return epoch;
} else
return time(0);
}
|