Added new ext fields to IFC
[oweals/u-boot.git] / common / cmd_date.c
1 /*
2  * (C) Copyright 2001
3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
4  *
5  * See file CREDITS for list of people who contributed to this
6  * project.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License as
10  * published by the Free Software Foundation; either version 2 of
11  * the License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21  * MA 02111-1307 USA
22  */
23
24 /*
25  * RTC, Date & Time support: get and set date & time
26  */
27 #include <common.h>
28 #include <command.h>
29 #include <rtc.h>
30 #include <i2c.h>
31
32 DECLARE_GLOBAL_DATA_PTR;
33
34 static const char * const weekdays[] = {
35         "Sun", "Mon", "Tues", "Wednes", "Thurs", "Fri", "Satur",
36 };
37
38 #ifdef CONFIG_NEEDS_MANUAL_RELOC
39 #define RELOC(a)        ((typeof(a))((unsigned long)(a) + gd->reloc_off))
40 #else
41 #define RELOC(a)        a
42 #endif
43
44 int mk_date (const char *, struct rtc_time *);
45
46 int do_date (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
47 {
48         struct rtc_time tm;
49         int rcode = 0;
50         int old_bus;
51
52         /* switch to correct I2C bus */
53         old_bus = I2C_GET_BUS();
54         I2C_SET_BUS(CONFIG_SYS_RTC_BUS_NUM);
55
56         switch (argc) {
57         case 2:                 /* set date & time */
58                 if (strcmp(argv[1],"reset") == 0) {
59                         puts ("Reset RTC...\n");
60                         rtc_reset ();
61                 } else {
62                         /* initialize tm with current time */
63                         rcode = rtc_get (&tm);
64
65                         if(!rcode) {
66                                 /* insert new date & time */
67                                 if (mk_date (argv[1], &tm) != 0) {
68                                         puts ("## Bad date format\n");
69                                         break;
70                                 }
71                                 /* and write to RTC */
72                                 rcode = rtc_set (&tm);
73                                 if(rcode)
74                                         puts("## Set date failed\n");
75                         } else {
76                                 puts("## Get date failed\n");
77                         }
78                 }
79                 /* FALL TROUGH */
80         case 1:                 /* get date & time */
81                 rcode = rtc_get (&tm);
82
83                 if (rcode) {
84                         puts("## Get date failed\n");
85                         break;
86                 }
87
88                 printf ("Date: %4d-%02d-%02d (%sday)    Time: %2d:%02d:%02d\n",
89                         tm.tm_year, tm.tm_mon, tm.tm_mday,
90                         (tm.tm_wday<0 || tm.tm_wday>6) ?
91                                 "unknown " : RELOC(weekdays[tm.tm_wday]),
92                         tm.tm_hour, tm.tm_min, tm.tm_sec);
93
94                 break;
95         default:
96                 rcode = CMD_RET_USAGE;
97         }
98
99         /* switch back to original I2C bus */
100         I2C_SET_BUS(old_bus);
101
102         return rcode;
103 }
104
105 /*
106  * simple conversion of two-digit string with error checking
107  */
108 static int cnvrt2 (const char *str, int *valp)
109 {
110         int val;
111
112         if ((*str < '0') || (*str > '9'))
113                 return (-1);
114
115         val = *str - '0';
116
117         ++str;
118
119         if ((*str < '0') || (*str > '9'))
120                 return (-1);
121
122         *valp = 10 * val + (*str - '0');
123
124         return (0);
125 }
126
127 /*
128  * Convert date string: MMDDhhmm[[CC]YY][.ss]
129  *
130  * Some basic checking for valid values is done, but this will not catch
131  * all possible error conditions.
132  */
133 int mk_date (const char *datestr, struct rtc_time *tmp)
134 {
135         int len, val;
136         char *ptr;
137
138         ptr = strchr (datestr,'.');
139         len = strlen (datestr);
140
141         /* Set seconds */
142         if (ptr) {
143                 int sec;
144
145                 *ptr++ = '\0';
146                 if ((len - (ptr - datestr)) != 2)
147                         return (-1);
148
149                 len = strlen (datestr);
150
151                 if (cnvrt2 (ptr, &sec))
152                         return (-1);
153
154                 tmp->tm_sec = sec;
155         } else {
156                 tmp->tm_sec = 0;
157         }
158
159         if (len == 12) {                /* MMDDhhmmCCYY */
160                 int year, century;
161
162                 if (cnvrt2 (datestr+ 8, &century) ||
163                     cnvrt2 (datestr+10, &year) ) {
164                         return (-1);
165                 }
166                 tmp->tm_year = 100 * century + year;
167         } else if (len == 10) {         /* MMDDhhmmYY   */
168                 int year, century;
169
170                 century = tmp->tm_year / 100;
171                 if (cnvrt2 (datestr+ 8, &year))
172                         return (-1);
173                 tmp->tm_year = 100 * century + year;
174         }
175
176         switch (len) {
177         case 8:                 /* MMDDhhmm     */
178                 /* fall thru */
179         case 10:                /* MMDDhhmmYY   */
180                 /* fall thru */
181         case 12:                /* MMDDhhmmCCYY */
182                 if (cnvrt2 (datestr+0, &val) ||
183                     val > 12) {
184                         break;
185                 }
186                 tmp->tm_mon  = val;
187                 if (cnvrt2 (datestr+2, &val) ||
188                     val > ((tmp->tm_mon==2) ? 29 : 31)) {
189                         break;
190                 }
191                 tmp->tm_mday = val;
192
193                 if (cnvrt2 (datestr+4, &val) ||
194                     val > 23) {
195                         break;
196                 }
197                 tmp->tm_hour = val;
198
199                 if (cnvrt2 (datestr+6, &val) ||
200                     val > 59) {
201                         break;
202                 }
203                 tmp->tm_min  = val;
204
205                 /* calculate day of week */
206                 GregorianDay (tmp);
207
208                 return (0);
209         default:
210                 break;
211         }
212
213         return (-1);
214 }
215
216 /***************************************************/
217
218 U_BOOT_CMD(
219         date,   2,      1,      do_date,
220         "get/set/reset date & time",
221         "[MMDDhhmm[[CC]YY][.ss]]\ndate reset\n"
222         "  - without arguments: print date & time\n"
223         "  - with numeric argument: set the system date & time\n"
224         "  - with 'reset' argument: reset the RTC"
225 );