1 /* vi: set sw=4 ts=4: */
3 * Mini date implementation for busybox
5 * by Matthew Grant <grantma@anathoth.gen.nz>
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
34 /* This 'date' command supports only 2 time setting formats,
35 all the GNU strftime stuff (its in libc, lets use it),
36 setting time using UTC and displaying int, as well as
37 an RFC 822 complient date output for shell scripting
40 /* Input parsing code is always bulky - used heavy duty libc stuff as
41 much as possible, missed out a lot of bounds checking */
43 /* Default input handling to save suprising some people */
45 static struct tm *date_conv_time(struct tm *tm_time, const char *t_string)
49 nr = sscanf(t_string, "%2d%2d%2d%2d%d",
53 &(tm_time->tm_min), &(tm_time->tm_year));
55 if (nr < 4 || nr > 5) {
56 error_msg_and_die(invalid_date, t_string);
59 /* correct for century - minor Y2K problem here? */
60 if (tm_time->tm_year >= 1900)
61 tm_time->tm_year -= 1900;
70 /* The new stuff for LRP */
72 static struct tm *date_conv_ftime(struct tm *tm_time, const char *t_string)
76 /* Parse input and assign appropriately to tm_time */
78 if (t=*tm_time,sscanf(t_string, "%d:%d:%d",
79 &t.tm_hour, &t.tm_min, &t.tm_sec) == 3) {
80 /* no adjustments needed */
82 } else if (t=*tm_time,sscanf(t_string, "%d:%d",
83 &t.tm_hour, &t.tm_min) == 2) {
84 /* no adjustments needed */
87 } else if (t=*tm_time,sscanf(t_string, "%d.%d-%d:%d:%d",
91 &t.tm_min, &t.tm_sec) == 5) {
93 t.tm_mon -= 1; /* Adjust dates from 1-12 to 0-11 */
95 } else if (t=*tm_time,sscanf(t_string, "%d.%d-%d:%d",
98 &t.tm_hour, &t.tm_min) == 4) {
100 t.tm_mon -= 1; /* Adjust dates from 1-12 to 0-11 */
102 } else if (t=*tm_time,sscanf(t_string, "%d.%d.%d-%d:%d:%d",
107 &t.tm_min, &t.tm_sec) == 6) {
109 t.tm_year -= 1900; /* Adjust years */
110 t.tm_mon -= 1; /* Adjust dates from 1-12 to 0-11 */
112 } else if (t=*tm_time,sscanf(t_string, "%d.%d.%d-%d:%d",
116 &t.tm_hour, &t.tm_min) == 5) {
117 t.tm_year -= 1900; /* Adjust years */
118 t.tm_mon -= 1; /* Adjust dates from 1-12 to 0-11 */
121 error_msg_and_die(invalid_date, t_string);
128 int date_main(int argc, char **argv)
130 char *date_str = NULL;
131 char *date_fmt = NULL;
141 #ifdef CONFIG_FEATURE_DATE_ISOFMT
143 #define GETOPT_ISOFMT "I::"
145 #define GETOPT_ISOFMT
148 /* Interpret command line args */
149 while ((c = getopt(argc, argv, "Rs:ud:" GETOPT_ISOFMT )) != EOF) {
156 if ((date_str != NULL) || ((date_str = optarg) == NULL)) {
162 if (putenv("TZ=UTC0") != 0)
163 error_msg_and_die(memory_exhausted);
167 if ((date_str != NULL) || ((date_str = optarg) == NULL))
170 #ifdef CONFIG_FEATURE_DATE_ISOFMT
175 int ifmt_len = xstrlen ( optarg );
177 if (( ifmt_len <= 4 ) && ( strncmp ( optarg, "date", ifmt_len ) == 0 ))
179 else if (( ifmt_len <= 5 ) && ( strncmp ( optarg, "hours", ifmt_len ) == 0 ))
181 else if (( ifmt_len <= 7 ) && ( strncmp ( optarg, "minutes", ifmt_len ) == 0 ))
183 else if (( ifmt_len <= 7 ) && ( strncmp ( optarg, "seconds", ifmt_len ) == 0 ))
187 break; // else show_usage();
195 if ((date_fmt == NULL) && (optind < argc) && (argv[optind][0] == '+'))
196 date_fmt = &argv[optind][1]; /* Skip over the '+' */
197 else if (date_str == NULL) {
199 date_str = argv[optind];
203 error_msg("date_str='%s' date_fmt='%s'\n", date_str, date_fmt);
208 /* Now we have parsed all the information except the date format
209 which depends on whether the clock is being set or read */
212 memcpy(&tm_time, localtime(&tm), sizeof(tm_time));
213 /* Zero out fields - take her back to midnight! */
214 if (date_str != NULL) {
220 /* Process any date input to UNIX time since 1 Jan 1970 */
221 if (date_str != NULL) {
223 if (strchr(date_str, ':') != NULL) {
224 date_conv_ftime(&tm_time, date_str);
226 date_conv_time(&tm_time, date_str);
229 /* Correct any day of week and day of year etc. fields */
230 tm = mktime(&tm_time);
232 error_msg_and_die(invalid_date, date_str);
234 if (putenv("TZ=UTC0") != 0)
235 error_msg_and_die(memory_exhausted);
238 /* if setting time, set it */
240 if (stime(&tm) < 0) {
241 perror_msg("cannot set date");
248 /* Deal with format string */
249 if (date_fmt == NULL) {
250 #ifdef CONFIG_FEATURE_DATE_ISOFMT
253 date_fmt = utc ? "%Y-%m-%dT%H:%M:%SZ" : "%Y-%m-%dT%H:%M:%S%z";
256 date_fmt = utc ? "%Y-%m-%dT%H:%MZ" : "%Y-%m-%dT%H:%M%z";
259 date_fmt = utc ? "%Y-%m-%dT%HZ" : "%Y-%m-%dT%H%z";
262 date_fmt = "%Y-%m-%d";
269 ? "%a, %e %b %Y %H:%M:%S GMT"
270 : "%a, %e %b %Y %H:%M:%S %z")
271 : "%a %b %e %H:%M:%S %Z %Y");
273 #ifdef CONFIG_FEATURE_DATE_ISOFMT
277 } else if (*date_fmt == '\0') {
278 /* Imitate what GNU 'date' does with NO format string! */
283 /* Handle special conversions */
285 if (strncmp(date_fmt, "%f", 2) == 0) {
286 date_fmt = "%Y.%m.%d-%H:%M:%S";
289 /* Print OUTPUT (after ALL that!) */
290 t_buff = xmalloc(201);
291 strftime(t_buff, 200, date_fmt, &tm_time);