touch.c revision 1.5 1 1.1 cgd /*
2 1.2 glass * Copyright (c) 1993 Regents of the University of California.
3 1.1 cgd * All rights reserved.
4 1.1 cgd *
5 1.1 cgd * Redistribution and use in source and binary forms, with or without
6 1.1 cgd * modification, are permitted provided that the following conditions
7 1.1 cgd * are met:
8 1.1 cgd * 1. Redistributions of source code must retain the above copyright
9 1.1 cgd * notice, this list of conditions and the following disclaimer.
10 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer in the
12 1.1 cgd * documentation and/or other materials provided with the distribution.
13 1.1 cgd * 3. All advertising materials mentioning features or use of this software
14 1.1 cgd * must display the following acknowledgement:
15 1.1 cgd * This product includes software developed by the University of
16 1.1 cgd * California, Berkeley and its contributors.
17 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
18 1.1 cgd * may be used to endorse or promote products derived from this software
19 1.1 cgd * without specific prior written permission.
20 1.1 cgd *
21 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 1.1 cgd * SUCH DAMAGE.
32 1.1 cgd */
33 1.1 cgd
34 1.1 cgd #ifndef lint
35 1.1 cgd char copyright[] =
36 1.2 glass "@(#) Copyright (c) 1993 Regents of the University of California.\n\
37 1.1 cgd All rights reserved.\n";
38 1.1 cgd #endif /* not lint */
39 1.1 cgd
40 1.1 cgd #ifndef lint
41 1.5 mycroft /*static char sccsid[] = "from: @(#)touch.c 5.5 (Berkeley) 3/7/93";*/
42 1.5 mycroft static char rcsid[] = "$Id: touch.c,v 1.5 1993/08/01 18:04:42 mycroft Exp $";
43 1.1 cgd #endif /* not lint */
44 1.1 cgd
45 1.1 cgd #include <sys/types.h>
46 1.1 cgd #include <sys/stat.h>
47 1.2 glass #include <sys/time.h>
48 1.2 glass
49 1.2 glass #include <err.h>
50 1.2 glass #include <errno.h>
51 1.2 glass #include <fcntl.h>
52 1.1 cgd #include <stdio.h>
53 1.2 glass #include <stdlib.h>
54 1.2 glass #include <string.h>
55 1.2 glass #include <time.h>
56 1.2 glass #include <unistd.h>
57 1.2 glass
58 1.2 glass int rw __P((char *, struct stat *, int));
59 1.2 glass void stime_arg1 __P((char *, struct timeval *));
60 1.2 glass void stime_arg2 __P((char *, int, struct timeval *));
61 1.2 glass void stime_file __P((char *, struct timeval *));
62 1.2 glass void usage __P((void));
63 1.1 cgd
64 1.2 glass /*temporary we aren't 4.4 portability hack*/
65 1.2 glass #define TIMET_TO_TIMEVAL(timevalp, tp) (timevalp)->tv_sec = *(tp);
66 1.1 cgd
67 1.2 glass int
68 1.1 cgd main(argc, argv)
69 1.1 cgd int argc;
70 1.2 glass char *argv[];
71 1.1 cgd {
72 1.2 glass struct stat sb;
73 1.2 glass struct timeval tv[2];
74 1.2 glass int aflag, cflag, fflag, mflag, ch, fd, len, rval, timeset;
75 1.2 glass char *p;
76 1.2 glass
77 1.2 glass aflag = cflag = fflag = mflag = timeset = 0;
78 1.2 glass if (gettimeofday(&tv[0], NULL))
79 1.2 glass err(1, "gettimeofday");
80 1.2 glass
81 1.2 glass while ((ch = getopt(argc, argv, "acfmr:t:")) != EOF)
82 1.2 glass switch(ch) {
83 1.2 glass case 'a':
84 1.2 glass aflag = 1;
85 1.2 glass break;
86 1.1 cgd case 'c':
87 1.2 glass cflag = 1;
88 1.1 cgd break;
89 1.1 cgd case 'f':
90 1.2 glass fflag = 1;
91 1.2 glass break;
92 1.2 glass case 'm':
93 1.2 glass mflag = 1;
94 1.2 glass break;
95 1.2 glass case 'r':
96 1.2 glass timeset = 1;
97 1.2 glass stime_file(optarg, tv);
98 1.1 cgd break;
99 1.2 glass case 't':
100 1.2 glass timeset = 1;
101 1.2 glass stime_arg1(optarg, tv);
102 1.2 glass break;
103 1.1 cgd case '?':
104 1.1 cgd default:
105 1.1 cgd usage();
106 1.1 cgd }
107 1.2 glass argc -= optind;
108 1.2 glass argv += optind;
109 1.2 glass
110 1.2 glass /* Default is both -a and -m. */
111 1.2 glass if (aflag == 0 && mflag == 0)
112 1.2 glass aflag = mflag = 1;
113 1.2 glass
114 1.2 glass /*
115 1.2 glass * If no -r or -t flag, at least two operands, the first of which
116 1.2 glass * is an 8 or 10 digit number, use the obsolete time specification.
117 1.2 glass */
118 1.2 glass if (!timeset && argc > 1) {
119 1.2 glass (void)strtol(argv[0], &p, 10);
120 1.2 glass len = p - argv[0];
121 1.2 glass if (*p == '\0' && (len == 8 || len == 10)) {
122 1.2 glass timeset = 1;
123 1.2 glass stime_arg2(argv[0], len == 10, tv);
124 1.4 glass argv++;
125 1.2 glass }
126 1.2 glass }
127 1.2 glass
128 1.2 glass /* Otherwise use the current time of day. */
129 1.2 glass if (!timeset)
130 1.2 glass tv[1] = tv[0];
131 1.2 glass
132 1.2 glass if (*argv == NULL)
133 1.1 cgd usage();
134 1.2 glass
135 1.2 glass for (rval = 0; *argv; ++argv) {
136 1.2 glass /* See if the file exists. */
137 1.2 glass if (stat(*argv, &sb))
138 1.2 glass if (!cflag) {
139 1.2 glass /* Create the file. */
140 1.2 glass fd = open(*argv,
141 1.2 glass O_WRONLY | O_CREAT, DEFFILEMODE);
142 1.2 glass if (fd == -1 || fstat(fd, &sb) || close(fd)) {
143 1.2 glass rval = 1;
144 1.2 glass warn("%s", *argv);
145 1.2 glass continue;
146 1.2 glass }
147 1.2 glass
148 1.2 glass /* If using the current time, we're done. */
149 1.2 glass if (!timeset)
150 1.2 glass continue;
151 1.2 glass } else
152 1.2 glass continue;
153 1.2 glass
154 1.2 glass if (!aflag)
155 1.2 glass /* TIMESPEC_TO_TIMEVAL(&tv[0], &sb.st_atimespec);*/
156 1.2 glass TIMET_TO_TIMEVAL(&tv[0], &sb.st_atime);
157 1.2 glass if (!mflag)
158 1.2 glass /* TIMESPEC_TO_TIMEVAL(&tv[1], &sb.st_mtimespec);*/
159 1.2 glass TIMET_TO_TIMEVAL(&tv[1], &sb.st_mtime);
160 1.2 glass
161 1.2 glass
162 1.2 glass /* Try utimes(2). */
163 1.2 glass if (!utimes(*argv, tv))
164 1.2 glass continue;
165 1.2 glass
166 1.2 glass /* If the user specified a time, nothing else we can do. */
167 1.2 glass if (timeset) {
168 1.2 glass rval = 1;
169 1.2 glass warn("%s", *argv);
170 1.2 glass }
171 1.2 glass
172 1.2 glass /*
173 1.2 glass * System V and POSIX 1003.1 require that a NULL argument
174 1.2 glass * set the access/modification times to the current time.
175 1.2 glass * The permission checks are different, too, in that the
176 1.2 glass * ability to write the file is sufficient. Take a shot.
177 1.2 glass */
178 1.2 glass if (!utimes(*argv, NULL))
179 1.2 glass continue;
180 1.2 glass
181 1.2 glass /* Try reading/writing. */
182 1.2 glass if (rw(*argv, &sb, fflag))
183 1.2 glass rval = 1;
184 1.2 glass }
185 1.2 glass exit(rval);
186 1.1 cgd }
187 1.1 cgd
188 1.2 glass #define ATOI2(ar) ((ar)[0] - '0') * 10 + ((ar)[1] - '0'); (ar) += 2;
189 1.2 glass
190 1.2 glass void
191 1.2 glass stime_arg1(arg, tvp)
192 1.2 glass char *arg;
193 1.2 glass struct timeval *tvp;
194 1.1 cgd {
195 1.2 glass struct tm *t;
196 1.2 glass int yearset;
197 1.2 glass char *p;
198 1.2 glass /* Start with the current time. */
199 1.2 glass if ((t = localtime(&tvp[0].tv_sec)) == NULL)
200 1.2 glass err(1, "localtime");
201 1.2 glass /* [[CC]YY]MMDDhhmm[.SS] */
202 1.2 glass if ((p = strchr(arg, '.')) == NULL)
203 1.2 glass t->tm_sec = 0; /* Seconds defaults to 0. */
204 1.2 glass else {
205 1.2 glass if (strlen(p + 1) != 2)
206 1.2 glass goto terr;
207 1.2 glass *p++ = '\0';
208 1.2 glass t->tm_sec = ATOI2(p);
209 1.2 glass }
210 1.2 glass
211 1.2 glass yearset = 0;
212 1.2 glass switch(strlen(arg)) {
213 1.2 glass case 12: /* CCYYMMDDhhmm */
214 1.2 glass t->tm_year = ATOI2(arg);
215 1.2 glass t->tm_year *= 1000;
216 1.2 glass yearset = 1;
217 1.2 glass /* FALLTHOUGH */
218 1.2 glass case 10: /* YYMMDDhhmm */
219 1.2 glass if (yearset) {
220 1.2 glass yearset = ATOI2(arg);
221 1.2 glass t->tm_year += yearset;
222 1.2 glass } else {
223 1.2 glass yearset = ATOI2(arg);
224 1.2 glass if (yearset < 69)
225 1.2 glass t->tm_year = yearset + 2000;
226 1.2 glass else
227 1.2 glass t->tm_year = yearset + 1900;
228 1.1 cgd }
229 1.2 glass t->tm_year -= 1900; /* Convert to UNIX time. */
230 1.2 glass /* FALLTHROUGH */
231 1.2 glass case 8: /* MMDDhhmm */
232 1.2 glass t->tm_mon = ATOI2(arg);
233 1.2 glass --t->tm_mon; /* Convert from 01-12 to 00-11 */
234 1.2 glass t->tm_mday = ATOI2(arg);
235 1.2 glass t->tm_hour = ATOI2(arg);
236 1.2 glass t->tm_min = ATOI2(arg);
237 1.2 glass break;
238 1.2 glass default:
239 1.2 glass goto terr;
240 1.1 cgd }
241 1.2 glass
242 1.2 glass t->tm_isdst = -1; /* Figure out DST. */
243 1.2 glass tvp[0].tv_sec = tvp[1].tv_sec = mktime(t);
244 1.2 glass if (tvp[0].tv_sec == -1)
245 1.2 glass terr: errx(1,
246 1.2 glass "out of range or illegal time specification: [[CC]YY]MMDDhhmm[.SS]");
247 1.2 glass
248 1.2 glass tvp[0].tv_usec = tvp[1].tv_usec = 0;
249 1.2 glass }
250 1.2 glass
251 1.2 glass void
252 1.2 glass stime_arg2(arg, year, tvp)
253 1.2 glass char *arg;
254 1.2 glass int year;
255 1.2 glass struct timeval *tvp;
256 1.2 glass {
257 1.2 glass struct tm *t;
258 1.2 glass /* Start with the current time. */
259 1.2 glass if ((t = localtime(&tvp[0].tv_sec)) == NULL)
260 1.2 glass err(1, "localtime");
261 1.2 glass
262 1.2 glass t->tm_mon = ATOI2(arg); /* MMDDhhmm[yy] */
263 1.2 glass --t->tm_mon; /* Convert from 01-12 to 00-11 */
264 1.2 glass t->tm_mday = ATOI2(arg);
265 1.2 glass t->tm_hour = ATOI2(arg);
266 1.2 glass t->tm_min = ATOI2(arg);
267 1.2 glass if (year)
268 1.2 glass t->tm_year = ATOI2(arg);
269 1.2 glass
270 1.2 glass t->tm_isdst = -1; /* Figure out DST. */
271 1.2 glass tvp[0].tv_sec = tvp[1].tv_sec = mktime(t);
272 1.2 glass if (tvp[0].tv_sec == -1)
273 1.2 glass errx(1,
274 1.2 glass "out of range or illegal time specification: MMDDhhmm[yy]");
275 1.2 glass
276 1.2 glass tvp[0].tv_usec = tvp[1].tv_usec = 0;
277 1.2 glass }
278 1.2 glass
279 1.2 glass void
280 1.2 glass stime_file(fname, tvp)
281 1.2 glass char *fname;
282 1.2 glass struct timeval *tvp;
283 1.2 glass {
284 1.2 glass struct stat sb;
285 1.2 glass
286 1.2 glass if (stat(fname, &sb))
287 1.2 glass err(1, "%s", fname);
288 1.2 glass /* TIMESPEC_TO_TIMEVAL(tvp, &sb.st_atimespec);*/
289 1.2 glass TIMET_TO_TIMEVAL(tvp, &sb.st_atime);
290 1.2 glass /* TIMESPEC_TO_TIMEVAL(tvp + 1, &sb.st_mtimespec);*/
291 1.2 glass TIMET_TO_TIMEVAL(tvp + 1, &sb.st_mtime);
292 1.1 cgd }
293 1.1 cgd
294 1.2 glass int
295 1.2 glass rw(fname, sbp, force)
296 1.2 glass char *fname;
297 1.2 glass struct stat *sbp;
298 1.2 glass int force;
299 1.2 glass {
300 1.2 glass int fd, needed_chmod, rval;
301 1.2 glass u_char byte;
302 1.2 glass
303 1.2 glass /* Try regular files and directories. */
304 1.2 glass if (!S_ISREG(sbp->st_mode) && !S_ISDIR(sbp->st_mode)) {
305 1.2 glass warnx("%s: %s", fname, strerror(EFTYPE));
306 1.2 glass return (1);
307 1.2 glass }
308 1.2 glass
309 1.2 glass needed_chmod = rval = 0;
310 1.2 glass if ((fd = open(fname, O_RDWR, 0)) == -1) {
311 1.2 glass if (!force || chmod(fname, DEFFILEMODE))
312 1.2 glass goto err;
313 1.2 glass if ((fd = open(fname, O_RDWR, 0)) == -1)
314 1.2 glass goto err;
315 1.2 glass needed_chmod = 1;
316 1.2 glass }
317 1.2 glass
318 1.2 glass if (sbp->st_size != 0) {
319 1.2 glass if (read(fd, &byte, sizeof(byte)) != sizeof(byte))
320 1.2 glass goto err;
321 1.2 glass if (lseek(fd, (off_t)0, SEEK_SET) == -1)
322 1.2 glass goto err;
323 1.2 glass if (write(fd, &byte, sizeof(byte)) != sizeof(byte))
324 1.2 glass goto err;
325 1.2 glass } else {
326 1.2 glass if (write(fd, &byte, sizeof(byte)) != sizeof(byte)) {
327 1.2 glass err: rval = 1;
328 1.2 glass warn("%s", fname);
329 1.2 glass } else if (ftruncate(fd, (off_t)0)) {
330 1.2 glass rval = 1;
331 1.2 glass warn("%s: file modified", fname);
332 1.1 cgd }
333 1.2 glass }
334 1.2 glass
335 1.2 glass if (close(fd) && rval != 1) {
336 1.2 glass rval = 1;
337 1.2 glass warn("%s", fname);
338 1.2 glass }
339 1.2 glass if (needed_chmod && chmod(fname, sbp->st_mode) && rval != 1) {
340 1.2 glass rval = 1;
341 1.2 glass warn("%s: permissions modified", fname);
342 1.2 glass }
343 1.2 glass return (rval);
344 1.1 cgd }
345 1.1 cgd
346 1.3 mycroft volatile void
347 1.1 cgd usage()
348 1.1 cgd {
349 1.2 glass (void)fprintf(stderr,
350 1.2 glass "usage: touch [-acfm] [-r file] [-t time] file ...\n");
351 1.1 cgd exit(1);
352 1.1 cgd }
353