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 static 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 );