1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3 * (C) Copyright 2001
4 * Denis Peter MPL AG Switzerland. d.peter@mpl.ch
5 */
6
7 /*
8 * Date & Time support for the MC146818 (PIXX4) RTC
9 */
10
11 #include <common.h>
12 #include <command.h>
13 #include <dm.h>
14 #include <rtc.h>
15
16 #if defined(CONFIG_X86) || defined(CONFIG_MALTA)
17 #include <asm/io.h>
18 #define in8(p) inb(p)
19 #define out8(p, v) outb(v, p)
20 #endif
21
22 /* Set this to 1 to clear the CMOS RAM */
23 #define CLEAR_CMOS 0
24
25 #define RTC_PORT_MC146818 CONFIG_SYS_ISA_IO_BASE_ADDRESS + 0x70
26 #define RTC_SECONDS 0x00
27 #define RTC_SECONDS_ALARM 0x01
28 #define RTC_MINUTES 0x02
29 #define RTC_MINUTES_ALARM 0x03
30 #define RTC_HOURS 0x04
31 #define RTC_HOURS_ALARM 0x05
32 #define RTC_DAY_OF_WEEK 0x06
33 #define RTC_DATE_OF_MONTH 0x07
34 #define RTC_MONTH 0x08
35 #define RTC_YEAR 0x09
36 #define RTC_CONFIG_A 0x0a
37 #define RTC_CONFIG_B 0x0b
38 #define RTC_CONFIG_C 0x0c
39 #define RTC_CONFIG_D 0x0d
40 #define RTC_REG_SIZE 0x80
41
42 #define RTC_CONFIG_A_REF_CLCK_32KHZ (1 << 5)
43 #define RTC_CONFIG_A_RATE_1024HZ 6
44
45 #define RTC_CONFIG_B_24H (1 << 1)
46
47 #define RTC_CONFIG_D_VALID_RAM_AND_TIME 0x80
48
mc146818_read8(int reg)49 static int mc146818_read8(int reg)
50 {
51 #ifdef CONFIG_SYS_RTC_REG_BASE_ADDR
52 return in8(CONFIG_SYS_RTC_REG_BASE_ADDR + reg);
53 #else
54 int ofs = 0;
55
56 if (reg >= 128) {
57 ofs = 2;
58 reg -= 128;
59 }
60 out8(RTC_PORT_MC146818 + ofs, reg);
61
62 return in8(RTC_PORT_MC146818 + ofs + 1);
63 #endif
64 }
65
mc146818_write8(int reg,uchar val)66 static void mc146818_write8(int reg, uchar val)
67 {
68 #ifdef CONFIG_SYS_RTC_REG_BASE_ADDR
69 out8(CONFIG_SYS_RTC_REG_BASE_ADDR + reg, val);
70 #else
71 int ofs = 0;
72
73 if (reg >= 128) {
74 ofs = 2;
75 reg -= 128;
76 }
77 out8(RTC_PORT_MC146818 + ofs, reg);
78 out8(RTC_PORT_MC146818 + ofs + 1, val);
79 #endif
80 }
81
mc146818_get(struct rtc_time * tmp)82 static int mc146818_get(struct rtc_time *tmp)
83 {
84 uchar sec, min, hour, mday, wday __attribute__((unused)),mon, year;
85
86 /* here check if rtc can be accessed */
87 while ((mc146818_read8(RTC_CONFIG_A) & 0x80) == 0x80)
88 ;
89
90 sec = mc146818_read8(RTC_SECONDS);
91 min = mc146818_read8(RTC_MINUTES);
92 hour = mc146818_read8(RTC_HOURS);
93 mday = mc146818_read8(RTC_DATE_OF_MONTH);
94 wday = mc146818_read8(RTC_DAY_OF_WEEK);
95 mon = mc146818_read8(RTC_MONTH);
96 year = mc146818_read8(RTC_YEAR);
97 #ifdef RTC_DEBUG
98 printf("Get RTC year: %02x mon/cent: %02x mday: %02x wday: %02x hr: %02x min: %02x sec: %02x\n",
99 year, mon, mday, wday, hour, min, sec);
100 printf("Alarms: mday: %02x hour: %02x min: %02x sec: %02x\n",
101 mc146818_read8(RTC_CONFIG_D) & 0x3f,
102 mc146818_read8(RTC_HOURS_ALARM),
103 mc146818_read8(RTC_MINUTES_ALARM),
104 mc146818_read8(RTC_SECONDS_ALARM));
105 #endif
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
113 if (tmp->tm_year < 70)
114 tmp->tm_year += 2000;
115 else
116 tmp->tm_year += 1900;
117
118 tmp->tm_yday = 0;
119 tmp->tm_isdst = 0;
120 /*
121 * The mc146818 only updates wday if it is non-zero, sunday is 1
122 * saturday is 7. So let's use our library routine.
123 */
124 rtc_calc_weekday(tmp);
125 #ifdef RTC_DEBUG
126 printf("Get DATE: %4d-%02d-%02d (wday=%d) TIME: %2d:%02d:%02d\n",
127 tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
128 tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
129 #endif
130
131 return 0;
132 }
133
mc146818_set(struct rtc_time * tmp)134 static int mc146818_set(struct rtc_time *tmp)
135 {
136 #ifdef RTC_DEBUG
137 printf("Set DATE: %4d-%02d-%02d (wday=%d) TIME: %2d:%02d:%02d\n",
138 tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
139 tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
140 #endif
141 /* Disable the RTC to update the regs */
142 mc146818_write8(RTC_CONFIG_B, 0x82);
143
144 mc146818_write8(RTC_YEAR, bin2bcd(tmp->tm_year % 100));
145 mc146818_write8(RTC_MONTH, bin2bcd(tmp->tm_mon));
146 /* Sunday = 1, Saturday = 7 */
147 mc146818_write8(RTC_DAY_OF_WEEK, bin2bcd(tmp->tm_wday + 1));
148 mc146818_write8(RTC_DATE_OF_MONTH, bin2bcd(tmp->tm_mday));
149 mc146818_write8(RTC_HOURS, bin2bcd(tmp->tm_hour));
150 mc146818_write8(RTC_MINUTES, bin2bcd(tmp->tm_min));
151 mc146818_write8(RTC_SECONDS, bin2bcd(tmp->tm_sec));
152
153 /* Enable the RTC to update the regs */
154 mc146818_write8(RTC_CONFIG_B, 0x02);
155
156 return 0;
157 }
158
mc146818_reset(void)159 static void mc146818_reset(void)
160 {
161 /* Disable the RTC to update the regs */
162 mc146818_write8(RTC_CONFIG_B, 0x82);
163
164 /* Normal OP */
165 mc146818_write8(RTC_CONFIG_A, 0x20);
166 mc146818_write8(RTC_CONFIG_B, 0x00);
167 mc146818_write8(RTC_CONFIG_B, 0x00);
168
169 /* Enable the RTC to update the regs */
170 mc146818_write8(RTC_CONFIG_B, 0x02);
171 }
172
mc146818_init(void)173 static void mc146818_init(void)
174 {
175 #if CLEAR_CMOS
176 int i;
177
178 rtc_write8(RTC_SECONDS_ALARM, 0);
179 rtc_write8(RTC_MINUTES_ALARM, 0);
180 rtc_write8(RTC_HOURS_ALARM, 0);
181 for (i = RTC_CONFIG_A; i < RTC_REG_SIZE; i++)
182 rtc_write8(i, 0);
183 printf("RTC: zeroing CMOS RAM\n");
184 #endif
185
186 /* Setup the real time clock */
187 mc146818_write8(RTC_CONFIG_B, RTC_CONFIG_B_24H);
188 /* Setup the frequency it operates at */
189 mc146818_write8(RTC_CONFIG_A, RTC_CONFIG_A_REF_CLCK_32KHZ |
190 RTC_CONFIG_A_RATE_1024HZ);
191 /* Ensure all reserved bits are 0 in register D */
192 mc146818_write8(RTC_CONFIG_D, RTC_CONFIG_D_VALID_RAM_AND_TIME);
193
194 /* Clear any pending interrupts */
195 mc146818_read8(RTC_CONFIG_C);
196 }
197
198 #ifdef CONFIG_DM_RTC
199
rtc_mc146818_get(struct udevice * dev,struct rtc_time * time)200 static int rtc_mc146818_get(struct udevice *dev, struct rtc_time *time)
201 {
202 return mc146818_get(time);
203 }
204
rtc_mc146818_set(struct udevice * dev,const struct rtc_time * time)205 static int rtc_mc146818_set(struct udevice *dev, const struct rtc_time *time)
206 {
207 return mc146818_set((struct rtc_time *)time);
208 }
209
rtc_mc146818_reset(struct udevice * dev)210 static int rtc_mc146818_reset(struct udevice *dev)
211 {
212 mc146818_reset();
213
214 return 0;
215 }
216
rtc_mc146818_read8(struct udevice * dev,unsigned int reg)217 static int rtc_mc146818_read8(struct udevice *dev, unsigned int reg)
218 {
219 return mc146818_read8(reg);
220 }
221
rtc_mc146818_write8(struct udevice * dev,unsigned int reg,int val)222 static int rtc_mc146818_write8(struct udevice *dev, unsigned int reg, int val)
223 {
224 mc146818_write8(reg, val);
225
226 return 0;
227 }
228
rtc_mc146818_probe(struct udevice * dev)229 static int rtc_mc146818_probe(struct udevice *dev)
230 {
231 mc146818_init();
232
233 return 0;
234 }
235
236 static const struct rtc_ops rtc_mc146818_ops = {
237 .get = rtc_mc146818_get,
238 .set = rtc_mc146818_set,
239 .reset = rtc_mc146818_reset,
240 .read8 = rtc_mc146818_read8,
241 .write8 = rtc_mc146818_write8,
242 };
243
244 static const struct udevice_id rtc_mc146818_ids[] = {
245 { .compatible = "motorola,mc146818" },
246 { }
247 };
248
249 U_BOOT_DRIVER(motorola_mc146818) = {
250 .name = "motorola_mc146818",
251 .id = UCLASS_RTC,
252 .of_match = rtc_mc146818_ids,
253 .probe = rtc_mc146818_probe,
254 .ops = &rtc_mc146818_ops,
255 };
256
257 #else /* !CONFIG_DM_RTC */
258
rtc_get(struct rtc_time * tmp)259 int rtc_get(struct rtc_time *tmp)
260 {
261 return mc146818_get(tmp);
262 }
263
rtc_set(struct rtc_time * tmp)264 int rtc_set(struct rtc_time *tmp)
265 {
266 return mc146818_set(tmp);
267 }
268
rtc_reset(void)269 void rtc_reset(void)
270 {
271 mc146818_reset();
272 }
273
rtc_read8(int reg)274 int rtc_read8(int reg)
275 {
276 return mc146818_read8(reg);
277 }
278
rtc_write8(int reg,uchar val)279 void rtc_write8(int reg, uchar val)
280 {
281 mc146818_write8(reg, val);
282 }
283
rtc_read32(int reg)284 u32 rtc_read32(int reg)
285 {
286 u32 value = 0;
287 int i;
288
289 for (i = 0; i < sizeof(value); i++)
290 value |= rtc_read8(reg + i) << (i << 3);
291
292 return value;
293 }
294
rtc_write32(int reg,u32 value)295 void rtc_write32(int reg, u32 value)
296 {
297 int i;
298
299 for (i = 0; i < sizeof(value); i++)
300 rtc_write8(reg + i, (value >> (i << 3)) & 0xff);
301 }
302
rtc_init(void)303 void rtc_init(void)
304 {
305 mc146818_init();
306 }
307
308 #endif /* CONFIG_DM_RTC */
309