[apple/file_cmds.git] / touch / touch.c

/*
 * Copyright (c) 1993
 *	The Regents of the University of California.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *	This product includes software developed by the University of
 *	California, Berkeley and its contributors.
 * 4. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

#include <sys/cdefs.h>

__FBSDID("$FreeBSD: src/usr.bin/touch/touch.c,v 1.25 2010/03/28 13:16:08 ed Exp $");

#ifndef lint
static const char copyright[] =
"@(#) Copyright (c) 1993\n\
	The Regents of the University of California.  All rights reserved.\n";
#endif

#ifndef lint
static const char sccsid[] = "@(#)touch.c	8.1 (Berkeley) 6/6/93";
#endif

#include <sys/types.h>
#include <sys/stat.h>
#include <sys/time.h>

#include <err.h>
#include <errno.h>
#include <fcntl.h>
#include <libgen.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <unistd.h>

int	rw(char *, struct stat *, int);
void	stime_arg1(char *, struct timeval *);
void	stime_arg2(char *, int, struct timeval *);
void	stime_file(char *, struct timeval *);
int	timeoffset(char *);
void	usage(char *);

int
main(int argc, char *argv[])
{
	struct stat sb;
	struct timeval tv[2];
	int (*stat_f)(const char *, struct stat *);
	int (*utimes_f)(const char *, const struct timeval *);
	int Aflag, aflag, cflag, fflag, mflag, ch, fd, len, rval, timeset;
	char *p;
	char *myname;

	myname = basename(argv[0]);
	Aflag = aflag = cflag = fflag = mflag = timeset = 0;
	stat_f = stat;
	utimes_f = utimes;
	if (gettimeofday(&tv[0], NULL))
		err(1, "gettimeofday");

	while ((ch = getopt(argc, argv, "A:acfhmr:t:")) != -1)
		switch(ch) {
		case 'A':
			Aflag = timeoffset(optarg);
			break;
		case 'a':
			aflag = 1;
			break;
		case 'c':
			cflag = 1;
			break;
		case 'f':
			fflag = 1;
			break;
		case 'h':
			cflag = 1;
			stat_f = lstat;
			utimes_f = lutimes;
			break;
		case 'm':
			mflag = 1;
			break;
		case 'r':
			timeset = 1;
			stime_file(optarg, tv);
			break;
		case 't':
			timeset = 1;
			stime_arg1(optarg, tv);
			break;
		case '?':
		default:
			usage(myname);
		}
	argc -= optind;
	argv += optind;

	if (aflag == 0 && mflag == 0)
		aflag = mflag = 1;

	if (timeset) {
		if (Aflag) {
			/*
			 * We're setting the time to an offset from a specified
			 * time.  God knows why, but it means that we can set
			 * that time once and for all here.
			 */
			if (aflag)
				tv[0].tv_sec += Aflag;
			if (mflag)
				tv[1].tv_sec += Aflag;
			Aflag = 0;		/* done our job */
		}
	} else {
		/*
		 * If no -r or -t flag, at least two operands, the first of
		 * which is an 8 or 10 digit number, use the obsolete time
		 * specification, otherwise use the current time.
		 */
		if (argc > 1) {
			strtol(argv[0], &p, 10);
			len = p - argv[0];
			if (*p == '\0' && (len == 8 || len == 10)) {
				timeset = 1;
				stime_arg2(*argv++, len == 10, tv);
			}
		}
		/* Both times default to the same. */
		tv[1] = tv[0];
	}

	if (*argv == NULL)
		usage(myname);

	if (Aflag)
		cflag = 1;

	for (rval = 0; *argv; ++argv) {
		/* See if the file exists. */
		if (stat_f(*argv, &sb) != 0) {
			if (errno != ENOENT) {
				rval = 1;
				warn("%s", *argv);
				continue;
			}
			if (!cflag) {
				/* Create the file. */
				fd = open(*argv,
				    O_WRONLY | O_CREAT, DEFFILEMODE);
				if (fd == -1 || fstat(fd, &sb) || close(fd)) {
					rval = 1;
					warn("%s", *argv);
					continue;
				}

				/* If using the current time, we're done. */
				if (!timeset)
					continue;
			} else
				continue;
		}

		if (!aflag)
			TIMESPEC_TO_TIMEVAL(&tv[0], &sb.st_atimespec);
		if (!mflag)
			TIMESPEC_TO_TIMEVAL(&tv[1], &sb.st_mtimespec);

		/*
		 * We're adjusting the times based on the file times, not a
		 * specified time (that gets handled above).
		 */
		if (Aflag) {
			if (aflag) {
				TIMESPEC_TO_TIMEVAL(&tv[0], &sb.st_atimespec);
				tv[0].tv_sec += Aflag;
			}
			if (mflag) {
				TIMESPEC_TO_TIMEVAL(&tv[1], &sb.st_mtimespec);
				tv[1].tv_sec += Aflag;
			}
		}

		/* Try utimes(2). */
		if (!utimes_f(*argv, tv))
			continue;

		/* If the user specified a time, nothing else we can do. */
		if (timeset || Aflag) {
			rval = 1;
			warn("%s", *argv);
			continue;
		}

		/*
		 * System V and POSIX 1003.1 require that a NULL argument
		 * set the access/modification times to the current time.
		 * The permission checks are different, too, in that the
		 * ability to write the file is sufficient.  Take a shot.
		 */
		 if (!utimes_f(*argv, NULL))
			continue;

		/* Try reading/writing. */
		if (!S_ISLNK(sb.st_mode) && !S_ISDIR(sb.st_mode)) {
			if (rw(*argv, &sb, fflag))
				rval = 1;
		} else {
			rval = 1;
			warn("%s", *argv);
		}
	}
	exit(rval);
}

#define	ATOI2(ar)	((ar)[0] - '0') * 10 + ((ar)[1] - '0'); (ar) += 2;

void
stime_arg1(char *arg, struct timeval *tvp)
{
	time_t now;
	struct tm *t;
	int yearset;
	char *p;
					/* Start with the current time. */
	now = tvp[0].tv_sec;
	if ((t = localtime(&now)) == NULL)
		err(1, "localtime");
					/* [[CC]YY]MMDDhhmm[.SS] */
	if ((p = strchr(arg, '.')) == NULL)
		t->tm_sec = 0;		/* Seconds defaults to 0. */
	else {
		if (strlen(p + 1) != 2)
			goto terr;
		*p++ = '\0';
		t->tm_sec = ATOI2(p);
	}

	yearset = 0;
	switch(strlen(arg)) {
	case 12:			/* CCYYMMDDhhmm */
		t->tm_year = ATOI2(arg);
		t->tm_year *= 100;
		yearset = 1;
		/* FALLTHROUGH */
	case 10:			/* YYMMDDhhmm */
		if (yearset) {
			yearset = ATOI2(arg);
			t->tm_year += yearset;
		} else {
			yearset = ATOI2(arg);
			if (yearset < 69)
				t->tm_year = yearset + 2000;
			else
				t->tm_year = yearset + 1900;
		}
		t->tm_year -= 1900;	/* Convert to UNIX time. */
		/* FALLTHROUGH */
	case 8:				/* MMDDhhmm */
		t->tm_mon = ATOI2(arg);
		--t->tm_mon;		/* Convert from 01-12 to 00-11 */
		t->tm_mday = ATOI2(arg);
		t->tm_hour = ATOI2(arg);
		t->tm_min = ATOI2(arg);
		break;
	default:
		goto terr;
	}

	t->tm_isdst = -1;		/* Figure out DST. */
	tvp[0].tv_sec = tvp[1].tv_sec = mktime(t);
	if (tvp[0].tv_sec == -1)
terr:		errx(1,
	"out of range or illegal time specification: [[CC]YY]MMDDhhmm[.SS]");

	tvp[0].tv_usec = tvp[1].tv_usec = 0;
}

void
stime_arg2(char *arg, int year, struct timeval *tvp)
{
	time_t now;
	struct tm *t;
					/* Start with the current time. */
	now = tvp[0].tv_sec;
	if ((t = localtime(&now)) == NULL)
		err(1, "localtime");

	t->tm_mon = ATOI2(arg);		/* MMDDhhmm[yy] */
	--t->tm_mon;			/* Convert from 01-12 to 00-11 */
	t->tm_mday = ATOI2(arg);
	t->tm_hour = ATOI2(arg);
	t->tm_min = ATOI2(arg);
	if (year) {
		t->tm_year = ATOI2(arg);
		if (t->tm_year < 39)	/* support 2000-2038 not 1902-1969 */
			t->tm_year += 100;
	}

	t->tm_isdst = -1;		/* Figure out DST. */
	tvp[0].tv_sec = tvp[1].tv_sec = mktime(t);
	if (tvp[0].tv_sec == -1)
		errx(1,
	"out of range or illegal time specification: MMDDhhmm[yy]");

	tvp[0].tv_usec = tvp[1].tv_usec = 0;
}

/* Calculate a time offset in seconds, given an arg of the format [-]HHMMSS. */
int
timeoffset(char *arg)
{
	int offset;
	int isneg;

	offset = 0;
	isneg = *arg == '-';
	if (isneg)
		arg++;
	switch (strlen(arg)) {
	default:				/* invalid */
		errx(1, "Invalid offset spec, must be [-][[HH]MM]SS");

	case 6:					/* HHMMSS */
		offset = ATOI2(arg);
		/* FALLTHROUGH */
	case 4:					/* MMSS */
		offset = offset * 60 + ATOI2(arg);
		/* FALLTHROUGH */
	case 2:					/* SS */
		offset = offset * 60 + ATOI2(arg);
	}
	if (isneg)
		return (-offset);
	else
		return (offset);
}

void
stime_file(char *fname, struct timeval *tvp)
{
	struct stat sb;

	if (stat(fname, &sb))
		err(1, "%s", fname);
	TIMESPEC_TO_TIMEVAL(tvp, &sb.st_atimespec);
	TIMESPEC_TO_TIMEVAL(tvp + 1, &sb.st_mtimespec);
}

int
rw(char *fname, struct stat *sbp, int force)
{
	int fd, needed_chmod, rval;
	u_char byte;

	/* Try regular files. */
	if (!S_ISREG(sbp->st_mode)) {
		warnx("%s: %s", fname, strerror(EFTYPE));
		return (1);
	}

	needed_chmod = rval = 0;
	if ((fd = open(fname, O_RDWR, 0)) == -1) {
		if (!force || chmod(fname, DEFFILEMODE))
			goto err;
		if ((fd = open(fname, O_RDWR, 0)) == -1)
			goto err;
		needed_chmod = 1;
	}

	if (sbp->st_size != 0) {
		if (read(fd, &byte, sizeof(byte)) != sizeof(byte))
			goto err;
		if (lseek(fd, (off_t)0, SEEK_SET) == -1)
			goto err;
		if (write(fd, &byte, sizeof(byte)) != sizeof(byte))
			goto err;
	} else {
		if (write(fd, &byte, sizeof(byte)) != sizeof(byte)) {
err:			rval = 1;
			warn("%s", fname);
		} else if (ftruncate(fd, (off_t)0)) {
			rval = 1;
			warn("%s: file modified", fname);
		}
	}

	if (close(fd) && rval != 1) {
		rval = 1;
		warn("%s", fname);
	}
	if (needed_chmod && chmod(fname, sbp->st_mode) && rval != 1) {
		rval = 1;
		warn("%s: permissions modified", fname);
	}
	return (rval);
}

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