[J-u-boot.git] / common / cmd_date.c

/*
 * (C) Copyright 2001
 * Wolfgang Denk, DENX Software Engineering, [email protected].
 *
 * See file CREDITS for list of people who contributed to this
 * project.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of
 * the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
 * MA 02111-1307 USA
 */

/*
 * RTC, Date & Time support: get and set date & time
 */
#include <common.h>
#include <command.h>
#include <rtc.h>
#include <i2c.h>

DECLARE_GLOBAL_DATA_PTR;

const char *weekdays[] = {
	"Sun", "Mon", "Tues", "Wednes", "Thurs", "Fri", "Satur",
};

#define RELOC(a)	((typeof(a))((unsigned long)(a) + gd->reloc_off))

int mk_date (char *, struct rtc_time *);

int do_date (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
{
	struct rtc_time tm;
	int rcode = 0;
	int old_bus;

	/* switch to correct I2C bus */
	old_bus = I2C_GET_BUS();
	I2C_SET_BUS(CFG_RTC_BUS_NUM);

	switch (argc) {
	case 2:			/* set date & time */
		if (strcmp(argv[1],"reset") == 0) {
			puts ("Reset RTC...\n");
			rtc_reset ();
		} else {
			/* initialize tm with current time */
			rtc_get (&tm);
			/* insert new date & time */
			if (mk_date (argv[1], &tm) != 0) {
				puts ("## Bad date format\n");
				break;
			}
			/* and write to RTC */
			rtc_set (&tm);
		}
		/* FALL TROUGH */
	case 1:			/* get date & time */
		rtc_get (&tm);

		printf ("Date: %4d-%02d-%02d (%sday)    Time: %2d:%02d:%02d\n",
			tm.tm_year, tm.tm_mon, tm.tm_mday,
			(tm.tm_wday<0 || tm.tm_wday>6) ?
				"unknown " : RELOC(weekdays[tm.tm_wday]),
			tm.tm_hour, tm.tm_min, tm.tm_sec);

		break;
	default:
		printf ("Usage:\n%s\n", cmdtp->usage);
		rcode = 1;
	}

	/* switch back to original I2C bus */
	I2C_SET_BUS(old_bus);

	return rcode;
}

/*
 * simple conversion of two-digit string with error checking
 */
static int cnvrt2 (char *str, int *valp)
{
	int val;

	if ((*str < '0') || (*str > '9'))
		return (-1);

	val = *str - '0';

	++str;

	if ((*str < '0') || (*str > '9'))
		return (-1);

	*valp = 10 * val + (*str - '0');

	return (0);
}

/*
 * Convert date string: MMDDhhmm[[CC]YY][.ss]
 *
 * Some basic checking for valid values is done, but this will not catch
 * all possible error conditions.
 */
int mk_date (char *datestr, struct rtc_time *tmp)
{
	int len, val;
	char *ptr;

	ptr = strchr (datestr,'.');
	len = strlen (datestr);

	/* Set seconds */
	if (ptr) {
		int sec;

		*ptr++ = '\0';
		if ((len - (ptr - datestr)) != 2)
			return (-1);

		len = strlen (datestr);

		if (cnvrt2 (ptr, &sec))
			return (-1);

		tmp->tm_sec = sec;
	} else {
		tmp->tm_sec = 0;
	}

	if (len == 12) {		/* MMDDhhmmCCYY	*/
		int year, century;

		if (cnvrt2 (datestr+ 8, &century) ||
		    cnvrt2 (datestr+10, &year) ) {
			return (-1);
		}
		tmp->tm_year = 100 * century + year;
	} else if (len == 10) {		/* MMDDhhmmYY	*/
		int year, century;

		century = tmp->tm_year / 100;
		if (cnvrt2 (datestr+ 8, &year))
			return (-1);
		tmp->tm_year = 100 * century + year;
	}

	switch (len) {
	case 8:			/* MMDDhhmm	*/
		/* fall thru */
	case 10:		/* MMDDhhmmYY	*/
		/* fall thru */
	case 12:		/* MMDDhhmmCCYY	*/
		if (cnvrt2 (datestr+0, &val) ||
		    val > 12) {
			break;
		}
		tmp->tm_mon  = val;
		if (cnvrt2 (datestr+2, &val) ||
		    val > ((tmp->tm_mon==2) ? 29 : 31)) {
			break;
		}
		tmp->tm_mday = val;

		if (cnvrt2 (datestr+4, &val) ||
		    val > 23) {
			break;
		}
		tmp->tm_hour = val;

		if (cnvrt2 (datestr+6, &val) ||
		    val > 59) {
			break;
		}
		tmp->tm_min  = val;

		/* calculate day of week */
		GregorianDay (tmp);

		return (0);
	default:
		break;
	}

	return (-1);
}

/***************************************************/

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