Sync'd u-boot-net with mainline
[platform/kernel/u-boot.git] / rtc / ds12887.c
1 /*
2  * (C) Copyright 2003
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License as
6  * published by the Free Software Foundation; either version 2 of
7  * the License, or (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software
16  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
17  * MA 02111-1307 USA
18  */
19
20 /*
21  * Date & Time support for the DS12887 RTC
22  */
23
24 #undef  RTC_DEBUG
25
26 #include <common.h>
27 #include <command.h>
28 #include <config.h>
29 #include <rtc.h>
30
31 #if defined(CONFIG_RTC_DS12887) && defined(CONFIG_CMD_DATE)
32
33 #define RTC_SECONDS                     0x00
34 #define RTC_SECONDS_ALARM               0x01
35 #define RTC_MINUTES                     0x02
36 #define RTC_MINUTES_ALARM               0x03
37 #define RTC_HOURS                       0x04
38 #define RTC_HOURS_ALARM                 0x05
39 #define RTC_DAY_OF_WEEK                 0x06
40 #define RTC_DATE_OF_MONTH               0x07
41 #define RTC_MONTH                       0x08
42 #define RTC_YEAR                        0x09
43 #define RTC_CONTROL_A                   0x0A
44 #define RTC_CONTROL_B                   0x0B
45 #define RTC_CONTROL_C                   0x0C
46 #define RTC_CONTROL_D                   0x0D
47
48 #define RTC_CA_UIP                      0x80
49 #define RTC_CB_DM                       0x04
50 #define RTC_CB_24_12                    0x02
51 #define RTC_CB_SET                      0x80
52
53 #if defined(CONFIG_ATC)
54
55 static uchar rtc_read (uchar reg)
56 {
57         uchar val;
58
59         *(volatile unsigned char*)(RTC_PORT_ADDR) = reg;
60         __asm__ __volatile__ ("sync");
61
62         val = *(volatile unsigned char*)(RTC_PORT_DATA);
63         return (val);
64 }
65
66 static void rtc_write (uchar reg, uchar val)
67 {
68         *(volatile unsigned char*)(RTC_PORT_ADDR) = reg;
69         __asm__ __volatile__ ("sync");
70
71         *(volatile unsigned char*)(RTC_PORT_DATA) = val;
72         __asm__ __volatile__ ("sync");
73 }
74
75 #else
76 # error Board specific rtc access functions should be supplied
77 #endif
78
79 static unsigned bcd2bin (uchar n)
80 {
81         return ((((n >> 4) & 0x0F) * 10) + (n & 0x0F));
82 }
83
84 static unsigned char bin2bcd (unsigned int n)
85 {
86         return (((n / 10) << 4) | (n % 10));
87 }
88
89 /* ------------------------------------------------------------------------- */
90
91 void rtc_get (struct rtc_time *tmp)
92 {
93         uchar sec, min, hour, mday, wday, mon, year;
94
95         /* check if rtc is available for access */
96         while( rtc_read(RTC_CONTROL_A) & RTC_CA_UIP)
97                 ;
98
99         sec  = rtc_read(RTC_SECONDS);
100         min  = rtc_read(RTC_MINUTES);
101         hour = rtc_read(RTC_HOURS);
102         mday = rtc_read(RTC_DATE_OF_MONTH);
103         wday = rtc_read(RTC_DAY_OF_WEEK);
104         mon  = rtc_read(RTC_MONTH);
105         year = rtc_read(RTC_YEAR);
106
107 #ifdef RTC_DEBUG
108         printf( "Get RTC year: %d; mon: %d; mday: %d; wday: %d; "
109                 "hr: %d; min: %d; sec: %d\n",
110                 year, mon, mday, wday, hour, min, sec );
111
112         printf ( "Alarms: hour: %02x min: %02x sec: %02x\n",
113                  rtc_read (RTC_HOURS_ALARM),
114                  rtc_read (RTC_MINUTES_ALARM),
115                  rtc_read (RTC_SECONDS_ALARM) );
116 #endif
117
118         if( !(rtc_read(RTC_CONTROL_B) & RTC_CB_DM))
119         {           /* Information is in BCD format */
120 printf(" Get: Convert BSD to BIN\n");
121                 tmp->tm_sec  = bcd2bin (sec  & 0x7F);
122                 tmp->tm_min  = bcd2bin (min  & 0x7F);
123                 tmp->tm_hour = bcd2bin (hour & 0x3F);
124                 tmp->tm_mday = bcd2bin (mday & 0x3F);
125                 tmp->tm_mon  = bcd2bin (mon & 0x1F);
126                 tmp->tm_year = bcd2bin (year);
127                 tmp->tm_wday = bcd2bin (wday & 0x07);
128         }
129 else
130         {
131                 tmp->tm_sec  = sec  & 0x7F;
132                 tmp->tm_min  = min  & 0x7F;
133                 tmp->tm_hour = hour & 0x3F;
134                 tmp->tm_mday = mday & 0x3F;
135                 tmp->tm_mon  = mon & 0x1F;
136                 tmp->tm_year = year;
137                 tmp->tm_wday = wday & 0x07;
138         }
139
140
141         if(tmp->tm_year<70)
142                 tmp->tm_year+=2000;
143         else
144                 tmp->tm_year+=1900;
145
146         tmp->tm_yday = 0;
147         tmp->tm_isdst= 0;
148 #ifdef RTC_DEBUG
149         printf ( "Get DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
150                 tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
151                 tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
152 #endif
153 }
154
155 void rtc_set (struct rtc_time *tmp)
156 {
157         uchar save_ctrl_b;
158         uchar sec, min, hour, mday, wday, mon, year;
159
160 #ifdef RTC_DEBUG
161         printf ( "Set DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
162                 tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
163                 tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
164 #endif
165
166         if( !(rtc_read(RTC_CONTROL_B) & RTC_CB_DM))
167         {           /* Information is in BCD format */
168                 year = bin2bcd(tmp->tm_year % 100);
169                 mon  = bin2bcd(tmp->tm_mon);
170                 wday = bin2bcd(tmp->tm_wday);
171                 mday = bin2bcd(tmp->tm_mday);
172                 hour = bin2bcd(tmp->tm_hour);
173                 min  = bin2bcd(tmp->tm_min);
174                 sec  = bin2bcd(tmp->tm_sec);
175         }
176         else
177         {
178                 year = tmp->tm_year % 100;
179                 mon  = tmp->tm_mon;
180                 wday = tmp->tm_wday;
181                 mday = tmp->tm_mday;
182                 hour = tmp->tm_hour;
183                 min  = tmp->tm_min;
184                 sec  = tmp->tm_sec;
185         }
186
187         /* disables the RTC to update the regs */
188         save_ctrl_b = rtc_read(RTC_CONTROL_B);
189         save_ctrl_b |= RTC_CB_SET;
190         rtc_write(RTC_CONTROL_B, save_ctrl_b);
191
192         rtc_write (RTC_YEAR, year);
193         rtc_write (RTC_MONTH, mon);
194         rtc_write (RTC_DAY_OF_WEEK, wday);
195         rtc_write (RTC_DATE_OF_MONTH, mday);
196         rtc_write (RTC_HOURS, hour);
197         rtc_write (RTC_MINUTES, min);
198         rtc_write (RTC_SECONDS, sec);
199
200         /* enables the RTC to update the regs */
201         save_ctrl_b &= ~RTC_CB_SET;
202         rtc_write(RTC_CONTROL_B, save_ctrl_b);
203 }
204
205 void rtc_reset (void)
206 {
207         struct rtc_time tmp;
208         uchar ctrl_rg;
209
210         ctrl_rg = RTC_CB_SET;
211         rtc_write(RTC_CONTROL_B,ctrl_rg);
212
213         tmp.tm_year = 1970 % 100;
214         tmp.tm_mon = 1;
215         tmp.tm_mday= 1;
216         tmp.tm_hour = 0;
217         tmp.tm_min = 0;
218         tmp.tm_sec = 0;
219
220 #ifdef RTC_DEBUG
221         printf ( "RTC:   %4d-%02d-%02d %2d:%02d:%02d UTC\n",
222                     tmp.tm_year, tmp.tm_mon, tmp.tm_mday,
223                     tmp.tm_hour, tmp.tm_min, tmp.tm_sec);
224 #endif
225
226         ctrl_rg = RTC_CB_SET | RTC_CB_24_12 | RTC_CB_DM;
227         rtc_write(RTC_CONTROL_B,ctrl_rg);
228         rtc_set(&tmp);
229
230         rtc_write(RTC_HOURS_ALARM, 0),
231         rtc_write(RTC_MINUTES_ALARM, 0),
232         rtc_write(RTC_SECONDS_ALARM, 0);
233
234         ctrl_rg = RTC_CB_24_12 | RTC_CB_DM;
235         rtc_write(RTC_CONTROL_B,ctrl_rg);
236 }
237
238 #endif