coreutils/date.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Mini date implementation for busybox
   4  *
   5  * by Matthew Grant <grantma@anathoth.gen.nz>
   6  *
   7  * iso-format handling added by Robert Griebl <griebl@gmx.de>
   8  * bugfixes and cleanup by Bernhard Reutner-Fischer
   9  *
  10  * Licensed under GPLv2 or later, see file LICENSE in this source tree.
  11 */
  12
  13 /* This 'date' command supports only 2 time setting formats,
  14    all the GNU strftime stuff (its in libc, lets use it),
  15    setting time using UTC and displaying it, as well as
  16    an RFC 2822 compliant date output for shell scripting
  17    mail commands */
  18
  19 /* Input parsing code is always bulky - used heavy duty libc stuff as
  20    much as possible, missed out a lot of bounds checking */
  21
  22 //applet:IF_DATE(APPLET(date, _BB_DIR_BIN, _BB_SUID_DROP))
  23
  24 //kbuild:lib-$(CONFIG_DATE) += date.o
  25
  26 //config:config DATE
  27 //config:       bool "date"
  28 //config:       default y
  29 //config:       help
  30 //config:         date is used to set the system date or display the
  31 //config:         current time in the given format.
  32 //config:
  33 //config:config FEATURE_DATE_ISOFMT
  34 //config:       bool "Enable ISO date format output (-I)"
  35 //config:       default y
  36 //config:       depends on DATE
  37 //config:       help
  38 //config:         Enable option (-I) to output an ISO-8601 compliant
  39 //config:         date/time string.
  40 //config:
  41 //config:# defaults to "no": stat's nanosecond field is a bit non-portable
  42 //config:config FEATURE_DATE_NANO
  43 //config:       bool "Support %[num]N nanosecond format specifier"
  44 //config:       default n
  45 //config:       depends on DATE && PLATFORM_LINUX # syscall(__NR_clock_gettime)
  46 //config:       help
  47 //config:         Support %[num]N format specifier. Adds ~250 bytes of code.
  48 //config:
  49 //config:config FEATURE_DATE_COMPAT
  50 //config:       bool "Support weird 'date MMDDhhmm[[YY]YY][.ss]' format"
  51 //config:       default y
  52 //config:       depends on DATE
  53 //config:       help
  54 //config:         System time can be set by 'date -s DATE' and simply 'date DATE',
  55 //config:         but formats of DATE string are different. 'date DATE' accepts
  56 //config:         a rather weird MMDDhhmm[[YY]YY][.ss] format with completely
  57 //config:         unnatural placement of year between minutes and seconds.
  58 //config:         date -s (and other commands like touch -d) use more sensible
  59 //config:         formats (for one, ISO format YYYY-MM-DD hh:mm:ss.ssssss).
  60 //config:
  61 //config:         With this option off, 'date DATE' is 'date -s DATE' support
  62 //config:         the same format. With it on, 'date DATE' additionally supports
  63 //config:         MMDDhhmm[[YY]YY][.ss] format.
  64
  65 /* GNU coreutils 6.9 man page:
  66  * date [OPTION]... [+FORMAT]
  67  * date [-u|--utc|--universal] [MMDDhhmm[[CC]YY][.ss]]
  68  * -d, --date=STRING
  69  *      display time described by STRING, not `now'
  70  * -f, --file=DATEFILE
  71  *      like --date once for each line of DATEFILE
  72  * -r, --reference=FILE
  73  *      display the last modification time of FILE
  74  * -R, --rfc-2822
  75  *      output date and time in RFC 2822 format.
  76  *      Example: Mon, 07 Aug 2006 12:34:56 -0600
  77  * --rfc-3339=TIMESPEC
  78  *      output date and time in RFC 3339 format.
  79  *      TIMESPEC='date', 'seconds', or 'ns'
  80  *      Date and time components are separated by a single space:
  81  *      2006-08-07 12:34:56-06:00
  82  * -s, --set=STRING
  83  *      set time described by STRING
  84  * -u, --utc, --universal
  85  *      print or set Coordinated Universal Time
  86  *
  87  * Busybox:
  88  * long options are not supported
  89  * -f is not supported
  90  * -I seems to roughly match --rfc-3339, but -I has _optional_ param
  91  *    (thus "-I seconds" doesn't work, only "-Iseconds"),
  92  *    and does not support -Ins
  93  * -D FMT is a bbox extension for _input_ conversion of -d DATE
  94  */
  95
  96 //usage:#define date_trivial_usage
  97 //usage:       "[OPTIONS] [+FMT] [TIME]"
  98 //usage:#define date_full_usage "\n\n"
  99 //usage:       "Display time (using +FMT), or set time\n"
 100 //usage:     "\nOptions:"
 101 //usage:        IF_NOT_LONG_OPTS(
 102 //usage:     "\n        [-s] TIME       Set time to TIME"
 103 //usage:     "\n        -u              Work in UTC (don't convert to local time)"
 104 //usage:     "\n        -R              Output RFC-2822 compliant date string"
 105 //usage:        ) IF_LONG_OPTS(
 106 //usage:     "\n        [-s,--set] TIME Set time to TIME"
 107 //usage:     "\n        -u,--utc        Work in UTC (don't convert to local time)"
 108 //usage:     "\n        -R,--rfc-2822   Output RFC-2822 compliant date string"
 109 //usage:        )
 110 //usage:        IF_FEATURE_DATE_ISOFMT(
 111 //usage:     "\n        -I[SPEC]        Output ISO-8601 compliant date string"
 112 //usage:     "\n                        SPEC='date' (default) for date only,"
 113 //usage:     "\n                        'hours', 'minutes', or 'seconds' for date and"
 114 //usage:     "\n                        time to the indicated precision"
 115 //usage:        )
 116 //usage:        IF_NOT_LONG_OPTS(
 117 //usage:     "\n        -r FILE         Display last modification time of FILE"
 118 //usage:     "\n        -d TIME         Display TIME, not 'now'"
 119 //usage:        ) IF_LONG_OPTS(
 120 //usage:     "\n        -r,--reference FILE     Display last modification time of FILE"
 121 //usage:     "\n        -d,--date TIME  Display TIME, not 'now'"
 122 //usage:        )
 123 //usage:        IF_FEATURE_DATE_ISOFMT(
 124 //usage:     "\n        -D FMT          Use FMT for -d TIME conversion"
 125 //usage:        )
 126 //usage:     "\n"
 127 //usage:     "\nRecognized TIME formats:"
 128 //usage:     "\n        hh:mm[:ss]"
 129 //usage:     "\n        [YYYY.]MM.DD-hh:mm[:ss]"
 130 //usage:     "\n        YYYY-MM-DD hh:mm[:ss]"
 131 //usage:     "\n        [[[[[YY]YY]MM]DD]hh]mm[.ss]"
 132 //usage:
 133 //usage:#define date_example_usage
 134 //usage:       "$ date\n"
 135 //usage:       "Wed Apr 12 18:52:41 MDT 2000\n"
 136
 137 #include "libbb.h"
 138 #if ENABLE_FEATURE_DATE_NANO
 139 # include <sys/syscall.h>
 140 #endif
 141
 142 enum {
 143         OPT_RFC2822   = (1 << 0), /* R */
 144         OPT_SET       = (1 << 1), /* s */
 145         OPT_UTC       = (1 << 2), /* u */
 146         OPT_DATE      = (1 << 3), /* d */
 147         OPT_REFERENCE = (1 << 4), /* r */
 148         OPT_TIMESPEC  = (1 << 5) * ENABLE_FEATURE_DATE_ISOFMT, /* I */
 149         OPT_HINT      = (1 << 6) * ENABLE_FEATURE_DATE_ISOFMT, /* D */
 150 };
 151
 152 static void maybe_set_utc(int opt)
 153 {
 154         if (opt & OPT_UTC)
 155                 putenv((char*)"TZ=UTC0");
 156 }
 157
 158 #if ENABLE_LONG_OPTS
 159 static const char date_longopts[] ALIGN1 =
 160                 "rfc-822\0"   No_argument       "R"
 161                 "rfc-2822\0"  No_argument       "R"
 162                 "set\0"       Required_argument "s"
 163                 "utc\0"       No_argument       "u"
 164         /*      "universal\0" No_argument       "u" */
 165                 "date\0"      Required_argument "d"
 166                 "reference\0" Required_argument "r"
 167                 ;
 168 #endif
 169
 170 int date_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
 171 int date_main(int argc UNUSED_PARAM, char **argv)
 172 {
 173         struct timespec ts;
 174         struct tm tm_time;
 175         char buf_fmt_dt2str[64];
 176         unsigned opt;
 177         int ifmt = -1;
 178         char *date_str;
 179         char *fmt_dt2str;
 180         char *fmt_str2dt;
 181         char *filename;
 182         char *isofmt_arg = NULL;
 183
 184         opt_complementary = "d--s:s--d"
 185                 IF_FEATURE_DATE_ISOFMT(":R--I:I--R");
 186         IF_LONG_OPTS(applet_long_options = date_longopts;)
 187         opt = getopt32(argv, "Rs:ud:r:"
 188                         IF_FEATURE_DATE_ISOFMT("I::D:"),
 189                         &date_str, &date_str, &filename
 190                         IF_FEATURE_DATE_ISOFMT(, &isofmt_arg, &fmt_str2dt));
 191         argv += optind;
 192         maybe_set_utc(opt);
 193
 194         if (ENABLE_FEATURE_DATE_ISOFMT && (opt & OPT_TIMESPEC)) {
 195                 ifmt = 0; /* default is date */
 196                 if (isofmt_arg) {
 197                         static const char isoformats[] ALIGN1 =
 198                                 "date\0""hours\0""minutes\0""seconds\0"; /* ns? */
 199                         ifmt = index_in_substrings(isoformats, isofmt_arg);
 200                         if (ifmt < 0)
 201                                 bb_show_usage();
 202                 }
 203         }
 204
 205         fmt_dt2str = NULL;
 206         if (argv[0] && argv[0][0] == '+') {
 207                 fmt_dt2str = &argv[0][1]; /* skip over the '+' */
 208                 argv++;
 209         }
 210         if (!(opt & (OPT_SET | OPT_DATE))) {
 211                 opt |= OPT_SET;
 212                 date_str = argv[0]; /* can be NULL */
 213                 if (date_str) {
 214 #if ENABLE_FEATURE_DATE_COMPAT
 215                         int len = strspn(date_str, "0123456789");
 216                         if (date_str[len] == '\0'
 217                          || (date_str[len] == '.'
 218                             && isdigit(date_str[len+1])
 219                             && isdigit(date_str[len+2])
 220                             && date_str[len+3] == '\0'
 221                             )
 222                         ) {
 223                                 /* Dreaded MMDDhhmm[[CC]YY][.ss] format!
 224                                  * It does not match -d or -s format.
 225                                  * Some users actually do use it.
 226                                  */
 227                                 len -= 8;
 228                                 if (len < 0 || len > 4 || (len & 1))
 229                                         bb_error_msg_and_die(bb_msg_invalid_date, date_str);
 230                                 if (len != 0) { /* move YY or CCYY to front */
 231                                         char buf[4];
 232                                         memcpy(buf, date_str + 8, len);
 233                                         memmove(date_str + len, date_str, 8);
 234                                         memcpy(date_str, buf, len);
 235                                 }
 236                         }
 237 #endif
 238                         argv++;
 239                 }
 240         }
 241         if (*argv)
 242                 bb_show_usage();
 243
 244         /* Now we have parsed all the information except the date format
 245          * which depends on whether the clock is being set or read */
 246
 247         if (opt & OPT_REFERENCE) {
 248                 struct stat statbuf;
 249                 xstat(filename, &statbuf);
 250                 ts.tv_sec = statbuf.st_mtime;
 251 #if ENABLE_FEATURE_DATE_NANO
 252                 ts.tv_nsec = statbuf.st_mtim.tv_nsec;
 253                 /* Some toolchains use .st_mtimensec instead of st_mtim.tv_nsec.
 254                  * If you need #define SVID_SOURCE 1 to enable st_mtim.tv_nsec,
 255                  * drop a mail to project mailing list please
 256                  */
 257 #endif
 258         } else {
 259 #if ENABLE_FEATURE_DATE_NANO
 260                 /* libc has incredibly messy way of doing this,
 261                  * typically requiring -lrt. We just skip all this mess */
 262                 syscall(__NR_clock_gettime, CLOCK_REALTIME, &ts);
 263 #else
 264                 time(&ts.tv_sec);
 265 #endif
 266         }
 267         localtime_r(&ts.tv_sec, &tm_time);
 268
 269         /* If date string is given, update tm_time, and maybe set date */
 270         if (date_str != NULL) {
 271                 /* Zero out fields - take her back to midnight! */
 272                 tm_time.tm_sec = 0;
 273                 tm_time.tm_min = 0;
 274                 tm_time.tm_hour = 0;
 275
 276                 /* Process any date input to UNIX time since 1 Jan 1970 */
 277                 if (ENABLE_FEATURE_DATE_ISOFMT && (opt & OPT_HINT)) {
 278                         if (strptime(date_str, fmt_str2dt, &tm_time) == NULL)
 279                                 bb_error_msg_and_die(bb_msg_invalid_date, date_str);
 280                 } else {
 281                         parse_datestr(date_str, &tm_time);
 282                 }
 283
 284                 /* Correct any day of week and day of year etc. fields */
 285                 tm_time.tm_isdst = -1;  /* Be sure to recheck dst */
 286                 ts.tv_sec = validate_tm_time(date_str, &tm_time);
 287
 288                 maybe_set_utc(opt);
 289
 290                 /* if setting time, set it */
 291                 if ((opt & OPT_SET) && stime(&ts.tv_sec) < 0) {
 292                         bb_perror_msg("can't set date");
 293                 }
 294         }
 295
 296         /* Display output */
 297
 298         /* Deal with format string */
 299         if (fmt_dt2str == NULL) {
 300                 int i;
 301                 fmt_dt2str = buf_fmt_dt2str;
 302                 if (ENABLE_FEATURE_DATE_ISOFMT && ifmt >= 0) {
 303                         /* -I[SPEC]: 0:date 1:hours 2:minutes 3:seconds */
 304                         strcpy(fmt_dt2str, "%Y-%m-%dT%H:%M:%S");
 305                         i = 8 + 3 * ifmt;
 306                         if (ifmt != 0) {
 307                                 /* TODO: if (ifmt==4) i += sprintf(&fmt_dt2str[i], ",%09u", nanoseconds); */
 308  format_utc:
 309                                 fmt_dt2str[i++] = '%';
 310                                 fmt_dt2str[i++] = (opt & OPT_UTC) ? 'Z' : 'z';
 311                         }
 312                         fmt_dt2str[i] = '\0';
 313                 } else if (opt & OPT_RFC2822) {
 314                         /* -R. undo busybox.c setlocale */
 315                         if (ENABLE_LOCALE_SUPPORT)
 316                                 setlocale(LC_TIME, "C");
 317                         strcpy(fmt_dt2str, "%a, %d %b %Y %H:%M:%S ");
 318                         i = sizeof("%a, %d %b %Y %H:%M:%S ")-1;
 319                         goto format_utc;
 320                 } else { /* default case */
 321                         fmt_dt2str = (char*)"%a %b %e %H:%M:%S %Z %Y";
 322                 }
 323         }
 324 #if ENABLE_FEATURE_DATE_NANO
 325         else {
 326                 /* User-specified fmt_dt2str */
 327                 /* Search for and process "%N" */
 328                 char *p = fmt_dt2str;
 329                 while ((p = strchr(p, '%')) != NULL) {
 330                         int n, m;
 331                         unsigned pres, scale;
 332
 333                         p++;
 334                         if (*p == '%') {
 335                                 p++;
 336                                 continue;
 337                         }
 338                         n = strspn(p, "0123456789");
 339                         if (p[n] != 'N') {
 340                                 p += n;
 341                                 continue;
 342                         }
 343                         /* We have "%[nnn]N" */
 344                         p[-1] = '\0';
 345                         p[n] = '\0';
 346                         scale = 1;
 347                         pres = 9;
 348                         if (n) {
 349                                 pres = xatoi_positive(p);
 350                                 if (pres == 0)
 351                                         pres = 9;
 352                                 m = 9 - pres;
 353                                 while (--m >= 0)
 354                                         scale *= 10;
 355                         }
 356
 357                         m = p - fmt_dt2str;
 358                         p += n + 1;
 359                         fmt_dt2str = xasprintf("%s%0*u%s", fmt_dt2str, pres, (unsigned)ts.tv_nsec / scale, p);
 360                         p = fmt_dt2str + m;
 361                 }
 362         }
 363 #endif
 364
 365 #define date_buf bb_common_bufsiz1
 366         if (*fmt_dt2str == '\0') {
 367                 /* With no format string, just print a blank line */
 368                 date_buf[0] = '\0';
 369         } else {
 370                 /* Handle special conversions */
 371                 if (strncmp(fmt_dt2str, "%f", 2) == 0) {
 372                         fmt_dt2str = (char*)"%Y.%m.%d-%H:%M:%S";
 373                 }
 374                 /* Generate output string */
 375                 strftime(date_buf, sizeof(date_buf), fmt_dt2str, &tm_time);
 376         }
 377         puts(date_buf);
 378
 379         return EXIT_SUCCESS;
 380 }