common/cmd_date.c

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