[people/ms/u-boot.git] / post / drivers / rtc.c

/*
 * (C) Copyright 2002
 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
 *
 * 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
 */

#include <common.h>

/*
 * RTC test
 *
 * The Real Time Clock (RTC) operation is verified by this test.
 * The following features are verified:
 *   o) RTC Power Fault
 *	This is verified by analyzing the rtc_get() return status.
 *   o) Time uniformity
 *      This is verified by reading RTC in polling within
 *      a short period of time.
 *   o) Passing month boundaries
 *      This is checked by setting RTC to a second before
 *      a month boundary and reading it after its passing the
 *      boundary. The test is performed for both leap- and
 *      nonleap-years.
 */

#include <post.h>
#include <rtc.h>

#if CONFIG_POST & CONFIG_SYS_POST_RTC

static int rtc_post_skip (ulong * diff)
{
	struct rtc_time tm1;
	struct rtc_time tm2;
	ulong start1;
	ulong start2;

	rtc_get (&tm1);
	start1 = get_timer (0);

	while (1) {
		rtc_get (&tm2);
		start2 = get_timer (0);
		if (tm1.tm_sec != tm2.tm_sec)
			break;
		if (start2 - start1 > 1500)
			break;
	}

	if (tm1.tm_sec != tm2.tm_sec) {
		*diff = start2 - start1;

		return 0;
	} else {
		return -1;
	}
}

static void rtc_post_restore (struct rtc_time *tm, unsigned int sec)
{
	time_t t = mktime (tm->tm_year, tm->tm_mon, tm->tm_mday, tm->tm_hour,
					   tm->tm_min, tm->tm_sec) + sec;
	struct rtc_time ntm;

	to_tm (t, &ntm);

	rtc_set (&ntm);
}

int rtc_post_test (int flags)
{
	ulong diff;
	unsigned int i;
	struct rtc_time svtm;
	static unsigned int daysnl[] =
			{ 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
	static unsigned int daysl[] =
			{ 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
	unsigned int ynl = 1999;
	unsigned int yl = 2000;
	unsigned int skipped = 0;
	int reliable;

	/* Time reliability */
	reliable = rtc_get (&svtm);

	/* Time uniformity */
	if (rtc_post_skip (&diff) != 0) {
		post_log ("Timeout while waiting for a new second !\n");

		return -1;
	}

	for (i = 0; i < 5; i++) {
		if (rtc_post_skip (&diff) != 0) {
			post_log ("Timeout while waiting for a new second !\n");

			return -1;
		}

		if (diff < 950 || diff > 1050) {
			post_log ("Invalid second duration !\n");

			return -1;
		}
	}

	/* Passing month boundaries */

	if (rtc_post_skip (&diff) != 0) {
		post_log ("Timeout while waiting for a new second !\n");

		return -1;
	}
	rtc_get (&svtm);

	for (i = 0; i < 12; i++) {
		time_t t = mktime (ynl, i + 1, daysnl[i], 23, 59, 59);
		struct rtc_time tm;

		to_tm (t, &tm);
		rtc_set (&tm);

		skipped++;
		if (rtc_post_skip (&diff) != 0) {
			rtc_post_restore (&svtm, skipped);
			post_log ("Timeout while waiting for a new second !\n");

			return -1;
		}

		rtc_get (&tm);
		if (tm.tm_mon == i + 1) {
			rtc_post_restore (&svtm, skipped);
			post_log ("Month %d boundary is not passed !\n", i + 1);

			return -1;
		}
	}

	for (i = 0; i < 12; i++) {
		time_t t = mktime (yl, i + 1, daysl[i], 23, 59, 59);
		struct rtc_time tm;

		to_tm (t, &tm);
		rtc_set (&tm);

		skipped++;
		if (rtc_post_skip (&diff) != 0) {
			rtc_post_restore (&svtm, skipped);
			post_log ("Timeout while waiting for a new second !\n");

			return -1;
		}

		rtc_get (&tm);
		if (tm.tm_mon == i + 1) {
			rtc_post_restore (&svtm, skipped);
			post_log ("Month %d boundary is not passed !\n", i + 1);

			return -1;
		}
	}
	rtc_post_restore (&svtm, skipped);

	/* If come here, then RTC operates correcty, check the correctness
	 * of the time it reports.
	 */
	if (reliable < 0) {
		post_log ("RTC Time is not reliable! Power fault? \n");

		return -1;
	}

	return 0;
}

#endif /* CONFIG_POST & CONFIG_SYS_POST_RTC */
Commit	Line	Data
ad5bb451 WD	1	/*
	2	* (C) Copyright 2002
	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	#include <common.h>
	25
	26	/*
	27	* RTC test
	28	*
	29	* The Real Time Clock (RTC) operation is verified by this test.
	30	* The following features are verified:
b73a19e1 YT	31	* o) RTC Power Fault
b73a19e1 YT	32	* This is verified by analyzing the rtc_get() return status.
ad5bb451 WD	33	* o) Time uniformity
	34	* This is verified by reading RTC in polling within
	35	* a short period of time.
	36	* o) Passing month boundaries
	37	* This is checked by setting RTC to a second before
	38	* a month boundary and reading it after its passing the
	39	* boundary. The test is performed for both leap- and
	40	* nonleap-years.
	41	*/
	42
ad5bb451 WD	43	#include <post.h>
	44	#include <rtc.h>
	45
6d0f6bcf	46	#if CONFIG_POST & CONFIG_SYS_POST_RTC
ad5bb451 WD	47
	48	static int rtc_post_skip (ulong * diff)
	49	{
	50	struct rtc_time tm1;
	51	struct rtc_time tm2;
	52	ulong start1;
	53	ulong start2;
	54
	55	rtc_get (&tm1);
	56	start1 = get_timer (0);
	57
	58	while (1) {
	59	rtc_get (&tm2);
	60	start2 = get_timer (0);
	61	if (tm1.tm_sec != tm2.tm_sec)
	62	break;
	63	if (start2 - start1 > 1500)
	64	break;
	65	}
	66
	67	if (tm1.tm_sec != tm2.tm_sec) {
	68	*diff = start2 - start1;
	69
	70	return 0;
	71	} else {
	72	return -1;
	73	}
	74	}
	75
	76	static void rtc_post_restore (struct rtc_time *tm, unsigned int sec)
	77	{
	78	time_t t = mktime (tm->tm_year, tm->tm_mon, tm->tm_mday, tm->tm_hour,
	79	tm->tm_min, tm->tm_sec) + sec;
	80	struct rtc_time ntm;
	81
	82	to_tm (t, &ntm);
	83
	84	rtc_set (&ntm);
	85	}
	86
	87	int rtc_post_test (int flags)
	88	{
	89	ulong diff;
	90	unsigned int i;
	91	struct rtc_time svtm;
	92	static unsigned int daysnl[] =
	93	{ 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
	94	static unsigned int daysl[] =
	95	{ 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
	96	unsigned int ynl = 1999;
	97	unsigned int yl = 2000;
	98	unsigned int skipped = 0;
b73a19e1 YT	99	int reliable;
	100
	101	/* Time reliability */
	102	reliable = rtc_get (&svtm);
ad5bb451 WD	103
	104	/* Time uniformity */
	105	if (rtc_post_skip (&diff) != 0) {
	106	post_log ("Timeout while waiting for a new second !\n");
	107
	108	return -1;
	109	}
	110
	111	for (i = 0; i < 5; i++) {
	112	if (rtc_post_skip (&diff) != 0) {
	113	post_log ("Timeout while waiting for a new second !\n");
	114
	115	return -1;
	116	}
	117
	118	if (diff < 950 \|\| diff > 1050) {
	119	post_log ("Invalid second duration !\n");
	120
	121	return -1;
	122	}
	123	}
	124
	125	/* Passing month boundaries */
	126
	127	if (rtc_post_skip (&diff) != 0) {
	128	post_log ("Timeout while waiting for a new second !\n");
	129
	130	return -1;
	131	}
	132	rtc_get (&svtm);
	133
	134	for (i = 0; i < 12; i++) {
	135	time_t t = mktime (ynl, i + 1, daysnl[i], 23, 59, 59);
	136	struct rtc_time tm;
	137
	138	to_tm (t, &tm);
	139	rtc_set (&tm);
	140
	141	skipped++;
	142	if (rtc_post_skip (&diff) != 0) {
	143	rtc_post_restore (&svtm, skipped);
	144	post_log ("Timeout while waiting for a new second !\n");
	145
	146	return -1;
	147	}
	148
	149	rtc_get (&tm);
	150	if (tm.tm_mon == i + 1) {
	151	rtc_post_restore (&svtm, skipped);
	152	post_log ("Month %d boundary is not passed !\n", i + 1);
	153
	154	return -1;
	155	}
	156	}
	157
	158	for (i = 0; i < 12; i++) {
	159	time_t t = mktime (yl, i + 1, daysl[i], 23, 59, 59);
	160	struct rtc_time tm;
	161
	162	to_tm (t, &tm);
	163	rtc_set (&tm);
	164
	165	skipped++;
	166	if (rtc_post_skip (&diff) != 0) {
167	rtc_post_restore (&svtm, skipped);
168	post_log ("Timeout while waiting for a new second !\n");
169
170	return -1;
171	}
172
173	rtc_get (&tm);
174	if (tm.tm_mon == i + 1) {
175	rtc_post_restore (&svtm, skipped);
176	post_log ("Month %d boundary is not passed !\n", i + 1);
177
178	return -1;
179	}
180	}
181	rtc_post_restore (&svtm, skipped);
182
b73a19e1 YT	183	/* If come here, then RTC operates correcty, check the correctness
	184	* of the time it reports.
	185	*/
	186	if (reliable < 0) {
	187	post_log ("RTC Time is not reliable! Power fault? \n");
	188
	189	return -1;
	190	}
	191
ad5bb451 WD	192	return 0;
	193	}
	194
6d0f6bcf	195	#endif /* CONFIG_POST & CONFIG_SYS_POST_RTC */