Bump to version 1.22.1
[platform/upstream/busybox.git] / coreutils / touch.c
index c66f26e..293a968 100644 (file)
@@ -2,26 +2,12 @@
 /*
  * Mini touch implementation for busybox
  *
- * Copyright (C) 1999,2000 by Lineo, inc. and Erik Andersen
- * Copyright (C) 1999,2000,2001 by Erik Andersen <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
+ * Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
  *
+ * Licensed under GPLv2 or later, see file LICENSE in this source tree.
  */
 
-/* BB_AUDIT SUSv3 _NOT_ compliant -- options -a, -m, -r, -t not supported. */
+/* 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)
  * Also, exiting on a failure was a bug.  All args should be processed.
  */
 
-#include <stdio.h>
-#include <sys/types.h>
-#include <fcntl.h>
-#include <utime.h>
-#include <errno.h>
-#include <unistd.h>
-#include <stdlib.h>
-#include "busybox.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_NODEREF
+//config:      bool "Add support for -h"
+//config:      default y
+//config:      depends on TOUCH
+//config:      help
+//config:        Enable touch to have the -h option.
+//config:        This requires libc support for lutimes() function.
+//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.
+
+//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_NODEREF(
+//usage:     "\n       -h      Don't follow links"
+//usage:       )
+//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"
+
+/* 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
+ * -h, --no-dereference
+ * -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
+ */
 
-extern int touch_main(int argc, char **argv)
+int touch_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
+int touch_main(int argc UNUSED_PARAM, char **argv)
 {
        int fd;
-       int flags;
        int status = EXIT_SUCCESS;
+       int opts;
+       enum {
+               OPT_c = (1 << 0),
+               OPT_r = (1 << 1) * ENABLE_FEATURE_TOUCH_SUSV3,
+               OPT_d = (1 << 2) * ENABLE_FEATURE_TOUCH_SUSV3,
+               OPT_t = (1 << 3) * ENABLE_FEATURE_TOUCH_SUSV3,
+               OPT_h = (1 << 4) * ENABLE_FEATURE_TOUCH_NODEREF,
+       };
+#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"
+               IF_FEATURE_TOUCH_NODEREF("no-dereference\0" No_argument "h")
+       ;
+# 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
 
-       flags = bb_getopt_ulflags(argc, argv, "c");
+#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:")
+                               IF_FEATURE_TOUCH_NODEREF("h")
+                               /*ignored:*/ "fma"
+                               IF_FEATURE_TOUCH_SUSV3(, &reference_file)
+                               IF_FEATURE_TOUCH_SUSV3(, &date_str)
+                               IF_FEATURE_TOUCH_SUSV3(, &date_str)
+       );
 
        argv += optind;
-
        if (!*argv) {
                bb_show_usage();
        }
 
+       if (reference_file) {
+               struct stat stbuf;
+               xstat(reference_file, &stbuf);
+               timebuf[1].tv_sec = timebuf[0].tv_sec = stbuf.st_mtime;
+               /* Can use .st_mtim.tv_nsec
+                * (or is it .st_mtimensec?? see date.c)
+                * to set microseconds too.
+                */
+       }
+
+       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 (utime(*argv, NULL)) {
-                       if (errno == ENOENT) {  /* no such file*/
-                               if (flags & 1) {        /* Creation is disabled, so ignore. */
+               int result;
+               result = (
+#if ENABLE_FEATURE_TOUCH_NODEREF
+                       (opts & OPT_h) ? lutimes :
+#endif
+                       utimes)(*argv, (reference_file || date_str) ? timebuf : NULL);
+               if (result != 0) {
+                       if (errno == ENOENT) { /* no such file? */
+                               if (opts & OPT_c) {
+                                       /* Creation is disabled, so ignore */
                                        continue;
                                }
-                               /* Try to create the file. */
-                               fd = open(*argv, O_RDWR | O_CREAT,
-                                                 S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH
-                                                 );
-                               if ((fd >= 0) && !close(fd)) {
+                               /* 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_perror_msg("%s", *argv);
+                       bb_simple_perror_msg(*argv);
                }
        } while (*++argv);