dd: support conv=swab
[oweals/busybox.git] / coreutils / touch.c
index b98a2e4c84edbe90b08ff35bdfde163d5c7c1fc5..1216ca202b0ea4efe02be0f10d9c7aacb0d04d6b 100644 (file)
+/* vi: set sw=4 ts=4: */
 /*
  * Mini touch implementation for busybox
  *
+ * Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
  *
- * Copyright (C) 1999 by Lineo, inc.
- * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ * Licensed under GPLv2 or later, see file LICENSE in this source tree.
+ */
+
+/* BB_AUDIT SUSv3 _NOT_ compliant -- options -a, -m not supported. */
+/* http://www.opengroup.org/onlinepubs/007904975/utilities/touch.html */
+
+/* Mar 16, 2003      Manuel Novoa III   (mjn3@codepoet.org)
  *
+ * Previous version called open() and then utime().  While this will be
+ * be necessary to implement -r and -t, it currently only makes things bigger.
+ * Also, exiting on a failure was a bug.  All args should be processed.
  */
 
-#include "internal.h"
-#include <stdio.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <fcntl.h>
-#include <utime.h>
-#include <errno.h>
+#include "libbb.h"
 
+//config:config TOUCH
+//config:      bool "touch"
+//config:      default y
+//config:      help
+//config:        touch is used to create or change the access and/or
+//config:        modification timestamp of specified files.
+//config:
+//config:config FEATURE_TOUCH_SUSV3
+//config:      bool "Add support for SUSV3 features (-d -t -r)"
+//config:      default y
+//config:      depends on TOUCH
+//config:      help
+//config:        Enable touch to use a reference file or a given date/time argument.
 
-static const char touch_usage[] = "touch [-c] file [file ...]\n\n"
-"\tUpdate the last-modified date on the given file[s].\n";
+//applet:IF_TOUCH(APPLET_NOFORK(touch, touch, BB_DIR_BIN, BB_SUID_DROP, touch))
 
+//kbuild:lib-$(CONFIG_TOUCH) += touch.o
 
+//usage:#define touch_trivial_usage
+//usage:       "[-c]" IF_FEATURE_TOUCH_SUSV3(" [-d DATE] [-t DATE] [-r FILE]") " FILE..."
+//usage:#define touch_full_usage "\n\n"
+//usage:       "Update the last-modified date on the given FILE[s]\n"
+//usage:     "\n       -c      Don't create files"
+//usage:       IF_FEATURE_TOUCH_SUSV3(
+//usage:     "\n       -d DT   Date/time to use"
+//usage:     "\n       -t DT   Date/time to use"
+//usage:     "\n       -r FILE Use FILE's date/time"
+//usage:       )
+//usage:
+//usage:#define touch_example_usage
+//usage:       "$ ls -l /tmp/foo\n"
+//usage:       "/bin/ls: /tmp/foo: No such file or directory\n"
+//usage:       "$ touch /tmp/foo\n"
+//usage:       "$ ls -l /tmp/foo\n"
+//usage:       "-rw-rw-r--    1 andersen andersen        0 Apr 15 01:11 /tmp/foo\n"
 
-extern int 
-touch_main(int argc, char **argv)
+/* This is a NOFORK applet. Be very careful! */
+
+/* coreutils implements:
+ * -a   change only the access time
+ * -c, --no-create
+ *      do not create any files
+ * -d, --date=STRING
+ *      parse STRING and use it instead of current time
+ * -f   (ignored, BSD compat)
+ * -m   change only the modification time
+ * -r, --reference=FILE
+ *      use this file's times instead of current time
+ * -t STAMP
+ *      use [[CC]YY]MMDDhhmm[.ss] instead of current time
+ * --time=WORD
+ *      change the specified time: WORD is access, atime, or use
+ */
+
+int touch_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
+int touch_main(int argc UNUSED_PARAM, char **argv)
 {
-    int fd;
-    int create=TRUE;
-
-    if (argc < 2) {
-       usage( touch_usage);
-    }
-    argc--;
-    argv++;
-
-    /* Parse options */
-    while (**argv == '-') {
-       while (*++(*argv)) switch (**argv) {
-           case 'c':
-               create = FALSE;
-               break;
-           default:
-               fprintf(stderr, "Unknown option: %c\n", **argv);
-               exit( FALSE);
+       int fd;
+       int status = EXIT_SUCCESS;
+       int opts;
+#if ENABLE_FEATURE_TOUCH_SUSV3
+# if ENABLE_LONG_OPTS
+       static const char touch_longopts[] ALIGN1 =
+               /* name, has_arg, val */
+               "no-create\0"         No_argument       "c"
+               "reference\0"         Required_argument "r"
+               "date\0"              Required_argument "d"
+       ;
+# endif
+       char *reference_file = NULL;
+       char *date_str = NULL;
+       struct timeval timebuf[2];
+       timebuf[1].tv_usec = timebuf[0].tv_usec = 0;
+#else
+# define reference_file NULL
+# define date_str       NULL
+# define timebuf        ((struct timeval*)NULL)
+#endif
+
+#if ENABLE_FEATURE_TOUCH_SUSV3 && ENABLE_LONG_OPTS
+       applet_long_options = touch_longopts;
+#endif
+       /* -d and -t both set time. In coreutils,
+        * accepted data format differs a bit between -d and -t.
+        * We accept the same formats for both */
+       opts = getopt32(argv, "c" IF_FEATURE_TOUCH_SUSV3("r:d:t:")
+                               /*ignored:*/ "fma"
+                               IF_FEATURE_TOUCH_SUSV3(, &reference_file)
+                               IF_FEATURE_TOUCH_SUSV3(, &date_str)
+                               IF_FEATURE_TOUCH_SUSV3(, &date_str)
+       );
+
+       opts &= 1; /* only -c bit is left */
+       argv += optind;
+       if (!*argv) {
+               bb_show_usage();
        }
-       argc--;
-       argv++;
-    }
-
-    fd = open (*argv, (create==FALSE)? O_RDWR : O_RDWR | O_CREAT, 0644);
-    if (fd < 0 ) {
-       if (create==FALSE && errno == ENOENT)
-           exit( TRUE);
-       else {
-           perror("touch");
-           exit( FALSE);
+
+       if (reference_file) {
+               struct stat stbuf;
+               xstat(reference_file, &stbuf);
+               timebuf[1].tv_sec = timebuf[0].tv_sec = stbuf.st_mtime;
        }
-    }
-    close( fd);
-    if (utime (*argv, NULL)) {
-       perror("touch");
-       exit( FALSE);
-    }
-    else
-       exit( TRUE);
-}
 
+       if (date_str) {
+               struct tm tm_time;
+               time_t t;
 
+               //memset(&tm_time, 0, sizeof(tm_time));
+               /* Better than memset: makes "HH:MM" dates meaningful */
+               time(&t);
+               localtime_r(&t, &tm_time);
+               parse_datestr(date_str, &tm_time);
 
+               /* Correct any day of week and day of year etc. fields */
+               tm_time.tm_isdst = -1;  /* Be sure to recheck dst */
+               t = validate_tm_time(date_str, &tm_time);
 
+               timebuf[1].tv_sec = timebuf[0].tv_sec = t;
+       }
 
+       do {
+               if (utimes(*argv, (reference_file || date_str) ? timebuf : NULL) != 0) {
+                       if (errno == ENOENT) { /* no such file */
+                               if (opts) { /* creation is disabled, so ignore */
+                                       continue;
+                               }
+                               /* Try to create the file */
+                               fd = open(*argv, O_RDWR | O_CREAT, 0666);
+                               if (fd >= 0) {
+                                       xclose(fd);
+                                       if (reference_file || date_str)
+                                               utimes(*argv, timebuf);
+                                       continue;
+                               }
+                       }
+                       status = EXIT_FAILURE;
+                       bb_simple_perror_msg(*argv);
+               }
+       } while (*++argv);
 
+       return status;
+}