source: MondoRescue/branches/3.3/mindi-busybox/coreutils/date.c@ 3655

Last change on this file since 3655 was 3621, checked in by Bruno Cornec, 7 years ago

New 3?3 banch for incorporation of latest busybox 1.25. Changing minor version to handle potential incompatibilities.

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