1 /* Assist in file system timestamp tests.
2 Copyright (C) 2009-2024 Free Software Foundation, Inc.
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation, either version 3 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <https://www.gnu.org/licenses/>. */
17 /* Written by Eric Blake <ebb9@byu.net>, 2009. */
24 # include <stdckdint.h>
26 /* Avoid a conflict with a function called nap() on UnixWare. */
27 # if defined _SCO_DS || (defined __SCO_VERSION__ || defined __sysv5__) /* OpenServer, UnixWare */
33 /* Name of the witness file. */
34 #define TEMPFILE BASE "nap.tmp"
36 /* File descriptor used for the witness file. */
37 static int nap_fd
= -1;
39 /* Return A - B, in ns.
40 Return 0 if the true result would be negative.
41 Return INT_MAX if the true result would be greater than INT_MAX. */
43 diff_timespec (struct timespec a
, struct timespec b
)
51 ASSERT (0 <= ans
&& ans
< 2000000000);
52 ASSERT (0 <= bns
&& bns
< 2000000000);
54 if (! (bs
< as
|| (bs
== as
&& bns
< ans
)))
57 if (ckd_sub (&sdiff
, as
, bs
)
58 || ckd_mul (&sdiff
, sdiff
, 1000000000)
59 || ckd_add (&sdiff
, sdiff
, ans
- bns
))
65 /* If DO_WRITE, bump the modification time of the file designated by NAP_FD.
66 Then fetch the new STAT information of NAP_FD. */
68 nap_get_stat (struct stat
*st
, int do_write
)
72 ASSERT (write (nap_fd
, "\n", 1) == 1);
73 #if defined _WIN32 || defined __CYGWIN__
74 /* On Windows, the modification times are not changed until NAP_FD
76 <https://docs.microsoft.com/en-us/windows/desktop/api/fileapi/nf-fileapi-writefile> */
78 nap_fd
= open (TEMPFILE
, O_RDWR
, 0600);
79 ASSERT (nap_fd
!= -1);
80 lseek (nap_fd
, 0, SEEK_END
);
83 ASSERT (fstat (nap_fd
, st
) == 0);
86 /* Given a file whose descriptor is FD, see whether delaying by DELAY
87 nanoseconds causes a change in a file's mtime.
88 OLD_ST is the file's status, recently gotten. */
90 nap_works (int delay
, struct stat old_st
)
93 struct timespec delay_spec
;
94 delay_spec
.tv_sec
= delay
/ 1000000000;
95 delay_spec
.tv_nsec
= delay
% 1000000000;
96 ASSERT (nanosleep (&delay_spec
, 0) == 0);
97 nap_get_stat (&st
, 1);
99 if (diff_timespec (get_stat_mtime (&st
), get_stat_mtime (&old_st
)))
106 clear_temp_file (void)
110 ASSERT (close (nap_fd
) != -1);
111 ASSERT (unlink (TEMPFILE
) != -1);
115 /* Sleep long enough to notice a timestamp difference on the file
116 system in the current directory. Use an adaptive approach, trying
117 to find the smallest delay which works on the current file system
118 to make the timestamp difference appear. Assert a maximum delay of
119 ~2 seconds, more precisely sum(2^n) from 0 to 30 = 2^31 - 1 = 2.1s.
120 Assumes that BASE is defined, and requires that the test module
121 depends on nanosleep. */
126 static int delay
= 1;
130 atexit (clear_temp_file
);
131 ASSERT ((nap_fd
= creat (TEMPFILE
, 0600)) != -1);
132 nap_get_stat (&old_st
, 0);
136 ASSERT (0 <= nap_fd
);
137 nap_get_stat (&old_st
, 1);
141 delay
= delay
/ 2; /* Try half of the previous delay. */
146 if (nap_works (delay
, old_st
))
148 if (delay
<= (2147483647 - 1) / 2)
150 delay
= delay
* 2 + 1;
157 /* Bummer: even the highest nap delay didn't work. */
161 #endif /* GLTEST_NAP_H */