1 /*-
2 * SPDX-License-Identifier: BSD-3-Clause
3 *
4 * Copyright (c) 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 #include <sys/types.h>
33 #include <sys/stat.h>
34 #include <sys/time.h>
35
36 #include <ctype.h>
37 #include <err.h>
38 #include <errno.h>
39 #include <fcntl.h>
40 #include <libgen.h>
41 #include <stdio.h>
42 #include <stdlib.h>
43 #include <string.h>
44 #include <time.h>
45 #include <unistd.h>
46
47 static void stime_arg1(const char *, struct timespec *);
48 static void stime_arg2(const char *, int, struct timespec *);
49 static void stime_darg(const char *, struct timespec *);
50 static void stime_file(const char *, struct timespec *);
51 static int timeoffset(const char *);
52 static void usage(const char *);
53
54 int
main(int argc,char * argv[])55 main(int argc, char *argv[])
56 {
57 struct stat sb;
58 struct timespec ts[2];
59 int atflag;
60 int Aflag, aflag, cflag, mflag, ch, fd, len, rval, timeset;
61 char *p;
62 char *myname;
63
64 myname = basename(argv[0]);
65 Aflag = aflag = cflag = mflag = timeset = 0;
66 atflag = 0;
67 ts[0].tv_sec = ts[1].tv_sec = 0;
68 ts[0].tv_nsec = ts[1].tv_nsec = UTIME_NOW;
69
70 while ((ch = getopt(argc, argv, "A:acd:fhmr:t:")) != -1)
71 switch(ch) {
72 case 'A':
73 Aflag = timeoffset(optarg);
74 break;
75 case 'a':
76 aflag = 1;
77 break;
78 case 'c':
79 cflag = 1;
80 break;
81 case 'd':
82 timeset = 1;
83 stime_darg(optarg, ts);
84 break;
85 case 'f':
86 /* No-op for compatibility. */
87 break;
88 case 'h':
89 cflag = 1;
90 atflag = AT_SYMLINK_NOFOLLOW;
91 break;
92 case 'm':
93 mflag = 1;
94 break;
95 case 'r':
96 timeset = 1;
97 stime_file(optarg, ts);
98 break;
99 case 't':
100 timeset = 1;
101 stime_arg1(optarg, ts);
102 break;
103 default:
104 usage(myname);
105 }
106 argc -= optind;
107 argv += optind;
108
109 if (aflag == 0 && mflag == 0)
110 aflag = mflag = 1;
111
112 if (timeset) {
113 if (Aflag) {
114 /*
115 * We're setting the time to an offset from a specified
116 * time. God knows why, but it means that we can set
117 * that time once and for all here.
118 */
119 if (aflag)
120 ts[0].tv_sec += Aflag;
121 if (mflag)
122 ts[1].tv_sec += Aflag;
123 Aflag = 0; /* done our job */
124 }
125 } else {
126 /*
127 * If no -r or -t flag, at least two operands, the first of
128 * which is an 8 or 10 digit number, use the obsolete time
129 * specification, otherwise use the current time.
130 */
131 if (argc > 1) {
132 strtol(argv[0], &p, 10);
133 len = p - argv[0];
134 if (*p == '\0' && (len == 8 || len == 10)) {
135 timeset = 1;
136 stime_arg2(*argv++, len == 10, ts);
137 }
138 }
139 /* Both times default to the same. */
140 ts[1] = ts[0];
141 }
142
143 if (!aflag)
144 ts[0].tv_nsec = UTIME_OMIT;
145 if (!mflag)
146 ts[1].tv_nsec = UTIME_OMIT;
147
148 if (*argv == NULL)
149 usage(myname);
150
151 if (Aflag)
152 cflag = 1;
153
154 for (rval = 0; *argv; ++argv) {
155 /* See if the file exists. */
156 if (fstatat(AT_FDCWD, *argv, &sb, atflag) != 0) {
157 if (errno != ENOENT) {
158 rval = 1;
159 warn("%s", *argv);
160 continue;
161 }
162 if (!cflag) {
163 /* Create the file. */
164 fd = open(*argv,
165 O_WRONLY | O_CREAT, DEFFILEMODE);
166 if (fd == -1) {
167 rval = 1;
168 warn("%s", *argv);
169 continue;
170 }
171 if (fstat(fd, &sb) < 0) {
172 warn("%s", *argv);
173 rval = 1;
174 }
175 if (close(fd) < 0) {
176 warn("%s", *argv);
177 rval = 1;
178 }
179
180 /* If using the current time, we're done. */
181 if (!timeset)
182 continue;
183 } else
184 continue;
185 }
186
187 /*
188 * We're adjusting the times based on the file times, not a
189 * specified time (that gets handled above).
190 */
191 if (Aflag) {
192 if (aflag) {
193 ts[0] = sb.st_atim;
194 ts[0].tv_sec += Aflag;
195 }
196 if (mflag) {
197 ts[1] = sb.st_mtim;
198 ts[1].tv_sec += Aflag;
199 }
200 }
201
202 if (!utimensat(AT_FDCWD, *argv, ts, atflag))
203 continue;
204
205 rval = 1;
206 warn("%s", *argv);
207 }
208 exit(rval);
209 }
210
211 #define ATOI2(ar) ((ar)[0] - '0') * 10 + ((ar)[1] - '0'); (ar) += 2;
212
213 static void
stime_arg1(const char * arg,struct timespec * tvp)214 stime_arg1(const char *arg, struct timespec *tvp)
215 {
216 time_t now;
217 struct tm *t;
218 int yearset;
219 char *p;
220
221 now = time(NULL);
222 if ((t = localtime(&now)) == NULL)
223 err(1, "localtime");
224 /* [[CC]YY]MMDDhhmm[.SS] */
225 if ((p = strchr(arg, '.')) == NULL)
226 t->tm_sec = 0; /* Seconds defaults to 0. */
227 else {
228 if (strlen(p + 1) != 2)
229 goto terr;
230 *p++ = '\0';
231 t->tm_sec = ATOI2(p);
232 }
233
234 yearset = 0;
235 switch (strlen(arg)) {
236 case 12: /* CCYYMMDDhhmm */
237 t->tm_year = ATOI2(arg);
238 t->tm_year *= 100;
239 yearset = 1;
240 /* FALLTHROUGH */
241 case 10: /* YYMMDDhhmm */
242 if (yearset) {
243 yearset = ATOI2(arg);
244 t->tm_year += yearset;
245 } else {
246 yearset = ATOI2(arg);
247 if (yearset < 69)
248 t->tm_year = yearset + 2000;
249 else
250 t->tm_year = yearset + 1900;
251 }
252 t->tm_year -= 1900; /* Convert to UNIX time. */
253 /* FALLTHROUGH */
254 case 8: /* MMDDhhmm */
255 t->tm_mon = ATOI2(arg);
256 --t->tm_mon; /* Convert from 01-12 to 00-11 */
257 t->tm_mday = ATOI2(arg);
258 t->tm_hour = ATOI2(arg);
259 t->tm_min = ATOI2(arg);
260 break;
261 default:
262 goto terr;
263 }
264
265 t->tm_isdst = -1; /* Figure out DST. */
266 t->tm_yday = -1;
267 tvp[0].tv_sec = tvp[1].tv_sec = mktime(t);
268 if (t->tm_yday == -1)
269 goto terr;
270
271 tvp[0].tv_nsec = tvp[1].tv_nsec = 0;
272 return;
273
274 terr:
275 errx(1, "out of range or illegal time specification: "
276 "[[CC]YY]MMDDhhmm[.SS]");
277 }
278
279 static void
stime_arg2(const char * arg,int year,struct timespec * tvp)280 stime_arg2(const char *arg, int year, struct timespec *tvp)
281 {
282 time_t now;
283 struct tm *t;
284
285 now = time(NULL);
286 if ((t = localtime(&now)) == NULL)
287 err(1, "localtime");
288
289 t->tm_mon = ATOI2(arg); /* MMDDhhmm[yy] */
290 --t->tm_mon; /* Convert from 01-12 to 00-11 */
291 t->tm_mday = ATOI2(arg);
292 t->tm_hour = ATOI2(arg);
293 t->tm_min = ATOI2(arg);
294 if (year) {
295 t->tm_year = ATOI2(arg);
296 if (t->tm_year < 39) /* support 2000-2038 not 1902-1969 */
297 t->tm_year += 100;
298 }
299
300 t->tm_isdst = -1; /* Figure out DST. */
301 t->tm_yday = -1;
302 tvp[0].tv_sec = tvp[1].tv_sec = mktime(t);
303 if (t->tm_yday == -1)
304 errx(1, "out of range or illegal time specification: "
305 "MMDDhhmm[yy]");
306
307 tvp[0].tv_nsec = tvp[1].tv_nsec = 0;
308 }
309
310 static void
stime_darg(const char * arg,struct timespec * tvp)311 stime_darg(const char *arg, struct timespec *tvp)
312 {
313 struct tm t = { .tm_sec = 0 };
314 const char *fmt, *colon;
315 char *p;
316 int val, isutc = 0;
317
318 tvp[0].tv_nsec = 0;
319 t.tm_isdst = -1;
320 colon = strchr(arg, ':');
321 if (colon == NULL || strchr(colon + 1, ':') == NULL)
322 goto bad;
323 fmt = strchr(arg, 'T') != NULL ? "%Y-%m-%dT%H:%M:%S" :
324 "%Y-%m-%d %H:%M:%S";
325 p = strptime(arg, fmt, &t);
326 if (p == NULL)
327 goto bad;
328 /* POSIX: must have at least one digit after dot */
329 if ((*p == '.' || *p == ',') && isdigit((unsigned char)p[1])) {
330 p++;
331 val = 100000000;
332 while (isdigit((unsigned char)*p)) {
333 tvp[0].tv_nsec += val * (*p - '0');
334 p++;
335 val /= 10;
336 }
337 }
338 if (*p == 'Z') {
339 isutc = 1;
340 p++;
341 }
342 if (*p != '\0')
343 goto bad;
344
345 t.tm_yday = -1;
346 tvp[0].tv_sec = isutc ? timegm(&t) : mktime(&t);
347 if (t.tm_yday == -1)
348 goto bad;
349
350 tvp[1] = tvp[0];
351 return;
352
353 bad:
354 errx(1, "out of range or illegal time specification: "
355 "YYYY-MM-DDThh:mm:SS[.frac][tz]");
356 }
357
358 /* Calculate a time offset in seconds, given an arg of the format [-]HHMMSS. */
359 int
timeoffset(const char * arg)360 timeoffset(const char *arg)
361 {
362 int offset;
363 int isneg;
364
365 offset = 0;
366 isneg = *arg == '-';
367 if (isneg)
368 arg++;
369 switch (strlen(arg)) {
370 default: /* invalid */
371 errx(1, "Invalid offset spec, must be [-][[HH]MM]SS");
372
373 case 6: /* HHMMSS */
374 offset = ATOI2(arg);
375 /* FALLTHROUGH */
376 case 4: /* MMSS */
377 offset = offset * 60 + ATOI2(arg);
378 /* FALLTHROUGH */
379 case 2: /* SS */
380 offset = offset * 60 + ATOI2(arg);
381 }
382 if (isneg)
383 return (-offset);
384 else
385 return (offset);
386 }
387
388 static void
stime_file(const char * fname,struct timespec * tsp)389 stime_file(const char *fname, struct timespec *tsp)
390 {
391 struct stat sb;
392
393 if (stat(fname, &sb))
394 err(1, "%s", fname);
395 tsp[0] = sb.st_atim;
396 tsp[1] = sb.st_mtim;
397 }
398
399 static void
usage(const char * myname)400 usage(const char *myname)
401 {
402 fprintf(stderr, "usage: %s [-A [-][[hh]mm]SS] [-achm] [-r file] "
403 "[-t [[CC]YY]MMDDhhmm[.SS]]\n"
404 " [-d YYYY-MM-DDThh:mm:SS[.frac][tz]] "
405 "file ...\n", myname);
406 exit(1);
407 }
408