touch/touch.c

   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>
  35
  36 __RCSID("$FreeBSD: src/usr.bin/touch/touch.c,v 1.20 2002/09/04 23:29:07 dwmalone Exp $");
  37
  38 #ifndef lint
  39 static const char copyright[] =
  40 "@(#) Copyright (c) 1993\n\
  41         The Regents of the University of California.  All rights reserved.\n";
  42 #endif
  43
  44 #ifndef lint
  45 static const char sccsid[] = "@(#)touch.c       8.1 (Berkeley) 6/6/93";
  46 #endif
  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>
  55 #include <stdio.h>
  56 #include <stdlib.h>
  57 #include <string.h>
  58 #include <time.h>
  59 #include <unistd.h>
  60
  61 int     rw(char *, struct stat *, int);
  62 void    stime_arg1(char *, struct timeval *);
  63 void    stime_arg2(char *, int, struct timeval *);
  64 void    stime_file(char *, struct timeval *);
  65 void    usage(void);
  66
  67 int
  68 main(int argc, char *argv[])
  69 {
  70         struct stat sb;
  71         struct timeval tv[2];
  72         int (*stat_f)(const char *, struct stat *);
  73         int (*utimes_f)(const char *, const struct timeval *);
  74         int aflag, cflag, fflag, mflag, ch, fd, len, rval, timeset;
  75         char *p;
  76
  77         aflag = cflag = fflag = mflag = timeset = 0;
  78         stat_f = stat;
  79         utimes_f = utimes;
  80         if (gettimeofday(&tv[0], NULL))
  81                 err(1, "gettimeofday");
  82
  83 #ifndef __APPLE__
  84         while ((ch = getopt(argc, argv, "acfhmr:t:")) != -1)
  85 #else
  86         while ((ch = getopt(argc, argv, "acfmr:t:")) != -1)
  87 #endif
  88                 switch(ch) {
  89                 case 'a':
  90                         aflag = 1;
  91                         break;
  92                 case 'c':
  93                         cflag = 1;
  94                         break;
  95                 case 'f':
  96                         fflag = 1;
  97                         break;
  98 #ifndef __APPLE__
  99                 case 'h':
 100                         cflag = 1;
 101                         stat_f = lstat;
 102                         utimes_f = lutimes;
 103                         break;
 104 #endif /* __APPLE__ */
 105                 case 'm':
 106                         mflag = 1;
 107                         break;
 108                 case 'r':
 109                         timeset = 1;
 110                         stime_file(optarg, tv);
 111                         break;
 112                 case 't':
 113                         timeset = 1;
 114                         stime_arg1(optarg, tv);
 115                         break;
 116                 case '?':
 117                 default:
 118                         usage();
 119                 }
 120         argc -= optind;
 121         argv += optind;
 122
 123         /* Default is both -a and -m. */
 124         if (aflag == 0 && mflag == 0)
 125                 aflag = mflag = 1;
 126
 127         /*
 128          * If no -r or -t flag, at least two operands, the first of which
 129          * is an 8 or 10 digit number, use the obsolete time specification.
 130          */
 131         if (!timeset && argc > 1) {
 132                 (void)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, tv);
 137                 }
 138         }
 139
 140         /* Otherwise use the current time of day. */
 141         if (!timeset)
 142                 tv[1] = tv[0];
 143
 144         if (*argv == NULL)
 145                 usage();
 146
 147         for (rval = 0; *argv; ++argv) {
 148                 /* See if the file exists. */
 149                 if (stat_f(*argv, &sb) != 0) {
 150                         if (!cflag) {
 151                                 /* Create the file. */
 152                                 fd = open(*argv,
 153                                     O_WRONLY | O_CREAT, DEFFILEMODE);
 154                                 if (fd == -1 || fstat(fd, &sb) || close(fd)) {
 155                                         rval = 1;
 156                                         warn("%s", *argv);
 157                                         continue;
 158                                 }
 159
 160                                 /* If using the current time, we're done. */
 161                                 if (!timeset)
 162                                         continue;
 163                         } else
 164                                 continue;
 165                 }
 166
 167                 if (!aflag)
 168                         TIMESPEC_TO_TIMEVAL(&tv[0], &sb.st_atimespec);
 169                 if (!mflag)
 170                         TIMESPEC_TO_TIMEVAL(&tv[1], &sb.st_mtimespec);
 171
 172                 /* Try utimes(2). */
 173                 if (!utimes_f(*argv, tv))
 174                         continue;
 175
 176                 /* If the user specified a time, nothing else we can do. */
 177                 if (timeset) {
 178                         rval = 1;
 179                         warn("%s", *argv);
 180                         continue;
 181                 }
 182
 183                 /*
 184                  * System V and POSIX 1003.1 require that a NULL argument
 185                  * set the access/modification times to the current time.
 186                  * The permission checks are different, too, in that the
 187                  * ability to write the file is sufficient.  Take a shot.
 188                  */
 189                  if (!utimes_f(*argv, NULL))
 190                         continue;
 191
 192                 /* Try reading/writing. */
 193                  if (S_ISLNK(sb.st_mode) || S_ISDIR(sb.st_mode)) {
 194                          warn("%s", *argv);
 195                          rval = 1;
 196                  } else if (rw(*argv, &sb, fflag)) {
 197                          rval = 1;
 198                  }
 199         }
 200         exit(rval);
 201 }
 202
 203 #define ATOI2(ar)       ((ar)[0] - '0') * 10 + ((ar)[1] - '0'); (ar) += 2;
 204
 205 void
 206 stime_arg1(char *arg, struct timeval *tvp)
 207 {
 208         time_t now;
 209         struct tm *t;
 210         int yearset;
 211         char *p;
 212                                         /* Start with the current time. */
 213         now = tvp[0].tv_sec;
 214         if ((t = localtime(&now)) == NULL)
 215                 err(1, "localtime");
 216                                         /* [[CC]YY]MMDDhhmm[.SS] */
 217         if ((p = strchr(arg, '.')) == NULL)
 218                 t->tm_sec = 0;          /* Seconds defaults to 0. */
 219         else {
 220                 if (strlen(p + 1) != 2)
 221                         goto terr;
 222                 *p++ = '\0';
 223                 t->tm_sec = ATOI2(p);
 224         }
 225
 226         yearset = 0;
 227         switch(strlen(arg)) {
 228         case 12:                        /* CCYYMMDDhhmm */
 229                 t->tm_year = ATOI2(arg);
 230                 t->tm_year *= 100;
 231                 yearset = 1;
 232                 /* FALLTHROUGH */
 233         case 10:                        /* YYMMDDhhmm */
 234                 if (yearset) {
 235                         yearset = ATOI2(arg);
 236                         t->tm_year += yearset;
 237                 } else {
 238                         yearset = ATOI2(arg);
 239                         if (yearset < 69)
 240                                 t->tm_year = yearset + 2000;
 241                         else
 242                                 t->tm_year = yearset + 1900;
 243                 }
 244                 t->tm_year -= 1900;     /* Convert to UNIX time. */
 245                 /* FALLTHROUGH */
 246         case 8:                         /* MMDDhhmm */
 247                 t->tm_mon = ATOI2(arg);
 248                 --t->tm_mon;            /* Convert from 01-12 to 00-11 */
 249                 t->tm_mday = ATOI2(arg);
 250                 t->tm_hour = ATOI2(arg);
 251                 t->tm_min = ATOI2(arg);
 252                 break;
 253         default:
 254                 goto terr;
 255         }
 256
 257         t->tm_isdst = -1;               /* Figure out DST. */
 258         tvp[0].tv_sec = tvp[1].tv_sec = mktime(t);
 259         if (tvp[0].tv_sec == -1)
 260 terr:           errx(1,
 261         "out of range or illegal time specification: [[CC]YY]MMDDhhmm[.SS]");
 262
 263         tvp[0].tv_usec = tvp[1].tv_usec = 0;
 264 }
 265
 266 void
 267 stime_arg2(char *arg, int year, struct timeval *tvp)
 268 {
 269         time_t now;
 270         struct tm *t;
 271                                         /* Start with the current time. */
 272         now = tvp[0].tv_sec;
 273         if ((t = localtime(&now)) == NULL)
 274                 err(1, "localtime");
 275
 276         t->tm_mon = ATOI2(arg);         /* MMDDhhmm[yy] */
 277         --t->tm_mon;                    /* Convert from 01-12 to 00-11 */
 278         t->tm_mday = ATOI2(arg);
 279         t->tm_hour = ATOI2(arg);
 280         t->tm_min = ATOI2(arg);
 281         if (year) {
 282                 t->tm_year = ATOI2(arg);
 283                 if (t->tm_year < 39)    /* support 2000-2038 not 1902-1969 */
 284                         t->tm_year += 100;
 285         }
 286
 287         t->tm_isdst = -1;               /* Figure out DST. */
 288         tvp[0].tv_sec = tvp[1].tv_sec = mktime(t);
 289         if (tvp[0].tv_sec == -1)
 290                 errx(1,
 291         "out of range or illegal time specification: MMDDhhmm[yy]");
 292
 293         tvp[0].tv_usec = tvp[1].tv_usec = 0;
 294 }
 295
 296 void
 297 stime_file(char *fname, struct timeval *tvp)
 298 {
 299         struct stat sb;
 300
 301         if (stat(fname, &sb))
 302                 err(1, "%s", fname);
 303         TIMESPEC_TO_TIMEVAL(tvp, &sb.st_atimespec);
 304         TIMESPEC_TO_TIMEVAL(tvp + 1, &sb.st_mtimespec);
 305 }
 306
 307 int
 308 rw(char *fname, struct stat *sbp, int force)
 309 {
 310         int fd, needed_chmod, rval;
 311         u_char byte;
 312
 313         /* Try regular files. */
 314         if (!S_ISREG(sbp->st_mode)) {
 315                 warnx("%s: %s", fname, strerror(EFTYPE));
 316                 return (1);
 317         }
 318
 319         needed_chmod = rval = 0;
 320         if ((fd = open(fname, O_RDWR, 0)) == -1) {
 321                 if (!force || chmod(fname, DEFFILEMODE))
 322                         goto err;
 323                 if ((fd = open(fname, O_RDWR, 0)) == -1)
 324                         goto err;
 325                 needed_chmod = 1;
 326         }
 327
 328         if (sbp->st_size != 0) {
 329                 if (read(fd, &byte, sizeof(byte)) != sizeof(byte))
 330                         goto err;
 331                 if (lseek(fd, (off_t)0, SEEK_SET) == -1)
 332                         goto err;
 333                 if (write(fd, &byte, sizeof(byte)) != sizeof(byte))
 334                         goto err;
 335         } else {
 336                 if (write(fd, &byte, sizeof(byte)) != sizeof(byte)) {
 337 err:                    rval = 1;
 338                         warn("%s", fname);
 339                 } else if (ftruncate(fd, (off_t)0)) {
 340                         rval = 1;
 341                         warn("%s: file modified", fname);
 342                 }
 343         }
 344
 345         if (close(fd) && rval != 1) {
 346                 rval = 1;
 347                 warn("%s", fname);
 348         }
 349         if (needed_chmod && chmod(fname, sbp->st_mode) && rval != 1) {
 350                 rval = 1;
 351                 warn("%s: permissions modified", fname);
 352         }
 353         return (rval);
 354 }
 355
 356 void
 357 usage(void)
 358 {
 359 #ifndef __APPLE__
 360         (void)fprintf(stderr, "usage: touch [-acfhm] [-r file] [-t [[CC]YY]MMDDhhmm[.SS]] file ...\n");
 361 #else
 362         (void)fprintf(stderr, "usage: touch [-acfm] [-r file] [-t [[CC]YY]MMDDhhmm[.SS]] file ...\n");
 363 #endif
 364         exit(1);
 365 }