stdlib: Implement introsort for qsort (BZ 19305)
[glibc.git] / io / test-utime.c
blob580b84dd8de91ec2918bda3a9be8f134ae18c892
1 /* Copyright (C) 1994-2023 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
9 The GNU C Library 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 GNU
12 Lesser General Public License for more details.
14 You should have received a copy of the GNU Lesser General Public
15 License along with the GNU C Library; if not, see
16 <https://www.gnu.org/licenses/>. */
18 #include <fcntl.h>
19 #include <stdint.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <sys/stat.h>
23 #include <unistd.h>
24 #include <utime.h>
25 #include <time.h>
27 int
28 main (int argc, char *argv[])
30 char file[] = "/tmp/test-utime.XXXXXX";
31 struct utimbuf ut;
32 struct stat st;
33 struct stat stnow;
34 time_t now1, now2;
35 int fd;
37 fd = mkstemp (file);
38 if (fd < 0)
40 perror ("mkstemp");
41 return 1;
43 close (fd);
45 /* Test utime with arg */
46 ut.actime = 500000000;
47 ut.modtime = 500000001;
48 if (utime (file, &ut))
50 perror ("utime");
51 remove (file);
52 return 1;
55 if (stat (file, &st))
57 perror ("stat");
58 remove (file);
59 return 1;
62 /* Test utime with NULL.
63 Since there's a race condition possible here, we check
64 the time before and after the call to utime. */
65 now1 = time (NULL);
66 if (now1 == (time_t)-1)
68 perror ("time");
69 remove (file);
70 return 1;
73 /* The clocks used to set the modification time and that used in the
74 time() call need not be the same. They need not have the same
75 precision. Therefore we delay the following operation by one
76 second which makes sure we can compare with second precision. */
77 sleep (1);
79 if (utime (file, NULL))
81 perror ("utime NULL");
82 remove (file);
83 return 1;
86 sleep (1);
88 now2 = time (NULL);
89 if (now2 == (time_t)-1)
91 perror ("time");
92 remove (file);
93 return 1;
96 if (stat (file, &stnow))
98 perror ("stat");
99 remove (file);
100 return 1;
103 remove (file);
105 if (st.st_mtime != ut.modtime)
107 printf ("modtime %jd != %jd\n",
108 (intmax_t) st.st_mtime, (intmax_t) ut.modtime);
109 return 1;
112 if (st.st_atime != ut.actime)
114 printf ("actime %jd != %jd\n",
115 (intmax_t) st.st_atime, (intmax_t) ut.actime);
116 return 1;
119 if (stnow.st_mtime < now1 || stnow.st_mtime > now2)
121 printf ("modtime %jd <%jd >%jd\n",
122 (intmax_t) stnow.st_mtime, (intmax_t) now1, (intmax_t) now2);
123 return 1;
126 if (stnow.st_atime < now1 || stnow.st_atime > now2)
128 printf ("actime %jd <%jd >%jd\n",
129 (intmax_t) stnow.st_atime, (intmax_t) now1, (intmax_t) now2);
130 return 1;
133 puts ("Test succeeded.");
134 return 0;