rtc/ds1337.c: Allow to set TCR register
[platform/kernel/u-boot.git] / drivers / rtc / s3c24x0_rtc.c
1 /*
2  * (C) Copyright 2003
3  * David Müller ELSOFT AG Switzerland. d.mueller@elsoft.ch
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  * Date & Time support for the built-in Samsung S3C24X0 RTC
26  */
27
28 #include <common.h>
29 #include <command.h>
30
31 #if (defined(CONFIG_CMD_DATE))
32
33 #if defined(CONFIG_S3C2400)
34 #include <s3c2400.h>
35 #elif defined(CONFIG_S3C2410)
36 #include <s3c2410.h>
37 #endif
38
39 #include <rtc.h>
40
41 /*#define       DEBUG*/
42
43 typedef enum {
44         RTC_ENABLE,
45         RTC_DISABLE
46 } RTC_ACCESS;
47
48
49 static inline void SetRTC_Access(RTC_ACCESS a)
50 {
51         S3C24X0_RTC * const rtc = S3C24X0_GetBase_RTC();
52         switch (a) {
53                 case RTC_ENABLE:
54                         rtc->RTCCON |= 0x01; break;
55
56                 case RTC_DISABLE:
57                         rtc->RTCCON &= ~0x01; break;
58         }
59 }
60
61 /* ------------------------------------------------------------------------- */
62
63 int rtc_get (struct rtc_time *tmp)
64 {
65         S3C24X0_RTC * const rtc = S3C24X0_GetBase_RTC();
66         uchar sec, min, hour, mday, wday, mon, year;
67         uchar a_sec,a_min, a_hour, a_date, a_mon, a_year, a_armed;
68
69         /* enable access to RTC registers */
70         SetRTC_Access(RTC_ENABLE);
71
72         /* read RTC registers */
73         do {
74                 sec     = rtc->BCDSEC;
75                 min     = rtc->BCDMIN;
76                 hour    = rtc->BCDHOUR;
77                 mday    = rtc->BCDDATE;
78                 wday    = rtc->BCDDAY;
79                 mon     = rtc->BCDMON;
80                 year    = rtc->BCDYEAR;
81         } while (sec != rtc->BCDSEC);
82
83         /* read ALARM registers */
84         a_sec   = rtc->ALMSEC;
85         a_min   = rtc->ALMMIN;
86         a_hour  = rtc->ALMHOUR;
87         a_date  = rtc->ALMDATE;
88         a_mon   = rtc->ALMMON;
89         a_year  = rtc->ALMYEAR;
90         a_armed = rtc->RTCALM;
91
92         /* disable access to RTC registers */
93         SetRTC_Access(RTC_DISABLE);
94
95 #ifdef RTC_DEBUG
96         printf ( "Get RTC year: %02x mon/cent: %02x mday: %02x wday: %02x "
97                 "hr: %02x min: %02x sec: %02x\n",
98                 year, mon, mday, wday,
99                 hour, min, sec);
100         printf ( "Alarms: %02x: year: %02x month: %02x date: %02x hour: %02x min: %02x sec: %02x\n",
101                 a_armed,
102                 a_year, a_mon, a_date,
103                 a_hour, a_min, a_sec);
104 #endif
105
106         tmp->tm_sec  = bcd2bin(sec  & 0x7F);
107         tmp->tm_min  = bcd2bin(min  & 0x7F);
108         tmp->tm_hour = bcd2bin(hour & 0x3F);
109         tmp->tm_mday = bcd2bin(mday & 0x3F);
110         tmp->tm_mon  = bcd2bin(mon & 0x1F);
111         tmp->tm_year = bcd2bin(year);
112         tmp->tm_wday = bcd2bin(wday & 0x07);
113         if(tmp->tm_year<70)
114                 tmp->tm_year+=2000;
115         else
116                 tmp->tm_year+=1900;
117         tmp->tm_yday = 0;
118         tmp->tm_isdst= 0;
119 #ifdef RTC_DEBUG
120         printf ( "Get DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
121                 tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
122                 tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
123 #endif
124
125         return 0;
126 }
127
128 int rtc_set (struct rtc_time *tmp)
129 {
130         S3C24X0_RTC * const rtc = S3C24X0_GetBase_RTC();
131         uchar sec, min, hour, mday, wday, mon, year;
132
133 #ifdef RTC_DEBUG
134         printf ( "Set DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
135                 tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
136                 tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
137 #endif
138         year    = bin2bcd(tmp->tm_year % 100);
139         mon     = bin2bcd(tmp->tm_mon);
140         wday    = bin2bcd(tmp->tm_wday);
141         mday    = bin2bcd(tmp->tm_mday);
142         hour    = bin2bcd(tmp->tm_hour);
143         min     = bin2bcd(tmp->tm_min);
144         sec     = bin2bcd(tmp->tm_sec);
145
146         /* enable access to RTC registers */
147         SetRTC_Access(RTC_ENABLE);
148
149         /* write RTC registers */
150         rtc->BCDSEC     = sec;
151         rtc->BCDMIN     = min;
152         rtc->BCDHOUR    = hour;
153         rtc->BCDDATE    = mday;
154         rtc->BCDDAY     = wday;
155         rtc->BCDMON     = mon;
156         rtc->BCDYEAR    = year;
157
158         /* disable access to RTC registers */
159         SetRTC_Access(RTC_DISABLE);
160
161         return 0;
162 }
163
164 void rtc_reset (void)
165 {
166         S3C24X0_RTC * const rtc = S3C24X0_GetBase_RTC();
167
168         rtc->RTCCON = (rtc->RTCCON & ~0x06) | 0x08;
169         rtc->RTCCON &= ~(0x08|0x01);
170 }
171
172 #endif