blob: 738d1185c2162ed8a5927b608117eb1ba6aa34a5 [file] [log] [blame]
wdenk5b1d7132002-11-03 00:07:02 +00001/*
2 * (C) Copyright 2001
3 * ARIO Data Networks, Inc. dchiu@ariodata.com
4 *
5 * Based on MontaVista DS1743 code and U-Boot mc146818 code
6 *
7 * See file CREDITS for list of people who contributed to this
8 * project.
9 *
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License as
12 * published by the Free Software Foundation; either version 2 of
13 * the License, or (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
23 * MA 02111-1307 USA
24 */
25
26/*
27 * Date & Time support for the DS174x RTC
28 */
29
30/*#define DEBUG*/
31
32#include <common.h>
33#include <command.h>
34#include <rtc.h>
35
Michal Simek871c18d2008-07-14 19:45:37 +020036#if defined(CONFIG_CMD_DATE)
wdenk5b1d7132002-11-03 00:07:02 +000037
38static uchar rtc_read( unsigned int addr );
39static void rtc_write( unsigned int addr, uchar val);
40static uchar bin2bcd (unsigned int n);
41static unsigned bcd2bin(uchar c);
42
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +020043#define RTC_BASE ( CONFIG_SYS_NVRAM_SIZE + CONFIG_SYS_NVRAM_BASE_ADDR )
wdenk5b1d7132002-11-03 00:07:02 +000044
45#define RTC_YEAR ( RTC_BASE + 7 )
46#define RTC_MONTH ( RTC_BASE + 6 )
47#define RTC_DAY_OF_MONTH ( RTC_BASE + 5 )
48#define RTC_DAY_OF_WEEK ( RTC_BASE + 4 )
49#define RTC_HOURS ( RTC_BASE + 3 )
50#define RTC_MINUTES ( RTC_BASE + 2 )
51#define RTC_SECONDS ( RTC_BASE + 1 )
52#define RTC_CENTURY ( RTC_BASE + 0 )
53
54#define RTC_CONTROLA RTC_CENTURY
55#define RTC_CONTROLB RTC_SECONDS
56#define RTC_CONTROLC RTC_DAY_OF_WEEK
57
58#define RTC_CA_WRITE 0x80
59#define RTC_CA_READ 0x40
60
61#define RTC_CB_OSC_DISABLE 0x80
62
63#define RTC_CC_BATTERY_FLAG 0x80
64#define RTC_CC_FREQ_TEST 0x40
65
66/* ------------------------------------------------------------------------- */
67
Yuri Tikhonovb73a19e2008-03-20 17:56:04 +030068int rtc_get( struct rtc_time *tmp )
wdenk5b1d7132002-11-03 00:07:02 +000069{
70 uchar sec, min, hour;
71 uchar mday, wday, mon, year;
72
73 int century;
74
75 uchar reg_a;
76
77 reg_a = rtc_read( RTC_CONTROLA );
78 /* lock clock registers for read */
79 rtc_write( RTC_CONTROLA, ( reg_a | RTC_CA_READ ));
80
81 sec = rtc_read( RTC_SECONDS );
82 min = rtc_read( RTC_MINUTES );
83 hour = rtc_read( RTC_HOURS );
84 mday = rtc_read( RTC_DAY_OF_MONTH );
85 wday = rtc_read( RTC_DAY_OF_WEEK );
86 mon = rtc_read( RTC_MONTH );
87 year = rtc_read( RTC_YEAR );
88 century = rtc_read( RTC_CENTURY );
89
90 /* unlock clock registers after read */
91 rtc_write( RTC_CONTROLA, ( reg_a & ~RTC_CA_READ ));
92
93#ifdef RTC_DEBUG
94 printf( "Get RTC year: %02x mon/cent: %02x mday: %02x wday: %02x "
95 "hr: %02x min: %02x sec: %02x\n",
96 year, mon_cent, mday, wday,
97 hour, min, sec );
98#endif
99 tmp->tm_sec = bcd2bin( sec & 0x7F );
100 tmp->tm_min = bcd2bin( min & 0x7F );
101 tmp->tm_hour = bcd2bin( hour & 0x3F );
102 tmp->tm_mday = bcd2bin( mday & 0x3F );
103 tmp->tm_mon = bcd2bin( mon & 0x1F );
104 tmp->tm_wday = bcd2bin( wday & 0x07 );
105
106 /* glue year from century and year in century */
107 tmp->tm_year = bcd2bin( year ) +
108 ( bcd2bin( century & 0x3F ) * 100 );
109
110 tmp->tm_yday = 0;
111 tmp->tm_isdst= 0;
112#ifdef RTC_DEBUG
113 printf( "Get DATE: %4d-%02d-%02d (wday=%d) TIME: %2d:%02d:%02d\n",
114 tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
115 tmp->tm_hour, tmp->tm_min, tmp->tm_sec );
116#endif
Jean-Christophe PLAGNIOL-VILLARD53eec6f2008-04-02 08:03:58 +0200117 return 0;
wdenk5b1d7132002-11-03 00:07:02 +0000118}
119
Jean-Christophe PLAGNIOL-VILLARDd1e23192008-09-01 23:06:23 +0200120int rtc_set( struct rtc_time *tmp )
wdenk5b1d7132002-11-03 00:07:02 +0000121{
122 uchar reg_a;
123#ifdef RTC_DEBUG
124 printf( "Set DATE: %4d-%02d-%02d (wday=%d) TIME: %2d:%02d:%02d\n",
125 tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
126 tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
127#endif
128 /* lock clock registers for write */
129 reg_a = rtc_read( RTC_CONTROLA );
130 rtc_write( RTC_CONTROLA, ( reg_a | RTC_CA_WRITE ));
131
132 rtc_write( RTC_MONTH, bin2bcd( tmp->tm_mon ));
133
134 rtc_write( RTC_DAY_OF_WEEK, bin2bcd( tmp->tm_wday ));
135 rtc_write( RTC_DAY_OF_MONTH, bin2bcd( tmp->tm_mday ));
136 rtc_write( RTC_HOURS, bin2bcd( tmp->tm_hour ));
137 rtc_write( RTC_MINUTES, bin2bcd( tmp->tm_min ));
138 rtc_write( RTC_SECONDS, bin2bcd( tmp->tm_sec ));
139
140 /* break year up into century and year in century */
141 rtc_write( RTC_YEAR, bin2bcd( tmp->tm_year % 100 ));
142 rtc_write( RTC_CENTURY, bin2bcd( tmp->tm_year / 100 ));
143
144 /* unlock clock registers after read */
145 rtc_write( RTC_CONTROLA, ( reg_a & ~RTC_CA_WRITE ));
Jean-Christophe PLAGNIOL-VILLARDd1e23192008-09-01 23:06:23 +0200146
147 return 0;
wdenk5b1d7132002-11-03 00:07:02 +0000148}
149
150void rtc_reset (void)
151{
152 uchar reg_a, reg_b, reg_c;
153
154 reg_a = rtc_read( RTC_CONTROLA );
155 reg_b = rtc_read( RTC_CONTROLB );
156
157 if ( reg_b & RTC_CB_OSC_DISABLE )
158 {
159 printf( "real-time-clock was stopped. Now starting...\n" );
160 reg_a |= RTC_CA_WRITE;
161 reg_b &= ~RTC_CB_OSC_DISABLE;
162
163 rtc_write( RTC_CONTROLA, reg_a );
164 rtc_write( RTC_CONTROLB, reg_b );
165 }
166
167 /* make sure read/write clock register bits are cleared */
168 reg_a &= ~( RTC_CA_WRITE | RTC_CA_READ );
169 rtc_write( RTC_CONTROLA, reg_a );
170
171 reg_c = rtc_read( RTC_CONTROLC );
172 if (( reg_c & RTC_CC_BATTERY_FLAG ) == 0 )
173 printf( "RTC battery low. Clock setting may not be reliable.\n" );
174}
175
176/* ------------------------------------------------------------------------- */
177
178static uchar rtc_read( unsigned int addr )
179{
180 uchar val = in8( addr );
181#ifdef RTC_DEBUG
182 printf( "rtc_read: %x:%x\n", addr, val );
183#endif
184 return( val );
185}
186
187static void rtc_write( unsigned int addr, uchar val )
188{
189#ifdef RTC_DEBUG
190 printf( "rtc_write: %x:%x\n", addr, val );
191#endif
192 out8( addr, val );
193}
194
195static unsigned bcd2bin (uchar n)
196{
197 return ((((n >> 4) & 0x0F) * 10) + (n & 0x0F));
198}
199
200static unsigned char bin2bcd (unsigned int n)
201{
202 return (((n / 10) << 4) | (n % 10));
203}
204
Jon Loeliger068b60a2007-07-10 10:27:39 -0500205#endif