xref: /openbmc/u-boot/drivers/rtc/mc146818.c (revision 6dd6e90e)
1 /*
2  * (C) Copyright 2001
3  * Denis Peter MPL AG Switzerland. d.peter@mpl.ch
4  *
5  * SPDX-License-Identifier:	GPL-2.0+
6  */
7 
8 /*
9  * Date & Time support for the MC146818 (PIXX4) RTC
10  */
11 
12 /*#define	DEBUG*/
13 
14 #include <common.h>
15 #include <command.h>
16 #include <rtc.h>
17 #include <version.h>
18 
19 #if defined(__I386__) || defined(CONFIG_MALTA)
20 #include <asm/io.h>
21 #define in8(p) inb(p)
22 #define out8(p, v) outb(v, p)
23 #endif
24 
25 #if defined(CONFIG_CMD_DATE)
26 
27 /* Set this to 1 to clear the CMOS RAM */
28 #define CLEAR_CMOS 0
29 
30 static uchar rtc_read  (uchar reg);
31 static void  rtc_write (uchar reg, uchar val);
32 
33 #define RTC_PORT_MC146818	CONFIG_SYS_ISA_IO_BASE_ADDRESS +  0x70
34 #define RTC_SECONDS		0x00
35 #define RTC_SECONDS_ALARM	0x01
36 #define RTC_MINUTES		0x02
37 #define RTC_MINUTES_ALARM	0x03
38 #define RTC_HOURS		0x04
39 #define RTC_HOURS_ALARM		0x05
40 #define RTC_DAY_OF_WEEK		0x06
41 #define RTC_DATE_OF_MONTH	0x07
42 #define RTC_MONTH		0x08
43 #define RTC_YEAR		0x09
44 #define RTC_CONFIG_A		0x0A
45 #define RTC_CONFIG_B		0x0B
46 #define RTC_CONFIG_C		0x0C
47 #define RTC_CONFIG_D		0x0D
48 #define RTC_REG_SIZE		0x80
49 
50 #define RTC_CONFIG_A_REF_CLCK_32KHZ	(1 << 5)
51 #define RTC_CONFIG_A_RATE_1024HZ	6
52 
53 #define RTC_CONFIG_B_24H		(1 << 1)
54 
55 #define RTC_CONFIG_D_VALID_RAM_AND_TIME	0x80
56 
57 /* ------------------------------------------------------------------------- */
58 
59 int rtc_get (struct rtc_time *tmp)
60 {
61 	uchar sec, min, hour, mday, wday, mon, year;
62   /* here check if rtc can be accessed */
63 	while((rtc_read(RTC_CONFIG_A)&0x80)==0x80);
64 	sec	= rtc_read (RTC_SECONDS);
65 	min	= rtc_read (RTC_MINUTES);
66 	hour	= rtc_read (RTC_HOURS);
67 	mday	= rtc_read (RTC_DATE_OF_MONTH);
68 	wday	= rtc_read (RTC_DAY_OF_WEEK);
69 	mon	= rtc_read (RTC_MONTH);
70 	year	= rtc_read (RTC_YEAR);
71 #ifdef RTC_DEBUG
72 	printf ( "Get RTC year: %02x mon/cent: %02x mday: %02x wday: %02x "
73 		"hr: %02x min: %02x sec: %02x\n",
74 		year, mon, mday, wday,
75 		hour, min, sec );
76 	printf ( "Alarms: month: %02x hour: %02x min: %02x sec: %02x\n",
77 		rtc_read (RTC_CONFIG_D) & 0x3F,
78 		rtc_read (RTC_HOURS_ALARM),
79 		rtc_read (RTC_MINUTES_ALARM),
80 		rtc_read (RTC_SECONDS_ALARM) );
81 #endif
82 	tmp->tm_sec  = bcd2bin (sec  & 0x7F);
83 	tmp->tm_min  = bcd2bin (min  & 0x7F);
84 	tmp->tm_hour = bcd2bin (hour & 0x3F);
85 	tmp->tm_mday = bcd2bin (mday & 0x3F);
86 	tmp->tm_mon  = bcd2bin (mon & 0x1F);
87 	tmp->tm_year = bcd2bin (year);
88 	tmp->tm_wday = bcd2bin (wday & 0x07);
89 	if(tmp->tm_year<70)
90 		tmp->tm_year+=2000;
91 	else
92 		tmp->tm_year+=1900;
93 	tmp->tm_yday = 0;
94 	tmp->tm_isdst= 0;
95 #ifdef RTC_DEBUG
96 	printf ( "Get DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
97 		tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
98 		tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
99 #endif
100 
101 	return 0;
102 }
103 
104 int rtc_set (struct rtc_time *tmp)
105 {
106 #ifdef RTC_DEBUG
107 	printf ( "Set DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
108 		tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
109 		tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
110 #endif
111 	rtc_write(RTC_CONFIG_B,0x82); /* disables the RTC to update the regs */
112 
113 	rtc_write (RTC_YEAR, bin2bcd(tmp->tm_year % 100));
114 	rtc_write (RTC_MONTH, bin2bcd(tmp->tm_mon));
115 	rtc_write (RTC_DAY_OF_WEEK, bin2bcd(tmp->tm_wday));
116 	rtc_write (RTC_DATE_OF_MONTH, bin2bcd(tmp->tm_mday));
117 	rtc_write (RTC_HOURS, bin2bcd(tmp->tm_hour));
118 	rtc_write (RTC_MINUTES, bin2bcd(tmp->tm_min ));
119 	rtc_write (RTC_SECONDS, bin2bcd(tmp->tm_sec ));
120 	rtc_write(RTC_CONFIG_B,0x02); /* enables the RTC to update the regs */
121 
122 	return 0;
123 }
124 
125 void rtc_reset (void)
126 {
127 	rtc_write(RTC_CONFIG_B,0x82); /* disables the RTC to update the regs */
128 	rtc_write(RTC_CONFIG_A,0x20); /* Normal OP */
129 	rtc_write(RTC_CONFIG_B,0x00);
130 	rtc_write(RTC_CONFIG_B,0x00);
131 	rtc_write(RTC_CONFIG_B,0x02); /* enables the RTC to update the regs */
132 }
133 
134 /* ------------------------------------------------------------------------- */
135 
136 #ifdef CONFIG_SYS_RTC_REG_BASE_ADDR
137 /*
138  * use direct memory access
139  */
140 static uchar rtc_read (uchar reg)
141 {
142 	return in8(CONFIG_SYS_RTC_REG_BASE_ADDR + reg);
143 }
144 
145 static void rtc_write (uchar reg, uchar val)
146 {
147 	out8(CONFIG_SYS_RTC_REG_BASE_ADDR + reg, val);
148 }
149 #else
150 static uchar rtc_read (uchar reg)
151 {
152 	out8(RTC_PORT_MC146818,reg);
153 	return in8(RTC_PORT_MC146818 + 1);
154 }
155 
156 static void rtc_write (uchar reg, uchar val)
157 {
158 	out8(RTC_PORT_MC146818,reg);
159 	out8(RTC_PORT_MC146818+1, val);
160 }
161 #endif
162 
163 void rtc_init(void)
164 {
165 #if CLEAR_CMOS
166 	int i;
167 
168 	rtc_write(RTC_SECONDS_ALARM, 0);
169 	rtc_write(RTC_MINUTES_ALARM, 0);
170 	rtc_write(RTC_HOURS_ALARM, 0);
171 	for (i = RTC_CONFIG_A; i < RTC_REG_SIZE; i++)
172 		rtc_write(i, 0);
173 	printf("RTC: zeroing CMOS RAM\n");
174 #endif
175 
176 	/* Setup the real time clock */
177 	rtc_write(RTC_CONFIG_B, RTC_CONFIG_B_24H);
178 	/* Setup the frequency it operates at */
179 	rtc_write(RTC_CONFIG_A, RTC_CONFIG_A_REF_CLCK_32KHZ |
180 		  RTC_CONFIG_A_RATE_1024HZ);
181 	/* Ensure all reserved bits are 0 in register D */
182 	rtc_write(RTC_CONFIG_D, RTC_CONFIG_D_VALID_RAM_AND_TIME);
183 
184 	/* Clear any pending interrupts */
185 	rtc_read(RTC_CONFIG_C);
186 }
187 #endif
188